rework transportque for shuttle speed codes, add rusage, cleanup
[goodguy/cinelerra.git] / cinelerra-5.1 / cinelerra / playbackengine.C
1
2 /*
3  * CINELERRA
4  * Copyright (C) 2008 Adam Williams <broadcast at earthling dot net>
5  *
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.
10  *
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.
15  *
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
19  *
20  */
21
22 #include "bchash.h"
23 #include "bcsignals.h"
24 #include "cache.h"
25 #include "condition.h"
26 #include "edl.h"
27 #include "edlsession.h"
28 #include "localsession.h"
29 #include "mbuttons.h"
30 #include "mutex.h"
31 #include "mwindow.h"
32 #include "mwindowgui.h"
33 #include "patchbay.h"
34 #include "tracking.h"
35 #include "playbackengine.h"
36 #include "playtransport.h"
37 #include "preferences.h"
38 #include "renderengine.h"
39 #include "mainsession.h"
40 #include "trackcanvas.h"
41 #include "transportque.h"
42 #include "vrender.h"
43
44
45 PlaybackEngine::PlaybackEngine(MWindow *mwindow, Canvas *output)
46  : Thread(1, 0, 0)
47 {
48         this->mwindow = mwindow;
49         this->output = output;
50         is_playing_back = 0;
51         tracking_position = 0;
52         tracking_active = 0;
53         audio_cache = 0;
54         video_cache = 0;
55         command = new TransportCommand();
56         command->command = STOP;
57         next_command = new TransportCommand();
58         next_command->change_type = CHANGE_ALL;
59         curr_command = new TransportCommand();
60         stop_command = new TransportCommand();
61         stop_command->command = STOP;
62         tracking_lock = new Mutex("PlaybackEngine::tracking_lock");
63         renderengine_lock = new Mutex("PlaybackEngine::renderengine_lock");
64         tracking_done = new Condition(1, "PlaybackEngine::tracking_done");
65         pause_lock = new Condition(0, "PlaybackEngine::pause_lock");
66         start_lock = new Condition(0, "PlaybackEngine::start_lock");
67         input_lock = new Condition(1, "PlaybackEngine::input_lock");
68         output_lock = new Condition(0, "PlaybackEngine::output_lock", 1);
69
70         render_engine = 0;
71         debug = 0;
72 }
73
74 PlaybackEngine::~PlaybackEngine()
75 {
76         done = 1;
77         transport_stop();
78         interrupt_playback();
79
80         Thread::join();
81         delete preferences;
82         delete_render_engine();
83         delete audio_cache;
84         delete video_cache;
85         delete tracking_lock;
86         delete tracking_done;
87         delete pause_lock;
88         delete start_lock;
89         delete renderengine_lock;
90         delete command;
91         delete next_command;
92         delete curr_command;
93         delete stop_command;
94         delete input_lock;
95         delete output_lock;
96 }
97
98 void PlaybackEngine::create_objects()
99 {
100         preferences = new Preferences;
101         preferences->copy_from(mwindow->preferences);
102
103         done = 0;
104         Thread::start();
105         start_lock->lock("PlaybackEngine::create_objects");
106 }
107
108 ChannelDB* PlaybackEngine::get_channeldb()
109 {
110         PlaybackConfig *config = command->get_edl()->session->playback_config;
111         switch(config->vconfig->driver)
112         {
113                 case VIDEO4LINUX2JPEG:
114                         return mwindow->channeldb_v4l2jpeg;
115         }
116         return 0;
117 }
118
119 int PlaybackEngine::create_render_engine()
120 {
121 // Fix playback configurations
122         delete_render_engine();
123         render_engine = new RenderEngine(this, preferences, output, 0);
124 //printf("PlaybackEngine::create_render_engine %d\n", __LINE__);
125         return 0;
126 }
127
128 void PlaybackEngine::delete_render_engine()
129 {
130         renderengine_lock->lock("PlaybackEngine::delete_render_engine");
131         delete render_engine;
132         render_engine = 0;
133         renderengine_lock->unlock();
134 }
135
136 void PlaybackEngine::arm_render_engine()
137 {
138         if(render_engine)
139                 render_engine->arm_command(command);
140 }
141
142 void PlaybackEngine::start_render_engine()
143 {
144         if(render_engine) render_engine->start_command();
145 }
146
147 void PlaybackEngine::wait_render_engine()
148 {
149         if(command->realtime && render_engine)
150         {
151                 render_engine->join();
152         }
153 }
154
155 void PlaybackEngine::create_cache()
156 {
157         if(audio_cache) { delete audio_cache;  audio_cache = 0; }
158         if(video_cache) { delete video_cache;  video_cache = 0; }
159         if(!audio_cache) audio_cache = new CICache(preferences);
160         if(!video_cache) video_cache = new CICache(preferences);
161 }
162
163
164 void PlaybackEngine::perform_change()
165 {
166         switch( command->change_type )
167         {
168                 case CHANGE_ALL:
169                         create_cache();
170                 case CHANGE_EDL:
171                         create_render_engine();
172                 case CHANGE_PARAMS:
173                         if(command->change_type != CHANGE_EDL &&
174                                 (uint32_t)command->change_type != CHANGE_ALL)
175                                 render_engine->get_edl()->synchronize_params(command->get_edl());
176                 case CHANGE_NONE:
177                         break;
178         }
179 }
180
181 void PlaybackEngine::sync_parameters(EDL *edl)
182 {
183 // TODO: lock out render engine from keyframe deletions
184         command->get_edl()->synchronize_params(edl);
185         if(render_engine) render_engine->get_edl()->synchronize_params(edl);
186 }
187
188
189 void PlaybackEngine::interrupt_playback(int wait_tracking)
190 {
191         renderengine_lock->lock("PlaybackEngine::interrupt_playback");
192         if(render_engine)
193                 render_engine->interrupt_playback();
194         renderengine_lock->unlock();
195
196 // Stop pausing
197         pause_lock->unlock();
198
199 // Wait for tracking to finish if it is running
200         if(wait_tracking)
201         {
202                 tracking_done->lock("PlaybackEngine::interrupt_playback");
203                 tracking_done->unlock();
204         }
205 }
206
207
208 // Return 1 if levels exist
209 int PlaybackEngine::get_output_levels(double *levels, long position)
210 {
211         int result = 0;
212         if(render_engine && render_engine->do_audio)
213         {
214                 result = 1;
215                 render_engine->get_output_levels(levels, position);
216         }
217         return result;
218 }
219
220
221 int PlaybackEngine::get_module_levels(ArrayList<double> *module_levels, long position)
222 {
223         int result = 0;
224         if(render_engine && render_engine->do_audio)
225         {
226                 result = 1;
227                 render_engine->get_module_levels(module_levels, position);
228         }
229         return result;
230 }
231
232 int PlaybackEngine::brender_available(long position)
233 {
234         return 0;
235 }
236
237 void PlaybackEngine::init_cursor(int active)
238 {
239 }
240
241 void PlaybackEngine::init_meters()
242 {
243 }
244
245 void PlaybackEngine::stop_cursor()
246 {
247 }
248
249
250 void PlaybackEngine::init_tracking()
251 {
252         tracking_active = !command->single_frame() ? 1 : 0;
253         tracking_position = command->playbackstart;
254         tracking_done->lock("PlaybackEngine::init_tracking");
255         init_cursor(tracking_active);
256         init_meters();
257 }
258
259 void PlaybackEngine::stop_tracking()
260 {
261         tracking_active = 0;
262         stop_cursor();
263         tracking_done->unlock();
264 }
265
266 void PlaybackEngine::update_tracking(double position)
267 {
268         tracking_lock->lock("PlaybackEngine::update_tracking");
269         tracking_position = position;
270 // Signal that the timer is accurate.
271         if(tracking_active) tracking_active = 2;
272         tracking_timer.update();
273         tracking_lock->unlock();
274 }
275
276 double PlaybackEngine::get_tracking_position()
277 {
278         double result = 0;
279
280         tracking_lock->lock("PlaybackEngine::get_tracking_position");
281
282
283 // Adjust for elapsed time since last update_tracking.
284 // But tracking timer isn't accurate until the first update_tracking
285 // so wait.
286         if(tracking_active == 2)
287         {
288 //printf("PlaybackEngine::get_tracking_position %d %d %d\n", command->get_direction(), tracking_position, tracking_timer.get_scaled_difference(command->get_edl()->session->sample_rate));
289
290
291 // Don't interpolate when every frame is played.
292                 if(command->get_edl()->session->video_every_frame &&
293                         render_engine &&
294                         render_engine->do_video)
295                 {
296                         result = tracking_position;
297                 }
298                 else
299 // Interpolate
300                 {
301                         double loop_start, loop_end;
302                         int play_loop = command->loop_play ? 1 : 0;
303                         EDL *edl = command->get_edl();
304                         int loop_playback = edl->local_session->loop_playback ? 1 : 0;
305                         if( play_loop || !loop_playback ) {
306                                 loop_start = command->start_position;
307                                 loop_end = command->end_position;
308                         }
309                         else {
310                                 loop_start = edl->local_session->loop_start;
311                                 loop_end = edl->local_session->loop_end;
312                                 play_loop = 1;
313                         }
314                         double loop_size = loop_end - loop_start;
315
316                         if( command->get_direction() == PLAY_FORWARD ) {
317 // Interpolate
318                                 result = tracking_position +
319                                         command->get_speed() *
320                                         tracking_timer.get_difference() /
321                                         1000.0;
322
323 // Compensate for loop
324 //printf("PlaybackEngine::get_tracking_position 1 %d\n", command->get_edl()->local_session->loop_playback);
325                                 if( play_loop && loop_size > 0 ) {
326                                         while( result > loop_end ) result -= loop_size;
327                                 }
328                         }
329                         else {
330 // Interpolate
331                                 result = tracking_position -
332                                         command->get_speed() *
333                                         tracking_timer.get_difference() /
334                                         1000.0;
335
336 // Compensate for loop
337                                 if( play_loop && loop_size > 0 ) {
338                                         while( result < loop_start ) result += loop_size;
339                                 }
340                         }
341
342                 }
343         }
344         else
345                 result = tracking_position;
346
347         tracking_lock->unlock();
348 //printf("PlaybackEngine::get_tracking_position %f %f %d\n", result, tracking_position, tracking_active);
349
350 // Adjust for loop
351
352         return result;
353 }
354
355 void PlaybackEngine::update_transport(int command, int paused)
356 {
357 //      mwindow->gui->lock_window();
358 //      mwindow->gui->mbuttons->transport->update_gui_state(command, paused);
359 //      mwindow->gui->unlock_window();
360 }
361
362 void PlaybackEngine::run()
363 {
364         start_lock->unlock();
365
366         while( !done ) {
367 // Wait for current command to finish
368                 output_lock->lock("PlaybackEngine::run");
369                 wait_render_engine();
370
371 // Read the new command
372                 input_lock->lock("PlaybackEngine::run");
373                 if( done ) return;
374                 command->copy_from(curr_command);
375                 input_lock->unlock();
376 //printf("PlaybackEngine::run 1 %d\n", command->command);
377
378                 switch( command->command ) {
379 // Parameter change only
380                 case COMMAND_NONE:
381                         perform_change();
382                         break;
383
384                 case PAUSE:
385                         init_cursor(0);
386                         pause_lock->lock("PlaybackEngine::run");
387                         stop_cursor();
388                         break;
389
390                 case STOP:
391 // No changing
392                         break;
393
394                 case CURRENT_FRAME:
395                 case LAST_FRAME:
396                         perform_change();
397                         arm_render_engine();
398 // Dispatch the command
399                         start_render_engine();
400                         break;
401
402                 case SINGLE_FRAME_FWD:
403                 case SINGLE_FRAME_REWIND:
404 // fall through
405                 default:
406                         is_playing_back = 1;
407
408                         perform_change();
409                         arm_render_engine();
410
411 // Start tracking after arming so the tracking position doesn't change.
412 // The tracking for a single frame command occurs during PAUSE
413                         init_tracking();
414
415 // Dispatch the command
416                         start_render_engine();
417                         break;
418                 }
419
420
421 //printf("PlaybackEngine::run 100\n");
422         }
423 }
424
425
426 void PlaybackEngine::stop_playback(int wait)
427 {
428         transport_stop();
429         interrupt_playback(wait);
430         renderengine_lock->lock("PlaybackEngine::stop_playback");
431         if(render_engine)
432                 render_engine->wait_done();
433         renderengine_lock->unlock();
434 }
435
436
437 void PlaybackEngine::send_command(int command, EDL *edl, int wait_tracking, int use_inout)
438 {
439 //printf("PlaybackEngine::send_command 1 %d\n", command);
440 // Stop requires transferring the output buffer to a refresh buffer.
441         int do_stop = 0, do_resume = 0;
442         int curr_command = this->command->command;
443         int curr_single_frame = TransportCommand::single_frame(curr_command);
444         int curr_audio = this->command->toggle_audio ?
445                 !curr_single_frame : curr_single_frame;
446         int single_frame = TransportCommand::single_frame(command);
447         int next_audio = next_command->toggle_audio ? !single_frame : single_frame;
448
449 // Dispatch command
450         switch( command ) {
451         case FAST_REWIND:       // Commands that play back
452         case NORMAL_REWIND:
453         case SLOW_REWIND:
454         case SINGLE_FRAME_REWIND:
455         case SINGLE_FRAME_FWD:
456         case SLOW_FWD:
457         case NORMAL_FWD:
458         case FAST_FWD:
459         case CURRENT_FRAME:
460         case LAST_FRAME:
461                 if( curr_command == command && !next_command->speed &&
462                     !curr_single_frame && curr_audio == next_audio ) {
463 // Same direction pressed twice, not shuttle, and no change in audio state,  Stop
464                         do_stop = 1;
465                         break;
466                 }
467 // Resume or change direction
468                 switch( curr_command ) {
469                 default:
470                         transport_stop();
471                         interrupt_playback(wait_tracking);
472                         do_resume = 1;
473 // fall through
474                 case STOP:
475                 case COMMAND_NONE:
476                 case SINGLE_FRAME_FWD:
477                 case SINGLE_FRAME_REWIND:
478                 case CURRENT_FRAME:
479                 case LAST_FRAME:
480                         next_command->realtime = 1;
481                         next_command->resume = do_resume;
482 // Start from scratch
483                         transport_command(command, CHANGE_NONE, edl, use_inout);
484                         break;
485                 }
486                 break;
487
488 // Commands that stop
489         case STOP:
490         case REWIND:
491         case GOTO_END:
492                 do_stop = 1;
493                 break;
494         }
495
496         if( do_stop ) {
497                 transport_stop();
498                 interrupt_playback(wait_tracking);
499         }
500 }
501
502 int PlaybackEngine::transport_stop()
503 {
504         input_lock->lock("PlaybackEngine::transport_stop 1");
505         curr_command->copy_from(stop_command);
506         input_lock->unlock();
507         output_lock->unlock();
508         return 0;
509 }
510
511 int PlaybackEngine::transport_command(int command, int change_type, EDL *new_edl, int use_inout)
512 {
513         input_lock->lock("PlaybackEngine::transport_command 1");
514         next_command->command = command;
515         next_command->change_type |= change_type;
516         if( new_edl ) {
517 // Just change the EDL if the change requires it because renderengine
518 // structures won't point to the new EDL otherwise and because copying the
519 // EDL for every cursor movement is slow.
520                 switch( change_type ) {
521                 case CHANGE_EDL:
522                 case CHANGE_ALL:
523                         next_command->get_edl()->copy_all(new_edl);
524                         break;
525                 case CHANGE_PARAMS:
526                         next_command->get_edl()->synchronize_params(new_edl);
527                         break;
528                 }
529                 next_command->set_playback_range(new_edl, use_inout,
530                                 preferences->forward_render_displacement);
531         }
532         curr_command->copy_from(next_command);
533         next_command->reset();
534         input_lock->unlock();
535         output_lock->unlock();
536         return 0;
537 }
538
539 void PlaybackEngine::refresh_frame(int change_type, EDL *edl, int dir)
540 {
541         int command = dir >= 0 ? CURRENT_FRAME : LAST_FRAME;
542         next_command->realtime = 1;
543         transport_command(command, change_type, edl);
544 }
545