soxdec.c 4.72 KB
Newer Older
1 2 3 4 5 6 7
/*
 * SoX native format demuxer
 * Copyright (c) 2009 Daniel Verkamp <daniel@drv.nu>
 *
 * Based on libSoX sox-fmt.c
 * Copyright (c) 2008 robs@users.sourceforge.net
 *
8
 * This file is part of Libav.
9
 *
10
 * Libav is free software; you can redistribute it and/or
11 12 13 14
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
15
 * Libav is distributed in the hope that it will be useful,
16 17 18 19 20
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
21
 * License along with Libav; if not, write to the Free Software
22 23 24 25
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

/**
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 39 40 41 42 43 44 45 46 47 48 49
#include "sox.h"

static int sox_probe(AVProbeData *p)
{
    if (AV_RL32(p->buf) == SOX_TAG || AV_RB32(p->buf) == SOX_TAG)
        return AVPROBE_SCORE_MAX;
    return 0;
}

static int sox_read_header(AVFormatContext *s,
                           AVFormatParameters *ap)
{
50
    AVIOContext *pb = s->pb;
51 52 53 54
    unsigned header_size, comment_size;
    double sample_rate, sample_rate_frac;
    AVStream *st;

55
    st = avformat_new_stream(s, NULL);
56 57 58
    if (!st)
        return AVERROR(ENOMEM);

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 67
        st->codec->channels = avio_rl32(pb);
        comment_size        = avio_rl32(pb);
68 69
    } else {
        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 74
        st->codec->channels = avio_rb32(pb);
        comment_size        = avio_rb32(pb);
75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98
    }

    if (comment_size > 0xFFFFFFFFU - SOX_FIXED_HDR - 4U) {
        av_log(s, AV_LOG_ERROR, "invalid comment size (%u)\n", comment_size);
        return -1;
    }

    if (sample_rate <= 0 || sample_rate > INT_MAX) {
        av_log(s, AV_LOG_ERROR, "invalid sample rate (%f)\n", sample_rate);
        return -1;
    }

    sample_rate_frac = sample_rate - floor(sample_rate);
    if (sample_rate_frac)
        av_log(s, AV_LOG_WARNING,
               "truncating fractional part of sample rate (%f)\n",
               sample_rate_frac);

    if ((header_size + 4) & 7 || header_size < SOX_FIXED_HDR + comment_size
        || st->codec->channels > 65535) /* Reserve top 16 bits */ {
        av_log(s, AV_LOG_ERROR, "invalid header\n");
        return -1;
    }

99 100
    if (comment_size && comment_size < UINT_MAX) {
        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 106
        comment[comment_size] = 0;

107 108
        av_dict_set(&s->metadata, "comment", comment,
                               AV_DICT_DONT_STRDUP_VAL);
109 110
    }

111
    avio_skip(pb, header_size - SOX_FIXED_HDR - comment_size);
112 113 114 115 116 117

    st->codec->sample_rate           = sample_rate;
    st->codec->bits_per_coded_sample = 32;
    st->codec->bit_rate              = st->codec->sample_rate *
                                       st->codec->bits_per_coded_sample *
                                       st->codec->channels;
Phil Rutschman's avatar
Phil Rutschman committed
118 119
    st->codec->block_align           = st->codec->bits_per_coded_sample *
                                       st->codec->channels / 8;
120

121
    avpriv_set_pts_info(st, 64, 1, st->codec->sample_rate);
122 123 124 125

    return 0;
}

Phil Rutschman's avatar
Phil Rutschman committed
126
#define SOX_SAMPLES 1024
127 128 129 130

static int sox_read_packet(AVFormatContext *s,
                           AVPacket *pkt)
{
Phil Rutschman's avatar
Phil Rutschman committed
131
    int ret, size;
132

Anton Khirnov's avatar
Anton Khirnov committed
133
    if (s->pb->eof_reached)
134 135
        return AVERROR_EOF;

Phil Rutschman's avatar
Phil Rutschman committed
136 137
    size = SOX_SAMPLES*s->streams[0]->codec->block_align;
    ret = av_get_packet(s->pb, pkt, size);
138 139 140 141 142 143 144 145
    if (ret < 0)
        return AVERROR(EIO);
    pkt->stream_index = 0;
    pkt->size = ret;

    return 0;
}

146
AVInputFormat ff_sox_demuxer = {
147 148 149 150 151 152
    .name           = "sox",
    .long_name      = NULL_IF_CONFIG_SMALL("SoX native format"),
    .read_probe     = sox_probe,
    .read_header    = sox_read_header,
    .read_packet    = sox_read_packet,
    .read_seek      = pcm_read_seek,
153
};