Annotation of src/usr.bin/mixerctl/mixerctl.c, Revision 1.29
1.29 ! ratchov 1: /* $OpenBSD: mixerctl.c,v 1.28 2008/06/26 05:42:21 ray Exp $ */
1.3 provos 2: /* $NetBSD: mixerctl.c,v 1.11 1998/04/27 16:55:23 augustss Exp $ */
1.1 provos 3:
4: /*
5: * Copyright (c) 1997 The NetBSD Foundation, Inc.
6: * All rights reserved.
7: *
8: * Author: Lennart Augustsson, with some code and ideas from Chuck Cranor.
9: *
10: * Redistribution and use in source and binary forms, with or without
11: * modification, are permitted provided that the following conditions
12: * are met:
13: * 1. Redistributions of source code must retain the above copyright
14: * notice, this list of conditions and the following disclaimer.
15: * 2. Redistributions in binary form must reproduce the above copyright
16: * notice, this list of conditions and the following disclaimer in the
17: * documentation and/or other materials provided with the distribution.
18: *
19: * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20: * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21: * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22: * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23: * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24: * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25: * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26: * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27: * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28: * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29: * POSSIBILITY OF SUCH DAMAGE.
30: */
1.9 pvalchev 31:
32: /*
33: * mixerctl(1) - a program to control audio mixing.
34: */
35:
1.19 otto 36: #include <sys/types.h>
37: #include <sys/ioctl.h>
38: #include <sys/audioio.h>
39:
40: #include <err.h>
1.20 millert 41: #include <errno.h>
1.19 otto 42: #include <fcntl.h>
1.20 millert 43: #include <limits.h>
1.1 provos 44: #include <stdio.h>
45: #include <stdlib.h>
1.19 otto 46: #include <string.h>
1.1 provos 47: #include <unistd.h>
48:
1.20 millert 49: struct field *findfield(char *);
50: void adjlevel(char **, u_char *, int);
1.19 otto 51: void catstr(char *, char *, char *);
1.29 ! ratchov 52: void prfield(struct field *, char *, int, mixer_ctrl_t *);
! 53: void rdfield(int, struct field *, char *, int, char *);
1.19 otto 54: __dead void usage(void);
1.1 provos 55:
1.19 otto 56: #define FIELD_NAME_MAX 64
1.1 provos 57:
58: struct field {
1.19 otto 59: char name[FIELD_NAME_MAX];
1.1 provos 60: mixer_ctrl_t *valp;
61: mixer_devinfo_t *infp;
62: } *fields, *rfields;
63:
64: mixer_ctrl_t *values;
65: mixer_devinfo_t *infos;
66:
1.19 otto 67: void
68: catstr(char *p, char *q, char *out)
1.1 provos 69: {
1.19 otto 70: char tmp[FIELD_NAME_MAX];
1.8 deraadt 71:
1.19 otto 72: snprintf(tmp, FIELD_NAME_MAX, "%s.%s", p, q);
73: strlcpy(out, tmp, FIELD_NAME_MAX);
1.1 provos 74: }
75:
76: struct field *
1.9 pvalchev 77: findfield(char *name)
1.1 provos 78: {
79: int i;
1.19 otto 80: for (i = 0; fields[i].name[0] != '\0'; i++)
1.1 provos 81: if (strcmp(fields[i].name, name) == 0)
82: return &fields[i];
1.9 pvalchev 83: return (0);
1.1 provos 84: }
85:
1.19 otto 86: #define e_member_name un.e.member[i].label.name
87: #define s_member_name un.s.member[i].label.name
88:
1.1 provos 89: void
1.29 ! ratchov 90: prfield(struct field *p, char *sep, int prvalset, mixer_ctrl_t *m)
1.1 provos 91: {
92: int i, n;
93:
94: if (sep)
1.19 otto 95: printf("%s%s", p->name, sep);
96: switch (m->type) {
1.1 provos 97: case AUDIO_MIXER_ENUM:
1.18 millert 98: for (i = 0; i < p->infp->un.e.num_mem; i++)
1.1 provos 99: if (p->infp->un.e.member[i].ord == m->un.ord)
1.19 otto 100: printf("%s",
101: p->infp->e_member_name);
1.1 provos 102: if (prvalset) {
1.19 otto 103: printf(" [ ");
1.18 millert 104: for (i = 0; i < p->infp->un.e.num_mem; i++)
1.19 otto 105: printf("%s ", p->infp->e_member_name);
106: printf("]");
1.1 provos 107: }
108: break;
109: case AUDIO_MIXER_SET:
1.18 millert 110: for (n = i = 0; i < p->infp->un.s.num_mem; i++)
1.1 provos 111: if (m->un.mask & p->infp->un.s.member[i].mask)
1.19 otto 112: printf("%s%s", n++ ? "," : "",
113: p->infp->s_member_name);
1.1 provos 114: if (prvalset) {
1.19 otto 115: printf(" { ");
1.18 millert 116: for (i = 0; i < p->infp->un.s.num_mem; i++)
1.19 otto 117: printf("%s ", p->infp->s_member_name);
118: printf("}");
1.1 provos 119: }
120: break;
121: case AUDIO_MIXER_VALUE:
122: if (m->un.value.num_channels == 1)
1.19 otto 123: printf("%d", m->un.value.level[0]);
1.1 provos 124: else
1.19 otto 125: printf("%d,%d", m->un.value.level[0],
1.22 deraadt 126: m->un.value.level[1]);
1.1 provos 127: if (prvalset)
1.19 otto 128: printf(" %s", p->infp->un.v.units.name);
1.1 provos 129: break;
130: default:
131: errx(1, "Invalid format.");
132: }
133: }
134:
1.19 otto 135: void
1.20 millert 136: adjlevel(char **p, u_char *olevel, int more)
137: {
138: char *ep, *cp = *p;
139: long inc;
140: u_char level;
141:
142: if (*cp != '+' && *cp != '-')
143: *olevel = 0; /* absolute setting */
144:
145: errno = 0;
146: inc = strtol(cp, &ep, 10);
147: if (*cp == '\0' || (*ep != '\0' && *ep != ',') ||
148: (errno == ERANGE && (inc == LONG_MAX || inc == LONG_MIN)))
149: errx(1, "Bad number %s", cp);
150: if (*ep == ',' && !more)
151: errx(1, "Too many values");
152: *p = ep;
153:
154: if (inc < AUDIO_MIN_GAIN - *olevel)
155: level = AUDIO_MIN_GAIN;
156: else if (inc > AUDIO_MAX_GAIN - *olevel)
157: level = AUDIO_MAX_GAIN;
158: else
159: level = *olevel + inc;
160: *olevel = level;
161: }
162:
163: void
1.29 ! ratchov 164: rdfield(int fd, struct field *p, char *q, int quiet, char *sep)
1.1 provos 165: {
1.19 otto 166: mixer_ctrl_t *m, oldval;
1.20 millert 167: int i, mask;
1.1 provos 168: char *s;
169:
1.19 otto 170: oldval = *p->valp;
1.1 provos 171: m = p->valp;
1.19 otto 172:
173: switch (m->type) {
1.1 provos 174: case AUDIO_MIXER_ENUM:
1.22 deraadt 175: if (strcmp(q, "toggle") == 0) {
176: for (i = 0; i < p->infp->un.e.num_mem; i++) {
177: if (m->un.ord == p->infp->un.e.member[i].ord)
178: break;
179: }
180: if (i < p->infp->un.e.num_mem)
181: i++;
182: else
183: i = 0;
184: m->un.ord = p->infp->un.e.member[i].ord;
185: break;
186: }
1.18 millert 187: for (i = 0; i < p->infp->un.e.num_mem; i++)
1.19 otto 188: if (strcmp(p->infp->e_member_name, q) == 0)
1.1 provos 189: break;
190: if (i < p->infp->un.e.num_mem)
191: m->un.ord = p->infp->un.e.member[i].ord;
1.9 pvalchev 192: else
1.22 deraadt 193: errx(1, "Bad enum value %s", q);
1.1 provos 194: break;
195: case AUDIO_MIXER_SET:
196: mask = 0;
1.20 millert 197: for (; q && *q; q = s) {
1.19 otto 198: if ((s = strchr(q, ',')) != NULL)
1.1 provos 199: *s++ = 0;
1.4 millert 200: for (i = 0; i < p->infp->un.s.num_mem; i++)
1.19 otto 201: if (strcmp(p->infp->s_member_name, q) == 0)
1.1 provos 202: break;
1.9 pvalchev 203: if (i < p->infp->un.s.num_mem)
1.1 provos 204: mask |= p->infp->un.s.member[i].mask;
1.9 pvalchev 205: else
1.22 deraadt 206: errx(1, "Bad set value %s", q);
1.1 provos 207: }
208: m->un.mask = mask;
209: break;
210: case AUDIO_MIXER_VALUE:
211: if (m->un.value.num_channels == 1) {
1.20 millert 212: adjlevel(&q, &m->un.value.level[0], 0);
1.1 provos 213: } else {
1.20 millert 214: adjlevel(&q, &m->un.value.level[0], 1);
215: if (*q++ == ',')
216: adjlevel(&q, &m->un.value.level[1], 0);
217: else
218: m->un.value.level[1] = m->un.value.level[0];
1.1 provos 219: }
220: break;
221: default:
222: errx(1, "Invalid format.");
223: }
1.19 otto 224:
225: if (ioctl(fd, AUDIO_MIXER_WRITE, p->valp) < 0) {
226: warn("AUDIO_MIXER_WRITE");
1.21 millert 227: } else if (!quiet) {
1.19 otto 228: if (ioctl(fd, AUDIO_MIXER_READ, p->valp) < 0) {
229: warn("AUDIO_MIXER_READ");
230: } else {
1.29 ! ratchov 231: if (sep) {
! 232: prfield(p, ": ", 0, &oldval);
! 233: printf(" -> ");
! 234: }
! 235: prfield(p, NULL, 0, p->valp);
1.19 otto 236: printf("\n");
237: }
238: }
1.1 provos 239: }
240:
241: int
1.9 pvalchev 242: main(int argc, char **argv)
1.1 provos 243: {
244: int fd, i, j, ch, pos;
1.22 deraadt 245: int aflag = 0, qflag = 0, vflag = 0, tflag = 0;
1.3 provos 246: char *file;
1.1 provos 247: char *sep = "=";
248: mixer_devinfo_t dinfo;
1.16 tedu 249: int ndev;
1.1 provos 250:
1.9 pvalchev 251: if ((file = getenv("MIXERDEVICE")) == 0 || *file == '\0')
1.22 deraadt 252: file = "/dev/mixer";
1.1 provos 253:
1.22 deraadt 254: while ((ch = getopt(argc, argv, "af:nqtvw")) != -1) {
1.25 sobrado 255: switch (ch) {
1.1 provos 256: case 'a':
257: aflag++;
258: break;
259: case 'w':
1.14 tedu 260: /* compat */
1.1 provos 261: break;
262: case 'v':
263: vflag++;
264: break;
265: case 'n':
266: sep = 0;
267: break;
268: case 'f':
269: file = optarg;
270: break;
1.10 jfb 271: case 'q':
272: qflag = 1;
273: break;
1.22 deraadt 274: case 't':
275: tflag = 1;
276: break;
1.1 provos 277: default:
1.9 pvalchev 278: usage();
1.1 provos 279: }
280: }
281: argc -= optind;
282: argv += optind;
1.6 mickey 283:
1.26 deraadt 284: if (argc == 0 && tflag == 0)
285: aflag++;
286:
1.14 tedu 287: if ((fd = open(file, O_RDWR)) == -1)
288: if ((fd = open(file, O_RDONLY)) == -1)
289: err(1, "%s", file);
1.1 provos 290:
1.18 millert 291: for (ndev = 0; ; ndev++) {
1.16 tedu 292: dinfo.index = ndev;
1.14 tedu 293: if (ioctl(fd, AUDIO_MIXER_DEVINFO, &dinfo) < 0)
294: break;
1.1 provos 295: }
1.5 mickey 296:
1.9 pvalchev 297: if (!ndev)
1.5 mickey 298: errx(1, "no mixer devices configured");
299:
1.9 pvalchev 300: if ((rfields = calloc(ndev, sizeof *rfields)) == NULL ||
301: (fields = calloc(ndev, sizeof *fields)) == NULL ||
302: (infos = calloc(ndev, sizeof *infos)) == NULL ||
303: (values = calloc(ndev, sizeof *values)) == NULL)
304: err(1, "calloc()");
1.1 provos 305:
1.18 millert 306: for (i = 0; i < ndev; i++) {
1.1 provos 307: infos[i].index = i;
1.17 millert 308: if (ioctl(fd, AUDIO_MIXER_DEVINFO, &infos[i]) < 0) {
1.19 otto 309: ndev--;
310: i--;
1.17 millert 311: continue;
312: }
1.1 provos 313: }
314:
1.18 millert 315: for (i = 0; i < ndev; i++) {
1.19 otto 316: strlcpy(rfields[i].name, infos[i].label.name, FIELD_NAME_MAX);
1.1 provos 317: rfields[i].valp = &values[i];
318: rfields[i].infp = &infos[i];
319: }
320:
1.18 millert 321: for (i = 0; i < ndev; i++) {
1.1 provos 322: values[i].dev = i;
323: values[i].type = infos[i].type;
324: if (infos[i].type != AUDIO_MIXER_CLASS) {
325: values[i].un.value.num_channels = 2;
326: if (ioctl(fd, AUDIO_MIXER_READ, &values[i]) < 0) {
327: values[i].un.value.num_channels = 1;
328: if (ioctl(fd, AUDIO_MIXER_READ, &values[i]) < 0)
329: err(1, "AUDIO_MIXER_READ");
330: }
331: }
332: }
333:
1.18 millert 334: for (j = i = 0; i < ndev; i++) {
1.1 provos 335: if (infos[i].type != AUDIO_MIXER_CLASS &&
1.27 ratchov 336: infos[i].prev == AUDIO_MIXER_LAST) {
1.1 provos 337: fields[j++] = rfields[i];
1.18 millert 338: for (pos = infos[i].next; pos != AUDIO_MIXER_LAST;
1.1 provos 339: pos = infos[pos].next) {
340: fields[j] = rfields[pos];
1.19 otto 341: catstr(rfields[i].name, infos[pos].label.name,
342: fields[j].name);
1.1 provos 343: j++;
344: }
345: }
346: }
347:
1.18 millert 348: for (i = 0; i < j; i++) {
1.1 provos 349: int cls = fields[i].infp->mixer_class;
350: if (cls >= 0 && cls < ndev)
1.19 otto 351: catstr(infos[cls].label.name, fields[i].name,
352: fields[i].name);
1.1 provos 353: }
354:
1.14 tedu 355: if (!argc && aflag) {
1.19 otto 356: for (i = 0; fields[i].name[0] != '\0'; i++) {
1.29 ! ratchov 357: prfield(&fields[i], sep, vflag, fields[i].valp);
1.19 otto 358: printf("\n");
1.1 provos 359: }
360: } else if (argc > 0 && !aflag) {
361: struct field *p;
1.14 tedu 362:
1.19 otto 363: while (argc--) {
1.14 tedu 364: char *q;
365:
1.19 otto 366: ch = 0;
367: if ((q = strchr(*argv, '=')) != NULL) {
368: *q++ = '\0';
369: ch = 1;
370: }
371:
372: if ((p = findfield(*argv)) == NULL) {
373: warnx("field %s does not exist", *argv);
1.22 deraadt 374: } else if (ch || tflag) {
375: if (tflag && q == NULL)
376: q = "toggle";
1.29 ! ratchov 377: rdfield(fd, p, q, qflag, sep);
1.14 tedu 378: } else {
1.29 ! ratchov 379: prfield(p, sep, vflag, p->valp);
1.19 otto 380: printf("\n");
1.1 provos 381: }
1.19 otto 382:
1.17 millert 383: argv++;
1.1 provos 384: }
385: } else
1.9 pvalchev 386: usage();
1.1 provos 387: exit(0);
1.9 pvalchev 388: }
389:
1.19 otto 390: __dead void
1.9 pvalchev 391: usage(void)
392: {
393: extern char *__progname; /* from crt0.o */
394:
395: fprintf(stderr,
1.26 deraadt 396: "usage: %s [-anv] [-f file]\n"
1.24 sobrado 397: " %s [-nv] [-f file] name ...\n"
398: " %s [-qt] [-f file] name ...\n"
1.25 sobrado 399: " %s [-q] [-f file] name=value ...\n",
1.23 deraadt 400: __progname, __progname, __progname, __progname);
1.9 pvalchev 401:
402: exit(1);
1.1 provos 403: }