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>
73 #include <linux/iso_fs.h>
75 // check for isofs volume_id for dvd/cdrom
77 static int udf_volume_id(const char *path, char *fname)
80 if( stat(path,&st) ) return 1;
81 // search mounted devices
82 FILE *fp = fopen("/proc/mounts","r");
86 while( result && !feof(fp) && !ferror(fp) ) {
87 char devpath[BCTEXTLEN], mpath[BCTEXTLEN];
88 char options[BCTEXTLEN], line[BCTEXTLEN];
89 char fstype[64], zero1[16], zero2[16];
90 if( !fgets(&line[0], sizeof(line)-1, fp) ) break;
91 int n = sscanf(&line[0], "%s %s %s %s %s %s\n",
92 devpath, mpath, fstype, options, zero1, zero2);
93 if( n != 6 ) continue;
94 // check udf filesystems
95 if( strcmp(fstype,"udf") != 0 ) continue;
97 if( stat(devpath,&dst) ) continue;
98 if( st.st_dev != dst.st_rdev ) continue;
99 int fd = open(devpath,O_RDONLY);
100 if( fd < 0 ) continue;
101 struct iso_primary_descriptor id;
102 if( lseek(fd,0x8000,SEEK_SET) == 0x8000 )
103 n = read(fd,&id,sizeof(id));
105 if( n != sizeof(id) ) continue;
106 // look for magic number
107 if( strncmp(ISO_STANDARD_ID,id.id,sizeof(id.id)) ) continue;
108 // look for volume_id
109 if( !isalnum(id.volume_id[0]) ) continue;
110 char *bp = (char*)&id.volume_id[0], *cp = fname;
111 for( int i=0; i<(int)sizeof(id.volume_id); ++i ) *cp++ = *bp++;
112 while( --cp>=fname && *cp==' ' ) *cp = 0;
113 if( !*fname ) continue;
114 // fname = volume_id _ creation_date
115 ++cp; *cp++ = '_'; bp = (char*)&id.creation_date[0];
116 for( int i=0; i<(int)sizeof(id.creation_date)-1; ++i ) {
117 if( !isdigit(*bp) ) break;
121 if( cp-fname > 4 ) result = 0;
128 // Use native sampling rates for files so the same index can be used in
129 // multiple projects.
131 IndexFile::IndexFile(MWindow *mwindow)
133 //printf("IndexFile::IndexFile 1\n");
135 this->mwindow = mwindow;
136 //printf("IndexFile::IndexFile 2\n");
137 redraw_timer = new Timer;
140 IndexFile::IndexFile(MWindow *mwindow,
141 Indexable *indexable)
143 //printf("IndexFile::IndexFile 2\n");
145 this->mwindow = mwindow;
146 this->indexable = indexable;
147 redraw_timer = new Timer;
150 indexable->add_user();
151 source_channels = indexable->get_audio_channels();
152 source_samplerate = indexable->get_sample_rate();
153 source_length = indexable->get_audio_samples();
157 IndexFile::~IndexFile()
159 //printf("IndexFile::~IndexFile 1\n");
161 if(indexable) indexable->remove_user();
165 void IndexFile::reset()
177 IndexState* IndexFile::get_state()
179 IndexState *index_state = 0;
180 if(indexable) index_state = indexable->index_state;
186 int IndexFile::open_index()
188 IndexState *index_state = 0;
191 // use buffer if being built
192 index_state = get_state();
194 if(index_state->index_status == INDEX_BUILDING)
200 if(!(result = open_file()))
202 // opened existing file
210 index_state->index_status = INDEX_READY;
221 void IndexFile::delete_index(Preferences *preferences,
222 Indexable *indexable, const char *suffix)
224 char index_filename[BCTEXTLEN];
225 char source_filename[BCTEXTLEN];
226 const char *path = indexable->path;
228 get_index_filename(source_filename,
229 preferences->index_directory,
230 index_filename, path, suffix);
231 //printf("IndexFile::delete_index %s %s\n", source_filename, index_filename);
232 remove_file(index_filename);
235 void IndexFile::delete_index_files(Preferences *preferences,
236 Indexable *indexable)
238 delete_index(preferences, indexable, ".toc");
239 delete_index(preferences, indexable, ".idx");
240 delete_index(preferences, indexable, ".mkr");
244 int IndexFile::open_file()
248 const char *path = indexable->path;
251 //printf("IndexFile::open_file %f\n", indexable->get_frame_rate());
253 get_index_filename(source_filename,
254 mwindow->preferences->index_directory,
258 if(debug) printf("IndexFile::open_file %d index_filename=%s\n",
261 fd = fopen(index_filename, "rb");
264 // Index file already exists.
265 // Get its last size without changing the real asset status.
266 Indexable *test_indexable = new Indexable(0);
268 test_indexable->copy_indexable(indexable);
269 read_info(test_indexable);
270 IndexState *index_state = test_indexable->index_state;
273 if(fs.get_date(index_filename) < fs.get_date(test_indexable->path))
275 if(debug) printf("IndexFile::open_file %d index_date=%jd source_date=%jd\n",
277 fs.get_date(index_filename),
278 fs.get_date(test_indexable->path));
280 // index older than source
286 if(fs.get_size(test_indexable->path) != index_state->index_bytes)
288 // source file is a different size than index source file
289 if(debug) printf("IndexFile::open_file %d index_size=%jd source_size=%jd\n",
291 index_state->index_bytes,
292 fs.get_size(test_indexable->path));
299 if(debug) printf("IndexFile::open_file %d\n",
301 fseek(fd, 0, SEEK_END);
302 file_length = ftell(fd);
303 fseek(fd, 0, SEEK_SET);
306 test_indexable->Garbage::remove_user();
311 if(debug) printf("IndexFile::open_file %d index_filename=%s doesn't exist\n",
320 int IndexFile::open_source()
322 //printf("IndexFile::open_source %p %s\n", asset, asset->path);
324 if(indexable && indexable->is_asset)
326 if(!source) source = new File;
328 Asset *asset = (Asset*)indexable;
329 if(source->open_file(mwindow->preferences,
332 //printf("IndexFile::open_source() Couldn't open %s.\n", asset->path);
338 asset->index_state->index_bytes = fs.get_size(asset->path);
339 source_length = source->get_audio_length();
340 int proxy_scale = asset->proxy_scale;
341 if( proxy_scale > 0 ) {
342 asset->width = asset->actual_width * proxy_scale;
343 asset->height = asset->actual_height * proxy_scale;
349 TransportCommand command;
350 command.command = NORMAL_FWD;
351 command.get_edl()->copy_all((EDL*)indexable);
352 command.change_type = CHANGE_ALL;
353 command.realtime = 0;
354 cache = new CICache(mwindow->preferences);
355 render_engine = new RenderEngine(0,
356 mwindow->preferences, 0, 0);
357 render_engine->set_acache(cache);
358 render_engine->arm_command(&command);
360 indexable->index_state->index_bytes = fs.get_size(indexable->path);
366 void IndexFile::close_source()
371 delete render_engine;
378 int64_t IndexFile::get_required_scale()
383 // get scale of index file
384 // Total peaks which may be stored in buffer
385 int64_t peak_count = mwindow->preferences->index_size /
386 (2 * sizeof(float) * source_channels);
388 source_length / result > peak_count;
392 // Takes too long to draw from source on a CDROM. Make indexes for
398 int IndexFile::get_index_filename(char *source_filename,
399 char *index_directory,
400 char *index_filename,
401 const char *input_filename,
404 const char *input_fn = input_filename;
405 char volume_id[BCTEXTLEN];
406 // Replace mount/directory with volume_id if isofs
407 if( !udf_volume_id(input_filename, volume_id) )
409 char *cp = strrchr((char*)input_filename,'/');
410 if( cp ) input_fn = cp + 1;
411 for( cp=volume_id; *cp; ++cp );
412 *cp++ = '_'; strcpy(cp, input_fn);
413 input_fn = volume_id;
415 // Replace slashes and dots
417 int len = strlen(input_fn);
418 for(i = 0, j = 0; i < len; i++)
420 if(input_fn[i] != '/' &&
422 source_filename[j++] = input_fn[i];
426 source_filename[j++] = '_';
429 source_filename[j] = 0;
431 fs.join_names(index_filename, index_directory, source_filename);
432 strcat(index_filename, suffix ? suffix : ".idx");
436 int IndexFile::interrupt_index()
442 // Read data into buffers
444 int IndexFile::create_index(MainProgressBar *progress)
451 // open the source file
452 if(open_source()) return 1;
453 source_channels = indexable->get_audio_channels();
454 source_samplerate = indexable->get_sample_rate();
455 source_length = indexable->get_audio_samples();
459 get_index_filename(source_filename,
460 mwindow->preferences->index_directory,
466 // Some file formats have their own sample index.
467 // Test for index in stream table of contents
468 if(source && !source->get_index(this, progress))
470 IndexState *index_state = get_state();
471 index_state->index_status = INDEX_READY;
475 // Build index from scratch
479 // Indexes are now built for everything since it takes too long to draw
480 // from CDROM source.
482 // get amount to read at a time in floats
483 int64_t buffersize = 65536;
484 char string[BCTEXTLEN];
485 sprintf(string, _("Creating %s."), index_filename);
487 progress->update_title(string);
488 progress->update_length(source_length);
489 redraw_timer->update();
492 // thread out index thread
493 IndexThread *index_thread = new IndexThread(mwindow,
498 index_thread->start_build();
500 // current sample in source file
501 int64_t position = 0;
502 int64_t fragment_size = buffersize;
503 int current_buffer = 0;
506 // pass through file once
507 // printf("IndexFile::create_index %d source_length=%jd source=%p progress=%p\n",
513 while(position < source_length && !result)
516 if(source_length - position < fragment_size && fragment_size == buffersize) fragment_size = source_length - position;
518 index_thread->input_lock[current_buffer]->lock("IndexFile::create_index 1");
519 index_thread->input_len[current_buffer] = fragment_size;
522 int cancelled = progress->update(position);
523 //printf("IndexFile::create_index cancelled=%d\n", cancelled);
526 index_thread->interrupt_flag ||
534 if(source && !result)
538 !result && channel < source_channels;
541 // Read from source file
542 source->set_audio_position(position);
543 source->set_channel(channel);
545 if(source->read_samples(
546 index_thread->buffer_in[current_buffer][channel],
553 if(render_engine && !result)
556 if(render_engine->arender)
558 result = render_engine->arender->process_buffer(
559 index_thread->buffer_in[current_buffer],
565 for(int i = 0; i < source_channels; i++)
567 bzero(index_thread->buffer_in[current_buffer][i]->get_data(),
568 fragment_size * sizeof(double));
575 // Release buffer to thread
578 index_thread->output_lock[current_buffer]->unlock();
580 if(current_buffer >= TOTAL_INDEX_BUFFERS) current_buffer = 0;
581 position += fragment_size;
585 index_thread->input_lock[current_buffer]->unlock();
591 // end thread cleanly
592 index_thread->input_lock[current_buffer]->lock("IndexFile::create_index 2");
593 index_thread->last_buffer[current_buffer] = 1;
594 index_thread->output_lock[current_buffer]->unlock();
595 index_thread->stop_build();
612 mwindow->edl->set_index_file(indexable);
618 int IndexFile::redraw_edits(int force)
620 int64_t difference = redraw_timer->get_scaled_difference(1000);
622 if(difference > 250 || force)
624 redraw_timer->update();
625 mwindow->gui->lock_window("IndexFile::redraw_edits");
626 mwindow->edl->set_index_file(indexable);
627 mwindow->gui->draw_indexes(indexable);
628 mwindow->gui->unlock_window();
636 int IndexFile::draw_index(
638 ResourcePixmap *pixmap,
644 IndexState *index_state = get_state();
645 int pane_number = canvas->pane->number;
646 //index_state->dump();
649 if(debug) printf("IndexFile::draw_index %d\n", __LINE__);
650 if(index_state->index_zoom == 0)
652 printf(_("IndexFile::draw_index: index has 0 zoom\n"));
655 if(debug) printf("IndexFile::draw_index %d\n", __LINE__);
657 // test channel number
658 if(edit->channel > source_channels) return 1;
659 if(debug) printf("IndexFile::draw_index %d source_samplerate=%d "
660 "w=%d samplerate=%jd zoom_sample=%jd\n",
661 __LINE__, source_samplerate, w,
662 mwindow->edl->session->sample_rate,
663 mwindow->edl->local_session->zoom_sample);
665 // calculate a virtual x where the edit_x should be in floating point
666 double virtual_edit_x = 1.0 *
667 edit->track->from_units(edit->startproject) *
668 mwindow->edl->session->sample_rate /
669 mwindow->edl->local_session->zoom_sample -
670 mwindow->edl->local_session->view_start[pane_number];
672 // samples in segment to draw relative to asset
673 FloatAutos *speed_autos = !edit->track->has_speed() ? 0 :
674 (FloatAutos *)edit->track->automation->autos[AUTOMATION_SPEED];
675 double project_zoom = mwindow->edl->local_session->zoom_sample;
676 int64_t edit_position = (x + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
677 int64_t start_position = edit->startsource;
678 start_position += !speed_autos ? edit_position :
679 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
680 int64_t end_position = edit->startsource;
681 edit_position = (x + w + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
682 end_position += !speed_autos ? edit_position :
683 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
684 double session_sample_rate = mwindow->edl->session->sample_rate;
685 double asset_over_session = (double)indexable->get_sample_rate() / session_sample_rate;
686 int64_t start_source = start_position * asset_over_session;
687 if( start_source < 0 ) start_source = 0;
688 int64_t start_index = start_source / index_state->index_zoom;
689 int64_t end_source = end_position * asset_over_session;
690 if( end_source < 0 ) end_source = 0;
691 int64_t end_index = end_source / index_state->index_zoom;
692 // start/length of index to read in floats
693 start_index *= 2; end_index *= 2;
694 // length of index available in floats
695 int64_t size_index = index_state->index_status == INDEX_BUILDING ?
696 index_state->get_channel_used(edit->channel) * 2 :
697 index_state->get_index_size(edit->channel);
698 // Clamp length of index to read by available data
699 if( end_index >= size_index ) end_index = size_index;
700 int64_t length_index = end_index - start_index;
701 if( length_index <= 0 ) return 0;
703 // Start and length of fragment to read from file in bytes.
705 int buffer_shared = 0;
706 int rect_audio = mwindow->preferences->rectify_audio;;
707 int center_pixel = !rect_audio ?
708 mwindow->edl->local_session->zoom_track / 2 :
709 mwindow->edl->local_session->zoom_track;
710 if( edit->track->show_titles() )
711 center_pixel += mwindow->theme->get_image("title_bg_data")->get_h();
713 if( index_state->index_status == INDEX_BUILDING ) {
714 // index is in RAM, being built
715 buffer = index_state->get_channel_buffer(edit->channel);
716 if( !buffer ) return 0;
717 buffer += start_index;
721 buffer = new float[length_index + 1];
722 int64_t length_buffer = length_index * sizeof(float);
723 // add file/channel offset
724 int64_t index_offset = index_state->get_index_offset(edit->channel);
725 int64_t file_offset = (index_offset + start_index) * sizeof(float);
726 int64_t file_pos = index_state->index_start + file_offset;
727 int64_t read_length = file_length - file_pos;
728 if( read_length > length_buffer )
729 read_length = length_buffer;
730 int64_t length_read = 0;
731 if( read_length > 0 ) {
732 fseek(fd, file_pos, SEEK_SET);
733 length_read = fread(buffer, 1, read_length + sizeof(float), fd);
734 length_read &= ~(sizeof(float)-1);
736 if( (read_length-=length_read) > 0 )
737 memset((char*)buffer + length_read, 0, read_length);
741 canvas->set_color(mwindow->theme->audio_color);
743 int prev_y1 = center_pixel;
744 int prev_y2 = center_pixel;
746 int zoom_y = !rect_audio ?
747 mwindow->edl->local_session->zoom_y / 2 :
748 mwindow->edl->local_session->zoom_y;
749 int max_y = center_pixel + zoom_y - 1;
750 edit_position = (x + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
751 int64_t speed_position = edit->startsource;
752 speed_position += !speed_autos ? edit_position :
753 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
754 int64_t source_position = speed_position * asset_over_session;
755 int64_t index_position = source_position / index_state->index_zoom;
756 int64_t i = 2 * index_position - start_index;
757 CLAMP(i, 0, length_index);
760 for( int64_t x1=0; x1<w && i < length_index; ++x1 ) {
761 float highsample = !rect_audio ? buffer[i] : fabsf(buffer[i]); ++i;
762 float lowsample = !rect_audio ? buffer[i] : fabsf(buffer[i]); ++i;
764 edit_position = (x2 + pixmap->pixmap_x - virtual_edit_x) * project_zoom;
765 int64_t speed_position = edit->startsource;
766 speed_position += !speed_autos ? edit_position :
767 speed_autos->automation_integral(edit->startproject, edit_position, PLAY_FORWARD);
768 source_position = speed_position * asset_over_session;
769 index_position = source_position / index_state->index_zoom;
770 int64_t k = 2 * index_position - start_index;
771 CLAMP(k, 0, length_index);
773 float high = !rect_audio ? buffer[i] : fabsf(buffer[i]);
774 highsample = MAX(highsample, high); ++i;
775 float low = !rect_audio ? buffer[i] : fabsf(buffer[i]);
776 lowsample = MIN(lowsample, low); ++i;
779 int y1 = (int)(center_pixel - highsample * zoom_y);
780 int y2 = (int)(center_pixel - lowsample * zoom_y);
781 CLAMP(y1, 0, max_y); int next_y1 = y1;
782 CLAMP(y2, 0, max_y); int next_y2 = y2;
783 //printf("draw_line (%f,%f) = %d,%d, %d,%d\n", lowsample, highsample, x2, y1, x2, y2);
786 // A different algorithm has to be used if it's 1 sample per pixel and the
787 // index is used. Now the min and max values are equal so we join the max samples.
788 if(mwindow->edl->local_session->zoom_sample == 1) {
789 canvas->draw_line(x2 - 1, !rect_audio ? prev_y1 : center_pixel, x2, y1, pixmap);
792 // Extend line height if it doesn't connect to previous line
794 if(y1 > prev_y2) y1 = prev_y2 + 1;
795 if(y2 < prev_y1) y2 = prev_y1 - 1;
800 canvas->draw_line(x2, y1, x2, !rect_audio ? y2 : center_pixel, pixmap);
808 if(!buffer_shared) delete [] buffer;
810 if(debug) printf("IndexFile::draw_index %d\n", __LINE__);
814 int IndexFile::close_index()
824 int IndexFile::remove_index()
826 IndexState *index_state = get_state();
827 if(index_state->index_status == INDEX_READY ||
828 index_state->index_status == INDEX_NOTTESTED)
831 remove(index_filename);
836 int IndexFile::read_info(Indexable *test_indexable)
840 // Store format in actual asset.
841 // If it's a nested EDL, we never want the format, just the index info.
842 if(!test_indexable) test_indexable = indexable;
843 if(!test_indexable) return 1;
845 IndexState * index_state = test_indexable->index_state;
846 if(index_state->index_status == INDEX_NOTTESTED)
848 // read start of index data
849 int temp = fread((char*)&(index_state->index_start), sizeof(int64_t), 1, fd);
850 //printf("IndexFile::read_info %d %f\n", __LINE__, test_indexable->get_frame_rate());
853 // read test_indexable info from index
856 data = new char[index_state->index_start];
857 temp = fread(data, index_state->index_start - sizeof(int64_t), 1, fd);
860 data[index_state->index_start - sizeof(int64_t)] = 0;
862 xml.read_from_string(data);
867 // Read the file format & index state.
868 if(test_indexable->is_asset)
870 Asset *test_asset = (Asset *)test_indexable;
871 Asset *asset = new Asset;
874 //printf("IndexFile::read_info %d %f\n", __LINE__, asset->get_frame_rate());
876 if( asset->format == FILE_UNKNOWN ||
877 test_asset->format != asset->format ) {
878 if(debug) printf("IndexFile::read_info %d\n", __LINE__);
881 asset->remove_user();
882 if( ret ) return ret;
886 // Read only the index state for a nested EDL
888 if(debug) printf("IndexFile::read_info %d\n", __LINE__);
891 result = xml.read_tag();
894 if(xml.tag.title_is("INDEX"))
896 index_state->read_xml(&xml, source_channels);
897 if(debug) printf("IndexFile::read_info %d\n", __LINE__);
898 if(debug) index_state->dump();