[deb_ffmpeg.git] / ffmpeg / libavformat / aiffenc.c

/*
 * AIFF/AIFF-C muxer
 * Copyright (c) 2006  Patrick Guimond
 *
 * 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 <stdint.h>

#include "libavutil/intfloat.h"
#include "libavutil/opt.h"
#include "avformat.h"
#include "internal.h"
#include "aiff.h"
#include "avio_internal.h"
#include "isom.h"
#include "id3v2.h"

typedef struct {
    const AVClass *class;
    int64_t form;
    int64_t frames;
    int64_t ssnd;
    int audio_stream_idx;
    AVPacketList *pict_list;
    int write_id3v2;
    int id3v2_version;
} AIFFOutputContext;

static int put_id3v2_tags(AVFormatContext *s, AIFFOutputContext *aiff)
{
    int ret;
    uint64_t pos, end, size;
    ID3v2EncContext id3v2 = { 0 };
    AVIOContext *pb = s->pb;
    AVPacketList *pict_list = aiff->pict_list;

    if (!pb->seekable)
        return 0;

    if (!s->metadata && !aiff->pict_list)
        return 0;

    avio_wl32(pb, MKTAG('I', 'D', '3', ' '));
    avio_wb32(pb, 0);
    pos = avio_tell(pb);

    ff_id3v2_start(&id3v2, pb, aiff->id3v2_version, ID3v2_DEFAULT_MAGIC);
    ff_id3v2_write_metadata(s, &id3v2);
    while (pict_list) {
        if ((ret = ff_id3v2_write_apic(s, &id3v2, &pict_list->pkt)) < 0)
            return ret;
        pict_list = pict_list->next;
    }
    ff_id3v2_finish(&id3v2, pb, s->metadata_header_padding);

    end = avio_tell(pb);
    size = end - pos;

    /* Update chunk size */
    avio_seek(pb, pos - 4, SEEK_SET);
    avio_wb32(pb, size);
    avio_seek(pb, end, SEEK_SET);

    if (size & 1)
        avio_w8(pb, 0);

    return 0;
}

static void put_meta(AVFormatContext *s, const char *key, uint32_t id)
{
    AVDictionaryEntry *tag;
    AVIOContext *pb = s->pb;

    if (tag = av_dict_get(s->metadata, key, NULL, 0)) {
        int size = strlen(tag->value);

        avio_wl32(pb, id);
        avio_wb32(pb, FFALIGN(size, 2));
        avio_write(pb, tag->value, size);
        if (size & 1)
            avio_w8(pb, 0);
    }
}

static int aiff_write_header(AVFormatContext *s)
{
    AIFFOutputContext *aiff = s->priv_data;
    AVIOContext *pb = s->pb;
    AVCodecContext *enc;
    uint64_t sample_rate;
    int i, aifc = 0;

    aiff->audio_stream_idx = -1;
    for (i = 0; i < s->nb_streams; i++) {
        AVStream *st = s->streams[i];
        if (aiff->audio_stream_idx < 0 && st->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
            aiff->audio_stream_idx = i;
        } else if (st->codec->codec_type != AVMEDIA_TYPE_VIDEO) {
            av_log(s, AV_LOG_ERROR, "Only audio streams and pictures are allowed in AIFF.\n");
            return AVERROR(EINVAL);
        }
    }
    if (aiff->audio_stream_idx < 0) {
        av_log(s, AV_LOG_ERROR, "No audio stream present.\n");
        return AVERROR(EINVAL);
    }

    enc = s->streams[aiff->audio_stream_idx]->codec;

    /* First verify if format is ok */
    if (!enc->codec_tag)
        return -1;
    if (enc->codec_tag != MKTAG('N','O','N','E'))
        aifc = 1;

    /* FORM AIFF header */
    ffio_wfourcc(pb, "FORM");
    aiff->form = avio_tell(pb);
    avio_wb32(pb, 0);                    /* file length */
    ffio_wfourcc(pb, aifc ? "AIFC" : "AIFF");

    if (aifc) { // compressed audio
        if (!enc->block_align) {
            av_log(s, AV_LOG_ERROR, "block align not set\n");
            return -1;
        }
        /* Version chunk */
        ffio_wfourcc(pb, "FVER");
        avio_wb32(pb, 4);
        avio_wb32(pb, 0xA2805140);
    }

    if (enc->channels > 2 && enc->channel_layout) {
        ffio_wfourcc(pb, "CHAN");
        avio_wb32(pb, 12);
        ff_mov_write_chan(pb, enc->channel_layout);
    }

    put_meta(s, "title",     MKTAG('N', 'A', 'M', 'E'));
    put_meta(s, "author",    MKTAG('A', 'U', 'T', 'H'));
    put_meta(s, "copyright", MKTAG('(', 'c', ')', ' '));
    put_meta(s, "comment",   MKTAG('A', 'N', 'N', 'O'));

    /* Common chunk */
    ffio_wfourcc(pb, "COMM");
    avio_wb32(pb, aifc ? 24 : 18); /* size */
    avio_wb16(pb, enc->channels);  /* Number of channels */

    aiff->frames = avio_tell(pb);
    avio_wb32(pb, 0);              /* Number of frames */

    if (!enc->bits_per_coded_sample)
        enc->bits_per_coded_sample = av_get_bits_per_sample(enc->codec_id);
    if (!enc->bits_per_coded_sample) {
        av_log(s, AV_LOG_ERROR, "could not compute bits per sample\n");
        return -1;
    }
    if (!enc->block_align)
        enc->block_align = (enc->bits_per_coded_sample * enc->channels) >> 3;

    avio_wb16(pb, enc->bits_per_coded_sample); /* Sample size */

    sample_rate = av_double2int(enc->sample_rate);
    avio_wb16(pb, (sample_rate >> 52) + (16383 - 1023));
    avio_wb64(pb, UINT64_C(1) << 63 | sample_rate << 11);

    if (aifc) {
        avio_wl32(pb, enc->codec_tag);
        avio_wb16(pb, 0);
    }

    if (enc->codec_tag == MKTAG('Q','D','M','2') && enc->extradata_size) {
        ffio_wfourcc(pb, "wave");
        avio_wb32(pb, enc->extradata_size);
        avio_write(pb, enc->extradata, enc->extradata_size);
    }

    /* Sound data chunk */
    ffio_wfourcc(pb, "SSND");
    aiff->ssnd = avio_tell(pb);         /* Sound chunk size */
    avio_wb32(pb, 0);                    /* Sound samples data size */
    avio_wb32(pb, 0);                    /* Data offset */
    avio_wb32(pb, 0);                    /* Block-size (block align) */

    avpriv_set_pts_info(s->streams[aiff->audio_stream_idx], 64, 1,
                        s->streams[aiff->audio_stream_idx]->codec->sample_rate);

    /* Data is starting here */
    avio_flush(pb);

    return 0;
}

