diff options
Diffstat (limited to 'libmpdemux/demux_film.c')
-rw-r--r-- | libmpdemux/demux_film.c | 490 |
1 files changed, 0 insertions, 490 deletions
diff --git a/libmpdemux/demux_film.c b/libmpdemux/demux_film.c deleted file mode 100644 index 713c9ea26e..0000000000 --- a/libmpdemux/demux_film.c +++ /dev/null @@ -1,490 +0,0 @@ -/* - * FILM file parser - * Copyright (C) 2002 Mike Melanson - * - * This demuxer handles FILM (a.k.a. CPK) files commonly found on Sega - * Saturn CD-ROM games. FILM files have also been found on 3DO games. - * - * details of the FILM file format can be found at: - * http://www.pcisys.net/~melanson/codecs/ - * - * This file is part of MPlayer. - * - * MPlayer is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * MPlayer is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License along - * with MPlayer; if not, write to the Free Software Foundation, Inc., - * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. - */ - -#include <stdio.h> -#include <stdlib.h> -#include <unistd.h> - -#include "config.h" -#include "mp_msg.h" - -#include "stream/stream.h" -#include "demuxer.h" -#include "stheader.h" - -// chunk types found in a FILM file -#define CHUNK_FILM mmioFOURCC('F', 'I', 'L', 'M') -#define CHUNK_FDSC mmioFOURCC('F', 'D', 'S', 'C') -#define CHUNK_STAB mmioFOURCC('S', 'T', 'A', 'B') - -typedef struct film_chunk_t -{ - off_t chunk_offset; - int chunk_size; - unsigned int syncinfo1; - unsigned int syncinfo2; - - float pts; -} film_chunk_t; - -typedef struct film_data_t -{ - unsigned int total_chunks; - unsigned int current_chunk; - film_chunk_t *chunks; - unsigned int chunks_per_second; - unsigned int film_version; -} film_data_t; - -static void demux_seek_film(demuxer_t *demuxer, float rel_seek_secs, float audio_delay, int flags) -{ - film_data_t *film_data = (film_data_t *)demuxer->priv; - int new_current_chunk=(flags&SEEK_ABSOLUTE)?0:film_data->current_chunk; - - if(flags&SEEK_FACTOR) - new_current_chunk += rel_seek_secs * film_data->total_chunks; // 0..1 - else - new_current_chunk += rel_seek_secs * film_data->chunks_per_second; // secs - - -mp_msg(MSGT_DECVIDEO, MSGL_INFO,"current, total chunks = %d, %d; seek %5.3f sec, new chunk guess = %d\n", - film_data->current_chunk, film_data->total_chunks, - rel_seek_secs, new_current_chunk); - - // check if the new chunk number is valid - if (new_current_chunk < 0) - new_current_chunk = 0; - if ((unsigned int)new_current_chunk > film_data->total_chunks) - new_current_chunk = film_data->total_chunks - 1; - - while (((film_data->chunks[new_current_chunk].syncinfo1 == 0xFFFFFFFF) || - (film_data->chunks[new_current_chunk].syncinfo1 & 0x80000000)) && - (new_current_chunk > 0)) - new_current_chunk--; - - film_data->current_chunk = new_current_chunk; - -mp_msg(MSGT_DECVIDEO, MSGL_INFO," (flags = %X) actual new chunk = %d (syncinfo1 = %08X)\n", - flags, film_data->current_chunk, film_data->chunks[film_data->current_chunk].syncinfo1); - demuxer->video->pts=film_data->chunks[film_data->current_chunk].pts; - -} - -// return value: -// 0 = EOF or no stream found -// 1 = successfully read a packet -static int demux_film_fill_buffer(demuxer_t *demuxer, demux_stream_t *ds) -{ - int i; - unsigned char byte_swap; - int cvid_size; - sh_video_t *sh_video = demuxer->video->sh; - sh_audio_t *sh_audio = demuxer->audio->sh; - film_data_t *film_data = (film_data_t *)demuxer->priv; - film_chunk_t film_chunk; - int length_fix_bytes; - demux_packet_t* dp; - - // see if the end has been reached - if (film_data->current_chunk >= film_data->total_chunks) - return 0; - - film_chunk = film_data->chunks[film_data->current_chunk]; - - // position stream and fetch chunk - stream_seek(demuxer->stream, film_chunk.chunk_offset); - - // load the chunks manually (instead of using ds_read_packet()), since - // they require some adjustment - // (all ones in syncinfo1 indicates an audio chunk) - if (film_chunk.syncinfo1 == 0xFFFFFFFF) - { - if(demuxer->audio->id>=-1){ // audio not disabled - dp = new_demux_packet(film_chunk.chunk_size); - if (stream_read(demuxer->stream, dp->buffer, film_chunk.chunk_size) != - film_chunk.chunk_size) - return 0; - dp->pts = film_chunk.pts; - dp->pos = film_chunk.chunk_offset; - - // adjust the data before queuing it: - // 8-bit: signed -> unsigned - // 16-bit: big-endian -> little-endian - if (sh_audio->wf->wBitsPerSample == 8) - for (i = 0; i < film_chunk.chunk_size; i++) - dp->buffer[i] += 128; - else - for (i = 0; i < film_chunk.chunk_size; i += 2) - { - byte_swap = dp->buffer[i]; - dp->buffer[i] = dp->buffer[i + 1]; - dp->buffer[i + 1] = byte_swap; - } - - /* for SegaSaturn .cpk file, translate audio data if stereo */ - if (sh_audio->wf->nChannels == 2) { - if (sh_audio->wf->wBitsPerSample == 8) { - unsigned char* tmp = dp->buffer; - unsigned char buf[film_chunk.chunk_size]; - for(i = 0; i < film_chunk.chunk_size/2; i++) { - buf[i*2] = tmp[i]; - buf[i*2+1] = tmp[film_chunk.chunk_size/2+i]; - } - memcpy( tmp, buf, film_chunk.chunk_size ); - } - else {/* for 16bit */ - unsigned short *tmp = (unsigned short *)dp->buffer; - unsigned short buf[film_chunk.chunk_size/2]; - for(i = 0; i < film_chunk.chunk_size/4; i++) { - buf[i*2] = tmp[i]; - buf[i*2+1] = tmp[film_chunk.chunk_size/4+i]; - } - memcpy( tmp, buf, film_chunk.chunk_size ); - } - } - - // append packet to DS stream - ds_add_packet(demuxer->audio, dp); - } - } - else - { - // if the demuxer is dealing with CVID data, deal with it a special way - if (sh_video->format == mmioFOURCC('c', 'v', 'i', 'd')) - { - if (film_data->film_version) - length_fix_bytes = 2; - else - length_fix_bytes = 6; - - // account for the fix bytes when allocating the buffer - dp = new_demux_packet(film_chunk.chunk_size - length_fix_bytes); - - // these CVID data chunks have a few extra bytes; skip them - if (stream_read(demuxer->stream, dp->buffer, 10) != 10) - return 0; - stream_skip(demuxer->stream, length_fix_bytes); - - if (stream_read(demuxer->stream, dp->buffer + 10, - film_chunk.chunk_size - (10 + length_fix_bytes)) != - (film_chunk.chunk_size - (10 + length_fix_bytes))) - return 0; - - dp->pts = film_chunk.pts; - dp->pos = film_chunk.chunk_offset; - dp->keyframe = film_chunk.syncinfo1 & 0x80000000; - - // fix the CVID chunk size - cvid_size = film_chunk.chunk_size - length_fix_bytes; - dp->buffer[1] = (cvid_size >> 16) & 0xFF; - dp->buffer[2] = (cvid_size >> 8) & 0xFF; - dp->buffer[3] = (cvid_size >> 0) & 0xFF; - - // append packet to DS stream - ds_add_packet(demuxer->video, dp); - } - else - { - ds_read_packet(demuxer->video, demuxer->stream, film_chunk.chunk_size, - film_chunk.pts, - film_chunk.chunk_offset, (film_chunk.syncinfo1 & 0x80000000) ? 1 : 0); - } - } - film_data->current_chunk++; - - return 1; -} - -static demuxer_t* demux_open_film(demuxer_t* demuxer) -{ - sh_video_t *sh_video = NULL; - sh_audio_t *sh_audio = NULL; - film_data_t *film_data; - film_chunk_t film_chunk; - int header_size; - unsigned int chunk_type; - unsigned int chunk_size; - unsigned int i; - unsigned int video_format; - int audio_channels; - int counting_chunks; - unsigned int total_audio_bytes = 0; - - film_data = malloc(sizeof(film_data_t)); - film_data->total_chunks = 0; - film_data->current_chunk = 0; - film_data->chunks = NULL; - film_data->chunks_per_second = 0; - - // go back to the beginning - stream_reset(demuxer->stream); - stream_seek(demuxer->stream, 0); - - // read the master chunk type - chunk_type = stream_read_fourcc(demuxer->stream); - // validate the chunk type - if (chunk_type != CHUNK_FILM) - { - mp_msg(MSGT_DEMUX, MSGL_ERR, "Not a FILM file\n"); - free(film_data); - return NULL; - } - - // get the header size, which implicitly points past the header and - // to the start of the data - header_size = stream_read_dword(demuxer->stream); - film_data->film_version = stream_read_fourcc(demuxer->stream); - demuxer->movi_start = header_size; - demuxer->movi_end = demuxer->stream->end_pos; - header_size -= 16; - - mp_msg(MSGT_DEMUX, MSGL_HINT, "FILM version %.4s\n", - (char *)&film_data->film_version); - - // skip to where the next chunk should be - stream_skip(demuxer->stream, 4); - - // traverse through the header - while (header_size > 0) - { - // fetch the chunk type and size - chunk_type = stream_read_fourcc(demuxer->stream); - chunk_size = stream_read_dword(demuxer->stream); - header_size -= chunk_size; - - switch (chunk_type) - { - case CHUNK_FDSC: - mp_msg(MSGT_DECVIDEO, MSGL_V, "parsing FDSC chunk\n"); - - // fetch the video codec fourcc to see if there's any video - video_format = stream_read_fourcc(demuxer->stream); - if (video_format) - { - // create and initialize the video stream header - sh_video = new_sh_video(demuxer, 0); - demuxer->video->sh = sh_video; - sh_video->ds = demuxer->video; - - sh_video->format = video_format; - sh_video->disp_h = stream_read_dword(demuxer->stream); - sh_video->disp_w = stream_read_dword(demuxer->stream); - mp_msg(MSGT_DECVIDEO, MSGL_V, - " FILM video: %d x %d\n", sh_video->disp_w, - sh_video->disp_h); - } - else - // skip height and width if no video - stream_skip(demuxer->stream, 8); - - if(demuxer->audio->id<-1){ - mp_msg(MSGT_DECVIDEO, MSGL_INFO,"chunk size = 0x%X \n",chunk_size); - stream_skip(demuxer->stream, chunk_size-12-8); - break; // audio disabled (or no soundcard) - } - - // skip over unknown byte, but only if file had non-NULL version - if (film_data->film_version) - stream_skip(demuxer->stream, 1); - - // fetch the audio channels to see if there's any audio - // don't do this if the file is a quirky file with NULL version - if (film_data->film_version) - { - audio_channels = stream_read_char(demuxer->stream); - if (audio_channels > 0) - { - // create and initialize the audio stream header - sh_audio = new_sh_audio(demuxer, 0); - demuxer->audio->id = 0; - demuxer->audio->sh = sh_audio; - sh_audio->ds = demuxer->audio; - - sh_audio->wf = malloc(sizeof(*sh_audio->wf)); - - // uncompressed PCM format - sh_audio->wf->wFormatTag = 1; - sh_audio->format = 1; - sh_audio->wf->nChannels = audio_channels; - sh_audio->wf->wBitsPerSample = stream_read_char(demuxer->stream); - stream_skip(demuxer->stream, 1); // skip unknown byte - sh_audio->wf->nSamplesPerSec = stream_read_word(demuxer->stream); - sh_audio->wf->nAvgBytesPerSec = - sh_audio->wf->nSamplesPerSec * sh_audio->wf->wBitsPerSample - * sh_audio->wf->nChannels / 8; - stream_skip(demuxer->stream, 6); // skip the rest of the unknown - - mp_msg(MSGT_DECVIDEO, MSGL_V, - " FILM audio: %d channels, %d bits, %d Hz\n", - sh_audio->wf->nChannels, 8 * sh_audio->wf->wBitsPerSample, - sh_audio->wf->nSamplesPerSec); - } - else - stream_skip(demuxer->stream, 10); - } - else - { - // otherwise, make some assumptions about the audio - - // create and initialize the audio stream header - sh_audio = new_sh_audio(demuxer, 0); - demuxer->audio->sh = sh_audio; - sh_audio->ds = demuxer->audio; - - sh_audio->wf = malloc(sizeof(*sh_audio->wf)); - - // uncompressed PCM format - sh_audio->wf->wFormatTag = 1; - sh_audio->format = 1; - sh_audio->wf->nChannels = 1; - sh_audio->wf->wBitsPerSample = 8; - sh_audio->wf->nSamplesPerSec = 22050; - sh_audio->wf->nAvgBytesPerSec = - sh_audio->wf->nSamplesPerSec * sh_audio->wf->wBitsPerSample - * sh_audio->wf->nChannels / 8; - - mp_msg(MSGT_DECVIDEO, MSGL_V, - " FILM audio: %d channels, %d bits, %d Hz\n", - sh_audio->wf->nChannels, sh_audio->wf->wBitsPerSample, - sh_audio->wf->nSamplesPerSec); - } - break; - - case CHUNK_STAB: - mp_msg(MSGT_DECVIDEO, MSGL_V, "parsing STAB chunk\n"); - - if (sh_video) - { - sh_video->fps = stream_read_dword(demuxer->stream); - sh_video->frametime = 1.0 / sh_video->fps; - } - - // fetch the number of chunks - film_data->total_chunks = stream_read_dword(demuxer->stream); - film_data->current_chunk = 0; - mp_msg(MSGT_DECVIDEO, MSGL_V, - " STAB chunk contains %d chunks\n", film_data->total_chunks); - - // allocate enough entries for the chunk - film_data->chunks = - calloc(film_data->total_chunks, sizeof(film_chunk_t)); - - // build the chunk index - counting_chunks = 1; - for (i = 0; i < film_data->total_chunks; i++) - { - film_chunk = film_data->chunks[i]; - film_chunk.chunk_offset = - demuxer->movi_start + stream_read_dword(demuxer->stream); - film_chunk.chunk_size = stream_read_dword(demuxer->stream); - film_chunk.syncinfo1 = stream_read_dword(demuxer->stream); - film_chunk.syncinfo2 = stream_read_dword(demuxer->stream); - - // count chunks for the purposes of seeking - if (counting_chunks) - { - // if we're counting chunks, always count an audio chunk - if (film_chunk.syncinfo1 == 0xFFFFFFFF) - film_data->chunks_per_second++; - // if it's a video chunk, check if it's time to stop counting - else if ((film_chunk.syncinfo1 & 0x7FFFFFFF) >= sh_video->fps) - counting_chunks = 0; - else - film_data->chunks_per_second++; - } - - // precalculate PTS - if (film_chunk.syncinfo1 == 0xFFFFFFFF) - { - if(demuxer->audio->id>=-1) - film_chunk.pts = - (float)total_audio_bytes / (float)sh_audio->wf->nAvgBytesPerSec; - total_audio_bytes += film_chunk.chunk_size; - } - else - film_chunk.pts = - (film_chunk.syncinfo1 & 0x7FFFFFFF) / sh_video->fps; - - film_data->chunks[i] = film_chunk; - } - - // in some FILM files (notably '1.09'), the length of the FDSC chunk - // follows different rules - if (chunk_size == (film_data->total_chunks * 16)) - header_size -= 16; - break; - - default: - mp_msg(MSGT_DEMUX, MSGL_ERR, "Unrecognized FILM header chunk: %08X\n", - chunk_type); - return NULL; - break; - } - } - - demuxer->priv = film_data; - - return demuxer; -} - -static void demux_close_film(demuxer_t* demuxer) { - film_data_t *film_data = demuxer->priv; - - if(!film_data) - return; - free(film_data->chunks); - free(film_data); - -} - -static int film_check_file(demuxer_t* demuxer) -{ - int signature=stream_read_fourcc(demuxer->stream); - - // check for the FILM file magic number - if(signature==mmioFOURCC('F', 'I', 'L', 'M')) - return DEMUXER_TYPE_FILM; - - return 0; -} - - -const demuxer_desc_t demuxer_desc_film = { - "FILM/CPK demuxer for Sega Saturn CD-ROM games", - "film", - "FILM", - "Mike Melanson", - "", - DEMUXER_TYPE_FILM, - 0, // unsafe autodetect (short signature) - film_check_file, - demux_film_fill_buffer, - demux_open_film, - demux_close_film, - demux_seek_film, - NULL -}; |