synfig-core/tags/synfig_0_61_04/synfig-core/src/modules/mod_libavcodec/libavformat/au.c

   1 /*
   2  * AU encoder and decoder
   3  * Copyright (c) 2001 Fabrice Bellard.
   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
  20 /*
  21  * First version by Francois Revol revol@free.fr
  22  *
  23  * Reference documents:
  24  * http://www.opengroup.org/public/pubs/external/auformat.html
  25  * http://www.goice.co.jp/member/mo/formats/au.html
  26  */
  27
  28 #include "avformat.h"
  29 #include "avi.h"
  30
  31 /* if we don't know the size in advance */
  32 #define AU_UNKOWN_SIZE ((uint32_t)(~0))
  33
  34 /* The ffmpeg codecs we support, and the IDs they have in the file */
  35 static const CodecTag codec_au_tags[] = {
  36     { CODEC_ID_PCM_MULAW, 1 },
  37     { CODEC_ID_PCM_S16BE, 3 },
  38     { CODEC_ID_PCM_ALAW, 27 },
  39     { 0, 0 },
  40 };
  41
  42 /* AUDIO_FILE header */
  43 static int put_au_header(ByteIOContext *pb, AVCodecContext *enc)
  44 {
  45     if(!enc->codec_tag)
  46        enc->codec_tag = codec_get_tag(codec_au_tags, enc->codec_id);
  47     if(!enc->codec_tag)
  48         return -1;
  49     put_tag(pb, ".snd");       /* magic number */
  50     put_be32(pb, 24);           /* header size */
  51     put_be32(pb, AU_UNKOWN_SIZE); /* data size */
  52     put_be32(pb, (uint32_t)enc->codec_tag);     /* codec ID */
  53     put_be32(pb, enc->sample_rate);
  54     put_be32(pb, (uint32_t)enc->channels);
  55     return 0;
  56 }
  57
  58 static int au_write_header(AVFormatContext *s)
  59 {
  60     ByteIOContext *pb = &s->pb;
  61
  62     s->priv_data = NULL;
  63
  64     /* format header */
  65     if (put_au_header(pb, &s->streams[0]->codec) < 0) {
  66         return -1;
  67     }
  68
  69     put_flush_packet(pb);
  70
  71     return 0;
  72 }
  73
  74 static int au_write_packet(AVFormatContext *s, int stream_index_ptr,
  75                            const uint8_t *buf, int size, int64_t pts)
  76 {
  77     ByteIOContext *pb = &s->pb;
  78     put_buffer(pb, buf, size);
  79     return 0;
  80 }
  81
  82 static int au_write_trailer(AVFormatContext *s)
  83 {
  84     ByteIOContext *pb = &s->pb;
  85     offset_t file_size;
  86
  87     if (!url_is_streamed(&s->pb)) {
  88
  89         /* update file size */
  90         file_size = url_ftell(pb);
  91         url_fseek(pb, 8, SEEK_SET);
  92         put_be32(pb, (uint32_t)(file_size - 24));
  93         url_fseek(pb, file_size, SEEK_SET);
  94
  95         put_flush_packet(pb);
  96     }
  97
  98     return 0;
  99 }
 100
 101 static int au_probe(AVProbeData *p)
 102 {
 103     /* check file header */
 104     if (p->buf_size <= 24)
 105         return 0;
 106     if (p->buf[0] == '.' && p->buf[1] == 's' &&
 107         p->buf[2] == 'n' && p->buf[3] == 'd')
 108         return AVPROBE_SCORE_MAX;
 109     else
 110         return 0;
 111 }
 112
 113 /* au input */
 114 static int au_read_header(AVFormatContext *s,
 115                            AVFormatParameters *ap)
 116 {
 117     int size;
 118     unsigned int tag;
 119     ByteIOContext *pb = &s->pb;
 120     unsigned int id, codec, channels, rate;
 121     AVStream *st;
 122
 123     /* check ".snd" header */
 124     tag = get_le32(pb);
 125     if (tag != MKTAG('.', 's', 'n', 'd'))
 126         return -1;
 127     size = get_be32(pb); /* header size */
 128     get_be32(pb); /* data size */
 129
 130     id = get_be32(pb);
 131     rate = get_be32(pb);
 132     channels = get_be32(pb);
 133
 134     codec = codec_get_id(codec_au_tags, id);
 135
 136     if (size >= 24) {
 137         /* skip unused data */
 138         url_fseek(pb, size - 24, SEEK_CUR);
 139     }
 140
 141     /* now we are ready: build format streams */
 142     st = av_new_stream(s, 0);
 143     if (!st)
 144         return -1;
 145     st->codec.codec_type = CODEC_TYPE_AUDIO;
 146     st->codec.codec_tag = id;
 147     st->codec.codec_id = codec;
 148     st->codec.channels = channels;
 149     st->codec.sample_rate = rate;
 150     return 0;
 151 }
 152
 153 #define MAX_SIZE 4096
 154
 155 static int au_read_packet(AVFormatContext *s,
 156                           AVPacket *pkt)
 157 {
 158     int ret;
 159
 160     if (url_feof(&s->pb))
 161         return -EIO;
 162     if (av_new_packet(pkt, MAX_SIZE))
 163         return -EIO;
 164     pkt->stream_index = 0;
 165
 166     ret = get_buffer(&s->pb, pkt->data, pkt->size);
 167     if (ret < 0)
 168         av_free_packet(pkt);
 169     /* note: we need to modify the packet size here to handle the last
 170        packet */
 171     pkt->size = ret;
 172     return 0;
 173 }
 174
 175 static int au_read_close(AVFormatContext *s)
 176 {
 177     return 0;
 178 }
 179
 180 static AVInputFormat au_iformat = {
 181     "au",
 182     "SUN AU Format",
 183     0,
 184     au_probe,
 185     au_read_header,
 186     au_read_packet,
 187     au_read_close,
 188 };
 189
 190 static AVOutputFormat au_oformat = {
 191     "au",
 192     "SUN AU Format",
 193     "audio/basic",
 194     "au",
 195     0,
 196     CODEC_ID_PCM_S16BE,
 197     CODEC_ID_NONE,
 198     au_write_header,
 199     au_write_packet,
 200     au_write_trailer,
 201 };
 202
 203 int au_init(void)
 204 {
 205     av_register_input_format(&au_iformat);
 206     av_register_output_format(&au_oformat);
 207     return 0;
 208 }