static int aiff_write_packet(AVFormatContext *s, AVPacket *pkt)
{
    AIFFOutputContext *aiff = s->priv_data;
    AVIOContext *pb = s->pb;
    if (pkt->stream_index == aiff->audio_stream_idx)
        avio_write(pb, pkt->data, pkt->size);
    else {
        int ret;
        AVPacketList *pict_list, *last;

        if (s->streams[pkt->stream_index]->codec->codec_type != AVMEDIA_TYPE_VIDEO)
            return 0;

        /* warn only once for each stream */
        if (s->streams[pkt->stream_index]->nb_frames == 1) {
            av_log(s, AV_LOG_WARNING, "Got more than one picture in stream %d,"
                   " ignoring.\n", pkt->stream_index);
        }
        if (s->streams[pkt->stream_index]->nb_frames >= 1)
            return 0;

        pict_list = av_mallocz(sizeof(AVPacketList));
        if (!pict_list)
            return AVERROR(ENOMEM);

        if ((ret = av_copy_packet(&pict_list->pkt, pkt)) < 0) {
            av_freep(&pict_list);
            return ret;
        }

        if (!aiff->pict_list)
            aiff->pict_list = pict_list;
        else {
            last = aiff->pict_list;
            while (last->next)
                last = last->next;
            last->next = pict_list;
        }
    }

    return 0;
}

static int aiff_write_trailer(AVFormatContext *s)
{
    int ret;
    AVIOContext *pb = s->pb;
    AIFFOutputContext *aiff = s->priv_data;
    AVPacketList *pict_list = aiff->pict_list;
    AVCodecContext *enc = s->streams[aiff->audio_stream_idx]->codec;

    /* Chunks sizes must be even */
    int64_t file_size, end_size;
    end_size = file_size = avio_tell(pb);
    if (file_size & 1) {
        avio_w8(pb, 0);
        end_size++;
    }

    if (s->pb->seekable) {
        /* Number of sample frames */
        avio_seek(pb, aiff->frames, SEEK_SET);
        avio_wb32(pb, (file_size-aiff->ssnd-12)/enc->block_align);

        /* Sound Data chunk size */
        avio_seek(pb, aiff->ssnd, SEEK_SET);
        avio_wb32(pb, file_size - aiff->ssnd - 4);

        /* return to the end */
        avio_seek(pb, end_size, SEEK_SET);

        /* Write ID3 tags */
        if (aiff->write_id3v2)
            if ((ret = put_id3v2_tags(s, aiff)) < 0)
                return ret;

        /* File length */
        file_size = avio_tell(pb);
        avio_seek(pb, aiff->form, SEEK_SET);
        avio_wb32(pb, file_size - aiff->form - 4);

        avio_flush(pb);
    }

    while (pict_list) {
        AVPacketList *next = pict_list->next;
        av_free_packet(&pict_list->pkt);
        av_freep(&pict_list);
        pict_list = next;
    }

    return 0;
}

#define OFFSET(x) offsetof(AIFFOutputContext, x)
#define ENC AV_OPT_FLAG_ENCODING_PARAM
static const AVOption options[] = {
    { "write_id3v2", "Enable ID3 tags writing.",
      OFFSET(write_id3v2), AV_OPT_TYPE_INT, {.i64 = 0}, 0, 1, ENC },
    { "id3v2_version", "Select ID3v2 version to write. Currently 3 and 4 are supported.",
      OFFSET(id3v2_version), AV_OPT_TYPE_INT, {.i64 = 4}, 3, 4, ENC },
    { NULL },
};

static const AVClass aiff_muxer_class = {
    .class_name     = "AIFF muxer",
    .item_name      = av_default_item_name,
    .option         = options,
    .version        = LIBAVUTIL_VERSION_INT,
};

AVOutputFormat ff_aiff_muxer = {
    .name              = "aiff",
    .long_name         = NULL_IF_CONFIG_SMALL("Audio IFF"),
    .mime_type         = "audio/aiff",
    .extensions        = "aif,aiff,afc,aifc",
    .priv_data_size    = sizeof(AIFFOutputContext),
    .audio_codec       = AV_CODEC_ID_PCM_S16BE,
    .video_codec       = AV_CODEC_ID_PNG,
    .write_header      = aiff_write_header,
    .write_packet      = aiff_write_packet,
    .write_trailer     = aiff_write_trailer,
    .codec_tag         = (const AVCodecTag* const []){ ff_codec_aiff_tags, 0 },
    .priv_class        = &aiff_muxer_class,
};
Commit	Line	Data
2ba45a60 DM	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	};