Update to MPlayer SVN rev 29675 and FFmpeg SVN rev 19836.
[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   demuxer->filepos=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   demuxer->filepos=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   { "dpx",  mmioFOURCC('d', 'p', 'x', ' ') },
86   { "jpeg", mmioFOURCC('I', 'J', 'P', 'G') },
87   { "jpg",  mmioFOURCC('I', 'J', 'P', 'G') },
88   { "jls",  mmioFOURCC('I', 'J', 'P', 'G') },
89   { "thm",  mmioFOURCC('I', 'J', 'P', 'G') },
90   { "db",   mmioFOURCC('I', 'J', 'P', 'G') },
91   { "pcx",  mmioFOURCC('p', 'c', 'x', ' ') },
92   { "png",  mmioFOURCC('M', 'P', 'N', 'G') },
93   { "ptx",  mmioFOURCC('p', 't', 'x', ' ') },
94   { "tga",  mmioFOURCC('M', 'T', 'G', 'A') },
95   { "tif",  mmioFOURCC('t', 'i', 'f', 'f') },
96   { "sgi",  mmioFOURCC('S', 'G', 'I', '1') },
97   { "sun",  mmioFOURCC('s', 'u', 'n', ' ') },
98   { "ras",  mmioFOURCC('s', 'u', 'n', ' ') },
99   { "ra",  mmioFOURCC('s', 'u', 'n', ' ') },
100   { "im1",  mmioFOURCC('s', 'u', 'n', ' ') },
101   { "im8",  mmioFOURCC('s', 'u', 'n', ' ') },
102   { "im24",  mmioFOURCC('s', 'u', 'n', ' ') },
103   { "sunras",  mmioFOURCC('s', 'u', 'n', ' ') },
104   { NULL,   0 }
105 };
106
107 static demuxer_t* demux_open_mf(demuxer_t* demuxer){
108   sh_video_t   *sh_video = NULL;
109   mf_t         *mf = NULL;
110   int i;
111
112   if(!demuxer->stream->url) return NULL;
113   if(strncmp(demuxer->stream->url, "mf://", 5)) return NULL;
114
115
116   mf=open_mf(demuxer->stream->url + 5);
117   if(!mf) return NULL;
118
119   if(!mf_type){
120     char* p=strrchr(mf->names[0],'.');
121     if(!p){
122       mp_msg(MSGT_DEMUX, MSGL_INFO, "[demux_mf] file type was not set! (try -mf type=xxx)\n" );
123       free( mf ); return NULL;
124     }
125     mf_type=strdup(p+1);
126     mp_msg(MSGT_DEMUX, MSGL_INFO, "[demux_mf] file type was not set! trying 'type=%s'...\n", mf_type);
127   }
128
129   demuxer->filepos=mf->curr_frame=0;
130
131   demuxer->movi_start = 0;
132   demuxer->movi_end = mf->nr_of_files - 1;
133
134   // create a new video stream header
135   sh_video = new_sh_video(demuxer, 0);
136   // make sure the demuxer knows about the new video stream header
137   // (even though new_sh_video() ought to take care of it)
138   demuxer->video->sh = sh_video;
139
140   // make sure that the video demuxer stream header knows about its
141   // parent video demuxer stream (this is getting wacky), or else
142   // video_read_properties() will choke
143   sh_video->ds = demuxer->video;
144
145   for (i = 0; type2format[i].type; i++)
146     if (strcasecmp(mf_type, type2format[i].type) == 0)
147       break;
148   if (!type2format[i].type) {
149     mp_msg(MSGT_DEMUX, MSGL_INFO, "[demux_mf] unknown input file type.\n" );
150     free(mf);
151     return NULL;
152   }
153   sh_video->format = type2format[i].format;
154
155   sh_video->disp_w = mf_w;
156   sh_video->disp_h = mf_h;
157   sh_video->fps = mf_fps;
158   sh_video->frametime = 1 / sh_video->fps;
159
160   // emulate BITMAPINFOHEADER:
161   sh_video->bih=malloc(sizeof(BITMAPINFOHEADER));
162   memset(sh_video->bih,0,sizeof(BITMAPINFOHEADER));
163   sh_video->bih->biSize=40;
164   sh_video->bih->biWidth = mf_w;
165   sh_video->bih->biHeight = mf_h;
166   sh_video->bih->biPlanes=1;
167   sh_video->bih->biBitCount=24;
168   sh_video->bih->biCompression=sh_video->format;
169   sh_video->bih->biSizeImage=sh_video->bih->biWidth*sh_video->bih->biHeight*3;
170
171   /* disable seeking */
172 //  demuxer->seekable = 0;
173
174   demuxer->priv=(void*)mf;
175
176   return demuxer;
177 }
178
179 static void demux_close_mf(demuxer_t* demuxer) {
180   mf_t *mf = demuxer->priv;
181
182   if(!mf)
183     return;
184   free(mf);
185 }
186
187 static int demux_control_mf(demuxer_t *demuxer, int cmd, void *arg) {
188   mf_t *mf = (mf_t *)demuxer->priv;
189   sh_video_t *sh_video = demuxer->video->sh;
190
191   switch(cmd) {
192     case DEMUXER_CTRL_GET_TIME_LENGTH:
193       *((double *)arg) = (double)mf->nr_of_files / sh_video->fps;
194       return DEMUXER_CTRL_OK;
195
196     case DEMUXER_CTRL_GET_PERCENT_POS:
197       if (mf->nr_of_files <= 1)
198         return DEMUXER_CTRL_DONTKNOW;
199       *((int *)arg) = 100 * mf->curr_frame / (mf->nr_of_files - 1);
200       return DEMUXER_CTRL_OK;
201
202     default:
203       return DEMUXER_CTRL_NOTIMPL;
204   }
205 }
206
207 const demuxer_desc_t demuxer_desc_mf = {
208   "mf demuxer",
209   "mf",
210   "MF",
211   "?",
212   "multiframe?, pictures demuxer",
213   DEMUXER_TYPE_MF,
214   0, // no autodetect
215   NULL,
216   demux_mf_fill_buffer,
217   demux_open_mf,
218   demux_close_mf,
219   demux_seek_mf,
220   demux_control_mf
221 };