Merge CV, ver=5.1; ops/methods from HV, and interface from CV where possible
[goodguy/history.git] / cinelerra-5.1 / cinelerra / filethread.C
diff --git a/cinelerra-5.1/cinelerra/filethread.C b/cinelerra-5.1/cinelerra/filethread.C
new file mode 100644 (file)
index 0000000..c5b2878
--- /dev/null
@@ -0,0 +1,743 @@
+
+/*
+ * CINELERRA
+ * Copyright (C) 2009 Adam Williams <broadcast at earthling dot net>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ *
+ */
+
+#include "asset.h"
+#include "bcsignals.h"
+#include "condition.h"
+#include "file.h"
+#include "filethread.h"
+#include "mutex.h"
+#include "samples.h"
+#include "vframe.h"
+#include "videodevice.inc"
+
+#include <string.h>
+#include <unistd.h>
+
+
+FileThreadFrame::FileThreadFrame()
+{
+       position = 0;
+       frame = 0;
+}
+
+FileThreadFrame::~FileThreadFrame()
+{
+       if(frame) delete frame;
+}
+
+
+
+FileThread::FileThread(File *file, int do_audio, int do_video)
+ : Thread(1, 0, 0)
+{
+       reset();
+       create_objects(file,
+               do_audio,
+               do_video);
+}
+
+FileThread::~FileThread()
+{
+       delete_objects();
+
+
+}
+
+void FileThread::reset()
+{
+       audio_buffer = 0;
+       video_buffer = 0;
+       output_size = 0;
+       input_lock = 0;
+       output_lock = 0;
+       last_buffer = 0;
+       is_writing = 0;
+       is_reading = 0;
+       file_lock = 0;
+
+       read_wait_lock = 0;
+       user_wait_lock = 0;
+       frame_lock = 0;
+       total_frames = 0;
+       done = 0;
+       disable_read = 1;
+       start_position = -1;
+       layer = -1;
+       read_position = 0;
+       bzero(read_frames, sizeof(FileThreadFrame*) * MAX_READ_FRAMES);
+}
+
+
+void FileThread::create_objects(File *file,
+               int do_audio,
+               int do_video)
+{
+       this->file = file;
+       this->do_audio = do_audio;
+       this->do_video = do_video;
+       file_lock = new Mutex("FileThread::file_lock");
+       read_wait_lock = new Condition(0, "FileThread::read_wait_lock");
+       user_wait_lock = new Condition(0, "FileThread::user_wait_lock");
+       frame_lock = new Mutex("FileThread::frame_lock");
+       for(int i = 0; i < MAX_READ_FRAMES; i++)
+               read_frames[i] = new FileThreadFrame;
+}
+
+
+void FileThread::delete_objects()
+{
+       for(int i = 0; i < MAX_READ_FRAMES; i++)
+               delete read_frames[i];
+
+       if(output_lock)
+       {
+               for(int i = 0; i < ring_buffers; i++)
+               {
+                       delete output_lock[i];
+               }
+               delete [] output_lock;
+       }
+
+       if(input_lock)
+       {
+               for(int i = 0; i < ring_buffers; i++)
+               {
+                       delete input_lock[i];
+               }
+               delete [] input_lock;
+       }
+
+
+       if(last_buffer)
+               delete [] last_buffer;
+
+
+       delete [] output_size;
+
+       delete file_lock;
+
+
+       delete read_wait_lock;
+       delete user_wait_lock;
+       delete frame_lock;
+
+       reset();
+}
+
+void FileThread::run()
+{
+       int i, j;
+       int debug = 0;
+       if(debug) PRINT_TRACE
+
+       if(is_reading)
+       {
+               if(debug) PRINT_TRACE
+
+               while(!done && !disable_read)
+               {
+                       if(debug) PRINT_TRACE
+                       frame_lock->lock("FileThread::run 1");
+                       int local_total_frames = total_frames;
+                       frame_lock->unlock();
+
+                       if(local_total_frames >= MAX_READ_FRAMES)
+                       {
+                               read_wait_lock->lock("FileThread::run");
+                               continue;
+                       }
+
+                       if(debug) PRINT_TRACE
+                       if(done || disable_read) break;
+
+// Make local copes of the locked parameters
+                       FileThreadFrame *local_frame = 0;
+                       int64_t local_position = 0;
+                       int local_layer;
+                       if(debug) PRINT_TRACE
+
+                       frame_lock->lock("FileThread::run 2");
+// Get position of next frame to read
+                       if(total_frames)
+                               local_position = read_frames[total_frames - 1]->position + 1;
+                       else
+                               local_position = start_position;
+//printf("FileThread::run 1 %d %jd\n", total_frames, local_position);
+
+// Get first available frame
+                       local_total_frames = total_frames;
+                       local_frame = read_frames[local_total_frames];
+                       local_layer = layer;
+                       local_frame->valid = 0;
+                       frame_lock->unlock();
+
+// Read frame
+                       if(local_frame)
+                       {
+                               if(debug) PRINT_TRACE
+                               file->set_layer(local_layer, 1);
+                               file->set_video_position(local_position, 1);
+                               int supported_colormodel =
+                                       file->get_best_colormodel(PLAYBACK_ASYNCHRONOUS);
+                               if(debug) PRINT_TRACE
+
+
+// Allocate frame
+                               if(local_frame->frame &&
+                                       !local_frame->frame->params_match(file->asset->width,
+                                               file->asset->height,
+                                               supported_colormodel))
+                               {
+                                       delete local_frame->frame;
+                                       local_frame->frame = 0;
+                               }
+
+//printf("FileThread::run %d\n", __LINE__);
+                               if(!local_frame->frame)
+                               {
+                                       local_frame->frame = new VFrame(0,
+                                               -1,
+                                               file->asset->width,
+                                               file->asset->height,
+                                               supported_colormodel,
+                                               -1);
+                               }
+
+// Read it
+// printf("FileThread::run %d w=%d h=%d supported_colormodel=%d\n",
+// __LINE__,
+// local_frame->frame->get_w(),
+// local_frame->frame->get_h(),
+// local_frame->frame->get_color_model());
+                               if(debug)
+                               {
+                                       PRINT_TRACE
+                                       printf("file=%p local_frame->frame=%p\n", file, local_frame->frame);
+                               }
+                               file->read_frame(local_frame->frame, 1);
+                               if(debug) PRINT_TRACE
+                               local_frame->position = local_position;
+                               local_frame->layer = local_layer;
+
+// Put frame in last position but since the last position now may be
+// lower than it was when we got the frame, swap the current
+// last position with the previous last position.
+                               frame_lock->lock("FileThread::run 3");
+                               FileThreadFrame *old_frame = read_frames[total_frames];
+                               read_frames[local_total_frames] = old_frame;
+                               read_frames[total_frames++] = local_frame;
+                               local_frame->valid = 1;
+                               if(debug) PRINT_TRACE
+                               frame_lock->unlock();
+
+// Que the user
+                               user_wait_lock->unlock();
+                               if(debug) PRINT_TRACE
+                       }
+               }
+       }
+       else
+       {
+               while(!done)
+               {
+                       output_lock[local_buffer]->lock("FileThread::run 1");
+                       return_value = 0;
+
+
+// Timer timer;
+// timer.update();
+                       if(!last_buffer[local_buffer])
+                       {
+                               if(output_size[local_buffer])
+                               {
+                                       int result = 0;
+                                       file_lock->lock("FileThread::run 2");
+                                       if(do_audio)
+                                       {
+                                               result = file->write_samples(
+                                                       audio_buffer[local_buffer],
+                                                       output_size[local_buffer]);
+                                       }
+                                       else
+                                       if(do_video)
+                                       {
+                                               if(compressed)
+                                               {
+                                                       for(j = 0; j < file->asset->layers && !result; j++)
+                                                               for(i = 0; i < output_size[local_buffer] && !result; i++)
+                                                                       result = file->write_compressed_frame(video_buffer[local_buffer][j][i]);
+                                               }
+                                               else
+                                               {
+                                                       result = file->write_frames(video_buffer[local_buffer],
+                                                               output_size[local_buffer]);
+                                               }
+                                       }
+
+                                       file_lock->unlock();
+                                       return_value = result;
+                               }
+                               else
+                                       return_value = 0;
+
+                               output_size[local_buffer] = 0;
+                       }
+                       else
+                               done = 1;
+
+                       input_lock[local_buffer]->unlock();
+                       local_buffer++;
+                       if(local_buffer >= ring_buffers) local_buffer = 0;
+               }
+       }
+}
+
+
+
+int FileThread::stop_writing()
+{
+       if(is_writing)
+       {
+               int i, buffer, layer, frame;
+
+               swap_buffer();
+               input_lock[current_buffer]->lock("FileThread::stop_writing 1");
+
+               last_buffer[current_buffer] = 1;
+
+               for(i = 0; i < ring_buffers; i++)
+                       output_lock[i]->unlock();
+
+               swap_buffer();
+
+// wait for thread to finish
+               Thread::join();
+
+// delete buffers
+               file_lock->lock("FileThread::stop_writing 2");
+               if(do_audio)
+               {
+                       for(buffer = 0; buffer < ring_buffers; buffer++)
+                       {
+                               for(i = 0; i < file->asset->channels; i++)
+                                       delete audio_buffer[buffer][i];
+                               delete [] audio_buffer[buffer];
+                       }
+                       delete [] audio_buffer;
+                       audio_buffer = 0;
+               }
+
+// printf("FileThread::stop_writing %d %d %d %d\n",
+// do_video,
+// ring_buffers,
+// file->asset->layers,
+// buffer_size);
+               if(do_video)
+               {
+                       for(buffer = 0; buffer < ring_buffers; buffer++)
+                       {
+                               for(layer = 0; layer < file->asset->layers; layer++)
+                               {
+                                       for(frame = 0; frame < buffer_size; frame++)
+                                       {
+                                               delete video_buffer[buffer][layer][frame];
+                                       }
+                                       delete [] video_buffer[buffer][layer];
+                               }
+                               delete [] video_buffer[buffer];
+                       }
+                       delete [] video_buffer;
+                       video_buffer = 0;
+               }
+
+               file_lock->unlock();
+       }
+       return 0;
+}
+
+int FileThread::start_writing(long buffer_size,
+               int color_model,
+               int ring_buffers,
+               int compressed)
+{
+// allocate buffers
+       int buffer, layer, frame;
+
+       this->ring_buffers = ring_buffers;
+       this->buffer_size = buffer_size;
+       this->color_model = color_model;
+       this->compressed = compressed;
+       this->current_buffer = ring_buffers - 1;
+       return_value = 0;
+       local_buffer = 0;
+
+       file_lock->lock("FileThread::start_writing 1");
+
+
+
+
+// Buffer is swapped before first get
+       last_buffer = new int[ring_buffers];
+       output_size = new long[ring_buffers];
+
+
+       output_lock = new Condition*[ring_buffers];
+       input_lock = new Condition*[ring_buffers];
+       for(int i = 0; i < ring_buffers; i++)
+       {
+               output_lock[i] = new Condition(0, "FileThread::output_lock");
+               input_lock[i] = new Condition(1, "FileThread::input_lock");
+               last_buffer[i] = 0;
+               output_size[i] = 0;
+       }
+
+
+
+       if(do_audio)
+       {
+               audio_buffer = new Samples**[ring_buffers];
+               for(buffer = 0; buffer < ring_buffers; buffer++)
+               {
+                       audio_buffer[buffer] = new Samples*[file->asset->channels];
+
+                       for(int channel = 0; channel < file->asset->channels; channel++)
+                       {
+                               audio_buffer[buffer][channel] = new Samples(buffer_size);
+                       }
+               }
+       }
+
+       if(do_video)
+       {
+               this->color_model = color_model;
+               //long bytes_per_frame = VFrame::calculate_data_size(file->asset->width,
+               //      file->asset->height, -1, color_model);
+
+               video_buffer = new VFrame***[ring_buffers];
+// printf("FileThread::start_writing 1 %d %d %d %p\n",
+// ring_buffers,
+// file->asset->layers,
+// buffer_size,
+// video_buffer);
+               for(buffer = 0; buffer < ring_buffers; buffer++)
+               {
+                       video_buffer[buffer] = new VFrame**[file->asset->layers];
+                       for(layer = 0; layer < file->asset->layers; layer++)
+                       {
+                               video_buffer[buffer][layer] = new VFrame*[buffer_size];
+                               for(frame = 0; frame < buffer_size; frame++)
+                               {
+                                       if(compressed)
+                                       {
+                                               video_buffer[buffer][layer][frame] = new VFrame;
+//printf("FileThread::start_writing %d %d\n", __LINE__);
+                                       }
+                                       else
+                                       {
+                                               video_buffer[buffer][layer][frame] =
+                                                       new VFrame(0,
+                                                               -1,
+                                                               file->asset->width,
+                                                               file->asset->height,
+                                                               color_model,
+                                                               -1);
+// printf("FileThread::start_writing %d %d %d %d %p\n",
+// __LINE__,
+// buffer,
+// layer,
+// frame,
+// video_buffer[buffer][layer]);
+                                       }
+                               }
+                       }
+               }
+       }
+       file_lock->unlock();
+
+       for(int i = 0; i < ring_buffers; i++)
+       {
+               last_buffer[i] = 0;
+       }
+
+       is_writing = 1;
+       done = 0;
+       Thread::start();
+       return 0;
+}
+
+int FileThread::start_reading()
+{
+       if(!is_reading)
+       {
+               is_reading = 1;
+               disable_read = 1;
+               done = 0;
+       }
+       return 0;
+}
+
+int FileThread::stop_reading()
+{
+       if(is_reading && Thread::running())
+       {
+               done = 1;
+               read_wait_lock->unlock();
+               Thread::join();
+       }
+       return 0;
+}
+
+int FileThread::set_video_position(int64_t position)
+{
+// If the new position can't be added to the buffer without restarting,
+// disable reading.
+       if((position < this->start_position ||
+               position >= this->start_position + MAX_READ_FRAMES) &&
+               !disable_read)
+       {
+               disable_read = 1;
+               read_wait_lock->unlock();
+               Thread::join();
+
+               total_frames = 0;
+               for(int i = 0; i < MAX_READ_FRAMES; i++)
+                       read_frames[i]->valid = 0;
+               this->start_position = position;
+       }
+       else
+// If a sequential read, enable reading
+       if(this->start_position + 1 == position && disable_read)
+       {
+               this->start_position = position;
+               disable_read = 0;
+               Thread::start();
+       }
+       else
+       if(disable_read)
+       {
+               this->start_position = position;
+       }
+
+       this->read_position = position;
+       return 0;
+}
+
+int FileThread::set_layer(int layer)
+{
+       if(layer != this->layer)
+       {
+               disable_read = 1;
+               read_wait_lock->unlock();
+               Thread::join();
+               total_frames = 0;
+       }
+       this->layer = layer;
+       return 0;
+}
+
+int FileThread::read_frame(VFrame *frame)
+{
+       FileThreadFrame *local_frame = 0;
+       int got_it = 0;
+       int number = 0;
+
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+
+// Search thread for frame
+       while(!got_it && !disable_read)
+       {
+               frame_lock->lock("FileThread::read_frame 1");
+// printf("FileThread::read_frame: 1 read_position=%jd ", read_position);
+// for(int i = 0; i < total_frames; i++)
+// printf("%jd ", read_frames[i]->position);
+// printf("\n");
+               for(int i = 0; i < total_frames; i++)
+               {
+                       local_frame = read_frames[i];
+                       if(local_frame->position == read_position &&
+                               local_frame->layer == layer &&
+                               local_frame->frame &&
+                               local_frame->frame->equal_stacks(frame) &&
+                               local_frame->valid)
+                       {
+                               got_it = 1;
+                               number = i;
+                               break;
+                       }
+               }
+               frame_lock->unlock();
+
+// Not decoded yet but thread active
+               if(!got_it && !disable_read)
+               {
+                       user_wait_lock->lock("FileThread::read_frame");
+               }
+       }
+
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+
+       if(got_it)
+       {
+// printf("FileThread::read_frame 1 color_model=%d disable_read=%d\n",
+// frame->get_color_model(),
+// disable_read);
+// Copy image
+               if(frame->get_color_model() != local_frame->frame->get_color_model() ||
+                       frame->get_w() != local_frame->frame->get_w() ||
+                       frame->get_h() != local_frame->frame->get_h())
+               {
+// printf("FileThread::read_frame %d this=%p out cmodel=%d h=%d in cmodel=%d h=%d\n",
+// __LINE__,
+// this,
+// frame->get_color_model(),
+// frame->get_w(),
+// local_frame->frame->get_color_model(),
+// local_frame->frame->get_w());
+                       BC_CModels::transfer(frame->get_rows(),
+                               local_frame->frame->get_rows(),
+                               frame->get_y(),
+                               frame->get_u(),
+                               frame->get_v(),
+                               local_frame->frame->get_y(),
+                               local_frame->frame->get_u(),
+                               local_frame->frame->get_v(),
+                               0,
+                               0,
+                               local_frame->frame->get_w(),
+                               local_frame->frame->get_h(),
+                               0,
+                               0,
+                               frame->get_w(),
+                               frame->get_h(),
+                               local_frame->frame->get_color_model(),
+                               frame->get_color_model(),
+                               0,
+                               local_frame->frame->get_w(),
+                               frame->get_w());
+//for(int i = 0; i < 3000 * 1000 * 4; i++)
+//((float*)frame->get_rows()[0])[i] = 1;
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+               }
+               else
+               {
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+                       frame->copy_from(local_frame->frame);
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+               }
+
+// Can't copy stacks because the stack is needed by the plugin requestor.
+               frame->copy_params(local_frame->frame);
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+
+// Recycle all frames before current one but not including current one.
+// This handles redrawing of a single frame but because FileThread has no
+// notion of a still frame, it has to call read_frame for those.
+               frame_lock->lock("FileThread::read_frame 1");
+               FileThreadFrame *new_table[MAX_READ_FRAMES];
+               int k = 0;
+               for(int j = number; j < total_frames; j++, k++)
+               {
+                       new_table[k] = read_frames[j];
+               }
+               for(int j = 0; j < number; j++, k++)
+               {
+                       new_table[k] = read_frames[j];
+               }
+               memcpy(read_frames, new_table, sizeof(FileThreadFrame*) * total_frames);
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+               total_frames -= number;
+
+               start_position = read_position;
+               read_position++;
+               frame_lock->unlock();
+               read_wait_lock->unlock();
+               return 0;
+       }
+       else
+       {
+// printf("FileThread::read_frame 2 color_model=%d disable_read=%d\n",
+// frame->get_color_model(),
+// disable_read);
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+// Use traditional read function
+               file->set_layer(layer, 1);
+               file->set_video_position(read_position, 1);
+               read_position++;
+               int result = file->read_frame(frame, 1);
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+               return result;
+       }
+
+
+//printf("FileThread::read_frame %d this=%p\n", __LINE__, this);
+}
+
+int64_t FileThread::get_memory_usage()
+{
+       frame_lock->lock("FileThread::get_memory_usage");
+       int64_t result = 0;
+       for(int i = 0; i < MAX_READ_FRAMES; i++)
+               if(read_frames[i] && read_frames[i]->frame)
+                       result += read_frames[i]->frame->get_data_size();
+       frame_lock->unlock();
+       return result;
+}
+
+
+Samples** FileThread::get_audio_buffer()
+{
+       swap_buffer();
+
+       input_lock[current_buffer]->lock("FileThread::get_audio_buffer");
+       return audio_buffer[current_buffer];
+}
+
+VFrame*** FileThread::get_video_buffer()
+{
+       swap_buffer();
+
+       input_lock[current_buffer]->lock("FileThread::get_video_buffer");
+       return video_buffer[current_buffer];
+}
+
+VFrame*** FileThread::get_last_video_buffer()
+{
+       return video_buffer[current_buffer];
+}
+
+int FileThread::write_buffer(long size)
+{
+       output_size[current_buffer] = size;
+
+// unlock the output lock
+       output_lock[current_buffer]->unlock();
+
+       return return_value;
+}
+
+void FileThread::swap_buffer()
+{
+       current_buffer++;
+       if(current_buffer >= ring_buffers) current_buffer = 0;
+}
+
+