Commit | Line | Data |
---|---|---|
2ba45a60 DM |
1 | /* |
2 | * Sony PlayStation MDEC (Motion DECoder) | |
3 | * Copyright (c) 2003 Michael Niedermayer | |
4 | * | |
5 | * based upon code from Sebastian Jedruszkiewicz <elf@frogger.rules.pl> | |
6 | * | |
7 | * This file is part of FFmpeg. | |
8 | * | |
9 | * FFmpeg is free software; you can redistribute it and/or | |
10 | * modify it under the terms of the GNU Lesser General Public | |
11 | * License as published by the Free Software Foundation; either | |
12 | * version 2.1 of the License, or (at your option) any later version. | |
13 | * | |
14 | * FFmpeg 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 GNU | |
17 | * Lesser General Public License for more details. | |
18 | * | |
19 | * You should have received a copy of the GNU Lesser General Public | |
20 | * License along with FFmpeg; if not, write to the Free Software | |
21 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA | |
22 | */ | |
23 | ||
24 | /** | |
25 | * @file | |
26 | * Sony PlayStation MDEC (Motion DECoder) | |
27 | * This is very similar to intra-only MPEG-1. | |
28 | */ | |
29 | ||
30 | #include "avcodec.h" | |
31 | #include "blockdsp.h" | |
32 | #include "bswapdsp.h" | |
33 | #include "idctdsp.h" | |
34 | #include "mpegvideo.h" | |
35 | #include "mpeg12.h" | |
36 | #include "thread.h" | |
37 | ||
38 | typedef struct MDECContext { | |
39 | AVCodecContext *avctx; | |
40 | BlockDSPContext bdsp; | |
41 | BswapDSPContext bbdsp; | |
42 | IDCTDSPContext idsp; | |
43 | ThreadFrame frame; | |
44 | GetBitContext gb; | |
45 | ScanTable scantable; | |
46 | int version; | |
47 | int qscale; | |
48 | int last_dc[3]; | |
49 | int mb_width; | |
50 | int mb_height; | |
51 | int mb_x, mb_y; | |
52 | DECLARE_ALIGNED(16, int16_t, block)[6][64]; | |
53 | uint8_t *bitstream_buffer; | |
54 | unsigned int bitstream_buffer_size; | |
55 | int block_last_index[6]; | |
56 | } MDECContext; | |
57 | ||
58 | //very similar to MPEG-1 | |
59 | static inline int mdec_decode_block_intra(MDECContext *a, int16_t *block, int n) | |
60 | { | |
61 | int level, diff, i, j, run; | |
62 | int component; | |
63 | RLTable *rl = &ff_rl_mpeg1; | |
64 | uint8_t * const scantable = a->scantable.permutated; | |
65 | const uint16_t *quant_matrix = ff_mpeg1_default_intra_matrix; | |
66 | const int qscale = a->qscale; | |
67 | ||
68 | /* DC coefficient */ | |
69 | if (a->version == 2) { | |
70 | block[0] = 2 * get_sbits(&a->gb, 10) + 1024; | |
71 | } else { | |
72 | component = (n <= 3 ? 0 : n - 4 + 1); | |
73 | diff = decode_dc(&a->gb, component); | |
74 | if (diff >= 0xffff) | |
75 | return AVERROR_INVALIDDATA; | |
76 | a->last_dc[component] += diff; | |
77 | block[0] = a->last_dc[component] << 3; | |
78 | } | |
79 | ||
80 | i = 0; | |
81 | { | |
82 | OPEN_READER(re, &a->gb); | |
83 | /* now quantify & encode AC coefficients */ | |
84 | for (;;) { | |
85 | UPDATE_CACHE(re, &a->gb); | |
86 | GET_RL_VLC(level, run, re, &a->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0); | |
87 | ||
88 | if (level == 127) { | |
89 | break; | |
90 | } else if (level != 0) { | |
91 | i += run; | |
92 | j = scantable[i]; | |
93 | level = (level * qscale * quant_matrix[j]) >> 3; | |
94 | level = (level ^ SHOW_SBITS(re, &a->gb, 1)) - SHOW_SBITS(re, &a->gb, 1); | |
95 | LAST_SKIP_BITS(re, &a->gb, 1); | |
96 | } else { | |
97 | /* escape */ | |
98 | run = SHOW_UBITS(re, &a->gb, 6)+1; LAST_SKIP_BITS(re, &a->gb, 6); | |
99 | UPDATE_CACHE(re, &a->gb); | |
100 | level = SHOW_SBITS(re, &a->gb, 10); SKIP_BITS(re, &a->gb, 10); | |
101 | i += run; | |
102 | j = scantable[i]; | |
103 | if (level < 0) { | |
104 | level = -level; | |
105 | level = (level * qscale * quant_matrix[j]) >> 3; | |
106 | level = (level - 1) | 1; | |
107 | level = -level; | |
108 | } else { | |
109 | level = (level * qscale * quant_matrix[j]) >> 3; | |
110 | level = (level - 1) | 1; | |
111 | } | |
112 | } | |
113 | if (i > 63) { | |
114 | av_log(a->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", a->mb_x, a->mb_y); | |
115 | return AVERROR_INVALIDDATA; | |
116 | } | |
117 | ||
118 | block[j] = level; | |
119 | } | |
120 | CLOSE_READER(re, &a->gb); | |
121 | } | |
122 | a->block_last_index[n] = i; | |
123 | return 0; | |
124 | } | |
125 | ||
126 | static inline int decode_mb(MDECContext *a, int16_t block[6][64]) | |
127 | { | |
128 | int i, ret; | |
129 | static const int block_index[6] = { 5, 4, 0, 1, 2, 3 }; | |
130 | ||
131 | a->bdsp.clear_blocks(block[0]); | |
132 | ||
133 | for (i = 0; i < 6; i++) { | |
134 | if ((ret = mdec_decode_block_intra(a, block[block_index[i]], | |
135 | block_index[i])) < 0) | |
136 | return ret; | |
137 | if (get_bits_left(&a->gb) < 0) | |
138 | return AVERROR_INVALIDDATA; | |
139 | } | |
140 | return 0; | |
141 | } | |
142 | ||
143 | static inline void idct_put(MDECContext *a, AVFrame *frame, int mb_x, int mb_y) | |
144 | { | |
145 | int16_t (*block)[64] = a->block; | |
146 | int linesize = frame->linesize[0]; | |
147 | ||
148 | uint8_t *dest_y = frame->data[0] + (mb_y * 16* linesize ) + mb_x * 16; | |
149 | uint8_t *dest_cb = frame->data[1] + (mb_y * 8 * frame->linesize[1]) + mb_x * 8; | |
150 | uint8_t *dest_cr = frame->data[2] + (mb_y * 8 * frame->linesize[2]) + mb_x * 8; | |
151 | ||
152 | a->idsp.idct_put(dest_y, linesize, block[0]); | |
153 | a->idsp.idct_put(dest_y + 8, linesize, block[1]); | |
154 | a->idsp.idct_put(dest_y + 8 * linesize, linesize, block[2]); | |
155 | a->idsp.idct_put(dest_y + 8 * linesize + 8, linesize, block[3]); | |
156 | ||
157 | if (!(a->avctx->flags & CODEC_FLAG_GRAY)) { | |
158 | a->idsp.idct_put(dest_cb, frame->linesize[1], block[4]); | |
159 | a->idsp.idct_put(dest_cr, frame->linesize[2], block[5]); | |
160 | } | |
161 | } | |
162 | ||
163 | static int decode_frame(AVCodecContext *avctx, | |
164 | void *data, int *got_frame, | |
165 | AVPacket *avpkt) | |
166 | { | |
167 | MDECContext * const a = avctx->priv_data; | |
168 | const uint8_t *buf = avpkt->data; | |
169 | int buf_size = avpkt->size; | |
170 | ThreadFrame frame = { .f = data }; | |
171 | int ret; | |
172 | ||
173 | if ((ret = ff_thread_get_buffer(avctx, &frame, 0)) < 0) | |
174 | return ret; | |
175 | frame.f->pict_type = AV_PICTURE_TYPE_I; | |
176 | frame.f->key_frame = 1; | |
177 | ||
178 | av_fast_padded_malloc(&a->bitstream_buffer, &a->bitstream_buffer_size, buf_size); | |
179 | if (!a->bitstream_buffer) | |
180 | return AVERROR(ENOMEM); | |
181 | a->bbdsp.bswap16_buf((uint16_t *)a->bitstream_buffer, (uint16_t *)buf, (buf_size + 1) / 2); | |
182 | if ((ret = init_get_bits8(&a->gb, a->bitstream_buffer, buf_size)) < 0) | |
183 | return ret; | |
184 | ||
185 | /* skip over 4 preamble bytes in stream (typically 0xXX 0xXX 0x00 0x38) */ | |
186 | skip_bits(&a->gb, 32); | |
187 | ||
188 | a->qscale = get_bits(&a->gb, 16); | |
189 | a->version = get_bits(&a->gb, 16); | |
190 | ||
191 | a->last_dc[0] = a->last_dc[1] = a->last_dc[2] = 128; | |
192 | ||
193 | for (a->mb_x = 0; a->mb_x < a->mb_width; a->mb_x++) { | |
194 | for (a->mb_y = 0; a->mb_y < a->mb_height; a->mb_y++) { | |
195 | if ((ret = decode_mb(a, a->block)) < 0) | |
196 | return ret; | |
197 | ||
198 | idct_put(a, frame.f, a->mb_x, a->mb_y); | |
199 | } | |
200 | } | |
201 | ||
202 | *got_frame = 1; | |
203 | ||
204 | return (get_bits_count(&a->gb) + 31) / 32 * 4; | |
205 | } | |
206 | ||
207 | static av_cold int decode_init(AVCodecContext *avctx) | |
208 | { | |
209 | MDECContext * const a = avctx->priv_data; | |
210 | ||
211 | a->mb_width = (avctx->coded_width + 15) / 16; | |
212 | a->mb_height = (avctx->coded_height + 15) / 16; | |
213 | ||
214 | a->avctx = avctx; | |
215 | ||
216 | ff_blockdsp_init(&a->bdsp, avctx); | |
217 | ff_bswapdsp_init(&a->bbdsp); | |
218 | ff_idctdsp_init(&a->idsp, avctx); | |
219 | ff_mpeg12_init_vlcs(); | |
220 | ff_init_scantable(a->idsp.idct_permutation, &a->scantable, | |
221 | ff_zigzag_direct); | |
222 | ||
223 | if (avctx->idct_algo == FF_IDCT_AUTO) | |
224 | avctx->idct_algo = FF_IDCT_SIMPLE; | |
225 | avctx->pix_fmt = AV_PIX_FMT_YUVJ420P; | |
226 | avctx->color_range = AVCOL_RANGE_JPEG; | |
227 | ||
228 | return 0; | |
229 | } | |
230 | ||
231 | static av_cold int decode_init_thread_copy(AVCodecContext *avctx) | |
232 | { | |
233 | MDECContext * const a = avctx->priv_data; | |
234 | ||
235 | a->avctx = avctx; | |
236 | ||
237 | return 0; | |
238 | } | |
239 | ||
240 | static av_cold int decode_end(AVCodecContext *avctx) | |
241 | { | |
242 | MDECContext * const a = avctx->priv_data; | |
243 | ||
244 | av_freep(&a->bitstream_buffer); | |
245 | a->bitstream_buffer_size = 0; | |
246 | ||
247 | return 0; | |
248 | } | |
249 | ||
250 | AVCodec ff_mdec_decoder = { | |
251 | .name = "mdec", | |
252 | .long_name = NULL_IF_CONFIG_SMALL("Sony PlayStation MDEC (Motion DECoder)"), | |
253 | .type = AVMEDIA_TYPE_VIDEO, | |
254 | .id = AV_CODEC_ID_MDEC, | |
255 | .priv_data_size = sizeof(MDECContext), | |
256 | .init = decode_init, | |
257 | .close = decode_end, | |
258 | .decode = decode_frame, | |
259 | .capabilities = CODEC_CAP_DR1 | CODEC_CAP_FRAME_THREADS, | |
260 | .init_thread_copy = ONLY_IF_THREADS_ENABLED(decode_init_thread_copy) | |
261 | }; |