?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Import 2.1.81
[davej-history.git] / drivers / sound / soundcard.c
blob11c63ff1bb7a12f080c2557b343b94a63f0e89c7
1 /*
2 * linux/drivers/sound/soundcard.c
3 *
4 * Soundcard driver for Linux
5 */
6 /*
7 * Copyright (C) by Hannu Savolainen 1993-1997
8 *
9 * OSS/Free for Linux is distributed under the GNU GENERAL PUBLIC LICENSE (GPL)
10 * Version 2 (June 1991). See the "COPYING" file distributed with this software
11 * for more info.
12 */
13 /*
14 * Thomas Sailer : ioctl code reworked (vmalloc/vfree removed)
15 * integrated sound_switch.c
16 * Stefan Reinauer : integrated /proc/sound (equals to /dev/sndstat,
17 * which should disappear in the near future)
18 */
19 #include <linux/config.h>
20
21
22 #include "sound_config.h"
23 #include <linux/types.h>
24 #include <linux/errno.h>
25 #include <linux/signal.h>
26 #include <linux/fcntl.h>
27 #include <linux/ctype.h>
28 #ifdef __KERNEL__
29 #include <asm/io.h>
30 #include <asm/segment.h>
31 #include <linux/wait.h>
32 #include <linux/malloc.h>
33 #include <linux/ioport.h>
34 #endif /* __KERNEL__ */
35 #include <linux/delay.h>
36 #include <linux/proc_fs.h>
37
38 #define SOUND_CORE
39
40 #include "soundmodule.h"
41
42 #include <linux/major.h>
43 #ifdef MODULE
44 #define modular 1
45 #else
46 #define modular 0
47 #endif
48
49 static int chrdev_registered = 0;
50 static int sound_major = SOUND_MAJOR;
51
52 static int is_unloading = 0;
53
54 /*
55 * Table for permanently allocated memory (used when unloading the module)
56 */
57 caddr_t sound_mem_blocks[1024];
58 int sound_mem_sizes[1024];
59 int sound_nblocks = 0;
60
61 static int soundcard_configured = 0;
62
63 static struct fileinfo files[SND_NDEVS];
64
65 static char dma_alloc_map[8] =
66 {0};
67
68 #define DMA_MAP_UNAVAIL 0
69 #define DMA_MAP_FREE 1
70 #define DMA_MAP_BUSY 2
71
72
73 static int in_use = 0; /* Total # of open devices */
74 unsigned long seq_time = 0; /* Time for /dev/sequencer */
75
76 /*
77 * Table for configurable mixer volume handling
78 */
79 static mixer_vol_table mixer_vols[MAX_MIXER_DEV];
80 static int num_mixer_volumes = 0;
81
82
83 int *load_mixer_volumes(char *name, int *levels, int present)
84 {
85 int i, n;
86
87 for (i = 0; i < num_mixer_volumes; i++)
88 if (strcmp(name, mixer_vols[i].name) == 0)
89 {
90 if (present)
91 mixer_vols[i].num = i;
92 return mixer_vols[i].levels;
93 }
94 if (num_mixer_volumes >= MAX_MIXER_DEV)
95 {
96 printk("Sound: Too many mixers (%s)\n", name);
97 return levels;
98 }
99 n = num_mixer_volumes++;
100
101 strcpy(mixer_vols[n].name, name);
102
103 if (present)
104 mixer_vols[n].num = n;
105 else
106 mixer_vols[n].num = -1;
107
108 for (i = 0; i < 32; i++)
109 mixer_vols[n].levels[i] = levels[i];
110 return mixer_vols[n].levels;
111 }
112
113 static int set_mixer_levels(caddr_t arg)
114 {
115 /* mixer_vol_table is 174 bytes, so IMHO no reason to not allocate it on the stack */
116 mixer_vol_table buf;
117
118 if (__copy_from_user(&buf, arg, sizeof(buf)))
119 return -EFAULT;
120 load_mixer_volumes(buf.name, buf.levels, 0);
121 return __copy_to_user(arg, &buf, sizeof(buf));
122 }
123
124 static int get_mixer_levels(caddr_t arg)
125 {
126 int n;
127
128 if (__get_user(n, (int *)(&(((mixer_vol_table *)arg)->num))))
129 return -EFAULT;
130 if (n < 0 || n >= num_mixer_volumes)
131 return -EINVAL;
132 return __copy_to_user(arg, &mixer_vols[n], sizeof(mixer_vol_table));
133 }
134
135 static int sound_proc_get_info(char *buffer, char **start, off_t offset, int length, int inout)
136 {
137 int len, i, drv;
138 off_t pos = 0;
139 off_t begin = 0;
140
141 #ifdef MODULE
142 #define MODULEPROCSTRING "Driver loaded as a module"
143 #else
144 #define MODULEPROCSTRING "Driver compiled into kernel"
145 #endif
146
147 len = sprintf(buffer, "OSS/Free:" SOUND_VERSION_STRING "\n"
148 "Load type: " MODULEPROCSTRING "\n"
149 "Kernel: %s %s %s %s %s\n"
150 "Config options: %x\n\nInstalled drivers: \n",
151 system_utsname.sysname, system_utsname.nodename, system_utsname.release,
152 system_utsname.version, system_utsname.machine, SELECTED_SOUND_OPTIONS);
153
154 for (i = 0; (i < num_sound_drivers) && (pos <= offset + length); i++) {
155 if (!sound_drivers[i].card_type)
156 continue;
157 len += sprintf(buffer + len, "Type %d: %s\n",
158 sound_drivers[i].card_type, sound_drivers[i].name);
159 pos = begin + len;
160 if (pos < offset) {
161 len = 0;
162 begin = pos;
163 }
164 }
165 len += sprintf(buffer + len, "\nCard config: \n");
166
167 for (i = 0; (i < num_sound_cards) && (pos <= offset + length); i++) {
168 if (!snd_installed_cards[i].card_type)
169 continue;
170 if (!snd_installed_cards[i].enabled)
171 len += sprintf(buffer + len, "(");
172 if ((drv = snd_find_driver(snd_installed_cards[i].card_type)) != -1)
173 len += sprintf(buffer + len, "%s", sound_drivers[drv].name);
174 if (snd_installed_cards[i].config.io_base)
175 len += sprintf(buffer + len, " at 0x%x", snd_installed_cards[i].config.io_base);
176 if (snd_installed_cards[i].config.irq != 0)
177 len += sprintf(buffer + len, " irq %d", abs(snd_installed_cards[i].config.irq));
178 if (snd_installed_cards[i].config.dma != -1) {
179 len += sprintf(buffer + len, " drq %d", snd_installed_cards[i].config.dma);
180 if (snd_installed_cards[i].config.dma2 != -1)
181 len += sprintf(buffer + len, ",%d", snd_installed_cards[i].config.dma2);
182 }
183 if (!snd_installed_cards[i].enabled)
184 len += sprintf(buffer + len, ")");
185 len += sprintf(buffer + len, "\n");
186 pos = begin + len;
187 if (pos < offset) {
188 len = 0;
189 begin = pos;
190 }
191 }
192 if (!sound_started)
193 len += sprintf(buffer + len, "\n\n***** Sound driver not started *****\n\n");
194 #ifndef CONFIG_AUDIO
195 len += sprintf(buffer + len, "\nAudio devices: NOT ENABLED IN CONFIG\n");
196 #else
197 len += sprintf(buffer + len, "\nAudio devices:\n");
198 for (i = 0; (i < num_audiodevs) && (pos <= offset + length); i++) {
199 if (audio_devs[i] == NULL)
200 continue;
201 len += sprintf(buffer + len, "%d: %s%s\n", i, audio_devs[i]->name,
202 audio_devs[i]->flags & DMA_DUPLEX ? " (DUPLEX)" : "");
203 pos = begin + len;
204 if (pos < offset) {
205 len = 0;
206 begin = pos;
207 }
208 }
209 #endif
210
211 #ifndef CONFIG_SEQUENCER
212 len += sprintf(buffer + len, "\nSynth devices: NOT ENABLED IN CONFIG\n");
213 #else
214 len += sprintf(buffer + len, "\nSynth devices:\n");
215 for (i = 0; (i < num_synths) && (pos <= offset + length); i++) {
216 if (synth_devs[i] == NULL)
217 continue;
218 len += sprintf(buffer + len, "%d: %s\n", i, synth_devs[i]->info->name);
219 pos = begin + len;
220 if (pos < offset) {
221 len = 0;
222 begin = pos;
223 }
224 }
225 #endif
226
227 #ifndef CONFIG_MIDI
228 len += sprintf(buffer + len, "\nMidi devices: NOT ENABLED IN CONFIG\n");
229 #else
230 len += sprintf(buffer + len, "\nMidi devices:\n");
231 for (i = 0; (i < num_midis) && (pos <= offset + length); i++) {
232 if (midi_devs[i] == NULL)
233 continue;
234 len += sprintf(buffer + len, "%d: %s\n", i, midi_devs[i]->info.name);
235 pos = begin + len;
236 if (pos < offset) {
237 len = 0;
238 begin = pos;
239 }
240 }
241 #endif
242
243 #ifdef CONFIG_SEQUENCER
244 len += sprintf(buffer + len, "\nTimers:\n");
245
246 for (i = 0; (i < num_sound_timers) && (pos <= offset + length); i++) {
247 if (sound_timer_devs[i] == NULL)
248 continue;
249 len += sprintf(buffer + len, "%d: %s\n", i, sound_timer_devs[i]->info.name);
250 pos = begin + len;
251 if (pos < offset) {
252 len = 0;
253 begin = pos;
254 }
255 }
256 #endif
257
258 len += sprintf(buffer + len, "\nMixers:\n");
259 for (i = 0; (i < num_mixers) && (pos <= offset + length); i++) {
260 if (mixer_devs[i] == NULL)
261 continue;
262 len += sprintf(buffer + len, "%d: %s\n", i, mixer_devs[i]->name);
263 pos = begin + len;
264 if (pos < offset) {
265 len = 0;
266 begin = pos;
267 }
268 }
269 *start = buffer + (offset - begin);
270 len -= (offset - begin);
271 if (len > length)
272 len = length;
273 return len;
274 }
275
276 static struct proc_dir_entry proc_root_sound = {
277 PROC_SOUND, 5, "sound",
278 S_IFREG | S_IRUGO, 1, 0, 0,
279 0, NULL, sound_proc_get_info
280 };
281
282 #ifndef MIN
283 #define MIN(a,b) (((a) < (b)) ? (a) : (b))
284 #endif
285
286 /* 4K page size but our output routines use some slack for overruns */
287 #define PROC_BLOCK_SIZE (3*1024)
288
289 /*
290 * basically copied from fs/proc/generic.c:proc_file_read
291 * should be removed sometime in the future together with /dev/sndstat
292 * (a symlink /dev/sndstat -> /proc/sound will do as well)
293 */
294 static ssize_t sndstat_file_read(struct file * file, char * buf, size_t nbytes, loff_t *ppos)
295 {
296 char *page;
297 ssize_t retval=0;
298 int eof=0;
299 ssize_t n, count;
300 char *start;
301
302 if (!(page = (char*) __get_free_page(GFP_KERNEL)))
303 return -ENOMEM;
304
305 while ((nbytes > 0) && !eof)
306 {
307 count = MIN(PROC_BLOCK_SIZE, nbytes);
308
309 start = NULL;
310 n = sound_proc_get_info(page, &start, *ppos, count, 0);
311 if (n < count)
312 eof = 1;
313
314 if (!start) {
315 /*
316 * For proc files that are less than 4k
317 */
318 start = page + *ppos;
319 n -= *ppos;
320 if (n <= 0)
321 break;
322 if (n > count)
323 n = count;
324 }
325 if (n == 0)
326 break; /* End of file */
327 if (n < 0) {
328 if (retval == 0)
329 retval = n;
330 break;
331 }
332
333 n -= copy_to_user(buf, start, n); /* BUG ??? */
334 if (n == 0) {
335 if (retval == 0)
336 retval = -EFAULT;
337 break;
338 }
339
340 *ppos += n; /* Move down the file */
341 nbytes -= n;
342 buf += n;
343 retval += n;
344 }
345 free_page((unsigned long) page);
346 return retval;
347 }
348
349
350 static ssize_t sound_read(struct file *file, char *buf, size_t count, loff_t *ppos)
351 {
352 int dev = MINOR(file->f_dentry->d_inode->i_rdev);
353
354 files[dev].flags = file->f_flags;
355 DEB(printk("sound_read(dev=%d, count=%d)\n", dev, count));
356 switch (dev & 0x0f) {
357 case SND_DEV_STATUS:
358 return sndstat_file_read(file, buf, count, ppos);
359
360 #ifdef CONFIG_AUDIO
361 case SND_DEV_DSP:
362 case SND_DEV_DSP16:
363 case SND_DEV_AUDIO:
364 return audio_read(dev, &files[dev], buf, count);
365 #endif
366
367 #ifdef CONFIG_SEQUENCER
368 case SND_DEV_SEQ:
369 case SND_DEV_SEQ2:
370 return sequencer_read(dev, &files[dev], buf, count);
371 #endif
372
373 #ifdef CONFIG_MIDI
374 case SND_DEV_MIDIN:
375 return MIDIbuf_read(dev, &files[dev], buf, count);
376 #endif
377
378 default:;
379 }
380 return -EINVAL;
381 }
382
383 static ssize_t sound_write(struct file *file, const char *buf, size_t count, loff_t *ppos)
384 {
385 int dev = MINOR(file->f_dentry->d_inode->i_rdev);
386
387 files[dev].flags = file->f_flags;
388 DEB(printk("sound_write(dev=%d, count=%d)\n", dev, count));
389 switch (dev & 0x0f) {
390 #ifdef CONFIG_SEQUENCER
391 case SND_DEV_SEQ:
392 case SND_DEV_SEQ2:
393 return sequencer_write(dev, &files[dev], buf, count);
394 #endif
395
396 #ifdef CONFIG_AUDIO
397 case SND_DEV_DSP:
398 case SND_DEV_DSP16:
399 case SND_DEV_AUDIO:
400 return audio_write(dev, &files[dev], buf, count);
401 #endif
402
403 #ifdef CONFIG_MIDI
404 case SND_DEV_MIDIN:
405 return MIDIbuf_write(dev, &files[dev], buf, count);
406 #endif
407 }
408 return -EINVAL;
409 }
410
411 static long long sound_lseek(struct file *file, long long offset, int orig)
412 {
413 return -ESPIPE;
414 }
415
416 static int sound_open(struct inode *inode, struct file *file)
417 {
418 int dev, retval;
419 struct fileinfo tmp_file;
420
421 if (is_unloading) {
422 /* printk(KERN_ERR "Sound: Driver partially removed. Can't open device\n");*/
423 return -EBUSY;
424 }
425 dev = MINOR(inode->i_rdev);
426 if (!soundcard_configured && dev != SND_DEV_CTL && dev != SND_DEV_STATUS) {
427 /* printk("SoundCard Error: The soundcard system has not been configured\n");*/
428 return -ENXIO;
429 }
430 tmp_file.mode = 0;
431 tmp_file.flags = file->f_flags;
432
433 if ((tmp_file.flags & O_ACCMODE) == O_RDWR)
434 tmp_file.mode = OPEN_READWRITE;
435 if ((tmp_file.flags & O_ACCMODE) == O_RDONLY)
436 tmp_file.mode = OPEN_READ;
437 if ((tmp_file.flags & O_ACCMODE) == O_WRONLY)
438 tmp_file.mode = OPEN_WRITE;
439 DEB(printk("sound_open(dev=%d)\n", dev));
440 if ((dev >= SND_NDEVS) || (dev < 0)) {
441 printk(KERN_ERR "Invalid minor device %d\n", dev);
442 return -ENXIO;
443 }
444 switch (dev & 0x0f) {
445 case SND_DEV_STATUS:
446 break;
447
448 case SND_DEV_CTL:
449 if ((dev & 0xf0) && ((dev & 0xf0) >> 4) >= num_mixers)
450 return -ENXIO;
451 break;
452
453 #ifdef CONFIG_SEQUENCER
454 case SND_DEV_SEQ:
455 case SND_DEV_SEQ2:
456 if ((retval = sequencer_open(dev, &tmp_file)) < 0)
457 return retval;
458 break;
459 #endif
460
461 #ifdef CONFIG_MIDI
462 case SND_DEV_MIDIN:
463 if ((retval = MIDIbuf_open(dev, &tmp_file)) < 0)
464 return retval;
465 break;
466 #endif
467
468 #ifdef CONFIG_AUDIO
469 case SND_DEV_DSP:
470 case SND_DEV_DSP16:
471 case SND_DEV_AUDIO:
472 if ((retval = audio_open(dev, &tmp_file)) < 0)
473 return retval;
474 break;
475 #endif
476
477 default:
478 printk(KERN_ERR "Invalid minor device %d\n", dev);
479 return -ENXIO;
480 }
481 in_use++;
482 #ifdef MODULE
483 SOUND_INC_USE_COUNT;
484 #endif
485 memcpy(&files[dev], &tmp_file, sizeof(tmp_file));
486 return 0;
487 }
488
489 static int sound_release(struct inode *inode, struct file *file)
490 {
491 int dev = MINOR(inode->i_rdev);
492
493 files[dev].flags = file->f_flags;
494 DEB(printk("sound_release(dev=%d)\n", dev));
495 switch (dev & 0x0f) {
496 case SND_DEV_STATUS:
497 case SND_DEV_CTL:
498 break;
499
500 #ifdef CONFIG_SEQUENCER
501 case SND_DEV_SEQ:
502 case SND_DEV_SEQ2:
503 sequencer_release(dev, &files[dev]);
504 break;
505 #endif
506
507 #ifdef CONFIG_MIDI
508 case SND_DEV_MIDIN:
509 MIDIbuf_release(dev, &files[dev]);
510 break;
511 #endif
512
513 #ifdef CONFIG_AUDIO
514 case SND_DEV_DSP:
515 case SND_DEV_DSP16:
516 case SND_DEV_AUDIO:
517 audio_release(dev, &files[dev]);
518 break;
519 #endif
520
521 default:
522 printk(KERN_ERR "Sound error: Releasing unknown device 0x%02x\n", dev);
523 }
524 in_use--;
525 #ifdef MODULE
526 SOUND_DEC_USE_COUNT;
527 #endif
528 return 0;
529 }
530
531 static int get_mixer_info(int dev, caddr_t arg)
532 {
533 mixer_info info;
534 int i;
535
536 if (dev < 0 || dev >= num_mixers)
537 return -ENXIO;
538 strcpy(info.id, mixer_devs[dev]->id);
539 for (i = 0; i < 32 && mixer_devs[dev]->name; i++)
540 info.name[i] = mixer_devs[dev]->name[i];
541 info.name[i] = 0;
542 info.modify_counter = mixer_devs[dev]->modify_counter;
543 if (__copy_to_user(arg, &info, sizeof(info)))
544 return -EFAULT;
545 return 0;
546 }
547
548 static int get_old_mixer_info(int dev, caddr_t arg)
549 {
550 _old_mixer_info info;
551 int i;
552
553 if (dev < 0 || dev >= num_mixers)
554 return -ENXIO;
555 strcpy(info.id, mixer_devs[dev]->id);
556 for (i = 0; i < 32 && mixer_devs[dev]->name; i++)
557 info.name[i] = mixer_devs[dev]->name[i];
558 info.name[i] = 0;
559 if (__copy_to_user(arg, &info, sizeof(info)))
560 return -EFAULT;
561 return 0;
562 }
563
564 static int sound_mixer_ioctl(int mixdev, unsigned int cmd, caddr_t arg)
565 {
566 if (cmd == SOUND_MIXER_INFO)
567 return get_mixer_info(mixdev, arg);
568 if (cmd == SOUND_OLD_MIXER_INFO)
569 return get_old_mixer_info(mixdev, arg);
570 if (_SIOC_DIR(cmd) & _SIOC_WRITE)
571 mixer_devs[mixdev]->modify_counter++;
572 if (!mixer_devs[mixdev]->ioctl)
573 return -EINVAL;
574 return mixer_devs[mixdev]->ioctl(mixdev, cmd, arg);
575 }
576
577 static int sound_ioctl(struct inode *inode, struct file *file,
578 unsigned int cmd, unsigned long arg)
579 {
580 int err, len = 0, dtype, mixdev;
581 int dev = MINOR(inode->i_rdev);
582
583 files[dev].flags = file->f_flags;
584 if (_SIOC_DIR(cmd) != _SIOC_NONE && _SIOC_DIR(cmd) != 0) {
585 /*
586 * Have to validate the address given by the process.
587 */
588 len = _SIOC_SIZE(cmd);
589 if (len < 1 || len > 65536 || arg == 0)
590 return -EFAULT;
591 if (_SIOC_DIR(cmd) & _SIOC_WRITE)
592 if ((err = verify_area(VERIFY_READ, (void *)arg, len)) < 0)
593 return err;
594 if (_SIOC_DIR(cmd) & _SIOC_READ)
595 if ((err = verify_area(VERIFY_WRITE, (void *)arg, len)) < 0)
596 return err;
597 }
598 DEB(printk("sound_ioctl(dev=%d, cmd=0x%x, arg=0x%x)\n", dev, cmd, arg));
599 if (cmd == OSS_GETVERSION)
600 return __put_user(SOUND_VERSION, (int *)arg);
601
602 if (((cmd >> 8) & 0xff) == 'M' && num_mixers > 0) /* Mixer ioctl */
603 if ((dev & 0x0f) != SND_DEV_CTL) {
604 dtype = dev & 0x0f;
605 switch (dtype) {
606 #ifdef CONFIG_AUDIO
607 case SND_DEV_DSP:
608 case SND_DEV_DSP16:
609 case SND_DEV_AUDIO:
610 mixdev = audio_devs[dev >> 4]->mixer_dev;
611 if (mixdev < 0 || mixdev >= num_mixers)
612 return -ENXIO;
613 return sound_mixer_ioctl(mixdev, cmd, (caddr_t)arg);
614 #endif
615
616 default:
617 return sound_mixer_ioctl(dev, cmd, (caddr_t)arg);
618 }
619 }
620 switch (dev & 0x0f) {
621 case SND_DEV_CTL:
622 if (cmd == SOUND_MIXER_GETLEVELS)
623 return get_mixer_levels((caddr_t)arg);
624 if (cmd == SOUND_MIXER_SETLEVELS)
625 return set_mixer_levels((caddr_t)arg);
626 if (!num_mixers)
627 return -ENXIO;
628 dev = dev >> 4;
629 if (dev >= num_mixers)
630 return -ENXIO;
631 return sound_mixer_ioctl(dev, cmd, (caddr_t)arg);
632 break;
633
634 #ifdef CONFIG_SEQUENCER
635 case SND_DEV_SEQ:
636 case SND_DEV_SEQ2:
637 return sequencer_ioctl(dev, &files[dev], cmd, (caddr_t)arg);
638 #endif
639
640 #ifdef CONFIG_AUDIO
641 case SND_DEV_DSP:
642 case SND_DEV_DSP16:
643 case SND_DEV_AUDIO:
644 return audio_ioctl(dev, &files[dev], cmd, (caddr_t)arg);
645 break;
646 #endif
647
648 #ifdef CONFIG_MIDI
649 case SND_DEV_MIDIN:
650 return MIDIbuf_ioctl(dev, &files[dev], cmd, (caddr_t)arg);
651 break;
652 #endif
653
654 }
655 return -EINVAL;
656 }
657
658 static int sound_select(struct inode *inode, struct file *file, int sel_type, poll_table * wait)
659 {
660 int dev = MINOR(inode->i_rdev);
661
662 files[dev].flags = file->f_flags;
663 DEB(printk("sound_select(dev=%d, type=0x%x)\n", dev, sel_type));
664 switch (dev & 0x0f) {
665 #if defined(CONFIG_SEQUENCER) || defined(MODULE)
666 case SND_DEV_SEQ:
667 case SND_DEV_SEQ2:
668 return sequencer_select(dev, &files[dev], sel_type, wait);
669 #endif
670
671 #if defined(CONFIG_MIDI)
672 case SND_DEV_MIDIN:
673 return MIDIbuf_select(dev, &files[dev], sel_type, wait);
674 #endif
675
676 #if defined(CONFIG_AUDIO) || defined(MODULE)
677 case SND_DEV_DSP:
678 case SND_DEV_DSP16:
679 case SND_DEV_AUDIO:
680 return DMAbuf_select(dev >> 4, &files[dev], sel_type, wait);
681 #endif
682 }
683 return 0;
684 }
685
686 static unsigned int sound_poll(struct file *file, poll_table * wait)
687 {
688 struct inode *inode;
689 int ret = 0;
690
691 inode = file->f_dentry->d_inode;
692 if (sound_select(inode, file, SEL_IN, wait))
693 ret |= POLLIN;
694 if (sound_select(inode, file, SEL_OUT, wait))
695 ret |= POLLOUT;
696 return ret;
697 }
698
699 static int sound_mmap(struct file *file, struct vm_area_struct *vma)
700 {
701 int dev_class;
702 unsigned long size;
703 struct dma_buffparms *dmap = NULL;
704 int dev = MINOR(file->f_dentry->d_inode->i_rdev);
705
706 files[dev].flags = file->f_flags;
707
708 dev_class = dev & 0x0f;
709 dev >>= 4;
710
711 if (dev_class != SND_DEV_DSP && dev_class != SND_DEV_DSP16 && dev_class != SND_DEV_AUDIO)
712 {
713 /* printk("Sound: mmap() not supported for other than audio devices\n");*/
714 return -EINVAL;
715 }
716 if (vma->vm_flags & VM_WRITE) /* Map write and read/write to the output buf */
717 dmap = audio_devs[dev]->dmap_out;
718 else if (vma->vm_flags & VM_READ)
719 dmap = audio_devs[dev]->dmap_in;
720 else
721 {
722 /* printk("Sound: Undefined mmap() access\n");*/
723 return -EINVAL;
724 }
725
726 if (dmap == NULL)
727 {
728 /* printk("Sound: mmap() error. dmap == NULL\n");*/
729 return -EIO;
730 }
731 if (dmap->raw_buf == NULL)
732 {
733 /* printk("Sound: mmap() called when raw_buf == NULL\n");*/
734 return -EIO;
735 }
736 if (dmap->mapping_flags)
737 {
738 /* printk("Sound: mmap() called twice for the same DMA buffer\n");*/
739 return -EIO;
740 }
741 if (vma->vm_offset != 0)
742 {
743 /* printk("Sound: mmap() offset must be 0.\n");*/
744 return -EINVAL;
745 }
746 size = vma->vm_end - vma->vm_start;
747
748 if (size != dmap->bytes_in_use)
749 {
750 printk(KERN_WARNING "Sound: mmap() size = %ld. Should be %d\n", size, dmap->bytes_in_use);
751 }
752 if (remap_page_range(vma->vm_start, virt_to_phys(dmap->raw_buf),
753 vma->vm_end - vma->vm_start,
754 vma->vm_page_prot))
755 return -EAGAIN;
756
757 vma->vm_dentry = dget(file->f_dentry);
758
759 dmap->mapping_flags |= DMA_MAP_MAPPED;
760
761 memset(dmap->raw_buf,
762 dmap->neutral_byte,
763 dmap->bytes_in_use);
764 return 0;
765 }
766
767 static struct file_operations sound_fops =
768 {
769 sound_lseek,
770 sound_read,
771 sound_write,
772 NULL, /* sound_readdir */
773 sound_poll,
774 sound_ioctl,
775 sound_mmap,
776 sound_open,
777 sound_release
778 };
779
780 #ifdef MODULE
781 static void
782 #else
783 void
784 #endif
785 soundcard_init(void)
786 {
787 #ifndef MODULE
788 register_chrdev(sound_major, "sound", &sound_fops);
789 chrdev_registered = 1;
790 #endif
791
792 soundcard_configured = 1;
793
794 sndtable_init(); /* Initialize call tables and detect cards */
795
796
797 #ifdef FIXME
798 if (sndtable_get_cardcount() == 0)
799 return; /* No cards detected */
800 #endif
801
802 #if defined(CONFIG_AUDIO)
803 if (num_audiodevs || modular) /* Audio devices present */
804 {
805 audio_init_devices();
806 }
807 #endif
808
809
810 }
811
812 static unsigned int irqs = 0;
813
814 #ifdef MODULE
815 static void
816 free_all_irqs(void)
817 {
818 int i;
819
820 for (i = 0; i < 31; i++)
821 {
822 if (irqs & (1ul << i))
823 {
824 printk(KERN_WARNING "Sound warning: IRQ%d was left allocated - fixed.\n", i);
825 snd_release_irq(i);
826 }
827 }
828 irqs = 0;
829 }
830
831 char kernel_version[] = UTS_RELEASE;
832
833 #endif
834
835 static int debugmem = 0; /* switched off by default */
836
837 static int sound[20] =
838 {0};
839
840 int init_module(void)
841 {
842 int err;
843 int ints[21];
844 int i;
845
846 /*
847 * "sound=" command line handling by Harald Milz.
848 */
849 i = 0;
850 while (i < 20 && sound[i])
851 ints[i + 1] = sound[i++];
852 ints[0] = i;
853
854 if (i)
855 sound_setup("sound=", ints);
856
857 err = register_chrdev(sound_major, "sound", &sound_fops);
858 if (err)
859 {
860 printk(KERN_ERR "sound: driver already loaded/included in kernel\n");
861 return err;
862 }
863 chrdev_registered = 1;
864 soundcard_init();
865
866 if (sound_nblocks >= 1024)
867 printk(KERN_ERR "Sound warning: Deallocation table was too small.\n");
868
869 if (proc_register(&proc_root, &proc_root_sound))
870 printk(KERN_ERR "sound: registering /proc/sound failed\n");
871 return 0;
872 }
873
874 #ifdef MODULE
875
876
877 void cleanup_module(void)
878 {
879 int i;
880
881 if (MOD_IN_USE)
882 {
883 return;
884 }
885 if (proc_unregister(&proc_root, PROC_SOUND))
886 printk(KERN_ERR "sound: unregistering /proc/sound failed\n");
887 if (chrdev_registered)
888 unregister_chrdev(sound_major, "sound");
889
890 #if defined(CONFIG_SEQUENCER) || defined(MODULE)
891 sound_stop_timer();
892 #endif
893
894 #ifdef CONFIG_LOWLEVEL_SOUND
895 {
896 extern void sound_unload_lowlevel_drivers(void);
897
898 sound_unload_lowlevel_drivers();
899 }
900 #endif
901 sound_unload_drivers();
902
903 free_all_irqs(); /* If something was left allocated by accident */
904
905 for (i = 0; i < 8; i++)
906 {
907 if (dma_alloc_map[i] != DMA_MAP_UNAVAIL)
908 {
909 printk(KERN_ERR "Sound: Hmm, DMA%d was left allocated - fixed\n", i);
910 sound_free_dma(i);
911 }
912 }
913 for (i = 0; i < sound_nblocks; i++)
914 {
915 vfree(sound_mem_blocks[i]);
916 }
917
918 }
919 #endif
920
921 void tenmicrosec(int *osp)
922 {
923 udelay(10);
924 }
925
926 int snd_set_irq_handler(int interrupt_level, void (*iproc) (int, void *, struct pt_regs *), char *name, int *osp)
927 {
928 int retcode;
929 unsigned long flags;
930
931 save_flags(flags);
932 cli();
933 retcode = request_irq(interrupt_level, iproc, 0, name, NULL);
934
935 if (retcode < 0)
936 {
937 printk(KERN_ERR "Sound: IRQ%d already in use\n", interrupt_level);
938 }
939 else
940 irqs |= (1ul << interrupt_level);
941
942 restore_flags(flags);
943 return retcode;
944 }
945
946 void snd_release_irq(int vect)
947 {
948 if (!(irqs & (1ul << vect)))
949 return;
950
951 irqs &= ~(1ul << vect);
952 free_irq(vect, NULL);
953 }
954
955 int sound_alloc_dma(int chn, char *deviceID)
956 {
957 int err;
958
959 if ((err = request_dma(chn, deviceID)) != 0)
960 return err;
961
962 dma_alloc_map[chn] = DMA_MAP_FREE;
963
964 return 0;
965 }
966
967 int sound_open_dma(int chn, char *deviceID)
968 {
969 unsigned long flags;
970
971 if (chn < 0 || chn > 7 || chn == 4)
972 {
973 printk(KERN_ERR "sound_open_dma: Invalid DMA channel %d\n", chn);
974 return 1;
975 }
976 save_flags(flags);
977 cli();
978
979 if (dma_alloc_map[chn] != DMA_MAP_FREE)
980 {
981 printk("sound_open_dma: DMA channel %d busy or not allocated (%d)\n", chn, dma_alloc_map[chn]);
982 restore_flags(flags);
983 return 1;
984 }
985 dma_alloc_map[chn] = DMA_MAP_BUSY;
986 restore_flags(flags);
987 return 0;
988 }
989
990 void sound_free_dma(int chn)
991 {
992 if (dma_alloc_map[chn] == DMA_MAP_UNAVAIL)
993 {
994 /* printk( "sound_free_dma: Bad access to DMA channel %d\n", chn); */
995 return;
996 }
997 free_dma(chn);
998 dma_alloc_map[chn] = DMA_MAP_UNAVAIL;
999 }
1000
1001 void sound_close_dma(int chn)
1002 {
1003 unsigned long flags;
1004
1005 save_flags(flags);
1006 cli();
1007
1008 if (dma_alloc_map[chn] != DMA_MAP_BUSY)
1009 {
1010 printk(KERN_ERR "sound_close_dma: Bad access to DMA channel %d\n", chn);
1011 restore_flags(flags);
1012 return;
1013 }
1014 dma_alloc_map[chn] = DMA_MAP_FREE;
1015 restore_flags(flags);
1016 }
1017
1018 #if defined(CONFIG_SEQUENCER) || defined(MODULE)
1019
1020 static void do_sequencer_timer(unsigned long dummy)
1021 {
1022 sequencer_timer(0);
1023 }
1024
1025
1026 static struct timer_list seq_timer =
1027 {NULL, NULL, 0, 0, do_sequencer_timer};
1028
1029 void request_sound_timer(int count)
1030 {
1031 extern unsigned long seq_time;
1032
1033 if (count < 0)
1034 {
1035 seq_timer.expires = (-count) + jiffies;
1036 add_timer(&seq_timer);
1037 return;
1038 }
1039 count += seq_time;
1040
1041 count -= jiffies;
1042
1043 if (count < 1)
1044 count = 1;
1045
1046 seq_timer.expires = (count) + jiffies;
1047 add_timer(&seq_timer);
1048 }
1049
1050 void sound_stop_timer(void)
1051 {
1052 del_timer(&seq_timer);;
1053 }
1054 #endif
1055
1056 #ifdef CONFIG_AUDIO
1057
1058 static int dma_buffsize = DSP_BUFFSIZE;
1059
1060 int
1061 sound_alloc_dmap(int dev, struct dma_buffparms *dmap, int chan)
1062 {
1063 char *start_addr, *end_addr;
1064 int i, dma_pagesize;
1065
1066 dmap->mapping_flags &= ~DMA_MAP_MAPPED;
1067
1068 if (dmap->raw_buf != NULL)
1069 return 0; /* Already done */
1070
1071 if (dma_buffsize < 4096)
1072 dma_buffsize = 4096;
1073
1074 if (chan < 4)
1075 dma_pagesize = 64 * 1024;
1076 else
1077 dma_pagesize = 128 * 1024;
1078
1079 dmap->raw_buf = NULL;
1080
1081 dmap->buffsize = dma_buffsize;
1082
1083 if (dmap->buffsize > dma_pagesize)
1084 dmap->buffsize = dma_pagesize;
1085
1086 start_addr = NULL;
1087
1088 /*
1089 * Now loop until we get a free buffer. Try to get smaller buffer if
1090 * it fails. Don't accept smaller than 8k buffer for performance
1091 * reasons.
1092 */
1093
1094 while (start_addr == NULL && dmap->buffsize > PAGE_SIZE)
1095 {
1096 int sz, size;
1097
1098 for (sz = 0, size = PAGE_SIZE;
1099 size < dmap->buffsize;
1100 sz++, size <<= 1);
1101
1102 dmap->buffsize = PAGE_SIZE * (1 << sz);
1103
1104 if ((start_addr = (char *) __get_free_pages(GFP_ATOMIC|GFP_DMA, sz)) == NULL)
1105 dmap->buffsize /= 2;
1106 }
1107
1108 if (start_addr == NULL)
1109 {
1110 printk(KERN_WARNING "Sound error: Couldn't allocate DMA buffer\n");
1111 return -ENOMEM;
1112 }
1113 else
1114 {
1115 /* make some checks */
1116 end_addr = start_addr + dmap->buffsize - 1;
1117
1118 if (debugmem)
1119 printk(KERN_DEBUG "sound: start 0x%lx, end 0x%lx\n", (long) start_addr, (long) end_addr);
1120
1121 /* now check if it fits into the same dma-pagesize */
1122
1123 if (((long) start_addr & ~(dma_pagesize - 1))
1124 != ((long) end_addr & ~(dma_pagesize - 1))
1125 || end_addr >= (char *) (MAX_DMA_ADDRESS))
1126 {
1127 printk(KERN_ERR "sound: Got invalid address 0x%lx for %db DMA-buffer\n", (long) start_addr, dmap->buffsize);
1128 return -EFAULT;
1129 }
1130 }
1131 dmap->raw_buf = start_addr;
1132 dmap->raw_buf_phys = virt_to_bus(start_addr);
1133
1134 for (i = MAP_NR(start_addr); i <= MAP_NR(end_addr); i++)
1135 {
1136 set_bit(PG_reserved, &mem_map[i].flags);;
1137 }
1138
1139 return 0;
1140 }
1141
1142 void sound_free_dmap(int dev, struct dma_buffparms *dmap, int chan)
1143 {
1144 int sz, size, i;
1145 unsigned long start_addr, end_addr;
1146
1147 if (dmap->raw_buf == NULL)
1148 return;
1149
1150 if (dmap->mapping_flags & DMA_MAP_MAPPED)
1151 return; /* Don't free mmapped buffer. Will use it next time */
1152
1153 for (sz = 0, size = PAGE_SIZE;
1154 size < dmap->buffsize;
1155 sz++, size <<= 1);
1156
1157 start_addr = (unsigned long) dmap->raw_buf;
1158 end_addr = start_addr + dmap->buffsize;
1159
1160 for (i = MAP_NR(start_addr); i <= MAP_NR(end_addr); i++)
1161 {
1162 clear_bit(PG_reserved, &mem_map[i].flags);;
1163 }
1164
1165 free_pages((unsigned long) dmap->raw_buf, sz);
1166 dmap->raw_buf = NULL;
1167 }
1168
1169
1170 /* Intel version !!!!!!!!! */
1171
1172 int sound_start_dma(int dev, struct dma_buffparms *dmap, int chan,
1173 unsigned long physaddr,
1174 int count, int dma_mode, int autoinit)
1175 {
1176 unsigned long flags;
1177
1178 /* printk( "Start DMA%d %d, %d\n", chan, (int)(physaddr-dmap->raw_buf_phys), count); */
1179 if (autoinit)
1180 dma_mode |= DMA_AUTOINIT;
1181 save_flags(flags);
1182 cli();
1183 disable_dma(chan);
1184 clear_dma_ff(chan);
1185 set_dma_mode(chan, dma_mode);
1186 set_dma_addr(chan, physaddr);
1187 set_dma_count(chan, count);
1188 enable_dma(chan);
1189 restore_flags(flags);
1190
1191 return 0;
1192 }
1193
1194 #endif
1195
1196 void conf_printf(char *name, struct address_info *hw_config)
1197 {
1198 if (!trace_init)
1199 return;
1200
1201 printk("<%s> at 0x%03x", name, hw_config->io_base);
1202
1203 if (hw_config->irq)
1204 printk(" irq %d", (hw_config->irq > 0) ? hw_config->irq : -hw_config->irq);
1205
1206 if (hw_config->dma != -1 || hw_config->dma2 != -1)
1207 {
1208 printk(" dma %d", hw_config->dma);
1209 if (hw_config->dma2 != -1)
1210 printk(",%d", hw_config->dma2);
1211 }
1212 printk("\n");
1213 }
1214
1215 void conf_printf2(char *name, int base, int irq, int dma, int dma2)
1216 {
1217 if (!trace_init)
1218 return;
1219
1220 printk("<%s> at 0x%03x", name, base);
1221
1222 if (irq)
1223 printk(" irq %d", (irq > 0) ? irq : -irq);
1224
1225 if (dma != -1 || dma2 != -1)
1226 {
1227 printk(" dma %d", dma);
1228 if (dma2 != -1)
1229 printk(",%d", dma2);
1230 }
1231 printk("\n");
1232 }
1233
1234 /*
1235 * Module and lock management
1236 */
1237
1238 struct notifier_block *sound_locker=(struct notifier_block *)0;
1239 static int lock_depth = 0;
1240
1241 #define SOUND_INC_USE_COUNT do { notifier_call_chain(&sound_locker, 1, 0); lock_depth++; } while(0);
1242 #define SOUND_DEC_USE_COUNT do { notifier_call_chain(&sound_locker, 0, 0); lock_depth--; } while(0);
1243
1244 /*
1245 * When a sound module is registered we need to bring it to the current
1246 * lock level...
1247 */
1248
1249 void sound_notifier_chain_register(struct notifier_block *bl)
1250 {
1251 int ct=0;
1252
1253 notifier_chain_register(&sound_locker, bl);
1254 /*
1255 * Normalise the lock count by calling the entry directly. We
1256 * have to call the module as it owns its own use counter
1257 */
1258 while(ct<lock_depth)
1259 {
1260 bl->notifier_call(bl, 1, 0);
1261 ct++;
1262 }
1263 }
1264
Copy of Dave Jones history.git as used by http://archive.org/details/git-history-of-linux