avdevice/decklink_enc: add support for setting duplex mode
[ffmpeg.git] / libavformat / ttaenc.c
1 /*
2  * True Audio (TTA) muxer
3  * Copyright (c) 2016 James Almer
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 "libavutil/crc.h"
23 #include "libavutil/intreadwrite.h"
24
25 #include "apetag.h"
26 #include "avformat.h"
27 #include "avio_internal.h"
28 #include "internal.h"
29
30 typedef struct TTAMuxContext {
31     AVIOContext *seek_table;
32     AVPacketList *queue, *queue_end;
33     uint32_t nb_samples;
34     int frame_size;
35     int last_frame;
36 } TTAMuxContext;
37
38 static int tta_init(AVFormatContext *s)
39 {
40     TTAMuxContext *tta = s->priv_data;
41     AVCodecParameters *par;
42
43     if (s->nb_streams != 1) {
44         av_log(s, AV_LOG_ERROR, "Only one stream is supported\n");
45         return AVERROR(EINVAL);
46     }
47     par = s->streams[0]->codecpar;
48
49     if (par->codec_id != AV_CODEC_ID_TTA) {
50         av_log(s, AV_LOG_ERROR, "Unsupported codec\n");
51         return AVERROR(EINVAL);
52     }
53     if (par->extradata && par->extradata_size < 22) {
54         av_log(s, AV_LOG_ERROR, "Invalid TTA extradata\n");
55         return AVERROR_INVALIDDATA;
56     }
57
58     /* Prevent overflow */
59     if (par->sample_rate > 0x7FFFFFu) {
60         av_log(s, AV_LOG_ERROR, "Sample rate too large\n");
61         return AVERROR(EINVAL);
62     }
63     tta->frame_size = par->sample_rate * 256 / 245;
64     avpriv_set_pts_info(s->streams[0], 64, 1, par->sample_rate);
65
66     return 0;
67 }
68
69 static int tta_write_header(AVFormatContext *s)
70 {
71     TTAMuxContext *tta = s->priv_data;
72     AVCodecParameters *par = s->streams[0]->codecpar;
73     int ret;
74
75     if ((ret = avio_open_dyn_buf(&tta->seek_table)) < 0)
76         return ret;
77
78     /* Ignore most extradata information if present. It can be innacurate
79        if for example remuxing from Matroska */
80     ffio_init_checksum(s->pb, ff_crcEDB88320_update, UINT32_MAX);
81     ffio_init_checksum(tta->seek_table, ff_crcEDB88320_update, UINT32_MAX);
82     avio_write(s->pb, "TTA1", 4);
83     avio_wl16(s->pb, par->extradata ? AV_RL16(par->extradata + 4) : 1);
84     avio_wl16(s->pb, par->channels);
85     avio_wl16(s->pb, par->bits_per_raw_sample);
86     avio_wl32(s->pb, par->sample_rate);
87
88     return 0;
89 }
90
91 static int tta_write_packet(AVFormatContext *s, AVPacket *pkt)
92 {
93     TTAMuxContext *tta = s->priv_data;
94     int ret;
95
96     ret = ff_packet_list_put(&tta->queue, &tta->queue_end, pkt,
97                              FF_PACKETLIST_FLAG_REF_PACKET);
98     if (ret < 0) {
99         return ret;
100     }
101
102     avio_wl32(tta->seek_table, pkt->size);
103     tta->nb_samples += pkt->duration;
104
105     if (tta->frame_size != pkt->duration) {
106         if (tta->last_frame) {
107             /* Two frames with a different duration than the default frame
108                size means the TTA stream comes from a faulty container, and
109                there's no way the last frame duration will be correct. */
110             av_log(s, AV_LOG_ERROR, "Invalid frame durations\n");
111
112             return AVERROR_INVALIDDATA;
113         }
114         /* First frame with a different duration than the default frame size.
115            Assume it's the last frame in the stream and continue. */
116         tta->last_frame++;
117     }
118
119     return 0;
120 }
121
122 static void tta_queue_flush(AVFormatContext *s)
123 {
124     TTAMuxContext *tta = s->priv_data;
125     AVPacket pkt;
126
127     while (tta->queue) {
128         ff_packet_list_get(&tta->queue, &tta->queue_end, &pkt);
129         avio_write(s->pb, pkt.data, pkt.size);
130         av_packet_unref(&pkt);
131     }
132 }
133
134 static int tta_write_trailer(AVFormatContext *s)
135 {
136     TTAMuxContext *tta = s->priv_data;
137     uint8_t *ptr;
138     unsigned int crc;
139     int size;
140
141     avio_wl32(s->pb, tta->nb_samples);
142     crc = ffio_get_checksum(s->pb) ^ UINT32_MAX;
143     avio_wl32(s->pb, crc);
144
145     /* Write Seek table */
146     crc = ffio_get_checksum(tta->seek_table) ^ UINT32_MAX;
147     avio_wl32(tta->seek_table, crc);
148     size = avio_close_dyn_buf(tta->seek_table, &ptr);
149     avio_write(s->pb, ptr, size);
150     av_free(ptr);
151
152     /* Write audio data */
153     tta_queue_flush(s);
154
155     ff_ape_write_tag(s);
156     avio_flush(s->pb);
157
158     return 0;
159 }
160
161 AVOutputFormat ff_tta_muxer = {
162     .name              = "tta",
163     .long_name         = NULL_IF_CONFIG_SMALL("TTA (True Audio)"),
164     .mime_type         = "audio/x-tta",
165     .extensions        = "tta",
166     .priv_data_size    = sizeof(TTAMuxContext),
167     .audio_codec       = AV_CODEC_ID_TTA,
168     .video_codec       = AV_CODEC_ID_NONE,
169     .init              = tta_init,
170     .write_header      = tta_write_header,
171     .write_packet      = tta_write_packet,
172     .write_trailer     = tta_write_trailer,
173 };