diff options
Diffstat (limited to 'src/libxinevdec/cinepak.c')
-rw-r--r-- | src/libxinevdec/cinepak.c | 451 |
1 files changed, 451 insertions, 0 deletions
diff --git a/src/libxinevdec/cinepak.c b/src/libxinevdec/cinepak.c new file mode 100644 index 000000000..d472ef4d6 --- /dev/null +++ b/src/libxinevdec/cinepak.c @@ -0,0 +1,451 @@ +/* + * Copyright (C) 2002 the xine project + * + * This file is part of xine, a unix video player. + * + * xine is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * xine is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA + * + * by Ewald Snel <ewald@rambo.its.tudelft.nl> + * + * based on overview of Cinepak algorithm and example decoder + * by Tim Ferguson: http://www.csse.monash.edu.au/~timf/ + * + * $Id: cinepak.c,v 1.1 2002/04/30 08:28:10 esnel Exp $ + */ + +#include <stdlib.h> +#include <unistd.h> + +#include "video_out.h" +#include "buffer.h" +#include "bswap.h" +#include "xineutils.h" +#include "xine_internal.h" + +#define MAX_STRIPS 32 +#define VIDEOBUFSIZE 128 * 1024 + +/* now this is ripped of wine's vfw.h */ +typedef struct { + long biSize; + long biWidth; + long biHeight; + short biPlanes; + short biBitCount; + long biCompression; + long biSizeImage; + long biXPelsPerMeter; + long biYPelsPerMeter; + long biClrUsed; + long biClrImportant; +} BITMAPINFOHEADER; + +typedef struct { + uint8_t y0, y1, y2, y3; + uint8_t u, v; +} cvid_codebook_t; + +typedef struct { + uint16_t id; + uint16_t x1, y1; + uint16_t x2, y2; + cvid_codebook_t v4_codebook[256]; + cvid_codebook_t v1_codebook[256]; +} cvid_strip_t; + +typedef struct cvid_decoder_s { + video_decoder_t video_decoder; + + vo_instance_t *video_out; + int64_t video_step; + int decoder_ok; + + unsigned char *buf; + int bufsize; + int size; + + long biWidth; + long biHeight; + short biBitCount; + uint8_t *img_buffer; + + cvid_strip_t strips[MAX_STRIPS]; +} cvid_decoder_t; + + +static void cinepak_decode_codebook (cvid_codebook_t *codebook, + int chunk_id, int size, uint8_t *data) +{ + uint8_t *eod = (data + size); + uint32_t flag, mask; + int i, n; + + n = (chunk_id & 0x0400) ? 4 : 6; + flag = 0; + mask = 0; + + for (i=0; i < 256; i++) { + if ((chunk_id & 0x0100) && !(mask >>= 1)) { + if ((data + 4) > eod) + break; + + flag = (data[0] << 24) | (data[1] << 16) | (data[2] << 8) | data[3]; + data += 4; + mask = 0x80000000; + } + + if (!(chunk_id & 0x0100) || (flag & mask)) { + if ((data + n) > eod) + break; + + codebook[i].y0 = *data++; + codebook[i].y1 = *data++; + codebook[i].y2 = *data++; + codebook[i].y3 = *data++; + codebook[i].u = 128 + ((n == 4) ? 0 : *data++); + codebook[i].v = 128 + ((n == 4) ? 0 : *data++); + } + } +} + +static void cinepak_decode_vectors (cvid_decoder_t *this, cvid_strip_t *strip, + int chunk_id, int size, uint8_t *data) +{ + uint8_t *eod = (data + size); + uint32_t flag, mask; + cvid_codebook_t *codebook; + int x, y; + int n = (this->biWidth * this->biHeight); + uint8_t *iy[4]; + uint8_t *iu[2]; + uint8_t *iv[2]; + + flag = 0; + mask = 0; + + for (y=strip->y1; y < strip->y2; y+=4) { + + iy[0] = this->img_buffer + (y * this->biWidth) + strip->x1; + iy[1] = iy[0] + this->biWidth; + iy[2] = iy[1] + this->biWidth; + iy[3] = iy[2] + this->biWidth; + iu[0] = this->img_buffer + n + ((y * this->biWidth) >> 2) + (strip->x1 >> 1); + iu[1] = iu[0] + (this->biWidth >> 1); + iv[0] = iu[0] + (n >> 2); + iv[1] = iv[0] + (this->biWidth >> 1); + + for (x=strip->x1; x < strip->x2; x+=4) { + if ((chunk_id & 0x0100) && !(mask >>= 1)) { + if ((data + 4) > eod) + return; + + flag = (data[0] << 24) | (data[1] << 16) | (data[2] << 8) | data[3]; + data += 4; + mask = 0x80000000; + } + + if (!(chunk_id & 0x0100) || (flag & mask)) { + if (!(chunk_id & 0x0200) && !(mask >>= 1)) { + if ((data + 4) > eod) + return; + + flag = (data[0] << 24) | (data[1] << 16) | (data[2] << 8) | data[3]; + data += 4; + mask = 0x80000000; + } + + if ((chunk_id & 0x0200) || (~flag & mask)) { + if (data >= eod) + return; + + codebook = &strip->v1_codebook[*data++]; + iy[0][0] = codebook->y0; iy[0][1] = codebook->y0; + iy[1][0] = codebook->y0; iy[1][1] = codebook->y0; + iu[0][0] = codebook->u; iv[0][0] = codebook->v; + + iy[0][2] = codebook->y1; iy[0][3] = codebook->y1; + iy[1][2] = codebook->y1; iy[1][3] = codebook->y1; + iu[0][1] = codebook->u; iv[0][1] = codebook->v; + + iy[2][0] = codebook->y2; iy[2][1] = codebook->y2; + iy[3][0] = codebook->y2; iy[3][1] = codebook->y2; + iu[1][0] = codebook->u; iv[1][0] = codebook->v; + + iy[2][2] = codebook->y3; iy[2][3] = codebook->y3; + iy[3][2] = codebook->y3; iy[3][3] = codebook->y3; + iu[1][1] = codebook->u; iv[1][1] = codebook->v; + + } else if (flag & mask) { + if ((data + 4) > eod) + return; + + codebook = &strip->v4_codebook[*data++]; + iy[0][0] = codebook->y0; iy[0][1] = codebook->y1; + iy[1][0] = codebook->y2; iy[1][1] = codebook->y3; + iu[0][0] = codebook->u; iv[0][0] = codebook->v; + + codebook = &strip->v4_codebook[*data++]; + iy[0][2] = codebook->y0; iy[0][3] = codebook->y1; + iy[1][2] = codebook->y2; iy[1][3] = codebook->y3; + iu[0][1] = codebook->u; iv[0][1] = codebook->v; + + codebook = &strip->v4_codebook[*data++]; + iy[2][0] = codebook->y0; iy[2][1] = codebook->y1; + iy[3][0] = codebook->y2; iy[3][1] = codebook->y3; + iu[1][0] = codebook->u; iv[1][0] = codebook->v; + + codebook = &strip->v4_codebook[*data++]; + iy[2][2] = codebook->y0; iy[2][3] = codebook->y1; + iy[3][2] = codebook->y2; iy[3][3] = codebook->y3; + iu[1][1] = codebook->u; iv[1][1] = codebook->v; + } + } + + iy[0] += 4; iy[1] += 4; + iy[2] += 4; iy[3] += 4; + iu[0] += 2; iu[1] += 2; + iv[0] += 2; iv[1] += 2; + } + } +} + +static void cinepak_decode_strip (cvid_decoder_t *this, + cvid_strip_t *strip, uint8_t *data, int size) +{ + uint8_t *eod = (data + size); + int chunk_id, chunk_size; + + if (strip->x1 >= this->biWidth || strip->x2 > this->biWidth || + strip->y1 >= this->biHeight || strip->y2 > this->biHeight || + strip->x1 >= strip->x2 || strip->y1 >= strip->y2) + return; + + while ((data + 4) <= eod) { + chunk_id = (data[0] << 8) | data[1]; + chunk_size = ((data[2] << 8) | data[3]) - 4; + data += 4; + chunk_size = ((data + chunk_size) > eod) ? (eod - data) : chunk_size; + + switch (chunk_id) { + case 0x2000: + case 0x2100: + case 0x2400: + case 0x2500: + cinepak_decode_codebook (strip->v4_codebook, chunk_id, chunk_size, data); + break; + case 0x2200: + case 0x2300: + case 0x2600: + case 0x2700: + cinepak_decode_codebook (strip->v1_codebook, chunk_id, chunk_size, data); + break; + case 0x3000: + case 0x3100: + case 0x3200: + cinepak_decode_vectors (this, strip, chunk_id, chunk_size, data); + return; + } + + data += chunk_size; + } +} + +static void cinepak_decode_frame (cvid_decoder_t *this, uint8_t *data, int size) { + uint8_t *eod = (data + size); + int i, strip_size, frame_flags, num_strips; + int y0 = 0; + + if (size < 10) + return; + + frame_flags = data[0]; + num_strips = (data[8] << 8) | data[9]; + data += 10; + + if (num_strips > MAX_STRIPS) + num_strips = MAX_STRIPS; + + for (i=0; i < num_strips; i++) { + if ((data + 12) > eod) + break; + + this->strips[i].id = (data[0] << 8) | data[1]; + this->strips[i].y1 = y0; + this->strips[i].x1 = 0; + this->strips[i].y2 = y0 + ((data[8] << 8) | data[9]); + this->strips[i].x2 = this->biWidth; + + strip_size = (data[2] << 8) + data[3] - 12; + data += 12; + strip_size = ((data + strip_size) > eod) ? (eod - data) : strip_size; + + if ((i > 0) && !(frame_flags & 0x01)) { + xine_fast_memcpy (this->strips[i].v4_codebook, this->strips[i-1].v4_codebook, + sizeof(this->strips[i].v4_codebook)); + + xine_fast_memcpy (this->strips[i].v1_codebook, this->strips[i-1].v1_codebook, + sizeof(this->strips[i].v1_codebook)); + } + + cinepak_decode_strip (this, &this->strips[i], data, strip_size); + + data += strip_size; + y0 = this->strips[i].y2; + } +} + +static int cvid_can_handle (video_decoder_t *this_gen, int buf_type) { + return ((buf_type & 0xFFFF0000) == BUF_VIDEO_CINEPAK); +} + +static void cvid_init (video_decoder_t *this_gen, vo_instance_t *video_out) { + cvid_decoder_t *this = (cvid_decoder_t *) this_gen; + + this->video_out = video_out; + this->decoder_ok = 0; +} + +static void cvid_decode_data (video_decoder_t *this_gen, buf_element_t *buf) { + cvid_decoder_t *this = (cvid_decoder_t *) this_gen; + + if (buf->decoder_flags & BUF_FLAG_PREVIEW) + return; + + if (buf->decoder_flags & BUF_FLAG_HEADER) { + BITMAPINFOHEADER *bih; + + bih = (BITMAPINFOHEADER *) buf->content; + this->biWidth = (le2me_32 (bih->biWidth) + 3) & ~0x03; + this->biHeight = (le2me_32 (bih->biHeight) + 3) & ~0x03; + this->video_step = buf->decoder_info[1]; + + if (this->img_buffer) + free (this->img_buffer); + this->img_buffer = malloc((this->biWidth * this->biHeight * 3) >> 1); + + if (this->buf) + free (this->buf); + this->bufsize = VIDEOBUFSIZE; + this->buf = malloc(this->bufsize); + this->size = 0; + + this->video_out->open (this->video_out); + this->decoder_ok = 1; + + } else if (this->decoder_ok) { + + if (this->size + buf->size > this->bufsize) { + this->bufsize = this->size + 2 * buf->size; + this->buf = realloc (this->buf, this->bufsize); + } + + xine_fast_memcpy (&this->buf[this->size], buf->content, buf->size); + + this->size += buf->size; + + if (buf->decoder_flags & BUF_FLAG_FRAMERATE) + this->video_step = buf->decoder_info[0]; + + if (buf->decoder_flags & BUF_FLAG_FRAME_END) { + + vo_frame_t *img; + int n = (this->biWidth * this->biHeight); + + cinepak_decode_frame (this, this->buf, this->size); + + img = this->video_out->get_frame (this->video_out, + this->biWidth, this->biHeight, + 42, IMGFMT_YV12, VO_BOTH_FIELDS); + + img->duration = this->video_step; + img->pts = buf->pts; + img->bad_frame = 0; + + xine_fast_memcpy (img->base[0], this->img_buffer, n); + xine_fast_memcpy (img->base[1], this->img_buffer + n, (n >> 2)); + xine_fast_memcpy (img->base[2], this->img_buffer + n + (n >> 2), (n >> 2)); + + img->draw(img); + img->free(img); + + this->size = 0; + } + } +} + +static void cvid_flush (video_decoder_t *this_gen) { +} + +static void cvid_reset (video_decoder_t *this_gen) { + cvid_decoder_t *this = (cvid_decoder_t *) this_gen; + + this->size = 0; +} + +static void cvid_close (video_decoder_t *this_gen) { + cvid_decoder_t *this = (cvid_decoder_t *) this_gen; + + if (this->img_buffer) { + free (this->img_buffer); + this->img_buffer = NULL; + } + + if (this->buf) { + free (this->buf); + this->buf = NULL; + } + + if (this->decoder_ok) { + this->decoder_ok = 0; + this->video_out->close(this->video_out); + } +} + +static char *cvid_get_id(void) { + return "cinepak"; +} + +static void cvid_dispose (video_decoder_t *this_gen) { + free (this_gen); +} + +video_decoder_t *init_video_decoder_plugin (int iface_version, xine_t *xine) { + + cvid_decoder_t *this ; + + if (iface_version != 7) { + printf( "cinepak: plugin doesn't support plugin API version %d.\n" + "cinepak: this means there's a version mismatch between xine and this " + "cinepak: decoder plugin.\nInstalling current plugins should help.\n", + iface_version); + return NULL; + } + + this = (cvid_decoder_t *) malloc (sizeof (cvid_decoder_t)); + memset(this, 0, sizeof (cvid_decoder_t)); + + this->video_decoder.interface_version = iface_version; + this->video_decoder.can_handle = cvid_can_handle; + this->video_decoder.init = cvid_init; + this->video_decoder.decode_data = cvid_decode_data; + this->video_decoder.flush = cvid_flush; + this->video_decoder.reset = cvid_reset; + this->video_decoder.close = cvid_close; + this->video_decoder.get_identifier = cvid_get_id; + this->video_decoder.dispose = cvid_dispose; + this->video_decoder.priority = 5; + + return (video_decoder_t *) this; +} |