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