4 * Copyright (C) 1997-2014 Adam Williams <broadcast at earthling dot net>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24 #include "automation.h"
26 #include "bcsignals.h"
30 #include "condition.h"
33 #include "edlsession.h"
36 #include "filesystem.h"
38 #include "floatauto.h"
39 #include "floatautos.h"
40 #include "indexable.h"
41 #include "indexfile.h"
42 #include "indexstate.h"
43 #include "indexthread.h"
45 #include "localsession.h"
46 #include "mainprogress.h"
47 #include "mwindowgui.h"
49 #include "preferences.h"
50 #include "removefile.h"
51 #include "renderengine.h"
52 #include "resourcepixmap.h"
55 #include "timelinepane.h"
56 #include "trackcanvas.h"
58 #include "transportque.h"
71 #include <sys/types.h>
74 #include <linux/iso_fs.h>
77 // check for isofs volume_id for dvd/cdrom
79 static int udf_volume_id(const char *path, char *fname)
84 if( stat(path,&st) ) return 1;
85 // search mounted devices
86 FILE *fp = fopen("/proc/mounts","r");
89 while( result && !feof(fp) && !ferror(fp) ) {
90 char devpath[BCTEXTLEN], mpath[BCTEXTLEN];
91 char options[BCTEXTLEN], line[BCTEXTLEN];
92 char fstype[64], zero1[16], zero2[16];
93 if( !fgets(&line[0], sizeof(line)-1, fp) ) break;
94 int n = sscanf(&line[0], "%s %s %s %s %s %s\n",
95 devpath, mpath, fstype, options, zero1, zero2);
96 if( n != 6 ) continue;
97 // check udf filesystems
98 if( strcmp(fstype,"udf") != 0 ) continue;
100 if( stat(devpath,&dst) ) continue;
101 if( st.st_dev != dst.st_rdev ) continue;
102 int fd = open(devpath,O_RDONLY);
103 if( fd < 0 ) continue;
104 struct iso_primary_descriptor id;
105 if( lseek(fd,0x8000,SEEK_SET) == 0x8000 )
106 n = read(fd,&id,sizeof(id));
108 if( n != sizeof(id) ) continue;
109 // look for magic number
110 if( strncmp(ISO_STANDARD_ID,id.id,sizeof(id.id)) ) continue;
111 // look for volume_id
112 if( !isalnum(id.volume_id[0]) ) continue;
113 char *bp = (char*)&id.volume_id[0], *cp = fname;
114 for( int i=0; i<(int)sizeof(id.volume_id); ++i ) *cp++ = *bp++;
115 while( --cp>=fname && *cp==' ' ) *cp = 0;
116 if( !*fname ) continue;
117 // fname = volume_id _ creation_date
118 ++cp; *cp++ = '_'; bp = (char*)&id.creation_date[0];
119 for( int i=0; i<(int)sizeof(id.creation_date)-1; ++i ) {
120 if( !isdigit(*bp) ) break;
124 if( cp-fname > 4 ) result = 0;
132 // Use native sampling rates for files so the same index can be used in
133 // multiple projects.
135 IndexFile::IndexFile(MWindow *mwindow)
137 //printf("IndexFile::IndexFile 1\n");
139 this->mwindow = mwindow;
140 //printf("IndexFile::IndexFile 2\n");
141 redraw_timer = new Timer;
144 IndexFile::IndexFile(MWindow *mwindow,
145 Indexable *indexable)
147 //printf("IndexFile::IndexFile 2\n");
149 this->mwindow = mwindow;
150 this->indexable = indexable;
151 redraw_timer = new Timer;
154 indexable->add_user();
155 source_channels = indexable->get_audio_channels();
156 source_samplerate = indexable->get_sample_rate();
157 source_length = indexable->get_audio_samples();
161 IndexFile::~IndexFile()
163 //printf("IndexFile::~IndexFile 1\n");
165 if(indexable) indexable->remove_user();
169 void IndexFile::reset()
181 IndexState* IndexFile::get_state()
183 IndexState *index_state = 0;
184 if(indexable) index_state = indexable->index_state;
190 int IndexFile::open_index()
192 IndexState *index_state = 0;
195 // use buffer if being built
196 index_state = get_state();
198 if(index_state->index_status == INDEX_BUILDING)
204 if(!(result = open_file()))
206 // opened existing file
214 index_state->index_status = INDEX_READY;
225 void IndexFile::delete_index(Preferences *preferences,
226 Indexable *indexable, const char *suffix)
228 char index_filename[BCTEXTLEN];
229 char source_filename[BCTEXTLEN];
230 const char *path = indexable->path;
232 get_index_filename(source_filename,
233 preferences->index_directory,
234 index_filename, path, suffix);
235 //printf("IndexFile::delete_index %s %s\n", source_filename, index_filename);
236 remove_file(index_filename);
239 void IndexFile::delete_index_files(Preferences *preferences,
240 Indexable *indexable)
242 delete_index(preferences, indexable, ".toc");
243 delete_index(preferences, indexable, ".idx");
244 delete_index(preferences, indexable, ".mkr");
248 int IndexFile::open_file()
252 const char *path = indexable->path;
255 //printf("IndexFile::open_file %f\n", indexable->get_frame_rate());
257 get_index_filename(source_filename,
258 mwindow->preferences->index_directory,
262 if(debug) printf("IndexFile::open_file %d index_filename=%s\n",
265 fd = fopen(index_filename, "rb");
268 // Index file already exists.
269 // Get its last size without changing the real asset status.
270 Indexable *test_indexable = new Indexable(0);
272 test_indexable->copy_indexable(indexable);
273 read_info(test_indexable);
274 IndexState *index_state = test_indexable->index_state;
277 if(fs.get_date(index_filename) < fs.get_date(test_indexable->path))
279 if(debug) printf("IndexFile::open_file %d index_date=%jd source_date=%jd\n",
281 fs.get_date(index_filename),
282 fs.get_date(test_indexable->path));
284 // index older than source
290 if(fs.get_size(test_indexable->path) != index_state->index_bytes)
292 // source file is a different size than index source file
293 if(debug) printf("IndexFile::open_file %d index_size=%jd source_size=%jd\n",
295 index_state->index_bytes,
296 fs.get_size(test_indexable->path));
303 if(debug) printf("IndexFile::open_file %d\n",
305 fseek(fd, 0, SEEK_END);
306 file_length = ftell(fd);
307 fseek(fd, 0, SEEK_SET);
310 test_indexable->Garbage::remove_user();
315 if(debug) printf("IndexFile::open_file %d index_filename=%s doesn't exist\n",
324 int IndexFile::open_source()
326 //printf("IndexFile::open_source %p %s\n", asset, asset->path);
328 if(indexable && indexable->is_asset)
330 if(!source) source = new File;
332 Asset *asset = (Asset*)indexable;
333 if(source->open_file(mwindow->preferences,
336 //printf("IndexFile::open_source() Couldn't open %s.\n", asset->path);
342 asset->index_state->index_bytes = fs.get_size(asset->path);
343 source_length = source->get_audio_length();
344 int proxy_scale = asset->proxy_scale;
345 if( proxy_scale > 0 ) {
346 asset->width = asset->actual_width * proxy_scale;
347 asset->height = asset->actual_height * proxy_scale;
353 TransportCommand command(mwindow->preferences);
354 command.command = NORMAL_FWD;
355 command.get_edl()->copy_all((EDL*)indexable);
356 command.change_type = CHANGE_ALL;
357 command.realtime = 0;
358 cache = new CICache(mwindow->preferences);
359 render_engine = new RenderEngine(0,
360 mwindow->preferences, 0, 0);
361 render_engine->set_acache(cache);
362 render_engine->arm_command(&command);
364 indexable->index_state->index_bytes = fs.get_size(indexable->path);
370 void IndexFile::close_source()
375 delete render_engine;
378 cache->remove_user();
383 int64_t IndexFile::get_required_scale()
388 // get scale of index file
389 // Total peaks which may be stored in buffer
390 int64_t peak_count = mwindow->preferences->index_size /
391 (2 * sizeof(float) * source_channels);
393 source_length / result > peak_count;
397 // Takes too long to draw from source on a CDROM. Make indexes for
403 int IndexFile::get_index_filename(char *source_filename,
404 char *index_directory,
405 char *index_filename,
406 const char *input_filename,
409 const char *input_fn = input_filename;
410 char volume_id[BCTEXTLEN];
411 // Replace mount/directory with volume_id if isofs
412 if( !udf_volume_id(input_filename, volume_id) )
414 char *cp = strrchr((char*)input_filename,'/');
415 if( cp ) input_fn = cp + 1;
416 for( cp=volume_id; *cp; ++cp );
417 *cp++ = '_'; strcpy(cp, input_fn);
418 input_fn = volume_id;
420 // Replace slashes and dots
422 int len = strlen(input_fn);
423 for(i = 0, j = 0; i < len; i++)
425 if(input_fn[i] != '/' &&
427 source_filename[j++] = input_fn[i];
431 source_filename[j++] = '_';
434 source_filename[j] = 0;
436 fs.join_names(index_filename, index_directory, source_filename);
437 strcat(index_filename, suffix ? suffix : ".idx");
441 int IndexFile::interrupt_index()
447 // Read data into buffers
449 int IndexFile::create_index(MainProgressBar *progress)
456 // open the source file
457 if(open_source()) return 1;
458 source_channels = indexable->get_audio_channels();
459 source_samplerate = indexable->get_sample_rate();
460 source_length = indexable->get_audio_samples();
464 get_index_filename(source_filename,
465 mwindow->preferences->index_directory,
471 // Some file formats have their own sample index.
472 // Test for index in stream table of contents
473 if(source && !source->get_index(this, progress))
475 IndexState *index_state = get_state();
476 index_state->index_status = INDEX_READY;
480 // Build index from scratch
484 // Indexes are now built for everything since it takes too long to draw
485 // from CDROM source.
487 // get amount to read at a time in floats
488 int64_t buffersize = 65536;
489 char string[BCTEXTLEN];
490 sprintf(string, _("Creating %s."), index_filename);
492 progress->update_title(string);
493 progress->update_length(source_length);
494 redraw_timer->update();
497 // thread out index thread
498 IndexThread *index_thread = new IndexThread(mwindow,
503 index_thread->start_build();
505 // current sample in source file
506 int64_t position = 0;
507 int64_t fragment_size = buffersize;
508 int current_buffer = 0;
511 // pass through file once
512 // printf("IndexFile::create_index %d source_length=%jd source=%p progress=%p\n",
518 while(position < source_length && !result)
521 if(source_length - position < fragment_size && fragment_size == buffersize) fragment_size = source_length - position;
523 index_thread->input_lock[current_buffer]->lock("IndexFile::create_index 1");
524 index_thread->input_len[current_buffer] = fragment_size;
527 int cancelled = progress->update(position);
528 //printf("IndexFile::create_index cancelled=%d\n", cancelled);
531 index_thread->interrupt_flag ||
539 if(source && !result)
543 !result && channel < source_channels;
546 // Read from source file
547 source->set_audio_position(position);
548 source->set_channel(channel);
550 if(source->read_samples(
551 index_thread->buffer_in[current_buffer][channel],
558 if(render_engine && !result)
561 if(render_engine->arender)
563 result = render_engine->arender->process_buffer(
564 index_thread->buffer_in[current_buffer],
570 for(int i = 0; i < source_channels; i++)
572 bzero(index_thread->buffer_in[current_buffer][i]->get_data(),
573 fragment_size * sizeof(double));
580 // Release buffer to thread
583 index_thread->output_lock[current_buffer]->unlock();
585 if(current_buffer >= TOTAL_INDEX_BUFFERS) current_buffer = 0;
586 position += fragment_size;
590 index_thread->input_lock[current_buffer]->unlock();
596 // end thread cleanly
597 index_thread->input_lock[current_buffer]->lock("IndexFile::create_index 2");
598 index_thread->last_buffer[current_buffer] = 1;
599 index_thread->output_lock[current_buffer]->unlock();
600 index_thread->stop_build();
617 mwindow->edl->set_index_file(indexable);
623 int IndexFile::redraw_edits(int force)
625 int64_t difference = redraw_timer->get_scaled_difference(1000);
627 if(difference > 250 || force)
629 redraw_timer->update();
630 mwindow->gui->lock_window("IndexFile::redraw_edits");
631 mwindow->edl->set_index_file(indexable);
632 mwindow->gui->draw_indexes(indexable);
633 mwindow->gui->unlock_window();
641 int IndexFile::draw_index(
643 ResourcePixmap *pixmap,
649 IndexState *index_state = get_state();
650 int pane_number = canvas->pane->number;
651 //index_state->dump();
654 if(debug) printf("IndexFile::draw_index %d\n", __LINE__);
655 if(index_state->index_zoom == 0)
657 printf(_("IndexFile::draw_index: index has 0 zoom\n"));
660 if(debug) printf("IndexFile::draw_index %d\n", __LINE__);
662 // test channel number
663 if(edit->channel > source_channels) return 1;
664 if(debug) printf("IndexFile::draw_index %d source_samplerate=%d "
665 "w=%d samplerate=%jd zoom_sample=%jd\n",
666 __LINE__, source_samplerate, w,
667 mwindow->edl->session->sample_rate,
668 mwindow->edl->local_session->zoom_sample);
670 // calculate a virtual x where the edit_x should be in floating point
671 double virtual_edit_x = 1.0 *
672 edit->track->from_units(edit->startproject) *
673 mwindow->edl->session->sample_rate /
674 mwindow->edl->local_session->zoom_sample -
675 mwindow->edl->local_session->view_start[pane_number];
677 // samples in segment to draw relative to asset
678 FloatAutos *speed_autos = !edit->track->has_speed() ? 0 :
679 (FloatAutos *)edit->track->automation->autos[AUTOMATION_SPEED];
680 double project_zoom = mwindow->edl->local_session->zoom_sample;
681 int64_t edit_position = (x + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
682 int64_t start_position = edit->startsource;
683 start_position += !speed_autos ? edit_position :
684 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
685 int64_t end_position = edit->startsource;
686 edit_position = (x + w + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
687 end_position += !speed_autos ? edit_position :
688 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
689 double session_sample_rate = mwindow->edl->session->sample_rate;
690 double asset_over_session = (double)indexable->get_sample_rate() / session_sample_rate;
691 int64_t start_source = start_position * asset_over_session;
692 if( start_source < 0 ) start_source = 0;
693 int64_t start_index = start_source / index_state->index_zoom;
694 int64_t end_source = end_position * asset_over_session;
695 if( end_source < 0 ) end_source = 0;
696 int64_t end_index = end_source / index_state->index_zoom;
697 // start/length of index to read in floats
698 start_index *= 2; end_index *= 2;
699 // length of index available in floats
700 int64_t size_index = index_state->index_status == INDEX_BUILDING ?
701 index_state->get_channel_used(edit->channel) * 2 :
702 index_state->get_index_size(edit->channel);
703 // Clamp length of index to read by available data
704 if( end_index >= size_index ) end_index = size_index;
705 int64_t length_index = end_index - start_index;
706 if( length_index <= 0 ) return 0;
708 // Start and length of fragment to read from file in bytes.
710 int buffer_shared = 0;
711 int rect_audio = mwindow->preferences->rectify_audio;
712 int data_h = edit->track->data_h;
713 int center_pixel = !rect_audio ? data_h/2 : data_h;
714 if( edit->track->show_titles() )
715 center_pixel += mwindow->theme->get_image("title_bg_data")->get_h();
717 if( index_state->index_status == INDEX_BUILDING ) {
718 // index is in RAM, being built
719 buffer = index_state->get_channel_buffer(edit->channel);
720 if( !buffer ) return 0;
721 buffer += start_index;
725 buffer = new float[length_index + 1];
726 int64_t length_buffer = length_index * sizeof(float);
727 // add file/channel offset
728 int64_t index_offset = index_state->get_index_offset(edit->channel);
729 int64_t file_offset = (index_offset + start_index) * sizeof(float);
730 int64_t file_pos = index_state->index_start + file_offset;
731 int64_t read_length = file_length - file_pos;
732 if( read_length > length_buffer )
733 read_length = length_buffer;
734 int64_t length_read = 0;
735 if( read_length > 0 ) {
736 fseek(fd, file_pos, SEEK_SET);
737 length_read = fread(buffer, 1, read_length + sizeof(float), fd);
738 length_read &= ~(sizeof(float)-1);
740 if( (read_length-=length_read) > 0 )
741 memset((char*)buffer + length_read, 0, read_length);
745 canvas->set_color(mwindow->theme->audio_color);
747 int prev_y1 = center_pixel;
748 int prev_y2 = center_pixel;
750 int zoom_y = mwindow->edl->local_session->zoom_y * data_h /
751 mwindow->edl->local_session->zoom_atrack;
752 if( !rect_audio ) zoom_y /= 2;
753 int max_y = center_pixel + zoom_y - 1;
754 edit_position = (x + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
755 int64_t speed_position = edit->startsource;
756 speed_position += !speed_autos ? edit_position :
757 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
758 int64_t source_position = speed_position * asset_over_session;
759 int64_t index_position = source_position / index_state->index_zoom;
760 int64_t i = 2 * index_position - start_index;
761 CLAMP(i, 0, length_index);
764 for( int64_t x1=0; x1<w && i < length_index; ++x1 ) {
765 float highsample = !rect_audio ? buffer[i] : fabsf(buffer[i]); ++i;
766 float lowsample = !rect_audio ? buffer[i] : fabsf(buffer[i]); ++i;
768 edit_position = (x2 + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
769 int64_t speed_position = edit->startsource;
770 speed_position += !speed_autos ? edit_position :
771 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
772 source_position = speed_position * asset_over_session;
773 index_position = source_position / index_state->index_zoom;
774 int64_t k = 2 * index_position - start_index;
775 CLAMP(k, 0, length_index);
777 float high = !rect_audio ? buffer[i] : fabsf(buffer[i]);
778 highsample = MAX(highsample, high); ++i;
779 float low = !rect_audio ? buffer[i] : fabsf(buffer[i]);
780 lowsample = MIN(lowsample, low); ++i;
783 int y1 = (int)(center_pixel - highsample * zoom_y);
784 int y2 = (int)(center_pixel - lowsample * zoom_y);
785 CLAMP(y1, 0, max_y); int next_y1 = y1;
786 CLAMP(y2, 0, max_y); int next_y2 = y2;
787 //printf("draw_line (%f,%f) = %d,%d, %d,%d\n", lowsample, highsample, x2, y1, x2, y2);
790 // A different algorithm has to be used if it's 1 sample per pixel and the
791 // index is used. Now the min and max values are equal so we join the max samples.
792 if(mwindow->edl->local_session->zoom_sample == 1) {
793 canvas->draw_bline(x2 - 1, !rect_audio ? prev_y1 : center_pixel, x2, y1, pixmap);
796 // Extend line height if it doesn't connect to previous line
798 if(y1 > prev_y2) y1 = prev_y2 + 1;
799 if(y2 < prev_y1) y2 = prev_y1 - 1;
804 canvas->draw_bline(x2, y1, x2, !rect_audio ? y2 : center_pixel, pixmap);
812 if(!buffer_shared) delete [] buffer;
814 if(debug) printf("IndexFile::draw_index %d\n", __LINE__);
818 int IndexFile::close_index()
828 int IndexFile::remove_index()
830 IndexState *index_state = get_state();
831 if(index_state->index_status == INDEX_READY ||
832 index_state->index_status == INDEX_NOTTESTED)
835 remove(index_filename);
840 int IndexFile::read_info(Indexable *test_indexable)
844 // Store format in actual asset.
845 // If it's a nested EDL, we never want the format, just the index info.
846 if(!test_indexable) test_indexable = indexable;
847 if(!test_indexable) return 1;
849 IndexState * index_state = test_indexable->index_state;
850 if(index_state->index_status == INDEX_NOTTESTED)
852 // read start of index data
853 int temp = fread((char*)&(index_state->index_start), sizeof(int64_t), 1, fd);
854 //printf("IndexFile::read_info %d %f\n", __LINE__, test_indexable->get_frame_rate());
857 // read test_indexable info from index
860 data = new char[index_state->index_start];
861 temp = fread(data, index_state->index_start - sizeof(int64_t), 1, fd);
864 data[index_state->index_start - sizeof(int64_t)] = 0;
866 xml.read_from_string(data);
871 // Read the file format & index state.
872 if(test_indexable->is_asset)
874 Asset *test_asset = (Asset *)test_indexable;
875 Asset *asset = new Asset;
878 //printf("IndexFile::read_info %d %f\n", __LINE__, asset->get_frame_rate());
880 if( asset->format == FILE_UNKNOWN ||
881 test_asset->format != asset->format ) {
882 if(debug) printf("IndexFile::read_info %d\n", __LINE__);
885 asset->remove_user();
886 if( ret ) return ret;
890 // Read only the index state for a nested EDL
892 if(debug) printf("IndexFile::read_info %d\n", __LINE__);
895 result = xml.read_tag();
898 if(xml.tag.title_is("INDEX"))
900 index_state->read_xml(&xml, source_channels);
901 if(debug) printf("IndexFile::read_info %d\n", __LINE__);
902 if(debug) index_state->dump();