yading@10: /* yading@10: * Quicktime Animation (RLE) Video Decoder yading@10: * Copyright (C) 2004 the ffmpeg project yading@10: * yading@10: * This file is part of FFmpeg. yading@10: * yading@10: * FFmpeg is free software; you can redistribute it and/or yading@10: * modify it under the terms of the GNU Lesser General Public yading@10: * License as published by the Free Software Foundation; either yading@10: * version 2.1 of the License, or (at your option) any later version. yading@10: * yading@10: * FFmpeg is distributed in the hope that it will be useful, yading@10: * but WITHOUT ANY WARRANTY; without even the implied warranty of yading@10: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU yading@10: * Lesser General Public License for more details. yading@10: * yading@10: * You should have received a copy of the GNU Lesser General Public yading@10: * License along with FFmpeg; if not, write to the Free Software yading@10: * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA yading@10: */ yading@10: yading@10: /** yading@10: * @file yading@10: * QT RLE Video Decoder by Mike Melanson (melanson@pcisys.net) yading@10: * For more information about the QT RLE format, visit: yading@10: * http://www.pcisys.net/~melanson/codecs/ yading@10: * yading@10: * The QT RLE decoder has seven modes of operation: yading@10: * 1, 2, 4, 8, 16, 24, and 32 bits per pixel. For modes 1, 2, 4, and 8 yading@10: * the decoder outputs PAL8 colorspace data. 16-bit data yields RGB555 yading@10: * data. 24-bit data is RGB24 and 32-bit data is RGB32. yading@10: */ yading@10: yading@10: #include yading@10: #include yading@10: #include yading@10: yading@10: #include "avcodec.h" yading@10: #include "bytestream.h" yading@10: #include "internal.h" yading@10: yading@10: typedef struct QtrleContext { yading@10: AVCodecContext *avctx; yading@10: AVFrame frame; yading@10: yading@10: GetByteContext g; yading@10: uint32_t pal[256]; yading@10: } QtrleContext; yading@10: yading@10: #define CHECK_PIXEL_PTR(n) \ yading@10: if ((pixel_ptr + n > pixel_limit) || (pixel_ptr + n < 0)) { \ yading@10: av_log (s->avctx, AV_LOG_ERROR, "Problem: pixel_ptr = %d, pixel_limit = %d\n",\ yading@10: pixel_ptr + n, pixel_limit); \ yading@10: return; \ yading@10: } \ yading@10: yading@10: static void qtrle_decode_1bpp(QtrleContext *s, int row_ptr, int lines_to_change) yading@10: { yading@10: int rle_code; yading@10: int pixel_ptr; yading@10: int row_inc = s->frame.linesize[0]; yading@10: unsigned char pi0, pi1; /* 2 8-pixel values */ yading@10: unsigned char *rgb = s->frame.data[0]; yading@10: int pixel_limit = s->frame.linesize[0] * s->avctx->height; yading@10: int skip; yading@10: /* skip & 0x80 appears to mean 'start a new line', which can be interpreted yading@10: * as 'go to next line' during the decoding of a frame but is 'go to first yading@10: * line' at the beginning. Since we always interpret it as 'go to next line' yading@10: * in the decoding loop (which makes code simpler/faster), the first line yading@10: * would not be counted, so we count one more. yading@10: * See: https://ffmpeg.org/trac/ffmpeg/ticket/226 yading@10: * In the following decoding loop, row_ptr will be the position of the yading@10: * current row. */ yading@10: yading@10: row_ptr -= row_inc; yading@10: pixel_ptr = row_ptr; yading@10: lines_to_change++; yading@10: while (lines_to_change) { yading@10: skip = bytestream2_get_byte(&s->g); yading@10: rle_code = (signed char)bytestream2_get_byte(&s->g); yading@10: if (rle_code == 0) yading@10: break; yading@10: if(skip & 0x80) { yading@10: lines_to_change--; yading@10: row_ptr += row_inc; yading@10: pixel_ptr = row_ptr + 2 * (skip & 0x7f); yading@10: } else yading@10: pixel_ptr += 2 * skip; yading@10: CHECK_PIXEL_PTR(0); /* make sure pixel_ptr is positive */ yading@10: yading@10: if(rle_code == -1) yading@10: continue; yading@10: yading@10: if (rle_code < 0) { yading@10: /* decode the run length code */ yading@10: rle_code = -rle_code; yading@10: /* get the next 2 bytes from the stream, treat them as groups yading@10: * of 8 pixels, and output them rle_code times */ yading@10: yading@10: pi0 = bytestream2_get_byte(&s->g); yading@10: pi1 = bytestream2_get_byte(&s->g); yading@10: CHECK_PIXEL_PTR(rle_code * 2); yading@10: yading@10: while (rle_code--) { yading@10: rgb[pixel_ptr++] = pi0; yading@10: rgb[pixel_ptr++] = pi1; yading@10: } yading@10: } else { yading@10: /* copy the same pixel directly to output 2 times */ yading@10: rle_code *= 2; yading@10: CHECK_PIXEL_PTR(rle_code); yading@10: yading@10: while (rle_code--) yading@10: rgb[pixel_ptr++] = bytestream2_get_byte(&s->g); yading@10: } yading@10: } yading@10: } yading@10: yading@10: static inline void qtrle_decode_2n4bpp(QtrleContext *s, int row_ptr, yading@10: int lines_to_change, int bpp) yading@10: { yading@10: int rle_code, i; yading@10: int pixel_ptr; yading@10: int row_inc = s->frame.linesize[0]; yading@10: unsigned char pi[16]; /* 16 palette indices */ yading@10: unsigned char *rgb = s->frame.data[0]; yading@10: int pixel_limit = s->frame.linesize[0] * s->avctx->height; yading@10: int num_pixels = (bpp == 4) ? 8 : 16; yading@10: yading@10: while (lines_to_change--) { yading@10: pixel_ptr = row_ptr + (num_pixels * (bytestream2_get_byte(&s->g) - 1)); yading@10: CHECK_PIXEL_PTR(0); yading@10: yading@10: while ((rle_code = (signed char)bytestream2_get_byte(&s->g)) != -1) { yading@10: if (rle_code == 0) { yading@10: /* there's another skip code in the stream */ yading@10: pixel_ptr += (num_pixels * (bytestream2_get_byte(&s->g) - 1)); yading@10: CHECK_PIXEL_PTR(0); /* make sure pixel_ptr is positive */ yading@10: } else if (rle_code < 0) { yading@10: /* decode the run length code */ yading@10: rle_code = -rle_code; yading@10: /* get the next 4 bytes from the stream, treat them as palette yading@10: * indexes, and output them rle_code times */ yading@10: for (i = num_pixels-1; i >= 0; i--) { yading@10: pi[num_pixels-1-i] = (bytestream2_peek_byte(&s->g) >> ((i*bpp) & 0x07)) & ((1<g, ((i & ((num_pixels>>2)-1)) == 0)); yading@10: } yading@10: CHECK_PIXEL_PTR(rle_code * num_pixels); yading@10: while (rle_code--) { yading@10: for (i = 0; i < num_pixels; i++) yading@10: rgb[pixel_ptr++] = pi[i]; yading@10: } yading@10: } else { yading@10: /* copy the same pixel directly to output 4 times */ yading@10: rle_code *= 4; yading@10: CHECK_PIXEL_PTR(rle_code*(num_pixels>>2)); yading@10: while (rle_code--) { yading@10: if(bpp == 4) { yading@10: int x = bytestream2_get_byte(&s->g); yading@10: rgb[pixel_ptr++] = (x >> 4) & 0x0f; yading@10: rgb[pixel_ptr++] = x & 0x0f; yading@10: } else { yading@10: int x = bytestream2_get_byte(&s->g); yading@10: rgb[pixel_ptr++] = (x >> 6) & 0x03; yading@10: rgb[pixel_ptr++] = (x >> 4) & 0x03; yading@10: rgb[pixel_ptr++] = (x >> 2) & 0x03; yading@10: rgb[pixel_ptr++] = x & 0x03; yading@10: } yading@10: } yading@10: } yading@10: } yading@10: row_ptr += row_inc; yading@10: } yading@10: } yading@10: yading@10: static void qtrle_decode_8bpp(QtrleContext *s, int row_ptr, int lines_to_change) yading@10: { yading@10: int rle_code; yading@10: int pixel_ptr; yading@10: int row_inc = s->frame.linesize[0]; yading@10: unsigned char pi1, pi2, pi3, pi4; /* 4 palette indexes */ yading@10: unsigned char *rgb = s->frame.data[0]; yading@10: int pixel_limit = s->frame.linesize[0] * s->avctx->height; yading@10: yading@10: while (lines_to_change--) { yading@10: pixel_ptr = row_ptr + (4 * (bytestream2_get_byte(&s->g) - 1)); yading@10: CHECK_PIXEL_PTR(0); yading@10: yading@10: while ((rle_code = (signed char)bytestream2_get_byte(&s->g)) != -1) { yading@10: if (rle_code == 0) { yading@10: /* there's another skip code in the stream */ yading@10: pixel_ptr += (4 * (bytestream2_get_byte(&s->g) - 1)); yading@10: CHECK_PIXEL_PTR(0); /* make sure pixel_ptr is positive */ yading@10: } else if (rle_code < 0) { yading@10: /* decode the run length code */ yading@10: rle_code = -rle_code; yading@10: /* get the next 4 bytes from the stream, treat them as palette yading@10: * indexes, and output them rle_code times */ yading@10: pi1 = bytestream2_get_byte(&s->g); yading@10: pi2 = bytestream2_get_byte(&s->g); yading@10: pi3 = bytestream2_get_byte(&s->g); yading@10: pi4 = bytestream2_get_byte(&s->g); yading@10: yading@10: CHECK_PIXEL_PTR(rle_code * 4); yading@10: yading@10: while (rle_code--) { yading@10: rgb[pixel_ptr++] = pi1; yading@10: rgb[pixel_ptr++] = pi2; yading@10: rgb[pixel_ptr++] = pi3; yading@10: rgb[pixel_ptr++] = pi4; yading@10: } yading@10: } else { yading@10: /* copy the same pixel directly to output 4 times */ yading@10: rle_code *= 4; yading@10: CHECK_PIXEL_PTR(rle_code); yading@10: yading@10: while (rle_code--) { yading@10: rgb[pixel_ptr++] = bytestream2_get_byte(&s->g); yading@10: } yading@10: } yading@10: } yading@10: row_ptr += row_inc; yading@10: } yading@10: } yading@10: yading@10: static void qtrle_decode_16bpp(QtrleContext *s, int row_ptr, int lines_to_change) yading@10: { yading@10: int rle_code; yading@10: int pixel_ptr; yading@10: int row_inc = s->frame.linesize[0]; yading@10: unsigned short rgb16; yading@10: unsigned char *rgb = s->frame.data[0]; yading@10: int pixel_limit = s->frame.linesize[0] * s->avctx->height; yading@10: yading@10: while (lines_to_change--) { yading@10: pixel_ptr = row_ptr + (bytestream2_get_byte(&s->g) - 1) * 2; yading@10: CHECK_PIXEL_PTR(0); yading@10: yading@10: while ((rle_code = (signed char)bytestream2_get_byte(&s->g)) != -1) { yading@10: if (rle_code == 0) { yading@10: /* there's another skip code in the stream */ yading@10: pixel_ptr += (bytestream2_get_byte(&s->g) - 1) * 2; yading@10: CHECK_PIXEL_PTR(0); /* make sure pixel_ptr is positive */ yading@10: } else if (rle_code < 0) { yading@10: /* decode the run length code */ yading@10: rle_code = -rle_code; yading@10: rgb16 = bytestream2_get_be16(&s->g); yading@10: yading@10: CHECK_PIXEL_PTR(rle_code * 2); yading@10: yading@10: while (rle_code--) { yading@10: *(unsigned short *)(&rgb[pixel_ptr]) = rgb16; yading@10: pixel_ptr += 2; yading@10: } yading@10: } else { yading@10: CHECK_PIXEL_PTR(rle_code * 2); yading@10: yading@10: /* copy pixels directly to output */ yading@10: while (rle_code--) { yading@10: rgb16 = bytestream2_get_be16(&s->g); yading@10: *(unsigned short *)(&rgb[pixel_ptr]) = rgb16; yading@10: pixel_ptr += 2; yading@10: } yading@10: } yading@10: } yading@10: row_ptr += row_inc; yading@10: } yading@10: } yading@10: yading@10: static void qtrle_decode_24bpp(QtrleContext *s, int row_ptr, int lines_to_change) yading@10: { yading@10: int rle_code; yading@10: int pixel_ptr; yading@10: int row_inc = s->frame.linesize[0]; yading@10: unsigned char r, g, b; yading@10: unsigned char *rgb = s->frame.data[0]; yading@10: int pixel_limit = s->frame.linesize[0] * s->avctx->height; yading@10: yading@10: while (lines_to_change--) { yading@10: pixel_ptr = row_ptr + (bytestream2_get_byte(&s->g) - 1) * 3; yading@10: CHECK_PIXEL_PTR(0); yading@10: yading@10: while ((rle_code = (signed char)bytestream2_get_byte(&s->g)) != -1) { yading@10: if (rle_code == 0) { yading@10: /* there's another skip code in the stream */ yading@10: pixel_ptr += (bytestream2_get_byte(&s->g) - 1) * 3; yading@10: CHECK_PIXEL_PTR(0); /* make sure pixel_ptr is positive */ yading@10: } else if (rle_code < 0) { yading@10: /* decode the run length code */ yading@10: rle_code = -rle_code; yading@10: r = bytestream2_get_byte(&s->g); yading@10: g = bytestream2_get_byte(&s->g); yading@10: b = bytestream2_get_byte(&s->g); yading@10: yading@10: CHECK_PIXEL_PTR(rle_code * 3); yading@10: yading@10: while (rle_code--) { yading@10: rgb[pixel_ptr++] = r; yading@10: rgb[pixel_ptr++] = g; yading@10: rgb[pixel_ptr++] = b; yading@10: } yading@10: } else { yading@10: CHECK_PIXEL_PTR(rle_code * 3); yading@10: yading@10: /* copy pixels directly to output */ yading@10: while (rle_code--) { yading@10: rgb[pixel_ptr++] = bytestream2_get_byte(&s->g); yading@10: rgb[pixel_ptr++] = bytestream2_get_byte(&s->g); yading@10: rgb[pixel_ptr++] = bytestream2_get_byte(&s->g); yading@10: } yading@10: } yading@10: } yading@10: row_ptr += row_inc; yading@10: } yading@10: } yading@10: yading@10: static void qtrle_decode_32bpp(QtrleContext *s, int row_ptr, int lines_to_change) yading@10: { yading@10: int rle_code; yading@10: int pixel_ptr; yading@10: int row_inc = s->frame.linesize[0]; yading@10: unsigned int argb; yading@10: unsigned char *rgb = s->frame.data[0]; yading@10: int pixel_limit = s->frame.linesize[0] * s->avctx->height; yading@10: yading@10: while (lines_to_change--) { yading@10: pixel_ptr = row_ptr + (bytestream2_get_byte(&s->g) - 1) * 4; yading@10: CHECK_PIXEL_PTR(0); yading@10: yading@10: while ((rle_code = (signed char)bytestream2_get_byte(&s->g)) != -1) { yading@10: if (rle_code == 0) { yading@10: /* there's another skip code in the stream */ yading@10: pixel_ptr += (bytestream2_get_byte(&s->g) - 1) * 4; yading@10: CHECK_PIXEL_PTR(0); /* make sure pixel_ptr is positive */ yading@10: } else if (rle_code < 0) { yading@10: /* decode the run length code */ yading@10: rle_code = -rle_code; yading@10: argb = bytestream2_get_be32(&s->g); yading@10: yading@10: CHECK_PIXEL_PTR(rle_code * 4); yading@10: yading@10: while (rle_code--) { yading@10: AV_WN32A(rgb + pixel_ptr, argb); yading@10: pixel_ptr += 4; yading@10: } yading@10: } else { yading@10: CHECK_PIXEL_PTR(rle_code * 4); yading@10: yading@10: /* copy pixels directly to output */ yading@10: while (rle_code--) { yading@10: argb = bytestream2_get_be32(&s->g); yading@10: AV_WN32A(rgb + pixel_ptr, argb); yading@10: pixel_ptr += 4; yading@10: } yading@10: } yading@10: } yading@10: row_ptr += row_inc; yading@10: } yading@10: } yading@10: yading@10: static av_cold int qtrle_decode_init(AVCodecContext *avctx) yading@10: { yading@10: QtrleContext *s = avctx->priv_data; yading@10: yading@10: s->avctx = avctx; yading@10: switch (avctx->bits_per_coded_sample) { yading@10: case 1: yading@10: case 33: yading@10: avctx->pix_fmt = AV_PIX_FMT_MONOWHITE; yading@10: break; yading@10: yading@10: case 2: yading@10: case 4: yading@10: case 8: yading@10: case 34: yading@10: case 36: yading@10: case 40: yading@10: avctx->pix_fmt = AV_PIX_FMT_PAL8; yading@10: break; yading@10: yading@10: case 16: yading@10: avctx->pix_fmt = AV_PIX_FMT_RGB555; yading@10: break; yading@10: yading@10: case 24: yading@10: avctx->pix_fmt = AV_PIX_FMT_RGB24; yading@10: break; yading@10: yading@10: case 32: yading@10: avctx->pix_fmt = AV_PIX_FMT_RGB32; yading@10: break; yading@10: yading@10: default: yading@10: av_log (avctx, AV_LOG_ERROR, "Unsupported colorspace: %d bits/sample?\n", yading@10: avctx->bits_per_coded_sample); yading@10: return AVERROR_INVALIDDATA; yading@10: } yading@10: yading@10: avcodec_get_frame_defaults(&s->frame); yading@10: yading@10: return 0; yading@10: } yading@10: yading@10: static int qtrle_decode_frame(AVCodecContext *avctx, yading@10: void *data, int *got_frame, yading@10: AVPacket *avpkt) yading@10: { yading@10: QtrleContext *s = avctx->priv_data; yading@10: int header, start_line; yading@10: int height, row_ptr; yading@10: int has_palette = 0; yading@10: int ret; yading@10: yading@10: bytestream2_init(&s->g, avpkt->data, avpkt->size); yading@10: if ((ret = ff_reget_buffer(avctx, &s->frame)) < 0) yading@10: return ret; yading@10: yading@10: /* check if this frame is even supposed to change */ yading@10: if (avpkt->size < 8) yading@10: goto done; yading@10: yading@10: /* start after the chunk size */ yading@10: bytestream2_seek(&s->g, 4, SEEK_SET); yading@10: yading@10: /* fetch the header */ yading@10: header = bytestream2_get_be16(&s->g); yading@10: yading@10: /* if a header is present, fetch additional decoding parameters */ yading@10: if (header & 0x0008) { yading@10: if (avpkt->size < 14) yading@10: goto done; yading@10: start_line = bytestream2_get_be16(&s->g); yading@10: bytestream2_skip(&s->g, 2); yading@10: height = bytestream2_get_be16(&s->g); yading@10: bytestream2_skip(&s->g, 2); yading@10: if (height > s->avctx->height - start_line) yading@10: goto done; yading@10: } else { yading@10: start_line = 0; yading@10: height = s->avctx->height; yading@10: } yading@10: row_ptr = s->frame.linesize[0] * start_line; yading@10: yading@10: switch (avctx->bits_per_coded_sample) { yading@10: case 1: yading@10: case 33: yading@10: qtrle_decode_1bpp(s, row_ptr, height); yading@10: break; yading@10: yading@10: case 2: yading@10: case 34: yading@10: qtrle_decode_2n4bpp(s, row_ptr, height, 2); yading@10: has_palette = 1; yading@10: break; yading@10: yading@10: case 4: yading@10: case 36: yading@10: qtrle_decode_2n4bpp(s, row_ptr, height, 4); yading@10: has_palette = 1; yading@10: break; yading@10: yading@10: case 8: yading@10: case 40: yading@10: qtrle_decode_8bpp(s, row_ptr, height); yading@10: has_palette = 1; yading@10: break; yading@10: yading@10: case 16: yading@10: qtrle_decode_16bpp(s, row_ptr, height); yading@10: break; yading@10: yading@10: case 24: yading@10: qtrle_decode_24bpp(s, row_ptr, height); yading@10: break; yading@10: yading@10: case 32: yading@10: qtrle_decode_32bpp(s, row_ptr, height); yading@10: break; yading@10: yading@10: default: yading@10: av_log (s->avctx, AV_LOG_ERROR, "Unsupported colorspace: %d bits/sample?\n", yading@10: avctx->bits_per_coded_sample); yading@10: break; yading@10: } yading@10: yading@10: if(has_palette) { yading@10: const uint8_t *pal = av_packet_get_side_data(avpkt, AV_PKT_DATA_PALETTE, NULL); yading@10: yading@10: if (pal) { yading@10: s->frame.palette_has_changed = 1; yading@10: memcpy(s->pal, pal, AVPALETTE_SIZE); yading@10: } yading@10: yading@10: /* make the palette available on the way out */ yading@10: memcpy(s->frame.data[1], s->pal, AVPALETTE_SIZE); yading@10: } yading@10: yading@10: done: yading@10: if ((ret = av_frame_ref(data, &s->frame)) < 0) yading@10: return ret; yading@10: *got_frame = 1; yading@10: yading@10: /* always report that the buffer was completely consumed */ yading@10: return avpkt->size; yading@10: } yading@10: yading@10: static av_cold int qtrle_decode_end(AVCodecContext *avctx) yading@10: { yading@10: QtrleContext *s = avctx->priv_data; yading@10: yading@10: av_frame_unref(&s->frame); yading@10: yading@10: return 0; yading@10: } yading@10: yading@10: AVCodec ff_qtrle_decoder = { yading@10: .name = "qtrle", yading@10: .type = AVMEDIA_TYPE_VIDEO, yading@10: .id = AV_CODEC_ID_QTRLE, yading@10: .priv_data_size = sizeof(QtrleContext), yading@10: .init = qtrle_decode_init, yading@10: .close = qtrle_decode_end, yading@10: .decode = qtrle_decode_frame, yading@10: .capabilities = CODEC_CAP_DR1, yading@10: .long_name = NULL_IF_CONFIG_SMALL("QuickTime Animation (RLE) video"), yading@10: };