ffmpeg/libavformat/aiffenc.c

   1 /*
   2  * AIFF/AIFF-C muxer
   3  * Copyright (c) 2006  Patrick Guimond
   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
  22 #include <stdint.h>
  23
  24 #include "libavutil/intfloat.h"
  25 #include "libavutil/opt.h"
  26 #include "avformat.h"
  27 #include "internal.h"
  28 #include "aiff.h"
  29 #include "avio_internal.h"
  30 #include "isom.h"
  31 #include "id3v2.h"
  32
  33 typedef struct {
  34     const AVClass *class;
  35     int64_t form;
  36     int64_t frames;
  37     int64_t ssnd;
  38     int audio_stream_idx;
  39     AVPacketList *pict_list;
  40     int write_id3v2;
  41     int id3v2_version;
  42 } AIFFOutputContext;
  43
  44 static int put_id3v2_tags(AVFormatContext *s, AIFFOutputContext *aiff)
  45 {
  46     int ret;
  47     uint64_t pos, end, size;
  48     ID3v2EncContext id3v2 = { 0 };
  49     AVIOContext *pb = s->pb;
  50     AVPacketList *pict_list = aiff->pict_list;
  51
  52     if (!pb->seekable)
  53         return 0;
  54
  55     if (!s->metadata && !aiff->pict_list)
  56         return 0;
  57
  58     avio_wl32(pb, MKTAG('I', 'D', '3', ' '));
  59     avio_wb32(pb, 0);
  60     pos = avio_tell(pb);
  61
  62     ff_id3v2_start(&id3v2, pb, aiff->id3v2_version, ID3v2_DEFAULT_MAGIC);
  63     ff_id3v2_write_metadata(s, &id3v2);
  64     while (pict_list) {
  65         if ((ret = ff_id3v2_write_apic(s, &id3v2, &pict_list->pkt)) < 0)
  66             return ret;
  67         pict_list = pict_list->next;
  68     }
  69     ff_id3v2_finish(&id3v2, pb, s->metadata_header_padding);
  70
  71     end = avio_tell(pb);
  72     size = end - pos;
  73
  74     /* Update chunk size */
  75     avio_seek(pb, pos - 4, SEEK_SET);
  76     avio_wb32(pb, size);
  77     avio_seek(pb, end, SEEK_SET);
  78
  79     if (size & 1)
  80         avio_w8(pb, 0);
  81
  82     return 0;
  83 }
  84
  85 static void put_meta(AVFormatContext *s, const char *key, uint32_t id)
  86 {
  87     AVDictionaryEntry *tag;
  88     AVIOContext *pb = s->pb;
  89
  90     if (tag = av_dict_get(s->metadata, key, NULL, 0)) {
  91         int size = strlen(tag->value);
  92
  93         avio_wl32(pb, id);
  94         avio_wb32(pb, FFALIGN(size, 2));
  95         avio_write(pb, tag->value, size);
  96         if (size & 1)
  97             avio_w8(pb, 0);
  98     }
  99 }
 100
 101 static int aiff_write_header(AVFormatContext *s)
 102 {
 103     AIFFOutputContext *aiff = s->priv_data;
 104     AVIOContext *pb = s->pb;
 105     AVCodecContext *enc;
 106     uint64_t sample_rate;
 107     int i, aifc = 0;
 108
 109     aiff->audio_stream_idx = -1;
 110     for (i = 0; i < s->nb_streams; i++) {
 111         AVStream *st = s->streams[i];
 112         if (aiff->audio_stream_idx < 0 && st->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
 113             aiff->audio_stream_idx = i;
 114         } else if (st->codec->codec_type != AVMEDIA_TYPE_VIDEO) {
 115             av_log(s, AV_LOG_ERROR, "Only audio streams and pictures are allowed in AIFF.\n");
 116             return AVERROR(EINVAL);
 117         }
 118     }
 119     if (aiff->audio_stream_idx < 0) {
 120         av_log(s, AV_LOG_ERROR, "No audio stream present.\n");
 121         return AVERROR(EINVAL);
 122     }
 123
 124     enc = s->streams[aiff->audio_stream_idx]->codec;
 125
 126     /* First verify if format is ok */
 127     if (!enc->codec_tag)
 128         return -1;
 129     if (enc->codec_tag != MKTAG('N','O','N','E'))
 130         aifc = 1;
 131
 132     /* FORM AIFF header */
 133     ffio_wfourcc(pb, "FORM");
 134     aiff->form = avio_tell(pb);
 135     avio_wb32(pb, 0);                    /* file length */
 136     ffio_wfourcc(pb, aifc ? "AIFC" : "AIFF");
 137
 138     if (aifc) { // compressed audio
 139         if (!enc->block_align) {
 140             av_log(s, AV_LOG_ERROR, "block align not set\n");
 141             return -1;
 142         }
 143         /* Version chunk */
 144         ffio_wfourcc(pb, "FVER");
 145         avio_wb32(pb, 4);
 146         avio_wb32(pb, 0xA2805140);
 147     }
 148
 149     if (enc->channels > 2 && enc->channel_layout) {
 150         ffio_wfourcc(pb, "CHAN");
 151         avio_wb32(pb, 12);
 152         ff_mov_write_chan(pb, enc->channel_layout);
 153     }
 154
 155     put_meta(s, "title",     MKTAG('N', 'A', 'M', 'E'));
 156     put_meta(s, "author",    MKTAG('A', 'U', 'T', 'H'));
 157     put_meta(s, "copyright", MKTAG('(', 'c', ')', ' '));
 158     put_meta(s, "comment",   MKTAG('A', 'N', 'N', 'O'));
 159
 160     /* Common chunk */
 161     ffio_wfourcc(pb, "COMM");
 162     avio_wb32(pb, aifc ? 24 : 18); /* size */
 163     avio_wb16(pb, enc->channels);  /* Number of channels */
 164
 165     aiff->frames = avio_tell(pb);
 166     avio_wb32(pb, 0);              /* Number of frames */
 167
 168     if (!enc->bits_per_coded_sample)
 169         enc->bits_per_coded_sample = av_get_bits_per_sample(enc->codec_id);
 170     if (!enc->bits_per_coded_sample) {
 171         av_log(s, AV_LOG_ERROR, "could not compute bits per sample\n");
 172         return -1;
 173     }
 174     if (!enc->block_align)
 175         enc->block_align = (enc->bits_per_coded_sample * enc->channels) >> 3;
 176
 177     avio_wb16(pb, enc->bits_per_coded_sample); /* Sample size */
 178
 179     sample_rate = av_double2int(enc->sample_rate);
 180     avio_wb16(pb, (sample_rate >> 52) + (16383 - 1023));
 181     avio_wb64(pb, UINT64_C(1) << 63 | sample_rate << 11);
 182
 183     if (aifc) {
 184         avio_wl32(pb, enc->codec_tag);
 185         avio_wb16(pb, 0);
 186     }
 187
 188     if (enc->codec_tag == MKTAG('Q','D','M','2') && enc->extradata_size) {
 189         ffio_wfourcc(pb, "wave");
 190         avio_wb32(pb, enc->extradata_size);
 191         avio_write(pb, enc->extradata, enc->extradata_size);
 192     }
 193
 194     /* Sound data chunk */
 195     ffio_wfourcc(pb, "SSND");
 196     aiff->ssnd = avio_tell(pb);         /* Sound chunk size */
 197     avio_wb32(pb, 0);                    /* Sound samples data size */
 198     avio_wb32(pb, 0);                    /* Data offset */
 199     avio_wb32(pb, 0);                    /* Block-size (block align) */
 200
 201     avpriv_set_pts_info(s->streams[aiff->audio_stream_idx], 64, 1,
 202                         s->streams[aiff->audio_stream_idx]->codec->sample_rate);
 203
 204     /* Data is starting here */
 205     avio_flush(pb);
 206
 207     return 0;
 208 }
 209
 210 static int aiff_write_packet(AVFormatContext *s, AVPacket *pkt)
 211 {
 212     AIFFOutputContext *aiff = s->priv_data;
 213     AVIOContext *pb = s->pb;
 214     if (pkt->stream_index == aiff->audio_stream_idx)
 215         avio_write(pb, pkt->data, pkt->size);
 216     else {
 217         int ret;
 218         AVPacketList *pict_list, *last;
 219
 220         if (s->streams[pkt->stream_index]->codec->codec_type != AVMEDIA_TYPE_VIDEO)
 221             return 0;
 222
 223         /* warn only once for each stream */
 224         if (s->streams[pkt->stream_index]->nb_frames == 1) {
 225             av_log(s, AV_LOG_WARNING, "Got more than one picture in stream %d,"
 226                    " ignoring.\n", pkt->stream_index);
 227         }
 228         if (s->streams[pkt->stream_index]->nb_frames >= 1)
 229             return 0;
 230
 231         pict_list = av_mallocz(sizeof(AVPacketList));
 232         if (!pict_list)
 233             return AVERROR(ENOMEM);
 234
 235         if ((ret = av_copy_packet(&pict_list->pkt, pkt)) < 0) {
 236             av_freep(&pict_list);
 237             return ret;
 238         }
 239
 240         if (!aiff->pict_list)
 241             aiff->pict_list = pict_list;
 242         else {
 243             last = aiff->pict_list;
 244             while (last->next)
 245                 last = last->next;
 246             last->next = pict_list;
 247         }
 248     }
 249
 250     return 0;
 251 }
 252
 253 static int aiff_write_trailer(AVFormatContext *s)
 254 {
 255     int ret;
 256     AVIOContext *pb = s->pb;
 257     AIFFOutputContext *aiff = s->priv_data;
 258     AVPacketList *pict_list = aiff->pict_list;
 259     AVCodecContext *enc = s->streams[aiff->audio_stream_idx]->codec;
 260
 261     /* Chunks sizes must be even */
 262     int64_t file_size, end_size;
 263     end_size = file_size = avio_tell(pb);
 264     if (file_size & 1) {
 265         avio_w8(pb, 0);
 266         end_size++;
 267     }
 268
 269     if (s->pb->seekable) {
 270         /* Number of sample frames */
 271         avio_seek(pb, aiff->frames, SEEK_SET);
 272         avio_wb32(pb, (file_size-aiff->ssnd-12)/enc->block_align);
 273
 274         /* Sound Data chunk size */
 275         avio_seek(pb, aiff->ssnd, SEEK_SET);
 276         avio_wb32(pb, file_size - aiff->ssnd - 4);
 277
 278         /* return to the end */
 279         avio_seek(pb, end_size, SEEK_SET);
 280
 281         /* Write ID3 tags */
 282         if (aiff->write_id3v2)
 283             if ((ret = put_id3v2_tags(s, aiff)) < 0)
 284                 return ret;
 285
 286         /* File length */
 287         file_size = avio_tell(pb);
 288         avio_seek(pb, aiff->form, SEEK_SET);
 289         avio_wb32(pb, file_size - aiff->form - 4);
 290
 291         avio_flush(pb);
 292     }
 293
 294     while (pict_list) {
 295         AVPacketList *next = pict_list->next;
 296         av_free_packet(&pict_list->pkt);
 297         av_freep(&pict_list);
 298         pict_list = next;
 299     }
 300
 301     return 0;
 302 }
 303
 304 #define OFFSET(x) offsetof(AIFFOutputContext, x)
 305 #define ENC AV_OPT_FLAG_ENCODING_PARAM
 306 static const AVOption options[] = {
 307     { "write_id3v2", "Enable ID3 tags writing.",
 308       OFFSET(write_id3v2), AV_OPT_TYPE_INT, {.i64 = 0}, 0, 1, ENC },
 309     { "id3v2_version", "Select ID3v2 version to write. Currently 3 and 4 are supported.",
 310       OFFSET(id3v2_version), AV_OPT_TYPE_INT, {.i64 = 4}, 3, 4, ENC },
 311     { NULL },
 312 };
 313
 314 static const AVClass aiff_muxer_class = {
 315     .class_name     = "AIFF muxer",
 316     .item_name      = av_default_item_name,
 317     .option         = options,
 318     .version        = LIBAVUTIL_VERSION_INT,
 319 };
 320
 321 AVOutputFormat ff_aiff_muxer = {
 322     .name              = "aiff",
 323     .long_name         = NULL_IF_CONFIG_SMALL("Audio IFF"),
 324     .mime_type         = "audio/aiff",
 325     .extensions        = "aif,aiff,afc,aifc",
 326     .priv_data_size    = sizeof(AIFFOutputContext),
 327     .audio_codec       = AV_CODEC_ID_PCM_S16BE,
 328     .video_codec       = AV_CODEC_ID_PNG,
 329     .write_header      = aiff_write_header,
 330     .write_packet      = aiff_write_packet,
 331     .write_trailer     = aiff_write_trailer,
 332     .codec_tag         = (const AVCodecTag* const []){ ff_codec_aiff_tags, 0 },
 333     .priv_class        = &aiff_muxer_class,
 334 };