1 /*-
2 * Copyright (c) 2001 Cameron Grant <cg@freebsd.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27 #include <dev/sound/pcm/sound.h>
28 #include <dev/sound/pcm/vchan.h>
29 #include <dev/sound/version.h>
30 #ifdef USING_MUTEX
31 #include <sys/sx.h>
32 #endif
33
34 SND_DECLARE_FILE("$FreeBSD$");
35
36 #define SS_TYPE_MODULE 0
37 #define SS_TYPE_FIRST 1
38 #define SS_TYPE_PCM 1
39 #define SS_TYPE_MIDI 2
40 #define SS_TYPE_SEQUENCER 3
41 #define SS_TYPE_LAST 3
42
43 static d_open_t sndstat_open;
44 static d_close_t sndstat_close;
45 static d_read_t sndstat_read;
46
47 static struct cdevsw sndstat_cdevsw = {
48 .d_version = D_VERSION,
49 .d_open = sndstat_open,
50 .d_close = sndstat_close,
51 .d_read = sndstat_read,
52 .d_name = "sndstat",
53 };
54
55 struct sndstat_entry {
56 SLIST_ENTRY(sndstat_entry) link;
57 device_t dev;
58 char *str;
59 sndstat_handler handler;
60 int type, unit;
61 };
62
63 #ifdef USING_MUTEX
64 static struct mtx sndstat_lock;
65 #endif
66 static struct sbuf sndstat_sbuf;
67 static struct cdev *sndstat_dev = NULL;
68 static int sndstat_bufptr = -1;
69 static int sndstat_maxunit = -1;
70 static int sndstat_files = 0;
71
72 #define SNDSTAT_PID(x) ((pid_t)((intptr_t)((x)->si_drv1)))
73 #define SNDSTAT_PID_SET(x, y) (x)->si_drv1 = (void *)((intptr_t)(y))
74 #define SNDSTAT_FLUSH() do { \
75 if (sndstat_bufptr != -1) { \
76 sbuf_delete(&sndstat_sbuf); \
77 sndstat_bufptr = -1; \
78 } \
79 } while(0)
80
81 static SLIST_HEAD(, sndstat_entry) sndstat_devlist = SLIST_HEAD_INITIALIZER(none);
82
83 int snd_verbose = 1;
84 #ifdef USING_MUTEX
85 TUNABLE_INT("hw.snd.verbose", &snd_verbose);
86 #else
87 TUNABLE_INT_DECL("hw.snd.verbose", 1, snd_verbose);
88 #endif
89
90 #ifdef SND_DEBUG
91 static int
92 sysctl_hw_snd_sndstat_pid(SYSCTL_HANDLER_ARGS)
93 {
94 int err, val;
95
96 if (sndstat_dev == NULL)
97 return (EINVAL);
98
99 mtx_lock(&sndstat_lock);
100 val = (int)SNDSTAT_PID(sndstat_dev);
101 mtx_unlock(&sndstat_lock);
102 err = sysctl_handle_int(oidp, &val, 0, req);
103 if (err == 0 && req->newptr != NULL && val == 0) {
104 mtx_lock(&sndstat_lock);
105 SNDSTAT_FLUSH();
106 SNDSTAT_PID_SET(sndstat_dev, 0);
107 mtx_unlock(&sndstat_lock);
108 }
109 return (err);
110 }
111 SYSCTL_PROC(_hw_snd, OID_AUTO, sndstat_pid, CTLTYPE_INT | CTLFLAG_RW,
112 0, sizeof(int), sysctl_hw_snd_sndstat_pid, "I", "sndstat busy pid");
113 #endif
114
115 static int sndstat_prepare(struct sbuf *s);
116
117 static int
118 sysctl_hw_sndverbose(SYSCTL_HANDLER_ARGS)
119 {
120 int error, verbose;
121
122 verbose = snd_verbose;
123 error = sysctl_handle_int(oidp, &verbose, 0, req);
124 if (error == 0 && req->newptr != NULL) {
125 mtx_lock(&sndstat_lock);
126 if (verbose < 0 || verbose > 4)
127 error = EINVAL;
128 else
129 snd_verbose = verbose;
130 mtx_unlock(&sndstat_lock);
131 }
132 return error;
133 }
134 SYSCTL_PROC(_hw_snd, OID_AUTO, verbose, CTLTYPE_INT | CTLFLAG_RW,
135 0, sizeof(int), sysctl_hw_sndverbose, "I", "verbosity level");
136
137 static int
138 sndstat_open(struct cdev *i_dev, int flags, int mode, struct thread *td)
139 {
140 if (sndstat_dev == NULL || i_dev != sndstat_dev)
141 return EBADF;
142
143 mtx_lock(&sndstat_lock);
144 if (SNDSTAT_PID(i_dev) != 0) {
145 mtx_unlock(&sndstat_lock);
146 return EBUSY;
147 }
148 SNDSTAT_PID_SET(i_dev, td->td_proc->p_pid);
149 mtx_unlock(&sndstat_lock);
150 if (sbuf_new(&sndstat_sbuf, NULL, 4096, SBUF_AUTOEXTEND) == NULL) {
151 mtx_lock(&sndstat_lock);
152 SNDSTAT_PID_SET(i_dev, 0);
153 mtx_unlock(&sndstat_lock);
154 return ENXIO;
155 }
156 sndstat_bufptr = 0;
157 return 0;
158 }
159
160 static int
161 sndstat_close(struct cdev *i_dev, int flags, int mode, struct thread *td)
162 {
163 if (sndstat_dev == NULL || i_dev != sndstat_dev)
164 return EBADF;
165
166 mtx_lock(&sndstat_lock);
167 if (SNDSTAT_PID(i_dev) == 0) {
168 mtx_unlock(&sndstat_lock);
169 return EBADF;
170 }
171
172 SNDSTAT_FLUSH();
173 SNDSTAT_PID_SET(i_dev, 0);
174
175 mtx_unlock(&sndstat_lock);
176
177 return 0;
178 }
179
180 static int
181 sndstat_read(struct cdev *i_dev, struct uio *buf, int flag)
182 {
183 int l, err;
184
185 if (sndstat_dev == NULL || i_dev != sndstat_dev)
186 return EBADF;
187
188 mtx_lock(&sndstat_lock);
189 if (SNDSTAT_PID(i_dev) != buf->uio_td->td_proc->p_pid ||
190 sndstat_bufptr == -1) {
191 mtx_unlock(&sndstat_lock);
192 return EBADF;
193 }
194 mtx_unlock(&sndstat_lock);
195
196 if (sndstat_bufptr == 0) {
197 err = (sndstat_prepare(&sndstat_sbuf) > 0) ? 0 : ENOMEM;
198 if (err) {
199 mtx_lock(&sndstat_lock);
200 SNDSTAT_FLUSH();
201 mtx_unlock(&sndstat_lock);
202 return err;
203 }
204 }
205
206 l = min(buf->uio_resid, sbuf_len(&sndstat_sbuf) - sndstat_bufptr);
207 err = (l > 0)? uiomove(sbuf_data(&sndstat_sbuf) + sndstat_bufptr, l, buf) : 0;
208 sndstat_bufptr += l;
209
210 return err;
211 }
212
213 /************************************************************************/
214
215 static struct sndstat_entry *
216 sndstat_find(int type, int unit)
217 {
218 struct sndstat_entry *ent;
219
220 SLIST_FOREACH(ent, &sndstat_devlist, link) {
221 if (ent->type == type && ent->unit == unit)
222 return ent;
223 }
224
225 return NULL;
226 }
227
228 int
229 sndstat_acquire(struct thread *td)
230 {
231 if (sndstat_dev == NULL)
232 return EBADF;
233
234 mtx_lock(&sndstat_lock);
235 if (SNDSTAT_PID(sndstat_dev) != 0) {
236 mtx_unlock(&sndstat_lock);
237 return EBUSY;
238 }
239 SNDSTAT_PID_SET(sndstat_dev, td->td_proc->p_pid);
240 mtx_unlock(&sndstat_lock);
241 return 0;
242 }
243
244 int
245 sndstat_release(struct thread *td)
246 {
247 if (sndstat_dev == NULL)
248 return EBADF;
249
250 mtx_lock(&sndstat_lock);
251 if (SNDSTAT_PID(sndstat_dev) != td->td_proc->p_pid) {
252 mtx_unlock(&sndstat_lock);
253 return EBADF;
254 }
255 SNDSTAT_PID_SET(sndstat_dev, 0);
256 mtx_unlock(&sndstat_lock);
257 return 0;
258 }
259
260 int
261 sndstat_register(device_t dev, char *str, sndstat_handler handler)
262 {
263 struct sndstat_entry *ent;
264 const char *devtype;
265 int type, unit;
266
267 if (dev) {
268 unit = device_get_unit(dev);
269 devtype = device_get_name(dev);
270 if (!strcmp(devtype, "pcm"))
271 type = SS_TYPE_PCM;
272 else if (!strcmp(devtype, "midi"))
273 type = SS_TYPE_MIDI;
274 else if (!strcmp(devtype, "sequencer"))
275 type = SS_TYPE_SEQUENCER;
276 else
277 return EINVAL;
278 } else {
279 type = SS_TYPE_MODULE;
280 unit = -1;
281 }
282
283 ent = malloc(sizeof *ent, M_DEVBUF, M_WAITOK | M_ZERO);
284 ent->dev = dev;
285 ent->str = str;
286 ent->type = type;
287 ent->unit = unit;
288 ent->handler = handler;
289
290 mtx_lock(&sndstat_lock);
291 SLIST_INSERT_HEAD(&sndstat_devlist, ent, link);
292 if (type == SS_TYPE_MODULE)
293 sndstat_files++;
294 sndstat_maxunit = (unit > sndstat_maxunit)? unit : sndstat_maxunit;
295 mtx_unlock(&sndstat_lock);
296
297 return 0;
298 }
299
300 int
301 sndstat_registerfile(char *str)
302 {
303 return sndstat_register(NULL, str, NULL);
304 }
305
306 int
307 sndstat_unregister(device_t dev)
308 {
309 struct sndstat_entry *ent;
310
311 mtx_lock(&sndstat_lock);
312 SLIST_FOREACH(ent, &sndstat_devlist, link) {
313 if (ent->dev == dev) {
314 SLIST_REMOVE(&sndstat_devlist, ent, sndstat_entry, link);
315 mtx_unlock(&sndstat_lock);
316 free(ent, M_DEVBUF);
317
318 return 0;
319 }
320 }
321 mtx_unlock(&sndstat_lock);
322
323 return ENXIO;
324 }
325
326 int
327 sndstat_unregisterfile(char *str)
328 {
329 struct sndstat_entry *ent;
330
331 mtx_lock(&sndstat_lock);
332 SLIST_FOREACH(ent, &sndstat_devlist, link) {
333 if (ent->dev == NULL && ent->str == str) {
334 SLIST_REMOVE(&sndstat_devlist, ent, sndstat_entry, link);
335 sndstat_files--;
336 mtx_unlock(&sndstat_lock);
337 free(ent, M_DEVBUF);
338
339 return 0;
340 }
341 }
342 mtx_unlock(&sndstat_lock);
343
344 return ENXIO;
345 }
346
347 /************************************************************************/
348
349 static int
350 sndstat_prepare(struct sbuf *s)
351 {
352 struct sndstat_entry *ent;
353 struct snddev_info *d;
354 int i, j;
355
356 sbuf_printf(s, "FreeBSD Audio Driver (newpcm: %ubit %d/%s)\n",
357 (u_int)sizeof(intpcm_t) << 3, SND_DRV_VERSION, MACHINE_ARCH);
358 if (SLIST_EMPTY(&sndstat_devlist)) {
359 sbuf_printf(s, "No devices installed.\n");
360 sbuf_finish(s);
361 return sbuf_len(s);
362 }
363
364 sbuf_printf(s, "Installed devices:\n");
365
366 for (i = 0; i <= sndstat_maxunit; i++) {
367 for (j = SS_TYPE_FIRST; j <= SS_TYPE_LAST; j++) {
368 ent = sndstat_find(j, i);
369 if (!ent)
370 continue;
371 d = device_get_softc(ent->dev);
372 if (!PCM_REGISTERED(d))
373 continue;
374 /* XXX Need Giant magic entry ??? */
375 PCM_ACQUIRE_QUICK(d);
376 sbuf_printf(s, "%s:", device_get_nameunit(ent->dev));
377 sbuf_printf(s, " <%s>", device_get_desc(ent->dev));
378 sbuf_printf(s, " %s [%s]", ent->str,
379 (d->flags & SD_F_MPSAFE) ? "MPSAFE" : "GIANT");
380 if (ent->handler)
381 ent->handler(s, ent->dev, snd_verbose);
382 else
383 sbuf_printf(s, " [no handler]");
384 sbuf_printf(s, "\n");
385 PCM_RELEASE_QUICK(d);
386 }
387 }
388
389 if (snd_verbose >= 3 && sndstat_files > 0) {
390 sbuf_printf(s, "\nFile Versions:\n");
391
392 SLIST_FOREACH(ent, &sndstat_devlist, link) {
393 if (ent->dev == NULL && ent->str != NULL)
394 sbuf_printf(s, "%s\n", ent->str);
395 }
396 }
397
398 sbuf_finish(s);
399 return sbuf_len(s);
400 }
401
402 static int
403 sndstat_init(void)
404 {
405 if (sndstat_dev != NULL)
406 return EINVAL;
407 mtx_init(&sndstat_lock, "sndstat", "sndstat lock", MTX_DEF);
408 sndstat_dev = make_dev(&sndstat_cdevsw, SND_DEV_STATUS,
409 UID_ROOT, GID_WHEEL, 0444, "sndstat");
410 return 0;
411 }
412
413 static int
414 sndstat_uninit(void)
415 {
416 if (sndstat_dev == NULL)
417 return EINVAL;
418
419 mtx_lock(&sndstat_lock);
420 if (SNDSTAT_PID(sndstat_dev) != curthread->td_proc->p_pid) {
421 mtx_unlock(&sndstat_lock);
422 return EBUSY;
423 }
424
425 SNDSTAT_FLUSH();
426
427 mtx_unlock(&sndstat_lock);
428
429 destroy_dev(sndstat_dev);
430 sndstat_dev = NULL;
431
432 mtx_destroy(&sndstat_lock);
433 return 0;
434 }
435
436 static void
437 sndstat_sysinit(void *p)
438 {
439 sndstat_init();
440 }
441
442 static void
443 sndstat_sysuninit(void *p)
444 {
445 int error;
446
447 error = sndstat_uninit();
448 KASSERT(error == 0, ("%s: error = %d", __func__, error));
449 }
450
451 SYSINIT(sndstat_sysinit, SI_SUB_DRIVERS, SI_ORDER_FIRST, sndstat_sysinit, NULL);
452 SYSUNINIT(sndstat_sysuninit, SI_SUB_DRIVERS, SI_ORDER_FIRST, sndstat_sysuninit, NULL);
Cache object: 83a98082b082ef6f252026d7948afcaa
|