1 /*
2 * NIST Sphere demuxer
3 * Copyright (c) 2012 Paul B Mahol
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/avstring.h"
23 #include "libavutil/intreadwrite.h"
24 #include "avformat.h"
25 #include "internal.h"
26 #include "pcm.h"
27
nist_probe(const AVProbeData * p)28 static int nist_probe(const AVProbeData *p)
29 {
30 if (AV_RL64(p->buf) == AV_RL64("NIST_1A\x0a"))
31 return AVPROBE_SCORE_MAX;
32 return 0;
33 }
34
nist_read_header(AVFormatContext * s)35 static int nist_read_header(AVFormatContext *s)
36 {
37 char buffer[256], coding[32] = "pcm", format[32] = "01";
38 int bps = 0, be = 0;
39 int32_t header_size = -1;
40 AVStream *st;
41
42 st = avformat_new_stream(s, NULL);
43 if (!st)
44 return AVERROR(ENOMEM);
45
46 st->codecpar->codec_type = AVMEDIA_TYPE_AUDIO;
47
48 ff_get_line(s->pb, buffer, sizeof(buffer));
49 ff_get_line(s->pb, buffer, sizeof(buffer));
50 sscanf(buffer, "%"SCNd32, &header_size);
51 if (header_size <= 0)
52 return AVERROR_INVALIDDATA;
53
54 while (!avio_feof(s->pb)) {
55 ff_get_line(s->pb, buffer, sizeof(buffer));
56
57 if (avio_tell(s->pb) >= header_size)
58 return AVERROR_INVALIDDATA;
59
60 if (!memcmp(buffer, "end_head", 8)) {
61 if (!st->codecpar->bits_per_coded_sample)
62 st->codecpar->bits_per_coded_sample = bps << 3;
63
64 if (!av_strcasecmp(coding, "pcm")) {
65 if (st->codecpar->codec_id == AV_CODEC_ID_NONE)
66 st->codecpar->codec_id = ff_get_pcm_codec_id(st->codecpar->bits_per_coded_sample,
67 0, be, 0xFFFF);
68 } else if (!av_strcasecmp(coding, "alaw")) {
69 st->codecpar->codec_id = AV_CODEC_ID_PCM_ALAW;
70 } else if (!av_strcasecmp(coding, "ulaw") ||
71 !av_strcasecmp(coding, "mu-law")) {
72 st->codecpar->codec_id = AV_CODEC_ID_PCM_MULAW;
73 } else if (!av_strncasecmp(coding, "pcm,embedded-shorten", 20)) {
74 st->codecpar->codec_id = AV_CODEC_ID_SHORTEN;
75 if (ff_alloc_extradata(st->codecpar, 1))
76 st->codecpar->extradata[0] = 1;
77 } else {
78 avpriv_request_sample(s, "coding %s", coding);
79 }
80
81 avpriv_set_pts_info(st, 64, 1, st->codecpar->sample_rate);
82
83 st->codecpar->block_align = st->codecpar->bits_per_coded_sample *
84 st->codecpar->ch_layout.nb_channels / 8;
85
86 if (avio_tell(s->pb) > header_size)
87 return AVERROR_INVALIDDATA;
88
89 avio_skip(s->pb, header_size - avio_tell(s->pb));
90
91 return 0;
92 } else if (!memcmp(buffer, "channel_count", 13)) {
93 sscanf(buffer, "%*s %*s %u", &st->codecpar->ch_layout.nb_channels);
94 if (st->codecpar->ch_layout.nb_channels <= 0 || st->codecpar->ch_layout.nb_channels > INT16_MAX)
95 return AVERROR_INVALIDDATA;
96 } else if (!memcmp(buffer, "sample_byte_format", 18)) {
97 sscanf(buffer, "%*s %*s %31s", format);
98
99 if (!av_strcasecmp(format, "01")) {
100 be = 0;
101 } else if (!av_strcasecmp(format, "10")) {
102 be = 1;
103 } else if (!av_strcasecmp(format, "mu-law")) {
104 st->codecpar->codec_id = AV_CODEC_ID_PCM_MULAW;
105 } else if (av_strcasecmp(format, "1")) {
106 avpriv_request_sample(s, "sample byte format %s", format);
107 return AVERROR_PATCHWELCOME;
108 }
109 } else if (!memcmp(buffer, "sample_coding", 13)) {
110 sscanf(buffer, "%*s %*s %31s", coding);
111 } else if (!memcmp(buffer, "sample_count", 12)) {
112 sscanf(buffer, "%*s %*s %"SCNd64, &st->duration);
113 } else if (!memcmp(buffer, "sample_n_bytes", 14)) {
114 sscanf(buffer, "%*s %*s %d", &bps);
115 if (bps > INT16_MAX/8U)
116 return AVERROR_INVALIDDATA;
117 } else if (!memcmp(buffer, "sample_rate", 11)) {
118 sscanf(buffer, "%*s %*s %d", &st->codecpar->sample_rate);
119 } else if (!memcmp(buffer, "sample_sig_bits", 15)) {
120 sscanf(buffer, "%*s %*s %d", &st->codecpar->bits_per_coded_sample);
121 if (st->codecpar->bits_per_coded_sample <= 0 || st->codecpar->bits_per_coded_sample > INT16_MAX)
122 return AVERROR_INVALIDDATA;
123 } else {
124 char key[32], value[32];
125 if (sscanf(buffer, "%31s %*s %31s", key, value) == 2) {
126 av_dict_set(&s->metadata, key, value, AV_DICT_APPEND);
127 } else {
128 av_log(s, AV_LOG_ERROR, "Failed to parse '%s' as metadata\n", buffer);
129 }
130 }
131 }
132
133 return AVERROR_EOF;
134 }
135
136 const AVInputFormat ff_nistsphere_demuxer = {
137 .name = "nistsphere",
138 .long_name = NULL_IF_CONFIG_SMALL("NIST SPeech HEader REsources"),
139 .read_probe = nist_probe,
140 .read_header = nist_read_header,
141 .read_packet = ff_pcm_read_packet,
142 .read_seek = ff_pcm_read_seek,
143 .extensions = "nist,sph",
144 .flags = AVFMT_GENERIC_INDEX,
145 };
146