3 * Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org>
4 * Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca>
6 * This file is part of mpeg2dec, a free MPEG-2 video stream decoder.
7 * See http://libmpeg2.sourceforge.net/ for updates.
9 * mpeg2dec 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.
14 * mpeg2dec 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.
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 #include <vlc_common.h>
31 #include "xxmc-config.h"
36 #include "attributes.h"
37 #include "mpeg2_internal.h"
40 static int mpeg2_accels = 0;
42 #define BUFFER_SIZE (1194 * 1024)
44 const mpeg2_info_t *mpeg2_info( mpeg2dec_t * mpeg2dec )
46 return &(mpeg2dec->info);
49 static inline int skip_chunk( mpeg2dec_t * mpeg2dec, int bytes )
51 uint8_t *current = NULL;
53 uint8_t *limit = NULL;
59 current = mpeg2dec->buf_start;
60 shift = mpeg2dec->shift;
61 limit = current + bytes;
65 if (shift == 0x00000100)
69 mpeg2dec->shift = 0xffffff00;
70 skipped = current - mpeg2dec->buf_start;
71 mpeg2dec->buf_start = current;
74 shift = (shift | byte) << 8;
75 } while (current < limit);
77 mpeg2dec->shift = shift;
78 mpeg2dec->buf_start = current;
82 static inline int copy_chunk( mpeg2dec_t * mpeg2dec, int bytes )
84 uint8_t *current = NULL;
86 uint8_t *chunk_ptr = NULL;
87 uint8_t *limit = NULL;
93 current = mpeg2dec->buf_start;
94 shift = mpeg2dec->shift;
95 chunk_ptr = mpeg2dec->chunk_ptr;
96 limit = current + bytes;
100 if (shift == 0x00000100)
104 mpeg2dec->shift = 0xffffff00;
105 mpeg2dec->chunk_size = chunk_ptr - mpeg2dec->chunk_start - 3;
106 mpeg2dec->chunk_ptr = chunk_ptr + 1;
107 copied = current - mpeg2dec->buf_start;
108 mpeg2dec->buf_start = current;
111 shift = (shift | byte) << 8;
113 } while (current < limit);
115 mpeg2dec->shift = shift;
116 mpeg2dec->buf_start = current;
120 void mpeg2_buffer( mpeg2dec_t * mpeg2dec, uint8_t * start, uint8_t * end )
122 mpeg2dec->buf_start = start;
123 mpeg2dec->buf_end = end;
126 int mpeg2_getpos( mpeg2dec_t * mpeg2dec )
128 return mpeg2dec->buf_end - mpeg2dec->buf_start;
131 static inline mpeg2_state_t seek_chunk( mpeg2dec_t * mpeg2dec )
135 size = mpeg2dec->buf_end - mpeg2dec->buf_start;
136 skipped = skip_chunk (mpeg2dec, size);
139 mpeg2dec->bytes_since_tag += size;
142 mpeg2dec->bytes_since_tag += skipped;
143 mpeg2dec->code = mpeg2dec->buf_start[-1];
144 return (mpeg2_state_t)-1;
147 mpeg2_state_t mpeg2_seek_header( mpeg2dec_t * mpeg2dec )
149 while( (mpeg2dec->code != 0xb3) &&
150 (((mpeg2dec->code != 0xb7) &&
151 (mpeg2dec->code != 0xb8) &&
153 (mpeg2dec->sequence.width == (unsigned)-1)) )
155 if (seek_chunk (mpeg2dec) == STATE_BUFFER)
159 mpeg2dec->chunk_start = mpeg2dec->chunk_ptr = mpeg2dec->chunk_buffer;
160 mpeg2dec->user_data_len = 0;
161 return (mpeg2dec->code ? mpeg2_parse_header (mpeg2dec) :
162 mpeg2_header_picture_start (mpeg2dec));
165 #define RECEIVED(code,state) (((state) << 8) + (code))
167 mpeg2_state_t mpeg2_parse( mpeg2dec_t * mpeg2dec )
169 int size_buffer, size_chunk, copied;
171 if (mpeg2dec->action)
175 state = mpeg2dec->action (mpeg2dec);
182 while( (unsigned int) (mpeg2dec->code - mpeg2dec->first_decode_slice)
183 < mpeg2dec->nb_decode_slices )
185 size_buffer = mpeg2dec->buf_end - mpeg2dec->buf_start;
186 size_chunk = (mpeg2dec->chunk_buffer + BUFFER_SIZE -
187 mpeg2dec->chunk_ptr);
189 if (size_buffer <= size_chunk)
191 copied = copy_chunk (mpeg2dec, size_buffer);
194 mpeg2dec->bytes_since_tag += size_buffer;
195 mpeg2dec->chunk_ptr += size_buffer;
201 copied = copy_chunk (mpeg2dec, size_chunk);
205 /* filled the chunk buffer without finding a start code */
206 mpeg2dec->bytes_since_tag += size_chunk;
207 mpeg2dec->action = seek_chunk;
208 return STATE_INVALID;
211 mpeg2dec->bytes_since_tag += copied;
212 mpeg2_xxmc_slice( mpeg2dec, NULL,
213 mpeg2dec->code,mpeg2dec->chunk_start,
214 mpeg2dec->chunk_size);
215 mpeg2dec->prev_code = mpeg2dec->code;
216 mpeg2dec->code = mpeg2dec->buf_start[-1];
217 mpeg2dec->chunk_ptr = mpeg2dec->chunk_start;
220 if( (unsigned int) (mpeg2dec->code - 1) >= (0xb0 - 1) )
222 if( seek_chunk (mpeg2dec) == STATE_BUFFER )
226 switch( mpeg2dec->code )
229 mpeg2dec->action = mpeg2_header_picture_start;
230 return mpeg2dec->state;
232 mpeg2dec->action = mpeg2_header_end;
236 mpeg2dec->action = mpeg2_parse_header;
239 mpeg2dec->action = seek_chunk;
240 return STATE_INVALID;
242 return (mpeg2dec->state == STATE_SLICE) ? STATE_SLICE : STATE_INVALID;
245 mpeg2_state_t mpeg2_parse_header( mpeg2dec_t * mpeg2dec )
247 static int (* process_header[]) (mpeg2dec_t * mpeg2dec) =
249 mpeg2_header_picture,
250 mpeg2_header_extension,
251 mpeg2_header_user_data,
252 mpeg2_header_sequence,
259 int size_buffer, size_chunk, copied;
261 mpeg2dec->action = mpeg2_parse_header;
262 mpeg2dec->info.user_data = NULL;
263 mpeg2dec->info.user_data_len = 0;
267 size_buffer = mpeg2dec->buf_end - mpeg2dec->buf_start;
268 size_chunk = (mpeg2dec->chunk_buffer + BUFFER_SIZE -
269 mpeg2dec->chunk_ptr);
270 if( size_buffer <= size_chunk )
272 copied = copy_chunk (mpeg2dec, size_buffer);
275 mpeg2dec->bytes_since_tag += size_buffer;
276 mpeg2dec->chunk_ptr += size_buffer;
282 copied = copy_chunk (mpeg2dec, size_chunk);
285 /* filled the chunk buffer without finding a start code */
286 mpeg2dec->bytes_since_tag += size_chunk;
287 mpeg2dec->code = 0xb4;
288 mpeg2dec->action = mpeg2_seek_header;
289 return STATE_INVALID;
292 mpeg2dec->bytes_since_tag += copied;
294 if( process_header[mpeg2dec->code & 0x0b](mpeg2dec) )
296 mpeg2dec->code = mpeg2dec->buf_start[-1];
297 mpeg2dec->action = mpeg2_seek_header;
298 return STATE_INVALID;
300 mpeg2dec->code = mpeg2dec->buf_start[-1];
302 switch( RECEIVED(mpeg2dec->code, mpeg2dec->state) )
304 /* state transition after a sequence header */
305 case RECEIVED (0x00, STATE_SEQUENCE):
306 mpeg2dec->action = mpeg2_header_picture_start;
307 case RECEIVED (0xb8, STATE_SEQUENCE):
308 mpeg2_header_sequence_finalize( mpeg2dec );
310 /* other legal state transitions */
311 case RECEIVED (0x00, STATE_GOP):
312 mpeg2_header_gop_finalize( mpeg2dec );
313 mpeg2dec->action = mpeg2_header_picture_start;
315 case RECEIVED (0x01, STATE_PICTURE):
316 case RECEIVED (0x01, STATE_PICTURE_2ND):
317 mpeg2_header_picture_finalize( mpeg2dec, mpeg2_accels );
318 mpeg2dec->action = mpeg2_header_slice_start;
320 /* legal headers within a given state */
321 case RECEIVED (0xb2, STATE_SEQUENCE):
322 case RECEIVED (0xb2, STATE_GOP):
323 case RECEIVED (0xb2, STATE_PICTURE):
324 case RECEIVED (0xb2, STATE_PICTURE_2ND):
325 case RECEIVED (0xb5, STATE_SEQUENCE):
326 case RECEIVED (0xb5, STATE_PICTURE):
327 case RECEIVED (0xb5, STATE_PICTURE_2ND):
328 mpeg2dec->chunk_ptr = mpeg2dec->chunk_start;
331 mpeg2dec->action = mpeg2_seek_header;
332 return STATE_INVALID;
334 mpeg2dec->chunk_start = mpeg2dec->chunk_ptr = mpeg2dec->chunk_buffer;
335 mpeg2dec->user_data_len = 0;
336 return mpeg2dec->state;
340 int mpeg2_convert( mpeg2dec_t * mpeg2dec, mpeg2_convert_t convert, void * arg )
342 mpeg2_convert_init_t convert_init;
345 error = convert( MPEG2_CONVERT_SET, NULL, &(mpeg2dec->sequence), 0,
346 mpeg2_accels, arg, &convert_init );
349 mpeg2dec->convert = convert;
350 mpeg2dec->convert_arg = arg;
351 mpeg2dec->convert_id_size = convert_init.id_size;
352 mpeg2dec->convert_stride = 0;
357 int mpeg2_stride( mpeg2dec_t * mpeg2dec, int stride )
359 if (!mpeg2dec->convert)
361 if (stride < (int) mpeg2dec->sequence.width)
362 stride = mpeg2dec->sequence.width;
363 mpeg2dec->decoder.stride_frame = stride;
367 mpeg2_convert_init_t convert_init;
369 stride = mpeg2dec->convert( MPEG2_CONVERT_STRIDE, NULL,
370 &(mpeg2dec->sequence), stride,
371 mpeg2_accels, mpeg2dec->convert_arg,
373 mpeg2dec->convert_id_size = convert_init.id_size;
374 mpeg2dec->convert_stride = stride;
379 void mpeg2_set_buf( mpeg2dec_t * mpeg2dec, uint8_t * buf[3], void * id )
383 if (mpeg2dec->custom_fbuf)
385 if (mpeg2dec->state == STATE_SEQUENCE)
387 mpeg2dec->fbuf[2] = mpeg2dec->fbuf[1];
388 mpeg2dec->fbuf[1] = mpeg2dec->fbuf[0];
390 mpeg2_set_fbuf( mpeg2dec,
391 (mpeg2dec->decoder.coding_type == PIC_FLAG_CODING_TYPE_B) );
392 fbuf = mpeg2dec->fbuf[0];
396 fbuf = &(mpeg2dec->fbuf_alloc[mpeg2dec->alloc_index].fbuf);
397 mpeg2dec->alloc_index_user = ++mpeg2dec->alloc_index;
399 fbuf->buf[0] = buf[0];
400 fbuf->buf[1] = buf[1];
401 fbuf->buf[2] = buf[2];
405 void mpeg2_custom_fbuf( mpeg2dec_t * mpeg2dec, int custom_fbuf )
407 mpeg2dec->custom_fbuf = custom_fbuf;
410 void mpeg2_skip( mpeg2dec_t * mpeg2dec, int skip )
412 mpeg2dec->first_decode_slice = 1;
413 mpeg2dec->nb_decode_slices = skip ? 0 : (0xb0 - 1);
416 void mpeg2_slice_region( mpeg2dec_t * mpeg2dec, int start, int end )
418 start = (start < 1) ? 1 : (start > 0xb0) ? 0xb0 : start;
419 end = (end < start) ? start : (end > 0xb0) ? 0xb0 : end;
420 mpeg2dec->first_decode_slice = start;
421 mpeg2dec->nb_decode_slices = end - start;
424 void mpeg2_tag_picture( mpeg2dec_t * mpeg2dec, uint32_t tag, uint32_t tag2 )
426 mpeg2dec->tag_previous = mpeg2dec->tag_current;
427 mpeg2dec->tag2_previous = mpeg2dec->tag2_current;
428 mpeg2dec->tag_current = tag;
429 mpeg2dec->tag2_current = tag2;
430 mpeg2dec->num_tags++;
431 mpeg2dec->bytes_since_tag = 0;
434 uint32_t mpeg2_accel( uint32_t accel )
438 if( accel & MPEG2_ACCEL_DETECT )
439 accel |= mpeg2_detect_accel ();
440 mpeg2_accels = accel |= MPEG2_ACCEL_DETECT;
441 mpeg2_cpu_state_init (accel);
442 /* mpeg2_idct_init (accel); */
443 mpeg2_mc_init (accel);
445 return mpeg2_accels & ~MPEG2_ACCEL_DETECT;
448 void mpeg2_reset( mpeg2dec_t * mpeg2dec, int full_reset )
450 mpeg2dec->buf_start = mpeg2dec->buf_end = NULL;
451 mpeg2dec->num_tags = 0;
452 mpeg2dec->shift = 0xffffff00;
453 mpeg2dec->code = 0xb4;
454 mpeg2dec->action = mpeg2_seek_header;
455 mpeg2dec->state = STATE_INVALID;
457 mpeg2dec->ptr_forward_ref_picture = NULL;
458 mpeg2dec->ptr_backward_ref_picture = NULL;
460 mpeg2_reset_info(&(mpeg2dec->info));
461 mpeg2dec->info.gop = NULL;
462 mpeg2dec->info.user_data = NULL;
463 mpeg2dec->info.user_data_len = 0;
466 mpeg2dec->info.sequence = NULL;
467 mpeg2_header_state_init (mpeg2dec);
471 mpeg2dec_t *mpeg2_init( void )
473 mpeg2dec_t *mpeg2dec = NULL;
475 mpeg2_accel( MPEG2_ACCEL_DETECT );
476 mpeg2dec = (mpeg2dec_t *) mpeg2_malloc( sizeof (mpeg2dec_t),
477 MPEG2_ALLOC_MPEG2DEC );
478 if( mpeg2dec == NULL )
481 memset( mpeg2dec->decoder.DCTblock, 0, 64 * sizeof (int16_t) );
482 memset( mpeg2dec->quantizer_matrix, 0, 4 * 64 * sizeof (uint8_t) );
484 mpeg2dec->chunk_buffer = (uint8_t *) mpeg2_malloc( BUFFER_SIZE + 4,
486 mpeg2dec->sequence.width = (unsigned int)-1;
487 mpeg2_reset (mpeg2dec, 1);
491 void mpeg2_close( mpeg2dec_t * mpeg2dec )
493 mpeg2_header_state_init( mpeg2dec );
494 mpeg2_free( mpeg2dec->chunk_buffer );
495 mpeg2_free( mpeg2dec );