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