ad8f48896165a1210310dec5582c09608d93aff4
[ffmpeg.git] / libavformat / soxdec.c
1 /*
2  * SoX native format demuxer
3  * Copyright (c) 2009 Daniel Verkamp <daniel@drv.nu>
4  *
5  * Based on libSoX sox-fmt.c
6  * Copyright (c) 2008 robs@users.sourceforge.net
7  *
8  * This file is part of FFmpeg.
9  *
10  * FFmpeg is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU Lesser General Public
12  * License as published by the Free Software Foundation; either
13  * version 2.1 of the License, or (at your option) any later version.
14  *
15  * FFmpeg is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  * Lesser General Public License for more details.
19  *
20  * You should have received a copy of the GNU Lesser General Public
21  * License along with FFmpeg; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23  */
24
25 /**
26  * @file
27  * SoX native format demuxer
28  * @author Daniel Verkamp
29  * @see http://wiki.multimedia.cx/index.php?title=SoX_native_intermediate_format
30  */
31
32 #include "libavutil/intreadwrite.h"
33 #include "libavutil/intfloat.h"
34 #include "libavutil/dict.h"
35 #include "avformat.h"
36 #include "internal.h"
37 #include "pcm.h"
38 #include "sox.h"
39
40 static int sox_probe(AVProbeData *p)
41 {
42     if (AV_RL32(p->buf) == SOX_TAG || AV_RB32(p->buf) == SOX_TAG)
43         return AVPROBE_SCORE_MAX;
44     return 0;
45 }
46
47 static int sox_read_header(AVFormatContext *s,
48                            AVFormatParameters *ap)
49 {
50     AVIOContext *pb = s->pb;
51     unsigned header_size, comment_size;
52     double sample_rate, sample_rate_frac;
53     AVStream *st;
54
55     st = avformat_new_stream(s, NULL);
56     if (!st)
57         return AVERROR(ENOMEM);
58
59     st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
60
61     if (avio_rl32(pb) == SOX_TAG) {
62         st->codec->codec_id = CODEC_ID_PCM_S32LE;
63         header_size         = avio_rl32(pb);
64         avio_skip(pb, 8); /* sample count */
65         sample_rate         = av_int2double(avio_rl64(pb));
66         st->codec->channels = avio_rl32(pb);
67         comment_size        = avio_rl32(pb);
68     } else {
69         st->codec->codec_id = CODEC_ID_PCM_S32BE;
70         header_size         = avio_rb32(pb);
71         avio_skip(pb, 8); /* sample count */
72         sample_rate         = av_int2double(avio_rb64(pb));
73         st->codec->channels = avio_rb32(pb);
74         comment_size        = avio_rb32(pb);
75     }
76
77     if (comment_size > 0xFFFFFFFFU - SOX_FIXED_HDR - 4U) {
78         av_log(s, AV_LOG_ERROR, "invalid comment size (%u)\n", comment_size);
79         return -1;
80     }
81
82     if (sample_rate <= 0 || sample_rate > INT_MAX) {
83         av_log(s, AV_LOG_ERROR, "invalid sample rate (%f)\n", sample_rate);
84         return -1;
85     }
86
87     sample_rate_frac = sample_rate - floor(sample_rate);
88     if (sample_rate_frac)
89         av_log(s, AV_LOG_WARNING,
90                "truncating fractional part of sample rate (%f)\n",
91                sample_rate_frac);
92
93     if ((header_size + 4) & 7 || header_size < SOX_FIXED_HDR + comment_size
94         || st->codec->channels > 65535) /* Reserve top 16 bits */ {
95         av_log(s, AV_LOG_ERROR, "invalid header\n");
96         return -1;
97     }
98
99     if (comment_size && comment_size < UINT_MAX) {
100         char *comment = av_malloc(comment_size+1);
101         if (avio_read(pb, comment, comment_size) != comment_size) {
102             av_freep(&comment);
103             return AVERROR(EIO);
104         }
105         comment[comment_size] = 0;
106
107         av_dict_set(&s->metadata, "comment", comment,
108                                AV_DICT_DONT_STRDUP_VAL);
109     }
110
111     avio_skip(pb, header_size - SOX_FIXED_HDR - comment_size);
112
113     st->codec->sample_rate           = sample_rate;
114     st->codec->bits_per_coded_sample = 32;
115     st->codec->bit_rate              = st->codec->sample_rate *
116                                        st->codec->bits_per_coded_sample *
117                                        st->codec->channels;
118     st->codec->block_align           = st->codec->bits_per_coded_sample *
119                                        st->codec->channels / 8;
120
121     avpriv_set_pts_info(st, 64, 1, st->codec->sample_rate);
122
123     return 0;
124 }
125
126 #define SOX_SAMPLES 1024
127
128 static int sox_read_packet(AVFormatContext *s,
129                            AVPacket *pkt)
130 {
131     int ret, size;
132
133     if (url_feof(s->pb))
134         return AVERROR_EOF;
135
136     size = SOX_SAMPLES*s->streams[0]->codec->block_align;
137     ret = av_get_packet(s->pb, pkt, size);
138     if (ret < 0)
139         return AVERROR(EIO);
140     pkt->stream_index = 0;
141     pkt->size = ret;
142
143     return 0;
144 }
145
146 AVInputFormat ff_sox_demuxer = {
147     .name           = "sox",
148     .long_name      = NULL_IF_CONFIG_SMALL("SoX native format"),
149     .read_probe     = sox_probe,
150     .read_header    = sox_read_header,
151     .read_packet    = sox_read_packet,
152     .read_seek      = pcm_read_seek,
153 };