add BC_SCALE env var for hi def monitors, cleanup theme data
[goodguy/cinelerra.git] / cinelerra-5.1 / cinelerra / mtimebar.C
1
2 /*
3  * CINELERRA
4  * Copyright (C) 1997-2014 Adam Williams <broadcast at earthling dot net>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  */
21
22 #include "bcsignals.h"
23 #include "clip.h"
24 #include "cplayback.h"
25 #include "cwindow.h"
26 #include "edl.h"
27 #include "edlsession.h"
28 #include "localsession.h"
29 #include "mainclock.h"
30 #include "maincursor.h"
31 #include "mainsession.h"
32 #include "mbuttons.h"
33 #include "mtimebar.h"
34 #include "mwindowgui.h"
35 #include "mwindow.h"
36 #include "patchbay.h"
37 #include "preferences.h"
38 #include "theme.h"
39 #include "trackcanvas.h"
40 #include "tracks.h"
41 #include "transportque.h"
42 #include "zoombar.h"
43
44
45
46 MTimeBar::MTimeBar(MWindow *mwindow,
47         MWindowGUI *gui,
48         int x,
49         int y,
50         int w,
51         int h)
52  : TimeBar(mwindow, gui, x, y, w, h)
53 {
54         this->gui = gui;
55         this->pane = 0;
56 }
57
58 MTimeBar::MTimeBar(MWindow *mwindow,
59         TimelinePane *pane,
60         int x,
61         int y,
62         int w,
63         int h)
64  : TimeBar(mwindow, mwindow->gui, x, y, w, h)
65 {
66         this->gui = mwindow->gui;
67         this->pane = pane;
68 }
69
70 void MTimeBar::create_objects()
71 {
72         gui->add_subwindow(menu = new TimeBarPopup(mwindow));
73         menu->create_objects();
74
75         TimeBar::create_objects();
76 }
77
78
79 double MTimeBar::pixel_to_position(int pixel)
80 {
81         return (double)pixel *
82                 mwindow->edl->local_session->zoom_sample /
83                 mwindow->edl->session->sample_rate +
84                 (double)mwindow->edl->local_session->view_start[pane->number] *
85                 mwindow->edl->local_session->zoom_sample /
86                 mwindow->edl->session->sample_rate;
87 }
88
89
90 int64_t MTimeBar::position_to_pixel(double position)
91 {
92         return (int64_t)(position *
93                 mwindow->edl->session->sample_rate /
94                 mwindow->edl->local_session->zoom_sample -
95                 mwindow->edl->local_session->view_start[pane->number]);
96 }
97
98
99 void MTimeBar::stop_transport()
100 {
101         gui->stop_transport("MTimeBar::stop_transport");
102 }
103
104 #define TEXT_MARGIN xS(4)
105 #define TICK_SPACING xS(5)
106 #define LINE_MARGIN yS(3)
107 #define TICK_MARGIN yS(16)
108
109 void MTimeBar::draw_time()
110 {
111
112         char string[BCTEXTLEN];
113         int sample_rate = mwindow->edl->session->sample_rate;
114         double frame_rate = mwindow->edl->session->frame_rate;
115 // Seconds between text markings
116         double text_interval = 3600.0;
117 // Seconds between tick marks
118         double tick_interval = 3600.0;
119
120
121 // Calculate tick mark spacing, number spacing, and starting point based
122 // on zoom, time format, project settings.
123
124 // If the time format is for audio, mark round numbers of samples based on
125 // samplerate.
126 // Fow low zoom, mark tens of samples.
127
128 // If the time format is for video, mark round number of frames based on
129 // framerate.
130 // For low zoom, mark individual frames.
131
132         //int64_t windowspan = mwindow->edl->local_session->zoom_sample * get_w();
133
134         draw_range();
135
136
137
138
139
140 // Number of seconds per pixel
141         double time_per_pixel = (double)mwindow->edl->local_session->zoom_sample /
142                 sample_rate;
143 // Seconds in each frame
144         double frame_seconds = (double)1.0 / frame_rate;
145 // Starting time of view in seconds.
146         double view_start = mwindow->edl->local_session->view_start[pane->number] *
147                 time_per_pixel;
148 // Ending time of view in seconds
149         double view_end = (double)(mwindow->edl->local_session->view_start[pane->number] +
150                 get_w()) * time_per_pixel;
151 // Get minimum distance between text marks
152         int min_pixels1 = get_text_width(MEDIUMFONT,
153                 Units::totext(string,
154                         view_start,
155                         mwindow->edl->session->time_format,
156                         sample_rate,
157                         mwindow->edl->session->frame_rate,
158                         mwindow->edl->session->frames_per_foot)) + TEXT_MARGIN;
159         int min_pixels2 = get_text_width(MEDIUMFONT,
160                 Units::totext(string,
161                         view_end,
162                         mwindow->edl->session->time_format,
163                         sample_rate,
164                         mwindow->edl->session->frame_rate,
165                         mwindow->edl->session->frames_per_foot)) + TEXT_MARGIN;
166         int min_pixels = (int)MAX(min_pixels1, min_pixels2);
167
168
169 // Minimum seconds between text marks
170         double min_time = (double)min_pixels *
171                 mwindow->edl->local_session->zoom_sample /
172                 sample_rate;
173
174
175 // Get first text mark on or before window start
176         int64_t starting_mark = 0;
177
178         int progression = 1;
179
180 // Default text spacing
181         text_interval = 0.5;
182         double prev_text_interval = 1.0;
183
184         while(text_interval >= min_time)
185         {
186                 prev_text_interval = text_interval;
187                 if(progression == 0)
188                 {
189                         text_interval /= 2;
190                         progression++;
191                 }
192                 else
193                 if(progression == 1)
194                 {
195                         text_interval /= 2;
196                         progression++;
197                 }
198                 else
199                 if(progression == 2)
200                 {
201                         text_interval /= 2.5;
202                         progression = 0;
203                 }
204         }
205
206         text_interval = prev_text_interval;
207
208         if(1 >= min_time)
209                 ;
210         else
211         if(2 >= min_time)
212                 text_interval = 2;
213         else
214         if(5 >= min_time)
215                 text_interval = 5;
216         else
217         if(10 >= min_time)
218                 text_interval = 10;
219         else
220         if(15 >= min_time)
221                 text_interval = 15;
222         else
223         if(20 >= min_time)
224                 text_interval = 20;
225         else
226         if(30 >= min_time)
227                 text_interval = 30;
228         else
229         if(60 >= min_time)
230                 text_interval = 60;
231         else
232         if(120 >= min_time)
233                 text_interval = 120;
234         else
235         if(300 >= min_time)
236                 text_interval = 300;
237         else
238         if(600 >= min_time)
239                 text_interval = 600;
240         else
241         if(1200 >= min_time)
242                 text_interval = 1200;
243         else
244         if(1800 >= min_time)
245                 text_interval = 1800;
246         else
247         if(3600 >= min_time)
248                 text_interval = 3600;
249
250 // Set text interval
251         switch(mwindow->edl->session->time_format)
252         {
253                 case TIME_FEET_FRAMES:
254                 {
255                         double foot_seconds = frame_seconds * mwindow->edl->session->frames_per_foot;
256                         if(frame_seconds >= min_time)
257                                 text_interval = frame_seconds;
258                         else
259                         if(foot_seconds / 8.0 > min_time)
260                                 text_interval = frame_seconds * mwindow->edl->session->frames_per_foot / 8.0;
261                         else
262                         if(foot_seconds / 4.0 > min_time)
263                                 text_interval = frame_seconds * mwindow->edl->session->frames_per_foot / 4.0;
264                         else
265                         if(foot_seconds / 2.0 > min_time)
266                                 text_interval = frame_seconds * mwindow->edl->session->frames_per_foot / 2.0;
267                         else
268                         if(foot_seconds > min_time)
269                                 text_interval = frame_seconds * mwindow->edl->session->frames_per_foot;
270                         else
271                         if(foot_seconds * 2 >= min_time)
272                                 text_interval = foot_seconds * 2;
273                         else
274                         if(foot_seconds * 5 >= min_time)
275                                 text_interval = foot_seconds * 5;
276                         else
277                         {
278
279                                 for(int factor = 10, progression = 0; factor <= 100000; )
280                                 {
281                                         if(foot_seconds * factor >= min_time)
282                                         {
283                                                 text_interval = foot_seconds * factor;
284                                                 break;
285                                         }
286
287                                         if(progression == 0)
288                                         {
289                                                 factor = (int)(factor * 2.5);
290                                                 progression++;
291                                         }
292                                         else
293                                         if(progression == 1)
294                                         {
295                                                 factor = (int)(factor * 2);
296                                                 progression++;
297                                         }
298                                         else
299                                         if(progression == 2)
300                                         {
301                                                 factor = (int)(factor * 2);
302                                                 progression = 0;
303                                         }
304                                 }
305
306                         }
307                         break;
308                 }
309
310                 case TIME_FRAMES:
311                 case TIME_HMSF:
312 // One frame per text mark
313                         if(frame_seconds >= min_time)
314                                 text_interval = frame_seconds;
315                         else
316                         if(frame_seconds * 2 >= min_time)
317                                 text_interval = frame_seconds * 2;
318                         else
319                         if(frame_seconds * 5 >= min_time)
320                                 text_interval = frame_seconds * 5;
321                         else
322                         {
323
324                                 for(int factor = 10, progression = 0; factor <= 100000; )
325                                 {
326                                         if(frame_seconds * factor >= min_time)
327                                         {
328                                                 text_interval = frame_seconds * factor;
329                                                 break;
330                                         }
331
332                                         if(progression == 0)
333                                         {
334                                                 factor = (int)(factor * 2.5);
335                                                 progression++;
336                                         }
337                                         else
338                                         if(progression == 1)
339                                         {
340                                                 factor = (int)(factor * 2);
341                                                 progression++;
342                                         }
343                                         else
344                                         if(progression == 2)
345                                         {
346                                                 factor = (int)(factor * 2);
347                                                 progression = 0;
348                                         }
349                                 }
350
351                         }
352                         break;
353
354                 default:
355                         break;
356         }
357
358 // Sanity
359         while(text_interval < min_time)
360         {
361                 text_interval *= 2;
362         }
363
364 // Set tick interval
365         tick_interval = text_interval;
366
367         switch(mwindow->edl->session->time_format)
368         {
369                 case TIME_HMSF:
370                 case TIME_FEET_FRAMES:
371                 case TIME_FRAMES:
372                         if(frame_seconds / time_per_pixel > TICK_SPACING)
373                                 tick_interval = frame_seconds;
374                         break;
375         }
376
377 // Get first text mark on or before window start
378         starting_mark = (int64_t)((double)mwindow->edl->local_session->view_start[pane->number] *
379                 time_per_pixel / text_interval);
380
381         double start_position = (double)starting_mark * text_interval;
382         int64_t iteration = 0;
383
384
385 //printf("text_interval=%f\n", text_interval);
386         while(start_position + text_interval * iteration < view_end)
387         {
388                 double position1 = start_position + text_interval * iteration;
389                 int pixel = (int64_t)(position1 / time_per_pixel) -
390                         mwindow->edl->local_session->view_start[pane->number];
391                 int pixel1 = pixel;
392
393                 Units::totext(string,
394                         position1,
395                         mwindow->edl->session->time_format,
396                         sample_rate,
397                         mwindow->edl->session->frame_rate,
398                         mwindow->edl->session->frames_per_foot);
399                 set_color(get_resources()->default_text_color);
400                 set_font(MEDIUMFONT);
401
402                 draw_text(pixel + TEXT_MARGIN, get_text_ascent(MEDIUMFONT), string);
403                 draw_line(pixel, LINE_MARGIN, pixel, get_h() - yS(2));
404
405                 double position2 = start_position + text_interval * (iteration + 1);
406                 int pixel2 = (int64_t)(position2 / time_per_pixel) -
407                         mwindow->edl->local_session->view_start[pane->number];
408
409                 for(double tick_position = position1;
410                         tick_position < position2;
411                         tick_position += tick_interval)
412                 {
413                         pixel = (int64_t)(tick_position / time_per_pixel) -
414                                 mwindow->edl->local_session->view_start[pane->number];
415                         if(labs(pixel - pixel1) > 1 &&
416                                 labs(pixel - pixel2) > 1)
417                                 draw_line(pixel, TICK_MARGIN, pixel, get_h() - yS(2));
418                 }
419                 iteration++;
420         }
421
422
423 }
424
425 void MTimeBar::draw_range()
426 {
427         int x1 = 0, x2 = 0;
428         if( mwindow->brender_active && mwindow->preferences->use_brender &&
429             mwindow->edl->tracks->total_playable_vtracks() ) {
430                 double time_per_pixel = (double)mwindow->edl->local_session->zoom_sample /
431                         mwindow->edl->session->sample_rate;
432                 x1 = (int)(mwindow->edl->session->brender_start / time_per_pixel) -
433                         mwindow->edl->local_session->view_start[pane->number];
434                 x2 = (int)(mwindow->session->brender_end / time_per_pixel) -
435                         mwindow->edl->local_session->view_start[pane->number];
436         }
437
438         if(x2 > x1 && x1 < get_w() && x2 > 0) {
439                 draw_top_background(get_parent(), 0, 0, x1, get_h());
440                 draw_3segmenth(x1, 0, x2 - x1, mwindow->theme->get_image("timebar_brender"));
441                 draw_top_background(get_parent(), x2, 0, get_w() - x2, get_h());
442         }
443         else {
444                 draw_top_background(get_parent(), 0, 0, get_w(), get_h());
445         }
446
447 //      int64_t pixel = position_to_pixel(
448 //              mwindow->edl->local_session->get_selectionstart(1));
449 //
450 //      set_color(mwindow->theme->timebar_cursor_colorg);
451 //      draw_line(pixel, 0, pixel, get_h());
452 //printf("MTimeBar::draw_range %f %f\n", mwindow->session->brender_end, time_per_pixel);
453 }
454
455 void MTimeBar::select_label(double position)
456 {
457         stop_transport();
458
459         EDL *edl = mwindow->edl;
460         position = edl->align_to_frame(position, 1);
461
462         if(shift_down())
463         {
464                 if(position > edl->local_session->get_selectionend(1) / 2 +
465                         edl->local_session->get_selectionstart(1) / 2)
466                 {
467
468                         edl->local_session->set_selectionend(position);
469                 }
470                 else
471                 {
472                         edl->local_session->set_selectionstart(position);
473                 }
474         }
475         else
476         {
477                 edl->local_session->set_selectionstart(position);
478                 edl->local_session->set_selectionend(position);
479         }
480
481 // Que the CWindow
482         mwindow->cwindow->update(1, 0, 0, 0, 1);
483
484         gui->hide_cursor(0);
485         gui->draw_cursor(1);
486         gui->flash_canvas(1);
487         gui->zoombar->update();
488         update_highlights();
489         activate_timeline();
490 }
491
492
493 int MTimeBar::resize_event()
494 {
495         reposition_window(mwindow->theme->mtimebar_x,
496                 mwindow->theme->mtimebar_y,
497                 mwindow->theme->mtimebar_w,
498                 mwindow->theme->mtimebar_h);
499         update(0);
500         return 1;
501 }
502
503 int MTimeBar::resize_event(int x, int y, int w, int h)
504 {
505         reposition_window(x,
506                 y,
507                 w,
508                 h);
509         update(0);
510         return 1;
511 }
512
513 // int MTimeBar::test_preview(int buttonpress)
514 // {
515 //      int result = 0;
516 //      return result;
517 // }
518 //
519
520
521 void MTimeBar::handle_mwindow_drag()
522 {
523 //printf("TimeBar::cursor_motion_event %d %d\n", __LINE__, current_operation);
524         int relative_cursor_x = pane->canvas->get_relative_cursor_x();
525         if(relative_cursor_x >= pane->canvas->get_w() ||
526                 relative_cursor_x < 0)
527         {
528                 pane->canvas->start_dragscroll();
529         }
530         else
531         if(relative_cursor_x < pane->canvas->get_w() &&
532                 relative_cursor_x >= 0)
533         {
534                 pane->canvas->stop_dragscroll();
535         }
536
537         update(0);
538 }
539
540 void MTimeBar::update(int flush)
541 {
542         TimeBar::update(flush);
543 }
544
545 void MTimeBar::update_clock(double position)
546 {
547         if(!mwindow->cwindow->playback_engine->is_playing_back)
548                 gui->mainclock->update(position);
549 }
550
551 void MTimeBar::update_cursor()
552 {
553         int rx = get_relative_cursor_x();
554         double position = pixel_to_position(rx);
555
556         position = mwindow->edl->align_to_frame(position, 0);
557         position = MAX(0, position);
558
559         mwindow->select_point(position);
560         update(1);
561 }
562
563 double MTimeBar::test_highlight()
564 {
565 // Don't crash during initialization
566         if(pane->canvas)
567         {
568                 if(mwindow->session->current_operation == NO_OPERATION)
569                 {
570                         if(pane->canvas->is_event_win() &&
571                                 pane->canvas->cursor_inside())
572                         {
573                                 int cursor_x = pane->canvas->get_cursor_x();
574                                 double position = (double)cursor_x *
575                                         (double)mwindow->edl->local_session->zoom_sample /
576                                         (double)mwindow->edl->session->sample_rate +
577                                         (double)mwindow->edl->local_session->view_start[pane->number] *
578                                         (double)mwindow->edl->local_session->zoom_sample /
579                                         (double)mwindow->edl->session->sample_rate;
580                                 pane->canvas->timebar_position = mwindow->edl->align_to_frame(position, 0);
581                         }
582
583 //printf("MTimeBar::test_highlight %d %d %f\n", __LINE__, pane->canvas->cursor_inside(), pane->canvas->timebar_position);
584                         return pane->canvas->timebar_position;
585                 }
586                 else
587                 if(mwindow->session->current_operation == SELECT_REGION ||
588                         mwindow->session->current_operation == DRAG_EDITHANDLE2)
589                 {
590 //printf("MTimeBar::test_highlight %d %f\n", __LINE__, mwindow->gui->canvas->timebar_position);
591                         return pane->canvas->timebar_position;
592                 }
593
594                 return -1;
595         }
596         else
597         {
598                 return -1;
599         }
600 }
601
602 int MTimeBar::repeat_event(int64_t duration)
603 {
604         if(!pane->canvas->drag_scroll) return 0;
605         if(duration != BC_WindowBase::get_resources()->scroll_repeat) return 0;
606
607         int distance = 0;
608         int x_movement = 0;
609         int relative_cursor_x = pane->canvas->get_relative_cursor_x();
610         if(current_operation == TIMEBAR_DRAG)
611         {
612                 if(relative_cursor_x >= pane->canvas->get_w())
613                 {
614                         distance = relative_cursor_x - pane->canvas->get_w();
615                         x_movement = 1;
616                 }
617                 else
618                 if(relative_cursor_x < 0)
619                 {
620                         distance = relative_cursor_x;
621                         x_movement = 1;
622                 }
623
624
625
626                 if(x_movement)
627                 {
628                         update_cursor();
629                         mwindow->samplemovement(
630                                 mwindow->edl->local_session->view_start[pane->number] + distance,
631                                 pane->number);
632                 }
633                 return 1;
634         }
635
636         return 0;
637 }
638
639 int MTimeBar::button_press_event()
640 {
641         int result = 0;
642
643         if(is_event_win() && cursor_above() && get_buttonpress() == 3)
644         {
645                 menu->update();
646                 menu->activate_menu();
647                 result = 1;
648         }
649
650         if(!result) return TimeBar::button_press_event();
651         return result;
652 }
653
654
655 void MTimeBar::activate_timeline()
656 {
657         pane->activate();
658 }
659
660
661 TimeBarPopupItem::TimeBarPopupItem(MWindow *mwindow,
662         TimeBarPopup *menu,
663         const char *text,
664         int value)
665  : BC_MenuItem(text)
666 {
667         this->mwindow = mwindow;
668         this->menu = menu;
669         this->value = value;
670 }
671
672 int TimeBarPopupItem::handle_event()
673 {
674         mwindow->edl->session->time_format = value;
675         mwindow->gui->update(0, NO_DRAW, 1, 0, 0, 1, 0);
676         mwindow->gui->redraw_time_dependancies();
677         return 1;
678 }
679
680
681
682 TimeBarPopup::TimeBarPopup(MWindow *mwindow)
683  : BC_PopupMenu(0, 0, 0, "", 0)
684 {
685         this->mwindow = mwindow;
686 }
687
688 TimeBarPopup::~TimeBarPopup()
689 {
690 }
691
692
693 void TimeBarPopup::create_objects()
694 {
695         add_item(items[0] = new TimeBarPopupItem(mwindow,
696                 this, TIME_HMS_TEXT, TIME_HMS));
697         add_item(items[1] = new TimeBarPopupItem(mwindow,
698                 this, TIME_HMSF_TEXT, TIME_HMSF));
699         add_item(items[2] = new TimeBarPopupItem(mwindow,
700                 this, TIME_FRAMES_TEXT, TIME_FRAMES));
701         add_item(items[3] = new TimeBarPopupItem(mwindow,
702                 this, TIME_SAMPLES_TEXT, TIME_SAMPLES));
703         add_item(items[4] = new TimeBarPopupItem(mwindow,
704                 this, TIME_SAMPLES_HEX_TEXT, TIME_SAMPLES_HEX));
705         add_item(items[5] = new TimeBarPopupItem(mwindow,
706                 this, TIME_SECONDS_TEXT, TIME_SECONDS));
707         add_item(items[6] = new TimeBarPopupItem(mwindow,
708                 this, TIME_FEET_FRAMES_TEXT, TIME_FEET_FRAMES));
709 }
710
711 void TimeBarPopup::update()
712 {
713         int time_format = mwindow->edl->session->time_format;
714         for( int i=0; i<TOTAL_TIMEFORMATS; ++i ) {
715                 items[i]->set_checked(items[i]->value == time_format);
716         }
717 }
718
719
720
721
722