4 * Copyright (C) 2015 Adam Williams <broadcast at earthling dot net>
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.
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.
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
23 #include "audiodevice.h"
24 #include "bcsignals.h"
29 #include "edlsession.h"
32 #include "filesystem.h"
33 #include "formattools.h"
35 #include "mainerror.h"
36 #include "mainindexes.h"
37 #include "mainprogress.h"
41 #include "mwindowgui.h"
42 #include "overlayframe.h"
43 #include "preferences.h"
45 #include "renderengine.h"
47 #include "transportque.h"
53 #define PROXY_DEFAULT_VCODEC "h265.mp4"
55 ProxyMenuItem::ProxyMenuItem(MWindow *mwindow)
56 : BC_MenuItem(_("Proxy settings..."), _("Alt-r"), 'r')
58 this->mwindow = mwindow;
62 ProxyMenuItem::~ProxyMenuItem()
67 void ProxyMenuItem::create_objects()
69 dialog = new ProxyDialog(mwindow);
72 int ProxyMenuItem::handle_event()
74 mwindow->gui->unlock_window();
76 mwindow->gui->lock_window("ProxyMenuItem::handle_event");
81 ProxyDialog::ProxyDialog(MWindow *mwindow)
83 this->mwindow = mwindow;
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"));
94 ProxyDialog::~ProxyDialog()
97 for( int i=0; i<MAX_SIZES; ++i ) delete [] size_text[i];
101 BC_Window* ProxyDialog::new_gui()
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");
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();
114 void ProxyDialog::scale_to_text(char *string, int scale)
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]);
126 void ProxyDialog::calculate_sizes()
128 for( int i=1; i<total_sizes; ++i ) {
129 delete [] size_text[i];
135 int orig_w = mwindow->edl->session->output_w * orig_scale;
136 int orig_h = mwindow->edl->session->output_h * orig_scale;
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) ) {
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;
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;
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);
163 void ProxyDialog::handle_close_event(int result)
166 if( !File::renders_video(asset) ) {
167 eprintf("Specified format does not render video");
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);
186 void ProxyRender::to_proxy_path(char *new_path, Indexable *indexable, int scale)
188 // path is already a proxy
189 if( strstr(indexable->path, ".proxy") ) return;
190 strcpy(new_path, indexable->path);
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, '.');
197 char *bp = ep, *cp = (ep += n);
198 while( --bp > sfx ) *--cp = *bp;
204 for( char *cp=prxy; --n>=0; ++cp ) *sfx++ = *cp;
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++;
212 //printf("ProxyRender::to_proxy_path %d %s %s\n", __LINE__, new_path), asset->path);
215 int ProxyRender::from_proxy_path(char *new_path, Indexable *indexable, int scale)
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);
226 for( *cp='.'; cp<ext; ++cp ) *ptr++ = *cp;
231 ProxyRender::ProxyRender(MWindow *mwindow, Asset *format_asset)
233 this->mwindow = mwindow;
234 this->format_asset = format_asset;
236 counter_lock = new Mutex("ProxyDialog::counter_lock");
238 failed = 0; canceled = 0;
241 ProxyRender::~ProxyRender()
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();
252 Asset *ProxyRender::add_original(Indexable *idxbl, int new_scale)
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.
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);
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;
278 proxy->copy_format(format_asset, 0);
279 proxy->video_length = video_frames;
281 proxy->folder_no = AW_PROXY_FOLDER;
282 proxy->audio_data = 0;
283 proxy->video_data = 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();
293 orig_proxies.append(proxy);
295 orig_idxbls.append(idxbl);
299 void ProxyRender::add_needed(Indexable *idxbl, Asset *proxy)
301 needed_idxbls.append(idxbl);
303 needed_proxies.append(proxy);
307 void ProxyRender::update_progress()
309 counter_lock->lock();
311 counter_lock->unlock();
312 progress->update(total_rendered);
315 int ProxyRender::is_canceled()
317 return progress->is_cancelled();
320 int ProxyRender::create_needed_proxies(int new_scale)
322 if( !needed_proxies.size() ) return 0;
324 failed = 0; canceled = 0;
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();
332 // start progress bar. MWindow is locked inside this
333 progress = mwindow->mainprogress->
334 start_progress(_("Creating proxy files..."), total_len);
336 ProxyFarm engine(mwindow, this, &needed_idxbls, &needed_proxies);
337 engine.process_packages();
338 printf("failed=%d canceled=%d\n", failed, progress->is_cancelled());
341 canceled = progress->is_cancelled();
342 progress->stop_progress();
343 delete progress; progress = 0;
345 if( failed && !canceled ) {
346 eprintf("Error making proxy.");
348 return !failed && !canceled ? 0 : 1;
352 ProxyWindow::ProxyWindow(MWindow *mwindow, ProxyDialog *dialog, int x, int y)
353 : BC_Window(_(PROGRAM_NAME ": Proxy settings"), x, y, WIDTH, HEIGHT,
356 this->mwindow = mwindow;
357 this->dialog = dialog;
361 ProxyWindow::~ProxyWindow()
363 lock_window("ProxyWindow::~ProxyWindow");
369 void ProxyWindow::create_objects()
371 lock_window("ProxyWindow::create_objects");
372 int margin = mwindow->theme->widget_border;
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;
382 add_subwindow(use_scaler = new ProxyUseScaler(this, x, y));
383 y += use_scaler->get_h() + margin;
386 add_subwindow(text = new BC_Title(x, y, _("Scale factor:")));
387 x += text->get_w() + margin;
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;
394 ProxyTumbler *tumbler;
395 add_subwindow(tumbler = new ProxyTumbler(mwindow, this, x, y));
396 y += tumbler->get_h() + 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;
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;
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
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;
423 add_subwindow(new BC_OKButton(this));
424 add_subwindow(new BC_CancelButton(this));
429 ProxyFormatTools::ProxyFormatTools(MWindow *mwindow, ProxyWindow *pwindow, Asset *asset)
430 : FormatTools(mwindow, pwindow, asset)
432 this->pwindow = pwindow;
435 void ProxyFormatTools::update_format()
437 FormatTools::update_format();
438 pwindow->use_scaler->update();
441 void ProxyWindow::update()
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);
463 ProxyUseScaler::ProxyUseScaler(ProxyWindow *pwindow, int x, int y)
464 : BC_CheckBox(x, y, pwindow->dialog->use_scaler, _("Use scaler (FFMPEG only)"))
466 this->pwindow = pwindow;
469 void ProxyUseScaler::update()
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();
479 int ProxyUseScaler::handle_event()
481 pwindow->dialog->new_scale = 1;
482 pwindow->dialog->use_scaler = get_value();
483 pwindow->scale_factor->update_sizes();
488 ProxyAutoScale::ProxyAutoScale(ProxyWindow *pwindow, int x, int y)
489 : BC_CheckBox(x, y, pwindow->dialog->auto_scale, _("Auto proxy/scale media loads"))
491 this->pwindow = pwindow;
494 void ProxyAutoScale::update()
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();
504 int ProxyAutoScale::handle_event()
506 pwindow->dialog->auto_scale = get_value();
511 ProxyBeepOnDone::ProxyBeepOnDone(ProxyWindow *pwindow, int x, int y)
512 : BC_CheckBox(x, y, pwindow->dialog->beep, _("Beep on done"))
514 this->pwindow = pwindow;
517 int ProxyBeepOnDone::handle_event()
519 pwindow->dialog->beep = get_value();
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)
529 this->mwindow = mwindow;
530 this->pwindow = pwindow;
533 void ProxyMenu::update_sizes()
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]));
542 int ProxyMenu::handle_event()
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;
557 ProxyTumbler::ProxyTumbler(MWindow *mwindow, ProxyWindow *pwindow, int x, int y)
558 : BC_Tumbler(x, y, 0)
560 this->mwindow = mwindow;
561 this->pwindow = pwindow;
564 int ProxyTumbler::handle_up_event()
566 if( pwindow->dialog->new_scale > 1 ) {
568 for( i = 0; i < pwindow->dialog->total_sizes; i++ ) {
569 if( pwindow->dialog->new_scale == pwindow->dialog->size_factors[i] ) {
571 pwindow->dialog->new_scale = pwindow->dialog->size_factors[i];
581 int ProxyTumbler::handle_down_event()
584 for( i = 0; i < pwindow->dialog->total_sizes - 1; i++ ) {
585 if( pwindow->dialog->new_scale == pwindow->dialog->size_factors[i] ) {
587 pwindow->dialog->new_scale = pwindow->dialog->size_factors[i];
598 ProxyPackage::ProxyPackage()
603 ProxyClient::ProxyClient(MWindow *mwindow,
604 ProxyRender *proxy_render, ProxyFarm *server)
607 this->mwindow = mwindow;
608 this->proxy_render = proxy_render;
613 ProxyClient::~ProxyClient()
615 delete render_engine;
620 void ProxyClient::process_package(LoadPackage *ptr)
622 if( proxy_render->failed ) return;
623 if( proxy_render->is_canceled() ) return;
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;
635 if( orig->is_asset ) {
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 )
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) )
659 // go to the next asset if the reader fails
660 // proxy_render->failed = 1;
665 dst_file.set_processors(processors);
666 result = dst_file.open_file(preferences, proxy, 0, 1);
668 proxy_render->failed = 1;
669 ::remove(proxy->path);
673 dst_file.start_video_thread(1, edl->session->color_model,
674 processors > 1 ? 2 : 1, 0);
676 int src_w = orig->get_w(), src_h = orig->get_h();
677 VFrame src_frame(src_w,src_h, edl->session->color_model);
679 OverlayFrame scaler(processors);
680 int64_t video_length = orig->get_video_frames();
681 if( video_length < 0 ) video_length = 1;
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);
690 result = vrender->process_buffer(&src_frame, i, 0);
691 //printf("result=%d\n", result);
694 // go to the next asset if the reader fails
695 // proxy_render->failed = 1;
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);
708 // only fail if the writer fails
709 proxy_render->failed = 1;
712 proxy_render->update_progress();
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();
720 ::remove(proxy->path);
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())
730 this->mwindow = mwindow;
731 this->proxy_render = proxy_render;
732 this->orig_idxbls = orig_idxbls;
733 this->proxy_assets = proxy_assets;
736 void ProxyFarm::init_packages()
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);
745 LoadClient* ProxyFarm::new_client()
747 return new ProxyClient(mwindow, proxy_render, this);
750 LoadPackage* ProxyFarm::new_package()
752 return new ProxyPackage;
756 ProxyBeep::ProxyBeep(MWindow *mwindow)
759 this->mwindow = mwindow;
760 audio = new AudioDevice(mwindow);
765 ProxyBeep::~ProxyBeep()
771 void ProxyBeep::run()
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();
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;
789 while( !interrupted ) {
790 int len = audio_len - audio_pos;
791 if( len <= 0 ) break;
792 if( len > bfrsz ) len = bfrsz;
794 for( int i=0; i<len; ++i,++k,th+=dt ) {
795 double t = th - two_pi;
797 out0[i] = out1[i] = sin(th) * gain;
799 audio->write_buffer(out, channels, len);
804 audio->set_last_buffer();
805 audio->stop_audio(interrupted ? 0 : 1);
811 void ProxyBeep::start()
813 if( running() ) return;
819 void ProxyBeep::stop(int wait)
821 if( running() && !interrupted ) {
823 audio->stop_audio(wait);
828 void ProxyBeep::tone(double freq, double secs, double gain)