cafenc.c 9.44 KB
Newer Older
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
/*
 * Core Audio Format muxer
 * Copyright (c) 2011 Carl Eugen Hoyos
 *
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
 * 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.
 *
 * FFmpeg is distributed in the hope that it will be useful,
 * 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
 * License along with FFmpeg; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include "avformat.h"
#include "caf.h"
#include "isom.h"
#include "avio_internal.h"
26
#include "libavutil/intfloat.h"
Paul B Mahol's avatar
Paul B Mahol committed
27
#include "libavutil/dict.h"
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
28 29 30

typedef struct {
    int64_t data;
31 32 33 34
    uint8_t *pkt_sizes;
    int size_buffer_size;
    int size_entries_used;
    int packets;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
35 36
} CAFContext;

37
static uint32_t codec_flags(enum AVCodecID codec_id) {
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
38
    switch (codec_id) {
39 40
    case AV_CODEC_ID_PCM_F32BE:
    case AV_CODEC_ID_PCM_F64BE:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
41
        return 1; //< kCAFLinearPCMFormatFlagIsFloat
42 43 44
    case AV_CODEC_ID_PCM_S16LE:
    case AV_CODEC_ID_PCM_S24LE:
    case AV_CODEC_ID_PCM_S32LE:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
45
        return 2; //< kCAFLinearPCMFormatFlagIsLittleEndian
46 47
    case AV_CODEC_ID_PCM_F32LE:
    case AV_CODEC_ID_PCM_F64LE:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
48 49 50 51 52 53
        return 3; //< kCAFLinearPCMFormatFlagIsFloat | kCAFLinearPCMFormatFlagIsLittleEndian
    default:
        return 0;
    }
}

54
static uint32_t samples_per_packet(enum AVCodecID codec_id, int channels, int block_align) {
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
55
    switch (codec_id) {
56 57 58 59 60 61 62 63 64 65 66 67 68
    case AV_CODEC_ID_PCM_S8:
    case AV_CODEC_ID_PCM_S16LE:
    case AV_CODEC_ID_PCM_S16BE:
    case AV_CODEC_ID_PCM_S24LE:
    case AV_CODEC_ID_PCM_S24BE:
    case AV_CODEC_ID_PCM_S32LE:
    case AV_CODEC_ID_PCM_S32BE:
    case AV_CODEC_ID_PCM_F32LE:
    case AV_CODEC_ID_PCM_F32BE:
    case AV_CODEC_ID_PCM_F64LE:
    case AV_CODEC_ID_PCM_F64BE:
    case AV_CODEC_ID_PCM_ALAW:
    case AV_CODEC_ID_PCM_MULAW:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
69
        return 1;
70 71
    case AV_CODEC_ID_MACE3:
    case AV_CODEC_ID_MACE6:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
72
        return 6;
73
    case AV_CODEC_ID_ADPCM_IMA_QT:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
74
        return 64;
75 76
    case AV_CODEC_ID_AMR_NB:
    case AV_CODEC_ID_GSM:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
77
    case AV_CODEC_ID_ILBC:
78
    case AV_CODEC_ID_QCELP:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
79
        return 160;
80
    case AV_CODEC_ID_GSM_MS:
81
        return 320;
82
    case AV_CODEC_ID_MP1:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
83
        return 384;
84 85
    case AV_CODEC_ID_OPUS:
        return 960;
86 87
    case AV_CODEC_ID_MP2:
    case AV_CODEC_ID_MP3:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
88
        return 1152;
89
    case AV_CODEC_ID_AC3:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
90
        return 1536;
91
    case AV_CODEC_ID_QDM2:
92
    case AV_CODEC_ID_QDMC:
93 94
        return 2048 * channels;
    case AV_CODEC_ID_ALAC:
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
95
        return 4096;
96
    case AV_CODEC_ID_ADPCM_IMA_WAV:
97
        return (block_align - 4 * channels) * 8 / (4 * channels) + 1;
98
    case AV_CODEC_ID_ADPCM_MS:
99
        return (block_align - 7 * channels) * 2 / channels + 2;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
100 101 102 103 104 105 106 107
    default:
        return 0;
    }
}

static int caf_write_header(AVFormatContext *s)
{
    AVIOContext *pb = s->pb;
108
    AVCodecParameters *par = s->streams[0]->codecpar;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
109
    CAFContext *caf = s->priv_data;
Paul B Mahol's avatar
Paul B Mahol committed
110
    AVDictionaryEntry *t = NULL;
111
    unsigned int codec_tag = ff_codec_get_tag(ff_codec_caf_tags, par->codec_id);
Paul B Mahol's avatar
Paul B Mahol committed
112
    int64_t chunk_size = 0;
113
    int frame_size = par->frame_size;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
114

115 116 117 118 119
    if (s->nb_streams != 1) {
        av_log(s, AV_LOG_ERROR, "CAF files have exactly one stream\n");
        return AVERROR(EINVAL);
    }

120
    switch (par->codec_id) {
121
    case AV_CODEC_ID_AAC:
122 123 124 125
        av_log(s, AV_LOG_ERROR, "muxing codec currently unsupported\n");
        return AVERROR_PATCHWELCOME;
    }

126 127 128 129 130
    if (par->codec_id == AV_CODEC_ID_OPUS && par->channels > 2) {
        av_log(s, AV_LOG_ERROR, "Only mono and stereo are supported for Opus\n");
        return AVERROR_INVALIDDATA;
    }

Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
131 132 133 134 135
    if (!codec_tag) {
        av_log(s, AV_LOG_ERROR, "unsupported codec\n");
        return AVERROR_INVALIDDATA;
    }

James Almer's avatar
James Almer committed
136
    if (!par->block_align && !(pb->seekable & AVIO_SEEKABLE_NORMAL)) {
137 138
        av_log(s, AV_LOG_ERROR, "Muxing variable packet size not supported on non seekable output\n");
        return AVERROR_INVALIDDATA;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
139 140
    }

141 142
    if (par->codec_id != AV_CODEC_ID_MP3 || frame_size != 576)
        frame_size = samples_per_packet(par->codec_id, par->channels, par->block_align);
143

Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
144 145 146 147 148 149
    ffio_wfourcc(pb, "caff"); //< mFileType
    avio_wb16(pb, 1);         //< mFileVersion
    avio_wb16(pb, 0);         //< mFileFlags

    ffio_wfourcc(pb, "desc");                         //< Audio Description chunk
    avio_wb64(pb, 32);                                //< mChunkSize
150
    avio_wb64(pb, av_double2int(par->sample_rate));   //< mSampleRate
151
    avio_wl32(pb, codec_tag);                         //< mFormatID
152 153
    avio_wb32(pb, codec_flags(par->codec_id));        //< mFormatFlags
    avio_wb32(pb, par->block_align);                  //< mBytesPerPacket
154
    avio_wb32(pb, frame_size);                        //< mFramesPerPacket
155 156
    avio_wb32(pb, par->channels);                     //< mChannelsPerFrame
    avio_wb32(pb, av_get_bits_per_sample(par->codec_id)); //< mBitsPerChannel
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
157

158
    if (par->channel_layout) {
159 160
        ffio_wfourcc(pb, "chan");
        avio_wb64(pb, 12);
161
        ff_mov_write_chan(pb, par->channel_layout);
162
    }
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
163

164
    if (par->codec_id == AV_CODEC_ID_ALAC) {
165
        ffio_wfourcc(pb, "kuki");
166
        avio_wb64(pb, 12 + par->extradata_size);
167
        avio_write(pb, "\0\0\0\14frmaalac", 12);
168 169
        avio_write(pb, par->extradata, par->extradata_size);
    } else if (par->codec_id == AV_CODEC_ID_AMR_NB) {
170 171 172 173 174 175 176 177 178 179
        ffio_wfourcc(pb, "kuki");
        avio_wb64(pb, 29);
        avio_write(pb, "\0\0\0\14frmasamr", 12);
        avio_wb32(pb, 0x11); /* size */
        avio_write(pb, "samrFFMP", 8);
        avio_w8(pb, 0); /* decoder version */

        avio_wb16(pb, 0x81FF); /* Mode set (all modes for AMR_NB) */
        avio_w8(pb, 0x00); /* Mode change period (no restriction) */
        avio_w8(pb, 0x01); /* Frames per sample */
