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