xref: /netbsd-src/usr.bin/audio/common/audio.c (revision cca8938d5bda48f3624cdbf92c8d239ca49a033a)
1 /*	$NetBSD: audio.c,v 1.27 2024/02/27 21:05:34 gson Exp $	*/
2 
3 /*
4  * Copyright (c) 1999, 2013, 2015, 2019 Matthew R. Green
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 /*
30  * XXX this is slightly icky in places...
31  */
32 #include <sys/cdefs.h>
33 
34 #ifndef lint
35 __RCSID("$NetBSD: audio.c,v 1.27 2024/02/27 21:05:34 gson Exp $");
36 #endif
37 
38 
39 #include <sys/types.h>
40 #include <sys/audioio.h>
41 #include <sys/ioctl.h>
42 #include <sys/time.h>
43 #include <sys/uio.h>
44 
45 #include <unistd.h>
46 #include <ctype.h>
47 #include <err.h>
48 #include <stdio.h>
49 #include <stdlib.h>
50 #include <string.h>
51 
52 #include "libaudio.h"
53 #include "auconv.h"
54 
55 /* what format am i? */
56 
57 static const struct {
58 	const char *fname;
59 	int fno;
60 } formats[] = {
61 	{ "sunau",		AUDIO_FORMAT_SUN },
62 	{ "au",			AUDIO_FORMAT_SUN },
63 	{ "sun",		AUDIO_FORMAT_SUN },
64 	{ "wav",		AUDIO_FORMAT_WAV },
65 	{ "wave",		AUDIO_FORMAT_WAV },
66 	{ "riff",		AUDIO_FORMAT_WAV },
67 	{ "no",			AUDIO_FORMAT_NONE },
68 	{ "none",		AUDIO_FORMAT_NONE },
69 	{ NULL, -1 }
70 };
71 
72 char	audio_default_info[8] = { '\0', '\0', '\0', '\0', '\0', '\0', '\0', '\0' };
73 
74 int
audio_format_from_str(char * str)75 audio_format_from_str(char *str)
76 {
77 	int	i;
78 
79 	for (i = 0; formats[i].fname; i++)
80 		if (strcasecmp(formats[i].fname, str) == 0)
81 			break;
82 	return (formats[i].fno);
83 }
84 
85 
86 
87 /* back and forth between encodings */
88 static const struct {
89 	const char *ename;
90 	int eno;
91 } encs[] = {
92 	{ AudioEmulaw,		AUDIO_ENCODING_ULAW },
93 	{ "ulaw",		AUDIO_ENCODING_ULAW },
94 	{ AudioEalaw, 		AUDIO_ENCODING_ALAW },
95 	{ AudioEslinear,	AUDIO_ENCODING_SLINEAR },
96 	{ "linear",		AUDIO_ENCODING_SLINEAR },
97 	{ AudioEulinear,	AUDIO_ENCODING_ULINEAR },
98 	{ AudioEadpcm,		AUDIO_ENCODING_ADPCM },
99 	{ "ADPCM",		AUDIO_ENCODING_ADPCM },
100 	{ AudioEslinear_le,	AUDIO_ENCODING_SLINEAR_LE },
101 	{ "linear_le",		AUDIO_ENCODING_SLINEAR_LE },
102 	{ AudioEulinear_le,	AUDIO_ENCODING_ULINEAR_LE },
103 	{ AudioEslinear_be,	AUDIO_ENCODING_SLINEAR_BE },
104 	{ "linear_be",		AUDIO_ENCODING_SLINEAR_BE },
105 	{ AudioEulinear_be,	AUDIO_ENCODING_ULINEAR_BE },
106 	{ AudioEmpeg_l1_stream,	AUDIO_ENCODING_MPEG_L1_STREAM },
107 	{ AudioEmpeg_l1_packets,AUDIO_ENCODING_MPEG_L1_PACKETS },
108 	{ AudioEmpeg_l1_system,	AUDIO_ENCODING_MPEG_L1_SYSTEM },
109 	{ AudioEmpeg_l2_stream,	AUDIO_ENCODING_MPEG_L2_STREAM },
110 	{ AudioEmpeg_l2_packets,AUDIO_ENCODING_MPEG_L2_PACKETS },
111 	{ AudioEmpeg_l2_system,	AUDIO_ENCODING_MPEG_L2_SYSTEM },
112 	{ AudioEac3,		AUDIO_ENCODING_AC3 },
113 	{ "ieee_float32",	AUDIO_ENCODING_LIBAUDIO_FLOAT32 },
114 	{ "ieee_float64",	AUDIO_ENCODING_LIBAUDIO_FLOAT64 },
115 	{ NULL, -1 }
116 };
117 
118 
119 const char *
audio_enc_from_val(int val)120 audio_enc_from_val(int val)
121 {
122 	int	i;
123 
124 	for (i = 0; encs[i].ename; i++)
125 		if (encs[i].eno == val)
126 			break;
127 	return (encs[i].ename);
128 }
129 
130 int
audio_enc_to_val(const char * enc)131 audio_enc_to_val(const char *enc)
132 {
133 	int	i;
134 
135 	for (i = 0; encs[i].ename; i++)
136 		if (strcmp(encs[i].ename, enc) == 0)
137 			break;
138 	if (encs[i].ename)
139 		return (encs[i].eno);
140 	else
141 		return (AUDIO_ENOENT);
142 }
143 
144 /*
145  * decode a string into an encoding value.
146  */
147 void
decode_encoding(const char * arg,int * encp)148 decode_encoding(const char *arg, int *encp)
149 {
150 	size_t	len;
151 	int i;
152 
153 	len = strlen(arg);
154 	for (i = 0; encs[i].ename; i++)
155 		if (strncmp(encs[i].ename, arg, len) == 0) {
156 			*encp = encs[i].eno;
157 			return;
158 		}
159 	errx(1, "unknown encoding `%s'", arg);
160 }
161 
162 static const char *const audio_errlist[] = {
163 	"error zero",				/* nothing? */
164 	"no audio entry",			/* AUDIO_ENOENT */
165 	"short header",				/* AUDIO_ESHORTHDR */
166 	"unsupported WAV format",		/* AUDIO_EWAVUNSUPP */
167 	"bad (unsupported) WAV PCM format",	/* AUDIO_EWAVBADPCM */
168 	"no WAV audio data",			/* AUDIO_EWAVNODATA */
169 	"internal error",			/* AUDIO_EINTERNAL */
170 };
171 
172 const char *
audio_errstring(int errval)173 audio_errstring(int errval)
174 {
175 
176 	errval = -errval;
177 	if (errval < 1 || errval > AUDIO_MAXERRNO)
178 		return "Invalid error";
179 	return audio_errlist[errval];
180 }
181 
182 void
write_header(struct track_info * ti)183 write_header(struct track_info *ti)
184 {
185 	struct iovec iv[3];
186 	int veclen, left, tlen;
187 	void *hdr;
188 	size_t hdrlen;
189 
190 	switch (ti->format) {
191 	case AUDIO_FORMAT_DEFAULT:
192 	case AUDIO_FORMAT_SUN:
193 		if (sun_prepare_header(ti, &hdr, &hdrlen, &left) != 0)
194 			return;
195 		break;
196 	case AUDIO_FORMAT_WAV:
197 		if (wav_prepare_header(ti, &hdr, &hdrlen, &left) != 0)
198 			return;
199 		break;
200 	case AUDIO_FORMAT_NONE:
201 		return;
202 	default:
203 		errx(1, "unknown audio format");
204 	}
205 
206 	veclen = 0;
207 	tlen = 0;
208 
209 	if (hdrlen != 0) {
210 		iv[veclen].iov_base = hdr;
211 		iv[veclen].iov_len = hdrlen;
212 		tlen += iv[veclen++].iov_len;
213 	}
214 	if (ti->header_info) {
215 		iv[veclen].iov_base = ti->header_info;
216 		iv[veclen].iov_len = (int)strlen(ti->header_info) + 1;
217 		tlen += iv[veclen++].iov_len;
218 	}
219 	if (left) {
220 		iv[veclen].iov_base = audio_default_info;
221 		iv[veclen].iov_len = left;
222 		tlen += iv[veclen++].iov_len;
223 	}
224 
225 	if (tlen == 0)
226 		return;
227 
228 	if (writev(ti->outfd, iv, veclen) != tlen)
229 		err(1, "could not write audio header");
230 }
231 
232 write_conv_func
write_get_conv_func(struct track_info * ti)233 write_get_conv_func(struct track_info *ti)
234 {
235 
236 	switch (ti->format) {
237 	case AUDIO_FORMAT_DEFAULT:
238 	case AUDIO_FORMAT_SUN:
239 		return sun_write_get_conv_func(ti);
240 	case AUDIO_FORMAT_WAV:
241 		return wav_write_get_conv_func(ti);
242 	case AUDIO_FORMAT_NONE:
243 		return NULL;
244 	default:
245 		errx(1, "unknown audio format");
246 	}
247 }
248