Merge commit '31c54711cc3f1484af101d629bbb805820d37ad1'
[ffmpeg.git] / libavformat / wavenc.c
1 /*
2  * WAV muxer
3  * Copyright (c) 2001, 2002 Fabrice Bellard
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 #include <string.h>
24
25 #include "libavutil/dict.h"
26 #include "libavutil/common.h"
27 #include "libavutil/mathematics.h"
28 #include "libavutil/opt.h"
29
30 #include "avformat.h"
31 #include "avio.h"
32 #include "avio_internal.h"
33 #include "internal.h"
34 #include "riff.h"
35
36 typedef struct WAVMuxContext {
37     const AVClass *class;
38     int64_t data;
39     int64_t minpts;
40     int64_t maxpts;
41     int last_duration;
42     int write_bext;
43 } WAVMuxContext;
44
45 static inline void bwf_write_bext_string(AVFormatContext *s, const char *key, int maxlen)
46 {
47     AVDictionaryEntry *tag;
48     int len = 0;
49
50     if (tag = av_dict_get(s->metadata, key, NULL, 0)) {
51         len = strlen(tag->value);
52         len = FFMIN(len, maxlen);
53         avio_write(s->pb, tag->value, len);
54     }
55
56     ffio_fill(s->pb, 0, maxlen - len);
57 }
58
59 static void bwf_write_bext_chunk(AVFormatContext *s)
60 {
61     AVDictionaryEntry *tmp_tag;
62     uint64_t time_reference = 0;
63     int64_t bext = ff_start_tag(s->pb, "bext");
64
65     bwf_write_bext_string(s, "description", 256);
66     bwf_write_bext_string(s, "originator", 32);
67     bwf_write_bext_string(s, "originator_reference", 32);
68     bwf_write_bext_string(s, "origination_date", 10);
69     bwf_write_bext_string(s, "origination_time", 8);
70
71     if (tmp_tag = av_dict_get(s->metadata, "time_reference", NULL, 0))
72         time_reference = strtoll(tmp_tag->value, NULL, 10);
73     avio_wl64(s->pb, time_reference);
74     avio_wl16(s->pb, 1);  // set version to 1
75
76     if (tmp_tag = av_dict_get(s->metadata, "umid", NULL, 0)) {
77         unsigned char umidpart_str[17] = {0};
78         int i;
79         uint64_t umidpart;
80         int len = strlen(tmp_tag->value+2);
81
82         for (i = 0; i < len/16; i++) {
83             memcpy(umidpart_str, tmp_tag->value + 2 + (i*16), 16);
84             umidpart = strtoll(umidpart_str, NULL, 16);
85             avio_wb64(s->pb, umidpart);
86         }
87         ffio_fill(s->pb, 0, 64 - i*8);
88     } else
89         ffio_fill(s->pb, 0, 64); // zero UMID
90
91     ffio_fill(s->pb, 0, 190); // Reserved
92
93     if (tmp_tag = av_dict_get(s->metadata, "coding_history", NULL, 0))
94         avio_put_str(s->pb, tmp_tag->value);
95
96     ff_end_tag(s->pb, bext);
97 }
98
99 static int wav_write_header(AVFormatContext *s)
100 {
101     WAVMuxContext *wav = s->priv_data;
102     AVIOContext *pb = s->pb;
103     int64_t fmt, fact;
104
105     ffio_wfourcc(pb, "RIFF");
106     avio_wl32(pb, 0); /* file length */
107     ffio_wfourcc(pb, "WAVE");
108
109     /* format header */
110     fmt = ff_start_tag(pb, "fmt ");
111     if (ff_put_wav_header(pb, s->streams[0]->codec) < 0) {
112         av_log(s, AV_LOG_ERROR, "%s codec not supported in WAVE format\n",
113                s->streams[0]->codec->codec ? s->streams[0]->codec->codec->name : "NONE");
114         return -1;
115     }
116     ff_end_tag(pb, fmt);
117
118     if (s->streams[0]->codec->codec_tag != 0x01 /* hence for all other than PCM */
119         && s->pb->seekable) {
120         fact = ff_start_tag(pb, "fact");
121         avio_wl32(pb, 0);
122         ff_end_tag(pb, fact);
123     }
124
125     if (wav->write_bext)
126         bwf_write_bext_chunk(s);
127
128     avpriv_set_pts_info(s->streams[0], 64, 1, s->streams[0]->codec->sample_rate);
129     wav->maxpts = wav->last_duration = 0;
130     wav->minpts = INT64_MAX;
131
132     /* info header */
133     ff_riff_write_info(s);
134
135     /* data header */
136     wav->data = ff_start_tag(pb, "data");
137
138     avio_flush(pb);
139
140     return 0;
141 }
142
143 static int wav_write_packet(AVFormatContext *s, AVPacket *pkt)
144 {
145     AVIOContext *pb  = s->pb;
146     WAVMuxContext    *wav = s->priv_data;
147     avio_write(pb, pkt->data, pkt->size);
148     if(pkt->pts != AV_NOPTS_VALUE) {
149         wav->minpts        = FFMIN(wav->minpts, pkt->pts);
150         wav->maxpts        = FFMAX(wav->maxpts, pkt->pts);
151         wav->last_duration = pkt->duration;
152     } else
153         av_log(s, AV_LOG_ERROR, "wav_write_packet: NOPTS\n");
154     return 0;
155 }
156
157 static int wav_write_trailer(AVFormatContext *s)
158 {
159     AVIOContext *pb  = s->pb;
160     WAVMuxContext    *wav = s->priv_data;
161     int64_t file_size;
162
163     avio_flush(pb);
164
165     if (s->pb->seekable) {
166         ff_end_tag(pb, wav->data);
167
168         /* update file size */
169         file_size = avio_tell(pb);
170         avio_seek(pb, 4, SEEK_SET);
171         avio_wl32(pb, (uint32_t)(file_size - 8));
172         avio_seek(pb, file_size, SEEK_SET);
173
174         avio_flush(pb);
175
176         if(s->streams[0]->codec->codec_tag != 0x01) {
177             /* Update num_samps in fact chunk */
178             int number_of_samples;
179             number_of_samples = av_rescale(wav->maxpts - wav->minpts + wav->last_duration,
180                                            s->streams[0]->codec->sample_rate * (int64_t)s->streams[0]->time_base.num,
181                                            s->streams[0]->time_base.den);
182             avio_seek(pb, wav->data-12, SEEK_SET);
183             avio_wl32(pb, number_of_samples);
184             avio_seek(pb, file_size, SEEK_SET);
185             avio_flush(pb);
186         }
187     }
188     return 0;
189 }
190
191 #define OFFSET(x) offsetof(WAVMuxContext, x)
192 #define ENC AV_OPT_FLAG_ENCODING_PARAM
193 static const AVOption options[] = {
194     { "write_bext", "Write BEXT chunk.", OFFSET(write_bext), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, ENC },
195     { NULL },
196 };
197
198 static const AVClass wav_muxer_class = {
199     .class_name = "WAV muxer",
200     .item_name  = av_default_item_name,
201     .option     = options,
202     .version    = LIBAVUTIL_VERSION_INT,
203 };
204
205 AVOutputFormat ff_wav_muxer = {
206     .name              = "wav",
207     .long_name         = NULL_IF_CONFIG_SMALL("WAV / WAVE (Waveform Audio)"),
208     .mime_type         = "audio/x-wav",
209     .extensions        = "wav",
210     .priv_data_size    = sizeof(WAVMuxContext),
211     .audio_codec       = AV_CODEC_ID_PCM_S16LE,
212     .video_codec       = AV_CODEC_ID_NONE,
213     .write_header      = wav_write_header,
214     .write_packet      = wav_write_packet,
215     .write_trailer     = wav_write_trailer,
216     .flags             = AVFMT_TS_NONSTRICT,
217     .codec_tag         = (const AVCodecTag* const []){ ff_codec_wav_tags, 0 },
218     .priv_class        = &wav_muxer_class,
219 };