colorpick rework, color popup for titler, color convert fixes
[goodguy/history.git] / cinelerra-5.1 / cinelerra / dvdcreate.C
1 #include "asset.h"
2 #include "bchash.h"
3 #include "clip.h"
4 #include "dvdcreate.h"
5 #include "edl.h"
6 #include "edit.h"
7 #include "edits.h"
8 #include "edlsession.h"
9 #include "file.h"
10 #include "filexml.h"
11 #include "keyframe.h"
12 #include "labels.h"
13 #include "mainerror.h"
14 #include "mainundo.h"
15 #include "mwindow.h"
16 #include "mwindowgui.h"
17 #include "plugin.h"
18 #include "pluginset.h"
19 #include "rescale.h"
20 #include "track.h"
21 #include "tracks.h"
22
23 #include <unistd.h>
24 #include <fcntl.h>
25 #include <errno.h>
26 #include <sys/stat.h>
27 #include <sys/statfs.h>
28
29
30 #define DVD_PAL_4x3     0
31 #define DVD_PAL_16x9    1
32 #define DVD_NTSC_4x3    2
33 #define DVD_NTSC_16x9   3
34
35 #define DVD_NORM_PAL    0
36 #define DVD_NORM_NTSC   1
37
38 #define DVD_ASPECT_4x3  0
39 #define DVD_ASPECT_16x9 1
40
41 static struct dvd_norm {
42         const char *name;
43         int w, h;
44         double framerate;
45 } dvd_norms[] = {
46         { "PAL",  720,576, 25 },
47         { "NTSC", 720,480, 29.97 },
48 };
49
50 static struct dvd_aspect {
51         int w, h;
52 } dvd_aspects[] = {
53         { 4, 3, },
54         { 16, 9, },
55 };
56
57 // DVD Creation
58
59 static struct dvd_format {
60         int norm, aspect;
61 } dvd_formats[] = {
62         { DVD_NORM_PAL,  DVD_ASPECT_4x3, },
63         { DVD_NORM_PAL,  DVD_ASPECT_16x9, },
64         { DVD_NORM_NTSC, DVD_ASPECT_4x3, },
65         { DVD_NORM_NTSC, DVD_ASPECT_16x9, },
66 };
67
68 const int64_t CreateDVD_Thread::DVD_SIZE = 4700000000;
69 const int CreateDVD_Thread::DVD_STREAMS = 1;
70 const int CreateDVD_Thread::DVD_WIDTH = 720;
71 const int CreateDVD_Thread::DVD_HEIGHT = 480;
72 const double CreateDVD_Thread::DVD_ASPECT_WIDTH = 4.;
73 const double CreateDVD_Thread::DVD_ASPECT_HEIGHT = 3.;
74 const double CreateDVD_Thread::DVD_WIDE_ASPECT_WIDTH = 16.;
75 const double CreateDVD_Thread::DVD_WIDE_ASPECT_HEIGHT = 9.;
76 const double CreateDVD_Thread::DVD_FRAMERATE = 30000. / 1001.;
77 const int CreateDVD_Thread::DVD_MAX_BITRATE = 8000000;
78 const int CreateDVD_Thread::DVD_CHANNELS = 2;
79 const int CreateDVD_Thread::DVD_WIDE_CHANNELS = 6;
80 const double CreateDVD_Thread::DVD_SAMPLERATE = 48000;
81 const double CreateDVD_Thread::DVD_KAUDIO_RATE = 224;
82
83
84 CreateDVD_MenuItem::CreateDVD_MenuItem(MWindow *mwindow)
85  : BC_MenuItem(_("DVD Render..."), _("Shift-D"), 'D')
86 {
87         set_shift(1);
88         this->mwindow = mwindow;
89 }
90
91 int CreateDVD_MenuItem::handle_event()
92 {
93         mwindow->create_dvd->start();
94         return 1;
95 }
96
97
98 CreateDVD_Thread::CreateDVD_Thread(MWindow *mwindow)
99  : BC_DialogThread()
100 {
101         this->mwindow = mwindow;
102         this->gui = 0;
103         this->use_deinterlace = 0;
104         this->use_scale = 0;
105         this->use_histogram = 0;
106         this->use_inverse_telecine = 0;
107         this->use_wide_audio = 0;
108         this->use_ffmpeg = 0;
109         this->use_resize_tracks = 0;
110         this->use_label_chapters = 0;
111
112         this->dvd_size = DVD_SIZE;
113         this->dvd_width = DVD_WIDTH;
114         this->dvd_height = DVD_HEIGHT;
115         this->dvd_aspect_width = DVD_ASPECT_WIDTH;
116         this->dvd_aspect_height = DVD_ASPECT_HEIGHT;
117         this->dvd_framerate = DVD_FRAMERATE;
118         this->dvd_samplerate = DVD_SAMPLERATE;
119         this->dvd_max_bitrate = DVD_MAX_BITRATE;
120         this->dvd_kaudio_rate = DVD_KAUDIO_RATE;
121         this->max_w = this->max_h = 0;
122 }
123
124 CreateDVD_Thread::~CreateDVD_Thread()
125 {
126         close_window();
127 }
128
129 int CreateDVD_Thread::create_dvd_jobs(ArrayList<BatchRenderJob*> *jobs, const char *asset_dir)
130 {
131         EDL *edl = mwindow->edl;
132         if( !edl || !edl->session ) {
133                 char msg[BCTEXTLEN];
134                 sprintf(msg, _("No EDL/Session"));
135                 MainError::show_error(msg);
136                 return 1;
137         }
138         EDLSession *session = edl->session;
139
140         double total_length = edl->tracks->total_length();
141         if( total_length <= 0 ) {
142                 char msg[BCTEXTLEN];
143                 sprintf(msg, _("No content: %s"), asset_title);
144                 MainError::show_error(msg);
145                 return 1;
146         }
147
148         if( mkdir(asset_dir, 0777) ) {
149                 char err[BCTEXTLEN], msg[BCTEXTLEN];
150                 strerror_r(errno, err, sizeof(err));
151                 sprintf(msg, _("Unable to create directory: %s\n-- %s"), asset_dir, err);
152                 MainError::show_error(msg);
153                 return 1;
154         }
155
156         double old_samplerate = session->sample_rate;
157         double old_framerate = session->frame_rate;
158
159         session->video_channels = DVD_STREAMS;
160         session->video_tracks = DVD_STREAMS;
161         session->frame_rate = dvd_framerate;
162         session->output_w = dvd_width;
163         session->output_h = dvd_height;
164         session->aspect_w = dvd_aspect_width;
165         session->aspect_h = dvd_aspect_height;
166         session->sample_rate = dvd_samplerate;
167         session->audio_channels = session->audio_tracks =
168                 use_wide_audio ? DVD_WIDE_CHANNELS : DVD_CHANNELS;
169
170         char script_filename[BCTEXTLEN];
171         sprintf(script_filename, "%s/dvd.sh", asset_dir);
172         int fd = open(script_filename, O_WRONLY+O_CREAT+O_TRUNC, 0755);
173         FILE *fp = fdopen(fd, "w");
174         if( !fp ) {
175                 char err[BCTEXTLEN], msg[BCTEXTLEN];
176                 strerror_r(errno, err, sizeof(err));
177                 sprintf(msg, _("Unable to save: %s\n-- %s"), script_filename, err);
178                 MainError::show_error(msg);
179                 return 1;
180         }
181         fprintf(fp,"#!/bin/bash\n");
182         fprintf(fp,"echo \"running %s\" $# $*\n", script_filename);
183         fprintf(fp,"\n");
184         const char *exec_path = File::get_cinlib_path();
185         fprintf(fp,"PATH=$PATH:%s\n",exec_path);
186         if( !use_ffmpeg ) {
187                 fprintf(fp,"mplex -f 8 -o $1/dvd.mpg $1/dvd.m2v $1/dvd.ac3\n");
188                 fprintf(fp,"\n");
189         }
190         fprintf(fp,"rm -rf $1/iso\n");
191         fprintf(fp,"mkdir -p $1/iso\n");
192         fprintf(fp,"\n");
193 // dvdauthor ver 0.7.0 requires this to work
194         int norm = dvd_formats[use_standard].norm;
195         const char *name = dvd_norms[norm].name;
196         fprintf(fp,"export VIDEO_FORMAT=%s\n", name);
197         fprintf(fp,"dvdauthor -x - <<eof\n");
198         fprintf(fp,"<dvdauthor dest=\"$1/iso\">\n");
199         fprintf(fp,"  <vmgm>\n");
200         fprintf(fp,"    <fpc> jump title 1; </fpc>\n");
201         fprintf(fp,"  </vmgm>\n");
202         fprintf(fp,"  <titleset>\n");
203         fprintf(fp,"    <titles>\n");
204         char std[BCSTRLEN], *cp = std;
205         for( const char *np=name; *np!=0; ++cp,++np) *cp = *np + 'a'-'A';
206         *cp = 0;
207         fprintf(fp,"    <video format=\"%s\" aspect=\"%d:%d\" resolution=\"%dx%d\"/>\n",
208                 std, (int)session->aspect_w, (int)session->aspect_h,
209                 session->output_w, session->output_h);
210         fprintf(fp,"    <audio format=\"ac3\" lang=\"en\"/>\n");
211         fprintf(fp,"    <pgc>\n");
212         fprintf(fp,"      <vob file=\"$1/dvd.mpg\" chapters=\"");
213         if( use_label_chapters && edl->labels ) {
214                 Label *label = edl->labels->first;
215                 while( label ) {
216                         int secs = label->position;
217                         int mins = secs / 60;
218                         int frms = (label->position-secs) * session->frame_rate;
219                         fprintf(fp,"%d:%02d:%02d.%d", mins/60, mins%60, secs%60, frms);
220                         if( (label=label->next) != 0 ) fprintf(fp, ",");
221                 }
222         }
223         else {
224                 int mins = 0;
225                 for( int secs=0 ; secs<total_length; secs+=10*60 ) {
226                         mins = secs / 60;
227                         fprintf(fp,"%d:%02d:00,", mins/60, mins%60);
228                 }
229                 fprintf(fp,"%d:%02d:00", mins/60, mins%60);
230         }
231         fprintf(fp,"\"/>\n");
232         fprintf(fp,"    </pgc>\n");
233         fprintf(fp,"    </titles>\n");
234         fprintf(fp,"  </titleset>\n");
235         fprintf(fp,"</dvdauthor>\n");
236         fprintf(fp,"eof\n");
237         fprintf(fp,"\n");
238         fprintf(fp,"echo To burn dvd, load blank media and run:\n");
239         fprintf(fp,"echo growisofs -dvd-compat -Z /dev/dvd -dvd-video $1/iso\n");
240         fprintf(fp,"kill $$\n");
241         fprintf(fp,"\n");
242         fclose(fp);
243
244         if( use_wide_audio ) {
245                 session->audio_channels = session->audio_tracks = DVD_WIDE_CHANNELS;
246                 session->achannel_positions[0] = 90;
247                 session->achannel_positions[1] = 150;
248                 session->achannel_positions[2] = 30;
249                 session->achannel_positions[3] = 210;
250                 session->achannel_positions[4] = 330;
251                 session->achannel_positions[5] = 270;
252                 if( edl->tracks->recordable_audio_tracks() == DVD_WIDE_CHANNELS )
253                         mwindow->remap_audio(MWindow::AUDIO_1_TO_1);
254         }
255         else {
256                 session->audio_channels = session->audio_tracks = DVD_CHANNELS;
257                 session->achannel_positions[0] = 180;
258                 session->achannel_positions[1] = 0;
259                 if( edl->tracks->recordable_audio_tracks() == DVD_WIDE_CHANNELS )
260                         mwindow->remap_audio(MWindow::AUDIO_5_1_TO_2);
261         }
262
263         double new_samplerate = session->sample_rate;
264         double new_framerate = session->frame_rate;
265         edl->rechannel();
266         edl->resample(old_samplerate, new_samplerate, TRACK_AUDIO);
267         edl->resample(old_framerate, new_framerate, TRACK_VIDEO);
268
269         int64_t aud_size = ((dvd_kaudio_rate * total_length)/8 + 1000-1) * 1000;
270         int64_t vid_size = dvd_size*0.96 - aud_size;
271         int64_t vid_bitrate = (vid_size * 8) / total_length;
272         vid_bitrate /= 1000;  vid_bitrate *= 1000;
273         if( vid_bitrate > dvd_max_bitrate )
274                 vid_bitrate = dvd_max_bitrate;
275
276         char xml_filename[BCTEXTLEN];
277         sprintf(xml_filename, "%s/dvd.xml", asset_dir);
278         FileXML xml_file;
279         edl->save_xml(&xml_file, xml_filename, 0, 0);
280         xml_file.terminate_string();
281         if( xml_file.write_to_file(xml_filename) ) {
282                 char msg[BCTEXTLEN];
283                 sprintf(msg, _("Unable to save: %s"), xml_filename);
284                 MainError::show_error(msg);
285                 return 1;
286         }
287
288         BatchRenderJob *job = new BatchRenderJob(mwindow->preferences);
289         jobs->append(job);
290         strcpy(&job->edl_path[0], xml_filename);
291         Asset *asset = job->asset;
292
293         asset->layers = DVD_STREAMS;
294         asset->frame_rate = session->frame_rate;
295         asset->width = session->output_w;
296         asset->height = session->output_h;
297         asset->aspect_ratio = session->aspect_w / session->aspect_h;
298
299         if( use_ffmpeg ) {
300                 char option_path[BCTEXTLEN];
301                 sprintf(&asset->path[0],"%s/dvd.mpg", asset_dir);
302                 asset->format = FILE_FFMPEG;
303                 strcpy(asset->fformat, "dvd");
304
305                 asset->audio_data = 1;
306                 strcpy(asset->acodec, "dvd.dvd");
307                 FFMPEG::set_option_path(option_path, "audio/%s", asset->acodec);
308                 FFMPEG::load_options(option_path, asset->ff_audio_options,
309                          sizeof(asset->ff_audio_options));
310                 asset->ff_audio_bitrate = dvd_kaudio_rate * 1000;
311
312                 asset->video_data = 1;
313                 strcpy(asset->vcodec, "dvd.dvd");
314                 FFMPEG::set_option_path(option_path, "video/%s", asset->vcodec);
315                 FFMPEG::load_options(option_path, asset->ff_video_options,
316                          sizeof(asset->ff_video_options));
317                 asset->ff_video_bitrate = vid_bitrate;
318                 asset->ff_video_quality = -1;
319         }
320         else {
321                 sprintf(&asset->path[0],"%s/dvd.m2v", asset_dir);
322                 asset->video_data = 1;
323                 asset->format = FILE_VMPEG;
324                 asset->vmpeg_cmodel = BC_YUV420P;
325                 asset->vmpeg_fix_bitrate = 1;
326                 asset->vmpeg_bitrate = vid_bitrate;
327                 asset->vmpeg_quantization = 15;
328                 asset->vmpeg_iframe_distance = 15;
329                 asset->vmpeg_progressive = 0;
330                 asset->vmpeg_denoise = 0;
331                 asset->vmpeg_seq_codes = 0;
332                 asset->vmpeg_derivative = 2;
333                 asset->vmpeg_preset = 8;
334                 asset->vmpeg_field_order = 0;
335                 asset->vmpeg_pframe_distance = 0;
336                 job = new BatchRenderJob(mwindow->preferences);
337                 jobs->append(job);
338                 strcpy(&job->edl_path[0], xml_filename);
339                 asset = job->asset;
340
341                 sprintf(&asset->path[0],"%s/dvd.ac3", asset_dir);
342                 asset->audio_data = 1;
343                 asset->format = FILE_AC3;
344                 asset->channels = session->audio_channels;
345                 asset->sample_rate = session->sample_rate;
346                 asset->bits = 16;
347                 asset->byte_order = 0;
348                 asset->signed_ = 1;
349                 asset->header = 0;
350                 asset->dither = 0;
351                 asset->ac3_bitrate = dvd_kaudio_rate;
352         }
353
354         job = new BatchRenderJob(mwindow->preferences);
355         jobs->append(job);
356         job->edl_path[0] = '@';
357         strcpy(&job->edl_path[1], script_filename);
358         strcpy(&job->asset->path[0], asset_dir);
359
360         return 0;
361 }
362
363 void CreateDVD_Thread::handle_close_event(int result)
364 {
365         if( result ) return;
366         mwindow->defaults->update("WORK_DIRECTORY", tmp_path);
367         mwindow->batch_render->load_defaults(mwindow->defaults);
368         mwindow->undo->update_undo_before();
369         KeyFrame keyframe;  char data[BCTEXTLEN];
370         if( use_deinterlace ) {
371                 sprintf(data,"<DEINTERLACE MODE=1>");
372                 keyframe.set_data(data);
373                 insert_video_plugin("Deinterlace", &keyframe);
374         }
375         if( use_inverse_telecine ) {
376                 sprintf(data,"<IVTC FRAME_OFFSET=0 FIRST_FIELD=0 "
377                         "AUTOMATIC=1 AUTO_THRESHOLD=2.0e+00 PATTERN=2>");
378                 keyframe.set_data(data);
379                 insert_video_plugin("Inverse Telecine", &keyframe);
380         }
381         if( use_scale != Rescale::none ) {
382                 double dvd_aspect = dvd_aspect_height > 0 ? dvd_aspect_width/dvd_aspect_height : 1;
383
384                 Tracks *tracks = mwindow->edl->tracks;
385                 for( Track *vtrk=tracks->first; vtrk; vtrk=vtrk->next ) {
386                         if( vtrk->data_type != TRACK_VIDEO ) continue;
387                         if( !vtrk->record ) continue;
388                         vtrk->expand_view = 1;
389                         PluginSet *plugin_set = new PluginSet(mwindow->edl, vtrk);
390                         vtrk->plugin_set.append(plugin_set);
391                         Edits *edits = vtrk->edits;
392                         for( Edit *edit=edits->first; edit; edit=edit->next ) {
393                                 Indexable *indexable = edit->get_source();
394                                 if( !indexable ) continue;
395                                 Rescale in(indexable);
396                                 Rescale out(dvd_width, dvd_height, dvd_aspect);
397                                 float src_w, src_h, dst_w, dst_h;
398                                 in.rescale(out,use_scale, src_w,src_h, dst_w,dst_h);
399                                 sprintf(data,"<SCALERATIO TYPE=%d"
400                                         " IN_W=%d IN_H=%d IN_ASPECT_RATIO=%f"
401                                         " OUT_W=%d OUT_H=%d OUT_ASPECT_RATIO=%f"
402                                         " SRC_X=%f SRC_Y=%f SRC_W=%f SRC_H=%f"
403                                         " DST_X=%f DST_Y=%f DST_W=%f DST_H=%f>", use_scale,
404                                         in.w, in.h, in.aspect, out.w, out.h, out.aspect,
405                                         0., 0., src_w, src_h, 0., 0., dst_w, dst_h);
406                                 keyframe.set_data(data);
407                                 plugin_set->insert_plugin(_("Scale Ratio"),
408                                         edit->startproject, edit->length,
409                                         PLUGIN_STANDALONE, 0, &keyframe, 0);
410                         }
411                         vtrk->optimize();
412                 }
413         }
414
415         if( use_resize_tracks )
416                 resize_tracks();
417         if( use_histogram ) {
418 #if 0
419                 sprintf(data, "<HISTOGRAM OUTPUT_MIN_0=0 OUTPUT_MAX_0=1 "
420                         "OUTPUT_MIN_1=0 OUTPUT_MAX_1=1 "
421                         "OUTPUT_MIN_2=0 OUTPUT_MAX_2=1 "
422                         "OUTPUT_MIN_3=0 OUTPUT_MAX_3=1 "
423                         "AUTOMATIC=0 THRESHOLD=9.0-01 PLOT=0 SPLIT=0>"
424                         "<POINTS></POINTS><POINTS></POINTS><POINTS></POINTS>"
425                         "<POINTS><POINT X=6.0e-02 Y=0>"
426                                 "<POINT X=9.4e-01 Y=1></POINTS>");
427 #else
428                 sprintf(data, "<HISTOGRAM AUTOMATIC=0 THRESHOLD=1.0e-01 "
429                         "PLOT=0 SPLIT=0 W=440 H=500 PARADE=0 MODE=3 "
430                         "LOW_OUTPUT_0=0 HIGH_OUTPUT_0=1 LOW_INPUT_0=0 HIGH_INPUT_0=1 GAMMA_0=1 "
431                         "LOW_OUTPUT_1=0 HIGH_OUTPUT_1=1 LOW_INPUT_1=0 HIGH_INPUT_1=1 GAMMA_1=1 "
432                         "LOW_OUTPUT_2=0 HIGH_OUTPUT_2=1 LOW_INPUT_2=0 HIGH_INPUT_2=1 GAMMA_2=1 "
433                         "LOW_OUTPUT_3=0 HIGH_OUTPUT_3=1 LOW_INPUT_3=0.044 HIGH_INPUT_3=0.956 "
434                         "GAMMA_3=1>");
435 #endif
436                 keyframe.set_data(data);
437                 insert_video_plugin("Histogram", &keyframe);
438         }
439         char asset_dir[BCTEXTLEN], jobs_path[BCTEXTLEN];
440         sprintf(asset_dir, "%s/%s", tmp_path, asset_title);
441         sprintf(jobs_path, "%s/dvd.jobs", asset_dir);
442         mwindow->batch_render->reset(jobs_path);
443         int ret = create_dvd_jobs(&mwindow->batch_render->jobs, asset_dir);
444         mwindow->undo->update_undo_after(_("create dvd"), LOAD_ALL);
445         mwindow->resync_guis();
446         if( ret ) return;
447         mwindow->batch_render->save_jobs();
448         mwindow->batch_render->start();
449 }
450
451 BC_Window* CreateDVD_Thread::new_gui()
452 {
453         strcpy(tmp_path,"/tmp");
454         mwindow->defaults->get("WORK_DIRECTORY", tmp_path);
455         memset(asset_title,0,sizeof(asset_title));
456         time_t dt;  time(&dt);
457         struct tm dtm;  localtime_r(&dt, &dtm);
458         sprintf(asset_title, "dvd_%02d%02d%02d-%02d%02d%02d",
459                 dtm.tm_year+1900, dtm.tm_mon+1, dtm.tm_mday,
460                 dtm.tm_hour, dtm.tm_min, dtm.tm_sec);
461         use_deinterlace = 0;
462         use_scale = Rescale::none;
463         use_histogram = 0;
464         use_inverse_telecine = 0;
465         use_wide_audio = 0;
466         use_ffmpeg = 0;
467         use_resize_tracks = 0;
468         use_label_chapters = 0;
469         use_standard = DVD_NTSC_4x3;
470
471         dvd_size = DVD_SIZE;
472         dvd_width = DVD_WIDTH;
473         dvd_height = DVD_HEIGHT;
474         dvd_aspect_width = DVD_ASPECT_WIDTH;
475         dvd_aspect_height = DVD_ASPECT_HEIGHT;
476         dvd_framerate = DVD_FRAMERATE;
477         dvd_samplerate = DVD_SAMPLERATE;
478         dvd_max_bitrate = DVD_MAX_BITRATE;
479         dvd_kaudio_rate = DVD_KAUDIO_RATE;
480         max_w = 0; max_h = 0;
481
482         int has_standard = -1;
483         if( mwindow->edl ) {
484                 EDLSession *session = mwindow->edl->session;
485                 double framerate = session->frame_rate;
486                 double aspect_ratio = session->aspect_h > 0 ?
487                         session->aspect_w / session->aspect_h > 0 : 1;
488                 int output_w = session->output_w, output_h = session->output_h;
489 // match the session to any known standard
490                 for( int i=0; i<(int)(sizeof(dvd_formats)/sizeof(dvd_formats[0])); ++i ) {
491                         int norm = dvd_formats[i].norm;
492                         if( !EQUIV(framerate, dvd_norms[norm].framerate) ) continue;
493                         if( output_w != dvd_norms[norm].w ) continue;
494                         if( output_h != dvd_norms[norm].h ) continue;
495                         int aspect = dvd_formats[i].aspect;
496                         double dvd_aspect_ratio =
497                                 (double)dvd_aspects[aspect].w / dvd_aspects[aspect].h;
498                         if( !EQUIV(aspect_ratio, dvd_aspect_ratio) ) continue;
499                         has_standard = i;  break;
500                 }
501                 if( has_standard < 0 ) {
502 // or use the default standard
503                         if( !strcmp(mwindow->default_standard, "NTSC") ) has_standard = DVD_NTSC_4x3;
504                         else if( !strcmp(mwindow->default_standard, "PAL") ) has_standard = DVD_PAL_4x3;
505                 }
506         }
507         if( has_standard >= 0 )
508                 use_standard = has_standard;
509
510         option_presets();
511         int scr_x = mwindow->gui->get_screen_x(0, -1);
512         int scr_w = mwindow->gui->get_screen_w(0, -1);
513         int scr_h = mwindow->gui->get_screen_h(0, -1);
514         int w = 520, h = 280;
515         int x = scr_x + scr_w/2 - w/2, y = scr_h/2 - h/2;
516
517         gui = new CreateDVD_GUI(this, x, y, w, h);
518         gui->create_objects();
519         return gui;
520 }
521
522
523 CreateDVD_OK::CreateDVD_OK(CreateDVD_GUI *gui, int x, int y)
524  : BC_OKButton(x, y)
525 {
526         this->gui = gui;
527         set_tooltip(_("end setup, start batch render"));
528 }
529
530 CreateDVD_OK::~CreateDVD_OK()
531 {
532 }
533
534 int CreateDVD_OK::button_press_event()
535 {
536         if(get_buttonpress() == 1 && is_event_win() && cursor_inside()) {
537                 gui->set_done(0);
538                 return 1;
539         }
540         return 0;
541 }
542
543 int CreateDVD_OK::keypress_event()
544 {
545         return 0;
546 }
547
548
549 CreateDVD_Cancel::CreateDVD_Cancel(CreateDVD_GUI *gui, int x, int y)
550  : BC_CancelButton(x, y)
551 {
552         this->gui = gui;
553 }
554
555 CreateDVD_Cancel::~CreateDVD_Cancel()
556 {
557 }
558
559 int CreateDVD_Cancel::button_press_event()
560 {
561         if(get_buttonpress() == 1 && is_event_win() && cursor_inside()) {
562                 gui->set_done(1);
563                 return 1;
564         }
565         return 0;
566 }
567
568
569 CreateDVD_DiskSpace::CreateDVD_DiskSpace(CreateDVD_GUI *gui, int x, int y)
570  : BC_Title(x, y, "", MEDIUMFONT, GREEN)
571 {
572         this->gui = gui;
573 }
574
575 CreateDVD_DiskSpace::~CreateDVD_DiskSpace()
576 {
577 }
578
579 int64_t CreateDVD_DiskSpace::tmp_path_space()
580 {
581         const char *path = gui->thread->tmp_path;
582         if( access(path,R_OK+W_OK) ) return 0;
583         struct statfs sfs;
584         if( statfs(path, &sfs) ) return 0;
585         return (int64_t)sfs.f_bsize * sfs.f_bfree;
586 }
587
588 void CreateDVD_DiskSpace::update()
589 {
590         static const char *suffix[] = { "", "KB", "MB", "GB", "TB", "PB" };
591         int64_t disk_space = tmp_path_space();
592         double media_size = 15e9, msz = 0, m = 1;
593         char sfx[BCSTRLEN];
594         if( sscanf(gui->media_size->get_text(), "%lf%s", &msz, sfx) == 2 ) {
595                 int i = sizeof(suffix)/sizeof(suffix[0]);
596                 while( --i >= 0 && strcmp(sfx, suffix[i]) );
597                 while( --i >= 0 ) m *= 1000;
598                 media_size = msz * m;
599         }
600         m = gui->thread->use_ffmpeg ? 2 : 3;
601         int color = disk_space < media_size*m ? RED : GREEN;
602         int i = 0;
603         for( int64_t space=disk_space; i<5 && (space/=1000)>0; disk_space=space, ++i );
604         char text[BCTEXTLEN];
605         sprintf(text, "%s%3jd%s", _("disk space: "), disk_space, suffix[i]);
606         gui->disk_space->BC_Title::update(text);
607         gui->disk_space->set_color(color);
608 }
609
610 CreateDVD_TmpPath::CreateDVD_TmpPath(CreateDVD_GUI *gui, int x, int y, int w)
611  : BC_TextBox(x, y, w, 1, -(int)sizeof(gui->thread->tmp_path),
612                 gui->thread->tmp_path, 1, MEDIUMFONT)
613 {
614         this->gui = gui;
615 }
616
617 CreateDVD_TmpPath::~CreateDVD_TmpPath()
618 {
619 }
620
621 int CreateDVD_TmpPath::handle_event()
622 {
623         get_text();
624         gui->disk_space->update();
625         return 1;
626 }
627
628
629 CreateDVD_AssetTitle::CreateDVD_AssetTitle(CreateDVD_GUI *gui, int x, int y, int w)
630  : BC_TextBox(x, y, w, 1, -(int)sizeof(gui->thread->asset_title),
631                 gui->thread->asset_title, 1, MEDIUMFONT)
632 {
633         this->gui = gui;
634 }
635
636 CreateDVD_AssetTitle::~CreateDVD_AssetTitle()
637 {
638 }
639
640 int CreateDVD_AssetTitle::handle_event()
641 {
642         get_text();
643         return 1;
644 }
645
646
647 CreateDVD_Deinterlace::CreateDVD_Deinterlace(CreateDVD_GUI *gui, int x, int y)
648  : BC_CheckBox(x, y, &gui->thread->use_deinterlace, _("Deinterlace"))
649 {
650         this->gui = gui;
651 }
652
653 CreateDVD_Deinterlace::~CreateDVD_Deinterlace()
654 {
655 }
656
657 int CreateDVD_Deinterlace::handle_event()
658 {
659         if( get_value() ) {
660                 gui->need_inverse_telecine->set_value(0);
661                 gui->thread->use_inverse_telecine = 0;
662         }
663         return BC_CheckBox::handle_event();
664 }
665
666
667 CreateDVD_InverseTelecine::CreateDVD_InverseTelecine(CreateDVD_GUI *gui, int x, int y)
668  : BC_CheckBox(x, y, &gui->thread->use_inverse_telecine, _("Inverse Telecine"))
669 {
670         this->gui = gui;
671 }
672
673 CreateDVD_InverseTelecine::~CreateDVD_InverseTelecine()
674 {
675 }
676
677 int CreateDVD_InverseTelecine::handle_event()
678 {
679         if( get_value() ) {
680                 gui->need_deinterlace->set_value(0);
681                 gui->thread->use_deinterlace = 0;
682         }
683         return BC_CheckBox::handle_event();
684 }
685
686
687 CreateDVD_ResizeTracks::CreateDVD_ResizeTracks(CreateDVD_GUI *gui, int x, int y)
688  : BC_CheckBox(x, y, &gui->thread->use_resize_tracks, _("Resize Tracks"))
689 {
690         this->gui = gui;
691 }
692
693 CreateDVD_ResizeTracks::~CreateDVD_ResizeTracks()
694 {
695 }
696
697
698 CreateDVD_Histogram::CreateDVD_Histogram(CreateDVD_GUI *gui, int x, int y)
699  : BC_CheckBox(x, y, &gui->thread->use_histogram, _("Histogram"))
700 {
701         this->gui = gui;
702 }
703
704 CreateDVD_Histogram::~CreateDVD_Histogram()
705 {
706 }
707
708 CreateDVD_LabelChapters::CreateDVD_LabelChapters(CreateDVD_GUI *gui, int x, int y)
709  : BC_CheckBox(x, y, &gui->thread->use_label_chapters, _("Chapters at Labels"))
710 {
711         this->gui = gui;
712 }
713
714 CreateDVD_LabelChapters::~CreateDVD_LabelChapters()
715 {
716 }
717
718 CreateDVD_WideAudio::CreateDVD_WideAudio(CreateDVD_GUI *gui, int x, int y)
719  : BC_CheckBox(x, y, &gui->thread->use_wide_audio, _("Audio 5.1"))
720 {
721         this->gui = gui;
722 }
723
724 CreateDVD_WideAudio::~CreateDVD_WideAudio()
725 {
726 }
727
728 CreateDVD_UseFFMpeg::CreateDVD_UseFFMpeg(CreateDVD_GUI *gui, int x, int y)
729  : BC_CheckBox(x, y, &gui->thread->use_ffmpeg, _("Use FFMPEG"))
730 {
731         this->gui = gui;
732 }
733
734 CreateDVD_UseFFMpeg::~CreateDVD_UseFFMpeg()
735 {
736 }
737
738
739
740
741 CreateDVD_GUI::CreateDVD_GUI(CreateDVD_Thread *thread, int x, int y, int w, int h)
742  : BC_Window(_(PROGRAM_NAME ": Create DVD"), x, y, w, h, 50, 50, 1, 0, 1)
743 {
744         this->thread = thread;
745         at_x = at_y = tmp_x = tmp_y = 0;
746         ok_x = ok_y = ok_w = ok_h = 0;
747         cancel_x = cancel_y = cancel_w = cancel_h = 0;
748         asset_title = 0;
749         tmp_path = 0;
750         btmp_path = 0;
751         disk_space = 0;
752         standard = 0;
753         scale = 0;
754         need_deinterlace = 0;
755         need_inverse_telecine = 0;
756         need_resize_tracks = 0;
757         need_histogram = 0;
758         need_wide_audio = 0;
759         need_label_chapters = 0;
760         ok = 0;
761         cancel = 0;
762 }
763
764 CreateDVD_GUI::~CreateDVD_GUI()
765 {
766 }
767
768 void CreateDVD_GUI::create_objects()
769 {
770         lock_window("CreateDVD_GUI::create_objects");
771         int pady = BC_TextBox::calculate_h(this, MEDIUMFONT, 0, 1) + 5;
772         int padx = BC_Title::calculate_w(this, (char*)"X", MEDIUMFONT);
773         int x = padx/2, y = pady/2;
774         BC_Title *title = new BC_Title(x, y, _("Title:"), MEDIUMFONT, YELLOW);
775         add_subwindow(title);
776         at_x = x + title->get_w();  at_y = y;
777         asset_title = new CreateDVD_AssetTitle(this, at_x, at_y, get_w()-at_x-10);
778         add_subwindow(asset_title);
779         y += title->get_h() + pady/2;
780         title = new BC_Title(x, y, _("Work path:"), MEDIUMFONT, YELLOW);
781         add_subwindow(title);
782         tmp_x = x + title->get_w();  tmp_y = y;
783         tmp_path = new CreateDVD_TmpPath(this, tmp_x, tmp_y,  get_w()-tmp_x-35);
784         add_subwindow(tmp_path);
785         btmp_path = new BrowseButton(thread->mwindow->theme, this, tmp_path,
786                 tmp_x+tmp_path->get_w(), tmp_y, "/tmp",
787                 _("Work path"), _("Select a Work directory:"), 1);
788         add_subwindow(btmp_path);
789         y += title->get_h() + pady/2;
790         disk_space = new CreateDVD_DiskSpace(this, x, y);
791         add_subwindow(disk_space);
792         int x0 = get_w() - 170;
793         title = new BC_Title(x0, y, _("Media:"), MEDIUMFONT, YELLOW);
794         add_subwindow(title);
795         int x1 = x0+title->get_w()+padx;
796         media_size = new CreateDVD_MediaSize(this, x1, y);
797         media_size->create_objects();
798         media_sizes.append(new BC_ListBoxItem("4.7GB"));
799         media_sizes.append(new BC_ListBoxItem("8.3GB"));
800         media_size->update_list(&media_sizes);
801         media_size->update(media_sizes[0]->get_text());
802         disk_space->update();
803         y += disk_space->get_h() + pady/2;
804         title = new BC_Title(x, y, _("Format:"), MEDIUMFONT, YELLOW);
805         add_subwindow(title);
806         standard = new CreateDVD_Format(this, title->get_w() + padx, y);
807         add_subwindow(standard);
808         standard->create_objects();
809         x0 -= 30;
810         title = new BC_Title(x0, y, _("Scale:"), MEDIUMFONT, YELLOW);
811         add_subwindow(title);
812         x1 = x0+title->get_w()+padx;
813         scale = new CreateDVD_Scale(this, x1, y);
814         add_subwindow(scale);
815         scale->create_objects();
816         y += standard->get_h() + pady/2;
817         need_deinterlace = new CreateDVD_Deinterlace(this, x, y);
818         add_subwindow(need_deinterlace);
819         x1 = x + 170;
820         int x2 = x1 + 170;
821         need_inverse_telecine = new CreateDVD_InverseTelecine(this, x1, y);
822         add_subwindow(need_inverse_telecine);
823         need_use_ffmpeg = new CreateDVD_UseFFMpeg(this, x2, y);
824         add_subwindow(need_use_ffmpeg);
825         y += need_deinterlace->get_h() + pady/2;
826         need_histogram = new CreateDVD_Histogram(this, x, y);
827         add_subwindow(need_histogram);
828         need_wide_audio = new CreateDVD_WideAudio(this, x1, y);
829         add_subwindow(need_wide_audio);
830         need_resize_tracks = new CreateDVD_ResizeTracks(this, x2, y);
831         add_subwindow(need_resize_tracks);
832         y += need_histogram->get_h() + pady/2;
833         need_label_chapters = new CreateDVD_LabelChapters(this, x1, y);
834         add_subwindow(need_label_chapters);
835         ok_w = BC_OKButton::calculate_w();
836         ok_h = BC_OKButton::calculate_h();
837         ok_x = 10;
838         ok_y = get_h() - ok_h - 10;
839         ok = new CreateDVD_OK(this, ok_x, ok_y);
840         add_subwindow(ok);
841         cancel_w = BC_CancelButton::calculate_w();
842         cancel_h = BC_CancelButton::calculate_h();
843         cancel_x = get_w() - cancel_w - 10,
844         cancel_y = get_h() - cancel_h - 10;
845         cancel = new CreateDVD_Cancel(this, cancel_x, cancel_y);
846         add_subwindow(cancel);
847         show_window();
848         unlock_window();
849 }
850
851 int CreateDVD_GUI::resize_event(int w, int h)
852 {
853         asset_title->reposition_window(at_x, at_y, get_w()-at_x-10);
854         tmp_path->reposition_window(tmp_x, tmp_y,  get_w()-tmp_x-35);
855         btmp_path->reposition_window(tmp_x+tmp_path->get_w(), tmp_y);
856         ok_y = h - ok_h - 10;
857         ok->reposition_window(ok_x, ok_y);
858         cancel_x = w - cancel_w - 10,
859         cancel_y = h - cancel_h - 10;
860         cancel->reposition_window(cancel_x, cancel_y);
861         return 0;
862 }
863
864 int CreateDVD_GUI::translation_event()
865 {
866         return 1;
867 }
868
869 int CreateDVD_GUI::close_event()
870 {
871         set_done(1);
872         return 1;
873 }
874
875 void CreateDVD_GUI::update()
876 {
877         scale->set_value(thread->use_scale);
878         need_deinterlace->set_value(thread->use_deinterlace);
879         need_inverse_telecine->set_value(thread->use_inverse_telecine);
880         need_use_ffmpeg->set_value(thread->use_ffmpeg);
881         need_resize_tracks->set_value(thread->use_resize_tracks);
882         need_histogram->set_value(thread->use_histogram);
883         need_wide_audio->set_value(thread->use_wide_audio);
884         need_label_chapters->set_value(thread->use_label_chapters);
885 }
886
887 int CreateDVD_Thread::
888 insert_video_plugin(const char *title, KeyFrame *default_keyframe)
889 {
890         Tracks *tracks = mwindow->edl->tracks;
891         for( Track *vtrk=tracks->first; vtrk; vtrk=vtrk->next ) {
892                 if( vtrk->data_type != TRACK_VIDEO ) continue;
893                 if( !vtrk->record ) continue;
894                 vtrk->expand_view = 1;
895                 PluginSet *plugin_set = new PluginSet(mwindow->edl, vtrk);
896                 vtrk->plugin_set.append(plugin_set);
897                 Edits *edits = vtrk->edits;
898                 for( Edit *edit=edits->first; edit; edit=edit->next ) {
899                         plugin_set->insert_plugin(_(title),
900                                 edit->startproject, edit->length,
901                                 PLUGIN_STANDALONE, 0, default_keyframe, 0);
902                 }
903                 vtrk->optimize();
904         }
905         return 0;
906 }
907
908 int CreateDVD_Thread::
909 resize_tracks()
910 {
911         Tracks *tracks = mwindow->edl->tracks;
912         int trk_w = max_w, trk_h = max_h;
913         if( trk_w < dvd_width ) trk_w = dvd_width;
914         if( trk_h < dvd_height ) trk_h = dvd_height;
915         for( Track *vtrk=tracks->first; vtrk; vtrk=vtrk->next ) {
916                 if( vtrk->data_type != TRACK_VIDEO ) continue;
917                 if( !vtrk->record ) continue;
918                 vtrk->track_w = trk_w;
919                 vtrk->track_h = trk_h;
920         }
921         return 0;
922 }
923
924 int CreateDVD_Thread::
925 option_presets()
926 {
927 // reset only probed options
928         use_deinterlace = 0;
929         use_scale = Rescale::none;
930         use_resize_tracks = 0;
931         use_wide_audio = 0;
932         use_label_chapters = 0;
933
934         if( !mwindow->edl ) return 1;
935
936         int norm = dvd_formats[use_standard].norm;
937         dvd_width = dvd_norms[norm].w;
938         dvd_height = dvd_norms[norm].h;
939         dvd_framerate = dvd_norms[norm].framerate;
940         int aspect = dvd_formats[use_standard].aspect;
941         dvd_aspect_width = dvd_aspects[aspect].w;
942         dvd_aspect_height = dvd_aspects[aspect].h;
943         double dvd_aspect = dvd_aspect_height > 0 ? dvd_aspect_width/dvd_aspect_height : 1;
944
945         Tracks *tracks = mwindow->edl->tracks;
946         max_w = 0;  max_h = 0;
947         int has_deinterlace = 0, has_scale = 0;
948         for( Track *trk=tracks->first; trk; trk=trk->next ) {
949                 if( !trk->record ) continue;
950                 Edits *edits = trk->edits;
951                 switch( trk->data_type ) {
952                 case TRACK_VIDEO:
953                         for( Edit *edit=edits->first; edit; edit=edit->next ) {
954                                 if( edit->silence() ) continue;
955                                 Indexable *indexable = edit->get_source();
956                                 int w = indexable->get_w();
957                                 if( w > max_w ) max_w = w;
958                                 if( w != dvd_width ) use_scale = Rescale::scaled;
959                                 int h = indexable->get_h();
960                                 if( h > max_h ) max_h = h;
961                                 if( h != dvd_height ) use_scale = Rescale::scaled;
962                                 float aw, ah;
963                                 MWindow::create_aspect_ratio(aw, ah, w, h);
964                                 double aspect = ah > 0 ? aw / ah : 1;
965                                 if( !EQUIV(aspect, dvd_aspect) ) use_scale = Rescale::scaled;
966                         }
967                         for( int i=0; i<trk->plugin_set.size(); ++i ) {
968                                 for(Plugin *plugin = (Plugin*)trk->plugin_set[i]->first;
969                                                 plugin;
970                                                 plugin = (Plugin*)plugin->next) {
971                                         if( !strcmp(plugin->title, _("Deinterlace")) )
972                                                 has_deinterlace = 1;
973                                         if( !strcmp(plugin->title, _("Auto Scale")) ||
974                                             !strcmp(plugin->title, _("Scale Ratio")) ||
975                                             !strcmp(plugin->title, _("Scale")) )
976                                                 has_scale = 1;
977                                 }
978                         }
979                         break;
980                 }
981         }
982         if( has_scale )
983                 use_scale = Rescale::none;
984         if( use_scale != Rescale::none ) {
985                 if( max_w != dvd_width ) use_resize_tracks = 1;
986                 if( max_h != dvd_height ) use_resize_tracks = 1;
987         }
988         for( Track *trk=tracks->first; trk && !use_resize_tracks; trk=trk->next ) {
989                 if( !trk->record ) continue;
990                 switch( trk->data_type ) {
991                 case TRACK_VIDEO:
992                         if( trk->track_w != max_w ) use_resize_tracks = 1;
993                         if( trk->track_h != max_h ) use_resize_tracks = 1;
994                         break;
995                 }
996         }
997         if( !has_deinterlace && max_h > 2*dvd_height ) use_deinterlace = 1;
998         Labels *labels = mwindow->edl->labels;
999         use_label_chapters = labels && labels->first ? 1 : 0;
1000
1001         if( tracks->recordable_audio_tracks() == DVD_WIDE_CHANNELS )
1002                 use_wide_audio = 1;
1003
1004         return 0;
1005 }
1006
1007
1008
1009 CreateDVD_FormatItem::CreateDVD_FormatItem(CreateDVD_Format *popup,
1010                 int standard, const char *text)
1011  : BC_MenuItem(text)
1012 {
1013         this->popup = popup;
1014         this->standard = standard;
1015 }
1016
1017 CreateDVD_FormatItem::~CreateDVD_FormatItem()
1018 {
1019 }
1020
1021 int CreateDVD_FormatItem::handle_event()
1022 {
1023         popup->set_text(get_text());
1024         popup->gui->thread->use_standard = standard;
1025         return popup->handle_event();
1026 }
1027
1028
1029 CreateDVD_Format::CreateDVD_Format(CreateDVD_GUI *gui, int x, int y)
1030  : BC_PopupMenu(x, y, 180, "", 1)
1031 {
1032         this->gui = gui;
1033 }
1034
1035 CreateDVD_Format::~CreateDVD_Format()
1036 {
1037 }
1038
1039 void CreateDVD_Format::create_objects()
1040 {
1041         for( int i=0; i<(int)(sizeof(dvd_formats)/sizeof(dvd_formats[0])); ++i ) {
1042                 int norm = dvd_formats[i].norm;
1043                 int aspect = dvd_formats[i].aspect;
1044                 char item_text[BCTEXTLEN];
1045                 sprintf(item_text,"%4s (%5.2f) %dx%d",
1046                         dvd_norms[norm].name, dvd_norms[norm].framerate,
1047                         dvd_aspects[aspect].w, dvd_aspects[aspect].h);
1048                 add_item(new CreateDVD_FormatItem(this, i, item_text));
1049         }
1050         set_value(gui->thread->use_standard);
1051 }
1052
1053 int CreateDVD_Format::handle_event()
1054 {
1055         gui->thread->option_presets();
1056         gui->update();
1057         return 1;
1058 }
1059
1060
1061 CreateDVD_ScaleItem::CreateDVD_ScaleItem(CreateDVD_Scale *popup,
1062                 int scale, const char *text)
1063  : BC_MenuItem(text)
1064 {
1065         this->popup = popup;
1066         this->scale = scale;
1067 }
1068
1069 CreateDVD_ScaleItem::~CreateDVD_ScaleItem()
1070 {
1071 }
1072
1073 int CreateDVD_ScaleItem::handle_event()
1074 {
1075         popup->gui->thread->use_scale = scale;
1076         popup->set_value(scale);
1077         return popup->handle_event();
1078 }
1079
1080
1081 CreateDVD_Scale::CreateDVD_Scale(CreateDVD_GUI *gui, int x, int y)
1082  : BC_PopupMenu(x, y, 100, "", 1)
1083 {
1084         this->gui = gui;
1085 }
1086
1087 CreateDVD_Scale::~CreateDVD_Scale()
1088 {
1089 }
1090
1091 void CreateDVD_Scale::create_objects()
1092 {
1093
1094         for( int i=0; i<(int)Rescale::n_scale_types; ++i ) {
1095                 add_item(new CreateDVD_ScaleItem(this, i, Rescale::scale_types[i]));
1096         }
1097         set_value(gui->thread->use_scale);
1098 }
1099
1100 int CreateDVD_Scale::handle_event()
1101 {
1102         gui->update();
1103         return 1;
1104 }
1105
1106
1107 CreateDVD_MediaSize::CreateDVD_MediaSize(CreateDVD_GUI *gui, int x, int y)
1108  : BC_PopupTextBox(gui, 0, 0, x, y, 70,50)
1109 {
1110         this->gui = gui;
1111 }
1112
1113 CreateDVD_MediaSize::~CreateDVD_MediaSize()
1114 {
1115 }
1116
1117 int CreateDVD_MediaSize::handle_event()
1118 {
1119         gui->disk_space->update();
1120         return 1;
1121 }
1122