]> git.vomp.tv Git - vompclient-marten.git/blob - vvideorec.cc
Demuxer changes/fixes/improvements
[vompclient-marten.git] / vvideorec.cc
1 /*
2     Copyright 2004-2005 Chris Tallon
3
4     This file is part of VOMP.
5
6     VOMP 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     VOMP 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 VOMP; if not, write to the Free Software
18     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19 */
20
21 #include "vvideorec.h"
22
23 #include "command.h"
24 #include "osd.h"
25 #include "wsymbol.h"
26 #include "audio.h"
27 #include "vdr.h"
28 #include "video.h"
29 #include "timers.h"
30 #include "player.h"
31 #include "recording.h"
32 #include "vaudioselector.h"
33 #include "message.h"
34 #include "remote.h"
35 #include "boxstack.h"
36 #include "vinfo.h"
37 #include "i18n.h"
38
39 VVideoRec::VVideoRec(Recording* rec)
40 {
41   boxstack = BoxStack::getInstance();
42   vdr = VDR::getInstance();
43   video = Video::getInstance();
44   timers = Timers::getInstance();
45   vas = NULL;
46   vsummary = NULL;
47
48   player = new Player(Command::getInstance(), this, true);
49   player->init();
50
51   videoMode = video->getMode();
52   myRec = rec;
53
54   playing = false;
55
56   startMargin = 0;
57   endMargin = 0;
58   char* cstartMargin = vdr->configLoad("Timers", "Start margin");
59   char* cendMargin = vdr->configLoad("Timers", "End margin");
60   if (!cstartMargin)
61   {
62     startMargin = 300; // 5 mins default
63   }
64   else
65   {
66     startMargin = atoi(cstartMargin) * 60;
67     delete[] cstartMargin;
68   }
69
70   if (!cendMargin)
71   {
72     endMargin = 300; // 5 mins default
73   }
74   else
75   {
76     endMargin = atoi(cendMargin) * 60;
77     delete[] cendMargin;
78   }
79
80   Log::getInstance()->log("VVideoRec", Log::DEBUG, "SM: %u EM: %u", startMargin, endMargin);
81
82   setSize(video->getScreenWidth(), video->getScreenHeight());
83   createBuffer();
84   transparent.set(0, 0, 0, 0);
85   setBackgroundColour(transparent);
86
87   barRegion.x = 0;
88   barRegion.y = video->getScreenHeight() - 58;   // FIXME, need to be - 1? and below?
89   barRegion.w = video->getScreenWidth();
90   barRegion.h = 58;
91
92   clocksRegion.x = barRegion.x + 140;
93   clocksRegion.y = barRegion.y + 12;
94   clocksRegion.w = 170;
95   clocksRegion.h = surface->getFontHeight();
96
97
98   barBlue.set(0, 0, 150, 150);
99
100   barShowing = false;
101   barGenHold = false;
102   barScanHold = false;
103   barVasHold = false;
104
105   dowss = false;
106   char* optionWSS = vdr->configLoad("General", "WSS");
107   if (optionWSS)
108   {
109     if (strstr(optionWSS, "Yes")) dowss = true;
110     delete[] optionWSS;
111   }
112   Log::getInstance()->log("VVideoRec", Log::DEBUG, "Do WSS: %u", dowss);
113
114   if (dowss)
115   {
116     wss.setFormat(video->getFormat());
117     wss.setWide(true);
118     add(&wss);
119
120     wssRegion.x = 0;
121     wssRegion.y = 0;
122     wssRegion.w = video->getScreenWidth();
123     wssRegion.h = 300;
124   }
125 }
126
127 VVideoRec::~VVideoRec()
128 {
129   Log::getInstance()->log("VVideoRec", Log::DEBUG, "Entering vvideorec destructor");
130
131   if (vas)
132   {
133     boxstack->remove(vas);
134     vas = NULL;
135   }
136
137   if (vsummary) delete vsummary;
138
139   if (playing) stopPlay();
140   video->setDefaultAspect();
141
142   timers->cancelTimer(this, 1);
143   timers->cancelTimer(this, 2);
144
145   // kill recInfo in case resumePoint has changed (likely)
146   myRec->dropRecInfo();
147   // FIXME - do this properly - save the resume point back to the server manually and update
148   // rec->recInfo->resumePoint - this will fix the ~10s offset problem as well
149 }
150
151 void VVideoRec::go(bool resume)
152 {
153   ULONG startFrameNum;
154   if (resume)
155     startFrameNum = myRec->recInfo->resumePoint;
156   else
157     startFrameNum = 0;
158
159   Log::getInstance()->log("VVideoRec", Log::DEBUG, "Starting stream: %s at frame: %lu", myRec->getFileName(), startFrameNum);
160   ULONG lengthFrames = 0;
161   ULLONG lengthBytes = vdr->streamRecording(myRec->getFileName(), &lengthFrames);
162   if (lengthBytes)
163   {
164     player->setLengthBytes(lengthBytes);
165     player->setLengthFrames(lengthFrames);
166     player->setStartFrame(startFrameNum);
167     player->play();
168     playing = true;
169     doBar(0);
170   }
171   else
172   {
173     stopPlay(); // clean up
174
175     if (!vdr->isConnected())
176     {
177       Command::getInstance()->connectionLost();
178       return;
179     }
180
181     Message* m = new Message();
182     m->message = Message::CLOSE_ME;
183     m->from = this;
184     m->to = boxstack;
185     Command::getInstance()->postMessageNoLock(m);
186
187     VInfo* vi = new VInfo();
188     vi->setSize(400, 150);
189     vi->createBuffer();
190     if (video->getFormat() == Video::PAL)
191       vi->setPosition(170, 200);
192     else
193       vi->setPosition(160, 150);
194     vi->setExitable();
195     vi->setBorderOn(1);
196     vi->setTitleBarOn(0);
197     vi->setOneLiner(tr("Error playing recording"));
198     vi->draw();
199
200     m = new Message();
201     m->message = Message::ADD_VIEW;
202     m->to = boxstack;
203     m->parameter = (ULONG)vi;
204     Command::getInstance()->postMessageNoLock(m);
205   }
206 }
207
208 int VVideoRec::handleCommand(int command)
209 {
210   switch(command)
211   {
212     case Remote::PLAY:
213     {
214       player->play();
215       doBar(0);
216       return 2;
217     }
218
219     case Remote::BACK:
220     {
221       if (vsummary)
222       {
223         removeSummary();
224         return 2;
225       }
226     } // DROP THROUGH
227     case Remote::STOP:
228     case Remote::MENU:
229     {
230       if (playing) stopPlay();
231
232       return 4;
233     }
234     case Remote::PAUSE:
235     {
236       player->pause();
237       doBar(0);
238       return 2;
239     }
240     case Remote::SKIPFORWARD:
241     {
242       doBar(3);
243       player->skipForward(60);
244       return 2;
245     }
246     case Remote::SKIPBACK:
247     {
248       doBar(4);
249       player->skipBackward(60);
250       return 2;
251     }
252     case Remote::FORWARD:
253     {
254       player->fastForward();
255       doBar(0);
256       return 2;
257     }
258     case Remote::REVERSE:
259     {
260       player->fastBackward();
261       doBar(0);
262       return 2;
263     }
264     case Remote::RED:
265     {
266       if (vsummary) removeSummary();
267       else doSummary();
268       return 2;
269     }
270     case Remote::GREEN:
271     {
272       doAudioSelector();
273       return 2;
274     }
275     case Remote::YELLOW:
276     {
277       if (myRec->hasMarks())
278       {
279         // skip to previous mark
280         Log* logger = Log::getInstance();
281         int currentFrame = (player->getCurrentFrameNum()); // get current Frame
282         currentFrame -= 5 * video->getFPS(); // subtrack 5 seconds, else you cannot skip more than once back ..
283
284         int prevMark = myRec->getPrevMark(currentFrame); // find previous Frame
285         if (prevMark)
286         {
287           logger->log("VVideoRec", Log::NOTICE, "jump back from pos %i to mark at %i",currentFrame,prevMark);
288           player->jumpToMark(prevMark);
289         }
290         doBar(4);
291       }
292       else
293       {
294         doBar(2);
295         player->skipBackward(10);
296       }
297       return 2;
298     }
299     case Remote::BLUE:
300     {
301       if (myRec->hasMarks())
302       {
303         // skip to next mark
304         Log* logger = Log::getInstance();
305         int currentFrame = (player->getCurrentFrameNum());
306
307         int nextMark = myRec->getNextMark(currentFrame);
308
309         if (nextMark)
310         {
311           logger->log("VVideoRec", Log::NOTICE, "jump forward from pos %i to mark at %i",currentFrame,nextMark);
312           player->jumpToMark(nextMark);
313         }
314         doBar(3);
315       }
316       else
317       {
318         doBar(1);
319         player->skipForward(10);
320       }
321       return 2;
322     }
323     case Remote::STAR:
324     {
325       doBar(2);
326       player->skipBackward(10);
327       return 2;
328     }
329     case Remote::HASH:
330     {
331       doBar(1);
332       player->skipForward(10);
333       return 2;
334     }
335     case Remote::FULL:
336     case Remote::TV:
337     {
338       toggleChopSides();
339       return 2;
340     }
341
342     case Remote::OK:
343     {
344       if (vsummary)
345       {
346         removeSummary();
347         return 2;
348       }
349       
350       if (barShowing) removeBar();
351       else doBar(0);
352       return 2;
353     }
354
355     case Remote::ZERO:  player->jumpToPercent(0);  doBar(0);  return 2;
356     case Remote::ONE:   player->jumpToPercent(10); doBar(0);  return 2;
357     case Remote::TWO:   player->jumpToPercent(20); doBar(0);  return 2;
358     case Remote::THREE: player->jumpToPercent(30); doBar(0);  return 2;
359     case Remote::FOUR:  player->jumpToPercent(40); doBar(0);  return 2;
360     case Remote::FIVE:  player->jumpToPercent(50); doBar(0);  return 2;
361     case Remote::SIX:   player->jumpToPercent(60); doBar(0);  return 2;
362     case Remote::SEVEN: player->jumpToPercent(70); doBar(0);  return 2;
363     case Remote::EIGHT: player->jumpToPercent(80); doBar(0);  return 2;
364     case Remote::NINE:  player->jumpToPercent(90); doBar(0);  return 2;
365
366 #ifdef DEV
367 //    case Remote::RED:
368 //    {
369       //Don't use RED for anything. It will eventually be recording summary
370
371       //player->test1();
372
373
374       /*
375       // for testing EPG in NTSC with a NTSC test video
376       Video::getInstance()->setMode(Video::QUARTER);
377       Video::getInstance()->setPosition(170, 5);
378       VEpg* vepg = new VEpg(NULL, 0);
379       vepg->draw();
380       BoxStack::getInstance()->add(vepg);
381       BoxStack::getInstance()->update(vepg);
382       */
383
384 //      return 2;
385 //    }
386
387 #endif
388
389   }
390
391   return 1;
392 }
393
394 void VVideoRec::processMessage(Message* m)
395 {
396   Log::getInstance()->log("VVideoRec", Log::DEBUG, "Message received");
397
398   if (m->message == Message::MOUSE_LBDOWN)
399   {
400     UINT x = (m->parameter>>16) - getScreenX();
401     UINT y = (m->parameter&0xFFFF) - getScreenY();
402
403     if (!barShowing)
404     {
405       BoxStack::getInstance()->handleCommand(Remote::OK); //simulate rok press
406     }
407     else if (barRegion.x<=x && barRegion.y<=y && (barRegion.x+barRegion.w)>=x && (barRegion.y+barRegion.h)>=y)
408     {
409       int progBarXbase = barRegion.x + 300;
410       if (myRec->hasMarks())
411       {
412         MarkList* markList = myRec->getMarkList();
413         MarkList::iterator i;
414         Mark* loopMark = NULL;
415         int posPix;
416         ULONG lengthFrames;
417         if (myRec->recInfo->timerEnd > time(NULL))
418         {
419           // chasing playback
420           // Work out an approximate length in frames (good to 1s...)
421           lengthFrames = (myRec->recInfo->timerEnd - myRec->recInfo->timerStart) * video->getFPS();
422         }
423         else
424         {
425           lengthFrames = player->getLengthFrames();
426         }
427         for(i = markList->begin(); i != markList->end(); i++)
428         {
429           loopMark = *i;
430           if (loopMark->pos)
431           {
432             posPix = 302 * loopMark->pos / lengthFrames;
433             rectangle(barRegion.x + progBarXbase + 2 + posPix, barRegion.y + 12 - 2, 3, 28, Colour::DANGER);
434             if (x>=barRegion.x + progBarXbase + 2 + posPix
435                 && x<=barRegion.x + progBarXbase + 2 + posPix+3
436                 && y>=barRegion.y + 12 - 2
437                 && y<=barRegion.y + 12 - 2+28)
438             {
439               player->jumpToMark(loopMark->pos);
440               doBar(3);
441               return;
442             }
443           }
444         }
445       }
446
447       if (x>=barRegion.x + progBarXbase + 24
448           && x<=barRegion.x + progBarXbase + 4 + 302
449           && y>=barRegion.y + 12 - 2
450           && y<=barRegion.y + 12 - 2+28)
451       {
452         int cx=x-(barRegion.x + progBarXbase + 4);
453         double percent=((double)cx)/302.*100.;
454         player->jumpToPercent(percent);
455         doBar(3);
456         return;
457         //  int progressWidth = 302 * currentFrameNum / lengthFrames;
458         //  rectangle(barRegion.x + progBarXbase + 4, barRegion.y + 16, progressWidth, 16, Colour::SELECTHIGHLIGHT);
459       }
460     }
461     else
462     {
463       BoxStack::getInstance()->handleCommand(Remote::OK); //simulate rok press
464     }
465   }
466   else if (m->from == player)
467   {
468     if (m->message != Message::PLAYER_EVENT) return;
469     switch(m->parameter)
470     {
471       case Player::CONNECTION_LOST: // connection lost detected
472       {
473         // I can't handle this, send it to command
474         Message* m2 = new Message();
475         m2->to = Command::getInstance();
476         m2->message = Message::CONNECTION_LOST;
477         Command::getInstance()->postMessageNoLock(m2);
478         break;
479       }
480       case Player::STOP_PLAYBACK:
481       {
482         // FIXME Obselete ish - improve this
483         Message* m2 = new Message(); // Must be done after this thread finishes, and must break into master mutex
484         m2->to = Command::getInstance();
485         m2->message = Message::STOP_PLAYBACK;
486         Command::getInstance()->postMessageNoLock(m2);
487         break;
488       }
489       case Player::ASPECT43:
490       {
491         if (dowss)
492         {
493           Log::getInstance()->log("VVideoRec", Log::DEBUG, "Received do WSS 43");
494           wss.setWide(false);
495           wss.draw();
496           boxstack->update(this, &wssRegion);
497         }
498         break;
499       }
500       case Player::ASPECT169:
501       {
502         if (dowss)
503         {
504           Log::getInstance()->log("VVideoRec", Log::DEBUG, "Received do WSS 169");
505           wss.setWide(true);
506           wss.draw();
507           boxstack->update(this, &wssRegion);
508         }
509         break;
510       }
511     }
512   }
513   else if (m->message == Message::AUDIO_CHANGE_CHANNEL)
514   {
515     Log::getInstance()->log("VVideoRec", Log::DEBUG, "Received change audio channel to %i", m->parameter);
516     player->setAudioChannel(m->parameter);
517   }
518   else if (m->message == Message::CHILD_CLOSE)
519   {
520     if (m->from == vas)
521     {
522       vas = NULL;
523       barVasHold = false;
524       if (!barGenHold && !barScanHold && !barVasHold) removeBar();
525     }
526   }
527 }
528
529 void VVideoRec::stopPlay()
530 {
531   Log::getInstance()->log("VVideoRec", Log::DEBUG, "Pre stopPlay");
532
533   // FIXME work out a better soln for this
534   // Fix a problem to do with thread sync here
535   // because the bar gets a timer every 0.2s and it seems to take up to 0.1s,
536   // (or maybe just the wrong thread being selected?) for the main loop to lock and process
537   // the video stop message it is possible for a bar message to stack up after a stop message
538   // when the bar message is finally processed the prog crashes because this is deleted by then
539   removeBar();
540   //
541
542   player->stop();
543   vdr->stopStreaming();
544   delete player;
545
546   playing = false;
547
548   if (!vdr->isConnected()) { Command::getInstance()->connectionLost(); return; }
549   Log::getInstance()->log("VVideoRec", Log::DEBUG, "Post stopPlay");
550 }
551
552 void VVideoRec::toggleChopSides()
553 {
554   if (video->getTVsize() == Video::ASPECT16X9) return; // Means nothing for 16:9 TVs
555
556   if (videoMode == Video::NORMAL)
557   {
558     videoMode = Video::LETTERBOX;
559     video->setMode(Video::LETTERBOX);
560   }
561   else
562   {
563     videoMode = Video::NORMAL;
564     video->setMode(Video::NORMAL);
565   }
566 }
567
568 void VVideoRec::doAudioSelector()
569 {
570   bool* availableMpegAudioChannels = player->getDemuxerMpegAudioChannels();
571   bool* availableAc3AudioChannels = 0;
572   int currentAudioChannel = player->getCurrentAudioChannel();
573   if (Audio::getInstance()->supportsAc3())
574   {
575       availableAc3AudioChannels = player->getDemuxerAc3AudioChannels();
576   }
577
578   vas = new VAudioSelector(this, availableMpegAudioChannels, availableAc3AudioChannels, currentAudioChannel, myRec->recInfo);
579   vas->setBackgroundColour(barBlue);
580   vas->setPosition(0, barRegion.y - 120);
581
582 // pal 62, ntsc 57
583
584   barVasHold = true;
585   doBar(0);
586
587   vas->draw();
588   boxstack->add(vas);
589   boxstack->update(vas);
590 }
591
592 void VVideoRec::doBar(int action)
593 {
594   barShowing = true;
595
596   rectangle(barRegion, barBlue);
597
598   /* Work out what to display - choices:
599
600   Playing  >
601   Paused   ||
602   FFwd     >>
603   FBwd     <<
604
605   Specials, informed by parameter
606
607   Skip forward 10s    >|
608   Skip backward 10s   |<
609   Skip forward 1m     >>|
610   Skip backward 1m    |<<
611
612   */
613
614   WSymbol w;
615   TEMPADD(&w);
616   w.nextSymbol = 0;
617   w.setPosition(barRegion.x + 66, barRegion.y + 16);
618
619   UCHAR playerState = 0;
620
621   if (action)
622   {
623     if (action == 1)       w.nextSymbol = WSymbol::SKIPFORWARD;
624     else if (action == 2)  w.nextSymbol = WSymbol::SKIPBACK;
625     else if (action == 3)  w.nextSymbol = WSymbol::SKIPFORWARD2;
626     else if (action == 4)  w.nextSymbol = WSymbol::SKIPBACK2;
627   }
628   else
629   {
630     playerState = player->getState();
631     if (playerState == Player::S_PAUSE_P)      w.nextSymbol = WSymbol::PAUSE;
632     else if (playerState == Player::S_PAUSE_I) w.nextSymbol = WSymbol::PAUSE;
633     else if (playerState == Player::S_FFWD)    w.nextSymbol = WSymbol::FFWD;
634     else if (playerState == Player::S_FBWD)    w.nextSymbol = WSymbol::FBWD;
635     else                                       w.nextSymbol = WSymbol::PLAY;
636   }
637
638   w.draw();
639
640   if ((playerState == Player::S_FFWD) || (playerState == Player::S_FBWD))
641   {
642     // draw blips to show how fast the scan is
643     UCHAR scanrate = player->getIScanRate();
644     if (scanrate >= 2)
645     {
646       char text[5];
647       SNPRINTF(text, 5, "%ux", scanrate);
648       drawText(text, barRegion.x + 102, barRegion.y + 12, Colour::LIGHTTEXT);
649     }
650   }
651
652   drawBarClocks();
653
654   boxstack->update(this, &barRegion);
655
656   timers->cancelTimer(this, 1);
657
658
659   if ((playerState == Player::S_FFWD) || (playerState == Player::S_FBWD)) barScanHold = true;
660   else barScanHold = false;
661
662   if (!barGenHold && !barScanHold && !barVasHold) timers->setTimerD(this, 1, 4);
663
664   timers->setTimerD(this, 2, 0, 200000000);
665 }
666
667 void VVideoRec::timercall(int clientReference)
668 {
669   switch(clientReference)
670   {
671     case 1:
672     {
673       // Remove bar
674       removeBar();
675       break;
676     }
677     case 2:
678     {
679       // Update clock
680       if (!barShowing) break;
681       drawBarClocks();
682       Message* m = new Message();
683       m->message = Message::REDRAW;
684       m->to = BoxStack::getInstance();
685       m->from = this;
686       m->parameter = (ULONG)&barRegion;
687       Command::getInstance()->postMessageFromOuterSpace(m);
688       timers->setTimerD(this, 2, 0, 200000000);
689       break;
690     }
691   }
692 }
693
694 void VVideoRec::drawBarClocks()
695 {
696   if (barScanHold)
697   {
698     UCHAR playerState = player->getState();
699     // sticky bar is set if we are in ffwd/fbwd mode
700     // if player has gone to S_PLAY then kill stickyBar, and run doBar(0) which
701     // will repaint all the bar (it will call this function again, but
702     // this section won't run because stickyBarF will then == false)
703
704     if ((playerState != Player::S_FFWD) && (playerState != Player::S_FBWD))
705     {
706       barScanHold = false;
707       doBar(0);
708       return; // doBar will call this function and do the rest
709     }
710   }
711
712   Log* logger = Log::getInstance();
713   logger->log("VVideoRec", Log::DEBUG, "Draw bar clocks");
714
715   // Draw RTC
716   // Blank the area first
717   rectangle(barRegion.x + 624, barRegion.y + 12, 60, 30, barBlue);
718   char timeString[20];
719   time_t t;
720   time(&t);
721   struct tm* tms = localtime(&t);
722   strftime(timeString, 19, "%H:%M", tms);
723   drawText(timeString, barRegion.x + 624, barRegion.y + 12, Colour::LIGHTTEXT);
724
725   // Draw clocks
726
727   rectangle(clocksRegion, barBlue);
728
729   ULONG currentFrameNum = player->getCurrentFrameNum();
730   ULONG lengthFrames;
731   if (myRec->recInfo->timerEnd > time(NULL))
732   {
733     // chasing playback
734     // Work out an approximate length in frames (good to 1s...)
735     lengthFrames = (myRec->recInfo->timerEnd - myRec->recInfo->timerStart) * video->getFPS();
736   }
737   else
738   {
739     lengthFrames = player->getLengthFrames();
740   }
741
742   hmsf currentFrameHMSF = video->framesToHMSF(currentFrameNum);
743   hmsf lengthHMSF = video->framesToHMSF(lengthFrames);
744
745   char buffer[100];
746   if (currentFrameNum >= lengthFrames)
747   {
748     strcpy(buffer, "-:--:-- / -:--:--");
749   }
750   else
751   {
752     SNPRINTF(buffer, 99, "%01i:%02i:%02i / %01i:%02i:%02i", currentFrameHMSF.hours, currentFrameHMSF.minutes, currentFrameHMSF.seconds, lengthHMSF.hours, lengthHMSF.minutes, lengthHMSF.seconds);
753     logger->log("VVideoRec", Log::DEBUG, buffer);
754   }
755
756   drawText(buffer, clocksRegion.x, clocksRegion.y, Colour::LIGHTTEXT);
757
758
759
760
761
762
763
764   // Draw progress bar
765   int progBarXbase = barRegion.x + 300;
766
767   rectangle(barRegion.x + progBarXbase, barRegion.y + 12, 310, 24, Colour::LIGHTTEXT);
768   rectangle(barRegion.x + progBarXbase + 2, barRegion.y + 14, 306, 20, barBlue);
769
770   if (currentFrameNum > lengthFrames) return;
771   if (lengthFrames == 0) return;
772
773   // Draw yellow portion
774   int progressWidth = 302 * currentFrameNum / lengthFrames;
775   rectangle(barRegion.x + progBarXbase + 4, barRegion.y + 16, progressWidth, 16, Colour::SELECTHIGHLIGHT);
776
777   if (myRec->recInfo->timerEnd > time(NULL)) // if chasing
778   {
779     int nrWidth = (int)(302 * ((double)(lengthFrames - player->getLengthFrames()) / lengthFrames));
780
781     Log::getInstance()->log("GVASDF", Log::DEBUG, "Length Frames: %lu", lengthFrames);
782     Log::getInstance()->log("GVASDF", Log::DEBUG, "Player lf: %lu", player->getLengthFrames());
783     Log::getInstance()->log("GVASDF", Log::DEBUG, "NR WDITH: %i", nrWidth);
784     rectangle(barRegion.x + progBarXbase + 4 + 302 - nrWidth, barRegion.y + 16, nrWidth, 16, Colour::RED);
785   }
786
787   int posPix;
788   // Now calc position for blips
789
790   if (myRec->hasMarks())
791   {
792     // Draw blips where there are cut marks
793     MarkList* markList = myRec->getMarkList();
794     MarkList::iterator i;
795     Mark* loopMark = NULL;
796
797     for(i = markList->begin(); i != markList->end(); i++)
798     {
799       loopMark = *i;
800       if (loopMark->pos)
801       {
802         logger->log("VVideoRec", Log::DEBUG, "Drawing mark at frame %i", loopMark->pos);
803         posPix = 302 * loopMark->pos / lengthFrames;
804         rectangle(barRegion.x + progBarXbase + 2 + posPix, barRegion.y + 12 - 2, 3, 28, Colour::DANGER);
805       }
806     }
807   }
808   else
809   {
810     // Draw blips where start and end margins probably are
811
812     posPix = 302 * startMargin * video->getFPS() / lengthFrames;
813
814     rectangle(barRegion.x + progBarXbase + 2 + posPix, barRegion.y + 12 - 2, 2, 2, Colour::LIGHTTEXT);
815     rectangle(barRegion.x + progBarXbase + 2 + posPix, barRegion.y + 12 + 24, 2, 2, Colour::LIGHTTEXT);
816
817     posPix = 302 * (lengthFrames - endMargin * video->getFPS()) / lengthFrames;
818
819     rectangle(barRegion.x + progBarXbase + 2 + posPix, barRegion.y + 12 - 2, 2, 2, Colour::LIGHTTEXT);
820     rectangle(barRegion.x + progBarXbase + 2 + posPix, barRegion.y + 12 + 24, 2, 2, Colour::LIGHTTEXT);
821   }
822 }
823
824 void VVideoRec::removeBar()
825 {
826   if (!barShowing) return;
827   timers->cancelTimer(this, 2);
828   barShowing = false;
829   barGenHold = false;
830   barScanHold = false;
831   barVasHold = false;
832   rectangle(barRegion, transparent);
833
834   Message* m = new Message();
835   m->message = Message::REDRAW;
836   m->to = BoxStack::getInstance();
837   m->from = this;
838   m->parameter = (ULONG)&barRegion;
839   Command::getInstance()->postMessageFromOuterSpace(m);
840 }
841
842 void VVideoRec::doSummary()
843 {
844   vsummary = new VInfo();
845   vsummary->setTitleText(myRec->getProgName());
846   vsummary->setBorderOn(1);
847   vsummary->setExitable();
848   if (myRec->recInfo->summary) vsummary->setMainText(myRec->recInfo->summary);
849   else vsummary->setMainText(tr("Summary unavailable"));
850   if (Video::getInstance()->getFormat() == Video::PAL)
851   {
852     vsummary->setPosition(120, 130);
853   }
854   else
855   {
856     vsummary->setPosition(110, 90);
857   }
858   vsummary->setSize(510, 270);
859   add(vsummary);
860   vsummary->draw();
861
862   BoxStack::getInstance()->update(this);
863 }
864
865 void VVideoRec::removeSummary()
866 {
867   if (vsummary)
868   {
869     remove(vsummary);
870     delete vsummary;
871     vsummary = NULL;
872     draw();
873     BoxStack::getInstance()->update(this);
874   }
875 }
876