vqf.c
Go to the documentation of this file.
1 /*
2  * VQF demuxer
3  * Copyright (c) 2009 Vitor Sessak
4  *
5  * This file is part of Libav.
6  *
7  * Libav 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  * Libav 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 Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21 
22 #include "avformat.h"
23 #include "internal.h"
24 #include "libavutil/intreadwrite.h"
25 #include "libavutil/dict.h"
26 #include "libavutil/mathematics.h"
27 #include "riff.h"
28 
29 typedef struct VqfContext {
31  uint8_t last_frame_bits;
33 } VqfContext;
34 
35 static int vqf_probe(AVProbeData *probe_packet)
36 {
37  if (AV_RL32(probe_packet->buf) != MKTAG('T','W','I','N'))
38  return 0;
39 
40  if (!memcmp(probe_packet->buf + 4, "97012000", 8))
41  return AVPROBE_SCORE_MAX;
42 
43  if (!memcmp(probe_packet->buf + 4, "00052200", 8))
44  return AVPROBE_SCORE_MAX;
45 
46  return AVPROBE_SCORE_MAX/2;
47 }
48 
49 static void add_metadata(AVFormatContext *s, uint32_t tag,
50  unsigned int tag_len, unsigned int remaining)
51 {
52  int len = FFMIN(tag_len, remaining);
53  char *buf, key[5] = {0};
54 
55  if (len == UINT_MAX)
56  return;
57 
58  buf = av_malloc(len+1);
59  if (!buf)
60  return;
61  avio_read(s->pb, buf, len);
62  buf[len] = 0;
63  AV_WL32(key, tag);
65 }
66 
68  { "(c) ", "copyright" },
69  { "ARNG", "arranger" },
70  { "AUTH", "author" },
71  { "BAND", "band" },
72  { "CDCT", "conductor" },
73  { "COMT", "comment" },
74  { "FILE", "filename" },
75  { "GENR", "genre" },
76  { "LABL", "publisher" },
77  { "MUSC", "composer" },
78  { "NAME", "title" },
79  { "NOTE", "note" },
80  { "PROD", "producer" },
81  { "PRSN", "personnel" },
82  { "REMX", "remixer" },
83  { "SING", "singer" },
84  { "TRCK", "track" },
85  { "WORD", "words" },
86  { 0 },
87 };
88 
90 {
91  VqfContext *c = s->priv_data;
93  int chunk_tag;
94  int rate_flag = -1;
95  int header_size;
96  int read_bitrate = 0;
97  int size;
98  uint8_t comm_chunk[12];
99 
100  if (!st)
101  return AVERROR(ENOMEM);
102 
103  avio_skip(s->pb, 12);
104 
105  header_size = avio_rb32(s->pb);
106 
109  st->start_time = 0;
110 
111  do {
112  int len;
113  chunk_tag = avio_rl32(s->pb);
114 
115  if (chunk_tag == MKTAG('D','A','T','A'))
116  break;
117 
118  len = avio_rb32(s->pb);
119 
120  if ((unsigned) len > INT_MAX/2) {
121  av_log(s, AV_LOG_ERROR, "Malformed header\n");
122  return -1;
123  }
124 
125  header_size -= 8;
126 
127  switch(chunk_tag){
128  case MKTAG('C','O','M','M'):
129  avio_read(s->pb, comm_chunk, 12);
130  st->codec->channels = AV_RB32(comm_chunk ) + 1;
131  read_bitrate = AV_RB32(comm_chunk + 4);
132  rate_flag = AV_RB32(comm_chunk + 8);
133  avio_skip(s->pb, len-12);
134 
135  st->codec->bit_rate = read_bitrate*1000;
136  break;
137  case MKTAG('D','S','I','Z'): // size of compressed data
138  {
139  char buf[8] = {0};
140  int size = avio_rb32(s->pb);
141 
142  snprintf(buf, sizeof(buf), "%d", size);
143  av_dict_set(&s->metadata, "size", buf, 0);
144  }
145  break;
146  case MKTAG('Y','E','A','R'): // recording date
147  case MKTAG('E','N','C','D'): // compression date
148  case MKTAG('E','X','T','R'): // reserved
149  case MKTAG('_','Y','M','H'): // reserved
150  case MKTAG('_','N','T','T'): // reserved
151  case MKTAG('_','I','D','3'): // reserved for ID3 tags
152  avio_skip(s->pb, FFMIN(len, header_size));
153  break;
154  default:
155  add_metadata(s, chunk_tag, len, header_size);
156  break;
157  }
158 
159  header_size -= len;
160 
161  } while (header_size >= 0);
162 
163  switch (rate_flag) {
164  case -1:
165  av_log(s, AV_LOG_ERROR, "COMM tag not found!\n");
166  return -1;
167  case 44:
168  st->codec->sample_rate = 44100;
169  break;
170  case 22:
171  st->codec->sample_rate = 22050;
172  break;
173  case 11:
174  st->codec->sample_rate = 11025;
175  break;
176  default:
177  st->codec->sample_rate = rate_flag*1000;
178  break;
179  }
180 
181  switch (((st->codec->sample_rate/1000) << 8) +
182  read_bitrate/st->codec->channels) {
183  case (11<<8) + 8 :
184  case (8 <<8) + 8 :
185  case (11<<8) + 10:
186  case (22<<8) + 32:
187  size = 512;
188  break;
189  case (16<<8) + 16:
190  case (22<<8) + 20:
191  case (22<<8) + 24:
192  size = 1024;
193  break;
194  case (44<<8) + 40:
195  case (44<<8) + 48:
196  size = 2048;
197  break;
198  default:
199  av_log(s, AV_LOG_ERROR, "Mode not suported: %d Hz, %d kb/s.\n",
200  st->codec->sample_rate, st->codec->bit_rate);
201  return -1;
202  }
203  c->frame_bit_len = st->codec->bit_rate*size/st->codec->sample_rate;
204  avpriv_set_pts_info(st, 64, 1, st->codec->sample_rate);
205 
206  /* put first 12 bytes of COMM chunk in extradata */
208  return AVERROR(ENOMEM);
209  st->codec->extradata_size = 12;
210  memcpy(st->codec->extradata, comm_chunk, 12);
211 
212  ff_metadata_conv_ctx(s, NULL, vqf_metadata_conv);
213 
214  return 0;
215 }
216 
218 {
219  VqfContext *c = s->priv_data;
220  int ret;
221  int size = (c->frame_bit_len - c->remaining_bits + 7)>>3;
222 
223  pkt->pos = avio_tell(s->pb);
224  pkt->stream_index = 0;
225 
226  if (av_new_packet(pkt, size+2) < 0)
227  return AVERROR(EIO);
228 
229  pkt->data[0] = 8 - c->remaining_bits; // Number of bits to skip
230  pkt->data[1] = c->last_frame_bits;
231  ret = avio_read(s->pb, pkt->data+2, size);
232 
233  if (ret<=0) {
234  av_free_packet(pkt);
235  return AVERROR(EIO);
236  }
237 
238  c->last_frame_bits = pkt->data[size+1];
239  c->remaining_bits = (size << 3) - c->frame_bit_len + c->remaining_bits;
240 
241  return size+2;
242 }
243 
245  int stream_index, int64_t timestamp, int flags)
246 {
247  VqfContext *c = s->priv_data;
248  AVStream *st;
249  int ret;
250  int64_t pos;
251 
252  st = s->streams[stream_index];
253  pos = av_rescale_rnd(timestamp * st->codec->bit_rate,
254  st->time_base.num,
255  st->time_base.den * (int64_t)c->frame_bit_len,
256  (flags & AVSEEK_FLAG_BACKWARD) ?
258  pos *= c->frame_bit_len;
259 
260  st->cur_dts = av_rescale(pos, st->time_base.den,
261  st->codec->bit_rate * (int64_t)st->time_base.num);
262 
263  if ((ret = avio_seek(s->pb, ((pos-7) >> 3) + s->data_offset, SEEK_SET)) < 0)
264  return ret;
265 
266  c->remaining_bits = -7 - ((pos-7)&7);
267  return 0;
268 }
269 
271  .name = "vqf",
272  .long_name = NULL_IF_CONFIG_SMALL("Nippon Telegraph and Telephone Corporation (NTT) TwinVQ"),
273  .priv_data_size = sizeof(VqfContext),
278  .extensions = "vqf,vql,vqe",
279 };