Home | History | Annotate | Line # | Download | only in mixerctl
mixerctl.c revision 1.5
      1  1.5  augustss /*	$NetBSD: mixerctl.c,v 1.5 1997/08/24 23:20:04 augustss Exp $	*/
      2  1.1  augustss 
      3  1.1  augustss /*
      4  1.1  augustss  * Copyright (c) 1997 The NetBSD Foundation, Inc.
      5  1.1  augustss  * All rights reserved.
      6  1.1  augustss  *
      7  1.1  augustss  * Author: Lennart Augustsson, with some code and ideas from Chuck Cranor.
      8  1.1  augustss  *
      9  1.1  augustss  * Redistribution and use in source and binary forms, with or without
     10  1.1  augustss  * modification, are permitted provided that the following conditions
     11  1.1  augustss  * are met:
     12  1.1  augustss  * 1. Redistributions of source code must retain the above copyright
     13  1.1  augustss  *    notice, this list of conditions and the following disclaimer.
     14  1.1  augustss  * 2. Redistributions in binary form must reproduce the above copyright
     15  1.1  augustss  *    notice, this list of conditions and the following disclaimer in the
     16  1.1  augustss  *    documentation and/or other materials provided with the distribution.
     17  1.1  augustss  * 3. All advertising materials mentioning features or use of this software
     18  1.1  augustss  *    must display the following acknowledgement:
     19  1.1  augustss  *        This product includes software developed by the NetBSD
     20  1.1  augustss  *        Foundation, Inc. and its contributors.
     21  1.1  augustss  * 4. Neither the name of The NetBSD Foundation nor the names of its
     22  1.1  augustss  *    contributors may be used to endorse or promote products derived
     23  1.1  augustss  *    from this software without specific prior written permission.
     24  1.1  augustss  *
     25  1.1  augustss  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     26  1.1  augustss  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     27  1.1  augustss  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     28  1.1  augustss  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE
     29  1.1  augustss  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     30  1.1  augustss  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     31  1.1  augustss  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     32  1.1  augustss  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     33  1.1  augustss  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     34  1.1  augustss  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     35  1.1  augustss  * POSSIBILITY OF SUCH DAMAGE.
     36  1.1  augustss  */
     37  1.1  augustss #include <stdio.h>
     38  1.1  augustss #include <stdlib.h>
     39  1.1  augustss #include <fcntl.h>
     40  1.1  augustss #include <err.h>
     41  1.1  augustss #include <unistd.h>
     42  1.1  augustss #include <string.h>
     43  1.1  augustss #include <sys/types.h>
     44  1.1  augustss #include <sys/ioctl.h>
     45  1.1  augustss #include <sys/audioio.h>
     46  1.1  augustss 
     47  1.1  augustss FILE *out = stdout;
     48  1.1  augustss 
     49  1.1  augustss char *prog;
     50  1.1  augustss 
     51  1.1  augustss struct field {
     52  1.1  augustss 	char *name;
     53  1.1  augustss 	mixer_ctrl_t *valp;
     54  1.1  augustss 	mixer_devinfo_t *infp;
     55  1.4  augustss 	char changed;
     56  1.1  augustss } *fields, *rfields;
     57  1.1  augustss 
     58  1.1  augustss mixer_ctrl_t *values;
     59  1.1  augustss mixer_devinfo_t *infos;
     60  1.1  augustss 
     61  1.1  augustss char *
     62  1.1  augustss catstr(char *p, char *q)
     63  1.1  augustss {
     64  1.1  augustss 	char *r = malloc(strlen(p) + strlen(q) + 2);
     65  1.1  augustss 	strcpy(r, p);
     66  1.1  augustss 	strcat(r, ".");
     67  1.1  augustss 	strcat(r, q);
     68  1.1  augustss 	return r;
     69  1.1  augustss }
     70  1.1  augustss 
     71  1.1  augustss struct field *
     72  1.1  augustss findfield(char *name)
     73  1.1  augustss {
     74  1.1  augustss 	int i;
     75  1.1  augustss 	for(i = 0; fields[i].name; i++)
     76  1.1  augustss 		if (strcmp(fields[i].name, name) == 0)
     77  1.1  augustss 			return &fields[i];
     78  1.1  augustss 	return 0;
     79  1.1  augustss }
     80  1.1  augustss 
     81  1.1  augustss void
     82  1.1  augustss prfield(struct field *p, char *sep, int prvalset)
     83  1.1  augustss {
     84  1.1  augustss 	mixer_ctrl_t *m;
     85  1.3  augustss 	int i, n;
     86  1.1  augustss 
     87  1.1  augustss 	if (sep)
     88  1.1  augustss 		fprintf(out, "%s%s", p->name, sep);
     89  1.1  augustss 	m = p->valp;
     90  1.1  augustss 	switch(m->type) {
     91  1.1  augustss 	case AUDIO_MIXER_ENUM:
     92  1.4  augustss 		for(i = 0; i < p->infp->un.e.num_mem; i++)
     93  1.4  augustss 			if (p->infp->un.e.member[i].ord == m->un.ord)
     94  1.4  augustss 				fprintf(out, "%s",
     95  1.4  augustss 					p->infp->un.e.member[i].label.name);
     96  1.1  augustss 		if (prvalset) {
     97  1.1  augustss 			fprintf(out, "  [ ");
     98  1.1  augustss 			for(i = 0; i < p->infp->un.e.num_mem; i++)
     99  1.1  augustss 				fprintf(out, "%s ", p->infp->un.e.member[i].label.name);
    100  1.1  augustss 			fprintf(out, "]");
    101  1.1  augustss 		}
    102  1.1  augustss 		break;
    103  1.1  augustss 	case AUDIO_MIXER_SET:
    104  1.3  augustss 		for(n = i = 0; i < p->infp->un.s.num_mem; i++)
    105  1.3  augustss 			if (m->un.mask & p->infp->un.s.member[i].mask)
    106  1.3  augustss 				fprintf(out, "%s%s", n++ ? "," : "",
    107  1.3  augustss 					p->infp->un.s.member[i].label.name);
    108  1.1  augustss 		if (prvalset) {
    109  1.1  augustss 			fprintf(out, "  { ");
    110  1.1  augustss 			for(i = 0; i < p->infp->un.s.num_mem; i++)
    111  1.1  augustss 				fprintf(out, "%s ", p->infp->un.s.member[i].label.name);
    112  1.1  augustss 			fprintf(out, "}");
    113  1.1  augustss 		}
    114  1.1  augustss 		break;
    115  1.1  augustss 	case AUDIO_MIXER_VALUE:
    116  1.1  augustss 		if (m->un.value.num_channels == 1)
    117  1.1  augustss 			fprintf(out, "%d", m->un.value.level[0]);
    118  1.1  augustss 		else
    119  1.1  augustss 			fprintf(out, "%d,%d", m->un.value.level[0],
    120  1.1  augustss 			       m->un.value.level[1]);
    121  1.1  augustss 		break;
    122  1.1  augustss 	default:
    123  1.5  augustss 		printf("\n");
    124  1.1  augustss 		errx(1, "Invalid format.");
    125  1.1  augustss 	}
    126  1.1  augustss }
    127  1.1  augustss 
    128  1.4  augustss int
    129  1.4  augustss rdfield(struct field *p, char *q)
    130  1.1  augustss {
    131  1.1  augustss 	mixer_ctrl_t *m;
    132  1.4  augustss 	int v, v0, v1, mask;
    133  1.1  augustss 	int i;
    134  1.1  augustss 	char *s;
    135  1.1  augustss 
    136  1.1  augustss 	m = p->valp;
    137  1.1  augustss 	switch(m->type) {
    138  1.1  augustss 	case AUDIO_MIXER_ENUM:
    139  1.1  augustss 		for(i = 0; i < p->infp->un.e.num_mem; i++)
    140  1.1  augustss 			if (strcmp(p->infp->un.e.member[i].label.name, q) == 0)
    141  1.1  augustss 				break;
    142  1.1  augustss 		if (i < p->infp->un.e.num_mem)
    143  1.3  augustss 			m->un.ord = p->infp->un.e.member[i].ord;
    144  1.4  augustss 		else {
    145  1.1  augustss 			warnx("Bad enum value %s", q);
    146  1.4  augustss 			return 0;
    147  1.4  augustss 		}
    148  1.1  augustss 		break;
    149  1.1  augustss 	case AUDIO_MIXER_SET:
    150  1.4  augustss 		mask = 0;
    151  1.1  augustss 		for(v = 0; q && *q; q = s) {
    152  1.1  augustss 			s = strchr(q, ',');
    153  1.1  augustss 			if (s)
    154  1.1  augustss 				*s++ = 0;
    155  1.1  augustss 			for(i = 0; i < p->infp->un.s.num_mem; i++)
    156  1.1  augustss 				if (strcmp(p->infp->un.s.member[i].label.name, q) == 0)
    157  1.1  augustss 					break;
    158  1.3  augustss 			if (i < p->infp->un.s.num_mem) {
    159  1.4  augustss 				mask |= p->infp->un.s.member[i].mask;
    160  1.4  augustss 			} else {
    161  1.2  augustss 				warnx("Bad set value %s", q);
    162  1.4  augustss 				return 0;
    163  1.4  augustss 			}
    164  1.1  augustss 		}
    165  1.4  augustss 		m->un.mask = mask;
    166  1.1  augustss 		break;
    167  1.1  augustss 	case AUDIO_MIXER_VALUE:
    168  1.1  augustss 		if (m->un.value.num_channels == 1) {
    169  1.1  augustss 			if (sscanf(q, "%d", &v) == 1) {
    170  1.1  augustss 				m->un.value.level[0] = v;
    171  1.1  augustss 			} else {
    172  1.1  augustss 				warnx("Bad number %s", q);
    173  1.4  augustss 				return 0;
    174  1.1  augustss 			}
    175  1.1  augustss 		} else {
    176  1.1  augustss 			if (sscanf(q, "%d,%d", &v0, &v1) == 2) {
    177  1.1  augustss 				m->un.value.level[0] = v0;
    178  1.1  augustss 				m->un.value.level[1] = v1;
    179  1.1  augustss 			} else if (sscanf(q, "%d", &v) == 1) {
    180  1.1  augustss 				m->un.value.level[0] = m->un.value.level[1] = v;
    181  1.1  augustss 			} else {
    182  1.1  augustss 				warnx("Bad numbers %s", q);
    183  1.4  augustss 				return 0;
    184  1.1  augustss 			}
    185  1.1  augustss 		}
    186  1.1  augustss 		break;
    187  1.1  augustss 	default:
    188  1.1  augustss 		errx(1, "Invalid format.");
    189  1.1  augustss 	}
    190  1.4  augustss 	p->changed = 1;
    191  1.4  augustss 	return 1;
    192  1.1  augustss }
    193  1.1  augustss 
    194  1.1  augustss void
    195  1.1  augustss main(int argc, char **argv)
    196  1.1  augustss {
    197  1.1  augustss 	int fd, r, i, j, ch, pos;
    198  1.1  augustss 	int aflag = 0, wflag = 0, vflag = 0;
    199  1.1  augustss 	char *file = "/dev/mixer";
    200  1.1  augustss 	char *sep = "=";
    201  1.1  augustss 	mixer_devinfo_t dinfo;
    202  1.4  augustss 	mixer_ctrl_t val;
    203  1.1  augustss 	int ndev;
    204  1.1  augustss 
    205  1.1  augustss 	prog = *argv;
    206  1.1  augustss 
    207  1.1  augustss 	while ((ch = getopt(argc, argv, "af:nvw")) != -1) {
    208  1.1  augustss 		switch(ch) {
    209  1.1  augustss 		case 'a':
    210  1.1  augustss 			aflag++;
    211  1.1  augustss 			break;
    212  1.1  augustss 		case 'w':
    213  1.1  augustss 			wflag++;
    214  1.1  augustss 			break;
    215  1.1  augustss 		case 'v':
    216  1.1  augustss 			vflag++;
    217  1.1  augustss 			break;
    218  1.1  augustss 		case 'n':
    219  1.1  augustss 			sep = 0;
    220  1.1  augustss 			break;
    221  1.1  augustss 		case 'f':
    222  1.1  augustss 			file = optarg;
    223  1.1  augustss 			break;
    224  1.1  augustss 		case '?':
    225  1.1  augustss 		default:
    226  1.1  augustss 		usage:
    227  1.1  augustss 		fprintf(out, "%s [-f file] [-v] [-n] name ...\n", prog);
    228  1.1  augustss 		fprintf(out, "%s [-f file] [-v] [-n] -w name=value ...\n", prog);
    229  1.1  augustss 		fprintf(out, "%s [-f file] [-v] [-n] -a\n", prog);
    230  1.1  augustss 		exit(0);
    231  1.1  augustss 		}
    232  1.1  augustss 	}
    233  1.1  augustss 	argc -= optind;
    234  1.1  augustss 	argv += optind;
    235  1.1  augustss 
    236  1.1  augustss 	fd = open(file, O_RDWR);
    237  1.1  augustss 	if (fd < 0)
    238  1.1  augustss 		err(1, "%s", file);
    239  1.1  augustss 
    240  1.1  augustss 	for(ndev = 0; ; ndev++) {
    241  1.1  augustss 		dinfo.index = ndev;
    242  1.1  augustss 		if (ioctl(fd, AUDIO_MIXER_DEVINFO, &dinfo) < 0)
    243  1.1  augustss 			break;
    244  1.1  augustss 	}
    245  1.1  augustss 	rfields = calloc(ndev, sizeof *rfields);
    246  1.1  augustss 	fields = calloc(ndev, sizeof *fields);
    247  1.1  augustss 	infos = calloc(ndev, sizeof *infos);
    248  1.1  augustss 	values = calloc(ndev, sizeof *values);
    249  1.1  augustss 
    250  1.1  augustss 	for(i = 0; i < ndev; i++) {
    251  1.1  augustss 		infos[i].index = i;
    252  1.1  augustss 		ioctl(fd, AUDIO_MIXER_DEVINFO, &infos[i]);
    253  1.1  augustss 	}
    254  1.1  augustss 
    255  1.1  augustss 	for(i = 0; i < ndev; i++) {
    256  1.5  augustss 		rfields[i].name = infos[i].label.name;
    257  1.1  augustss 		rfields[i].valp = &values[i];
    258  1.1  augustss 		rfields[i].infp = &infos[i];
    259  1.1  augustss 	}
    260  1.1  augustss 
    261  1.1  augustss 	for(i = 0; i < ndev; i++) {
    262  1.1  augustss 		values[i].dev = i;
    263  1.1  augustss 		values[i].type = infos[i].type;
    264  1.1  augustss 		if (infos[i].type != AUDIO_MIXER_CLASS) {
    265  1.1  augustss 			values[i].un.value.num_channels = 2;
    266  1.1  augustss 			if (ioctl(fd, AUDIO_MIXER_READ, &values[i]) < 0) {
    267  1.1  augustss 				values[i].un.value.num_channels = 1;
    268  1.1  augustss 				if (ioctl(fd, AUDIO_MIXER_READ, &values[i]) < 0)
    269  1.1  augustss 					err(1, NULL);
    270  1.1  augustss 			}
    271  1.1  augustss 		}
    272  1.1  augustss 	}
    273  1.1  augustss 
    274  1.1  augustss 	for(j = i = 0; i < ndev; i++) {
    275  1.1  augustss 		if (infos[i].type != AUDIO_MIXER_CLASS &&
    276  1.1  augustss 		    infos[i].type != -1) {
    277  1.1  augustss 			fields[j++] = rfields[i];
    278  1.1  augustss 			for(pos = infos[i].next; pos != AUDIO_MIXER_LAST;
    279  1.1  augustss 			    pos = infos[pos].next) {
    280  1.1  augustss 				fields[j] = rfields[pos];
    281  1.1  augustss 				fields[j].name = catstr(rfields[i].name,
    282  1.1  augustss 							infos[pos].label.name);
    283  1.1  augustss 				infos[pos].type = -1;
    284  1.1  augustss 				j++;
    285  1.1  augustss 			}
    286  1.1  augustss 		}
    287  1.5  augustss 	}
    288  1.5  augustss 
    289  1.5  augustss 	for(i = 0; i < j; i++) {
    290  1.5  augustss 		if (infos[i].mixer_class >= 0 && infos[i].mixer_class < ndev)
    291  1.5  augustss 			fields[i].name = catstr(infos[fields[i].infp->mixer_class].label.name,
    292  1.5  augustss 						fields[i].name);
    293  1.1  augustss 	}
    294  1.1  augustss 
    295  1.1  augustss 	if (argc == 0 && aflag && !wflag) {
    296  1.1  augustss 		for(i = 0; fields[i].name; i++) {
    297  1.1  augustss 			prfield(&fields[i], sep, vflag);
    298  1.1  augustss 			fprintf(out, "\n");
    299  1.1  augustss 		}
    300  1.1  augustss 	} else if (argc > 0 && !aflag) {
    301  1.1  augustss 		struct field *p;
    302  1.1  augustss 		if (wflag) {
    303  1.1  augustss 			while(argc--) {
    304  1.1  augustss 				char *q;
    305  1.1  augustss 
    306  1.1  augustss 				q = strchr(*argv, '=');
    307  1.1  augustss 				if (q) {
    308  1.1  augustss 					*q++ = 0;
    309  1.1  augustss 					p = findfield(*argv);
    310  1.1  augustss 					if (p == 0)
    311  1.1  augustss 						warnx("field %s does not exist", *argv);
    312  1.1  augustss 					else {
    313  1.4  augustss 						val = *p->valp;
    314  1.4  augustss 						if (rdfield(p, q)) {
    315  1.4  augustss 							if (ioctl(fd, AUDIO_MIXER_WRITE, p->valp) < 0)
    316  1.4  augustss 								warn(NULL);
    317  1.4  augustss 							else if (sep) {
    318  1.4  augustss 								*p->valp = val;
    319  1.4  augustss 								prfield(p, ": ", 0);
    320  1.4  augustss 								ioctl(fd, AUDIO_MIXER_READ, p->valp);
    321  1.4  augustss 								printf(" -> ");
    322  1.4  augustss 								prfield(p, 0, 0);
    323  1.4  augustss 								printf("\n");
    324  1.4  augustss 							}
    325  1.4  augustss 						}
    326  1.1  augustss 					}
    327  1.1  augustss 				} else {
    328  1.1  augustss 					warnx("No `=' in %s", *argv);
    329  1.1  augustss 				}
    330  1.1  augustss 				argv++;
    331  1.1  augustss 			}
    332  1.1  augustss 		} else {
    333  1.1  augustss 			while(argc--) {
    334  1.1  augustss 				p = findfield(*argv);
    335  1.1  augustss 				if (p == 0)
    336  1.1  augustss 					warnx("field %s does not exist", *argv);
    337  1.1  augustss 				else
    338  1.1  augustss 					prfield(p, sep, vflag), fprintf(out, "\n");
    339  1.1  augustss 				argv++;
    340  1.1  augustss 			}
    341  1.1  augustss 		}
    342  1.1  augustss 	} else
    343  1.1  augustss 		goto usage;
    344  1.1  augustss 	exit(0);
    345  1.1  augustss }
    346