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