Update to MPlayer SVN rev 29319 and FFmpeg SVN rev 18938.
[vaapi:mplayer.git] / libmpdemux / demux_mf.c
1 /*
2  * This file is part of MPlayer.
3  *
4  * MPlayer is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 2 of the License, or
7  * (at your option) any later version.
8  *
9  * MPlayer is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License along
15  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
16  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
17  */
18
19 #include <stdio.h>
20 #include <stdlib.h>
21 #include <unistd.h>
22 #include <sys/types.h>
23 #include <sys/stat.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 #include "mf.h"
34
35 static void demux_seek_mf(demuxer_t *demuxer,float rel_seek_secs,float audio_delay,int flags){
36   mf_t * mf = (mf_t *)demuxer->priv;
37   sh_video_t   * sh_video = demuxer->video->sh;
38   int newpos = (flags & SEEK_ABSOLUTE)?0:mf->curr_frame - 1;
39
40   if ( flags & SEEK_FACTOR ) newpos+=rel_seek_secs*(mf->nr_of_files - 1);
41    else newpos+=rel_seek_secs * sh_video->fps;
42   if ( newpos < 0 ) newpos=0;
43   if( newpos >= mf->nr_of_files) newpos=mf->nr_of_files - 1;
44   mf->curr_frame=newpos;
45 }
46
47 // return value:
48 //     0 = EOF or no stream found
49 //     1 = successfully read a packet
50 static int demux_mf_fill_buffer(demuxer_t *demuxer, demux_stream_t *ds){
51   mf_t         * mf;
52   struct stat    fs;
53   FILE         * f;
54
55   mf=(mf_t*)demuxer->priv;
56   if ( mf->curr_frame >= mf->nr_of_files ) return 0;
57
58   stat( mf->names[mf->curr_frame],&fs );
59 //  printf( "[demux_mf] frame: %d (%s,%d)\n",mf->curr_frame,mf->names[mf->curr_frame],fs.st_size );
60
61   if ( !( f=fopen( mf->names[mf->curr_frame],"rb" ) ) ) return 0;
62   {
63    sh_video_t     * sh_video = demuxer->video->sh;
64    demux_packet_t * dp = new_demux_packet( fs.st_size );
65    if ( !fread( dp->buffer,fs.st_size,1,f ) ) return 0;
66    dp->pts=mf->curr_frame / sh_video->fps;
67    dp->pos=mf->curr_frame;
68    dp->flags=0;
69    // append packet to DS stream:
70    ds_add_packet( demuxer->video,dp );
71   }
72   fclose( f );
73
74   mf->curr_frame++;
75   return 1;
76 }
77
78 // force extension/type to have a fourcc
79
80 static const struct {
81   const char *type;
82   uint32_t format;
83 } type2format[] = {
84   { "bmp",  mmioFOURCC('b', 'm', 'p', ' ') },
85   { "jpeg", mmioFOURCC('I', 'J', 'P', 'G') },
86   { "jpg",  mmioFOURCC('I', 'J', 'P', 'G') },
87   { "jls",  mmioFOURCC('I', 'J', 'P', 'G') },
88   { "thm",  mmioFOURCC('I', 'J', 'P', 'G') },
89   { "db",   mmioFOURCC('I', 'J', 'P', 'G') },
90   { "pcx",  mmioFOURCC('p', 'c', 'x', ' ') },
91   { "png",  mmioFOURCC('M', 'P', 'N', 'G') },
92   { "ptx",  mmioFOURCC('p', 't', 'x', ' ') },
93   { "tga",  mmioFOURCC('M', 'T', 'G', 'A') },
94   { "tif",  mmioFOURCC('t', 'i', 'f', 'f') },
95   { "sgi",  mmioFOURCC('S', 'G', 'I', '1') },
96   { "sun",  mmioFOURCC('s', 'u', 'n', ' ') },
97   { "ras",  mmioFOURCC('s', 'u', 'n', ' ') },
98   { "ra",  mmioFOURCC('s', 'u', 'n', ' ') },
99   { "im1",  mmioFOURCC('s', 'u', 'n', ' ') },
100   { "im8",  mmioFOURCC('s', 'u', 'n', ' ') },
101   { "im24",  mmioFOURCC('s', 'u', 'n', ' ') },
102   { "sunras",  mmioFOURCC('s', 'u', 'n', ' ') },
103   { NULL,   0 }
104 };
105
106 static demuxer_t* demux_open_mf(demuxer_t* demuxer){
107   sh_video_t   *sh_video = NULL;
108   mf_t         *mf = NULL;
109   int i;
110
111   if(!demuxer->stream->url) return NULL;
112   if(strncmp(demuxer->stream->url, "mf://", 5)) return NULL;
113
114
115   mf=open_mf(demuxer->stream->url + 5);
116   if(!mf) return NULL;
117
118   if(!mf_type){
119     char* p=strrchr(mf->names[0],'.');
120     if(!p){
121       mp_msg(MSGT_DEMUX, MSGL_INFO, "[demux_mf] file type was not set! (try -mf type=xxx)\n" );
122       free( mf ); return NULL;
123     }
124     mf_type=strdup(p+1);
125     mp_msg(MSGT_DEMUX, MSGL_INFO, "[demux_mf] file type was not set! trying 'type=%s'...\n", mf_type);
126   }
127
128   mf->curr_frame=0;
129
130   demuxer->movi_start = 0;
131   demuxer->movi_end = mf->nr_of_files - 1;
132
133   // create a new video stream header
134   sh_video = new_sh_video(demuxer, 0);
135   // make sure the demuxer knows about the new video stream header
136   // (even though new_sh_video() ought to take care of it)
137   demuxer->video->sh = sh_video;
138
139   // make sure that the video demuxer stream header knows about its
140   // parent video demuxer stream (this is getting wacky), or else
141   // video_read_properties() will choke
142   sh_video->ds = demuxer->video;
143
144   for (i = 0; type2format[i].type; i++)
145     if (strcasecmp(mf_type, type2format[i].type) == 0)
146       break;
147   if (!type2format[i].type) {
148     mp_msg(MSGT_DEMUX, MSGL_INFO, "[demux_mf] unknown input file type.\n" );
149     free(mf);
150     return NULL;
151   }
152   sh_video->format = type2format[i].format;
153
154   sh_video->disp_w = mf_w;
155   sh_video->disp_h = mf_h;
156   sh_video->fps = mf_fps;
157   sh_video->frametime = 1 / sh_video->fps;
158
159   // emulate BITMAPINFOHEADER:
160   sh_video->bih=malloc(sizeof(BITMAPINFOHEADER));
161   memset(sh_video->bih,0,sizeof(BITMAPINFOHEADER));
162   sh_video->bih->biSize=40;
163   sh_video->bih->biWidth = mf_w;
164   sh_video->bih->biHeight = mf_h;
165   sh_video->bih->biPlanes=1;
166   sh_video->bih->biBitCount=24;
167   sh_video->bih->biCompression=sh_video->format;
168   sh_video->bih->biSizeImage=sh_video->bih->biWidth*sh_video->bih->biHeight*3;
169
170   /* disable seeking */
171 //  demuxer->seekable = 0;
172
173   demuxer->priv=(void*)mf;
174
175   return demuxer;
176 }
177
178 static void demux_close_mf(demuxer_t* demuxer) {
179   mf_t *mf = demuxer->priv;
180
181   if(!mf)
182     return;
183   free(mf);
184 }
185
186 static int demux_control_mf(demuxer_t *demuxer, int cmd, void *arg) {
187   mf_t *mf = (mf_t *)demuxer->priv;
188   sh_video_t *sh_video = demuxer->video->sh;
189
190   switch(cmd) {
191     case DEMUXER_CTRL_GET_TIME_LENGTH:
192       *((double *)arg) = (double)mf->nr_of_files / sh_video->fps;
193       return DEMUXER_CTRL_OK;
194
195     case DEMUXER_CTRL_GET_PERCENT_POS:
196       if (mf->nr_of_files <= 1)
197         return DEMUXER_CTRL_DONTKNOW;
198       *((int *)arg) = 100 * mf->curr_frame / (mf->nr_of_files - 1);
199       return DEMUXER_CTRL_OK;
200
201     default:
202       return DEMUXER_CTRL_NOTIMPL;
203   }
204 }
205
206 const demuxer_desc_t demuxer_desc_mf = {
207   "mf demuxer",
208   "mf",
209   "MF",
210   "?",
211   "multiframe?, pictures demuxer",
212   DEMUXER_TYPE_MF,
213   0, // no autodetect
214   NULL,
215   demux_mf_fill_buffer,
216   demux_open_mf,
217   demux_close_mf,
218   demux_seek_mf,
219   demux_control_mf
220 };