?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
playlist: do case ignoring cmp everywhere when sorting
[vlc.git] / modules / demux / ps.h
bloba15daad3cc010dfd970734c5fa79fb746191598d
1 /*****************************************************************************
2 * ps.h: Program Stream demuxer helper
3 *****************************************************************************
4 * Copyright (C) 2004 the VideoLAN team
5 * $Id$
6 *
7 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22 *****************************************************************************/
23
24 #include <vlc_demux.h>
25 #include <assert.h>
26
27 /* 256-0xC0 for normal stream, 256 for 0xbd stream, 256 for 0xfd stream */
28 #define PS_TK_COUNT (768 - 0xc0)
29 #define PS_ID_TO_TK( id ) ((id) <= 0xff ? (id) - 0xc0 : \
30 ((id)&0xff) + (((id)&0xff00) == 0xbd00 ? 256-0xC0 : 512-0xc0) )
31
32 typedef struct ps_psm_t ps_psm_t;
33 static inline int ps_id_to_type( const ps_psm_t *, int );
34 static inline const uint8_t *ps_id_to_lang( const ps_psm_t *, int );
35
36 typedef struct
37 {
38 bool b_seen;
39 int i_skip;
40 int i_id;
41 es_out_id_t *es;
42 es_format_t fmt;
43 mtime_t i_first_pts;
44 mtime_t i_last_pts;
45
46 } ps_track_t;
47
48 /* Init a set of track */
49 static inline void ps_track_init( ps_track_t tk[PS_TK_COUNT] )
50 {
51 int i;
52 for( i = 0; i < PS_TK_COUNT; i++ )
53 {
54 tk[i].b_seen = false;
55 tk[i].i_skip = 0;
56 tk[i].i_id = 0;
57 tk[i].es = NULL;
58 tk[i].i_first_pts = -1;
59 tk[i].i_last_pts = -1;
60 es_format_Init( &tk[i].fmt, UNKNOWN_ES, 0 );
61 }
62 }
63
64 /* From id fill i_skip and es_format_t */
65 static inline int ps_track_fill( ps_track_t *tk, ps_psm_t *p_psm, int i_id )
66 {
67 tk->i_skip = 0;
68 tk->i_id = i_id;
69 if( ( i_id&0xff00 ) == 0xbd00 )
70 {
71 if( ( i_id&0xf8 ) == 0x88 || (i_id&0xf8) == 0x98 )
72 {
73 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('d','t','s',' ') );
74 tk->i_skip = 4;
75 }
76 else if( ( i_id&0xf0 ) == 0x80
77 || (i_id&0xf0) == 0xc0 ) /* AC-3, Can also be used for DD+/E-AC-3 */
78 {
79 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('a','5','2',' ') );
80 tk->i_skip = 4;
81 }
82 else if( (i_id&0xf0) == 0xb0 )
83 {
84 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','l','p',' ') );
85 /* FIXME / untested ... no known decoder (at least not in VLC/ffmpeg) */
86 }
87 else if( ( i_id&0xe0 ) == 0x20 )
88 {
89 es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('s','p','u',' ') );
90 tk->i_skip = 1;
91 }
92 else if( ( i_id&0xf0 ) == 0xa0 )
93 {
94 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('l','p','c','m') );
95 tk->i_skip = 1;
96 }
97 else if( ( i_id&0xff ) == 0x70 )
98 {
99 es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('o','g','t',' ') );
100 }
101 else if( ( i_id&0xfc ) == 0x00 )
102 {
103 es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('c','v','d',' ') );
104 }
105 else if( ( i_id&0xff ) == 0x10 )
106 {
107 es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('t','e','l','x') );
108 }
109 else
110 {
111 es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
112 return VLC_EGENERIC;
113 }
114 }
115 else if( (i_id&0xff00) == 0xfd00 )
116 {
117 uint8_t i_sub_id = i_id & 0xff;
118 if( i_sub_id >= 0x55 && i_sub_id <= 0x5f )
119 {
120 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('W','V','C','1') );
121 }
122 else
123 {
124 es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
125 return VLC_EGENERIC;
126 }
127 }
128 else
129 {
130 int i_type = ps_id_to_type( p_psm , i_id );
131
132 es_format_Init( &tk->fmt, UNKNOWN_ES, 0 );
133
134 if( (i_id&0xf0) == 0xe0 && i_type == 0x1b )
135 {
136 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('h','2','6','4') );
137 }
138 else if( (i_id&0xf0) == 0xe0 && i_type == 0x10 )
139 {
140 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','4','v') );
141 }
142 else if( (i_id&0xf0) == 0xe0 && i_type == 0x02 )
143 {
144 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','g','v') );
145 }
146 else if( ( i_id&0xe0 ) == 0xc0 && i_type == 0x0f )
147 {
148 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','4','a') );
149 }
150 else if( ( i_id&0xe0 ) == 0xc0 && i_type == 0x03 )
151 {
152 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','g','a') );
153 }
154
155 if( tk->fmt.i_cat == UNKNOWN_ES && ( i_id&0xf0 ) == 0xe0 )
156 {
157 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('m','p','g','v') );
158 }
159 else if( tk->fmt.i_cat == UNKNOWN_ES && ( i_id&0xe0 ) == 0xc0 )
160 {
161 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('m','p','g','a') );
162 }
163 else if( tk->fmt.i_cat == UNKNOWN_ES ) return VLC_EGENERIC;
164 }
165
166 /* PES packets usually contain truncated frames */
167 tk->fmt.b_packetized = false;
168
169 if( ps_id_to_lang( p_psm, i_id ) )
170 {
171 tk->fmt.psz_language = malloc( 4 );
172 if( tk->fmt.psz_language )
173 {
174 memcpy( tk->fmt.psz_language, ps_id_to_lang( p_psm , i_id ), 3 );
175 tk->fmt.psz_language[3] = 0;
176 }
177 }
178
179 return VLC_SUCCESS;
180 }
181
182 /* return the id of a PES (should be valid) */
183 static inline int ps_pkt_id( block_t *p_pkt )
184 {
185 if( p_pkt->p_buffer[3] == 0xbd &&
186 p_pkt->i_buffer >= 9 &&
187 p_pkt->i_buffer >= 9 + (size_t)p_pkt->p_buffer[8] )
188 {
189 /* VOB extension */
190 return 0xbd00 | p_pkt->p_buffer[9+p_pkt->p_buffer[8]];
191 }
192 else if( p_pkt->p_buffer[3] == 0xfd &&
193 p_pkt->i_buffer >= 9 &&
194 (p_pkt->p_buffer[6]&0xC0) == 0x80 && /* mpeg2 */
195 (p_pkt->p_buffer[7]&0x01) == 0x01 ) /* extension_flag */
196 {
197 /* ISO 13818 amendment 2 and SMPTE RP 227 */
198 const uint8_t i_flags = p_pkt->p_buffer[7];
199 unsigned int i_skip = 9;
200
201 /* Find PES extension */
202 if( (i_flags & 0x80 ) )
203 {
204 i_skip += 5; /* pts */
205 if( (i_flags & 0x40) )
206 i_skip += 5; /* dts */
207 }
208 if( (i_flags & 0x20 ) )
209 i_skip += 6;
210 if( (i_flags & 0x10 ) )
211 i_skip += 3;
212 if( (i_flags & 0x08 ) )
213 i_skip += 1;
214 if( (i_flags & 0x04 ) )
215 i_skip += 1;
216 if( (i_flags & 0x02 ) )
217 i_skip += 2;
218
219 if( i_skip < p_pkt->i_buffer && (p_pkt->p_buffer[i_skip]&0x01) )
220 {
221 const uint8_t i_flags2 = p_pkt->p_buffer[i_skip];
222
223 /* Find PES extension 2 */
224 i_skip += 1;
225 if( i_flags2 & 0x80 )
226 i_skip += 16;
227 if( (i_flags2 & 0x40) && i_skip < p_pkt->i_buffer )
228 i_skip += 1 + p_pkt->p_buffer[i_skip];
229 if( i_flags2 & 0x20 )
230 i_skip += 2;
231 if( i_flags2 & 0x10 )
232 i_skip += 2;
233
234 if( i_skip + 1 < p_pkt->i_buffer )
235 {
236 const int i_extension_field_length = p_pkt->p_buffer[i_skip]&0x7f;
237 if( i_extension_field_length >=1 )
238 {
239 int i_stream_id_extension_flag = (p_pkt->p_buffer[i_skip+1] >> 7)&0x1;
240 if( i_stream_id_extension_flag == 0 )
241 return 0xfd00 | (p_pkt->p_buffer[i_skip+1]&0x7f);
242 }
243 }
244 }
245 }
246 return p_pkt->p_buffer[3];
247 }
248
249 /* return the size of the next packet
250 * You need to give him at least 14 bytes (and it need to start as a
251 * valid packet) It does not handle less than 6 bytes */
252 static inline int ps_pkt_size( const uint8_t *p, int i_peek )
253 {
254 assert( i_peek >= 6 );
255 if( p[3] == 0xb9 && i_peek >= 4 )
256 {
257 return 4;
258 }
259 else if( p[3] == 0xba )
260 {
261 if( (p[4] >> 6) == 0x01 && i_peek >= 14 )
262 {
263 return 14 + (p[13]&0x07);
264 }
265 else if( (p[4] >> 4) == 0x02 && i_peek >= 12 )
266 {
267 return 12;
268 }
269 return -1;
270 }
271 else if( i_peek >= 6 )
272 {
273 return 6 + ((p[4]<<8) | p[5] );
274 }
275 return -1;
276 }
277
278 /* parse a PACK PES */
279 static inline int ps_pkt_parse_pack( block_t *p_pkt, int64_t *pi_scr,
280 int *pi_mux_rate )
281 {
282 uint8_t *p = p_pkt->p_buffer;
283 if( p_pkt->i_buffer >= 14 && (p[4] >> 6) == 0x01 )
284 {
285 *pi_scr =((((int64_t)p[4]&0x38) << 27 )|
286 (((int64_t)p[4]&0x03) << 28 )|
287 ((int64_t)p[5] << 20 )|
288 (((int64_t)p[6]&0xf8) << 12 )|
289 (((int64_t)p[6]&0x03) << 13 )|
290 ((int64_t)p[7] << 5 )|
291 ((int64_t)p[8] >> 3 )) * 100 / 9;
292
293 *pi_mux_rate = ( p[10] << 14 )|( p[11] << 6 )|( p[12] >> 2);
294 }
295 else if( p_pkt->i_buffer >= 12 && (p[4] >> 4) == 0x02 )
296 {
297 *pi_scr =((((int64_t)p[4]&0x0e) << 29 )|
298 ((int64_t)p[5] << 22 )|
299 (((int64_t)p[6]&0xfe) << 14 )|
300 ((int64_t)p[7] << 7 )|
301 ((int64_t)p[8] >> 1 )) * 100 / 9;
302
303 *pi_mux_rate = ( ( p[9]&0x7f )<< 15 )|( p[10] << 7 )|( p[11] >> 1);
304 }
305 else
306 {
307 return VLC_EGENERIC;
308 }
309 return VLC_SUCCESS;
310 }
311
312 /* Parse a SYSTEM PES */
313 static inline int ps_pkt_parse_system( block_t *p_pkt, ps_psm_t *p_psm,
314 ps_track_t tk[PS_TK_COUNT] )
315 {
316 uint8_t *p = &p_pkt->p_buffer[6 + 3 + 1 + 1 + 1];
317
318 /* System header is not useable if it references private streams (0xBD)
319 * or 'all audio streams' (0xB8) or 'all video streams' (0xB9) */
320 while( p < &p_pkt->p_buffer[p_pkt->i_buffer] )
321 {
322 int i_id = p[0];
323
324 /* fprintf( stderr, " SYSTEM_START_CODEEE: id=0x%x\n", p[0] ); */
325 if( p[0] >= 0xBC || p[0] == 0xB8 || p[0] == 0xB9 ) p += 2;
326 p++;
327
328 if( i_id >= 0xc0 )
329 {
330 int i_tk = PS_ID_TO_TK( i_id );
331
332 if( !tk[i_tk].b_seen )
333 {
334 if( !ps_track_fill( &tk[i_tk], p_psm, i_id ) )
335 {
336 tk[i_tk].b_seen = true;
337 }
338 }
339 }
340 }
341 return VLC_SUCCESS;
342 }
343
344 /* Parse a PES (and skip i_skip_extra in the payload) */
345 static inline int ps_pkt_parse_pes( block_t *p_pes, int i_skip_extra )
346 {
347 uint8_t header[34];
348 unsigned int i_skip = 0;
349
350 memcpy( header, p_pes->p_buffer, __MIN( p_pes->i_buffer, 34 ) );
351
352 switch( header[3] )
353 {
354 case 0xBC: /* Program stream map */
355 case 0xBE: /* Padding */
356 case 0xBF: /* Private stream 2 */
357 case 0xB0: /* ECM */
358 case 0xB1: /* EMM */
359 case 0xFF: /* Program stream directory */
360 case 0xF2: /* DSMCC stream */
361 case 0xF8: /* ITU-T H.222.1 type E stream */
362 i_skip = 6;
363 break;
364
365 default:
366 if( ( header[6]&0xC0 ) == 0x80 )
367 {
368 /* mpeg2 PES */
369 i_skip = header[8] + 9;
370
371 if( header[7]&0x80 ) /* has pts */
372 {
373 p_pes->i_pts = ((mtime_t)(header[ 9]&0x0e ) << 29)|
374 (mtime_t)(header[10] << 22)|
375 ((mtime_t)(header[11]&0xfe) << 14)|
376 (mtime_t)(header[12] << 7)|
377 (mtime_t)(header[13] >> 1);
378
379 if( header[7]&0x40 ) /* has dts */
380 {
381 p_pes->i_dts = ((mtime_t)(header[14]&0x0e ) << 29)|
382 (mtime_t)(header[15] << 22)|
383 ((mtime_t)(header[16]&0xfe) << 14)|
384 (mtime_t)(header[17] << 7)|
385 (mtime_t)(header[18] >> 1);
386 }
387 }
388 }
389 else
390 {
391 i_skip = 6;
392 while( i_skip < 23 && header[i_skip] == 0xff )
393 {
394 i_skip++;
395 }
396 if( i_skip == 23 )
397 {
398 /* msg_Err( p_demux, "too much MPEG-1 stuffing" ); */
399 return VLC_EGENERIC;
400 }
401 if( ( header[i_skip] & 0xC0 ) == 0x40 )
402 {
403 i_skip += 2;
404 }
405
406 if( header[i_skip]&0x20 )
407 {
408 p_pes->i_pts = ((mtime_t)(header[i_skip]&0x0e ) << 29)|
409 (mtime_t)(header[i_skip+1] << 22)|
410 ((mtime_t)(header[i_skip+2]&0xfe) << 14)|
411 (mtime_t)(header[i_skip+3] << 7)|
412 (mtime_t)(header[i_skip+4] >> 1);
413
414 if( header[i_skip]&0x10 ) /* has dts */
415 {
416 p_pes->i_dts = ((mtime_t)(header[i_skip+5]&0x0e ) << 29)|
417 (mtime_t)(header[i_skip+6] << 22)|
418 ((mtime_t)(header[i_skip+7]&0xfe) << 14)|
419 (mtime_t)(header[i_skip+8] << 7)|
420 (mtime_t)(header[i_skip+9] >> 1);
421 i_skip += 10;
422 }
423 else
424 {
425 i_skip += 5;
426 }
427 }
428 else
429 {
430 i_skip += 1;
431 }
432 }
433 }
434
435 i_skip += i_skip_extra;
436
437 if( p_pes->i_buffer <= i_skip )
438 {
439 return VLC_EGENERIC;
440 }
441
442 p_pes->p_buffer += i_skip;
443 p_pes->i_buffer -= i_skip;
444
445 p_pes->i_dts = 100 * p_pes->i_dts / 9;
446 p_pes->i_pts = 100 * p_pes->i_pts / 9;
447
448 return VLC_SUCCESS;
449 }
450
451 /* Program stream map handling */
452 typedef struct ps_es_t
453 {
454 int i_type;
455 int i_id;
456
457 int i_descriptor;
458 uint8_t *p_descriptor;
459
460 /* Language is iso639-2T */
461 uint8_t lang[3];
462
463 } ps_es_t;
464
465 struct ps_psm_t
466 {
467 int i_version;
468
469 int i_es;
470 ps_es_t **es;
471 };
472
473 static inline int ps_id_to_type( const ps_psm_t *p_psm, int i_id )
474 {
475 int i;
476 for( i = 0; p_psm && i < p_psm->i_es; i++ )
477 {
478 if( p_psm->es[i]->i_id == i_id ) return p_psm->es[i]->i_type;
479 }
480 return 0;
481 }
482
483 static inline const uint8_t *ps_id_to_lang( const ps_psm_t *p_psm, int i_id )
484 {
485 int i;
486 for( i = 0; p_psm && i < p_psm->i_es; i++ )
487 {
488 if( p_psm->es[i]->i_id == i_id ) return p_psm->es[i]->lang;
489 }
490 return 0;
491 }
492
493 static inline void ps_psm_init( ps_psm_t *p_psm )
494 {
495 p_psm->i_version = 0xFFFF;
496 p_psm->i_es = 0;
497 p_psm->es = 0;
498 }
499
500 static inline void ps_psm_destroy( ps_psm_t *p_psm )
501 {
502 while( p_psm->i_es-- )
503 {
504 free( p_psm->es[p_psm->i_es]->p_descriptor );
505 free( p_psm->es[p_psm->i_es] );
506 }
507 free( p_psm->es );
508
509 p_psm->es = 0;
510 p_psm->i_es = 0;
511 }
512
513 static inline int ps_psm_fill( ps_psm_t *p_psm, block_t *p_pkt,
514 ps_track_t tk[PS_TK_COUNT], es_out_t *out )
515 {
516 int i_buffer = p_pkt->i_buffer;
517 uint8_t *p_buffer = p_pkt->p_buffer;
518 int i_length, i_version, i_info_length, i_esm_length, i_es_base, i;
519
520 if( !p_psm || p_buffer[3] != 0xbc ) return VLC_EGENERIC;
521
522 i_length = (uint16_t)(p_buffer[4] << 8) + p_buffer[5] + 6;
523 if( i_length > i_buffer ) return VLC_EGENERIC;
524
525 //i_current_next_indicator = (p_buffer[6] && 0x01);
526 i_version = (p_buffer[6] && 0xf8);
527
528 if( p_psm->i_version == i_version ) return VLC_EGENERIC;
529
530 ps_psm_destroy( p_psm );
531
532 i_info_length = (uint16_t)(p_buffer[8] << 8) + p_buffer[9];
533 if( i_info_length + 10 > i_length ) return VLC_EGENERIC;
534
535 /* Elementary stream map */
536 i_esm_length = (uint16_t)(p_buffer[ 10 + i_info_length ] << 8) +
537 p_buffer[ 11 + i_info_length];
538 i_es_base = 12 + i_info_length;
539
540 while( i_es_base + 4 < i_length )
541 {
542 ps_es_t **tmp_es;
543 ps_es_t es;
544 es.lang[0] = es.lang[1] = es.lang[2] = 0;
545
546 es.i_type = p_buffer[ i_es_base ];
547 es.i_id = p_buffer[ i_es_base + 1 ];
548 i_info_length = (uint16_t)(p_buffer[ i_es_base + 2 ] << 8) +
549 p_buffer[ i_es_base + 3 ];
550
551 if( i_es_base + 4 + i_info_length > i_length ) break;
552
553 /* TODO Add support for VC-1 stream:
554 * stream_type=0xea, stream_id=0xfd AND registration
555 * descriptor 0x5 with format_identifier == 0x56432D31 (VC-1)
556 * (I need a sample that use PSM with VC-1) */
557
558 es.p_descriptor = 0;
559 es.i_descriptor = i_info_length;
560 if( i_info_length > 0 )
561 {
562 int i = 0;
563
564 es.p_descriptor = malloc( i_info_length );
565 if( es.p_descriptor )
566 {
567 memcpy( es.p_descriptor, p_buffer + i_es_base + 4, i_info_length);
568
569 while( i <= es.i_descriptor - 2 )
570 {
571 /* Look for the ISO639 language descriptor */
572 if( es.p_descriptor[i] != 0x0a )
573 {
574 i += es.p_descriptor[i+1] + 2;
575 continue;
576 }
577
578 if( i <= es.i_descriptor - 6 )
579 {
580 es.lang[0] = es.p_descriptor[i+2];
581 es.lang[1] = es.p_descriptor[i+3];
582 es.lang[2] = es.p_descriptor[i+4];
583 }
584 break;
585 }
586 }
587 }
588
589 tmp_es = realloc( p_psm->es, sizeof(ps_es_t *) * (p_psm->i_es+1) );
590 if( tmp_es )
591 {
592 p_psm->es = tmp_es;
593 p_psm->es[p_psm->i_es] = malloc( sizeof(ps_es_t) );
594 if( p_psm->es[p_psm->i_es] )
595 {
596 *p_psm->es[p_psm->i_es++] = es;
597 i_es_base += 4 + i_info_length;
598 }
599 }
600 }
601
602 /* TODO: CRC */
603
604 p_psm->i_version = i_version;
605
606 /* Check/Modify our existing tracks */
607 for( i = 0; i < PS_TK_COUNT; i++ )
608 {
609 ps_track_t tk_tmp;
610
611 if( !tk[i].b_seen || !tk[i].es ) continue;
612
613 if( ps_track_fill( &tk_tmp, p_psm, tk[i].i_id ) != VLC_SUCCESS )
614 continue;
615
616 if( tk_tmp.fmt.i_codec == tk[i].fmt.i_codec ) continue;
617
618 es_out_Del( out, tk[i].es );
619 tk[i] = tk_tmp;
620 tk[i].b_seen = true;
621 tk[i].es = es_out_Add( out, &tk[i].fmt );
622 }
623
624 return VLC_SUCCESS;
625 }
VLC Development tree mirror