initial commit
[goodguy/history.git] / cinelerra-5.0 / cinelerra / swindow.C
1
2 #include "bchash.h"
3 #include "bctimer.h"
4 #include "condition.h"
5 #include "cstrdup.h"
6 #include "edl.h"
7 #include "filesystem.h"
8 #include "localsession.h"
9 #include "mainerror.h"
10 #include "mainmenu.h"
11 #include "mainsession.h"
12 #include "mainundo.h"
13 #include "mwindow.h"
14 #include "mwindowgui.h"
15 #include "mutex.h"
16 #include "strack.h"
17 #include "swindow.h"
18 #include "theme.h"
19 #include "track.h"
20 #include "tracks.h"
21
22 #include<ctype.h>
23 #include<errno.h>
24 #include<stdint.h>
25 #include<stdlib.h>
26 #include<string.h>
27 #include<unistd.h>
28
29 SWindowOK::SWindowOK(SWindowGUI *gui, int x, int y)
30  : BC_OKButton(x, y)
31 {
32         this->gui = gui;
33 }
34
35 SWindowOK::~SWindowOK()
36 {
37 }
38
39 int SWindowOK::button_press_event()
40 {
41         if(get_buttonpress() == 1 && is_event_win() && cursor_inside()) {
42                 gui->stop(0);
43                 return 1;
44         }
45         return 0;
46 }
47
48 int SWindowOK::keypress_event()
49 {
50         return 0;
51 }
52
53
54 SWindowCancel::SWindowCancel(SWindowGUI *gui, int x, int y)
55  : BC_CancelButton(x, y)
56 {
57         this->gui = gui;
58 }
59
60 SWindowCancel::~SWindowCancel()
61 {
62 }
63
64 int SWindowCancel::button_press_event()
65 {
66         if(get_buttonpress() == 1 && is_event_win() && cursor_inside()) {
67                 gui->stop(1);
68                 return 1;
69         }
70         return 0;
71 }
72
73
74 SWindowLoadPath::SWindowLoadPath(SWindowGUI *gui, int x, int y, char *path)
75  : BC_TextBox(x, y, 200, 1, path)
76 {
77         this->sw_gui = gui;
78
79         file_entries = new ArrayList<BC_ListBoxItem*>;
80         FileSystem fs;  char string[BCTEXTLEN];
81 // Load current directory
82         fs.update(getcwd(string, BCTEXTLEN));
83         int total_files = fs.total_files();
84         for(int i = 0; i < total_files; i++) {
85                 const char *name = fs.get_entry(i)->get_name();
86                 file_entries->append(new BC_ListBoxItem(name));
87         }
88 }
89
90 SWindowLoadPath::~SWindowLoadPath()
91 {
92         file_entries->remove_all_objects();
93         delete file_entries;
94 }
95
96 int SWindowLoadPath::handle_event()
97 {
98         calculate_suggestions(file_entries);
99         strcpy(sw_gui->script_path, get_text());
100         return 1;
101 }
102
103
104 SWindowLoadFile::SWindowLoadFile(SWindowGUI *gui, int x, int y)
105  : BC_GenericButton(x, y, "Load")
106 {
107         this->sw_gui = gui;
108 }
109
110 SWindowLoadFile::~SWindowLoadFile()
111 {
112 }
113
114 int SWindowLoadFile::handle_event()
115 {
116         sw_gui->load_path->set_suggestions(0,0);
117         sw_gui->load_script();
118         sw_gui->set_script_pos(0);
119         return 1;
120 }
121
122 SWindowSaveFile::SWindowSaveFile(SWindowGUI *gui, int x, int y)
123  : BC_GenericButton(x, y, "Save")
124 {
125         this->sw_gui = gui;
126 }
127
128 SWindowSaveFile::~SWindowSaveFile()
129 {
130 }
131
132 int SWindowSaveFile::handle_event()
133 {
134         sw_gui->save_spumux_data();
135         return 1;
136 }
137
138
139
140
141 void SWindowGUI::create_objects()
142 {
143         int x = 10, y = 10;
144         BC_Title *title = new BC_Title(x, y, "Path:");
145         add_subwindow(title);
146         int x1 = x + title->get_w() + pad, y1 = y;
147         load_path = new SWindowLoadPath(this, x1, y1, script_path);
148         add_subwindow(load_path);
149         x1 += load_path->get_w() + 2*pad;
150         add_subwindow(load_file = new SWindowLoadFile(this, x1, y1));
151         x1 += load_file->get_w() + 2*pad;
152         add_subwindow(save_file = new SWindowSaveFile(this, x1, y1));
153         y += max(load_path->get_h(), load_file->get_h()) + pad;
154         x1 = x + pad, y1 = y;
155         BC_Title *title1, *title2;
156         add_subwindow(title1 = new BC_Title(x1, y1, "File Size:"));
157         y += title1->get_h() + pad;
158         int y2 = y;
159         add_subwindow(title2 = new BC_Title(x1, y2, "Entries:"));
160         int x2 = x1 + max(title1->get_w(), title2->get_w()) + pad;
161         add_subwindow(script_filesz = new BC_Title(x2, y1, "0", MEDIUMFONT, YELLOW));
162         add_subwindow(script_entries = new BC_Title(x2, y2, "0", MEDIUMFONT, YELLOW));
163         int x3 = x2 + max(script_entries->get_w()*8, script_filesz->get_w()*8) + pad;
164         add_subwindow(title1 = new BC_Title(x3, y1, "Lines:"));
165         add_subwindow(title2 = new BC_Title(x3, y2, "Texts:"));
166         int x4 = x3 + max(title1->get_w(), title2->get_w()) + pad;
167         add_subwindow(script_lines = new BC_Title(x4, y1, "0", MEDIUMFONT, YELLOW));
168         add_subwindow(script_texts = new BC_Title(x4, y2, "0", MEDIUMFONT, YELLOW));
169         int x5 = x4 + max(script_lines->get_w()*8, script_texts->get_w()*8) + 2*pad;
170         add_subwindow(prev_script = new ScriptPrev(this, x5, y1));
171         add_subwindow(next_script = new ScriptNext(this, x5, y2));
172         int x6 = x5 + max(prev_script->get_w(), next_script->get_w()) + 2*pad;
173         add_subwindow(paste_script = new ScriptPaste(this, x6, y1));
174         add_subwindow(clear_script = new ScriptClear(this, x6, y2));
175         y += max(title1->get_h(), title2->get_h()) + 2*pad;
176
177         script_position = new ScriptPosition(this, x, y, 100);
178         script_position->create_objects();
179         x1 = x + script_position->get_w() + pad;
180         add_subwindow(script_scroll = new ScriptScroll(this, x1, y, get_w()-x1-pad));
181         y += script_scroll->get_h() + 2*pad;
182         x1 = x + pad;
183         blank_line = new char[2];
184         blank_line[0] = ' ';  blank_line[1] = 0;
185         int rows = (ok_y - y - 4*pad) / text_rowsz - 3;
186         int w1 = get_w()-x1-pad;
187         script_entry = new ScriptEntry(this, x1, y, w1, rows, blank_line);
188         script_entry->create_objects();
189         y += script_entry->get_h() + pad;
190         line_entry = new ScriptEntry(this, x1, y, w1, 3);
191         line_entry->create_objects();
192         ok = new SWindowOK(this, ok_x, ok_y);
193         add_subwindow(ok);
194         cancel = new SWindowCancel(this, cancel_x, cancel_y);
195         add_subwindow(cancel);
196 }
197
198 void SWindowGUI::load()
199 {
200         if( script_path[0] && !access(script_path,R_OK) ) {
201                 load_script();
202                 int text_no = script_text_no;
203                 script_text_no = -1;
204                 load_selection(script_entry_no, text_no);
205         }
206         else {
207                 script.remove_all_objects();
208                 script_path[0] = 0;
209                 load_path->update(script_path);
210                 script_entry_no = 0;
211                 script_text_no = 0;
212         }
213 }
214
215 SWindowGUI::SWindowGUI(SWindow *swindow, int x, int y, int w, int h)
216  : BC_Window(PROGRAM_NAME ": Subtitle", x, y, w, h, 600, 500,
217         1, 0, 0 , -1, swindow->mwindow->get_cwindow_display())
218 {
219         this->swindow = swindow;
220         pad = 8;
221
222         ok = 0;
223         ok_w = BC_OKButton::calculate_w();
224         ok_h = BC_OKButton::calculate_h();
225         ok_x = 10;
226         ok_y = h - ok_h - 10;
227         cancel = 0;
228         cancel_w = BC_CancelButton::calculate_w();
229         cancel_h = BC_CancelButton::calculate_h();
230         cancel_x = w - cancel_w - 10,
231         cancel_y = h - cancel_h - 10;
232
233         load_path = 0;
234         load_file = 0;
235         save_file = 0;
236         script_filesz = 0;
237         script_lines = 0;
238         script_entries = 0;
239         script_texts = 0;
240         script_entry_no = 0;
241         script_text_no = 0;
242         script_line_no = 0;
243         script_text_lines = 0;
244         prev_script = 0;
245         next_script = 0;
246         paste_script = 0;
247         clear_script = 0;
248         script_position = 0;
249         script_entry = 0;
250         line_entry = 0;
251         script_scroll = 0;
252         blank_line = 0;
253         text_font = MEDIUMFONT;
254         text_rowsz = get_text_ascent(text_font)+1 + get_text_descent(text_font)+1;
255 }
256
257 SWindowGUI::~SWindowGUI()
258 {
259         delete script_entry;
260         delete line_entry;
261         delete script_position;
262         delete [] blank_line;
263 }
264
265 void SWindowGUI::stop(int v)
266 {
267         if( !swindow->gui_done ) {
268                 swindow->gui_done = 1;
269                 set_done(v);
270         }
271 }
272
273 int SWindowGUI::translation_event()
274 {
275         swindow->mwindow->session->swindow_x = get_x();
276         swindow->mwindow->session->swindow_y = get_y();
277         return 0;
278 }
279
280 int SWindowGUI::resize_event(int w, int h)
281 {
282         swindow->mwindow->session->swindow_w = w;
283         swindow->mwindow->session->swindow_h = h;
284
285         ok_x = 10;
286         ok_y = h - ok_h - 10;
287         ok->reposition_window(ok_x, ok_y);
288         cancel_x = w - cancel_w - 10,
289         cancel_y = h - cancel_h - 10;
290         cancel->reposition_window(cancel_x, cancel_y);
291
292         int x = script_position->get_x();
293         int y = script_position->get_y();
294         int hh = script_position->get_h();
295         int ww = script_position->get_w();
296         int x1 = x + ww + pad;
297         int w1 = w - x1 - pad;
298         script_scroll->reposition_window(x1, y, w1);
299         y += hh + 2*pad;
300         w1 = w - x - pad;
301         int rows = (ok_y - y - 4*pad) / text_rowsz - 3;
302         script_entry->reposition_window(x, y, w1, rows);
303         y += script_entry->get_h() + pad;
304         line_entry->reposition_window(x, y, w1, 3);
305         return 0;
306 }
307
308 void SWindowGUI::load_defaults()
309 {
310         BC_Hash *defaults = swindow->mwindow->defaults;
311         defaults->get("SUBTTL_SCRIPT_PATH", script_path);
312         script_entry_no = defaults->get("SUBTTL_SCRIPT_ENTRY_NO", script_entry_no);
313         script_text_no = defaults->get("SUBTTL_SCRIPT_TEXT_NO", script_text_no);
314 }
315
316 void SWindowGUI::save_defaults()
317 {
318         BC_Hash *defaults = swindow->mwindow->defaults;
319         defaults->update("SUBTTL_SCRIPT_PATH", script_path);
320         defaults->update("SUBTTL_SCRIPT_ENTRY_NO", script_entry_no);
321         defaults->update("SUBTTL_SCRIPT_TEXT_NO", script_text_no);
322 }
323
324 void SWindowGUI::set_script_pos(int64_t entry_no, int text_no)
325 {
326         script_entry_no = entry_no<0 ? 0 :
327                 entry_no>script.size()-1 ? script.size()-1 : entry_no;
328         script_text_no = text_no-1;
329         load_next_selection();
330 }
331
332 int SWindowGUI::load_selection(int pos, int row)
333 {
334         ScriptLines *texts = script[pos];
335         char *rp = texts->get_text_row(row);
336         if( !rp || *rp == '=' || *rp == '*' || *rp=='\n' ) return 1;
337         if( pos != script_entry_no || script_text_no < 0 ) {
338                 script_entry_no = pos;
339                 script_scroll->update_value(script_entry_no);
340                 script_position->update(script_entry_no);
341                 script_entry->set_text(texts->text);
342                 script_entry->set_text_row(0);
343         }
344         script_text_no = row;
345         char line[BCTEXTLEN], *bp = line, *cp = rp;
346         while( *cp && *cp!='\n' ) *bp++ = *cp++;
347         *bp = 0;  bp = texts->text;
348         int char1 = rp-bp, char2 = cp-bp;
349         script_entry->set_selection(char1, char2, char2);
350         int rows = script_entry->get_rows();
351         int rows2 = rows / 2;
352         int rows1 = texts->lines+1 - rows;
353         if( (row-=rows2) > rows1 ) row = rows1;
354         if( row < 0 ) row = 0;
355         script_entry->set_text_row(row);
356         line_entry->update(line);
357         line_entry->set_text_row(0);
358         return 0;
359 }
360
361 int SWindowGUI::load_prev_selection()
362 {
363         int pos = script_entry_no, row = script_text_no;
364         if( pos < 0 || pos >= script.size() ) return 1;
365         for(;;) {
366                 if( --row < 0 ) {
367                         if( --pos < 0 ) break;
368                         row = script[pos]->lines;
369                         continue;
370                 }
371                 if( !load_selection(pos, row) )
372                         return 0;
373         }
374         return 1;
375 }
376
377 int SWindowGUI::load_next_selection()
378 {
379         int pos = script_entry_no, row = script_text_no;
380         if( pos < 0 || pos >= script.size() ) return 1;
381         for(;;) {
382                 if( ++row >= script[pos]->lines ) {
383                         if( ++pos >= script.size() ) break;
384                         row = -1;
385                         continue;
386                 }
387                 if( !load_selection(pos, row) )
388                         return 0;
389         }
390         return 1;
391 }
392
393 int SWindowGUI::update_selection()
394 {
395         EDL *edl = swindow->mwindow->edl;
396         LocalSession *lsn = edl->local_session;
397         double position = lsn->get_selectionstart();
398         Edit *edit = 0;
399         Tracks *tracks = edl->tracks;
400         for( Track *track=tracks->first; track && !edit; track=track->next ) {
401                 if( !track->record ) continue;
402                 if( track->data_type != TRACK_SUBTITLE ) continue;
403                 int64_t pos = track->to_units(position,0);
404                 edit = track->edits->editof(pos, PLAY_FORWARD, 0);
405         }
406         if( !edit ) return 1;
407         SEdit *sedit = (SEdit *)edit;
408         line_entry->update(sedit->get_text());
409         line_entry->set_text_row(0);
410         return 0;
411 }
412
413 int MWindow::paste_subtitle_text(char *text, double start, double end)
414 {
415         gui->lock_window("MWindow::paste_subtitle_text 1");
416         undo->update_undo_before();
417
418         Tracks *tracks = edl->tracks;
419         for( Track *track=tracks->first; track; track=track->next ) {
420                 if( track->data_type != TRACK_SUBTITLE ) continue;
421                 if( !track->record ) continue;
422                 int64_t start_i = track->to_units(start, 0);
423                 int64_t end_i = track->to_units(end, 1);
424                 track->edits->clear(start_i,end_i);
425                 SEdit *sedit = (SEdit *)track->edits->paste_silence(start_i,end_i);
426                 strcpy(sedit->get_text(),text);
427                 track->edits->optimize();
428         }
429
430         save_backup();
431         undo->update_undo_after(_("paste subttl"), LOAD_EDITS | LOAD_PATCHES);
432
433         sync_parameters(CHANGE_EDL);
434         restart_brender();
435         gui->update(0, 1, 1, 0, 0, 0, 0);
436         gui->unlock_window();
437
438         return 0;
439 }
440
441 int SWindowGUI::paste_text(const char *text, double start, double end)
442 {
443         char stext[BCTEXTLEN], *cp = stext;
444         if( text ) { // remap charset, reformat if needed
445                 for( const char *bp=text; *bp!=0; ++bp,++cp ) {
446                         switch( *bp ) {
447                         case '\n':  *cp = '|';  break;
448                         default:    *cp = *bp;  break;
449                         }
450                 }
451         }
452         if( cp > stext && *(cp-1) == '|' ) --cp;
453         *cp = 0;
454         return swindow->mwindow->paste_subtitle_text(stext, start, end);
455 }
456
457 int SWindowGUI::paste_selection()
458 {
459         EDL *edl = swindow->mwindow->edl;
460         LocalSession *lsn = edl->local_session;
461         double start = lsn->get_selectionstart();
462         double end = lsn->get_selectionend();
463         if( start >= end ) return 1;
464         if( lsn->inpoint_valid() && lsn->outpoint_valid() ) {
465                 lsn->set_inpoint(lsn->get_outpoint());
466                 lsn->unset_outpoint();
467         }
468         paste_text(line_entry->get_text(), start, end);
469         load_next_selection();
470         return 0;
471 }
472
473 int SWindowGUI::clear_selection()
474 {
475         EDL *edl = swindow->mwindow->edl;
476         double start = edl->local_session->get_selectionstart();
477         double end = edl->local_session->get_selectionend();
478         if( end > start )
479                 paste_text(0, start, end);
480         return 0;
481 }
482
483
484 ScriptPrev::ScriptPrev(SWindowGUI *gui, int x, int y)
485  : BC_GenericButton(x, y, "Prev")
486 {
487         sw_gui = gui;
488 }
489
490 ScriptPrev::~ScriptPrev()
491 {
492 }
493
494 int ScriptPrev::handle_event()
495 {
496         sw_gui->load_prev_selection();
497         return 1;
498 }
499
500 ScriptNext::ScriptNext(SWindowGUI *gui, int x, int y)
501  : BC_GenericButton(x, y, "Next")
502 {
503         sw_gui = gui;
504 }
505
506 ScriptNext::~ScriptNext()
507 {
508 }
509
510 int ScriptNext::handle_event()
511 {
512         sw_gui->load_next_selection();
513         return 1;
514 }
515
516 ScriptPaste::ScriptPaste(SWindowGUI *gui, int x, int y)
517  : BC_GenericButton(x, y, "Paste")
518 {
519         sw_gui = gui;
520 }
521
522 ScriptPaste::~ScriptPaste()
523 {
524 }
525
526 int ScriptPaste::handle_event()
527 {
528         sw_gui->paste_selection();
529         return 1;
530 }
531
532 ScriptClear::ScriptClear(SWindowGUI *gui, int x, int y)
533  : BC_GenericButton(x, y, "Clear")
534 {
535         sw_gui = gui;
536 }
537
538 ScriptClear::~ScriptClear()
539 {
540 }
541
542 int ScriptClear::handle_event()
543 {
544         sw_gui->clear_selection();
545         return 1;
546 }
547
548
549 ScriptLines::ScriptLines()
550 {
551         used = 0;
552         lines = 0;
553         text = new char[allocated = 256];
554         *text = 0;
555 }
556
557 ScriptLines::~ScriptLines()
558 {
559         delete [] text;
560 }
561
562 void ScriptLines::append(char *cp)
563 {
564         int len = strlen(cp);
565         if( allocated-used < len+1 ) {
566                 int isz = allocated + used + len;
567                 char *new_text = new char[isz];
568                 allocated = isz;
569                 memcpy(new_text, text, used);
570                 delete [] text;  text = new_text;
571         }
572         memcpy(text+used, cp, len);
573         text[used += len] = 0;
574         ++lines;
575 }
576
577 int ScriptLines::break_lines()
578 {
579         int line_limit = 60;
580         int limit2 = line_limit/2;
581         int limit4 = line_limit/4-2;
582         char *cp = text, *dp = cp+used;
583         int n;  char *bp, *ep, *pp, *sp;
584         for( lines=0; cp<dp; ++lines ) {
585                 // find end of line/buffer
586                 for( ep=cp; ep<dp && *ep!='\n'; ++ep );
587                 // delete trailing spaces
588                 for( sp=ep; sp>=cp && (!*sp || isspace(*sp)); --sp);
589                 ++sp;
590                 if( (n=ep-sp) > 0 ) {
591                         memmove(sp,ep,dp+1-ep);
592                         used -= n;  dp -= n;  ep -= n;
593                 }
594                 ++ep;
595                 // skip, if comment or title line
596                 if( *cp == '*' || *cp == '=' ) {
597                         cp = ep;  continue;
598                 }
599                 // delete leading spaces
600                 for( sp=cp; sp<ep && isspace(*sp); ++sp);
601                 if( (n=sp-cp) > 0 ) {
602                         memmove(cp,sp,dp+1-sp);
603                         used -= n;  dp -= n;  ep -= n;
604                 }
605                 // constrain line_limit
606                 if( (n=(ep-cp)/2) < limit2 || n > line_limit )
607                         n = line_limit;
608                 // search for last punct, last space
609                 for( bp=cp, pp=sp=0; --n>=0 && cp<ep; ++cp ) {
610                         if( ispunct(*cp) && isspace(*(cp+1)) ) pp = cp;
611                         else if( isspace(*cp) ) sp = cp;
612                 }
613                 // long enough to break
614                 if( cp < ep ) {
615                         // first, after punctuation
616                         if( pp && pp-bp >= limit4 )
617                                 cp = pp+1;
618                         // then, on spaces
619                         else if( sp ) {
620                                 cp = sp;
621                         }
622                         // last, on next space
623                         else {
624                                 while( cp<dp && !isspace(*cp) ) ++cp;
625                         }
626                         // add new line
627                         if( !*cp ) break;
628                         *cp++ = '\n';
629                 }
630         }
631         return lines;
632 }
633
634 int ScriptLines::get_text_rows()
635 {
636         int ret = 1, i=used;
637         for( char *cp=text; --i>=0; ++cp )
638                 if( *cp == '\n' ) ++ret;
639         return ret;
640 }
641
642 char *ScriptLines::get_text_row(int n)
643 {
644         char *cp = text;
645         if( !n ) return cp;
646         for( int i=used; --i>=0; ) {
647                 if( *cp++ != '\n' ) continue;
648                 if( --n <= 0 ) return cp;
649         }
650         return 0;
651 }
652
653 ScriptScroll::ScriptScroll(SWindowGUI *gui, int x, int y, int w)
654  : BC_ScrollBar(x, y, SCROLL_HORIZ, w, 0, 0, 0)
655 {
656         this->sw_gui = gui;
657 }
658
659 ScriptScroll::~ScriptScroll()
660 {
661 }
662
663 int ScriptScroll::handle_event()
664 {
665         int64_t pos = get_value();
666         sw_gui->set_script_pos(pos);
667         sw_gui->script_position->update(pos);
668         return 1;
669 }
670
671
672 ScriptPosition::ScriptPosition(SWindowGUI *gui, int x, int y, int w, int v, int mn, int mx)
673  : BC_TumbleTextBox(gui, v, mn, mx, x, y, w-BC_Tumbler::calculate_w())
674 {
675         this->sw_gui = gui;
676 }
677
678 ScriptPosition::~ScriptPosition()
679 {
680 }
681
682 int ScriptPosition::handle_event()
683 {
684         int64_t pos = atol(get_text());
685         sw_gui->set_script_pos(pos);
686         sw_gui->script_scroll->update_value(pos);
687         return 1;
688 }
689
690
691 ScriptEntry::ScriptEntry(SWindowGUI *gui, int x, int y, int w, int rows, char *text)
692  : BC_ScrollTextBox(gui, x, y, w, rows, text, -strlen(text))
693 {
694         this->sw_gui = gui;
695         this->ttext = text;
696 }
697
698 ScriptEntry::ScriptEntry(SWindowGUI *gui, int x, int y, int w, int rows)
699  : BC_ScrollTextBox(gui, x, y, w, rows,(char*)0, BCTEXTLEN)
700 {
701         this->sw_gui = gui;
702         this->ttext = 0;
703 }
704
705 ScriptEntry::~ScriptEntry()
706 {
707 }
708
709 void ScriptEntry::set_text(char *text, int isz)
710 {
711         if( !text || !*text ) return;
712         if( isz < 0 ) isz = strlen(text);
713         BC_ScrollTextBox::set_text(text, isz);
714         ttext = text;
715 }
716
717
718 int SWindowGUI::load_script_line(FILE *fp)
719 {
720         char line[8192];
721         for(;;) { // skip blank lines
722                 char *cp = fgets(line,sizeof(line),fp);
723                 if( !cp ) return 1;
724                 ++script_line_no;
725                 while( *cp && isspace(*cp) ) ++cp;
726                 if( *cp ) break;
727         }
728
729         ScriptLines *entry = new ScriptLines();
730         script.append(entry);
731
732         for(;;) { // load non-blank lines
733                 //int len = strlen(line);
734                 //if( cp[len-1] == '\n' ) cp[len-1] = 0;
735                 entry->append(line);
736                 char *cp = fgets(line,sizeof(line),fp);
737                 if( !cp ) return 1;
738                 ++script_line_no;
739                 while( *cp && isspace(*cp) ) ++cp;
740                 if( !*cp ) break;
741         }
742         script_text_lines += entry->break_lines();
743         return 0;
744 }
745
746 void SWindowGUI::load_script()
747 {
748         FILE *fp = fopen(script_path,"r");
749         if( !fp ) {
750                 char string[BCTEXTLEN];
751                 sprintf(string,"cannot open: \"%s\"\n%s",script_path,strerror(errno));
752                 MainError::show_error(string);
753                 return;
754         }
755
756         script.remove_all_objects();
757         script_line_no = 0;
758         script_text_lines = 0;
759         while( !load_script_line(fp) );
760         char value[64];
761         sprintf(value,"%ld",ftell(fp));
762         script_filesz->update(value);
763         sprintf(value,"%ld",script_line_no);
764         script_lines->update(value);
765         sprintf(value,"%d",script.size());
766         script_entries->update(value);
767         sprintf(value,"%ld",script_text_lines);
768         script_texts->update(value);
769         int hw = 2*script_scroll->get_h();
770         script_scroll->update_length(script.size(), script_entry_no, hw, 0);
771         script_position->update(script_entry_no);
772         script_position->set_boundaries((int64_t)0, (int64_t)script.size()-1);
773
774         fclose(fp);
775 }
776
777 void SWindowGUI::save_spumux_data()
778 {
779         char filename[BCTEXTLEN], track_title[BCTEXTLEN];
780         snprintf(filename,sizeof(filename),"%s",script_path);
781         filename[sizeof(filename)-1] = 0;
782         char *bp = strrchr(filename,'/');
783         if( !bp ) bp = filename; else ++bp;
784         char *ext = strrchr(bp, '.');
785         if( !ext ) ext = bp + strlen(bp);
786         int len = sizeof(filename)-1 - (ext-filename);
787
788         Tracks *tracks = swindow->mwindow->edl->tracks;
789         for( Track *track=tracks->first; track; track=track->next ) {
790                 if( track->data_type != TRACK_SUBTITLE ) continue;
791                 if( !track->record ) continue;
792                 char *cp = track_title;
793                 for( char *bp=track->title; *bp; ++bp,++cp )
794                         *cp = !isalnum(*bp) ? '_' : *bp;
795                 *cp = 0;
796                 snprintf(ext,len,"-%s.udvd",track_title);
797                 FILE *fp = fopen(filename, "w");
798                 int64_t start = 0;
799                 for( Edit *edit=track->edits->first; edit; edit=edit->next ) {
800                         SEdit *sedit = (SEdit *)edit;
801                         if( sedit->length > 0 ) {
802                                 int64_t end = start + sedit->length;
803                                 char *text = sedit->get_text();
804                                 if( *text ) {
805                                         fprintf(fp, "{%ld}{%ld}%s\n", start, end-1, text);
806                                 }
807                                 start = end;
808                         }
809                 }
810                 fclose(fp);
811         }
812 }
813
814
815
816 SWindow::SWindow(MWindow *mwindow)
817  : Thread(1, 0, 0)
818 {
819         this->mwindow = mwindow;
820         window_lock = new Mutex("SWindow::window_lock");
821         swin_lock = new Condition(0,"SWindow::swin_lock");
822         gui = 0;
823         done = 1;
824         gui_done = 1;
825
826         start();
827 }
828
829 SWindow::~SWindow()
830 {
831         stop();
832         delete gui;
833         delete swin_lock;
834         delete window_lock;
835 }
836
837
838 void SWindow::start()
839 {
840         if( !Thread::running() ) {
841                 done = 0;
842                 Thread::start();
843         }
844 }
845
846 void SWindow::stop()
847 {
848         if( Thread::running() ) {
849                 done = 1;
850                 swin_lock->unlock();
851                 window_lock->lock("SWindow::stop");
852                 if( gui ) gui->stop(1);
853                 window_lock->unlock();
854                 Thread::cancel();
855                 Thread::join();
856         }
857 }
858
859 void SWindow::run()
860 {
861         int root_w = mwindow->gui->get_root_w(1);
862         int root_h = mwindow->gui->get_root_h(1);
863
864         while( !done ) {
865                 swin_lock->reset();
866                 swin_lock->lock();
867                 if( done ) break;
868                 int x = mwindow->session->swindow_x;
869                 int y = mwindow->session->swindow_y;
870                 int w = mwindow->session->swindow_w;
871                 int h = mwindow->session->swindow_h;
872                 if( w < 600 ) w = 600;
873                 if( h < 500 ) h = 500;
874                 int scr_x = mwindow->gui->get_screen_x(1, -1);
875                 int scr_w = mwindow->gui->get_screen_w(1, -1);
876                 if( x < scr_x ) x = scr_x;
877                 if( x > scr_x+scr_w ) x = scr_x+scr_w;
878                 if( x+w > root_w ) x = root_w - w;
879                 if( x < 0 ) { x = 0;  w = scr_w; }
880                 if( y+h > root_h ) y = root_h - h;
881                 if( y < 0 ) { y = 0;  h = root_h; }
882                 if( y+h > root_h ) h = root_h-y;
883                 mwindow->session->swindow_x = x;
884                 mwindow->session->swindow_y = y;
885                 mwindow->session->swindow_w = w;
886                 mwindow->session->swindow_h = h;
887
888                 gui_done = 0;
889                 gui = new SWindowGUI(this, x, y, w, h);
890                 gui->lock_window("ChannelInfo::gui_create_objects");
891                 gui->load_defaults();
892                 gui->create_objects();
893                 gui->set_icon(mwindow->theme->get_image("record_icon"));
894                 gui->reposition_window(x, y);
895                 gui->resize_event(w, h);
896                 gui->load();
897                 gui->show_window();
898                 gui->unlock_window();
899
900                 int result = gui->run_window();
901                 if( !result ) {
902                         gui->save_spumux_data();
903                 }
904
905                 window_lock->lock("ChannelInfo::run 1");
906                 gui->save_defaults();
907                 delete gui;  gui = 0;
908                 window_lock->unlock();
909         }
910 }
911
912
913
914
915 void SWindow::run_swin()
916 {
917         window_lock->lock("SWindow::run_swin");
918         if( gui ) {
919                 gui->lock_window("SWindow::run_swin");
920                 gui->raise_window();
921                 gui->unlock_window();
922         }
923         else
924                 swin_lock->unlock();
925         window_lock->unlock();
926 }
927
928 void SWindow::paste_subttl()
929 {
930         window_lock->lock("SWindow::paste_subttl 1");
931         if( gui ) {
932                 gui->lock_window("SWindow::paste_subttl 2");
933                 gui->paste_selection();
934                 gui->unlock_window();
935         }
936         window_lock->unlock();
937 }
938
939 int SWindow::update_selection()
940 {
941         window_lock->lock("SWindow::update_selection 1");
942         if( gui ) {
943                 gui->lock_window("SWindow::update_selection 2");
944                 gui->update_selection();
945                 gui->unlock_window();
946         }
947         window_lock->unlock();
948         return 0;
949 }
950
951
952
953 SubttlSWin::SubttlSWin(MWindow *mwindow)
954  : BC_MenuItem(_("SubTitle"), "Alt-y", 'y')
955 {
956         set_alt();
957         this->mwindow = mwindow;
958 }
959
960 SubttlSWin::~SubttlSWin()
961 {
962 }
963
964 int SubttlSWin::handle_event()
965 {
966         mwindow->gui->swindow->run_swin();
967         return 1;
968 };
969