libmpdemux/demux_fli.c

   1 /*
   2  * FLI file parser
   3  * copyright (c) 2001 Mike Melanson
   4  *
   5  * This file is part of MPlayer.
   6  *
   7  * MPlayer is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * MPlayer is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along
  18  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  19  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  20  */
  21
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <unistd.h>
  25
  26 #include "config.h"
  27 #include "mp_msg.h"
  28 #include "help_mp.h"
  29
  30 #include "stream/stream.h"
  31 #include "demuxer.h"
  32 #include "stheader.h"
  33
  34 typedef struct {
  35   int num_frames;
  36   int current_frame;
  37   off_t *filepos;
  38   unsigned int *frame_size;
  39 } fli_frames_t;
  40
  41 static void demux_seek_fli(demuxer_t *demuxer,float rel_seek_secs,float audio_delay,int flags){
  42   fli_frames_t *frames = (fli_frames_t *)demuxer->priv;
  43   sh_video_t *sh_video = demuxer->video->sh;
  44   int newpos=(flags&SEEK_ABSOLUTE)?0:frames->current_frame;
  45   if(flags&SEEK_FACTOR){
  46       // float 0..1
  47       newpos+=rel_seek_secs*frames->num_frames;
  48   } else {
  49       // secs
  50       newpos+=rel_seek_secs*sh_video->fps;
  51   }
  52   if(newpos<0) newpos=0; else
  53   if(newpos>frames->num_frames) newpos=frames->num_frames;
  54   frames->current_frame=newpos;
  55 }
  56
  57 // return value:
  58 //     0 = EOF or no stream found
  59 //     1 = successfully read a packet
  60 static int demux_fli_fill_buffer(demuxer_t *demuxer, demux_stream_t *ds){
  61   fli_frames_t *frames = (fli_frames_t *)demuxer->priv;
  62   sh_video_t *sh_video = demuxer->video->sh;
  63
  64   // see if the end has been reached
  65   if (frames->current_frame >= frames->num_frames)
  66     return 0;
  67
  68   // fetch the frame from the file
  69   // first, position the file properly since ds_read_packet() doesn't
  70   // seem to do it, even though it takes a file offset as a parameter
  71   stream_seek(demuxer->stream, frames->filepos[frames->current_frame]);
  72   ds_read_packet(demuxer->video,
  73     demuxer->stream,
  74     frames->frame_size[frames->current_frame],
  75     frames->current_frame/sh_video->fps,
  76     frames->filepos[frames->current_frame],
  77     0 /* what flags? -> demuxer.h (alex) */
  78   );
  79
  80   // get the next frame ready
  81   frames->current_frame++;
  82
  83   return 1;
  84 }
  85
  86 static demuxer_t* demux_open_fli(demuxer_t* demuxer){
  87   sh_video_t *sh_video = NULL;
  88   fli_frames_t *frames = malloc(sizeof(fli_frames_t));
  89   int frame_number;
  90   int speed;
  91   unsigned int frame_size;
  92   int magic_number;
  93   unsigned char * header;
  94
  95   // go back to the beginning
  96   stream_reset(demuxer->stream);
  97   stream_seek(demuxer->stream, 0);
  98
  99   header = calloc(1, sizeof(BITMAPINFOHEADER) + 128);
 100   stream_read(demuxer->stream, header + sizeof(BITMAPINFOHEADER), 128);
 101   stream_seek(demuxer->stream, 0);
 102
 103   demuxer->movi_start = 128;
 104   demuxer->movi_end = stream_read_dword_le(demuxer->stream);
 105
 106   magic_number = stream_read_word_le(demuxer->stream);
 107
 108   if ((magic_number != 0xAF11) && (magic_number != 0xAF12))
 109   {
 110     mp_msg(MSGT_DEMUX, MSGL_ERR, "Bad/unknown magic number (%04x)\n",
 111         magic_number);
 112     free(header);
 113     free(frames);
 114     return NULL;
 115   }
 116
 117   // fetch the number of frames
 118   frames->num_frames = stream_read_word_le(demuxer->stream);
 119   frames->current_frame = 0;
 120
 121   // allocate enough entries for the indices
 122   //   audit: num_frames is 16bit so it is safe against overflow
 123   frames->filepos = malloc(frames->num_frames * sizeof(off_t));
 124   frames->frame_size = malloc(frames->num_frames * sizeof(int));
 125
 126   // create a new video stream header
 127   sh_video = new_sh_video(demuxer, 0);
 128
 129   // make sure the demuxer knows about the new video stream header
 130   // (even though new_sh_video() ought to take care of it)
 131   demuxer->video->sh = sh_video;
 132
 133   // make sure that the video demuxer stream header knows about its
 134   // parent video demuxer stream (this is getting wacky), or else
 135   // video_read_properties() will choke
 136   sh_video->ds = demuxer->video;
 137
 138   // custom fourcc for internal MPlayer use
 139   sh_video->format = mmioFOURCC('F', 'L', 'I', 'C');
 140
 141   sh_video->disp_w = stream_read_word_le(demuxer->stream);
 142   sh_video->disp_h = stream_read_word_le(demuxer->stream);
 143
 144   // pass extradata to codec
 145   sh_video->bih = (BITMAPINFOHEADER*)header;
 146   sh_video->bih->biSize = sizeof(BITMAPINFOHEADER) + 128;
 147   sh_video->bih->biWidth = sh_video->disp_w;
 148   sh_video->bih->biHeight = sh_video->disp_h;
 149
 150   // skip the video depth and flags
 151   stream_skip(demuxer->stream, 4);
 152
 153   // get the speed
 154   speed = stream_read_word_le(demuxer->stream);
 155   if (speed == 0)
 156     speed = 1;
 157   if (magic_number == 0xAF11)
 158     speed *= 1000/70;
 159   sh_video->fps = 1000 / speed;
 160   sh_video->frametime = 1/sh_video->fps;
 161
 162   // build the frame index
 163   stream_seek(demuxer->stream, demuxer->movi_start);
 164   frame_number = 0;
 165   while ((!stream_eof(demuxer->stream)) && (frame_number < frames->num_frames))
 166   {
 167     frames->filepos[frame_number] = stream_tell(demuxer->stream);
 168     frame_size = stream_read_dword_le(demuxer->stream);
 169     magic_number = stream_read_word_le(demuxer->stream);
 170     stream_skip(demuxer->stream, frame_size - 6);
 171
 172     // if this chunk has the right magic number, index it
 173     if ((magic_number == 0xF1FA) || (magic_number == 0xF5FA))
 174     {
 175       frames->frame_size[frame_number] = frame_size;
 176       frame_number++;
 177     }
 178   }
 179
 180   // save the actual number of frames indexed
 181   frames->num_frames = frame_number;
 182
 183   demuxer->priv = frames;
 184
 185   return demuxer;
 186 }
 187
 188 static void demux_close_fli(demuxer_t* demuxer) {
 189   fli_frames_t *frames = demuxer->priv;
 190
 191   if(!frames)
 192     return;
 193
 194   if(frames->filepos)
 195     free(frames->filepos);
 196   if(frames->frame_size)
 197     free(frames->frame_size);
 198
 199   free(frames);
 200
 201 }
 202
 203
 204 static int fli_check_file(demuxer_t* demuxer)
 205 {
 206   int id;
 207
 208   stream_seek(demuxer->stream, 4);
 209   id=stream_read_word_le(demuxer->stream);
 210   // check for the FLI file magic number
 211   if((id==0xAF11) || (id==0xAF12))
 212     return DEMUXER_TYPE_FLI;
 213
 214   return 0;
 215 }
 216
 217
 218 const demuxer_desc_t demuxer_desc_fli = {
 219   "Autodesk FLIC demuxer",
 220   "fli",
 221   "FLI",
 222   "Mike Melanson",
 223   "Supports also some extensions",
 224   DEMUXER_TYPE_FLI,
 225   0, // unsafe autodetect (short signature)
 226   fli_check_file,
 227   demux_fli_fill_buffer,
 228   demux_open_fli,
 229   demux_close_fli,
 230   demux_seek_fli,
 231   NULL
 232 };