Home | History | Annotate | Line # | Download | only in mixerctl
mixerctl.c revision 1.12
      1  1.12  augustss /*	$NetBSD: mixerctl.c,v 1.12 1998/08/21 19:45:38 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.7       jtc  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     29   1.7       jtc  * BE 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.12  augustss #define MIXER "/dev/mixer0"
     48  1.12  augustss #define OLD_MIXER "/dev/mixer"
     49  1.12  augustss 
     50   1.6  augustss char *catstr __P((char *p, char *q));
     51   1.6  augustss struct field *findfield __P((char *name));
     52   1.6  augustss void prfield __P((struct field *p, char *sep, int prvalset));
     53   1.6  augustss int rdfield __P((struct field *p, char *q));
     54   1.6  augustss int main(int argc, char **argv);
     55   1.6  augustss 
     56   1.1  augustss FILE *out = stdout;
     57   1.1  augustss 
     58   1.1  augustss char *prog;
     59   1.1  augustss 
     60   1.1  augustss struct field {
     61   1.1  augustss 	char *name;
     62   1.1  augustss 	mixer_ctrl_t *valp;
     63   1.1  augustss 	mixer_devinfo_t *infp;
     64   1.4  augustss 	char changed;
     65   1.1  augustss } *fields, *rfields;
     66   1.1  augustss 
     67   1.1  augustss mixer_ctrl_t *values;
     68   1.1  augustss mixer_devinfo_t *infos;
     69   1.1  augustss 
     70   1.1  augustss char *
     71   1.6  augustss catstr(p, q)
     72   1.6  augustss 	char *p;
     73   1.6  augustss         char *q;
     74   1.1  augustss {
     75   1.1  augustss 	char *r = malloc(strlen(p) + strlen(q) + 2);
     76   1.1  augustss 	strcpy(r, p);
     77   1.1  augustss 	strcat(r, ".");
     78   1.1  augustss 	strcat(r, q);
     79   1.1  augustss 	return r;
     80   1.1  augustss }
     81   1.1  augustss 
     82   1.1  augustss struct field *
     83   1.6  augustss findfield(name)
     84   1.6  augustss 	char *name;
     85   1.1  augustss {
     86   1.1  augustss 	int i;
     87   1.1  augustss 	for(i = 0; fields[i].name; i++)
     88   1.1  augustss 		if (strcmp(fields[i].name, name) == 0)
     89   1.1  augustss 			return &fields[i];
     90   1.1  augustss 	return 0;
     91   1.1  augustss }
     92   1.1  augustss 
     93   1.1  augustss void
     94   1.6  augustss prfield(p, sep, prvalset)
     95   1.6  augustss 	struct field *p;
     96   1.6  augustss         char *sep;
     97   1.6  augustss         int prvalset;
     98   1.1  augustss {
     99   1.1  augustss 	mixer_ctrl_t *m;
    100   1.3  augustss 	int i, n;
    101   1.1  augustss 
    102   1.1  augustss 	if (sep)
    103   1.1  augustss 		fprintf(out, "%s%s", p->name, sep);
    104   1.1  augustss 	m = p->valp;
    105   1.1  augustss 	switch(m->type) {
    106   1.1  augustss 	case AUDIO_MIXER_ENUM:
    107   1.4  augustss 		for(i = 0; i < p->infp->un.e.num_mem; i++)
    108   1.4  augustss 			if (p->infp->un.e.member[i].ord == m->un.ord)
    109   1.4  augustss 				fprintf(out, "%s",
    110   1.4  augustss 					p->infp->un.e.member[i].label.name);
    111   1.1  augustss 		if (prvalset) {
    112   1.1  augustss 			fprintf(out, "  [ ");
    113   1.1  augustss 			for(i = 0; i < p->infp->un.e.num_mem; i++)
    114   1.1  augustss 				fprintf(out, "%s ", p->infp->un.e.member[i].label.name);
    115   1.1  augustss 			fprintf(out, "]");
    116   1.1  augustss 		}
    117   1.1  augustss 		break;
    118   1.1  augustss 	case AUDIO_MIXER_SET:
    119   1.3  augustss 		for(n = i = 0; i < p->infp->un.s.num_mem; i++)
    120   1.3  augustss 			if (m->un.mask & p->infp->un.s.member[i].mask)
    121   1.3  augustss 				fprintf(out, "%s%s", n++ ? "," : "",
    122   1.3  augustss 					p->infp->un.s.member[i].label.name);
    123   1.1  augustss 		if (prvalset) {
    124   1.1  augustss 			fprintf(out, "  { ");
    125   1.1  augustss 			for(i = 0; i < p->infp->un.s.num_mem; i++)
    126   1.1  augustss 				fprintf(out, "%s ", p->infp->un.s.member[i].label.name);
    127   1.1  augustss 			fprintf(out, "}");
    128   1.1  augustss 		}
    129   1.1  augustss 		break;
    130   1.1  augustss 	case AUDIO_MIXER_VALUE:
    131   1.1  augustss 		if (m->un.value.num_channels == 1)
    132   1.1  augustss 			fprintf(out, "%d", m->un.value.level[0]);
    133   1.1  augustss 		else
    134   1.1  augustss 			fprintf(out, "%d,%d", m->un.value.level[0],
    135   1.1  augustss 			       m->un.value.level[1]);
    136   1.9  augustss 		if (prvalset)
    137   1.9  augustss 			fprintf(out, " %s", p->infp->un.v.units.name);
    138   1.1  augustss 		break;
    139   1.1  augustss 	default:
    140   1.5  augustss 		printf("\n");
    141   1.1  augustss 		errx(1, "Invalid format.");
    142   1.1  augustss 	}
    143   1.1  augustss }
    144   1.1  augustss 
    145   1.4  augustss int
    146   1.6  augustss rdfield(p, q)
    147   1.6  augustss 	struct field *p;
    148   1.6  augustss         char *q;
    149   1.1  augustss {
    150   1.1  augustss 	mixer_ctrl_t *m;
    151   1.4  augustss 	int v, v0, v1, mask;
    152   1.1  augustss 	int i;
    153   1.1  augustss 	char *s;
    154   1.1  augustss 
    155   1.1  augustss 	m = p->valp;
    156   1.1  augustss 	switch(m->type) {
    157   1.1  augustss 	case AUDIO_MIXER_ENUM:
    158   1.1  augustss 		for(i = 0; i < p->infp->un.e.num_mem; i++)
    159   1.1  augustss 			if (strcmp(p->infp->un.e.member[i].label.name, q) == 0)
    160   1.1  augustss 				break;
    161   1.1  augustss 		if (i < p->infp->un.e.num_mem)
    162   1.3  augustss 			m->un.ord = p->infp->un.e.member[i].ord;
    163   1.4  augustss 		else {
    164   1.1  augustss 			warnx("Bad enum value %s", q);
    165   1.4  augustss 			return 0;
    166   1.4  augustss 		}
    167   1.1  augustss 		break;
    168   1.1  augustss 	case AUDIO_MIXER_SET:
    169   1.4  augustss 		mask = 0;
    170   1.1  augustss 		for(v = 0; q && *q; q = s) {
    171   1.1  augustss 			s = strchr(q, ',');
    172   1.1  augustss 			if (s)
    173   1.1  augustss 				*s++ = 0;
    174   1.1  augustss 			for(i = 0; i < p->infp->un.s.num_mem; i++)
    175   1.1  augustss 				if (strcmp(p->infp->un.s.member[i].label.name, q) == 0)
    176   1.1  augustss 					break;
    177   1.3  augustss 			if (i < p->infp->un.s.num_mem) {
    178   1.4  augustss 				mask |= p->infp->un.s.member[i].mask;
    179   1.4  augustss 			} else {
    180   1.2  augustss 				warnx("Bad set value %s", q);
    181   1.4  augustss 				return 0;
    182   1.4  augustss 			}
    183   1.1  augustss 		}
    184   1.4  augustss 		m->un.mask = mask;
    185   1.1  augustss 		break;
    186   1.1  augustss 	case AUDIO_MIXER_VALUE:
    187   1.1  augustss 		if (m->un.value.num_channels == 1) {
    188   1.1  augustss 			if (sscanf(q, "%d", &v) == 1) {
    189   1.1  augustss 				m->un.value.level[0] = v;
    190   1.1  augustss 			} else {
    191   1.1  augustss 				warnx("Bad number %s", q);
    192   1.4  augustss 				return 0;
    193   1.1  augustss 			}
    194   1.1  augustss 		} else {
    195   1.1  augustss 			if (sscanf(q, "%d,%d", &v0, &v1) == 2) {
    196   1.1  augustss 				m->un.value.level[0] = v0;
    197   1.1  augustss 				m->un.value.level[1] = v1;
    198   1.1  augustss 			} else if (sscanf(q, "%d", &v) == 1) {
    199   1.1  augustss 				m->un.value.level[0] = m->un.value.level[1] = v;
    200   1.1  augustss 			} else {
    201   1.1  augustss 				warnx("Bad numbers %s", q);
    202   1.4  augustss 				return 0;
    203   1.1  augustss 			}
    204   1.1  augustss 		}
    205   1.1  augustss 		break;
    206   1.1  augustss 	default:
    207   1.1  augustss 		errx(1, "Invalid format.");
    208   1.1  augustss 	}
    209   1.4  augustss 	p->changed = 1;
    210   1.4  augustss 	return 1;
    211   1.1  augustss }
    212   1.1  augustss 
    213   1.6  augustss int
    214   1.6  augustss main(argc, argv)
    215   1.6  augustss 	int argc;
    216   1.6  augustss         char **argv;
    217   1.1  augustss {
    218   1.6  augustss 	int fd, i, j, ch, pos;
    219   1.1  augustss 	int aflag = 0, wflag = 0, vflag = 0;
    220  1.10  augustss 	char *file;
    221   1.1  augustss 	char *sep = "=";
    222   1.1  augustss 	mixer_devinfo_t dinfo;
    223   1.4  augustss 	mixer_ctrl_t val;
    224   1.1  augustss 	int ndev;
    225  1.10  augustss 
    226  1.11  augustss 	file = getenv("MIXERDEVICE");
    227  1.10  augustss 	if (file == 0)
    228  1.12  augustss 		file = MIXER;
    229   1.1  augustss 
    230   1.1  augustss 	prog = *argv;
    231   1.1  augustss 
    232   1.1  augustss 	while ((ch = getopt(argc, argv, "af:nvw")) != -1) {
    233   1.1  augustss 		switch(ch) {
    234   1.1  augustss 		case 'a':
    235   1.1  augustss 			aflag++;
    236   1.1  augustss 			break;
    237   1.1  augustss 		case 'w':
    238   1.1  augustss 			wflag++;
    239   1.1  augustss 			break;
    240   1.1  augustss 		case 'v':
    241   1.1  augustss 			vflag++;
    242   1.1  augustss 			break;
    243   1.1  augustss 		case 'n':
    244   1.1  augustss 			sep = 0;
    245   1.1  augustss 			break;
    246   1.1  augustss 		case 'f':
    247   1.1  augustss 			file = optarg;
    248   1.1  augustss 			break;
    249   1.1  augustss 		case '?':
    250   1.1  augustss 		default:
    251   1.1  augustss 		usage:
    252   1.1  augustss 		fprintf(out, "%s [-f file] [-v] [-n] name ...\n", prog);
    253   1.1  augustss 		fprintf(out, "%s [-f file] [-v] [-n] -w name=value ...\n", prog);
    254   1.1  augustss 		fprintf(out, "%s [-f file] [-v] [-n] -a\n", prog);
    255   1.1  augustss 		exit(0);
    256   1.1  augustss 		}
    257   1.1  augustss 	}
    258   1.1  augustss 	argc -= optind;
    259   1.1  augustss 	argv += optind;
    260   1.1  augustss 
    261   1.1  augustss 	fd = open(file, O_RDWR);
    262  1.12  augustss #ifdef OLD_MIXER
    263  1.12  augustss         /* Allow the non-unit device to be used. */
    264  1.12  augustss         if (file == MIXER) {
    265  1.12  augustss         	file = OLD_MIXER;
    266  1.12  augustss                 fd = open(file, O_RDWR);
    267  1.12  augustss         }
    268  1.12  augustss #endif
    269   1.1  augustss 	if (fd < 0)
    270   1.1  augustss 		err(1, "%s", file);
    271   1.1  augustss 
    272   1.1  augustss 	for(ndev = 0; ; ndev++) {
    273   1.1  augustss 		dinfo.index = ndev;
    274   1.1  augustss 		if (ioctl(fd, AUDIO_MIXER_DEVINFO, &dinfo) < 0)
    275   1.1  augustss 			break;
    276   1.1  augustss 	}
    277   1.1  augustss 	rfields = calloc(ndev, sizeof *rfields);
    278   1.1  augustss 	fields = calloc(ndev, sizeof *fields);
    279   1.1  augustss 	infos = calloc(ndev, sizeof *infos);
    280   1.1  augustss 	values = calloc(ndev, sizeof *values);
    281   1.1  augustss 
    282   1.1  augustss 	for(i = 0; i < ndev; i++) {
    283   1.1  augustss 		infos[i].index = i;
    284   1.1  augustss 		ioctl(fd, AUDIO_MIXER_DEVINFO, &infos[i]);
    285   1.1  augustss 	}
    286   1.1  augustss 
    287   1.1  augustss 	for(i = 0; i < ndev; i++) {
    288   1.5  augustss 		rfields[i].name = infos[i].label.name;
    289   1.1  augustss 		rfields[i].valp = &values[i];
    290   1.1  augustss 		rfields[i].infp = &infos[i];
    291   1.1  augustss 	}
    292   1.1  augustss 
    293   1.1  augustss 	for(i = 0; i < ndev; i++) {
    294   1.1  augustss 		values[i].dev = i;
    295   1.1  augustss 		values[i].type = infos[i].type;
    296   1.1  augustss 		if (infos[i].type != AUDIO_MIXER_CLASS) {
    297   1.1  augustss 			values[i].un.value.num_channels = 2;
    298   1.1  augustss 			if (ioctl(fd, AUDIO_MIXER_READ, &values[i]) < 0) {
    299   1.1  augustss 				values[i].un.value.num_channels = 1;
    300   1.1  augustss 				if (ioctl(fd, AUDIO_MIXER_READ, &values[i]) < 0)
    301   1.6  augustss 					err(1, "AUDIO_MIXER_READ");
    302   1.1  augustss 			}
    303   1.1  augustss 		}
    304   1.1  augustss 	}
    305   1.1  augustss 
    306   1.1  augustss 	for(j = i = 0; i < ndev; i++) {
    307   1.1  augustss 		if (infos[i].type != AUDIO_MIXER_CLASS &&
    308   1.1  augustss 		    infos[i].type != -1) {
    309   1.1  augustss 			fields[j++] = rfields[i];
    310   1.1  augustss 			for(pos = infos[i].next; pos != AUDIO_MIXER_LAST;
    311   1.1  augustss 			    pos = infos[pos].next) {
    312   1.1  augustss 				fields[j] = rfields[pos];
    313   1.1  augustss 				fields[j].name = catstr(rfields[i].name,
    314   1.1  augustss 							infos[pos].label.name);
    315   1.1  augustss 				infos[pos].type = -1;
    316   1.1  augustss 				j++;
    317   1.1  augustss 			}
    318   1.1  augustss 		}
    319   1.5  augustss 	}
    320   1.5  augustss 
    321   1.5  augustss 	for(i = 0; i < j; i++) {
    322   1.8  augustss 		int cls = fields[i].infp->mixer_class;
    323   1.8  augustss 		if (cls >= 0 && cls < ndev)
    324   1.8  augustss 			fields[i].name = catstr(infos[cls].label.name,
    325   1.5  augustss 						fields[i].name);
    326   1.1  augustss 	}
    327   1.1  augustss 
    328   1.1  augustss 	if (argc == 0 && aflag && !wflag) {
    329   1.1  augustss 		for(i = 0; fields[i].name; i++) {
    330   1.1  augustss 			prfield(&fields[i], sep, vflag);
    331   1.1  augustss 			fprintf(out, "\n");
    332   1.1  augustss 		}
    333   1.1  augustss 	} else if (argc > 0 && !aflag) {
    334   1.1  augustss 		struct field *p;
    335   1.1  augustss 		if (wflag) {
    336   1.1  augustss 			while(argc--) {
    337   1.1  augustss 				char *q;
    338   1.1  augustss 
    339   1.1  augustss 				q = strchr(*argv, '=');
    340   1.1  augustss 				if (q) {
    341   1.1  augustss 					*q++ = 0;
    342   1.1  augustss 					p = findfield(*argv);
    343   1.1  augustss 					if (p == 0)
    344   1.1  augustss 						warnx("field %s does not exist", *argv);
    345   1.1  augustss 					else {
    346   1.4  augustss 						val = *p->valp;
    347   1.4  augustss 						if (rdfield(p, q)) {
    348   1.4  augustss 							if (ioctl(fd, AUDIO_MIXER_WRITE, p->valp) < 0)
    349   1.6  augustss 								warn("AUDIO_MIXER_WRITE");
    350   1.4  augustss 							else if (sep) {
    351   1.4  augustss 								*p->valp = val;
    352   1.4  augustss 								prfield(p, ": ", 0);
    353   1.4  augustss 								ioctl(fd, AUDIO_MIXER_READ, p->valp);
    354   1.4  augustss 								printf(" -> ");
    355   1.4  augustss 								prfield(p, 0, 0);
    356   1.4  augustss 								printf("\n");
    357   1.4  augustss 							}
    358   1.4  augustss 						}
    359   1.1  augustss 					}
    360   1.1  augustss 				} else {
    361   1.1  augustss 					warnx("No `=' in %s", *argv);
    362   1.1  augustss 				}
    363   1.1  augustss 				argv++;
    364   1.1  augustss 			}
    365   1.1  augustss 		} else {
    366   1.1  augustss 			while(argc--) {
    367   1.1  augustss 				p = findfield(*argv);
    368   1.1  augustss 				if (p == 0)
    369   1.1  augustss 					warnx("field %s does not exist", *argv);
    370   1.1  augustss 				else
    371   1.1  augustss 					prfield(p, sep, vflag), fprintf(out, "\n");
    372   1.1  augustss 				argv++;
    373   1.1  augustss 			}
    374   1.1  augustss 		}
    375   1.1  augustss 	} else
    376   1.1  augustss 		goto usage;
    377   1.1  augustss 	exit(0);
    378   1.1  augustss }
    379