Line | Branch | Exec | Source |
---|---|---|---|
1 | /* | ||
2 | * Sega FILM Format (CPK) Muxer | ||
3 | * Copyright (C) 2003 The FFmpeg project | ||
4 | * Copyright (C) 2018 Misty De Meo | ||
5 | * | ||
6 | * This file is part of FFmpeg. | ||
7 | * | ||
8 | * FFmpeg is free software; you can redistribute it and/or | ||
9 | * modify it under the terms of the GNU Lesser General Public | ||
10 | * License as published by the Free Software Foundation; either | ||
11 | * version 2.1 of the License, or (at your option) any later version. | ||
12 | * | ||
13 | * FFmpeg is distributed in the hope that it will be useful, | ||
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | ||
16 | * Lesser General Public License for more details. | ||
17 | * | ||
18 | * You should have received a copy of the GNU Lesser General Public | ||
19 | * License along with FFmpeg; if not, write to the Free Software | ||
20 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA | ||
21 | */ | ||
22 | |||
23 | /** | ||
24 | * @file | ||
25 | * Sega FILM (.cpk) file muxer | ||
26 | * @author Misty De Meo <misty@brew.sh> | ||
27 | * | ||
28 | * @see For more information regarding the Sega FILM file format, visit: | ||
29 | * http://wiki.multimedia.cx/index.php?title=Sega_FILM | ||
30 | */ | ||
31 | |||
32 | #include "libavutil/avassert.h" | ||
33 | #include "libavutil/intreadwrite.h" | ||
34 | #include "libavcodec/bytestream.h" | ||
35 | #include "avformat.h" | ||
36 | #include "avio_internal.h" | ||
37 | #include "mux.h" | ||
38 | |||
39 | typedef struct FILMOutputContext { | ||
40 | AVIOContext *header; | ||
41 | unsigned index; | ||
42 | int audio_index; | ||
43 | int video_index; | ||
44 | } FILMOutputContext; | ||
45 | |||
46 | 1420 | static int film_write_packet(AVFormatContext *format_context, AVPacket *pkt) | |
47 | { | ||
48 | 1420 | AVIOContext *pb = format_context->pb; | |
49 | 1420 | FILMOutputContext *film = format_context->priv_data; | |
50 | 1420 | int encoded_buf_size, size = pkt->size; | |
51 | uint32_t info1, info2; | ||
52 | enum AVCodecID codec_id; | ||
53 | |||
54 | 1420 | codec_id = format_context->streams[pkt->stream_index]->codecpar->codec_id; | |
55 | |||
56 | /* Sega Cinepak has an extra two-byte header; write dummy data there, | ||
57 | * then adjust the cvid header to accommodate for the extra size */ | ||
58 |
2/2✓ Branch 0 taken 271 times.
✓ Branch 1 taken 1149 times.
|
1420 | if (codec_id == AV_CODEC_ID_CINEPAK) { |
59 | 271 | encoded_buf_size = AV_RB24(&pkt->data[1]); | |
60 | /* Already Sega Cinepak, so no need to reformat the packets */ | ||
61 |
3/4✓ Branch 0 taken 119 times.
✓ Branch 1 taken 152 times.
✓ Branch 2 taken 119 times.
✗ Branch 3 not taken.
|
271 | if (encoded_buf_size != pkt->size && (pkt->size % encoded_buf_size) != 0) { |
62 | 119 | avio_write(pb, pkt->data, pkt->size); | |
63 | } else { | ||
64 | /* In Sega Cinepak, the reported size in the Cinepak header is | ||
65 | * 8 bytes too short. However, the size in the STAB section of the header | ||
66 | * is correct, taking into account the extra two bytes. */ | ||
67 | 152 | AV_WB24(&pkt->data[1], pkt->size - 8 + 2); | |
68 | 152 | size += 2; | |
69 | |||
70 | 152 | avio_write(pb, pkt->data, 10); | |
71 | 152 | avio_wb16(pb, 0); | |
72 | 152 | avio_write(pb, &pkt->data[10], pkt->size - 10); | |
73 | } | ||
74 | } else { | ||
75 | /* Other formats can just be written as-is */ | ||
76 | 1149 | avio_write(pb, pkt->data, pkt->size); | |
77 | } | ||
78 | |||
79 | /* Add the 16-byte sample info entry to the dynamic buffer | ||
80 | * for the STAB chunk in the header */ | ||
81 | 1420 | pb = film->header; | |
82 | 1420 | avio_wb32(pb, film->index); | |
83 | 1420 | film->index += size; | |
84 | 1420 | avio_wb32(pb, size); | |
85 |
2/2✓ Branch 0 taken 1070 times.
✓ Branch 1 taken 350 times.
|
1420 | if (film->audio_index == pkt->stream_index) { |
86 | /* Always the same, carries no more information than "this is audio" */ | ||
87 | 1070 | info1 = 0xFFFFFFFF; | |
88 | 1070 | info2 = 1; | |
89 | } else { | ||
90 | 350 | info1 = pkt->pts; | |
91 | 350 | info2 = pkt->duration; | |
92 | /* The top bit being set indicates a key frame */ | ||
93 |
2/2✓ Branch 0 taken 238 times.
✓ Branch 1 taken 112 times.
|
350 | if (!(pkt->flags & AV_PKT_FLAG_KEY)) |
94 | 238 | info1 |= 1U << 31; | |
95 | } | ||
96 | 1420 | avio_wb32(pb, info1); | |
97 | 1420 | avio_wb32(pb, info2); | |
98 | |||
99 | 1420 | return pb->error; | |
100 | } | ||
101 | |||
102 | 6 | static int get_audio_codec_id(enum AVCodecID codec_id) | |
103 | { | ||
104 | /* 0 (PCM) and 2 (ADX) are the only known values */ | ||
105 |
2/3✓ Branch 0 taken 4 times.
✓ Branch 1 taken 2 times.
✗ Branch 2 not taken.
|
6 | switch (codec_id) { |
106 | 4 | case AV_CODEC_ID_PCM_S8_PLANAR: | |
107 | case AV_CODEC_ID_PCM_S16BE_PLANAR: | ||
108 | 4 | return 0; | |
109 | 2 | case AV_CODEC_ID_ADPCM_ADX: | |
110 | 2 | return 2; | |
111 | ✗ | default: | |
112 | ✗ | return -1; | |
113 | } | ||
114 | } | ||
115 | |||
116 | 4 | static int film_init(AVFormatContext *format_context) | |
117 | { | ||
118 | 4 | FILMOutputContext *film = format_context->priv_data; | |
119 | int ret; | ||
120 | |||
121 | 4 | film->audio_index = -1; | |
122 | 4 | film->video_index = -1; | |
123 | |||
124 |
2/2✓ Branch 0 taken 7 times.
✓ Branch 1 taken 4 times.
|
11 | for (int i = 0; i < format_context->nb_streams; i++) { |
125 | 7 | AVStream *st = format_context->streams[i]; | |
126 |
2/2✓ Branch 0 taken 3 times.
✓ Branch 1 taken 4 times.
|
7 | if (st->codecpar->codec_type == AVMEDIA_TYPE_AUDIO) { |
127 |
1/2✗ Branch 1 not taken.
✓ Branch 2 taken 3 times.
|
3 | if (get_audio_codec_id(st->codecpar->codec_id) < 0) { |
128 | ✗ | av_log(format_context, AV_LOG_ERROR, | |
129 | "Incompatible audio stream format.\n"); | ||
130 | ✗ | return AVERROR(EINVAL); | |
131 | } | ||
132 | 3 | film->audio_index = i; | |
133 | } | ||
134 | |||
135 |
2/2✓ Branch 0 taken 4 times.
✓ Branch 1 taken 3 times.
|
7 | if (st->codecpar->codec_type == AVMEDIA_TYPE_VIDEO) { |
136 |
2/2✓ Branch 0 taken 1 times.
✓ Branch 1 taken 3 times.
|
4 | if (st->codecpar->codec_id != AV_CODEC_ID_CINEPAK && |
137 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 1 times.
|
1 | st->codecpar->codec_id != AV_CODEC_ID_RAWVIDEO) { |
138 | ✗ | av_log(format_context, AV_LOG_ERROR, | |
139 | "Incompatible video stream format.\n"); | ||
140 | ✗ | return AVERROR(EINVAL); | |
141 | } | ||
142 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if (st->codecpar->format != AV_PIX_FMT_RGB24) { |
143 | ✗ | av_log(format_context, AV_LOG_ERROR, | |
144 | "Pixel format must be rgb24.\n"); | ||
145 | ✗ | return AVERROR(EINVAL); | |
146 | } | ||
147 | 4 | film->video_index = i; | |
148 | } | ||
149 | } | ||
150 | |||
151 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if (film->video_index == -1) { |
152 | ✗ | av_log(format_context, AV_LOG_ERROR, "No video stream present.\n"); | |
153 | ✗ | return AVERROR(EINVAL); | |
154 | } | ||
155 |
1/2✗ Branch 1 not taken.
✓ Branch 2 taken 4 times.
|
4 | if ((ret = avio_open_dyn_buf(&film->header)) < 0) |
156 | ✗ | return ret; | |
157 | 4 | ffio_fill(film->header, 0, 16 + 32 + 16); | |
158 | |||
159 | 4 | return 0; | |
160 | } | ||
161 | |||
162 | 4 | static int write_header(AVFormatContext *format_context, uint8_t *header, | |
163 | unsigned header_size) | ||
164 | { | ||
165 | 4 | int ret = ff_format_shift_data(format_context, 0, header_size); | |
166 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if (ret < 0) |
167 | ✗ | return ret; | |
168 | |||
169 | 4 | avio_seek(format_context->pb, 0, SEEK_SET); | |
170 | 4 | avio_write(format_context->pb, header, header_size); | |
171 | |||
172 | 4 | return 0; | |
173 | } | ||
174 | |||
175 | 4 | static int film_write_header(AVFormatContext *format_context) | |
176 | { | ||
177 | 4 | int ret = 0; | |
178 | unsigned stabsize, headersize, packet_count; | ||
179 | 4 | FILMOutputContext *film = format_context->priv_data; | |
180 | 4 | AVStream *video = NULL; | |
181 | uint8_t *header, *ptr; | ||
182 | |||
183 | /* Calculate how much we need to reserve for the header; | ||
184 | * this is the amount the rest of the data will be shifted up by. */ | ||
185 | 4 | headersize = avio_get_dyn_buf(film->header, &header); | |
186 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if (headersize < 64) { |
187 | av_assert1(film->header->error < 0); | ||
188 | ✗ | return film->header->error; | |
189 | } | ||
190 | 4 | packet_count = (headersize - 64) / 16; | |
191 | 4 | stabsize = 16 + 16 * packet_count; | |
192 | 4 | headersize = 16 + /* FILM header base */ | |
193 | 32 + /* FDSC chunk */ | ||
194 | stabsize; | ||
195 | |||
196 | /* Write the header at the position in the buffer reserved for it. | ||
197 | * First, write the FILM header; this is very simple */ | ||
198 | 4 | ptr = header; | |
199 | 4 | bytestream_put_be32(&ptr, MKBETAG('F', 'I', 'L', 'M')); | |
200 | 4 | bytestream_put_be32(&ptr, headersize); | |
201 | /* This seems to be okay to hardcode, since this muxer targets 1.09 features; | ||
202 | * videos produced by this muxer are readable by 1.08 and lower players. */ | ||
203 | 4 | bytestream_put_be32(&ptr, MKBETAG('1', '.', '0', '9')); | |
204 | /* I have no idea what the next four bytes do, might be reserved */ | ||
205 | 4 | ptr += 4; | |
206 | |||
207 | /* Next write the FDSC (file description) chunk */ | ||
208 | 4 | bytestream_put_be32(&ptr, MKBETAG('F', 'D', 'S', 'C')); | |
209 | 4 | bytestream_put_be32(&ptr, 0x20); /* Size of FDSC chunk */ | |
210 | |||
211 | 4 | video = format_context->streams[film->video_index]; | |
212 | |||
213 | /* The only two supported codecs; raw video is rare */ | ||
214 |
2/3✓ Branch 0 taken 3 times.
✓ Branch 1 taken 1 times.
✗ Branch 2 not taken.
|
4 | switch (video->codecpar->codec_id) { |
215 | 3 | case AV_CODEC_ID_CINEPAK: | |
216 | 3 | bytestream_put_be32(&ptr, MKBETAG('c', 'v', 'i', 'd')); | |
217 | 3 | break; | |
218 | 1 | case AV_CODEC_ID_RAWVIDEO: | |
219 | 1 | bytestream_put_be32(&ptr, MKBETAG('r', 'a', 'w', ' ')); | |
220 | 1 | break; | |
221 | } | ||
222 | |||
223 | 4 | bytestream_put_be32(&ptr, video->codecpar->height); | |
224 | 4 | bytestream_put_be32(&ptr, video->codecpar->width); | |
225 | 4 | bytestream_put_byte(&ptr, 24); /* Bits per pixel - observed to always be 24 */ | |
226 | |||
227 |
2/2✓ Branch 0 taken 3 times.
✓ Branch 1 taken 1 times.
|
4 | if (film->audio_index > -1) { |
228 | 3 | AVStream *audio = format_context->streams[film->audio_index]; | |
229 | 3 | int audio_codec = get_audio_codec_id(audio->codecpar->codec_id); | |
230 | |||
231 | 3 | bytestream_put_byte(&ptr, audio->codecpar->ch_layout.nb_channels); /* Audio channels */ | |
232 | 3 | bytestream_put_byte(&ptr, audio->codecpar->bits_per_coded_sample); /* Audio bit depth */ | |
233 | 3 | bytestream_put_byte(&ptr, audio_codec); /* Compression - 0 is PCM, 2 is ADX */ | |
234 | 3 | bytestream_put_be16(&ptr, audio->codecpar->sample_rate); /* Audio sampling rate */ | |
235 | } else { | ||
236 | /* If there is no audio, all the audio fields should be set to zero. | ||
237 | * ffio_fill() already did this for us. */ | ||
238 | 1 | ptr += 1 + 1 + 1 + 2; | |
239 | } | ||
240 | |||
241 | /* I have no idea what this pair of fields does either, might be reserved */ | ||
242 | 4 | ptr += 4 + 2; | |
243 | |||
244 | /* Finally, write the STAB (sample table) chunk */ | ||
245 | 4 | bytestream_put_be32(&ptr, MKBETAG('S', 'T', 'A', 'B')); | |
246 | 4 | bytestream_put_be32(&ptr, stabsize); | |
247 | /* Framerate base frequency. Here we're assuming that the frame rate is even. | ||
248 | * In real world Sega FILM files, there are usually a couple of approaches: | ||
249 | * a) framerate base frequency is the same as the framerate, and ticks | ||
250 | * increment by 1 every frame, or | ||
251 | * b) framerate base frequency is a much larger number, and ticks | ||
252 | * increment by larger steps every frame. | ||
253 | * The latter occurs even in cases where the frame rate is even; for example, in | ||
254 | * Lunar: Silver Star Story, the base frequency is 600 and each frame, the ticks | ||
255 | * are incremented by 25 for an evenly spaced framerate of 24fps. */ | ||
256 | 4 | bytestream_put_be32(&ptr, av_q2d(av_inv_q(video->time_base))); | |
257 | |||
258 | 4 | bytestream_put_be32(&ptr, packet_count); | |
259 | |||
260 | /* Finally, shift the data and write out the header. */ | ||
261 | 4 | ret = write_header(format_context, header, headersize); | |
262 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if (ret < 0) |
263 | ✗ | return ret; | |
264 | |||
265 | 4 | return 0; | |
266 | } | ||
267 | |||
268 | 4 | static void film_deinit(AVFormatContext *format_context) | |
269 | { | ||
270 | 4 | FILMOutputContext *film = format_context->priv_data; | |
271 | |||
272 | 4 | ffio_free_dyn_buf(&film->header); | |
273 | 4 | } | |
274 | |||
275 | const FFOutputFormat ff_segafilm_muxer = { | ||
276 | .p.name = "film_cpk", | ||
277 | .p.long_name = NULL_IF_CONFIG_SMALL("Sega FILM / CPK"), | ||
278 | .p.extensions = "cpk", | ||
279 | .priv_data_size = sizeof(FILMOutputContext), | ||
280 | .p.audio_codec = AV_CODEC_ID_PCM_S16BE_PLANAR, | ||
281 | .p.video_codec = AV_CODEC_ID_CINEPAK, | ||
282 | .p.subtitle_codec = AV_CODEC_ID_NONE, | ||
283 | .flags_internal = FF_OFMT_FLAG_MAX_ONE_OF_EACH, | ||
284 | .init = film_init, | ||
285 | .write_trailer = film_write_header, | ||
286 | .write_packet = film_write_packet, | ||
287 | .deinit = film_deinit, | ||
288 | }; | ||
289 |