180
    } else if (par->codec_id == AV_CODEC_ID_QDM2 || par->codec_id == AV_CODEC_ID_QDMC) {
181
        ffio_wfourcc(pb, "kuki");
182 183
        avio_wb64(pb, par->extradata_size);
        avio_write(pb, par->extradata, par->extradata_size);
184 185
    }

186
    ff_standardize_creation_time(s);
Paul B Mahol's avatar
Paul B Mahol committed
187 188 189 190 191 192 193 194 195 196 197 198 199 200
    if (av_dict_count(s->metadata)) {
        ffio_wfourcc(pb, "info"); //< Information chunk
        while ((t = av_dict_get(s->metadata, "", t, AV_DICT_IGNORE_SUFFIX))) {
            chunk_size += strlen(t->key) + strlen(t->value) + 2;
        }
        avio_wb64(pb, chunk_size + 4);
        avio_wb32(pb, av_dict_count(s->metadata));
        t = NULL;
        while ((t = av_dict_get(s->metadata, "", t, AV_DICT_IGNORE_SUFFIX))) {
            avio_put_str(pb, t->key);
            avio_put_str(pb, t->value);
        }
    }

Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
201 202 203 204 205 206 207 208 209 210 211
    ffio_wfourcc(pb, "data"); //< Audio Data chunk
    caf->data = avio_tell(pb);
    avio_wb64(pb, -1);        //< mChunkSize
    avio_wb32(pb, 0);         //< mEditCount

    avio_flush(pb);
    return 0;
}

