xref: /netbsd-src/usr.bin/audio/common/audio.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /*	$NetBSD: audio.c,v 1.18 2004/10/30 16:57:27 dsl Exp $	*/
2 
3 /*
4  * Copyright (c) 1999 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  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
23  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
24  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
25  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
26  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28  * SUCH DAMAGE.
29  */
30 
31 /*
32  * XXX this is slightly icky in places...
33  */
34 #include <sys/cdefs.h>
35 
36 #ifndef lint
37 __RCSID("$NetBSD: audio.c,v 1.18 2004/10/30 16:57:27 dsl Exp $");
38 #endif
39 
40 
41 #include <sys/types.h>
42 #include <sys/audioio.h>
43 #include <sys/ioctl.h>
44 #include <sys/time.h>
45 
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 
54 /* what format am i? */
55 
56 struct {
57 	const char *fname;
58 	int fno;
59 } formats[] = {
60 	{ "sunau",		AUDIO_FORMAT_SUN },
61 	{ "au",			AUDIO_FORMAT_SUN },
62 	{ "sun",		AUDIO_FORMAT_SUN },
63 	{ "wav",		AUDIO_FORMAT_WAV },
64 	{ "wave",		AUDIO_FORMAT_WAV },
65 	{ "riff",		AUDIO_FORMAT_WAV },
66 	{ "no",			AUDIO_FORMAT_NONE },
67 	{ "none",		AUDIO_FORMAT_NONE },
68 	{ NULL, -1 }
69 };
70 
71 int
72 audio_format_from_str(str)
73 	char *str;
74 {
75 	int	i;
76 
77 	for (i = 0; formats[i].fname; i++)
78 		if (strcasecmp(formats[i].fname, str) == 0)
79 			break;
80 	return (formats[i].fno);
81 }
82 
83 
84 
85 /* back and forth between encodings */
86 struct {
87 	const char *ename;
88 	int eno;
89 } encs[] = {
90 	{ AudioEmulaw,		AUDIO_ENCODING_ULAW },
91 	{ "ulaw",		AUDIO_ENCODING_ULAW },
92 	{ AudioEalaw, 		AUDIO_ENCODING_ALAW },
93 	{ AudioEslinear,	AUDIO_ENCODING_SLINEAR },
94 	{ "linear",		AUDIO_ENCODING_SLINEAR },
95 	{ AudioEulinear,	AUDIO_ENCODING_ULINEAR },
96 	{ AudioEadpcm,		AUDIO_ENCODING_ADPCM },
97 	{ "ADPCM",		AUDIO_ENCODING_ADPCM },
98 	{ AudioEslinear_le,	AUDIO_ENCODING_SLINEAR_LE },
99 	{ "linear_le",		AUDIO_ENCODING_SLINEAR_LE },
100 	{ AudioEulinear_le,	AUDIO_ENCODING_ULINEAR_LE },
101 	{ AudioEslinear_be,	AUDIO_ENCODING_SLINEAR_BE },
102 	{ "linear_be",		AUDIO_ENCODING_SLINEAR_BE },
103 	{ AudioEulinear_be,	AUDIO_ENCODING_ULINEAR_BE },
104 	{ AudioEmpeg_l1_stream,	AUDIO_ENCODING_MPEG_L1_STREAM },
105 	{ AudioEmpeg_l1_packets,AUDIO_ENCODING_MPEG_L1_PACKETS },
106 	{ AudioEmpeg_l1_system,	AUDIO_ENCODING_MPEG_L1_SYSTEM },
107 	{ AudioEmpeg_l2_stream,	AUDIO_ENCODING_MPEG_L2_STREAM },
108 	{ AudioEmpeg_l2_packets,AUDIO_ENCODING_MPEG_L2_PACKETS },
109 	{ AudioEmpeg_l2_system,	AUDIO_ENCODING_MPEG_L2_SYSTEM },
110 	{ NULL, -1 }
111 };
112 
113 
114 const char *
115 audio_enc_from_val(val)
116 	int	val;
117 {
118 	int	i;
119 
120 	for (i = 0; encs[i].ename; i++)
121 		if (encs[i].eno == val)
122 			break;
123 	return (encs[i].ename);
124 }
125 
126 int
127 audio_enc_to_val(enc)
128 	const	char *enc;
129 {
130 	int	i;
131 
132 	for (i = 0; encs[i].ename; i++)
133 		if (strcmp(encs[i].ename, enc) == 0)
134 			break;
135 	if (encs[i].ename)
136 		return (encs[i].eno);
137 	else
138 		return (AUDIO_ENOENT);
139 }
140 
141 void
142 decode_int(arg, intp)
143 	const char *arg;
144 	int *intp;
145 {
146 	char	*ep;
147 	int	ret;
148 
149 	ret = (int)strtoul(arg, &ep, 10);
150 
151 	if (ep[0] == '\0') {
152 		*intp = ret;
153 		return;
154 	}
155 	errx(1, "argument `%s' not a valid integer", arg);
156 }
157 
158 void
159 decode_time(arg, tvp)
160 	const char *arg;
161 	struct timeval *tvp;
162 {
163 	char	*s, *colon, *dot;
164 	char	*copy = strdup(arg);
165 	int	first;
166 
167 	if (copy == NULL)
168 		err(1, "could not allocate a copy of %s", arg);
169 
170 	tvp->tv_sec = tvp->tv_usec = 0;
171 	s = copy;
172 
173 	/* handle [hh:]mm:ss.dd */
174 	if ((colon = strchr(s, ':')) != NULL) {
175 		*colon++ = '\0';
176 		decode_int(s, &first);
177 		tvp->tv_sec = first * 60;	/* minutes */
178 		s = colon;
179 
180 		if ((colon = strchr(s, ':')) != NULL) {
181 			*colon++ = '\0';
182 			decode_int(s, &first);
183 			tvp->tv_sec += first;	/* minutes and hours */
184 			tvp->tv_sec *= 60;
185 			s = colon;
186 		}
187 	}
188 	if ((dot = strchr(s, '.')) != NULL) {
189 		int 	i, base = 100000;
190 
191 		*dot++ = '\0';
192 
193 		for (i = 0; i < 6; i++, base /= 10) {
194 			if (!dot[i])
195 				break;
196 			if (!isdigit((unsigned char)dot[i]))
197 				errx(1, "argument `%s' is not a value time specification", arg);
198 			tvp->tv_usec += base * (dot[i] - '0');
199 		}
200 	}
201 	decode_int(s, &first);
202 	tvp->tv_sec += first;
203 
204 	free(copy);
205 }
206 
207 /*
208  * decode a string into an encoding value.
209  */
210 void
211 decode_encoding(arg, encp)
212 	const char *arg;
213 	int *encp;
214 {
215 	size_t	len;
216 	int i;
217 
218 	len = strlen(arg);
219 	for (i = 0; encs[i].ename; i++)
220 		if (strncmp(encs[i].ename, arg, len) == 0) {
221 			*encp = encs[i].eno;
222 			return;
223 		}
224 	errx(1, "unknown encoding `%s'", arg);
225 }
226 
227 const char *const audio_errlist[] = {
228 	"error zero",				/* nothing? */
229 	"no audio entry",			/* AUDIO_ENOENT */
230 	"short header",				/* AUDIO_ESHORTHDR */
231 	"unsupported WAV format",		/* AUDIO_EWAVUNSUPP */
232 	"bad (unsupported) WAV PCM format",	/* AUDIO_EWAVBADPCM */
233 	"no WAV audio data",			/* AUDIO_EWAVNODATA */
234 	"internal error",			/* AUDIO_EINTERNAL */
235 };
236 
237 const char *
238 audio_errstring(errval)
239 	int	errval;
240 {
241 
242 	errval = -errval;
243 	if (errval < 1 || errval > AUDIO_MAXERRNO)
244 		return "Invalid error";
245 	return audio_errlist[errval];
246 }
247