dsicinav.c
Go to the documentation of this file.
1 /*
2  * Delphine Software International CIN Audio/Video Decoders
3  * Copyright (c) 2006 Gregory Montoir (cyx@users.sourceforge.net)
4  *
5  * This file is part of Libav.
6  *
7  * Libav is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * Libav is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21 
27 #include "avcodec.h"
28 #include "bytestream.h"
29 #include "mathops.h"
30 
31 
32 typedef enum CinVideoBitmapIndex {
33  CIN_CUR_BMP = 0, /* current */
34  CIN_PRE_BMP = 1, /* previous */
35  CIN_INT_BMP = 2 /* intermediate */
37 
38 typedef struct CinVideoContext {
41  unsigned int bitmap_size;
42  uint32_t palette[256];
43  uint8_t *bitmap_table[3];
45 
46 typedef struct CinAudioContext {
49  int delta;
51 
52 
53 /* table defining a geometric sequence with multiplier = 32767 ^ (1 / 128) */
54 static const int16_t cinaudio_delta16_table[256] = {
55  0, 0, 0, 0, 0, 0, 0, 0,
56  0, 0, 0, 0, 0, 0, 0, 0,
57  0, 0, 0, -30210, -27853, -25680, -23677, -21829,
58  -20126, -18556, -17108, -15774, -14543, -13408, -12362, -11398,
59  -10508, -9689, -8933, -8236, -7593, -7001, -6455, -5951,
60  -5487, -5059, -4664, -4300, -3964, -3655, -3370, -3107,
61  -2865, -2641, -2435, -2245, -2070, -1908, -1759, -1622,
62  -1495, -1379, -1271, -1172, -1080, -996, -918, -847,
63  -781, -720, -663, -612, -564, -520, -479, -442,
64  -407, -376, -346, -319, -294, -271, -250, -230,
65  -212, -196, -181, -166, -153, -141, -130, -120,
66  -111, -102, -94, -87, -80, -74, -68, -62,
67  -58, -53, -49, -45, -41, -38, -35, -32,
68  -30, -27, -25, -23, -21, -20, -18, -17,
69  -15, -14, -13, -12, -11, -10, -9, -8,
70  -7, -6, -5, -4, -3, -2, -1, 0,
71  0, 1, 2, 3, 4, 5, 6, 7,
72  8, 9, 10, 11, 12, 13, 14, 15,
73  17, 18, 20, 21, 23, 25, 27, 30,
74  32, 35, 38, 41, 45, 49, 53, 58,
75  62, 68, 74, 80, 87, 94, 102, 111,
76  120, 130, 141, 153, 166, 181, 196, 212,
77  230, 250, 271, 294, 319, 346, 376, 407,
78  442, 479, 520, 564, 612, 663, 720, 781,
79  847, 918, 996, 1080, 1172, 1271, 1379, 1495,
80  1622, 1759, 1908, 2070, 2245, 2435, 2641, 2865,
81  3107, 3370, 3655, 3964, 4300, 4664, 5059, 5487,
82  5951, 6455, 7001, 7593, 8236, 8933, 9689, 10508,
83  11398, 12362, 13408, 14543, 15774, 17108, 18556, 20126,
84  21829, 23677, 25680, 27853, 30210, 0, 0, 0,
85  0, 0, 0, 0, 0, 0, 0, 0,
86  0, 0, 0, 0, 0, 0, 0, 0
87 };
88 
89 
91 {
92  CinVideoContext *cin = avctx->priv_data;
93  unsigned int i;
94 
95  cin->avctx = avctx;
96  avctx->pix_fmt = PIX_FMT_PAL8;
97 
98  cin->frame.data[0] = NULL;
99 
100  cin->bitmap_size = avctx->width * avctx->height;
101  for (i = 0; i < 3; ++i) {
102  cin->bitmap_table[i] = av_mallocz(cin->bitmap_size);
103  if (!cin->bitmap_table[i])
104  av_log(avctx, AV_LOG_ERROR, "Can't allocate bitmap buffers.\n");
105  }
106 
107  return 0;
108 }
109 
110 static void cin_apply_delta_data(const unsigned char *src, unsigned char *dst,
111  int size)
112 {
113  while (size--)
114  *dst++ += *src++;
115 }
116 
117 static int cin_decode_huffman(const unsigned char *src, int src_size,
118  unsigned char *dst, int dst_size)
119 {
120  int b, huff_code = 0;
121  unsigned char huff_code_table[15];
122  unsigned char *dst_cur = dst;
123  unsigned char *dst_end = dst + dst_size;
124  const unsigned char *src_end = src + src_size;
125 
126  memcpy(huff_code_table, src, 15);
127  src += 15;
128  src_size -= 15;
129 
130  while (src < src_end) {
131  huff_code = *src++;
132  if ((huff_code >> 4) == 15) {
133  b = huff_code << 4;
134  huff_code = *src++;
135  *dst_cur++ = b | (huff_code >> 4);
136  } else
137  *dst_cur++ = huff_code_table[huff_code >> 4];
138  if (dst_cur >= dst_end)
139  break;
140 
141  huff_code &= 15;
142  if (huff_code == 15) {
143  *dst_cur++ = *src++;
144  } else
145  *dst_cur++ = huff_code_table[huff_code];
146  if (dst_cur >= dst_end)
147  break;
148  }
149 
150  return dst_cur - dst;
151 }
152 
153 static int cin_decode_lzss(const unsigned char *src, int src_size,
154  unsigned char *dst, int dst_size)
155 {
156  uint16_t cmd;
157  int i, sz, offset, code;
158  unsigned char *dst_end = dst + dst_size, *dst_start = dst;
159  const unsigned char *src_end = src + src_size;
160 
161  while (src < src_end && dst < dst_end) {
162  code = *src++;
163  for (i = 0; i < 8 && src < src_end && dst < dst_end; ++i) {
164  if (code & (1 << i)) {
165  *dst++ = *src++;
166  } else {
167  cmd = AV_RL16(src);
168  src += 2;
169  offset = cmd >> 4;
170  if ((int)(dst - dst_start) < offset + 1)
171  return AVERROR_INVALIDDATA;
172  sz = (cmd & 0xF) + 2;
173  /* don't use memcpy/memmove here as the decoding routine
174  * (ab)uses buffer overlappings to repeat bytes in the
175  * destination */
176  sz = FFMIN(sz, dst_end - dst);
177  while (sz--) {
178  *dst = *(dst - offset - 1);
179  ++dst;
180  }
181  }
182  }
183  }
184 
185  return 0;
186 }
187 
188 static void cin_decode_rle(const unsigned char *src, int src_size,
189  unsigned char *dst, int dst_size)
190 {
191  int len, code;
192  unsigned char *dst_end = dst + dst_size;
193  const unsigned char *src_end = src + src_size;
194 
195  while (src < src_end && dst < dst_end) {
196  code = *src++;
197  if (code & 0x80) {
198  if (src >= src_end)
199  break;
200  len = code - 0x7F;
201  memset(dst, *src++, FFMIN(len, dst_end - dst));
202  } else {
203  len = code + 1;
204  memcpy(dst, src, FFMIN3(len, dst_end - dst, src_end - src));
205  src += len;
206  }
207  dst += len;
208  }
209 }
210 
212  void *data, int *data_size,
213  AVPacket *avpkt)
214 {
215  const uint8_t *buf = avpkt->data;
216  int buf_size = avpkt->size;
217  CinVideoContext *cin = avctx->priv_data;
218  int i, y, palette_type, palette_colors_count,
219  bitmap_frame_type, bitmap_frame_size, res = 0;
220 
221  palette_type = buf[0];
222  palette_colors_count = AV_RL16(buf+1);
223  bitmap_frame_type = buf[3];
224  buf += 4;
225 
226  bitmap_frame_size = buf_size - 4;
227 
228  /* handle palette */
229  if (bitmap_frame_size < palette_colors_count * (3 + (palette_type != 0)))
230  return AVERROR_INVALIDDATA;
231  if (palette_type == 0) {
232  if (palette_colors_count > 256)
233  return AVERROR_INVALIDDATA;
234  for (i = 0; i < palette_colors_count; ++i) {
235  cin->palette[i] = bytestream_get_le24(&buf);
236  bitmap_frame_size -= 3;
237  }
238  } else {
239  for (i = 0; i < palette_colors_count; ++i) {
240  cin->palette[buf[0]] = AV_RL24(buf + 1);
241  buf += 4;
242  bitmap_frame_size -= 4;
243  }
244  }
245 
246  bitmap_frame_size = FFMIN(cin->bitmap_size, bitmap_frame_size);
247 
248  /* note: the decoding routines below assumes that
249  * surface.width = surface.pitch */
250  switch (bitmap_frame_type) {
251  case 9:
252  cin_decode_rle(buf, bitmap_frame_size,
253  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
254  break;
255  case 34:
256  cin_decode_rle(buf, bitmap_frame_size,
257  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
259  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
260  break;
261  case 35:
262  cin_decode_huffman(buf, bitmap_frame_size,
263  cin->bitmap_table[CIN_INT_BMP], cin->bitmap_size);
264  cin_decode_rle(cin->bitmap_table[CIN_INT_BMP], bitmap_frame_size,
265  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
266  break;
267  case 36:
268  bitmap_frame_size = cin_decode_huffman(buf, bitmap_frame_size,
270  cin->bitmap_size);
271  cin_decode_rle(cin->bitmap_table[CIN_INT_BMP], bitmap_frame_size,
272  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
274  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
275  break;
276  case 37:
277  cin_decode_huffman(buf, bitmap_frame_size,
278  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
279  break;
280  case 38:
281  res = cin_decode_lzss(buf, bitmap_frame_size,
283  cin->bitmap_size);
284  if (res < 0)
285  return res;
286  break;
287  case 39:
288  res = cin_decode_lzss(buf, bitmap_frame_size,
290  cin->bitmap_size);
291  if (res < 0)
292  return res;
294  cin->bitmap_table[CIN_CUR_BMP], cin->bitmap_size);
295  break;
296  }
297 
299  if ((res = avctx->reget_buffer(avctx, &cin->frame)) < 0) {
300  av_log(cin->avctx, AV_LOG_ERROR,
301  "delphinecinvideo: reget_buffer() failed to allocate a frame\n");
302  return res;
303  }
304 
305  memcpy(cin->frame.data[1], cin->palette, sizeof(cin->palette));
306  cin->frame.palette_has_changed = 1;
307  for (y = 0; y < cin->avctx->height; ++y)
308  memcpy(cin->frame.data[0] + (cin->avctx->height - 1 - y) * cin->frame.linesize[0],
309  cin->bitmap_table[CIN_CUR_BMP] + y * cin->avctx->width,
310  cin->avctx->width);
311 
312  FFSWAP(uint8_t *, cin->bitmap_table[CIN_CUR_BMP],
313  cin->bitmap_table[CIN_PRE_BMP]);
314 
315  *data_size = sizeof(AVFrame);
316  *(AVFrame *)data = cin->frame;
317 
318  return buf_size;
319 }
320 
322 {
323  CinVideoContext *cin = avctx->priv_data;
324  int i;
325 
326  if (cin->frame.data[0])
327  avctx->release_buffer(avctx, &cin->frame);
328 
329  for (i = 0; i < 3; ++i)
330  av_free(cin->bitmap_table[i]);
331 
332  return 0;
333 }
334 
336 {
337  CinAudioContext *cin = avctx->priv_data;
338 
339  if (avctx->channels != 1) {
340  av_log_ask_for_sample(avctx, "Number of channels is not supported\n");
341  return AVERROR_PATCHWELCOME;
342  }
343 
344  cin->initial_decode_frame = 1;
345  cin->delta = 0;
346  avctx->sample_fmt = AV_SAMPLE_FMT_S16;
347 
349  avctx->coded_frame = &cin->frame;
350 
351  return 0;
352 }
353 
354 static int cinaudio_decode_frame(AVCodecContext *avctx, void *data,
355  int *got_frame_ptr, AVPacket *avpkt)
356 {
357  const uint8_t *buf = avpkt->data;
358  CinAudioContext *cin = avctx->priv_data;
359  const uint8_t *buf_end = buf + avpkt->size;
360  int16_t *samples;
361  int delta, ret;
362 
363  /* get output buffer */
364  cin->frame.nb_samples = avpkt->size - cin->initial_decode_frame;
365  if ((ret = avctx->get_buffer(avctx, &cin->frame)) < 0) {
366  av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
367  return ret;
368  }
369  samples = (int16_t *)cin->frame.data[0];
370 
371  delta = cin->delta;
372  if (cin->initial_decode_frame) {
373  cin->initial_decode_frame = 0;
374  delta = sign_extend(AV_RL16(buf), 16);
375  buf += 2;
376  *samples++ = delta;
377  }
378  while (buf < buf_end) {
379  delta += cinaudio_delta16_table[*buf++];
380  delta = av_clip_int16(delta);
381  *samples++ = delta;
382  }
383  cin->delta = delta;
384 
385  *got_frame_ptr = 1;
386  *(AVFrame *)data = cin->frame;
387 
388  return avpkt->size;
389 }
390 
391 
393  .name = "dsicinvideo",
394  .type = AVMEDIA_TYPE_VIDEO,
395  .id = CODEC_ID_DSICINVIDEO,
396  .priv_data_size = sizeof(CinVideoContext),
400  .capabilities = CODEC_CAP_DR1,
401  .long_name = NULL_IF_CONFIG_SMALL("Delphine Software International CIN video"),
402 };
403 
405  .name = "dsicinaudio",
406  .type = AVMEDIA_TYPE_AUDIO,
407  .id = CODEC_ID_DSICINAUDIO,
408  .priv_data_size = sizeof(CinAudioContext),
411  .capabilities = CODEC_CAP_DR1,
412  .long_name = NULL_IF_CONFIG_SMALL("Delphine Software International CIN audio"),
413 };