1afcdea5e671396d7e3896a3964a4a5d3f40753d
[ffmpeg.git] / libavformat / avisynth.c
1 /*
2  * AVISynth support for ffmpeg system
3  * Copyright (c) 2006 DivX, Inc.
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg 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 GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include "avformat.h"
23 #include "riff.h"
24
25 #include <windows.h>
26 #include <vfw.h>
27
28 typedef struct {
29   PAVISTREAM handle;
30   AVISTREAMINFO info;
31   DWORD read;
32   LONG chunck_size;
33   LONG chunck_samples;
34 } AVISynthStream;
35
36 typedef struct {
37   PAVIFILE file;
38   AVISynthStream *streams;
39   int nb_streams;
40   int next_stream;
41 } AVISynthContext;
42
43 static int avisynth_read_header(AVFormatContext *s, AVFormatParameters *ap)
44 {
45   AVISynthContext *avs = s->priv_data;
46   HRESULT res;
47   AVIFILEINFO info;
48   DWORD id;
49   AVStream *st;
50   AVISynthStream *stream;
51
52   AVIFileInit();
53
54   res = AVIFileOpen(&avs->file, s->filename, OF_READ|OF_SHARE_DENY_WRITE, NULL);
55   if (res != S_OK)
56     {
57       av_log(s, AV_LOG_ERROR, "AVIFileOpen failed with error %ld", res);
58       AVIFileExit();
59       return -1;
60     }
61
62   res = AVIFileInfo(avs->file, &info, sizeof(info));
63   if (res != S_OK)
64     {
65       av_log(s, AV_LOG_ERROR, "AVIFileInfo failed with error %ld", res);
66       AVIFileExit();
67       return -1;
68     }
69
70   avs->streams = av_mallocz(info.dwStreams * sizeof(AVISynthStream));
71
72   for (id=0; id<info.dwStreams; id++)
73     {
74       stream = &avs->streams[id];
75       stream->read = 0;
76       if (AVIFileGetStream(avs->file, &stream->handle, 0, id) == S_OK)
77         {
78           if (AVIStreamInfo(stream->handle, &stream->info, sizeof(stream->info)) == S_OK)
79             {
80               if (stream->info.fccType == streamtypeAUDIO)
81                 {
82                   WAVEFORMATEX wvfmt;
83                   LONG struct_size = sizeof(WAVEFORMATEX);
84                   if (AVIStreamReadFormat(stream->handle, 0, &wvfmt, &struct_size) != S_OK)
85                     continue;
86
87                   st = av_new_stream(s, id);
88                   st->codec->codec_type = CODEC_TYPE_AUDIO;
89
90                   st->codec->block_align = wvfmt.nBlockAlign;
91                   st->codec->channels = wvfmt.nChannels;
92                   st->codec->sample_rate = wvfmt.nSamplesPerSec;
93                   st->codec->bit_rate = wvfmt.nAvgBytesPerSec * 8;
94                   st->codec->bits_per_sample = wvfmt.wBitsPerSample;
95
96                   stream->chunck_samples = wvfmt.nSamplesPerSec * (uint64_t)info.dwScale / (uint64_t)info.dwRate;
97                   stream->chunck_size = stream->chunck_samples * wvfmt.nChannels * wvfmt.wBitsPerSample / 8;
98
99                   st->codec->codec_tag = wvfmt.wFormatTag;
100                   st->codec->codec_id = wav_codec_get_id(wvfmt.wFormatTag, st->codec->bits_per_sample);
101                 }
102               else if (stream->info.fccType == streamtypeVIDEO)
103                 {
104                   BITMAPINFO imgfmt;
105                   LONG struct_size = sizeof(BITMAPINFO);
106
107                   stream->chunck_size = stream->info.dwSampleSize;
108                   stream->chunck_samples = 1;
109
110                   if (AVIStreamReadFormat(stream->handle, 0, &imgfmt, &struct_size) != S_OK)
111                     continue;
112
113                   st = av_new_stream(s, id);
114                   st->codec->codec_type = CODEC_TYPE_VIDEO;
115                   st->r_frame_rate.num = stream->info.dwRate;
116                   st->r_frame_rate.den = stream->info.dwScale;
117
118                   st->codec->width = imgfmt.bmiHeader.biWidth;
119                   st->codec->height = imgfmt.bmiHeader.biHeight;
120
121                   st->codec->bits_per_sample = imgfmt.bmiHeader.biBitCount;
122                   st->codec->bit_rate = (uint64_t)stream->info.dwSampleSize * (uint64_t)stream->info.dwRate * 8 / (uint64_t)stream->info.dwScale;
123                   st->codec->codec_tag = imgfmt.bmiHeader.biCompression;
124                   st->codec->codec_id = codec_get_id(codec_bmp_tags, imgfmt.bmiHeader.biCompression);
125
126                   st->duration = stream->info.dwLength;
127                 }
128               else
129                 {
130                   AVIStreamRelease(stream->handle);
131                   continue;
132                 }
133
134               avs->nb_streams++;
135
136               st->codec->stream_codec_tag = stream->info.fccHandler;
137
138               av_set_pts_info(st, 64, info.dwScale, info.dwRate);
139               st->start_time = stream->info.dwStart;
140             }
141         }
142     }
143
144   return 0;
145 }
146
147 static int avisynth_read_packet(AVFormatContext *s, AVPacket *pkt)
148 {
149   AVISynthContext *avs = s->priv_data;
150   HRESULT res;
151   AVISynthStream *stream;
152   int stream_id = avs->next_stream;
153   LONG read_size;
154
155   // handle interleaving manually...
156   stream = &avs->streams[stream_id];
157
158   if (stream->read >= stream->info.dwLength)
159     return AVERROR_IO;
160
161   if (av_new_packet(pkt, stream->chunck_size))
162     return AVERROR_IO;
163   pkt->stream_index = stream_id;
164   pkt->pts = avs->streams[stream_id].read / avs->streams[stream_id].chunck_samples;
165
166   res = AVIStreamRead(stream->handle, stream->read, stream->chunck_samples, pkt->data, stream->chunck_size, &read_size, NULL);
167
168   pkt->pts = stream->read;
169   pkt->size = read_size;
170
171   stream->read += stream->chunck_samples;
172
173   // prepare for the next stream to read
174   do {
175     avs->next_stream = (avs->next_stream+1) % avs->nb_streams;
176   } while (avs->next_stream != stream_id && s->streams[avs->next_stream]->discard >= AVDISCARD_ALL);
177
178   return (res == S_OK) ? pkt->size : -1;
179 }
180
181 static int avisynth_read_close(AVFormatContext *s)
182 {
183   AVISynthContext *avs = s->priv_data;
184   int i;
185
186   for (i=0;i<avs->nb_streams;i++)
187     {
188       AVIStreamRelease(avs->streams[i].handle);
189     }
190
191   av_free(avs->streams);
192   AVIFileRelease(avs->file);
193   AVIFileExit();
194   return 0;
195 }
196
197 static int avisynth_read_seek(AVFormatContext *s, int stream_index, int64_t pts, int flags)
198 {
199   AVISynthContext *avs = s->priv_data;
200   int stream_id;
201
202   for (stream_id = 0; stream_id < avs->nb_streams; stream_id++)
203     {
204       avs->streams[stream_id].read = pts * avs->streams[stream_id].chunck_samples;
205     }
206
207   return 0;
208 }
209
210 AVInputFormat avisynth_demuxer = {
211   "avs",
212   "AVISynth",
213   sizeof(AVISynthContext),
214   NULL,
215   avisynth_read_header,
216   avisynth_read_packet,
217   avisynth_read_close,
218   avisynth_read_seek,
219   NULL,
220   0,
221   "avs",
222 };