static int caf_write_packet(AVFormatContext *s, AVPacket *pkt)
{
212 213
    CAFContext *caf = s->priv_data;

Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
214
    avio_write(s->pb, pkt->data, pkt->size);
215
    if (!s->streams[0]->codecpar->block_align) {
216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236
        void *pkt_sizes = caf->pkt_sizes;
        int i, alloc_size = caf->size_entries_used + 5;
        if (alloc_size < 0) {
            caf->pkt_sizes = NULL;
        } else {
            caf->pkt_sizes = av_fast_realloc(caf->pkt_sizes,
                                             &caf->size_buffer_size,
                                             alloc_size);
        }
        if (!caf->pkt_sizes) {
            av_free(pkt_sizes);
            return AVERROR(ENOMEM);
        }
        for (i = 4; i > 0; i--) {
            unsigned top = pkt->size >> i * 7;
            if (top)
                caf->pkt_sizes[caf->size_entries_used++] = 128 | top;
        }
        caf->pkt_sizes[caf->size_entries_used++] = pkt->size & 127;
        caf->packets++;
    }
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
237 238 239 240 241
    return 0;
}

static int caf_write_trailer(AVFormatContext *s)
{
242
    CAFContext *caf = s->priv_data;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
243
    AVIOContext *pb = s->pb;
244
    AVCodecParameters *par = s->streams[0]->codecpar;
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
245

James Almer's avatar
James Almer committed
246
    if (pb->seekable & AVIO_SEEKABLE_NORMAL) {
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
247 248 249 250 251
        int64_t file_size = avio_tell(pb);

        avio_seek(pb, caf->data, SEEK_SET);
        avio_wb64(pb, file_size - caf->data - 8);
        avio_seek(pb, file_size, SEEK_SET);
252
        if (!par->block_align) {
253 254 255
            ffio_wfourcc(pb, "pakt");
            avio_wb64(pb, caf->size_entries_used + 24);
            avio_wb64(pb, caf->packets); ///< mNumberPackets
256
            avio_wb64(pb, caf->packets * samples_per_packet(par->codec_id, par->channels, par->block_align)); ///< mNumberValidFrames
257 258 259 260 261
            avio_wb32(pb, 0); ///< mPrimingFrames
            avio_wb32(pb, 0); ///< mRemainderFrames
            avio_write(pb, caf->pkt_sizes, caf->size_entries_used);
            caf->size_buffer_size = 0;
        }
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
262 263
        avio_flush(pb);
    }
264
    av_freep(&caf->pkt_sizes);
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
265 266 267 268
    return 0;
}

AVOutputFormat ff_caf_muxer = {
269
    .name           = "caf",
270
    .long_name      = NULL_IF_CONFIG_SMALL("Apple CAF (Core Audio Format)"),
271 272 273
    .mime_type      = "audio/x-caf",
    .extensions     = "caf",
    .priv_data_size = sizeof(CAFContext),
274 275
    .audio_codec    = AV_CODEC_ID_PCM_S16BE,
    .video_codec    = AV_CODEC_ID_NONE,
276 277 278
    .write_header   = caf_write_header,
    .write_packet   = caf_write_packet,
    .write_trailer  = caf_write_trailer,
279
    .codec_tag      = (const AVCodecTag* const []){ff_codec_caf_tags, 0},
Carl Eugen Hoyos's avatar
Carl Eugen Hoyos committed
280
};