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