record batch dir path fix, handle yuv in gl masking, sync up maskengine/playback3d...
[goodguy/cinelerra.git] / cinelerra-5.1 / cinelerra / proxy.C
1
2 /*
3  * CINELERRA
4  * Copyright (C) 2015 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 "assets.h"
23 #include "audiodevice.h"
24 #include "bcsignals.h"
25 #include "cache.h"
26 #include "clip.h"
27 #include "cstrdup.h"
28 #include "edl.h"
29 #include "edlsession.h"
30 #include "errorbox.h"
31 #include "file.h"
32 #include "filesystem.h"
33 #include "formattools.h"
34 #include "language.h"
35 #include "mainerror.h"
36 #include "mainindexes.h"
37 #include "mainprogress.h"
38 #include "mainundo.h"
39 #include "mutex.h"
40 #include "mwindow.h"
41 #include "mwindowgui.h"
42 #include "overlayframe.h"
43 #include "preferences.h"
44 #include "proxy.h"
45 #include "renderengine.h"
46 #include "theme.h"
47 #include "transportque.h"
48 #include "vrender.h"
49
50 #define WIDTH 400
51 #define HEIGHT 330
52 #define MAX_SCALE 16
53
54 ProxyMenuItem::ProxyMenuItem(MWindow *mwindow)
55  : BC_MenuItem(_("Proxy settings..."),  _("Alt-r"), 'r')
56 {
57         this->mwindow = mwindow;
58         set_alt();
59         dialog = 0;
60 }
61 ProxyMenuItem::~ProxyMenuItem()
62 {
63         delete dialog;
64 }
65
66 void ProxyMenuItem::create_objects()
67 {
68         dialog = new ProxyDialog(mwindow);
69 }
70
71 int ProxyMenuItem::handle_event()
72 {
73         mwindow->gui->unlock_window();
74         dialog->start();
75         mwindow->gui->lock_window("ProxyMenuItem::handle_event");
76
77         return 1;
78 }
79
80 ProxyDialog::ProxyDialog(MWindow *mwindow)
81 {
82         this->mwindow = mwindow;
83         gui = 0;
84         asset = new Asset;
85
86 // quicker than some, not as good as others
87         asset->format = FILE_FFMPEG;
88         strcpy(asset->fformat, "mpeg");
89         strcpy(asset->vcodec, "mpeg.mpeg");
90         asset->ff_video_bitrate = 2000000;
91
92         bzero(size_text, sizeof(char*) * MAX_SIZES);
93         bzero(size_factors, sizeof(int) * MAX_SIZES);
94         size_text[0] = cstrdup(_("Original size"));
95         size_factors[0] = 1;
96         total_sizes = 1;
97 }
98
99 ProxyDialog::~ProxyDialog()
100 {
101         close_window();
102         for( int i=0; i<MAX_SIZES; ++i ) delete [] size_text[i];
103         asset->remove_user();
104 }
105
106 BC_Window* ProxyDialog::new_gui()
107 {
108         asset->format = FILE_FFMPEG;
109         asset->load_defaults(mwindow->defaults, "PROXY_", 1, 1, 0, 0, 0);
110         mwindow->gui->lock_window("ProxyDialog::new_gui");
111         int cx, cy;
112         mwindow->gui->get_abs_cursor(cx, cy);
113         gui = new ProxyWindow(mwindow, this, cx - WIDTH/2, cy - HEIGHT/2);
114         gui->create_objects();
115         mwindow->gui->unlock_window();
116         return gui;
117 }
118
119 void ProxyDialog::scale_to_text(char *string, int scale)
120 {
121         strcpy(string, size_text[0]);
122         for( int i = 0; i < total_sizes; i++ ) {
123                 if( scale == size_factors[i] ) {
124                         strcpy(string, size_text[i]);
125                         break;
126                 }
127         }
128 }
129
130
131 void ProxyDialog::calculate_sizes()
132 {
133         for( int i=1; i<total_sizes; ++i ) {
134                 delete [] size_text[i];
135                 size_text[i] = 0;
136                 size_factors[i] = 0;
137         }
138         total_sizes = 1;
139
140         if( !use_scaler ) {
141 // w,h should stay even for yuv
142                 int ow = orig_w, oh = orig_h;
143                 if( BC_CModels::is_yuv(mwindow->edl->session->color_model) ) {
144                         ow /= 2;  oh /= 2;
145                 }
146                 for( int i=2; i<MAX_SCALE; ++i ) {
147                         if( (ow % i) != 0 ) continue;
148                         if( (oh % i) != 0 ) continue;
149                         size_factors[total_sizes++] = i;
150                 }
151         }
152         else {
153                 size_factors[total_sizes++] = 2;   size_factors[total_sizes++] = 3;
154                 size_factors[total_sizes++] = 8;   size_factors[total_sizes++] = 12;
155                 size_factors[total_sizes++] = 16;  size_factors[total_sizes++] = 24;
156                 size_factors[total_sizes++] = 32;
157         }
158         for( int i=1; i<total_sizes; ++i ) {
159                 char string[BCTEXTLEN];
160                 sprintf(string, "1/%d", size_factors[i]);
161                 size_text[i] = cstrdup(string);
162         }
163 }
164
165 void ProxyDialog::handle_close_event(int result)
166 {
167         if( result ) return;
168         if( !File::renders_video(asset) ) {
169                 eprintf("Specified format does not render video");
170                 return;
171         }
172         mwindow->edl->session->proxy_auto_scale = auto_scale;
173         mwindow->edl->session->proxy_beep = beep;
174         mwindow->edl->session->proxy_disabled_scale = 1;
175         mwindow->gui->lock_window("ProxyDialog::handle_close_event");
176         mwindow->gui->update_proxy_toggle();
177         mwindow->gui->unlock_window();
178         asset->save_defaults(mwindow->defaults, "PROXY_", 1, 1, 0, 0, 0); 
179         result = mwindow->to_proxy(asset, new_scale, use_scaler);
180         if( result >= 0 && beep && new_scale != 1 ) {
181                 static struct { double freq, secs, gain; }
182                     tone[2] = { { 2000., 1.5, 0.5 }, { 4000., 0.25, 0.5 } };
183                 int i = result > 0 ? 0 : 1;
184                 mwindow->beep(tone[i].freq, tone[i].secs, tone[i].gain);
185         }
186 }
187
188 void ProxyRender::to_proxy_path(char *new_path, Indexable *indexable, int scale)
189 {
190 // path is already a proxy
191         if( strstr(indexable->path, ".proxy") ) return;
192         strcpy(new_path, indexable->path);
193         char prxy[BCSTRLEN];
194         int n = sprintf(prxy, ".proxy%d", scale);
195 // insert proxy, path.sfx => path.proxy#-sfx.ext
196         char *ep = new_path + strlen(new_path);
197         char *sfx = strrchr(new_path, '.');
198         if( sfx ) {
199                 char *bp = ep, *cp = (ep += n);
200                 while( --bp > sfx ) *--cp = *bp;
201                 *--cp = '-';
202         }
203         else {
204                 sfx = ep;  ep += n;
205         }
206         for( char *cp=prxy; --n>=0; ++cp ) *sfx++ = *cp;
207         *ep++ = '.';
208         const char *ext = indexable->get_video_frames() < 0 ?  "png" :
209                 format_asset->format == FILE_FFMPEG ?
210                         format_asset->fformat :
211                         File::get_tag(format_asset->format);
212         while( *ext ) *ep++ = *ext++;
213         *ep = 0;
214 //printf("ProxyRender::to_proxy_path %d %s %s\n", __LINE__, new_path), asset->path);
215 }
216
217 int ProxyRender::from_proxy_path(char *new_path, Indexable *indexable, int scale)
218 {
219         char prxy[BCTEXTLEN];
220         int n = sprintf(prxy, ".proxy%d", scale);
221         strcpy(new_path, indexable->path);
222         char *ptr = strstr(new_path, prxy);
223         if( !ptr || (ptr[n] != '-' && ptr[n] != '.') ) return 1;
224 // remove proxy, path.proxy#-sfx.ext => path.sfx
225         char *ext = strrchr(ptr, '.');
226         if( !ext ) ext = ptr + strlen(ptr);
227         char *cp = ptr + n;
228         for( *cp='.'; cp<ext; ++cp ) *ptr++ = *cp;
229         *ptr = 0;
230         return 0;
231 }
232
233 ProxyRender::ProxyRender(MWindow *mwindow, Asset *format_asset)
234 {
235         this->mwindow = mwindow;
236         this->format_asset = format_asset;
237         progress = 0;
238         counter_lock = new Mutex("ProxyDialog::counter_lock");
239         total_rendered = 0;
240         failed = 0;  canceled = 0;
241 }
242
243 ProxyRender::~ProxyRender()
244 {
245         delete progress;
246         delete counter_lock;
247
248         for( int i=0,n=orig_idxbls.size(); i<n; ++i ) orig_idxbls[i]->remove_user();
249         for( int i=0,n=orig_proxies.size(); i<n; ++i ) orig_proxies[i]->remove_user();
250         for( int i=0,n=needed_idxbls.size(); i<n; ++i ) needed_idxbls[i]->remove_user();
251         for( int i=0,n=needed_proxies.size(); i<n; ++i ) needed_proxies[i]->remove_user();
252 }
253
254 Asset *ProxyRender::add_original(Indexable *idxbl, int new_scale)
255 {
256         if( !idxbl->have_video() ) return 0;
257 // don't proxy proxies
258         if( strstr(idxbl->path,".proxy") ) return 0;
259         char new_path[BCTEXTLEN];
260         to_proxy_path(new_path, idxbl, new_scale);
261 // don't proxy if not readable
262         if( idxbl->is_asset && access(idxbl->path, R_OK) ) return 0;
263 // add to orig_idxbls & orig_proxies if it isn't already there.
264         int got_it = 0;
265         for( int i = 0; !got_it && i<orig_proxies.size(); ++i )
266                 got_it = !strcmp(orig_proxies[i]->path, new_path);
267         if( got_it ) return 0;
268         Assets *edl_assets = mwindow->edl->assets;
269         Asset *proxy = edl_assets->get_asset(new_path);
270         if( !proxy ) {
271                 proxy = new Asset(new_path);
272 // new compression parameters
273                 int64_t video_frames = idxbl->get_video_frames();
274                 if( video_frames < 0 ) {
275                         proxy->format = FILE_PNG;
276                         proxy->png_use_alpha = 1;
277                         proxy->video_length = -1;
278                 }
279                 else {
280                         proxy->copy_format(format_asset, 0);
281                         proxy->video_length = video_frames;
282                 }
283                 proxy->folder_no = AW_PROXY_FOLDER;
284                 proxy->audio_data = 0;
285                 proxy->video_data = 1;
286                 proxy->layers = 1;
287                 proxy->width = idxbl->get_w() / new_scale;
288                 if( proxy->width & 1 ) ++proxy->width;
289                 proxy->actual_width = proxy->width;
290                 proxy->height = idxbl->get_h() / new_scale;
291                 if( proxy->height & 1 ) ++proxy->height;
292                 proxy->actual_height = proxy->height;
293                 proxy->frame_rate = idxbl->get_frame_rate();
294         }
295         orig_proxies.append(proxy);
296         idxbl->add_user();
297         orig_idxbls.append(idxbl);
298         return proxy;
299 }
300
301 void ProxyRender::add_needed(Indexable *idxbl, Asset *proxy)
302 {
303         needed_idxbls.append(idxbl);
304         idxbl->add_user();
305         needed_proxies.append(proxy);
306         proxy->add_user();
307 }
308
309 void ProxyRender::update_progress()
310 {
311         counter_lock->lock();
312         ++total_rendered;
313         counter_lock->unlock();
314         progress->update(total_rendered);
315 }
316
317 int ProxyRender::is_canceled()
318 {
319         return progress->is_cancelled();
320 }
321
322 int ProxyRender::create_needed_proxies(int new_scale)
323 {
324         if( !needed_proxies.size() ) return 0;
325         total_rendered = 0;
326         failed = 0;  canceled = 0;
327
328 // create proxy assets which don't already exist
329         int64_t total_len = 0;
330         for( int i = 0; i < needed_idxbls.size(); i++ ) {
331                 total_len += needed_idxbls[i]->get_video_frames();
332         }
333
334 // start progress bar.  MWindow is locked inside this
335         progress = mwindow->mainprogress->
336                 start_progress(_("Creating proxy files..."), total_len);
337
338         ProxyFarm engine(mwindow, this, &needed_idxbls, &needed_proxies);
339         engine.process_packages();
340 printf("proxy: failed=%d canceled=%d\n", failed, progress->is_cancelled());
341
342 // stop progress bar
343         canceled = progress->is_cancelled();
344         progress->stop_progress();
345         delete progress;  progress = 0;
346
347         if( failed && !canceled ) {
348                 eprintf("Error making proxy.");
349         }
350         return !failed && !canceled ? 0 : 1;
351 }
352
353
354 ProxyWindow::ProxyWindow(MWindow *mwindow, ProxyDialog *dialog, int x, int y)
355  : BC_Window(_(PROGRAM_NAME ": Proxy settings"), x, y, WIDTH, HEIGHT,
356                 -1, -1, 0, 0, 1)
357 {
358         this->mwindow = mwindow;
359         this->dialog = dialog;
360         format_tools = 0;
361 }
362
363 ProxyWindow::~ProxyWindow()
364 {
365         lock_window("ProxyWindow::~ProxyWindow");
366         delete format_tools;
367         unlock_window();
368 }
369
370
371 void ProxyWindow::create_objects()
372 {
373         lock_window("ProxyWindow::create_objects");
374         int margin = mwindow->theme->widget_border;
375
376         dialog->use_scaler = mwindow->edl->session->proxy_use_scaler;
377         dialog->orig_scale = mwindow->edl->session->proxy_scale;
378         dialog->auto_scale = mwindow->edl->session->proxy_auto_scale;
379         dialog->beep = mwindow->edl->session->proxy_beep;
380         dialog->new_scale = dialog->orig_scale;
381         dialog->orig_w = mwindow->edl->session->output_w;
382         dialog->orig_h = mwindow->edl->session->output_h;
383         if( !dialog->use_scaler ) {
384                 dialog->orig_w *= dialog->orig_scale;
385                 dialog->orig_h *= dialog->orig_scale;
386         }
387
388         int x = margin;
389         int y = margin+10;
390         add_subwindow(use_scaler = new ProxyUseScaler(this, x, y));
391         y += use_scaler->get_h() + margin;
392
393         BC_Title *text;
394         add_subwindow(text = new BC_Title(x, y, _("Scale factor:")));
395         x += text->get_w() + margin;
396
397         int popupmenu_w = BC_PopupMenu::calculate_w(get_text_width(MEDIUMFONT, dialog->size_text[0])+15);
398         add_subwindow(scale_factor = new ProxyMenu(mwindow, this, x, y, popupmenu_w, ""));
399         scale_factor->update_sizes();
400         x += scale_factor->get_w() + margin;
401
402         ProxyTumbler *tumbler;
403         add_subwindow(tumbler = new ProxyTumbler(mwindow, this, x, y));
404         y += tumbler->get_h() + margin;
405
406         x = margin;
407         add_subwindow(text = new BC_Title(x, y, _("New media dimensions: ")));
408         x += text->get_w() + margin;
409         add_subwindow(new_dimensions = new BC_Title(x, y, ""));
410         y += new_dimensions->get_h() + margin;
411
412         x = margin;
413         add_subwindow(text = new BC_Title(x, y, _("Active Scale: ")));
414         x += text->get_w() + margin;
415         add_subwindow(active_scale = new BC_Title(x, y, ""));
416         y += active_scale->get_h() + margin;
417
418         x = margin;  y += 25;
419         format_tools = new ProxyFormatTools(mwindow, this, dialog->asset);
420         format_tools->create_objects(x, y, 0, 1, 0, 0, 0, 1, 0, 1, // skip the path
421                 0, 0);
422
423         x = margin;
424         add_subwindow(auto_scale = new ProxyAutoScale(this, x, y));
425         y += auto_scale->get_h() + margin;
426         add_subwindow(beep_on_done = new ProxyBeepOnDone(this, x, y));
427         y += beep_on_done->get_h() + margin;
428
429         update();
430
431         add_subwindow(new BC_OKButton(this));
432         add_subwindow(new BC_CancelButton(this));
433         show_window(1);
434         unlock_window();
435 }
436
437 ProxyFormatTools::ProxyFormatTools(MWindow *mwindow, ProxyWindow *pwindow, Asset *asset)
438  : FormatTools(mwindow, pwindow, asset)
439 {
440         this->pwindow = pwindow;
441 }
442
443 void ProxyFormatTools::update_format()
444 {
445         FormatTools::update_format();
446         pwindow->use_scaler->update();
447 }
448
449 void ProxyWindow::update()
450 {
451         char string[BCSTRLEN];
452         int new_w = dialog->orig_w / dialog->new_scale;
453         if( new_w & 1 ) ++new_w;
454         int new_h = dialog->orig_h / dialog->new_scale;
455         if( new_h & 1 ) ++new_h;
456         sprintf(string, "%dx%d", new_w, new_h);
457         new_dimensions->update(string);
458         dialog->scale_to_text(string, dialog->new_scale);
459         scale_factor->set_text(string);
460         use_scaler->update();
461         auto_scale->update();
462         int scale = mwindow->edl->session->proxy_scale;
463         if( scale == 1 ) scale = mwindow->edl->session->proxy_disabled_scale;
464         sprintf(string, scale>1 ? "1/%d" : "%d", scale);
465         active_scale->update(string);
466 }
467
468
469 ProxyUseScaler::ProxyUseScaler(ProxyWindow *pwindow, int x, int y)
470  : BC_CheckBox(x, y, pwindow->dialog->use_scaler, _("Use scaler   (FFMPEG only)"))
471 {
472         this->pwindow = pwindow;
473 }
474
475 void ProxyUseScaler::update()
476 {
477         ProxyDialog *dialog = pwindow->dialog;
478         if( dialog->asset->format != FILE_FFMPEG ) dialog->use_scaler = 0;
479         BC_CheckBox::update(dialog->use_scaler);
480         int scaler_avail = dialog->asset->format == FILE_FFMPEG ? 1 : 0;
481         if( !scaler_avail &&  enabled ) disable();
482         if( scaler_avail  && !enabled ) enable();
483 }
484
485 int ProxyUseScaler::handle_event()
486 {
487         pwindow->dialog->new_scale = 1;
488         pwindow->dialog->use_scaler = get_value();
489         pwindow->scale_factor->update_sizes();
490         pwindow->update();
491         return 1;
492 }
493
494 ProxyAutoScale::ProxyAutoScale(ProxyWindow *pwindow, int x, int y)
495  : BC_CheckBox(x, y, pwindow->dialog->auto_scale, _("Auto proxy/scale media loads"))
496 {
497         this->pwindow = pwindow;
498 }
499
500 void ProxyAutoScale::update()
501 {
502         ProxyDialog *dialog = pwindow->dialog;
503         if( dialog->new_scale == 1 ) dialog->auto_scale = 0;
504         BC_CheckBox::update(dialog->auto_scale);
505         int can_auto_proxy = dialog->new_scale != 1 ? 1 : 0;
506         if( !can_auto_proxy &&  enabled ) disable();
507         if( can_auto_proxy  && !enabled ) enable();
508 }
509
510 int ProxyAutoScale::handle_event()
511 {
512         pwindow->dialog->auto_scale = get_value();
513         pwindow->update();
514         return 1;
515 }
516
517 ProxyBeepOnDone::ProxyBeepOnDone(ProxyWindow *pwindow, int x, int y)
518  : BC_CheckBox(x, y, pwindow->dialog->beep, _("Beep on done"))
519 {
520         this->pwindow = pwindow;
521 }
522
523 int ProxyBeepOnDone::handle_event()
524 {
525         pwindow->dialog->beep = get_value();
526         pwindow->update();
527         return 1;
528 }
529
530
531 ProxyMenu::ProxyMenu(MWindow *mwindow, ProxyWindow *pwindow,
532                 int x, int y, int w, const char *text)
533  : BC_PopupMenu(x, y, w, text, 1)
534 {
535         this->mwindow = mwindow;
536         this->pwindow = pwindow;
537 }
538
539 void ProxyMenu::update_sizes()
540 {
541         while( total_items() > 0 ) del_item(0);
542         ProxyDialog *dialog = pwindow->dialog;
543         dialog->calculate_sizes();
544         for( int i=0; i < dialog->total_sizes; i++ )
545                 add_item(new BC_MenuItem(dialog->size_text[i]));
546 }
547
548 int ProxyMenu::handle_event()
549 {
550         ProxyDialog *dialog = pwindow->dialog;
551         for( int i = 0; i < dialog->total_sizes; i++ ) {
552                 if( !strcmp(get_text(), pwindow->dialog->size_text[i]) ) {
553                         dialog->new_scale = pwindow->dialog->size_factors[i];
554                         pwindow->update();
555                         break;
556                 }
557         }
558         return 1;
559 }
560
561
562 ProxyTumbler::ProxyTumbler(MWindow *mwindow, ProxyWindow *pwindow, int x, int y)
563  : BC_Tumbler(x, y, 0)
564 {
565         this->mwindow = mwindow;
566         this->pwindow = pwindow;
567 }
568
569 int ProxyTumbler::handle_up_event()
570 {
571         if( pwindow->dialog->new_scale > 1 ) {
572                 int i;
573                 for( i = 0; i < pwindow->dialog->total_sizes; i++ ) {
574                         if( pwindow->dialog->new_scale == pwindow->dialog->size_factors[i] ) {
575                                 i--;
576                                 pwindow->dialog->new_scale = pwindow->dialog->size_factors[i];
577                                 pwindow->update();
578                                 return 1;
579                         }
580                 }               
581         }
582
583         return 0;
584 }
585
586 int ProxyTumbler::handle_down_event()
587 {
588         int i;
589         for( i = 0; i < pwindow->dialog->total_sizes - 1; i++ ) {
590                 if( pwindow->dialog->new_scale == pwindow->dialog->size_factors[i] ) {
591                         i++;
592                         pwindow->dialog->new_scale = pwindow->dialog->size_factors[i];
593                         pwindow->update();
594                         return 1;
595                 }
596         }
597
598         return 0;
599 }
600
601
602
603 ProxyPackage::ProxyPackage()
604  : LoadPackage()
605 {
606 }
607
608 ProxyClient::ProxyClient(MWindow *mwindow,
609                 ProxyRender *proxy_render, ProxyFarm *server)
610  : LoadClient(server)
611 {
612         this->mwindow = mwindow;
613         this->proxy_render = proxy_render;
614         render_engine = 0;
615         video_cache = 0;
616         src_file = 0;
617 }
618 ProxyClient::~ProxyClient()
619 {
620         delete render_engine;
621         delete video_cache;
622         delete src_file;
623 }
624
625 void ProxyClient::process_package(LoadPackage *ptr)
626 {
627         if( proxy_render->failed ) return;
628         if( proxy_render->is_canceled() ) return;
629
630         EDL *edl = mwindow->edl;
631         Preferences *preferences = mwindow->preferences;
632         ProxyPackage *package = (ProxyPackage*)ptr;
633         Indexable *orig = package->orig_idxbl;
634         Asset *proxy = package->proxy_asset;
635 //printf("%s %s\n", orig->path, proxy->path);
636         VRender *vrender = 0;
637         int jobs = proxy_render->needed_proxies.size();
638         int processors = preferences->project_smp / jobs + 1, result = 0;
639
640 // each cpu should process at least about 1 MB, or it thrashes
641         int size = edl->session->output_w * edl->session->output_h * 4;
642         int cpus = size / 0x100000 + 1;
643         if( processors > cpus ) processors = cpus;
644
645         if( orig->is_asset ) {
646                 src_file = new File;
647                 src_file->set_processors(processors);
648                 src_file->set_preload(edl->session->playback_preload);
649                 src_file->set_subtitle(edl->session->decode_subtitles ? 
650                         edl->session->subtitle_number : -1);
651                 src_file->set_interpolate_raw(edl->session->interpolate_raw);
652                 src_file->set_white_balance_raw(edl->session->white_balance_raw);
653                 if( src_file->open_file(preferences, (Asset*)orig, 1, 0) != FILE_OK )
654                         result = 1;
655         }
656         else {
657                 TransportCommand command;
658                 command.command = CURRENT_FRAME;
659                 command.get_edl()->copy_all((EDL *)orig);
660                 command.change_type = CHANGE_ALL;
661                 command.realtime = 0;
662                 render_engine = new RenderEngine(0, preferences, 0, 0);
663                 render_engine->set_vcache(video_cache = new CICache(preferences));
664                 render_engine->arm_command(&command);
665                 if( !(vrender = render_engine->vrender) )
666                         result = 1;
667         }
668         if( result ) {
669 // go to the next asset if the reader fails
670 //              proxy_render->failed = 1;
671                 return;
672         }
673
674         File dst_file;
675         dst_file.set_processors(processors);
676         result = dst_file.open_file(preferences, proxy, 0, 1);
677         if( result ) {
678                 proxy_render->failed = 1;
679                 ::remove(proxy->path);
680                 return;
681         }
682
683         dst_file.start_video_thread(1, edl->session->color_model,
684                         processors > 1 ? 2 : 1, 0);
685
686         int src_w = orig->get_w(), src_h = orig->get_h();
687         VFrame src_frame(src_w,src_h, edl->session->color_model);
688
689         OverlayFrame scaler(processors);
690         int64_t video_length = orig->get_video_frames();
691         if( video_length < 0 ) video_length = 1;
692
693         for( int64_t i=0; i<video_length &&
694              !proxy_render->failed && !proxy_render->is_canceled(); ++i ) {
695                 if( orig->is_asset ) {
696                         src_file->set_video_position(i, 0);
697                         result = src_file->read_frame(&src_frame);
698                 }
699                 else
700                         result = vrender->process_buffer(&src_frame, i, 0);
701 //printf("result=%d\n", result);
702
703                 if( result ) {
704 // go to the next asset if the reader fails
705 //                      proxy_render->failed = 1;
706                         break;
707                 }
708
709 // have to write after getting the video buffer or it locks up
710                 VFrame ***dst_frames = dst_file.get_video_buffer();
711                 VFrame *dst_frame = dst_frames[0][0];
712                 int dst_w = dst_frame->get_w(), dst_h = dst_frame->get_h();
713                 scaler.overlay(dst_frame, &src_frame,
714                         0,0, src_w,src_h, 0,0, dst_w,dst_h,
715                         1.0, TRANSFER_REPLACE, NEAREST_NEIGHBOR);
716                 result = dst_file.write_video_buffer(1);
717                 if( result ) {
718 // only fail if the writer fails
719                         proxy_render->failed = 1;
720                         break;
721                 }
722                 proxy_render->update_progress();
723         }
724         if( !proxy_render->failed && !proxy_render->is_canceled() ) {
725                 Asset *asset = mwindow->edl->assets->update(proxy);
726                 mwindow->mainindexes->add_next_asset(0, asset);
727                 mwindow->mainindexes->start_build();
728         }
729         else
730                 ::remove(proxy->path);
731 }
732
733
734 ProxyFarm::ProxyFarm(MWindow *mwindow, ProxyRender *proxy_render,
735                 ArrayList<Indexable*> *orig_idxbls,
736                 ArrayList<Asset*> *proxy_assets)
737  : LoadServer(MIN(mwindow->preferences->processors, proxy_assets->size()), 
738         proxy_assets->size())
739 {
740         this->mwindow = mwindow;
741         this->proxy_render = proxy_render;
742         this->orig_idxbls = orig_idxbls;
743         this->proxy_assets = proxy_assets;
744 }
745
746 void ProxyFarm::init_packages()
747 {
748         for( int i = 0; i < get_total_packages(); i++ ) {
749                 ProxyPackage *package = (ProxyPackage*)get_package(i);
750                 package->proxy_asset = proxy_assets->get(i);
751                 package->orig_idxbl = orig_idxbls->get(i);
752         }
753 }
754
755 LoadClient* ProxyFarm::new_client()
756 {
757         return new ProxyClient(mwindow, proxy_render, this);
758 }
759
760 LoadPackage* ProxyFarm::new_package()
761 {
762         return new ProxyPackage;
763 }
764
765
766 ProxyBeep::ProxyBeep(MWindow *mwindow)
767  : Thread(1, 0, 0)
768 {
769         this->mwindow = mwindow;
770         audio = new AudioDevice(mwindow);
771         playing_audio = 0;
772         interrupted = -1;
773 }
774
775 ProxyBeep::~ProxyBeep()
776 {
777         stop(0);
778         delete audio;
779 }
780
781 void ProxyBeep::run()
782 {
783         int channels = 2;
784         int64_t bfrsz = BEEP_SAMPLE_RATE;
785         EDL *edl = mwindow->edl;
786         EDLSession *session = edl->session;
787         AudioOutConfig *aconfig = session->playback_config->aconfig;
788         audio->open_output(aconfig, BEEP_SAMPLE_RATE, bfrsz, channels, 0);
789         audio->start_playback();
790
791         double out0[bfrsz], out1[bfrsz], *out[2] = { out0, out1 };
792         const double two_pi = 2*M_PI;
793         int64_t audio_len = BEEP_SAMPLE_RATE * secs;
794         const double dt = two_pi * freq/BEEP_SAMPLE_RATE;
795         double th = 0;
796
797         audio_pos = 0;
798         playing_audio = 1;
799         while( !interrupted ) {
800                 int len = audio_len - audio_pos;
801                 if( len <= 0 ) break;
802                 if( len > bfrsz ) len = bfrsz;
803                 int k = audio_pos;
804                 for( int i=0; i<len; ++i,++k,th+=dt ) {
805                         double t = th - two_pi;
806                         if( t >= 0 ) th = t;
807                         out0[i] = out1[i] = sin(th) * gain;
808                 }
809                 audio->write_buffer(out, channels, len);
810                 audio_pos = k;
811         }
812
813         if( !interrupted )
814                 audio->set_last_buffer();
815         audio->stop_audio(interrupted ? 0 : 1);
816         playing_audio = 0;
817
818         audio->close_all();
819 }
820
821 void ProxyBeep::start()
822 {
823         if( running() ) return;
824         audio_pos = -1;
825         interrupted = 0;
826         Thread::start();
827 }
828
829 void ProxyBeep::stop(int wait)
830 {
831         if( running() && !interrupted ) {
832                 interrupted = 1;
833                 audio->stop_audio(wait);
834         }
835         Thread::join();
836 }
837
838 void ProxyBeep::tone(double freq, double secs, double gain)
839 {
840         stop(0);
841         this->freq = freq;
842         this->secs = secs;
843         this->gain = gain;
844         start();
845 }
846