1 /* $NetBSD: audio.c,v 1.22 2013/08/30 20:57:26 mrg 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 * 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.22 2013/08/30 20:57:26 mrg 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 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 { NULL, -1 } 114 }; 115 116 117 const char * 118 audio_enc_from_val(int val) 119 { 120 int i; 121 122 for (i = 0; encs[i].ename; i++) 123 if (encs[i].eno == val) 124 break; 125 return (encs[i].ename); 126 } 127 128 int 129 audio_enc_to_val(const char *enc) 130 { 131 int i; 132 133 for (i = 0; encs[i].ename; i++) 134 if (strcmp(encs[i].ename, enc) == 0) 135 break; 136 if (encs[i].ename) 137 return (encs[i].eno); 138 else 139 return (AUDIO_ENOENT); 140 } 141 142 void 143 decode_int(const char *arg, int *intp) 144 { 145 char *ep; 146 int ret; 147 148 ret = (int)strtoul(arg, &ep, 10); 149 150 if (ep[0] == '\0') { 151 *intp = ret; 152 return; 153 } 154 errx(1, "argument `%s' not a valid integer", arg); 155 } 156 157 void 158 decode_time(const char *arg, struct timeval *tvp) 159 { 160 char *s, *colon, *dot; 161 char *copy = strdup(arg); 162 int first; 163 164 if (copy == NULL) 165 err(1, "could not allocate a copy of %s", arg); 166 167 tvp->tv_sec = tvp->tv_usec = 0; 168 s = copy; 169 170 /* handle [hh:]mm:ss.dd */ 171 if ((colon = strchr(s, ':')) != NULL) { 172 *colon++ = '\0'; 173 decode_int(s, &first); 174 tvp->tv_sec = first * 60; /* minutes */ 175 s = colon; 176 177 if ((colon = strchr(s, ':')) != NULL) { 178 *colon++ = '\0'; 179 decode_int(s, &first); 180 tvp->tv_sec += first; /* minutes and hours */ 181 tvp->tv_sec *= 60; 182 s = colon; 183 } 184 } 185 if ((dot = strchr(s, '.')) != NULL) { 186 int i, base = 100000; 187 188 *dot++ = '\0'; 189 190 for (i = 0; i < 6; i++, base /= 10) { 191 if (!dot[i]) 192 break; 193 if (!isdigit((unsigned char)dot[i])) 194 errx(1, "argument `%s' is not a value time specification", arg); 195 tvp->tv_usec += base * (dot[i] - '0'); 196 } 197 } 198 decode_int(s, &first); 199 tvp->tv_sec += first; 200 201 free(copy); 202 } 203 204 /* 205 * decode a string into an encoding value. 206 */ 207 void 208 decode_encoding(const char *arg, int *encp) 209 { 210 size_t len; 211 int i; 212 213 len = strlen(arg); 214 for (i = 0; encs[i].ename; i++) 215 if (strncmp(encs[i].ename, arg, len) == 0) { 216 *encp = encs[i].eno; 217 return; 218 } 219 errx(1, "unknown encoding `%s'", arg); 220 } 221 222 static const char *const audio_errlist[] = { 223 "error zero", /* nothing? */ 224 "no audio entry", /* AUDIO_ENOENT */ 225 "short header", /* AUDIO_ESHORTHDR */ 226 "unsupported WAV format", /* AUDIO_EWAVUNSUPP */ 227 "bad (unsupported) WAV PCM format", /* AUDIO_EWAVBADPCM */ 228 "no WAV audio data", /* AUDIO_EWAVNODATA */ 229 "internal error", /* AUDIO_EINTERNAL */ 230 }; 231 232 const char * 233 audio_errstring(int errval) 234 { 235 236 errval = -errval; 237 if (errval < 1 || errval > AUDIO_MAXERRNO) 238 return "Invalid error"; 239 return audio_errlist[errval]; 240 } 241 242 void 243 write_header(struct write_info *wi) 244 { 245 struct iovec iv[3]; 246 int veclen, left, tlen; 247 void *hdr; 248 size_t hdrlen; 249 250 switch (wi->format) { 251 case AUDIO_FORMAT_DEFAULT: 252 case AUDIO_FORMAT_SUN: 253 if (sun_prepare_header(wi, &hdr, &hdrlen, &left) != 0) 254 return; 255 break; 256 case AUDIO_FORMAT_WAV: 257 if (wav_prepare_header(wi, &hdr, &hdrlen, &left) != 0) 258 return; 259 break; 260 case AUDIO_FORMAT_NONE: 261 return; 262 default: 263 errx(1, "unknown audio format"); 264 } 265 266 veclen = 0; 267 tlen = 0; 268 269 if (hdrlen != 0) { 270 iv[veclen].iov_base = hdr; 271 iv[veclen].iov_len = hdrlen; 272 tlen += iv[veclen++].iov_len; 273 } 274 if (wi->header_info) { 275 iv[veclen].iov_base = wi->header_info; 276 iv[veclen].iov_len = (int)strlen(wi->header_info) + 1; 277 tlen += iv[veclen++].iov_len; 278 } 279 if (left) { 280 iv[veclen].iov_base = audio_default_info; 281 iv[veclen].iov_len = left; 282 tlen += iv[veclen++].iov_len; 283 } 284 285 if (tlen == 0) 286 return; 287 288 if (writev(wi->outfd, iv, veclen) != tlen) 289 err(1, "could not write audio header"); 290 } 291 292 write_conv_func 293 write_get_conv_func(struct write_info *wi) 294 { 295 296 switch (wi->format) { 297 case AUDIO_FORMAT_DEFAULT: 298 case AUDIO_FORMAT_SUN: 299 return sun_write_get_conv_func(wi); 300 case AUDIO_FORMAT_WAV: 301 return wav_write_get_conv_func(wi); 302 case AUDIO_FORMAT_NONE: 303 return NULL; 304 default: 305 errx(1, "unknown audio format"); 306 } 307 } 308