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 * st->codecpar->channels / 8;
84
85 if (avio_tell(s->pb) > header_size)
86 return AVERROR_INVALIDDATA;
87
88 avio_skip(s->pb, header_size - avio_tell(s->pb));
89
90 return 0;
91 } else if (!memcmp(buffer, "channel_count", 13)) {
92 sscanf(buffer, "%*s %*s %u", &st->codecpar->channels);
93 if (st->codecpar->channels <= 0 || st->codecpar->channels > INT16_MAX)
94 return AVERROR_INVALIDDATA;
95 } else if (!memcmp(buffer, "sample_byte_format", 18)) {
96 sscanf(buffer, "%*s %*s %31s", format);
97
98 if (!av_strcasecmp(format, "01")) {
99 be = 0;
100 } else if (!av_strcasecmp(format, "10")) {
101 be = 1;
102 } else if (!av_strcasecmp(format, "mu-law")) {
103 st->codecpar->codec_id = AV_CODEC_ID_PCM_MULAW;
104 } else if (av_strcasecmp(format, "1")) {
105 avpriv_request_sample(s, "sample byte format %s", format);
106 return AVERROR_PATCHWELCOME;
107 }
108 } else if (!memcmp(buffer, "sample_coding", 13)) {
109 sscanf(buffer, "%*s %*s %31s", coding);
110 } else if (!memcmp(buffer, "sample_count", 12)) {
111 sscanf(buffer, "%*s %*s %"SCNd64, &st->duration);
112 } else if (!memcmp(buffer, "sample_n_bytes", 14)) {
113 sscanf(buffer, "%*s %*s %d", &bps);
114 if (bps > INT16_MAX/8U)
115 return AVERROR_INVALIDDATA;
116 } else if (!memcmp(buffer, "sample_rate", 11)) {
117 sscanf(buffer, "%*s %*s %d", &st->codecpar->sample_rate);
118 } else if (!memcmp(buffer, "sample_sig_bits", 15)) {
119 sscanf(buffer, "%*s %*s %d", &st->codecpar->bits_per_coded_sample);
120 if (st->codecpar->bits_per_coded_sample <= 0 || st->codecpar->bits_per_coded_sample > INT16_MAX)
121 return AVERROR_INVALIDDATA;
122 } else {
123 char key[32], value[32];
124 if (sscanf(buffer, "%31s %*s %31s", key, value) == 2) {
125 av_dict_set(&s->metadata, key, value, AV_DICT_APPEND);
126 } else {
127 av_log(s, AV_LOG_ERROR, "Failed to parse '%s' as metadata\n", buffer);
128 }
129 }
130 }
131
132 return AVERROR_EOF;
133 }
134
135 AVInputFormat ff_nistsphere_demuxer = {
136 .name = "nistsphere",
137 .long_name = NULL_IF_CONFIG_SMALL("NIST SPeech HEader REsources"),
138 .read_probe = nist_probe,
139 .read_header = nist_read_header,
140 .read_packet = ff_pcm_read_packet,
141 .read_seek = ff_pcm_read_seek,
142 .extensions = "nist,sph",
143 .flags = AVFMT_GENERIC_INDEX,
144 };
145