Replace av_dlog with normal av_log at trace level
[ffmpeg.git] / libavformat / nsvdec.c
1 /*
2  * NSV demuxer
3  * Copyright (c) 2004 The Libav Project
4  *
5  * first version by Francois Revol <revol@free.fr>
6  *
7  * This file is part of Libav.
8  *
9  * Libav is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * Libav is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with Libav; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22  */
23
24 #include "libavutil/attributes.h"
25 #include "libavutil/mathematics.h"
26 #include "avformat.h"
27 #include "internal.h"
28 #include "libavutil/dict.h"
29
30 /* max bytes to crawl for trying to resync
31  * stupid streaming servers don't start at chunk boundaries...
32  */
33 #define NSV_MAX_RESYNC (500*1024)
34 #define NSV_MAX_RESYNC_TRIES 300
35
36 /*
37  * References:
38  * (1) http://www.multimedia.cx/nsv-format.txt
39  * seems someone came to the same conclusions as me, and updated it:
40  * (2) http://www.stud.ktu.lt/~vitslav/nsv/nsv-format.txt
41  *     http://www.stud.ktu.lt/~vitslav/nsv/
42  * official docs
43  * (3) http://ultravox.aol.com/NSVFormat.rtf
44  * Sample files:
45  * (S1) http://www.nullsoft.com/nsv/samples/
46  * http://www.nullsoft.com/nsv/samples/faster.nsv
47  * http://streamripper.sourceforge.net/openbb/read.php?TID=492&page=4
48  */
49
50 /*
51  * notes on the header (Francois Revol):
52  *
53  * It is followed by strings, then a table, but nothing tells
54  * where the table begins according to (1). After checking faster.nsv,
55  * I believe NVSf[16-19] gives the size of the strings data
56  * (that is the offset of the data table after the header).
57  * After checking all samples from (S1) all confirms this.
58  *
59  * Then, about NSVf[12-15], faster.nsf has 179700. When veiwing it in VLC,
60  * I noticed there was about 1 NVSs chunk/s, so I ran
61  * strings faster.nsv | grep NSVs | wc -l
62  * which gave me 180. That leads me to think that NSVf[12-15] might be the
63  * file length in milliseconds.
64  * Let's try that:
65  * for f in *.nsv; do HTIME="$(od -t x4 "$f" | head -1 | sed 's/.* //')"; echo "'$f' $((0x$HTIME))s = $((0x$HTIME/1000/60)):$((0x$HTIME/1000%60))"; done
66  * except for nstrailer (which doesn't have an NSVf header), it repports correct time.
67  *
68  * nsvtrailer.nsv (S1) does not have any NSVf header, only NSVs chunks,
69  * so the header seems to not be mandatory. (for streaming).
70  *
71  * index slice duration check (excepts nsvtrailer.nsv):
72  * for f in [^n]*.nsv; do
73  *     DUR="$(avconv -i "$f" 2> /dev/null | grep 'NSVf duration' | cut -d ' ' -f 4)"
74  *     IC="$(avconv -i "$f" 2> /dev/null | grep 'INDEX ENTRIES' | cut -d ' ' -f 2)"
75  *     echo "duration $DUR, slite time $(($DUR/$IC))"
76  * done
77  */
78
79 /*
80  * TODO:
81  * - handle timestamps !!!
82  * - use index
83  * - mime-type in probe()
84  * - seek
85  */
86
87 #if 0
88 struct NSVf_header {
89     uint32_t chunk_tag; /* 'NSVf' */
90     uint32_t chunk_size;
91     uint32_t file_size; /* max 4GB ??? no one learns anything it seems :^) */
92     uint32_t file_length; //unknown1;  /* what about MSB of file_size ? */
93     uint32_t info_strings_size; /* size of the info strings */ //unknown2;
94     uint32_t table_entries;
95     uint32_t table_entries_used; /* the left ones should be -1 */
96 };
97
98 struct NSVs_header {
99     uint32_t chunk_tag; /* 'NSVs' */
100     uint32_t v4cc;      /* or 'NONE' */
101     uint32_t a4cc;      /* or 'NONE' */
102     uint16_t vwidth;    /* assert(vwidth%16==0) */
103     uint16_t vheight;   /* assert(vheight%16==0) */
104     uint8_t framerate;  /* value = (framerate&0x80)?frtable[frameratex0x7f]:framerate */
105     uint16_t unknown;
106 };
107
108 struct nsv_avchunk_header {
109     uint8_t vchunk_size_lsb;
110     uint16_t vchunk_size_msb; /* value = (vchunk_size_msb << 4) | (vchunk_size_lsb >> 4) */
111     uint16_t achunk_size;
112 };
113
114 struct nsv_pcm_header {
115     uint8_t bits_per_sample;
116     uint8_t channel_count;
117     uint16_t sample_rate;
118 };
119 #endif
120
121 /* variation from avi.h */
122 /*typedef struct CodecTag {
123     int id;
124     unsigned int tag;
125 } CodecTag;*/
126
127 /* tags */
128
129 #define T_NSVF MKTAG('N', 'S', 'V', 'f') /* file header */
130 #define T_NSVS MKTAG('N', 'S', 'V', 's') /* chunk header */
131 #define T_TOC2 MKTAG('T', 'O', 'C', '2') /* extra index marker */
132 #define T_NONE MKTAG('N', 'O', 'N', 'E') /* null a/v 4CC */
133 #define T_SUBT MKTAG('S', 'U', 'B', 'T') /* subtitle aux data */
134 #define T_ASYN MKTAG('A', 'S', 'Y', 'N') /* async a/v aux marker */
135 #define T_KEYF MKTAG('K', 'E', 'Y', 'F') /* video keyframe aux marker (addition) */
136
137 #define TB_NSVF MKBETAG('N', 'S', 'V', 'f')
138 #define TB_NSVS MKBETAG('N', 'S', 'V', 's')
139
140 /* hardcoded stream indexes */
141 #define NSV_ST_VIDEO 0
142 #define NSV_ST_AUDIO 1
143 #define NSV_ST_SUBT 2
144
145 enum NSVStatus {
146     NSV_UNSYNC,
147     NSV_FOUND_NSVF,
148     NSV_HAS_READ_NSVF,
149     NSV_FOUND_NSVS,
150     NSV_HAS_READ_NSVS,
151     NSV_FOUND_BEEF,
152     NSV_GOT_VIDEO,
153     NSV_GOT_AUDIO,
154 };
155
156 typedef struct NSVStream {
157     int frame_offset; /* current frame (video) or byte (audio) counter
158                          (used to compute the pts) */
159     int scale;
160     int rate;
161     int sample_size; /* audio only data */
162     int start;
163
164     int new_frame_offset; /* temporary storage (used during seek) */
165     int cum_len; /* temporary storage (used during seek) */
166 } NSVStream;
167
168 typedef struct NSVContext {
169     int  base_offset;
170     int  NSVf_end;
171     uint32_t *nsvs_file_offset;
172     int index_entries;
173     enum NSVStatus state;
174     AVPacket ahead[2]; /* [v, a] if .data is !NULL there is something */
175     /* cached */
176     int64_t duration;
177     uint32_t vtag, atag;
178     uint16_t vwidth, vheight;
179     int16_t avsync;
180     AVRational framerate;
181     uint32_t *nsvs_timestamps;
182     //DVDemuxContext* dv_demux;
183 } NSVContext;
184
185 static const AVCodecTag nsv_codec_video_tags[] = {
186     { AV_CODEC_ID_VP3, MKTAG('V', 'P', '3', ' ') },
187     { AV_CODEC_ID_VP3, MKTAG('V', 'P', '3', '0') },
188     { AV_CODEC_ID_VP3, MKTAG('V', 'P', '3', '1') },
189     { AV_CODEC_ID_VP5, MKTAG('V', 'P', '5', ' ') },
190     { AV_CODEC_ID_VP5, MKTAG('V', 'P', '5', '0') },
191     { AV_CODEC_ID_VP6, MKTAG('V', 'P', '6', ' ') },
192     { AV_CODEC_ID_VP6, MKTAG('V', 'P', '6', '0') },
193     { AV_CODEC_ID_VP6, MKTAG('V', 'P', '6', '1') },
194     { AV_CODEC_ID_VP6, MKTAG('V', 'P', '6', '2') },
195 /*
196     { AV_CODEC_ID_VP4, MKTAG('V', 'P', '4', ' ') },
197     { AV_CODEC_ID_VP4, MKTAG('V', 'P', '4', '0') },
198 */
199     { AV_CODEC_ID_MPEG4, MKTAG('X', 'V', 'I', 'D') }, /* cf sample xvid decoder from nsv_codec_sdk.zip */
200     { AV_CODEC_ID_RAWVIDEO, MKTAG('R', 'G', 'B', '3') },
201     { AV_CODEC_ID_NONE, 0 },
202 };
203
204 static const AVCodecTag nsv_codec_audio_tags[] = {
205     { AV_CODEC_ID_MP3,       MKTAG('M', 'P', '3', ' ') },
206     { AV_CODEC_ID_AAC,       MKTAG('A', 'A', 'C', ' ') },
207     { AV_CODEC_ID_AAC,       MKTAG('A', 'A', 'C', 'P') },
208     { AV_CODEC_ID_SPEEX,     MKTAG('S', 'P', 'X', ' ') },
209     { AV_CODEC_ID_PCM_U16LE, MKTAG('P', 'C', 'M', ' ') },
210     { AV_CODEC_ID_NONE,      0 },
211 };
212
213 //static int nsv_load_index(AVFormatContext *s);
214 static int nsv_read_chunk(AVFormatContext *s, int fill_header);
215
216 #define print_tag(str, tag, size)       \
217     av_log(NULL, AV_LOG_TRACE, "%s: tag=%c%c%c%c\n", \
218             str, tag & 0xff,            \
219             (tag >> 8) & 0xff,          \
220             (tag >> 16) & 0xff,         \
221             (tag >> 24) & 0xff);
222
223 /* try to find something we recognize, and set the state accordingly */
224 static int nsv_resync(AVFormatContext *s)
225 {
226     NSVContext *nsv = s->priv_data;
227     AVIOContext *pb = s->pb;
228     uint32_t v = 0;
229     int i;
230
231     av_log(s, AV_LOG_TRACE, "%s(), offset = %"PRId64", state = %d\n", __FUNCTION__, avio_tell(pb), nsv->state);
232
233     //nsv->state = NSV_UNSYNC;
234
235     for (i = 0; i < NSV_MAX_RESYNC; i++) {
236         if (pb->eof_reached) {
237             av_log(s, AV_LOG_TRACE, "NSV EOF\n");
238             nsv->state = NSV_UNSYNC;
239             return -1;
240         }
241         v <<= 8;
242         v |= avio_r8(pb);
243         if (i < 8) {
244             av_log(s, AV_LOG_TRACE, "NSV resync: [%d] = %02x\n", i, v & 0x0FF);
245         }
246
247         if ((v & 0x0000ffff) == 0xefbe) { /* BEEF */
248             av_log(s, AV_LOG_TRACE, "NSV resynced on BEEF after %d bytes\n", i+1);
249             nsv->state = NSV_FOUND_BEEF;
250             return 0;
251         }
252         /* we read as big-endian, thus the MK*BE* */
253         if (v == TB_NSVF) { /* NSVf */
254             av_log(s, AV_LOG_TRACE, "NSV resynced on NSVf after %d bytes\n", i+1);
255             nsv->state = NSV_FOUND_NSVF;
256             return 0;
257         }
258         if (v == MKBETAG('N', 'S', 'V', 's')) { /* NSVs */
259             av_log(s, AV_LOG_TRACE, "NSV resynced on NSVs after %d bytes\n", i+1);
260             nsv->state = NSV_FOUND_NSVS;
261             return 0;
262         }
263
264     }
265     av_log(s, AV_LOG_TRACE, "NSV sync lost\n");
266     return -1;
267 }
268
269 static int nsv_parse_NSVf_header(AVFormatContext *s)
270 {
271     NSVContext *nsv = s->priv_data;
272     AVIOContext *pb = s->pb;
273     unsigned int av_unused file_size;
274     unsigned int size;
275     int64_t duration;
276     int strings_size;
277     int table_entries;
278     int table_entries_used;
279
280     av_log(s, AV_LOG_TRACE, "%s()\n", __FUNCTION__);
281
282     nsv->state = NSV_UNSYNC; /* in case we fail */
283
284     size = avio_rl32(pb);
285     if (size < 28)
286         return -1;
287     nsv->NSVf_end = size;
288
289     //s->file_size = (uint32_t)avio_rl32(pb);
290     file_size = (uint32_t)avio_rl32(pb);
291     av_log(s, AV_LOG_TRACE, "NSV NSVf chunk_size %u\n", size);
292     av_log(s, AV_LOG_TRACE, "NSV NSVf file_size %u\n", file_size);
293
294     nsv->duration = duration = avio_rl32(pb); /* in ms */
295     av_log(s, AV_LOG_TRACE, "NSV NSVf duration %"PRId64" ms\n", duration);
296     // XXX: store it in AVStreams
297
298     strings_size = avio_rl32(pb);
299     table_entries = avio_rl32(pb);
300     table_entries_used = avio_rl32(pb);
301     av_log(s, AV_LOG_TRACE, "NSV NSVf info-strings size: %d, table entries: %d, bis %d\n",
302             strings_size, table_entries, table_entries_used);
303     if (pb->eof_reached)
304         return -1;
305
306     av_log(s, AV_LOG_TRACE, "NSV got header; filepos %"PRId64"\n", avio_tell(pb));
307
308     if (strings_size > 0) {
309         char *strings; /* last byte will be '\0' to play safe with str*() */
310         char *p, *endp;
311         char *token, *value;
312         char quote;
313
314         p = strings = av_mallocz((size_t)strings_size + 1);
315         if (!p)
316             return AVERROR(ENOMEM);
317         endp = strings + strings_size;
318         avio_read(pb, strings, strings_size);
319         while (p < endp) {
320             while (*p == ' ')
321                 p++; /* strip out spaces */
322             if (p >= endp-2)
323                 break;
324             token = p;
325             p = strchr(p, '=');
326             if (!p || p >= endp-2)
327                 break;
328             *p++ = '\0';
329             quote = *p++;
330             value = p;
331             p = strchr(p, quote);
332             if (!p || p >= endp)
333                 break;
334             *p++ = '\0';
335             av_log(s, AV_LOG_TRACE, "NSV NSVf INFO: %s='%s'\n", token, value);
336             av_dict_set(&s->metadata, token, value, 0);
337         }
338         av_free(strings);
339     }
340     if (pb->eof_reached)
341         return -1;
342
343     av_log(s, AV_LOG_TRACE, "NSV got infos; filepos %"PRId64"\n", avio_tell(pb));
344
345     if (table_entries_used > 0) {
346         int i;
347         nsv->index_entries = table_entries_used;
348         if((unsigned)table_entries_used >= UINT_MAX / sizeof(uint32_t))
349             return -1;
350         nsv->nsvs_file_offset = av_malloc((unsigned)table_entries_used * sizeof(uint32_t));
351         if (!nsv->nsvs_file_offset)
352             return AVERROR(ENOMEM);
353
354         for(i=0;i<table_entries_used;i++)
355             nsv->nsvs_file_offset[i] = avio_rl32(pb) + size;
356
357         if(table_entries > table_entries_used &&
358            avio_rl32(pb) == MKTAG('T','O','C','2')) {
359             nsv->nsvs_timestamps = av_malloc((unsigned)table_entries_used*sizeof(uint32_t));
360             if (!nsv->nsvs_timestamps)
361                 return AVERROR(ENOMEM);
362             for(i=0;i<table_entries_used;i++) {
363                 nsv->nsvs_timestamps[i] = avio_rl32(pb);
364             }
365         }
366     }
367
368     av_log(s, AV_LOG_TRACE, "NSV got index; filepos %"PRId64"\n", avio_tell(pb));
369
370     avio_seek(pb, nsv->base_offset + size, SEEK_SET); /* required for dumbdriving-271.nsv (2 extra bytes) */
371
372     if (pb->eof_reached)
373         return -1;
374     nsv->state = NSV_HAS_READ_NSVF;
375     return 0;
376 }
377
378 static int nsv_parse_NSVs_header(AVFormatContext *s)
379 {
380     NSVContext *nsv = s->priv_data;
381     AVIOContext *pb = s->pb;
382     uint32_t vtag, atag;
383     uint16_t vwidth, vheight;
384     AVRational framerate;
385     int i;
386     AVStream *st;
387     NSVStream *nst;
388     av_log(s, AV_LOG_TRACE, "%s()\n", __FUNCTION__);
389
390     vtag = avio_rl32(pb);
391     atag = avio_rl32(pb);
392     vwidth = avio_rl16(pb);
393     vheight = avio_rl16(pb);
394     i = avio_r8(pb);
395
396     av_log(s, AV_LOG_TRACE, "NSV NSVs framerate code %2x\n", i);
397     if(i&0x80) { /* odd way of giving native framerates from docs */
398         int t=(i & 0x7F)>>2;
399         if(t<16) framerate = (AVRational){1, t+1};
400         else     framerate = (AVRational){t-15, 1};
401
402         if(i&1){
403             framerate.num *= 1000;
404             framerate.den *= 1001;
405         }
406
407         if((i&3)==3)      framerate.num *= 24;
408         else if((i&3)==2) framerate.num *= 25;
409         else              framerate.num *= 30;
410     }
411     else
412         framerate= (AVRational){i, 1};
413
414     nsv->avsync = avio_rl16(pb);
415     nsv->framerate = framerate;
416
417     print_tag("NSV NSVs vtag", vtag, 0);
418     print_tag("NSV NSVs atag", atag, 0);
419     av_log(s, AV_LOG_TRACE, "NSV NSVs vsize %dx%d\n", vwidth, vheight);
420
421     /* XXX change to ap != NULL ? */
422     if (s->nb_streams == 0) { /* streams not yet published, let's do that */
423         nsv->vtag = vtag;
424         nsv->atag = atag;
425         nsv->vwidth = vwidth;
426         nsv->vheight = vwidth;
427         if (vtag != T_NONE) {
428             int i;
429             st = avformat_new_stream(s, NULL);
430             if (!st)
431                 goto fail;
432
433             st->id = NSV_ST_VIDEO;
434             nst = av_mallocz(sizeof(NSVStream));
435             if (!nst)
436                 goto fail;
437             st->priv_data = nst;
438             st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
439             st->codec->codec_tag = vtag;
440             st->codec->codec_id = ff_codec_get_id(nsv_codec_video_tags, vtag);
441             st->codec->width = vwidth;
442             st->codec->height = vheight;
443             st->codec->bits_per_coded_sample = 24; /* depth XXX */
444
445             avpriv_set_pts_info(st, 64, framerate.den, framerate.num);
446             st->start_time = 0;
447             st->duration = av_rescale(nsv->duration, framerate.num, 1000*framerate.den);
448
449             for(i=0;i<nsv->index_entries;i++) {
450                 if(nsv->nsvs_timestamps) {
451                     av_add_index_entry(st, nsv->nsvs_file_offset[i], nsv->nsvs_timestamps[i],
452                                        0, 0, AVINDEX_KEYFRAME);
453                 } else {
454                     int64_t ts = av_rescale(i*nsv->duration/nsv->index_entries, framerate.num, 1000*framerate.den);
455                     av_add_index_entry(st, nsv->nsvs_file_offset[i], ts, 0, 0, AVINDEX_KEYFRAME);
456                 }
457             }
458         }
459         if (atag != T_NONE) {
460             st = avformat_new_stream(s, NULL);
461             if (!st)
462                 goto fail;
463
464             st->id = NSV_ST_AUDIO;
465             nst = av_mallocz(sizeof(NSVStream));
466             if (!nst)
467                 goto fail;
468             st->priv_data = nst;
469             st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
470             st->codec->codec_tag = atag;
471             st->codec->codec_id = ff_codec_get_id(nsv_codec_audio_tags, atag);
472
473             st->need_parsing = AVSTREAM_PARSE_FULL; /* for PCM we will read a chunk later and put correct info */
474
475             /* set timebase to common denominator of ms and framerate */
476             avpriv_set_pts_info(st, 64, 1, framerate.num*1000);
477             st->start_time = 0;
478             st->duration = (int64_t)nsv->duration * framerate.num;
479         }
480     } else {
481         if (nsv->vtag != vtag || nsv->atag != atag || nsv->vwidth != vwidth || nsv->vheight != vwidth) {
482             av_log(s, AV_LOG_TRACE, "NSV NSVs header values differ from the first one!!!\n");
483             //return -1;
484         }
485     }
486
487     nsv->state = NSV_HAS_READ_NSVS;
488     return 0;
489 fail:
490     /* XXX */
491     nsv->state = NSV_UNSYNC;
492     return -1;
493 }
494
495 static int nsv_read_header(AVFormatContext *s)
496 {
497     NSVContext *nsv = s->priv_data;
498     int i, err;
499
500     av_log(s, AV_LOG_TRACE, "%s()\n", __FUNCTION__);
501     av_log(s, AV_LOG_TRACE, "filename '%s'\n", s->filename);
502
503     nsv->state = NSV_UNSYNC;
504     nsv->ahead[0].data = nsv->ahead[1].data = NULL;
505
506     for (i = 0; i < NSV_MAX_RESYNC_TRIES; i++) {
507         if (nsv_resync(s) < 0)
508             return -1;
509         if (nsv->state == NSV_FOUND_NSVF) {
510             err = nsv_parse_NSVf_header(s);
511             if (err < 0)
512                 return err;
513         }
514             /* we need the first NSVs also... */
515         if (nsv->state == NSV_FOUND_NSVS) {
516             err = nsv_parse_NSVs_header(s);
517             if (err < 0)
518                 return err;
519             break; /* we just want the first one */
520         }
521     }
522     if (s->nb_streams < 1) /* no luck so far */
523         return -1;
524     /* now read the first chunk, so we can attempt to decode more info */
525     err = nsv_read_chunk(s, 1);
526
527     av_log(s, AV_LOG_TRACE, "parsed header\n");
528     return err;
529 }
530
531 static int nsv_read_chunk(AVFormatContext *s, int fill_header)
532 {
533     NSVContext *nsv = s->priv_data;
534     AVIOContext *pb = s->pb;
535     AVStream *st[2] = {NULL, NULL};
536     NSVStream *nst;
537     AVPacket *pkt;
538     int i, err = 0;
539     uint8_t auxcount; /* number of aux metadata, also 4 bits of vsize */
540     uint32_t vsize;
541     uint16_t asize;
542     uint16_t auxsize;
543
544     av_log(s, AV_LOG_TRACE, "%s(%d)\n", __FUNCTION__, fill_header);
545
546     if (nsv->ahead[0].data || nsv->ahead[1].data)
547         return 0; //-1; /* hey! eat what you've in your plate first! */
548
549 null_chunk_retry:
550     if (pb->eof_reached)
551         return -1;
552
553     for (i = 0; i < NSV_MAX_RESYNC_TRIES && nsv->state < NSV_FOUND_NSVS && !err; i++)
554         err = nsv_resync(s);
555     if (err < 0)
556         return err;
557     if (nsv->state == NSV_FOUND_NSVS)
558         err = nsv_parse_NSVs_header(s);
559     if (err < 0)
560         return err;
561     if (nsv->state != NSV_HAS_READ_NSVS && nsv->state != NSV_FOUND_BEEF)
562         return -1;
563
564     auxcount = avio_r8(pb);
565     vsize = avio_rl16(pb);
566     asize = avio_rl16(pb);
567     vsize = (vsize << 4) | (auxcount >> 4);
568     auxcount &= 0x0f;
569     av_log(s, AV_LOG_TRACE, "NSV CHUNK %d aux, %u bytes video, %d bytes audio\n", auxcount, vsize, asize);
570     /* skip aux stuff */
571     for (i = 0; i < auxcount; i++) {
572         uint32_t av_unused auxtag;
573         auxsize = avio_rl16(pb);
574         auxtag = avio_rl32(pb);
575         av_log(s, AV_LOG_TRACE, "NSV aux data: '%c%c%c%c', %d bytes\n",
576               (auxtag & 0x0ff),
577               ((auxtag >> 8) & 0x0ff),
578               ((auxtag >> 16) & 0x0ff),
579               ((auxtag >> 24) & 0x0ff),
580               auxsize);
581         avio_skip(pb, auxsize);
582         vsize -= auxsize + sizeof(uint16_t) + sizeof(uint32_t); /* that's becoming braindead */
583     }
584
585     if (pb->eof_reached)
586         return -1;
587     if (!vsize && !asize) {
588         nsv->state = NSV_UNSYNC;
589         goto null_chunk_retry;
590     }
591
592     /* map back streams to v,a */
593     if (s->nb_streams > 0)
594         st[s->streams[0]->id] = s->streams[0];
595     if (s->nb_streams > 1)
596         st[s->streams[1]->id] = s->streams[1];
597
598     if (vsize && st[NSV_ST_VIDEO]) {
599         nst = st[NSV_ST_VIDEO]->priv_data;
600         pkt = &nsv->ahead[NSV_ST_VIDEO];
601         av_get_packet(pb, pkt, vsize);
602         pkt->stream_index = st[NSV_ST_VIDEO]->index;//NSV_ST_VIDEO;
603         pkt->dts = nst->frame_offset;
604         pkt->flags |= nsv->state == NSV_HAS_READ_NSVS ? AV_PKT_FLAG_KEY : 0; /* keyframe only likely on a sync frame */
605         for (i = 0; i < FFMIN(8, vsize); i++)
606             av_log(s, AV_LOG_TRACE, "NSV video: [%d] = %02x\n", i, pkt->data[i]);
607     }
608     if(st[NSV_ST_VIDEO])
609         ((NSVStream*)st[NSV_ST_VIDEO]->priv_data)->frame_offset++;
610
611     if (asize && st[NSV_ST_AUDIO]) {
612         nst = st[NSV_ST_AUDIO]->priv_data;
613         pkt = &nsv->ahead[NSV_ST_AUDIO];
614         /* read raw audio specific header on the first audio chunk... */
615         /* on ALL audio chunks ?? seems so! */
616         if (asize && st[NSV_ST_AUDIO]->codec->codec_tag == MKTAG('P', 'C', 'M', ' ')/* && fill_header*/) {
617             uint8_t bps;
618             uint8_t channels;
619             uint16_t samplerate;
620             bps = avio_r8(pb);
621             channels = avio_r8(pb);
622             samplerate = avio_rl16(pb);
623             if (!channels || !samplerate)
624                 return AVERROR_INVALIDDATA;
625             asize-=4;
626             av_log(s, AV_LOG_TRACE, "NSV RAWAUDIO: bps %d, nchan %d, srate %d\n", bps, channels, samplerate);
627             if (fill_header) {
628                 st[NSV_ST_AUDIO]->need_parsing = AVSTREAM_PARSE_NONE; /* we know everything */
629                 if (bps != 16) {
630                     av_log(s, AV_LOG_TRACE, "NSV AUDIO bit/sample != 16 (%d)!!!\n", bps);
631                 }
632                 bps /= channels; // ???
633                 if (bps == 8)
634                     st[NSV_ST_AUDIO]->codec->codec_id = AV_CODEC_ID_PCM_U8;
635                 samplerate /= 4;/* UGH ??? XXX */
636                 channels = 1;
637                 st[NSV_ST_AUDIO]->codec->channels = channels;
638                 st[NSV_ST_AUDIO]->codec->sample_rate = samplerate;
639                 av_log(s, AV_LOG_TRACE, "NSV RAWAUDIO: bps %d, nchan %d, srate %d\n", bps, channels, samplerate);
640             }
641         }
642         av_get_packet(pb, pkt, asize);
643         pkt->stream_index = st[NSV_ST_AUDIO]->index;//NSV_ST_AUDIO;
644         pkt->flags |= nsv->state == NSV_HAS_READ_NSVS ? AV_PKT_FLAG_KEY : 0; /* keyframe only likely on a sync frame */
645         if( nsv->state == NSV_HAS_READ_NSVS && st[NSV_ST_VIDEO] ) {
646             /* on a nsvs frame we have new information on a/v sync */
647             pkt->dts = (((NSVStream*)st[NSV_ST_VIDEO]->priv_data)->frame_offset-1);
648             pkt->dts *= (int64_t)1000        * nsv->framerate.den;
649             pkt->dts += (int64_t)nsv->avsync * nsv->framerate.num;
650             av_log(s, AV_LOG_TRACE, "NSV AUDIO: sync:%d, dts:%"PRId64, nsv->avsync, pkt->dts);
651         }
652         nst->frame_offset++;
653     }
654
655     nsv->state = NSV_UNSYNC;
656     return 0;
657 }
658
659
660 static int nsv_read_packet(AVFormatContext *s, AVPacket *pkt)
661 {
662     NSVContext *nsv = s->priv_data;
663     int i, err = 0;
664
665     av_log(s, AV_LOG_TRACE, "%s()\n", __FUNCTION__);
666
667     /* in case we don't already have something to eat ... */
668     if (!nsv->ahead[0].data && !nsv->ahead[1].data)
669         err = nsv_read_chunk(s, 0);
670     if (err < 0)
671         return err;
672
673     /* now pick one of the plates */
674     for (i = 0; i < 2; i++) {
675         if (nsv->ahead[i].data) {
676             av_log(s, AV_LOG_TRACE, "%s: using cached packet[%d]\n", __FUNCTION__, i);
677             /* avoid the cost of new_packet + memcpy(->data) */
678             memcpy(pkt, &nsv->ahead[i], sizeof(AVPacket));
679             nsv->ahead[i].data = NULL; /* we ate that one */
680             return pkt->size;
681         }
682     }
683
684     /* this restaurant is not approvisionned :^] */
685     return -1;
686 }
687
688 static int nsv_read_seek(AVFormatContext *s, int stream_index, int64_t timestamp, int flags)
689 {
690     NSVContext *nsv = s->priv_data;
691     AVStream *st = s->streams[stream_index];
692     NSVStream *nst = st->priv_data;
693     int index;
694
695     index = av_index_search_timestamp(st, timestamp, flags);
696     if(index < 0)
697         return -1;
698
699     if (avio_seek(s->pb, st->index_entries[index].pos, SEEK_SET) < 0)
700         return -1;
701
702     nst->frame_offset = st->index_entries[index].timestamp;
703     nsv->state = NSV_UNSYNC;
704     return 0;
705 }
706
707 static int nsv_read_close(AVFormatContext *s)
708 {
709     NSVContext *nsv = s->priv_data;
710
711     av_freep(&nsv->nsvs_file_offset);
712     av_freep(&nsv->nsvs_timestamps);
713     if (nsv->ahead[0].data)
714         av_free_packet(&nsv->ahead[0]);
715     if (nsv->ahead[1].data)
716         av_free_packet(&nsv->ahead[1]);
717     return 0;
718 }
719
720 static int nsv_probe(AVProbeData *p)
721 {
722     int i;
723     int score;
724     int vsize, asize, auxcount;
725     score = 0;
726     av_log(NULL, AV_LOG_TRACE, "nsv_probe(), buf_size %d\n", p->buf_size);
727     /* check file header */
728     /* streamed files might not have any header */
729     if (p->buf[0] == 'N' && p->buf[1] == 'S' &&
730         p->buf[2] == 'V' && (p->buf[3] == 'f' || p->buf[3] == 's'))
731         return AVPROBE_SCORE_MAX;
732     /* XXX: do streamed files always start at chunk boundary ?? */
733     /* or do we need to search NSVs in the byte stream ? */
734     /* seems the servers don't bother starting clean chunks... */
735     /* sometimes even the first header is at 9KB or something :^) */
736     for (i = 1; i < p->buf_size - 3; i++) {
737         if (p->buf[i+0] == 'N' && p->buf[i+1] == 'S' &&
738             p->buf[i+2] == 'V' && p->buf[i+3] == 's') {
739             score = AVPROBE_SCORE_MAX/5;
740             /* Get the chunk size and check if at the end we are getting 0xBEEF */
741             auxcount = p->buf[i+19];
742             vsize = p->buf[i+20]  | p->buf[i+21] << 8;
743             asize = p->buf[i+22]  | p->buf[i+23] << 8;
744             vsize = (vsize << 4) | (auxcount >> 4);
745             if ((asize + vsize + i + 23) <  p->buf_size - 2) {
746                 if (p->buf[i+23+asize+vsize+1] == 0xEF &&
747                     p->buf[i+23+asize+vsize+2] == 0xBE)
748                     return AVPROBE_SCORE_MAX-20;
749             }
750         }
751     }
752     /* so we'll have more luck on extension... */
753     if (av_match_ext(p->filename, "nsv"))
754         return AVPROBE_SCORE_EXTENSION;
755     /* FIXME: add mime-type check */
756     return score;
757 }
758
759 AVInputFormat ff_nsv_demuxer = {
760     .name           = "nsv",
761     .long_name      = NULL_IF_CONFIG_SMALL("Nullsoft Streaming Video"),
762     .priv_data_size = sizeof(NSVContext),
763     .read_probe     = nsv_probe,
764     .read_header    = nsv_read_header,
765     .read_packet    = nsv_read_packet,
766     .read_close     = nsv_read_close,
767     .read_seek      = nsv_read_seek,
768 };