OSDN Git Service

62102c2436b16d1cb3d8648e05f2f32b6e59ef6d
[handbrake-jp/handbrake-jp-git.git] / libhb / reader.c
1 /* $Id: reader.c,v 1.21 2005/11/25 15:05:25 titer Exp $
2
3    This file is part of the HandBrake source code.
4    Homepage: <http://handbrake.fr/>.
5    It may be used under the terms of the GNU General Public License. */
6
7 #include "hb.h"
8
9 typedef struct
10 {
11     int64_t last;   // last timestamp seen on this stream
12     double average; // average time between packets
13     int id;         // stream id
14 } stream_timing_t;
15
16 typedef struct
17 {
18     hb_job_t     * job;
19     hb_title_t   * title;
20     volatile int * die;
21
22     hb_dvd_t     * dvd;
23     hb_stream_t  * stream;
24
25     stream_timing_t *stream_timing;
26     int64_t        scr_offset;
27     hb_psdemux_t   demux;
28     int            scr_changes;
29     uint           sequence;
30     int            saw_video;
31     int            st_slots;            // size (in slots) of stream_timing array
32 } hb_reader_t;
33
34 /***********************************************************************
35  * Local prototypes
36  **********************************************************************/
37 static void        ReaderFunc( void * );
38 static hb_fifo_t ** GetFifoForId( hb_job_t * job, int id );
39
40 /***********************************************************************
41  * hb_reader_init
42  ***********************************************************************
43  *
44  **********************************************************************/
45 hb_thread_t * hb_reader_init( hb_job_t * job )
46 {
47     hb_reader_t * r;
48
49     r = calloc( sizeof( hb_reader_t ), 1 );
50
51     r->job   = job;
52     r->title = job->title;
53     r->die   = job->die;
54     r->sequence = 0;
55
56     r->st_slots = 4;
57     r->stream_timing = calloc( sizeof(stream_timing_t), r->st_slots );
58     r->stream_timing[0].id = r->title->video_id;
59     r->stream_timing[0].average = 90000. * (double)job->vrate_base /
60                                            (double)job->vrate;
61     r->stream_timing[0].last = -r->stream_timing[0].average;
62     r->stream_timing[1].id = -1;
63
64     return hb_thread_init( "reader", ReaderFunc, r,
65                            HB_NORMAL_PRIORITY );
66 }
67
68 static void push_buf( const hb_reader_t *r, hb_fifo_t *fifo, hb_buffer_t *buf )
69 {
70     while( !*r->die && !r->job->done && hb_fifo_is_full( fifo ) )
71     {
72         /*
73          * Loop until the incoming fifo is ready to receive
74          * this buffer.
75          */
76         hb_snooze( 50 );
77     }
78     hb_fifo_push( fifo, buf );
79 }
80
81 // The MPEG STD (Standard Target Decoder) essentially requires that we keep
82 // per-stream timing so that when there's a timing discontinuity we can
83 // seemlessly join packets on either side of the discontinuity. This join
84 // requires that we know the timestamp of the previous packet and the
85 // average inter-packet time (since we position the new packet at the end
86 // of the previous packet). The next four routines keep track of this
87 // per-stream timing.
88
89 // find the per-stream timing state for 'buf'
90
91 static stream_timing_t *find_st( hb_reader_t *r, const hb_buffer_t *buf )
92 {
93     stream_timing_t *st = r->stream_timing;
94     for ( ; st->id != -1; ++st )
95     {
96         if ( st->id == buf->id )
97             return st;
98     }
99     return NULL;
100 }
101
102 // find or create the per-stream timing state for 'buf'
103
104 static stream_timing_t *id_to_st( hb_reader_t *r, const hb_buffer_t *buf )
105 {
106     stream_timing_t *st = r->stream_timing;
107     while ( st->id != buf->id && st->id != -1)
108     {
109         ++st;
110     }
111     // if we haven't seen this stream add it.
112     if ( st->id == -1 )
113     {
114         // we keep the steam timing info in an array with some power-of-two
115         // number of slots. If we don't have two slots left (one for our new
116         // entry plus one for the "-1" eol) we need to expand the array.
117         int slot = st - r->stream_timing;
118         if ( slot + 1 >= r->st_slots )
119         {
120             r->st_slots *= 2;
121             r->stream_timing = realloc( r->stream_timing, r->st_slots *
122                                         sizeof(*r->stream_timing) );
123             st = r->stream_timing + slot;
124         }
125         st->id = buf->id;
126         st->average = 30.*90.;
127         st->last = buf->renderOffset - st->average;
128
129         st[1].id = -1;
130     }
131     return st;
132 }
133
134 // update the average inter-packet time of the stream associated with 'buf'
135 // using a recursive low-pass filter with a 16 packet time constant.
136
137 static void update_ipt( hb_reader_t *r, const hb_buffer_t *buf )
138 {
139     stream_timing_t *st = id_to_st( r, buf );
140     double dt = buf->renderOffset - st->last;
141     st->average += ( dt - st->average ) * (1./16.);
142     st->last = buf->renderOffset;
143 }
144
145 // use the per-stream state associated with 'buf' to compute a new scr_offset
146 // such that 'buf' will follow the previous packet of this stream separated
147 // by the average packet time of the stream.
148
149 static void new_scr_offset( hb_reader_t *r, hb_buffer_t *buf )
150 {
151     stream_timing_t *st = id_to_st( r, buf );
152     int64_t nxt = st->last + st->average;
153     r->scr_offset = buf->renderOffset - nxt;
154     buf->renderOffset = nxt;
155     r->scr_changes = r->demux.scr_changes;
156     st->last = buf->renderOffset;
157 }
158
159 /***********************************************************************
160  * ReaderFunc
161  ***********************************************************************
162  *
163  **********************************************************************/
164 static void ReaderFunc( void * _r )
165 {
166     hb_reader_t  * r = _r;
167     hb_fifo_t   ** fifos;
168     hb_buffer_t  * buf;
169     hb_list_t    * list;
170     int            n;
171     int            chapter = -1;
172     int            chapter_end = r->job->chapter_end;
173
174     if( !( r->dvd = hb_dvd_init( r->title->dvd ) ) )
175     {
176         if ( !( r->stream = hb_stream_open( r->title->dvd, r->title ) ) )
177         {
178           return;
179         }
180     }
181
182     if (r->dvd)
183     {
184       /*
185        * XXX this code is a temporary hack that should go away if/when
186        *     chapter merging goes away in libhb/dvd.c
187        * map the start and end chapter numbers to on-media chapter
188        * numbers since chapter merging could cause the handbrake numbers
189        * to diverge from the media numbers and, if our chapter_end is after
190        * a media chapter that got merged, we'll stop ripping too early.
191        */
192       int start = r->job->chapter_start;
193       hb_chapter_t * chap = hb_list_item( r->title->list_chapter, chapter_end - 1 );
194
195       chapter_end = chap->index;
196       if (start > 1)
197       {
198          chap = hb_list_item( r->title->list_chapter, start - 1 );
199          start = chap->index;
200       }
201       /* end chapter mapping XXX */
202
203       if( !hb_dvd_start( r->dvd, r->title->index, start ) )
204       {
205           hb_dvd_close( &r->dvd );
206           return;
207       }
208     }
209
210     list  = hb_list_init();
211     hb_buffer_t *ps = hb_buffer_init( HB_DVD_READ_BUFFER_SIZE );
212     r->demux.flaky_clock = r->title->flaky_clock;
213
214     while( !*r->die && !r->job->done )
215     {
216         if (r->dvd)
217           chapter = hb_dvd_chapter( r->dvd );
218         else if (r->stream)
219           chapter = 1;
220
221         if( chapter < 0 )
222         {
223             hb_log( "reader: end of the title reached" );
224             break;
225         }
226         if( chapter > chapter_end )
227         {
228             hb_log( "reader: end of chapter %d (media %d) reached at media chapter %d",
229                     r->job->chapter_end, chapter_end, chapter );
230             break;
231         }
232
233         if (r->dvd)
234         {
235           if( !hb_dvd_read( r->dvd, ps ) )
236           {
237               break;
238           }
239         }
240         else if (r->stream)
241         {
242           if ( !hb_stream_read( r->stream, ps ) )
243           {
244             break;
245           }
246         }
247
248         if( r->job->indepth_scan )
249         {
250             /*
251              * Need to update the progress during a subtitle scan
252              */
253             hb_state_t state;
254
255 #define p state.param.working
256
257             state.state = HB_STATE_WORKING;
258             p.progress = (double)chapter / (double)r->job->chapter_end;
259             if( p.progress > 1.0 )
260             {
261                 p.progress = 1.0;
262             }
263             p.rate_avg = 0.0;
264             p.hours    = -1;
265             p.minutes  = -1;
266             p.seconds  = -1;
267             hb_set_state( r->job->h, &state );
268         }
269
270         if ( r->title->demuxer == HB_NULL_DEMUXER )
271         {
272             hb_demux_null( ps, list, &r->demux );
273         }
274         else
275         {
276             hb_demux_ps( ps, list, &r->demux );
277         }
278
279         while( ( buf = hb_list_item( list, 0 ) ) )
280         {
281             hb_list_rem( list, buf );
282             fifos = GetFifoForId( r->job, buf->id );
283
284             if ( ! r->saw_video )
285             {
286                 /* The first video packet defines 'time zero' so discard
287                    data until we get a video packet with a PTS & DTS */
288                 if ( buf->id == r->title->video_id && buf->start != -1 &&
289                      buf->renderOffset != -1 )
290                 {
291                     r->saw_video = 1;
292                     hb_log( "reader: first SCR %lld", r->demux.last_scr );
293                 }
294                 else
295                 {
296                     fifos = NULL;
297                 }
298             }
299             if( fifos )
300             {
301                 if ( buf->renderOffset != -1 )
302                 {
303                     if ( r->scr_changes == r->demux.scr_changes )
304                     {
305                         // This packet is referenced to the same SCR as the last.
306                         // Adjust timestamp to remove the System Clock Reference
307                         // offset then update the average inter-packet time
308                         // for this stream.
309                         buf->renderOffset -= r->scr_offset;
310                         update_ipt( r, buf );
311                     }
312                     else
313                     {
314                         // This is the first audio or video packet after an SCR
315                         // change. Compute a new scr offset that would make this
316                         // packet follow the last of this stream with the correct
317                         // average spacing.
318                         if ( find_st( r, buf ) )
319                         {
320                             new_scr_offset( r, buf );
321                         }
322                         else
323                         {
324                             // we got a new scr at the same time as the first
325                             // packet of a stream we've never seen before. We
326                             // have no idea what the timing should be so toss
327                             // this buffer & wait for a stream we've already seen.
328                             hb_buffer_close( &buf );
329                             continue;
330                         }
331                     }
332                 }
333                 if ( buf->start != -1 )
334                     buf->start -= r->scr_offset;
335
336                 buf->sequence = r->sequence++;
337                 /* if there are mutiple output fifos, send a copy of the
338                  * buffer down all but the first (we have to not ship the
339                  * original buffer or we'll race with the thread that's
340                  * consuming the buffer & inject garbage into the data stream). */
341                 for( n = 1; fifos[n] != NULL; n++)
342                 {
343                     hb_buffer_t *buf_copy = hb_buffer_init( buf->size );
344                     hb_buffer_copy_settings( buf_copy, buf );
345                     memcpy( buf_copy->data, buf->data, buf->size );
346                     push_buf( r, fifos[n], buf_copy );
347                 }
348                 push_buf( r, fifos[0], buf );
349             }
350             else
351             {
352                 hb_buffer_close( &buf );
353             }
354         }
355     }
356
357     // send empty buffers downstream to video & audio decoders to signal we're done.
358     push_buf( r, r->job->fifo_mpeg2, hb_buffer_init(0) );
359
360     hb_audio_t *audio;
361     for( n = 0; ( audio = hb_list_item( r->job->title->list_audio, n ) ); ++n )
362     {
363         if ( audio->priv.fifo_in )
364             push_buf( r, audio->priv.fifo_in, hb_buffer_init(0) );
365     }
366
367     hb_list_empty( &list );
368     hb_buffer_close( &ps );
369     if (r->dvd)
370     {
371         hb_dvd_stop( r->dvd );
372         hb_dvd_close( &r->dvd );
373     }
374     else if (r->stream)
375     {
376         hb_stream_close(&r->stream);
377     }
378
379     if ( r->stream_timing )
380     {
381         free( r->stream_timing );
382     }
383
384     hb_log( "reader: done. %d scr changes", r->demux.scr_changes );
385     if ( r->demux.dts_drops )
386     {
387         hb_log( "reader: %d drops because DTS out of range", r->demux.dts_drops );
388     }
389
390     free( r );
391     _r = NULL;
392 }
393
394 /***********************************************************************
395  * GetFifoForId
396  ***********************************************************************
397  *
398  **********************************************************************/
399 static hb_fifo_t ** GetFifoForId( hb_job_t * job, int id )
400 {
401     hb_title_t    * title = job->title;
402     hb_audio_t    * audio;
403     hb_subtitle_t * subtitle;
404     int             i, n;
405     static hb_fifo_t * fifos[8];
406
407     memset(fifos, 0, sizeof(fifos));
408
409     if( id == title->video_id )
410     {
411         if( job->indepth_scan )
412         {
413             /*
414              * Ditch the video here during the indepth scan until
415              * we can improve the MPEG2 decode performance.
416              */
417             return NULL;
418         }
419         else
420         {
421             fifos[0] = job->fifo_mpeg2;
422             return fifos;
423         }
424     }
425
426     if( job->indepth_scan ) {
427         /*
428          * Count the occurances of the subtitles, don't actually
429          * return any to encode unless we are looking fro forced
430          * subtitles in which case we need to look in the sub picture
431          * to see if it has the forced flag enabled.
432          */
433         for (i=0; i < hb_list_count(title->list_subtitle); i++) {
434             subtitle =  hb_list_item( title->list_subtitle, i);
435             if (id == subtitle->id) {
436                 /*
437                  * A hit, count it.
438                  */
439                 subtitle->hits++;
440                 if( job->subtitle_force )
441                 {
442
443                     fifos[0] = subtitle->fifo_in;
444                     return fifos;
445                 }
446                 break;
447             }
448         }
449     } else {
450         if( ( subtitle = hb_list_item( title->list_subtitle, 0 ) ) &&
451             id == subtitle->id )
452         {
453             fifos[0] = subtitle->fifo_in;
454             return fifos;
455         }
456     }
457     if( !job->indepth_scan )
458     {
459         n = 0;
460         for( i = 0; i < hb_list_count( title->list_audio ); i++ )
461         {
462             audio = hb_list_item( title->list_audio, i );
463             if( id == audio->id )
464             {
465                 fifos[n++] = audio->priv.fifo_in;
466             }
467         }
468
469         if( n != 0 )
470         {
471             return fifos;
472         }
473     }
474
475     return NULL;
476 }
477