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 
put_id3v2_tags(AVFormatContext * s,AIFFOutputContext * aiff)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 
put_meta(AVFormatContext * s,const char * key,uint32_t id)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 
aiff_write_header(AVFormatContext * s)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 
aiff_write_packet(AVFormatContext * s,AVPacket * pkt)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 
aiff_write_trailer(AVFormatContext * s)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 };
335