changing AVCodecContext codec -> *codec in AVStream so additions to AVCodecContext...
[libav.git] / libavformat / psxstr.c
1 /*
2 * Sony Playstation (PSX) STR File Demuxer
3 * Copyright (c) 2003 The ffmpeg Project
4 *
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
9 *
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
14 *
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 */
19
20 /**
21 * @file psxstr.c
22 * PSX STR file demuxer
23 * by Mike Melanson (melanson@pcisys.net)
24 * This module handles streams that have been ripped from Sony Playstation
25 * CD games. This demuxer can handle either raw STR files (which are just
26 * concatenations of raw compact disc sectors) or STR files with 0x2C-byte
27 * RIFF headers, followed by CD sectors.
28 */
29
30 #include "avformat.h"
31
32 //#define PRINTSTUFF
33
34 #define RIFF_TAG MKTAG('R', 'I', 'F', 'F')
35 #define CDXA_TAG MKTAG('C', 'D', 'X', 'A')
36
37 #define RAW_CD_SECTOR_SIZE 2352
38 #define RAW_CD_SECTOR_DATA_SIZE 2304
39 #define VIDEO_DATA_CHUNK_SIZE 0x7E0
40 #define VIDEO_DATA_HEADER_SIZE 0x38
41 #define RIFF_HEADER_SIZE 0x2C
42
43 #define CDXA_TYPE_MASK 0x0E
44 #define CDXA_TYPE_DATA 0x08
45 #define CDXA_TYPE_AUDIO 0x04
46 #define CDXA_TYPE_VIDEO 0x02
47
48 #define STR_MAGIC (0x80010160)
49
50 typedef struct StrChannel {
51
52 int type;
53 #define STR_AUDIO 0
54 #define STR_VIDEO 1
55
56 /* video parameters */
57 int width;
58 int height;
59 int video_stream_index;
60
61 /* audio parameters */
62 int sample_rate;
63 int channels;
64 int bits;
65 int audio_stream_index;
66 } StrChannel;
67
68 typedef struct StrDemuxContext {
69
70 /* a STR file can contain up to 32 channels of data */
71 StrChannel channels[32];
72
73 /* only decode the first audio and video channels encountered */
74 int video_channel;
75 int audio_channel;
76
77 int64_t pts;
78
79 unsigned char *video_chunk;
80 AVPacket tmp_pkt;
81 } StrDemuxContext;
82
83 const static char sync_header[12] = {0x00,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x00};
84
85 static int str_probe(AVProbeData *p)
86 {
87 int start;
88
89 /* need at least 0x38 bytes to validate */
90 if (p->buf_size < 0x38)
91 return 0;
92
93 if ((LE_32(&p->buf[0]) == RIFF_TAG) &&
94 (LE_32(&p->buf[8]) == CDXA_TAG)) {
95
96 /* RIFF header seen; skip 0x2C bytes */
97 start = RIFF_HEADER_SIZE;
98 } else
99 start = 0;
100
101 /* look for CD sync header (00, 0xFF x 10, 00) */
102 if (memcmp(p->buf+start,sync_header,sizeof(sync_header)))
103 return 0;
104
105 /* MPEG files (like those ripped from VCDs) can also look like this;
106 * only return half certainty */
107 return 50;
108 }
109
110 #if 0
111 static void dump(unsigned char *buf,size_t len)
112 {
113 int i;
114 for(i=0;i<len;i++) {
115 if ((i&15)==0) av_log(NULL, AV_LOG_DEBUG, "%04x ",i);
116 av_log(NULL, AV_LOG_DEBUG, "%02x ",buf[i]);
117 if ((i&15)==15) av_log(NULL, AV_LOG_DEBUG, "\n");
118 }
119 av_log(NULL, AV_LOG_DEBUG, "\n");
120 }
121 #endif
122
123 static int str_read_header(AVFormatContext *s,
124 AVFormatParameters *ap)
125 {
126 ByteIOContext *pb = &s->pb;
127 StrDemuxContext *str = (StrDemuxContext *)s->priv_data;
128 AVStream *st;
129 unsigned char sector[RAW_CD_SECTOR_SIZE];
130 int start;
131 int i;
132 int channel;
133
134 /* initialize context members */
135 str->pts = 0;
136 str->audio_channel = -1; /* assume to audio or video */
137 str->video_channel = -1;
138 str->video_chunk = NULL;
139
140
141 /* skip over any RIFF header */
142 if (get_buffer(pb, sector, RIFF_HEADER_SIZE) != RIFF_HEADER_SIZE)
143 return AVERROR_IO;
144 if (LE_32(&sector[0]) == RIFF_TAG)
145 start = RIFF_HEADER_SIZE;
146 else
147 start = 0;
148
149 url_fseek(pb, start, SEEK_SET);
150
151 /* check through the first 32 sectors for individual channels */
152 for (i = 0; i < 32; i++) {
153 if (get_buffer(pb, sector, RAW_CD_SECTOR_SIZE) != RAW_CD_SECTOR_SIZE)
154 return AVERROR_IO;
155
156 //printf("%02x %02x %02x %02x\n",sector[0x10],sector[0x11],sector[0x12],sector[0x13]);
157
158 channel = sector[0x11];
159 if (channel >= 32)
160 return AVERROR_INVALIDDATA;
161
162 switch (sector[0x12] & CDXA_TYPE_MASK) {
163
164 case CDXA_TYPE_DATA:
165 case CDXA_TYPE_VIDEO:
166 /* check if this channel gets to be the dominant video channel */
167 if (str->video_channel == -1) {
168 /* qualify the magic number */
169 if (LE_32(&sector[0x18]) != STR_MAGIC)
170 break;
171 str->video_channel = channel;
172 str->channels[channel].type = STR_VIDEO;
173 str->channels[channel].width = LE_16(&sector[0x28]);
174 str->channels[channel].height = LE_16(&sector[0x2A]);
175
176 /* allocate a new AVStream */
177 st = av_new_stream(s, 0);
178 if (!st)
179 return AVERROR_NOMEM;
180 /* set the pts reference (1 pts = 1/90000) */
181 av_set_pts_info(st, 33, 1, 90000);
182
183 str->channels[channel].video_stream_index = st->index;
184
185 st->codec->codec_type = CODEC_TYPE_VIDEO;
186 st->codec->codec_id = CODEC_ID_MDEC;
187 st->codec->codec_tag = 0; /* no fourcc */
188 st->codec->width = str->channels[channel].width;
189 st->codec->height = str->channels[channel].height;
190 }
191 break;
192
193 case CDXA_TYPE_AUDIO:
194 /* check if this channel gets to be the dominant audio channel */
195 if (str->audio_channel == -1) {
196 int fmt;
197 str->audio_channel = channel;
198 str->channels[channel].type = STR_AUDIO;
199 str->channels[channel].channels =
200 (sector[0x13] & 0x01) ? 2 : 1;
201 str->channels[channel].sample_rate =
202 (sector[0x13] & 0x04) ? 18900 : 37800;
203 str->channels[channel].bits =
204 (sector[0x13] & 0x10) ? 8 : 4;
205
206 /* allocate a new AVStream */
207 st = av_new_stream(s, 0);
208 if (!st)
209 return AVERROR_NOMEM;
210 av_set_pts_info(st, 33, 1, 90000);
211
212 str->channels[channel].audio_stream_index = st->index;
213
214 fmt = sector[0x13];
215 st->codec->codec_type = CODEC_TYPE_AUDIO;
216 st->codec->codec_id = CODEC_ID_ADPCM_XA;
217 st->codec->codec_tag = 0; /* no fourcc */
218 st->codec->channels = (fmt&1)?2:1;
219 st->codec->sample_rate = (fmt&4)?18900:37800;
220 // st->codec->bit_rate = 0; //FIXME;
221 st->codec->block_align = 128;
222 }
223 break;
224
225 default:
226 /* ignore */
227 break;
228 }
229 }
230
231 if (str->video_channel != -1)
232 av_log (s, AV_LOG_DEBUG, " video channel = %d, %d x %d %d\n", str->video_channel,
233 str->channels[str->video_channel].width,
234 str->channels[str->video_channel].height,str->channels[str->video_channel].video_stream_index);
235 if (str->audio_channel != -1)
236 av_log (s, AV_LOG_DEBUG, " audio channel = %d, %d Hz, %d channels, %d bits/sample %d\n",
237 str->audio_channel,
238 str->channels[str->audio_channel].sample_rate,
239 str->channels[str->audio_channel].channels,
240 str->channels[str->audio_channel].bits,str->channels[str->audio_channel].audio_stream_index);
241
242 /* back to the start */
243 url_fseek(pb, start, SEEK_SET);
244
245 return 0;
246 }
247
248 static int str_read_packet(AVFormatContext *s,
249 AVPacket *ret_pkt)
250 {
251 ByteIOContext *pb = &s->pb;
252 StrDemuxContext *str = (StrDemuxContext *)s->priv_data;
253 unsigned char sector[RAW_CD_SECTOR_SIZE];
254 int channel;
255 int packet_read = 0;
256 int ret = 0;
257 AVPacket *pkt;
258
259 while (!packet_read) {
260
261 if (get_buffer(pb, sector, RAW_CD_SECTOR_SIZE) != RAW_CD_SECTOR_SIZE)
262 return AVERROR_IO;
263
264 channel = sector[0x11];
265 if (channel >= 32)
266 return AVERROR_INVALIDDATA;
267
268 switch (sector[0x12] & CDXA_TYPE_MASK) {
269
270 case CDXA_TYPE_DATA:
271 case CDXA_TYPE_VIDEO:
272 /* check if this the video channel we care about */
273 if (channel == str->video_channel) {
274
275 int current_sector = LE_16(&sector[0x1C]);
276 int sector_count = LE_16(&sector[0x1E]);
277 int frame_size = LE_32(&sector[0x24]);
278 int bytes_to_copy;
279 // printf("%d %d %d\n",current_sector,sector_count,frame_size);
280 /* if this is the first sector of the frame, allocate a pkt */
281 pkt = &str->tmp_pkt;
282 if (current_sector == 0) {
283 if (av_new_packet(pkt, frame_size))
284 return AVERROR_IO;
285
286 pkt->pos= url_ftell(pb) - RAW_CD_SECTOR_SIZE;
287 pkt->stream_index =
288 str->channels[channel].video_stream_index;
289 // pkt->pts = str->pts;
290
291 /* if there is no audio, adjust the pts after every video
292 * frame; assume 15 fps */
293 if (str->audio_channel != -1)
294 str->pts += (90000 / 15);
295 }
296
297 /* load all the constituent chunks in the video packet */
298 bytes_to_copy = frame_size - current_sector*VIDEO_DATA_CHUNK_SIZE;
299 if (bytes_to_copy>0) {
300 if (bytes_to_copy>VIDEO_DATA_CHUNK_SIZE) bytes_to_copy=VIDEO_DATA_CHUNK_SIZE;
301 memcpy(pkt->data + current_sector*VIDEO_DATA_CHUNK_SIZE,
302 sector + VIDEO_DATA_HEADER_SIZE, bytes_to_copy);
303 }
304 if (current_sector == sector_count-1) {
305 *ret_pkt = *pkt;
306 return 0;
307 }
308
309 }
310 break;
311
312 case CDXA_TYPE_AUDIO:
313 #ifdef PRINTSTUFF
314 printf (" dropping audio sector\n");
315 #endif
316 #if 1
317 /* check if this the video channel we care about */
318 if (channel == str->audio_channel) {
319 pkt = ret_pkt;
320 if (av_new_packet(pkt, 2304))
321 return AVERROR_IO;
322 memcpy(pkt->data,sector+24,2304);
323
324 pkt->stream_index =
325 str->channels[channel].audio_stream_index;
326 //pkt->pts = str->pts;
327 return 0;
328 }
329 #endif
330 break;
331 default:
332 /* drop the sector and move on */
333 #ifdef PRINTSTUFF
334 printf (" dropping other sector\n");
335 #endif
336 break;
337 }
338
339 if (url_feof(pb))
340 return AVERROR_IO;
341 }
342
343 return ret;
344 }
345
346 static int str_read_close(AVFormatContext *s)
347 {
348 StrDemuxContext *str = (StrDemuxContext *)s->priv_data;
349
350 av_free(str->video_chunk);
351
352 return 0;
353 }
354
355 static AVInputFormat str_iformat = {
356 "psxstr",
357 "Sony Playstation STR format",
358 sizeof(StrDemuxContext),
359 str_probe,
360 str_read_header,
361 str_read_packet,
362 str_read_close,
363 };
364
365 int str_init(void)
366 {
367 av_register_input_format(&str_iformat);
368 return 0;
369 }