extract duration if available
[ffmpeg.git] / libavformat / flvdec.c
1 /*
2  * FLV encoder.
3  * Copyright (c) 2003 The FFmpeg Project.
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  */
19 #include "avformat.h"
20
21 unsigned int get_be24(ByteIOContext *s)
22 {
23     unsigned int val;
24     val = get_byte(s) << 16;
25     val |= get_byte(s) << 8;
26     val |= get_byte(s);
27     return val;
28 }
29
30 static int flv_probe(AVProbeData *p)
31 {
32     const uint8_t *d;
33
34     if (p->buf_size < 6)
35         return 0;
36     d = p->buf;
37     if (d[0] == 'F' && d[1] == 'L' && d[2] == 'V') {
38         return 50;
39     }
40     return 0;
41 }
42
43 static int flv_read_header(AVFormatContext *s,
44                            AVFormatParameters *ap)
45 {
46     int offset, flags;
47     
48     s->ctx_flags |= AVFMTCTX_NOHEADER; //ok we have a header but theres no fps, codec type, sample_rate, ...
49
50     url_fskip(&s->pb, 4);
51     flags = get_byte(&s->pb);
52
53     offset = get_be32(&s->pb);
54     url_fseek(&s->pb, offset, SEEK_SET);
55
56     return 0;
57 }
58
59 static int flv_read_packet(AVFormatContext *s, AVPacket *pkt)
60 {
61     int ret, i, type, size, pts, flags, is_audio, next;
62     AVStream *st = NULL;
63     
64  for(;;){
65     url_fskip(&s->pb, 4); /* size of previous packet */
66     type = get_byte(&s->pb);
67     size = get_be24(&s->pb);
68     pts = get_be24(&s->pb);
69 //    av_log(s, AV_LOG_DEBUG, "type:%d, size:%d, pts:%d\n", type, size, pts);
70     if (url_feof(&s->pb))
71         return AVERROR_IO;
72     url_fskip(&s->pb, 4); /* reserved */
73     flags = 0;
74     
75     if(size == 0)
76         continue;
77         
78     next= size + url_ftell(&s->pb);
79
80     if (type == 8) {
81         is_audio=1;
82         flags = get_byte(&s->pb);
83     } else if (type == 9) {
84         is_audio=0;
85         flags = get_byte(&s->pb);
86     } else if (type == 18 && size > 13+1+4) {
87         url_fskip(&s->pb, 13); //onMetaData blah
88         if(get_byte(&s->pb) == 8){
89             url_fskip(&s->pb, 4);
90         }
91         while(url_ftell(&s->pb) + 5 < next){
92             char tmp[128];
93             int type, len;
94             double d= 0;
95             
96             len= get_be16(&s->pb);
97             if(len >= sizeof(tmp) || !len)
98                 break;
99             get_buffer(&s->pb, tmp, len);
100             tmp[len]=0;
101             
102             type= get_byte(&s->pb);
103             if(type==0){
104                 d= av_int2dbl(get_be64(&s->pb));
105             }else if(type==2){
106                 len= get_be16(&s->pb);
107                 if(len >= sizeof(tmp))
108                     break;
109                 url_fskip(&s->pb, len);
110             }else if(type==8){
111                 //array
112                 break;
113             }else if(type==11){
114                 d= av_int2dbl(get_be64(&s->pb));
115                 get_be16(&s->pb);
116             }
117             
118             if(!strcmp(tmp, "duration")){
119                 s->duration = d*AV_TIME_BASE;
120             }else if(!strcmp(tmp, "videodatarate")){
121             }else if(!strcmp(tmp, "audiodatarate")){
122             }
123         }
124         url_fseek(&s->pb, next, SEEK_SET);
125         continue;
126     } else {
127         /* skip packet */
128         av_log(s, AV_LOG_ERROR, "skipping flv packet: type %d, size %d, flags %d\n", type, size, flags);
129         url_fseek(&s->pb, next, SEEK_SET);
130         continue;
131     }
132
133     /* now find stream */
134     for(i=0;i<s->nb_streams;i++) {
135         st = s->streams[i];
136         if (st->id == is_audio)
137             break;
138     }
139     if(i == s->nb_streams){
140         st = av_new_stream(s, is_audio);
141         if (!st)
142             return AVERROR_NOMEM;
143
144         av_set_pts_info(st, 24, 1, 1000); /* 24 bit pts in ms */
145         st->codec->time_base= (AVRational){1,1000};
146     }
147 //    av_log(NULL, AV_LOG_DEBUG, "%d %X %d \n", is_audio, flags, st->discard);
148     if(  (st->discard >= AVDISCARD_NONKEY && !((flags >> 4)==1 ||  is_audio))
149        ||(st->discard >= AVDISCARD_BIDIR  &&  ((flags >> 4)==3 && !is_audio))
150        || st->discard >= AVDISCARD_ALL
151        ){
152         url_fseek(&s->pb, next, SEEK_SET);
153         continue;
154     }
155     break;
156  }
157
158     if(is_audio){
159         if(st->codec->sample_rate == 0){
160             st->codec->codec_type = CODEC_TYPE_AUDIO;
161             st->codec->channels = (flags&1)+1;
162             if((flags >> 4) == 5)
163                 st->codec->sample_rate= 8000;
164             else
165                 st->codec->sample_rate = (44100<<((flags>>2)&3))>>3;
166             switch(flags >> 4){/* 0: uncompressed 1: ADPCM 2: mp3 5: Nellymoser 8kHz mono 6: Nellymoser*/
167             case 0: if (flags&2) st->codec->codec_id = CODEC_ID_PCM_S16BE;
168                     else st->codec->codec_id = CODEC_ID_PCM_S8; break;
169             case 1: st->codec->codec_id = CODEC_ID_ADPCM_SWF; break;
170             case 2: st->codec->codec_id = CODEC_ID_MP3; break;
171             // this is not listed at FLV but at SWF, strange...
172             case 3: if (flags&2) st->codec->codec_id = CODEC_ID_PCM_S16LE;
173                     else st->codec->codec_id = CODEC_ID_PCM_S8; break;
174             default:
175                 av_log(s, AV_LOG_INFO, "Unsupported audio codec (%x)\n", flags >> 4);
176                 st->codec->codec_tag= (flags >> 4);
177             }
178             st->codec->bits_per_sample = (flags & 2) ? 16 : 8;
179         }
180     }else{
181             st->codec->codec_type = CODEC_TYPE_VIDEO;
182             switch(flags & 0xF){
183             case 2: st->codec->codec_id = CODEC_ID_FLV1; break;
184             default:
185                 av_log(s, AV_LOG_INFO, "Unsupported video codec (%x)\n", flags & 0xf);
186                 st->codec->codec_tag= flags & 0xF;
187             }
188     }
189
190     ret= av_get_packet(&s->pb, pkt, size - 1);
191     if (ret <= 0) {
192         return AVERROR_IO;
193     }
194     /* note: we need to modify the packet size here to handle the last
195        packet */
196     pkt->size = ret;
197     pkt->pts = pts;
198     pkt->stream_index = st->index;
199     
200     if (is_audio || ((flags >> 4)==1))
201         pkt->flags |= PKT_FLAG_KEY;
202     
203     return ret;
204 }
205
206 static int flv_read_close(AVFormatContext *s)
207 {
208     return 0;
209 }
210
211 AVInputFormat flv_iformat = {
212     "flv",
213     "flv format",
214     0,
215     flv_probe,
216     flv_read_header,
217     flv_read_packet,
218     flv_read_close,
219     .extensions = "flv",
220     .value = CODEC_ID_FLV1,
221 };
222
223 int flvdec_init(void)
224 {
225     av_register_input_format(&flv_iformat);
226     return 0;
227 }