File: /usr/src/linux/drivers/sound/sonicvibes.c
1 /*****************************************************************************/
2
3 /*
4 * sonicvibes.c -- S3 Sonic Vibes audio driver.
5 *
6 * Copyright (C) 1998-2001 Thomas Sailer (t.sailer@alumni.ethz.ch)
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 *
22 * Special thanks to David C. Niemi
23 *
24 *
25 * Module command line parameters:
26 * none so far
27 *
28 *
29 * Supported devices:
30 * /dev/dsp standard /dev/dsp device, (mostly) OSS compatible
31 * /dev/mixer standard /dev/mixer device, (mostly) OSS compatible
32 * /dev/midi simple MIDI UART interface, no ioctl
33 *
34 * The card has both an FM and a Wavetable synth, but I have to figure
35 * out first how to drive them...
36 *
37 * Revision history
38 * 06.05.1998 0.1 Initial release
39 * 10.05.1998 0.2 Fixed many bugs, esp. ADC rate calculation
40 * First stab at a simple midi interface (no bells&whistles)
41 * 13.05.1998 0.3 Fix stupid cut&paste error: set_adc_rate was called instead of
42 * set_dac_rate in the FMODE_WRITE case in sv_open
43 * Fix hwptr out of bounds (now mpg123 works)
44 * 14.05.1998 0.4 Don't allow excessive interrupt rates
45 * 08.06.1998 0.5 First release using Alan Cox' soundcore instead of miscdevice
46 * 03.08.1998 0.6 Do not include modversions.h
47 * Now mixer behaviour can basically be selected between
48 * "OSS documented" and "OSS actual" behaviour
49 * 31.08.1998 0.7 Fix realplayer problems - dac.count issues
50 * 10.12.1998 0.8 Fix drain_dac trying to wait on not yet initialized DMA
51 * 16.12.1998 0.9 Fix a few f_file & FMODE_ bugs
52 * 06.01.1999 0.10 remove the silly SA_INTERRUPT flag.
53 * hopefully killed the egcs section type conflict
54 * 12.03.1999 0.11 cinfo.blocks should be reset after GETxPTR ioctl.
55 * reported by Johan Maes <joma@telindus.be>
56 * 22.03.1999 0.12 return EAGAIN instead of EBUSY when O_NONBLOCK
57 * read/write cannot be executed
58 * 05.04.1999 0.13 added code to sv_read and sv_write which should detect
59 * lockups of the sound chip and revive it. This is basically
60 * an ugly hack, but at least applications using this driver
61 * won't hang forever. I don't know why these lockups happen,
62 * it might well be the motherboard chipset (an early 486 PCI
63 * board with ALI chipset), since every busmastering 100MB
64 * ethernet card I've tried (Realtek 8139 and Macronix tulip clone)
65 * exhibit similar behaviour (they work for a couple of packets
66 * and then lock up and can be revived by ifconfig down/up).
67 * 07.04.1999 0.14 implemented the following ioctl's: SOUND_PCM_READ_RATE,
68 * SOUND_PCM_READ_CHANNELS, SOUND_PCM_READ_BITS;
69 * Alpha fixes reported by Peter Jones <pjones@redhat.com>
70 * Note: dmaio hack might still be wrong on archs other than i386
71 * 15.06.1999 0.15 Fix bad allocation bug.
72 * Thanks to Deti Fliegl <fliegl@in.tum.de>
73 * 28.06.1999 0.16 Add pci_set_master
74 * 03.08.1999 0.17 adapt to Linus' new __setup/__initcall
75 * added kernel command line options "sonicvibes=reverb" and "sonicvibesdmaio=dmaioaddr"
76 * 12.08.1999 0.18 module_init/__setup fixes
77 * 24.08.1999 0.19 get rid of the dmaio kludge, replace with allocate_resource
78 * 31.08.1999 0.20 add spin_lock_init
79 * use new resource allocation to allocate DDMA IO space
80 * replaced current->state = x with set_current_state(x)
81 * 03.09.1999 0.21 change read semantics for MIDI to match
82 * OSS more closely; remove possible wakeup race
83 * 28.10.1999 0.22 More waitqueue races fixed
84 * 01.12.1999 0.23 New argument to allocate_resource
85 * 07.12.1999 0.24 More allocate_resource semantics change
86 * 08.01.2000 0.25 Prevent some ioctl's from returning bad count values on underrun/overrun;
87 * Tim Janik's BSE (Bedevilled Sound Engine) found this
88 * use Martin Mares' pci_assign_resource
89 * 07.02.2000 0.26 Use pci_alloc_consistent and pci_register_driver
90 * 21.11.2000 0.27 Initialize dma buffers in poll, otherwise poll may return a bogus mask
91 * 12.12.2000 0.28 More dma buffer initializations, patch from
92 * Tjeerd Mulder <tjeerd.mulder@fujitsu-siemens.com>
93 * 31.01.2001 0.29 Register/Unregister gameport
94 * Fix SETTRIGGER non OSS API conformity
95 * 18.05.2001 0.30 PCI probing and error values cleaned up by Marcus
96 * Meissner <mm@caldera.de>
97 *
98 */
99
100 /*****************************************************************************/
101
102 #include <linux/version.h>
103 #include <linux/module.h>
104 #include <linux/string.h>
105 #include <linux/ioport.h>
106 #include <linux/sched.h>
107 #include <linux/delay.h>
108 #include <linux/sound.h>
109 #include <linux/slab.h>
110 #include <linux/soundcard.h>
111 #include <linux/pci.h>
112 #include <asm/io.h>
113 #include <asm/dma.h>
114 #include <linux/init.h>
115 #include <linux/poll.h>
116 #include <linux/spinlock.h>
117 #include <linux/smp_lock.h>
118 #include <linux/wrapper.h>
119 #include <asm/uaccess.h>
120 #include <asm/hardirq.h>
121 #include <linux/gameport.h>
122
123 #include "dm.h"
124
125
126 /* --------------------------------------------------------------------- */
127
128 #undef OSS_DOCUMENTED_MIXER_SEMANTICS
129
130 /* --------------------------------------------------------------------- */
131
132 #ifndef PCI_VENDOR_ID_S3
133 #define PCI_VENDOR_ID_S3 0x5333
134 #endif
135 #ifndef PCI_DEVICE_ID_S3_SONICVIBES
136 #define PCI_DEVICE_ID_S3_SONICVIBES 0xca00
137 #endif
138
139 #define SV_MAGIC ((PCI_VENDOR_ID_S3<<16)|PCI_DEVICE_ID_S3_SONICVIBES)
140
141 #define SV_EXTENT_SB 0x10
142 #define SV_EXTENT_ENH 0x10
143 #define SV_EXTENT_SYNTH 0x4
144 #define SV_EXTENT_MIDI 0x4
145 #define SV_EXTENT_GAME 0x8
146 #define SV_EXTENT_DMA 0x10
147
148 /*
149 * we are not a bridge and thus use a resource for DDMA that is used for bridges but
150 * left empty for normal devices
151 */
152 #define RESOURCE_SB 0
153 #define RESOURCE_ENH 1
154 #define RESOURCE_SYNTH 2
155 #define RESOURCE_MIDI 3
156 #define RESOURCE_GAME 4
157 #define RESOURCE_DDMA 7
158
159 #define SV_MIDI_DATA 0
160 #define SV_MIDI_COMMAND 1
161 #define SV_MIDI_STATUS 1
162
163 #define SV_DMA_ADDR0 0
164 #define SV_DMA_ADDR1 1
165 #define SV_DMA_ADDR2 2
166 #define SV_DMA_ADDR3 3
167 #define SV_DMA_COUNT0 4
168 #define SV_DMA_COUNT1 5
169 #define SV_DMA_COUNT2 6
170 #define SV_DMA_MODE 0xb
171 #define SV_DMA_RESET 0xd
172 #define SV_DMA_MASK 0xf
173
174 /*
175 * DONT reset the DMA controllers unless you understand
176 * the reset semantics. Assuming reset semantics as in
177 * the 8237 does not work.
178 */
179
180 #define DMA_MODE_AUTOINIT 0x10
181 #define DMA_MODE_READ 0x44 /* I/O to memory, no autoinit, increment, single mode */
182 #define DMA_MODE_WRITE 0x48 /* memory to I/O, no autoinit, increment, single mode */
183
184 #define SV_CODEC_CONTROL 0
185 #define SV_CODEC_INTMASK 1
186 #define SV_CODEC_STATUS 2
187 #define SV_CODEC_IADDR 4
188 #define SV_CODEC_IDATA 5
189
190 #define SV_CCTRL_RESET 0x80
191 #define SV_CCTRL_INTADRIVE 0x20
192 #define SV_CCTRL_WAVETABLE 0x08
193 #define SV_CCTRL_REVERB 0x04
194 #define SV_CCTRL_ENHANCED 0x01
195
196 #define SV_CINTMASK_DMAA 0x01
197 #define SV_CINTMASK_DMAC 0x04
198 #define SV_CINTMASK_SPECIAL 0x08
199 #define SV_CINTMASK_UPDOWN 0x40
200 #define SV_CINTMASK_MIDI 0x80
201
202 #define SV_CSTAT_DMAA 0x01
203 #define SV_CSTAT_DMAC 0x04
204 #define SV_CSTAT_SPECIAL 0x08
205 #define SV_CSTAT_UPDOWN 0x40
206 #define SV_CSTAT_MIDI 0x80
207
208 #define SV_CIADDR_TRD 0x80
209 #define SV_CIADDR_MCE 0x40
210
211 /* codec indirect registers */
212 #define SV_CIMIX_ADCINL 0x00
213 #define SV_CIMIX_ADCINR 0x01
214 #define SV_CIMIX_AUX1INL 0x02
215 #define SV_CIMIX_AUX1INR 0x03
216 #define SV_CIMIX_CDINL 0x04
217 #define SV_CIMIX_CDINR 0x05
218 #define SV_CIMIX_LINEINL 0x06
219 #define SV_CIMIX_LINEINR 0x07
220 #define SV_CIMIX_MICIN 0x08
221 #define SV_CIMIX_SYNTHINL 0x0A
222 #define SV_CIMIX_SYNTHINR 0x0B
223 #define SV_CIMIX_AUX2INL 0x0C
224 #define SV_CIMIX_AUX2INR 0x0D
225 #define SV_CIMIX_ANALOGINL 0x0E
226 #define SV_CIMIX_ANALOGINR 0x0F
227 #define SV_CIMIX_PCMINL 0x10
228 #define SV_CIMIX_PCMINR 0x11
229
230 #define SV_CIGAMECONTROL 0x09
231 #define SV_CIDATAFMT 0x12
232 #define SV_CIENABLE 0x13
233 #define SV_CIUPDOWN 0x14
234 #define SV_CIREVISION 0x15
235 #define SV_CIADCOUTPUT 0x16
236 #define SV_CIDMAABASECOUNT1 0x18
237 #define SV_CIDMAABASECOUNT0 0x19
238 #define SV_CIDMACBASECOUNT1 0x1c
239 #define SV_CIDMACBASECOUNT0 0x1d
240 #define SV_CIPCMSR0 0x1e
241 #define SV_CIPCMSR1 0x1f
242 #define SV_CISYNTHSR0 0x20
243 #define SV_CISYNTHSR1 0x21
244 #define SV_CIADCCLKSOURCE 0x22
245 #define SV_CIADCALTSR 0x23
246 #define SV_CIADCPLLM 0x24
247 #define SV_CIADCPLLN 0x25
248 #define SV_CISYNTHPLLM 0x26
249 #define SV_CISYNTHPLLN 0x27
250 #define SV_CIUARTCONTROL 0x2a
251 #define SV_CIDRIVECONTROL 0x2b
252 #define SV_CISRSSPACE 0x2c
253 #define SV_CISRSCENTER 0x2d
254 #define SV_CIWAVETABLESRC 0x2e
255 #define SV_CIANALOGPWRDOWN 0x30
256 #define SV_CIDIGITALPWRDOWN 0x31
257
258
259 #define SV_CIMIX_ADCSRC_CD 0x20
260 #define SV_CIMIX_ADCSRC_DAC 0x40
261 #define SV_CIMIX_ADCSRC_AUX2 0x60
262 #define SV_CIMIX_ADCSRC_LINE 0x80
263 #define SV_CIMIX_ADCSRC_AUX1 0xa0
264 #define SV_CIMIX_ADCSRC_MIC 0xc0
265 #define SV_CIMIX_ADCSRC_MIXOUT 0xe0
266 #define SV_CIMIX_ADCSRC_MASK 0xe0
267
268 #define SV_CFMT_STEREO 0x01
269 #define SV_CFMT_16BIT 0x02
270 #define SV_CFMT_MASK 0x03
271 #define SV_CFMT_ASHIFT 0
272 #define SV_CFMT_CSHIFT 4
273
274 static const unsigned sample_size[] = { 1, 2, 2, 4 };
275 static const unsigned sample_shift[] = { 0, 1, 1, 2 };
276
277 #define SV_CENABLE_PPE 0x4
278 #define SV_CENABLE_RE 0x2
279 #define SV_CENABLE_PE 0x1
280
281
282 /* MIDI buffer sizes */
283
284 #define MIDIINBUF 256
285 #define MIDIOUTBUF 256
286
287 #define FMODE_MIDI_SHIFT 2
288 #define FMODE_MIDI_READ (FMODE_READ << FMODE_MIDI_SHIFT)
289 #define FMODE_MIDI_WRITE (FMODE_WRITE << FMODE_MIDI_SHIFT)
290
291 #define FMODE_DMFM 0x10
292
293 /* --------------------------------------------------------------------- */
294
295 struct sv_state {
296 /* magic */
297 unsigned int magic;
298
299 /* list of sonicvibes devices */
300 struct list_head devs;
301
302 /* the corresponding pci_dev structure */
303 struct pci_dev *dev;
304
305 /* soundcore stuff */
306 int dev_audio;
307 int dev_mixer;
308 int dev_midi;
309 int dev_dmfm;
310
311 /* hardware resources */
312 unsigned long iosb, ioenh, iosynth, iomidi; /* long for SPARC */
313 unsigned int iodmaa, iodmac, irq;
314
315 /* mixer stuff */
316 struct {
317 unsigned int modcnt;
318 #ifndef OSS_DOCUMENTED_MIXER_SEMANTICS
319 unsigned short vol[13];
320 #endif /* OSS_DOCUMENTED_MIXER_SEMANTICS */
321 } mix;
322
323 /* wave stuff */
324 unsigned int rateadc, ratedac;
325 unsigned char fmt, enable;
326
327 spinlock_t lock;
328 struct semaphore open_sem;
329 mode_t open_mode;
330 wait_queue_head_t open_wait;
331
332 struct dmabuf {
333 void *rawbuf;
334 dma_addr_t dmaaddr;
335 unsigned buforder;
336 unsigned numfrag;
337 unsigned fragshift;
338 unsigned hwptr, swptr;
339 unsigned total_bytes;
340 int count;
341 unsigned error; /* over/underrun */
342 wait_queue_head_t wait;
343 /* redundant, but makes calculations easier */
344 unsigned fragsize;
345 unsigned dmasize;
346 unsigned fragsamples;
347 /* OSS stuff */
348 unsigned mapped:1;
349 unsigned ready:1;
350 unsigned endcleared:1;
351 unsigned enabled:1;
352 unsigned ossfragshift;
353 int ossmaxfrags;
354 unsigned subdivision;
355 } dma_dac, dma_adc;
356
357 /* midi stuff */
358 struct {
359 unsigned ird, iwr, icnt;
360 unsigned ord, owr, ocnt;
361 wait_queue_head_t iwait;
362 wait_queue_head_t owait;
363 struct timer_list timer;
364 unsigned char ibuf[MIDIINBUF];
365 unsigned char obuf[MIDIOUTBUF];
366 } midi;
367
368 struct gameport gameport;
369 };
370
371 /* --------------------------------------------------------------------- */
372
373 static LIST_HEAD(devs);
374 static unsigned long wavetable_mem = 0;
375
376 /* --------------------------------------------------------------------- */
377
378 static inline unsigned ld2(unsigned int x)
379 {
380 unsigned r = 0;
381
382 if (x >= 0x10000) {
383 x >>= 16;
384 r += 16;
385 }
386 if (x >= 0x100) {
387 x >>= 8;
388 r += 8;
389 }
390 if (x >= 0x10) {
391 x >>= 4;
392 r += 4;
393 }
394 if (x >= 4) {
395 x >>= 2;
396 r += 2;
397 }
398 if (x >= 2)
399 r++;
400 return r;
401 }
402
403 /*
404 * hweightN: returns the hamming weight (i.e. the number
405 * of bits set) of a N-bit word
406 */
407
408 #ifdef hweight32
409 #undef hweight32
410 #endif
411
412 static inline unsigned int hweight32(unsigned int w)
413 {
414 unsigned int res = (w & 0x55555555) + ((w >> 1) & 0x55555555);
415 res = (res & 0x33333333) + ((res >> 2) & 0x33333333);
416 res = (res & 0x0F0F0F0F) + ((res >> 4) & 0x0F0F0F0F);
417 res = (res & 0x00FF00FF) + ((res >> 8) & 0x00FF00FF);
418 return (res & 0x0000FFFF) + ((res >> 16) & 0x0000FFFF);
419 }
420
421 /* --------------------------------------------------------------------- */
422
423 /*
424 * Why use byte IO? Nobody knows, but S3 does it also in their Windows driver.
425 */
426
427 #undef DMABYTEIO
428
429 static void set_dmaa(struct sv_state *s, unsigned int addr, unsigned int count)
430 {
431 #ifdef DMABYTEIO
432 unsigned io = s->iodmaa, u;
433
434 count--;
435 for (u = 4; u > 0; u--, addr >>= 8, io++)
436 outb(addr & 0xff, io);
437 for (u = 3; u > 0; u--, count >>= 8, io++)
438 outb(count & 0xff, io);
439 #else /* DMABYTEIO */
440 count--;
441 outl(addr, s->iodmaa + SV_DMA_ADDR0);
442 outl(count, s->iodmaa + SV_DMA_COUNT0);
443 #endif /* DMABYTEIO */
444 outb(0x18, s->iodmaa + SV_DMA_MODE);
445 }
446
447 static void set_dmac(struct sv_state *s, unsigned int addr, unsigned int count)
448 {
449 #ifdef DMABYTEIO
450 unsigned io = s->iodmac, u;
451
452 count >>= 1;
453 count--;
454 for (u = 4; u > 0; u--, addr >>= 8, io++)
455 outb(addr & 0xff, io);
456 for (u = 3; u > 0; u--, count >>= 8, io++)
457 outb(count & 0xff, io);
458 #else /* DMABYTEIO */
459 count >>= 1;
460 count--;
461 outl(addr, s->iodmac + SV_DMA_ADDR0);
462 outl(count, s->iodmac + SV_DMA_COUNT0);
463 #endif /* DMABYTEIO */
464 outb(0x14, s->iodmac + SV_DMA_MODE);
465 }
466
467 static inline unsigned get_dmaa(struct sv_state *s)
468 {
469 #ifdef DMABYTEIO
470 unsigned io = s->iodmaa+6, v = 0, u;
471
472 for (u = 3; u > 0; u--, io--) {
473 v <<= 8;
474 v |= inb(io);
475 }
476 return v + 1;
477 #else /* DMABYTEIO */
478 return (inl(s->iodmaa + SV_DMA_COUNT0) & 0xffffff) + 1;
479 #endif /* DMABYTEIO */
480 }
481
482 static inline unsigned get_dmac(struct sv_state *s)
483 {
484 #ifdef DMABYTEIO
485 unsigned io = s->iodmac+6, v = 0, u;
486
487 for (u = 3; u > 0; u--, io--) {
488 v <<= 8;
489 v |= inb(io);
490 }
491 return (v + 1) << 1;
492 #else /* DMABYTEIO */
493 return ((inl(s->iodmac + SV_DMA_COUNT0) & 0xffffff) + 1) << 1;
494 #endif /* DMABYTEIO */
495 }
496
497 static void wrindir(struct sv_state *s, unsigned char idx, unsigned char data)
498 {
499 outb(idx & 0x3f, s->ioenh + SV_CODEC_IADDR);
500 udelay(10);
501 outb(data, s->ioenh + SV_CODEC_IDATA);
502 udelay(10);
503 }
504
505 static unsigned char rdindir(struct sv_state *s, unsigned char idx)
506 {
507 unsigned char v;
508
509 outb(idx & 0x3f, s->ioenh + SV_CODEC_IADDR);
510 udelay(10);
511 v = inb(s->ioenh + SV_CODEC_IDATA);
512 udelay(10);
513 return v;
514 }
515
516 static void set_fmt(struct sv_state *s, unsigned char mask, unsigned char data)
517 {
518 unsigned long flags;
519
520 spin_lock_irqsave(&s->lock, flags);
521 outb(SV_CIDATAFMT | SV_CIADDR_MCE, s->ioenh + SV_CODEC_IADDR);
522 if (mask) {
523 s->fmt = inb(s->ioenh + SV_CODEC_IDATA);
524 udelay(10);
525 }
526 s->fmt = (s->fmt & mask) | data;
527 outb(s->fmt, s->ioenh + SV_CODEC_IDATA);
528 udelay(10);
529 outb(0, s->ioenh + SV_CODEC_IADDR);
530 spin_unlock_irqrestore(&s->lock, flags);
531 udelay(10);
532 }
533
534 static void frobindir(struct sv_state *s, unsigned char idx, unsigned char mask, unsigned char data)
535 {
536 outb(idx & 0x3f, s->ioenh + SV_CODEC_IADDR);
537 udelay(10);
538 outb((inb(s->ioenh + SV_CODEC_IDATA) & mask) ^ data, s->ioenh + SV_CODEC_IDATA);
539 udelay(10);
540 }
541
542 #define REFFREQUENCY 24576000
543 #define ADCMULT 512
544 #define FULLRATE 48000
545
546 static unsigned setpll(struct sv_state *s, unsigned char reg, unsigned rate)
547 {
548 unsigned long flags;
549 unsigned char r, m=0, n=0;
550 unsigned xm, xn, xr, xd, metric = ~0U;
551 /* the warnings about m and n used uninitialized are bogus and may safely be ignored */
552
553 if (rate < 625000/ADCMULT)
554 rate = 625000/ADCMULT;
555 if (rate > 150000000/ADCMULT)
556 rate = 150000000/ADCMULT;
557 /* slight violation of specs, needed for continuous sampling rates */
558 for (r = 0; rate < 75000000/ADCMULT; r += 0x20, rate <<= 1);
559 for (xn = 3; xn < 35; xn++)
560 for (xm = 3; xm < 130; xm++) {
561 xr = REFFREQUENCY/ADCMULT * xm / xn;
562 xd = abs((signed)(xr - rate));
563 if (xd < metric) {
564 metric = xd;
565 m = xm - 2;
566 n = xn - 2;
567 }
568 }
569 reg &= 0x3f;
570 spin_lock_irqsave(&s->lock, flags);
571 outb(reg, s->ioenh + SV_CODEC_IADDR);
572 udelay(10);
573 outb(m, s->ioenh + SV_CODEC_IDATA);
574 udelay(10);
575 outb(reg+1, s->ioenh + SV_CODEC_IADDR);
576 udelay(10);
577 outb(r | n, s->ioenh + SV_CODEC_IDATA);
578 spin_unlock_irqrestore(&s->lock, flags);
579 udelay(10);
580 return (REFFREQUENCY/ADCMULT * (m + 2) / (n + 2)) >> ((r >> 5) & 7);
581 }
582
583 #if 0
584
585 static unsigned getpll(struct sv_state *s, unsigned char reg)
586 {
587 unsigned long flags;
588 unsigned char m, n;
589
590 reg &= 0x3f;
591 spin_lock_irqsave(&s->lock, flags);
592 outb(reg, s->ioenh + SV_CODEC_IADDR);
593 udelay(10);
594 m = inb(s->ioenh + SV_CODEC_IDATA);
595 udelay(10);
596 outb(reg+1, s->ioenh + SV_CODEC_IADDR);
597 udelay(10);
598 n = inb(s->ioenh + SV_CODEC_IDATA);
599 spin_unlock_irqrestore(&s->lock, flags);
600 udelay(10);
601 return (REFFREQUENCY/ADCMULT * (m + 2) / ((n & 0x1f) + 2)) >> ((n >> 5) & 7);
602 }
603
604 #endif
605
606 static void set_dac_rate(struct sv_state *s, unsigned rate)
607 {
608 unsigned div;
609 unsigned long flags;
610
611 if (rate > 48000)
612 rate = 48000;
613 if (rate < 4000)
614 rate = 4000;
615 div = (rate * 65536 + FULLRATE/2) / FULLRATE;
616 if (div > 65535)
617 div = 65535;
618 spin_lock_irqsave(&s->lock, flags);
619 wrindir(s, SV_CIPCMSR1, div >> 8);
620 wrindir(s, SV_CIPCMSR0, div);
621 spin_unlock_irqrestore(&s->lock, flags);
622 s->ratedac = (div * FULLRATE + 32768) / 65536;
623 }
624
625 static void set_adc_rate(struct sv_state *s, unsigned rate)
626 {
627 unsigned long flags;
628 unsigned rate1, rate2, div;
629
630 if (rate > 48000)
631 rate = 48000;
632 if (rate < 4000)
633 rate = 4000;
634 rate1 = setpll(s, SV_CIADCPLLM, rate);
635 div = (48000 + rate/2) / rate;
636 if (div > 8)
637 div = 8;
638 rate2 = (48000 + div/2) / div;
639 spin_lock_irqsave(&s->lock, flags);
640 wrindir(s, SV_CIADCALTSR, (div-1) << 4);
641 if (abs((signed)(rate-rate2)) <= abs((signed)(rate-rate1))) {
642 wrindir(s, SV_CIADCCLKSOURCE, 0x10);
643 s->rateadc = rate2;
644 } else {
645 wrindir(s, SV_CIADCCLKSOURCE, 0x00);
646 s->rateadc = rate1;
647 }
648 spin_unlock_irqrestore(&s->lock, flags);
649 }
650
651 /* --------------------------------------------------------------------- */
652
653 static inline void stop_adc(struct sv_state *s)
654 {
655 unsigned long flags;
656
657 spin_lock_irqsave(&s->lock, flags);
658 s->enable &= ~SV_CENABLE_RE;
659 wrindir(s, SV_CIENABLE, s->enable);
660 spin_unlock_irqrestore(&s->lock, flags);
661 }
662
663 static inline void stop_dac(struct sv_state *s)
664 {
665 unsigned long flags;
666
667 spin_lock_irqsave(&s->lock, flags);
668 s->enable &= ~(SV_CENABLE_PPE | SV_CENABLE_PE);
669 wrindir(s, SV_CIENABLE, s->enable);
670 spin_unlock_irqrestore(&s->lock, flags);
671 }
672
673 static void start_dac(struct sv_state *s)
674 {
675 unsigned long flags;
676
677 spin_lock_irqsave(&s->lock, flags);
678 if ((s->dma_dac.mapped || s->dma_dac.count > 0) && s->dma_dac.ready) {
679 s->enable = (s->enable & ~SV_CENABLE_PPE) | SV_CENABLE_PE;
680 wrindir(s, SV_CIENABLE, s->enable);
681 }
682 spin_unlock_irqrestore(&s->lock, flags);
683 }
684
685 static void start_adc(struct sv_state *s)
686 {
687 unsigned long flags;
688
689 spin_lock_irqsave(&s->lock, flags);
690 if ((s->dma_adc.mapped || s->dma_adc.count < (signed)(s->dma_adc.dmasize - 2*s->dma_adc.fragsize))
691 && s->dma_adc.ready) {
692 s->enable |= SV_CENABLE_RE;
693 wrindir(s, SV_CIENABLE, s->enable);
694 }
695 spin_unlock_irqrestore(&s->lock, flags);
696 }
697
698 /* --------------------------------------------------------------------- */
699
700 #define DMABUF_DEFAULTORDER (17-PAGE_SHIFT)
701 #define DMABUF_MINORDER 1
702
703 static void dealloc_dmabuf(struct sv_state *s, struct dmabuf *db)
704 {
705 struct page *page, *pend;
706
707 if (db->rawbuf) {
708 /* undo marking the pages as reserved */
709 pend = virt_to_page(db->rawbuf + (PAGE_SIZE << db->buforder) - 1);
710 for (page = virt_to_page(db->rawbuf); page <= pend; page++)
711 mem_map_unreserve(page);
712 pci_free_consistent(s->dev, PAGE_SIZE << db->buforder, db->rawbuf, db->dmaaddr);
713 }
714 db->rawbuf = NULL;
715 db->mapped = db->ready = 0;
716 }
717
718
719 /* DMAA is used for playback, DMAC is used for recording */
720
721 static int prog_dmabuf(struct sv_state *s, unsigned rec)
722 {
723 struct dmabuf *db = rec ? &s->dma_adc : &s->dma_dac;
724 unsigned rate = rec ? s->rateadc : s->ratedac;
725 int order;
726 unsigned bytepersec;
727 unsigned bufs;
728 struct page *page, *pend;
729 unsigned char fmt;
730 unsigned long flags;
731
732 spin_lock_irqsave(&s->lock, flags);
733 fmt = s->fmt;
734 if (rec) {
735 s->enable &= ~SV_CENABLE_RE;
736 fmt >>= SV_CFMT_CSHIFT;
737 } else {
738 s->enable &= ~SV_CENABLE_PE;
739 fmt >>= SV_CFMT_ASHIFT;
740 }
741 wrindir(s, SV_CIENABLE, s->enable);
742 spin_unlock_irqrestore(&s->lock, flags);
743 fmt &= SV_CFMT_MASK;
744 db->hwptr = db->swptr = db->total_bytes = db->count = db->error = db->endcleared = 0;
745 if (!db->rawbuf) {
746 db->ready = db->mapped = 0;
747 for (order = DMABUF_DEFAULTORDER; order >= DMABUF_MINORDER; order--)
748 if ((db->rawbuf = pci_alloc_consistent(s->dev, PAGE_SIZE << order, &db->dmaaddr)))
749 break;
750 if (!db->rawbuf)
751 return -ENOMEM;
752 db->buforder = order;
753 if ((virt_to_bus(db->rawbuf) ^ (virt_to_bus(db->rawbuf) + (PAGE_SIZE << db->buforder) - 1)) & ~0xffff)
754 printk(KERN_DEBUG "sv: DMA buffer crosses 64k boundary: busaddr 0x%lx size %ld\n",
755 virt_to_bus(db->rawbuf), PAGE_SIZE << db->buforder);
756 if ((virt_to_bus(db->rawbuf) + (PAGE_SIZE << db->buforder) - 1) & ~0xffffff)
757 printk(KERN_DEBUG "sv: DMA buffer beyond 16MB: busaddr 0x%lx size %ld\n",
758 virt_to_bus(db->rawbuf), PAGE_SIZE << db->buforder);
759 /* now mark the pages as reserved; otherwise remap_page_range doesn't do what we want */
760 pend = virt_to_page(db->rawbuf + (PAGE_SIZE << db->buforder) - 1);
761 for (page = virt_to_page(db->rawbuf); page <= pend; page++)
762 mem_map_reserve(page);
763 }
764 bytepersec = rate << sample_shift[fmt];
765 bufs = PAGE_SIZE << db->buforder;
766 if (db->ossfragshift) {
767 if ((1000 << db->ossfragshift) < bytepersec)
768 db->fragshift = ld2(bytepersec/1000);
769 else
770 db->fragshift = db->ossfragshift;
771 } else {
772 db->fragshift = ld2(bytepersec/100/(db->subdivision ? db->subdivision : 1));
773 if (db->fragshift < 3)
774 db->fragshift = 3;
775 }
776 db->numfrag = bufs >> db->fragshift;
777 while (db->numfrag < 4 && db->fragshift > 3) {
778 db->fragshift--;
779 db->numfrag = bufs >> db->fragshift;
780 }
781 db->fragsize = 1 << db->fragshift;
782 if (db->ossmaxfrags >= 4 && db->ossmaxfrags < db->numfrag)
783 db->numfrag = db->ossmaxfrags;
784 db->fragsamples = db->fragsize >> sample_shift[fmt];
785 db->dmasize = db->numfrag << db->fragshift;
786 memset(db->rawbuf, (fmt & SV_CFMT_16BIT) ? 0 : 0x80, db->dmasize);
787 spin_lock_irqsave(&s->lock, flags);
788 if (rec) {
789 set_dmac(s, db->dmaaddr, db->numfrag << db->fragshift);
790 /* program enhanced mode registers */
791 wrindir(s, SV_CIDMACBASECOUNT1, (db->fragsamples-1) >> 8);
792 wrindir(s, SV_CIDMACBASECOUNT0, db->fragsamples-1);
793 } else {
794 set_dmaa(s, db->dmaaddr, db->numfrag << db->fragshift);
795 /* program enhanced mode registers */
796 wrindir(s, SV_CIDMAABASECOUNT1, (db->fragsamples-1) >> 8);
797 wrindir(s, SV_CIDMAABASECOUNT0, db->fragsamples-1);
798 }
799 spin_unlock_irqrestore(&s->lock, flags);
800 db->enabled = 1;
801 db->ready = 1;
802 return 0;
803 }
804
805 static inline void clear_advance(struct sv_state *s)
806 {
807 unsigned char c = (s->fmt & (SV_CFMT_16BIT << SV_CFMT_ASHIFT)) ? 0 : 0x80;
808 unsigned char *buf = s->dma_dac.rawbuf;
809 unsigned bsize = s->dma_dac.dmasize;
810 unsigned bptr = s->dma_dac.swptr;
811 unsigned len = s->dma_dac.fragsize;
812
813 if (bptr + len > bsize) {
814 unsigned x = bsize - bptr;
815 memset(buf + bptr, c, x);
816 bptr = 0;
817 len -= x;
818 }
819 memset(buf + bptr, c, len);
820 }
821
822 /* call with spinlock held! */
823 static void sv_update_ptr(struct sv_state *s)
824 {
825 unsigned hwptr;
826 int diff;
827
828 /* update ADC pointer */
829 if (s->dma_adc.ready) {
830 hwptr = (s->dma_adc.dmasize - get_dmac(s)) % s->dma_adc.dmasize;
831 diff = (s->dma_adc.dmasize + hwptr - s->dma_adc.hwptr) % s->dma_adc.dmasize;
832 s->dma_adc.hwptr = hwptr;
833 s->dma_adc.total_bytes += diff;
834 s->dma_adc.count += diff;
835 if (s->dma_adc.count >= (signed)s->dma_adc.fragsize)
836 wake_up(&s->dma_adc.wait);
837 if (!s->dma_adc.mapped) {
838 if (s->dma_adc.count > (signed)(s->dma_adc.dmasize - ((3 * s->dma_adc.fragsize) >> 1))) {
839 s->enable &= ~SV_CENABLE_RE;
840 wrindir(s, SV_CIENABLE, s->enable);
841 s->dma_adc.error++;
842 }
843 }
844 }
845 /* update DAC pointer */
846 if (s->dma_dac.ready) {
847 hwptr = (s->dma_dac.dmasize - get_dmaa(s)) % s->dma_dac.dmasize;
848 diff = (s->dma_dac.dmasize + hwptr - s->dma_dac.hwptr) % s->dma_dac.dmasize;
849 s->dma_dac.hwptr = hwptr;
850 s->dma_dac.total_bytes += diff;
851 if (s->dma_dac.mapped) {
852 s->dma_dac.count += diff;
853 if (s->dma_dac.count >= (signed)s->dma_dac.fragsize)
854 wake_up(&s->dma_dac.wait);
855 } else {
856 s->dma_dac.count -= diff;
857 if (s->dma_dac.count <= 0) {
858 s->enable &= ~SV_CENABLE_PE;
859 wrindir(s, SV_CIENABLE, s->enable);
860 s->dma_dac.error++;
861 } else if (s->dma_dac.count <= (signed)s->dma_dac.fragsize && !s->dma_dac.endcleared) {
862 clear_advance(s);
863 s->dma_dac.endcleared = 1;
864 }
865 if (s->dma_dac.count + (signed)s->dma_dac.fragsize <= (signed)s->dma_dac.dmasize)
866 wake_up(&s->dma_dac.wait);
867 }
868 }
869 }
870
871 /* hold spinlock for the following! */
872 static void sv_handle_midi(struct sv_state *s)
873 {
874 unsigned char ch;
875 int wake;
876
877 wake = 0;
878 while (!(inb(s->iomidi+1) & 0x80)) {
879 ch = inb(s->iomidi);
880 if (s->midi.icnt < MIDIINBUF) {
881 s->midi.ibuf[s->midi.iwr] = ch;
882 s->midi.iwr = (s->midi.iwr + 1) % MIDIINBUF;
883 s->midi.icnt++;
884 }
885 wake = 1;
886 }
887 if (wake)
888 wake_up(&s->midi.iwait);
889 wake = 0;
890 while (!(inb(s->iomidi+1) & 0x40) && s->midi.ocnt > 0) {
891 outb(s->midi.obuf[s->midi.ord], s->iomidi);
892 s->midi.ord = (s->midi.ord + 1) % MIDIOUTBUF;
893 s->midi.ocnt--;
894 if (s->midi.ocnt < MIDIOUTBUF-16)
895 wake = 1;
896 }
897 if (wake)
898 wake_up(&s->midi.owait);
899 }
900
901 static void sv_interrupt(int irq, void *dev_id, struct pt_regs *regs)
902 {
903 struct sv_state *s = (struct sv_state *)dev_id;
904 unsigned int intsrc;
905
906 /* fastpath out, to ease interrupt sharing */
907 intsrc = inb(s->ioenh + SV_CODEC_STATUS);
908 if (!(intsrc & (SV_CSTAT_DMAA | SV_CSTAT_DMAC | SV_CSTAT_MIDI)))
909 return;
910 spin_lock(&s->lock);
911 sv_update_ptr(s);
912 sv_handle_midi(s);
913 spin_unlock(&s->lock);
914 }
915
916 static void sv_midi_timer(unsigned long data)
917 {
918 struct sv_state *s = (struct sv_state *)data;
919 unsigned long flags;
920
921 spin_lock_irqsave(&s->lock, flags);
922 sv_handle_midi(s);
923 spin_unlock_irqrestore(&s->lock, flags);
924 s->midi.timer.expires = jiffies+1;
925 add_timer(&s->midi.timer);
926 }
927
928 /* --------------------------------------------------------------------- */
929
930 static const char invalid_magic[] = KERN_CRIT "sv: invalid magic value\n";
931
932 #define VALIDATE_STATE(s) \
933 ({ \
934 if (!(s) || (s)->magic != SV_MAGIC) { \
935 printk(invalid_magic); \
936 return -ENXIO; \
937 } \
938 })
939
940 /* --------------------------------------------------------------------- */
941
942 #define MT_4 1
943 #define MT_5MUTE 2
944 #define MT_4MUTEMONO 3
945 #define MT_6MUTE 4
946
947 static const struct {
948 unsigned left:5;
949 unsigned right:5;
950 unsigned type:3;
951 unsigned rec:3;
952 } mixtable[SOUND_MIXER_NRDEVICES] = {
953 [SOUND_MIXER_RECLEV] = { SV_CIMIX_ADCINL, SV_CIMIX_ADCINR, MT_4, 0 },
954 [SOUND_MIXER_LINE1] = { SV_CIMIX_AUX1INL, SV_CIMIX_AUX1INR, MT_5MUTE, 5 },
955 [SOUND_MIXER_CD] = { SV_CIMIX_CDINL, SV_CIMIX_CDINR, MT_5MUTE, 1 },
956 [SOUND_MIXER_LINE] = { SV_CIMIX_LINEINL, SV_CIMIX_LINEINR, MT_5MUTE, 4 },
957 [SOUND_MIXER_MIC] = { SV_CIMIX_MICIN, SV_CIMIX_ADCINL, MT_4MUTEMONO, 6 },
958 [SOUND_MIXER_SYNTH] = { SV_CIMIX_SYNTHINL, SV_CIMIX_SYNTHINR, MT_5MUTE, 2 },
959 [SOUND_MIXER_LINE2] = { SV_CIMIX_AUX2INL, SV_CIMIX_AUX2INR, MT_5MUTE, 3 },
960 [SOUND_MIXER_VOLUME] = { SV_CIMIX_ANALOGINL, SV_CIMIX_ANALOGINR, MT_5MUTE, 7 },
961 [SOUND_MIXER_PCM] = { SV_CIMIX_PCMINL, SV_CIMIX_PCMINR, MT_6MUTE, 0 }
962 };
963
964 #ifdef OSS_DOCUMENTED_MIXER_SEMANTICS
965
966 static int return_mixval(struct sv_state *s, unsigned i, int *arg)
967 {
968 unsigned long flags;
969 unsigned char l, r, rl, rr;
970
971 spin_lock_irqsave(&s->lock, flags);
972 l = rdindir(s, mixtable[i].left);
973 r = rdindir(s, mixtable[i].right);
974 spin_unlock_irqrestore(&s->lock, flags);
975 switch (mixtable[i].type) {
976 case MT_4:
977 r &= 0xf;
978 l &= 0xf;
979 rl = 10 + 6 * (l & 15);
980 rr = 10 + 6 * (r & 15);
981 break;
982
983 case MT_4MUTEMONO:
984 rl = 55 - 3 * (l & 15);
985 if (r & 0x10)
986 rl += 45;
987 rr = rl;
988 r = l;
989 break;
990
991 case MT_5MUTE:
992 default:
993 rl = 100 - 3 * (l & 31);
994 rr = 100 - 3 * (r & 31);
995 break;
996
997 case MT_6MUTE:
998 rl = 100 - 3 * (l & 63) / 2;
999 rr = 100 - 3 * (r & 63) / 2;
1000 break;
1001 }
1002 if (l & 0x80)
1003 rl = 0;
1004 if (r & 0x80)
1005 rr = 0;
1006 return put_user((rr << 8) | rl, arg);
1007 }
1008
1009 #else /* OSS_DOCUMENTED_MIXER_SEMANTICS */
1010
1011 static const unsigned char volidx[SOUND_MIXER_NRDEVICES] =
1012 {
1013 [SOUND_MIXER_RECLEV] = 1,
1014 [SOUND_MIXER_LINE1] = 2,
1015 [SOUND_MIXER_CD] = 3,
1016 [SOUND_MIXER_LINE] = 4,
1017 [SOUND_MIXER_MIC] = 5,
1018 [SOUND_MIXER_SYNTH] = 6,
1019 [SOUND_MIXER_LINE2] = 7,
1020 [SOUND_MIXER_VOLUME] = 8,
1021 [SOUND_MIXER_PCM] = 9
1022 };
1023
1024 #endif /* OSS_DOCUMENTED_MIXER_SEMANTICS */
1025
1026 static unsigned mixer_recmask(struct sv_state *s)
1027 {
1028 unsigned long flags;
1029 int i, j;
1030
1031 spin_lock_irqsave(&s->lock, flags);
1032 j = rdindir(s, SV_CIMIX_ADCINL) >> 5;
1033 spin_unlock_irqrestore(&s->lock, flags);
1034 j &= 7;
1035 for (i = 0; i < SOUND_MIXER_NRDEVICES && mixtable[i].rec != j; i++);
1036 return 1 << i;
1037 }
1038
1039 static int mixer_ioctl(struct sv_state *s, unsigned int cmd, unsigned long arg)
1040 {
1041 unsigned long flags;
1042 int i, val;
1043 unsigned char l, r, rl, rr;
1044
1045 VALIDATE_STATE(s);
1046 if (cmd == SOUND_MIXER_INFO) {
1047 mixer_info info;
1048 strncpy(info.id, "SonicVibes", sizeof(info.id));
1049 strncpy(info.name, "S3 SonicVibes", sizeof(info.name));
1050 info.modify_counter = s->mix.modcnt;
1051 if (copy_to_user((void *)arg, &info, sizeof(info)))
1052 return -EFAULT;
1053 return 0;
1054 }
1055 if (cmd == SOUND_OLD_MIXER_INFO) {
1056 _old_mixer_info info;
1057 strncpy(info.id, "SonicVibes", sizeof(info.id));
1058 strncpy(info.name, "S3 SonicVibes", sizeof(info.name));
1059 if (copy_to_user((void *)arg, &info, sizeof(info)))
1060 return -EFAULT;
1061 return 0;
1062 }
1063 if (cmd == OSS_GETVERSION)
1064 return put_user(SOUND_VERSION, (int *)arg);
1065 if (cmd == SOUND_MIXER_PRIVATE1) { /* SRS settings */
1066 if (get_user(val, (int *)arg))
1067 return -EFAULT;
1068 spin_lock_irqsave(&s->lock, flags);
1069 if (val & 1) {
1070 if (val & 2) {
1071 l = 4 - ((val >> 2) & 7);
1072 if (l & ~3)
1073 l = 4;
1074 r = 4 - ((val >> 5) & 7);
1075 if (r & ~3)
1076 r = 4;
1077 wrindir(s, SV_CISRSSPACE, l);
1078 wrindir(s, SV_CISRSCENTER, r);
1079 } else
1080 wrindir(s, SV_CISRSSPACE, 0x80);
1081 }
1082 l = rdindir(s, SV_CISRSSPACE);
1083 r = rdindir(s, SV_CISRSCENTER);
1084 spin_unlock_irqrestore(&s->lock, flags);
1085 if (l & 0x80)
1086 return put_user(0, (int *)arg);
1087 return put_user(((4 - (l & 7)) << 2) | ((4 - (r & 7)) << 5) | 2, (int *)arg);
1088 }
1089 if (_IOC_TYPE(cmd) != 'M' || _SIOC_SIZE(cmd) != sizeof(int))
1090 return -EINVAL;
1091 if (_SIOC_DIR(cmd) == _SIOC_READ) {
1092 switch (_IOC_NR(cmd)) {
1093 case SOUND_MIXER_RECSRC: /* Arg contains a bit for each recording source */
1094 return put_user(mixer_recmask(s), (int *)arg);
1095
1096 case SOUND_MIXER_DEVMASK: /* Arg contains a bit for each supported device */
1097 for (val = i = 0; i < SOUND_MIXER_NRDEVICES; i++)
1098 if (mixtable[i].type)
1099 val |= 1 << i;
1100 return put_user(val, (int *)arg);
1101
1102 case SOUND_MIXER_RECMASK: /* Arg contains a bit for each supported recording source */
1103 for (val = i = 0; i < SOUND_MIXER_NRDEVICES; i++)
1104 if (mixtable[i].rec)
1105 val |= 1 << i;
1106 return put_user(val, (int *)arg);
1107
1108 case SOUND_MIXER_STEREODEVS: /* Mixer channels supporting stereo */
1109 for (val = i = 0; i < SOUND_MIXER_NRDEVICES; i++)
1110 if (mixtable[i].type && mixtable[i].type != MT_4MUTEMONO)
1111 val |= 1 << i;
1112 return put_user(val, (int *)arg);
1113
1114 case SOUND_MIXER_CAPS:
1115 return put_user(SOUND_CAP_EXCL_INPUT, (int *)arg);
1116
1117 default:
1118 i = _IOC_NR(cmd);
1119 if (i >= SOUND_MIXER_NRDEVICES || !mixtable[i].type)
1120 return -EINVAL;
1121 #ifdef OSS_DOCUMENTED_MIXER_SEMANTICS
1122 return return_mixval(s, i, (int *)arg);
1123 #else /* OSS_DOCUMENTED_MIXER_SEMANTICS */
1124 if (!volidx[i])
1125 return -EINVAL;
1126 return put_user(s->mix.vol[volidx[i]-1], (int *)arg);
1127 #endif /* OSS_DOCUMENTED_MIXER_SEMANTICS */
1128 }
1129 }
1130 if (_SIOC_DIR(cmd) != (_SIOC_READ|_SIOC_WRITE))
1131 return -EINVAL;
1132 s->mix.modcnt++;
1133 switch (_IOC_NR(cmd)) {
1134 case SOUND_MIXER_RECSRC: /* Arg contains a bit for each recording source */
1135 if (get_user(val, (int *)arg))
1136 return -EFAULT;
1137 i = hweight32(val);
1138 if (i == 0)
1139 return 0; /*val = mixer_recmask(s);*/
1140 else if (i > 1)
1141 val &= ~mixer_recmask(s);
1142 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++) {
1143 if (!(val & (1 << i)))
1144 continue;
1145 if (mixtable[i].rec)
1146 break;
1147 }
1148 if (!mixtable[i].rec)
1149 return 0;
1150 spin_lock_irqsave(&s->lock, flags);
1151 frobindir(s, SV_CIMIX_ADCINL, 0x1f, mixtable[i].rec << 5);
1152 frobindir(s, SV_CIMIX_ADCINR, 0x1f, mixtable[i].rec << 5);
1153 spin_unlock_irqrestore(&s->lock, flags);
1154 return 0;
1155
1156 default:
1157 i = _IOC_NR(cmd);
1158 if (i >= SOUND_MIXER_NRDEVICES || !mixtable[i].type)
1159 return -EINVAL;
1160 if (get_user(val, (int *)arg))
1161 return -EFAULT;
1162 l = val & 0xff;
1163 r = (val >> 8) & 0xff;
1164 if (mixtable[i].type == MT_4MUTEMONO)
1165 l = (r + l) / 2;
1166 if (l > 100)
1167 l = 100;
1168 if (r > 100)
1169 r = 100;
1170 spin_lock_irqsave(&s->lock, flags);
1171 switch (mixtable[i].type) {
1172 case MT_4:
1173 if (l >= 10)
1174 l -= 10;
1175 if (r >= 10)
1176 r -= 10;
1177 frobindir(s, mixtable[i].left, 0xf0, l / 6);
1178 frobindir(s, mixtable[i].right, 0xf0, l / 6);
1179 break;
1180
1181 case MT_4MUTEMONO:
1182 rr = 0;
1183 if (l < 10)
1184 rl = 0x80;
1185 else {
1186 if (l >= 55) {
1187 rr = 0x10;
1188 l -= 45;
1189 }
1190 rl = (55 - l) / 3;
1191 }
1192 wrindir(s, mixtable[i].left, rl);
1193 frobindir(s, mixtable[i].right, ~0x10, rr);
1194 break;
1195
1196 case MT_5MUTE:
1197 if (l < 7)
1198 rl = 0x80;
1199 else
1200 rl = (100 - l) / 3;
1201 if (r < 7)
1202 rr = 0x80;
1203 else
1204 rr = (100 - r) / 3;
1205 wrindir(s, mixtable[i].left, rl);
1206 wrindir(s, mixtable[i].right, rr);
1207 break;
1208
1209 case MT_6MUTE:
1210 if (l < 6)
1211 rl = 0x80;
1212 else
1213 rl = (100 - l) * 2 / 3;
1214 if (r < 6)
1215 rr = 0x80;
1216 else
1217 rr = (100 - r) * 2 / 3;
1218 wrindir(s, mixtable[i].left, rl);
1219 wrindir(s, mixtable[i].right, rr);
1220 break;
1221 }
1222 spin_unlock_irqrestore(&s->lock, flags);
1223 #ifdef OSS_DOCUMENTED_MIXER_SEMANTICS
1224 return return_mixval(s, i, (int *)arg);
1225 #else /* OSS_DOCUMENTED_MIXER_SEMANTICS */
1226 if (!volidx[i])
1227 return -EINVAL;
1228 s->mix.vol[volidx[i]-1] = val;
1229 return put_user(s->mix.vol[volidx[i]-1], (int *)arg);
1230 #endif /* OSS_DOCUMENTED_MIXER_SEMANTICS */
1231 }
1232 }
1233
1234 /* --------------------------------------------------------------------- */
1235
1236 static int sv_open_mixdev(struct inode *inode, struct file *file)
1237 {
1238 int minor = MINOR(inode->i_rdev);
1239 struct list_head *list;
1240 struct sv_state *s;
1241
1242 for (list = devs.next; ; list = list->next) {
1243 if (list == &devs)
1244 return -ENODEV;
1245 s = list_entry(list, struct sv_state, devs);
1246 if (s->dev_mixer == minor)
1247 break;
1248 }
1249 VALIDATE_STATE(s);
1250 file->private_data = s;
1251 return 0;
1252 }
1253
1254 static int sv_release_mixdev(struct inode *inode, struct file *file)
1255 {
1256 struct sv_state *s = (struct sv_state *)file->private_data;
1257
1258 VALIDATE_STATE(s);
1259 return 0;
1260 }
1261
1262 static int sv_ioctl_mixdev(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg)
1263 {
1264 return mixer_ioctl((struct sv_state *)file->private_data, cmd, arg);
1265 }
1266
1267 static /*const*/ struct file_operations sv_mixer_fops = {
1268 owner: THIS_MODULE,
1269 llseek: no_llseek,
1270 ioctl: sv_ioctl_mixdev,
1271 open: sv_open_mixdev,
1272 release: sv_release_mixdev,
1273 };
1274
1275 /* --------------------------------------------------------------------- */
1276
1277 static int drain_dac(struct sv_state *s, int nonblock)
1278 {
1279 DECLARE_WAITQUEUE(wait, current);
1280 unsigned long flags;
1281 int count, tmo;
1282
1283 if (s->dma_dac.mapped || !s->dma_dac.ready)
1284 return 0;
1285 add_wait_queue(&s->dma_dac.wait, &wait);
1286 for (;;) {
1287 __set_current_state(TASK_INTERRUPTIBLE);
1288 spin_lock_irqsave(&s->lock, flags);
1289 count = s->dma_dac.count;
1290 spin_unlock_irqrestore(&s->lock, flags);
1291 if (count <= 0)
1292 break;
1293 if (signal_pending(current))
1294 break;
1295 if (nonblock) {
1296 remove_wait_queue(&s->dma_dac.wait, &wait);
1297 set_current_state(TASK_RUNNING);
1298 return -EBUSY;
1299 }
1300 tmo = 3 * HZ * (count + s->dma_dac.fragsize) / 2 / s->ratedac;
1301 tmo >>= sample_shift[(s->fmt >> SV_CFMT_ASHIFT) & SV_CFMT_MASK];
1302 if (!schedule_timeout(tmo + 1))
1303 printk(KERN_DEBUG "sv: dma timed out??\n");
1304 }
1305 remove_wait_queue(&s->dma_dac.wait, &wait);
1306 set_current_state(TASK_RUNNING);
1307 if (signal_pending(current))
1308 return -ERESTARTSYS;
1309 return 0;
1310 }
1311
1312 /* --------------------------------------------------------------------- */
1313
1314 static ssize_t sv_read(struct file *file, char *buffer, size_t count, loff_t *ppos)
1315 {
1316 struct sv_state *s = (struct sv_state *)file->private_data;
1317 DECLARE_WAITQUEUE(wait, current);
1318 ssize_t ret;
1319 unsigned long flags;
1320 unsigned swptr;
1321 int cnt;
1322
1323 VALIDATE_STATE(s);
1324 if (ppos != &file->f_pos)
1325 return -ESPIPE;
1326 if (s->dma_adc.mapped)
1327 return -ENXIO;
1328 if (!s->dma_adc.ready && (ret = prog_dmabuf(s, 1)))
1329 return ret;
1330 if (!access_ok(VERIFY_WRITE, buffer, count))
1331 return -EFAULT;
1332 ret = 0;
1333 #if 0
1334 spin_lock_irqsave(&s->lock, flags);
1335 sv_update_ptr(s);
1336 spin_unlock_irqrestore(&s->lock, flags);
1337 #endif
1338 add_wait_queue(&s->dma_adc.wait, &wait);
1339 while (count > 0) {
1340 spin_lock_irqsave(&s->lock, flags);
1341 swptr = s->dma_adc.swptr;
1342 cnt = s->dma_adc.dmasize-swptr;
1343 if (s->dma_adc.count < cnt)
1344 cnt = s->dma_adc.count;
1345 if (cnt <= 0)
1346 __set_current_state(TASK_INTERRUPTIBLE);
1347 spin_unlock_irqrestore(&s->lock, flags);
1348 if (cnt > count)
1349 cnt = count;
1350 if (cnt <= 0) {
1351 if (s->dma_adc.enabled)
1352 start_adc(s);
1353 if (file->f_flags & O_NONBLOCK) {
1354 if (!ret)
1355 ret = -EAGAIN;
1356 break;
1357 }
1358 if (!schedule_timeout(HZ)) {
1359 printk(KERN_DEBUG "sv: read: chip lockup? dmasz %u fragsz %u count %i hwptr %u swptr %u\n",
1360 s->dma_adc.dmasize, s->dma_adc.fragsize, s->dma_adc.count,
1361 s->dma_adc.hwptr, s->dma_adc.swptr);
1362 stop_adc(s);
1363 spin_lock_irqsave(&s->lock, flags);
1364 set_dmac(s, virt_to_bus(s->dma_adc.rawbuf), s->dma_adc.numfrag << s->dma_adc.fragshift);
1365 /* program enhanced mode registers */
1366 wrindir(s, SV_CIDMACBASECOUNT1, (s->dma_adc.fragsamples-1) >> 8);
1367 wrindir(s, SV_CIDMACBASECOUNT0, s->dma_adc.fragsamples-1);
1368 s->dma_adc.count = s->dma_adc.hwptr = s->dma_adc.swptr = 0;
1369 spin_unlock_irqrestore(&s->lock, flags);
1370 }
1371 if (signal_pending(current)) {
1372 if (!ret)
1373 ret = -ERESTARTSYS;
1374 break;
1375 }
1376 continue;
1377 }
1378 if (copy_to_user(buffer, s->dma_adc.rawbuf + swptr, cnt)) {
1379 if (!ret)
1380 ret = -EFAULT;
1381 break;
1382 }
1383 swptr = (swptr + cnt) % s->dma_adc.dmasize;
1384 spin_lock_irqsave(&s->lock, flags);
1385 s->dma_adc.swptr = swptr;
1386 s->dma_adc.count -= cnt;
1387 spin_unlock_irqrestore(&s->lock, flags);
1388 count -= cnt;
1389 buffer += cnt;
1390 ret += cnt;
1391 if (s->dma_adc.enabled)
1392 start_adc(s);
1393 }
1394 remove_wait_queue(&s->dma_adc.wait, &wait);
1395 set_current_state(TASK_RUNNING);
1396 return ret;
1397 }
1398
1399 static ssize_t sv_write(struct file *file, const char *buffer, size_t count, loff_t *ppos)
1400 {
1401 struct sv_state *s = (struct sv_state *)file->private_data;
1402 DECLARE_WAITQUEUE(wait, current);
1403 ssize_t ret;
1404 unsigned long flags;
1405 unsigned swptr;
1406 int cnt;
1407
1408 VALIDATE_STATE(s);
1409 if (ppos != &file->f_pos)
1410 return -ESPIPE;
1411 if (s->dma_dac.mapped)
1412 return -ENXIO;
1413 if (!s->dma_dac.ready && (ret = prog_dmabuf(s, 0)))
1414 return ret;
1415 if (!access_ok(VERIFY_READ, buffer, count))
1416 return -EFAULT;
1417 ret = 0;
1418 #if 0
1419 spin_lock_irqsave(&s->lock, flags);
1420 sv_update_ptr(s);
1421 spin_unlock_irqrestore(&s->lock, flags);
1422 #endif
1423 add_wait_queue(&s->dma_dac.wait, &wait);
1424 while (count > 0) {
1425 spin_lock_irqsave(&s->lock, flags);
1426 if (s->dma_dac.count < 0) {
1427 s->dma_dac.count = 0;
1428 s->dma_dac.swptr = s->dma_dac.hwptr;
1429 }
1430 swptr = s->dma_dac.swptr;
1431 cnt = s->dma_dac.dmasize-swptr;
1432 if (s->dma_dac.count + cnt > s->dma_dac.dmasize)
1433 cnt = s->dma_dac.dmasize - s->dma_dac.count;
1434 if (cnt <= 0)
1435 __set_current_state(TASK_INTERRUPTIBLE);
1436 spin_unlock_irqrestore(&s->lock, flags);
1437 if (cnt > count)
1438 cnt = count;
1439 if (cnt <= 0) {
1440 if (s->dma_dac.enabled)
1441 start_dac(s);
1442 if (file->f_flags & O_NONBLOCK) {
1443 if (!ret)
1444 ret = -EAGAIN;
1445 break;
1446 }
1447 if (!schedule_timeout(HZ)) {
1448 printk(KERN_DEBUG "sv: write: chip lockup? dmasz %u fragsz %u count %i hwptr %u swptr %u\n",
1449 s->dma_dac.dmasize, s->dma_dac.fragsize, s->dma_dac.count,
1450 s->dma_dac.hwptr, s->dma_dac.swptr);
1451 stop_dac(s);
1452 spin_lock_irqsave(&s->lock, flags);
1453 set_dmaa(s, virt_to_bus(s->dma_dac.rawbuf), s->dma_dac.numfrag << s->dma_dac.fragshift);
1454 /* program enhanced mode registers */
1455 wrindir(s, SV_CIDMAABASECOUNT1, (s->dma_dac.fragsamples-1) >> 8);
1456 wrindir(s, SV_CIDMAABASECOUNT0, s->dma_dac.fragsamples-1);
1457 s->dma_dac.count = s->dma_dac.hwptr = s->dma_dac.swptr = 0;
1458 spin_unlock_irqrestore(&s->lock, flags);
1459 }
1460 if (signal_pending(current)) {
1461 if (!ret)
1462 ret = -ERESTARTSYS;
1463 break;
1464 }
1465 continue;
1466 }
1467 if (copy_from_user(s->dma_dac.rawbuf + swptr, buffer, cnt)) {
1468 if (!ret)
1469 ret = -EFAULT;
1470 break;
1471 }
1472 swptr = (swptr + cnt) % s->dma_dac.dmasize;
1473 spin_lock_irqsave(&s->lock, flags);
1474 s->dma_dac.swptr = swptr;
1475 s->dma_dac.count += cnt;
1476 s->dma_dac.endcleared = 0;
1477 spin_unlock_irqrestore(&s->lock, flags);
1478 count -= cnt;
1479 buffer += cnt;
1480 ret += cnt;
1481 if (s->dma_dac.enabled)
1482 start_dac(s);
1483 }
1484 remove_wait_queue(&s->dma_dac.wait, &wait);
1485 set_current_state(TASK_RUNNING);
1486 return ret;
1487 }
1488
1489 /* No kernel lock - we have our own spinlock */
1490 static unsigned int sv_poll(struct file *file, struct poll_table_struct *wait)
1491 {
1492 struct sv_state *s = (struct sv_state *)file->private_data;
1493 unsigned long flags;
1494 unsigned int mask = 0;
1495
1496 VALIDATE_STATE(s);
1497 if (file->f_mode & FMODE_WRITE) {
1498 if (!s->dma_dac.ready && prog_dmabuf(s, 1))
1499 return 0;
1500 poll_wait(file, &s->dma_dac.wait, wait);
1501 }
1502 if (file->f_mode & FMODE_READ) {
1503 if (!s->dma_adc.ready && prog_dmabuf(s, 0))
1504 return 0;
1505 poll_wait(file, &s->dma_adc.wait, wait);
1506 }
1507 spin_lock_irqsave(&s->lock, flags);
1508 sv_update_ptr(s);
1509 if (file->f_mode & FMODE_READ) {
1510 if (s->dma_adc.count >= (signed)s->dma_adc.fragsize)
1511 mask |= POLLIN | POLLRDNORM;
1512 }
1513 if (file->f_mode & FMODE_WRITE) {
1514 if (s->dma_dac.mapped) {
1515 if (s->dma_dac.count >= (signed)s->dma_dac.fragsize)
1516 mask |= POLLOUT | POLLWRNORM;
1517 } else {
1518 if ((signed)s->dma_dac.dmasize >= s->dma_dac.count + (signed)s->dma_dac.fragsize)
1519 mask |= POLLOUT | POLLWRNORM;
1520 }
1521 }
1522 spin_unlock_irqrestore(&s->lock, flags);
1523 return mask;
1524 }
1525
1526 static int sv_mmap(struct file *file, struct vm_area_struct *vma)
1527 {
1528 struct sv_state *s = (struct sv_state *)file->private_data;
1529 struct dmabuf *db;
1530 int ret = -EINVAL;
1531 unsigned long size;
1532
1533 VALIDATE_STATE(s);
1534 lock_kernel();
1535 if (vma->vm_flags & VM_WRITE) {
1536 if ((ret = prog_dmabuf(s, 1)) != 0)
1537 goto out;
1538 db = &s->dma_dac;
1539 } else if (vma->vm_flags & VM_READ) {
1540 if ((ret = prog_dmabuf(s, 0)) != 0)
1541 goto out;
1542 db = &s->dma_adc;
1543 } else
1544 goto out;
1545 ret = -EINVAL;
1546 if (vma->vm_pgoff != 0)
1547 goto out;
1548 size = vma->vm_end - vma->vm_start;
1549 if (size > (PAGE_SIZE << db->buforder))
1550 goto out;
1551 ret = -EAGAIN;
1552 if (remap_page_range(vma->vm_start, virt_to_phys(db->rawbuf), size, vma->vm_page_prot))
1553 goto out;
1554 db->mapped = 1;
1555 ret = 0;
1556 out:
1557 unlock_kernel();
1558 return ret;
1559 }
1560
1561 static int sv_ioctl(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg)
1562 {
1563 struct sv_state *s = (struct sv_state *)file->private_data;
1564 unsigned long flags;
1565 audio_buf_info abinfo;
1566 count_info cinfo;
1567 int count;
1568 int val, mapped, ret;
1569 unsigned char fmtm, fmtd;
1570
1571 VALIDATE_STATE(s);
1572 mapped = ((file->f_mode & FMODE_WRITE) && s->dma_dac.mapped) ||
1573 ((file->f_mode & FMODE_READ) && s->dma_adc.mapped);
1574 switch (cmd) {
1575 case OSS_GETVERSION:
1576 return put_user(SOUND_VERSION, (int *)arg);
1577
1578 case SNDCTL_DSP_SYNC:
1579 if (file->f_mode & FMODE_WRITE)
1580 return drain_dac(s, 0/*file->f_flags & O_NONBLOCK*/);
1581 return 0;
1582
1583 case SNDCTL_DSP_SETDUPLEX:
1584 return 0;
1585
1586 case SNDCTL_DSP_GETCAPS:
1587 return put_user(DSP_CAP_DUPLEX | DSP_CAP_REALTIME | DSP_CAP_TRIGGER | DSP_CAP_MMAP, (int *)arg);
1588
1589 case SNDCTL_DSP_RESET:
1590 if (file->f_mode & FMODE_WRITE) {
1591 stop_dac(s);
1592 synchronize_irq();
1593 s->dma_dac.swptr = s->dma_dac.hwptr = s->dma_dac.count = s->dma_dac.total_bytes = 0;
1594 }
1595 if (file->f_mode & FMODE_READ) {
1596 stop_adc(s);
1597 synchronize_irq();
1598 s->dma_adc.swptr = s->dma_adc.hwptr = s->dma_adc.count = s->dma_adc.total_bytes = 0;
1599 }
1600 return 0;
1601
1602 case SNDCTL_DSP_SPEED:
1603 if (get_user(val, (int *)arg))
1604 return -EFAULT;
1605 if (val >= 0) {
1606 if (file->f_mode & FMODE_READ) {
1607 stop_adc(s);
1608 s->dma_adc.ready = 0;
1609 set_adc_rate(s, val);
1610 }
1611 if (file->f_mode & FMODE_WRITE) {
1612 stop_dac(s);
1613 s->dma_dac.ready = 0;
1614 set_dac_rate(s, val);
1615 }
1616 }
1617 return put_user((file->f_mode & FMODE_READ) ? s->rateadc : s->ratedac, (int *)arg);
1618
1619 case SNDCTL_DSP_STEREO:
1620 if (get_user(val, (int *)arg))
1621 return -EFAULT;
1622 fmtd = 0;
1623 fmtm = ~0;
1624 if (file->f_mode & FMODE_READ) {
1625 stop_adc(s);
1626 s->dma_adc.ready = 0;
1627 if (val)
1628 fmtd |= SV_CFMT_STEREO << SV_CFMT_CSHIFT;
1629 else
1630 fmtm &= ~(SV_CFMT_STEREO << SV_CFMT_CSHIFT);
1631 }
1632 if (file->f_mode & FMODE_WRITE) {
1633 stop_dac(s);
1634 s->dma_dac.ready = 0;
1635 if (val)
1636 fmtd |= SV_CFMT_STEREO << SV_CFMT_ASHIFT;
1637 else
1638 fmtm &= ~(SV_CFMT_STEREO << SV_CFMT_ASHIFT);
1639 }
1640 set_fmt(s, fmtm, fmtd);
1641 return 0;
1642
1643 case SNDCTL_DSP_CHANNELS:
1644 if (get_user(val, (int *)arg))
1645 return -EFAULT;
1646 if (val != 0) {
1647 fmtd = 0;
1648 fmtm = ~0;
1649 if (file->f_mode & FMODE_READ) {
1650 stop_adc(s);
1651 s->dma_adc.ready = 0;
1652 if (val >= 2)
1653 fmtd |= SV_CFMT_STEREO << SV_CFMT_CSHIFT;
1654 else
1655 fmtm &= ~(SV_CFMT_STEREO << SV_CFMT_CSHIFT);
1656 }
1657 if (file->f_mode & FMODE_WRITE) {
1658 stop_dac(s);
1659 s->dma_dac.ready = 0;
1660 if (val >= 2)
1661 fmtd |= SV_CFMT_STEREO << SV_CFMT_ASHIFT;
1662 else
1663 fmtm &= ~(SV_CFMT_STEREO << SV_CFMT_ASHIFT);
1664 }
1665 set_fmt(s, fmtm, fmtd);
1666 }
1667 return put_user((s->fmt & ((file->f_mode & FMODE_READ) ? (SV_CFMT_STEREO << SV_CFMT_CSHIFT)
1668 : (SV_CFMT_STEREO << SV_CFMT_ASHIFT))) ? 2 : 1, (int *)arg);
1669
1670 case SNDCTL_DSP_GETFMTS: /* Returns a mask */
1671 return put_user(AFMT_S16_LE|AFMT_U8, (int *)arg);
1672
1673 case SNDCTL_DSP_SETFMT: /* Selects ONE fmt*/
1674 if (get_user(val, (int *)arg))
1675 return -EFAULT;
1676 if (val != AFMT_QUERY) {
1677 fmtd = 0;
1678 fmtm = ~0;
1679 if (file->f_mode & FMODE_READ) {
1680 stop_adc(s);
1681 s->dma_adc.ready = 0;
1682 if (val == AFMT_S16_LE)
1683 fmtd |= SV_CFMT_16BIT << SV_CFMT_CSHIFT;
1684 else
1685 fmtm &= ~(SV_CFMT_16BIT << SV_CFMT_CSHIFT);
1686 }
1687 if (file->f_mode & FMODE_WRITE) {
1688 stop_dac(s);
1689 s->dma_dac.ready = 0;
1690 if (val == AFMT_S16_LE)
1691 fmtd |= SV_CFMT_16BIT << SV_CFMT_ASHIFT;
1692 else
1693 fmtm &= ~(SV_CFMT_16BIT << SV_CFMT_ASHIFT);
1694 }
1695 set_fmt(s, fmtm, fmtd);
1696 }
1697 return put_user((s->fmt & ((file->f_mode & FMODE_READ) ? (SV_CFMT_16BIT << SV_CFMT_CSHIFT)
1698 : (SV_CFMT_16BIT << SV_CFMT_ASHIFT))) ? AFMT_S16_LE : AFMT_U8, (int *)arg);
1699
1700 case SNDCTL_DSP_POST:
1701 return 0;
1702
1703 case SNDCTL_DSP_GETTRIGGER:
1704 val = 0;
1705 if (file->f_mode & FMODE_READ && s->enable & SV_CENABLE_RE)
1706 val |= PCM_ENABLE_INPUT;
1707 if (file->f_mode & FMODE_WRITE && s->enable & SV_CENABLE_PE)
1708 val |= PCM_ENABLE_OUTPUT;
1709 return put_user(val, (int *)arg);
1710
1711 case SNDCTL_DSP_SETTRIGGER:
1712 if (get_user(val, (int *)arg))
1713 return -EFAULT;
1714 if (file->f_mode & FMODE_READ) {
1715 if (val & PCM_ENABLE_INPUT) {
1716 if (!s->dma_adc.ready && (ret = prog_dmabuf(s, 1)))
1717 return ret;
1718 s->dma_adc.enabled = 1;
1719 start_adc(s);
1720 } else {
1721 s->dma_adc.enabled = 0;
1722 stop_adc(s);
1723 }
1724 }
1725 if (file->f_mode & FMODE_WRITE) {
1726 if (val & PCM_ENABLE_OUTPUT) {
1727 if (!s->dma_dac.ready && (ret = prog_dmabuf(s, 0)))
1728 return ret;
1729 s->dma_dac.enabled = 1;
1730 start_dac(s);
1731 } else {
1732 s->dma_dac.enabled = 0;
1733 stop_dac(s);
1734 }
1735 }
1736 return 0;
1737
1738 case SNDCTL_DSP_GETOSPACE:
1739 if (!(file->f_mode & FMODE_WRITE))
1740 return -EINVAL;
1741 if (!s->dma_dac.ready && (val = prog_dmabuf(s, 0)) != 0)
1742 return val;
1743 spin_lock_irqsave(&s->lock, flags);
1744 sv_update_ptr(s);
1745 abinfo.fragsize = s->dma_dac.fragsize;
1746 count = s->dma_dac.count;
1747 if (count < 0)
1748 count = 0;
1749 abinfo.bytes = s->dma_dac.dmasize - count;
1750 abinfo.fragstotal = s->dma_dac.numfrag;
1751 abinfo.fragments = abinfo.bytes >> s->dma_dac.fragshift;
1752 spin_unlock_irqrestore(&s->lock, flags);
1753 return copy_to_user((void *)arg, &abinfo, sizeof(abinfo)) ? -EFAULT : 0;
1754
1755 case SNDCTL_DSP_GETISPACE:
1756 if (!(file->f_mode & FMODE_READ))
1757 return -EINVAL;
1758 if (!s->dma_adc.ready && (val = prog_dmabuf(s, 1)) != 0)
1759 return val;
1760 spin_lock_irqsave(&s->lock, flags);
1761 sv_update_ptr(s);
1762 abinfo.fragsize = s->dma_adc.fragsize;
1763 count = s->dma_adc.count;
1764 if (count < 0)
1765 count = 0;
1766 abinfo.bytes = count;
1767 abinfo.fragstotal = s->dma_adc.numfrag;
1768 abinfo.fragments = abinfo.bytes >> s->dma_adc.fragshift;
1769 spin_unlock_irqrestore(&s->lock, flags);
1770 return copy_to_user((void *)arg, &abinfo, sizeof(abinfo)) ? -EFAULT : 0;
1771
1772 case SNDCTL_DSP_NONBLOCK:
1773 file->f_flags |= O_NONBLOCK;
1774 return 0;
1775
1776 case SNDCTL_DSP_GETODELAY:
1777 if (!(file->f_mode & FMODE_WRITE))
1778 return -EINVAL;
1779 if (!s->dma_dac.ready && (val = prog_dmabuf(s, 0)) != 0)
1780 return val;
1781 spin_lock_irqsave(&s->lock, flags);
1782 sv_update_ptr(s);
1783 count = s->dma_dac.count;
1784 spin_unlock_irqrestore(&s->lock, flags);
1785 if (count < 0)
1786 count = 0;
1787 return put_user(count, (int *)arg);
1788
1789 case SNDCTL_DSP_GETIPTR:
1790 if (!(file->f_mode & FMODE_READ))
1791 return -EINVAL;
1792 if (!s->dma_adc.ready && (val = prog_dmabuf(s, 1)) != 0)
1793 return val;
1794 spin_lock_irqsave(&s->lock, flags);
1795 sv_update_ptr(s);
1796 cinfo.bytes = s->dma_adc.total_bytes;
1797 count = s->dma_adc.count;
1798 if (count < 0)
1799 count = 0;
1800 cinfo.blocks = count >> s->dma_adc.fragshift;
1801 cinfo.ptr = s->dma_adc.hwptr;
1802 if (s->dma_adc.mapped)
1803 s->dma_adc.count &= s->dma_adc.fragsize-1;
1804 spin_unlock_irqrestore(&s->lock, flags);
1805 return copy_to_user((void *)arg, &cinfo, sizeof(cinfo));
1806
1807 case SNDCTL_DSP_GETOPTR:
1808 if (!(file->f_mode & FMODE_WRITE))
1809 return -EINVAL;
1810 if (!s->dma_dac.ready && (val = prog_dmabuf(s, 0)) != 0)
1811 return val;
1812 spin_lock_irqsave(&s->lock, flags);
1813 sv_update_ptr(s);
1814 cinfo.bytes = s->dma_dac.total_bytes;
1815 count = s->dma_dac.count;
1816 if (count < 0)
1817 count = 0;
1818 cinfo.blocks = count >> s->dma_dac.fragshift;
1819 cinfo.ptr = s->dma_dac.hwptr;
1820 if (s->dma_dac.mapped)
1821 s->dma_dac.count &= s->dma_dac.fragsize-1;
1822 spin_unlock_irqrestore(&s->lock, flags);
1823 return copy_to_user((void *)arg, &cinfo, sizeof(cinfo));
1824
1825 case SNDCTL_DSP_GETBLKSIZE:
1826 if (file->f_mode & FMODE_WRITE) {
1827 if ((val = prog_dmabuf(s, 0)))
1828 return val;
1829 return put_user(s->dma_dac.fragsize, (int *)arg);
1830 }
1831 if ((val = prog_dmabuf(s, 1)))
1832 return val;
1833 return put_user(s->dma_adc.fragsize, (int *)arg);
1834
1835 case SNDCTL_DSP_SETFRAGMENT:
1836 if (get_user(val, (int *)arg))
1837 return -EFAULT;
1838 if (file->f_mode & FMODE_READ) {
1839 s->dma_adc.ossfragshift = val & 0xffff;
1840 s->dma_adc.ossmaxfrags = (val >> 16) & 0xffff;
1841 if (s->dma_adc.ossfragshift < 4)
1842 s->dma_adc.ossfragshift = 4;
1843 if (s->dma_adc.ossfragshift > 15)
1844 s->dma_adc.ossfragshift = 15;
1845 if (s->dma_adc.ossmaxfrags < 4)
1846 s->dma_adc.ossmaxfrags = 4;
1847 }
1848 if (file->f_mode & FMODE_WRITE) {
1849 s->dma_dac.ossfragshift = val & 0xffff;
1850 s->dma_dac.ossmaxfrags = (val >> 16) & 0xffff;
1851 if (s->dma_dac.ossfragshift < 4)
1852 s->dma_dac.ossfragshift = 4;
1853 if (s->dma_dac.ossfragshift > 15)
1854 s->dma_dac.ossfragshift = 15;
1855 if (s->dma_dac.ossmaxfrags < 4)
1856 s->dma_dac.ossmaxfrags = 4;
1857 }
1858 return 0;
1859
1860 case SNDCTL_DSP_SUBDIVIDE:
1861 if ((file->f_mode & FMODE_READ && s->dma_adc.subdivision) ||
1862 (file->f_mode & FMODE_WRITE && s->dma_dac.subdivision))
1863 return -EINVAL;
1864 if (get_user(val, (int *)arg))
1865 return -EFAULT;
1866 if (val != 1 && val != 2 && val != 4)
1867 return -EINVAL;
1868 if (file->f_mode & FMODE_READ)
1869 s->dma_adc.subdivision = val;
1870 if (file->f_mode & FMODE_WRITE)
1871 s->dma_dac.subdivision = val;
1872 return 0;
1873
1874 case SOUND_PCM_READ_RATE:
1875 return put_user((file->f_mode & FMODE_READ) ? s->rateadc : s->ratedac, (int *)arg);
1876
1877 case SOUND_PCM_READ_CHANNELS:
1878 return put_user((s->fmt & ((file->f_mode & FMODE_READ) ? (SV_CFMT_STEREO << SV_CFMT_CSHIFT)
1879 : (SV_CFMT_STEREO << SV_CFMT_ASHIFT))) ? 2 : 1, (int *)arg);
1880
1881 case SOUND_PCM_READ_BITS:
1882 return put_user((s->fmt & ((file->f_mode & FMODE_READ) ? (SV_CFMT_16BIT << SV_CFMT_CSHIFT)
1883 : (SV_CFMT_16BIT << SV_CFMT_ASHIFT))) ? 16 : 8, (int *)arg);
1884
1885 case SOUND_PCM_WRITE_FILTER:
1886 case SNDCTL_DSP_SETSYNCRO:
1887 case SOUND_PCM_READ_FILTER:
1888 return -EINVAL;
1889
1890 }
1891 return mixer_ioctl(s, cmd, arg);
1892 }
1893
1894 static int sv_open(struct inode *inode, struct file *file)
1895 {
1896 int minor = MINOR(inode->i_rdev);
1897 DECLARE_WAITQUEUE(wait, current);
1898 unsigned char fmtm = ~0, fmts = 0;
1899 struct list_head *list;
1900 struct sv_state *s;
1901
1902 for (list = devs.next; ; list = list->next) {
1903 if (list == &devs)
1904 return -ENODEV;
1905 s = list_entry(list, struct sv_state, devs);
1906 if (!((s->dev_audio ^ minor) & ~0xf))
1907 break;
1908 }
1909 VALIDATE_STATE(s);
1910 file->private_data = s;
1911 /* wait for device to become free */
1912 down(&s->open_sem);
1913 while (s->open_mode & file->f_mode) {
1914 if (file->f_flags & O_NONBLOCK) {
1915 up(&s->open_sem);
1916 return -EBUSY;
1917 }
1918 add_wait_queue(&s->open_wait, &wait);
1919 __set_current_state(TASK_INTERRUPTIBLE);
1920 up(&s->open_sem);
1921 schedule();
1922 remove_wait_queue(&s->open_wait, &wait);
1923 set_current_state(TASK_RUNNING);
1924 if (signal_pending(current))
1925 return -ERESTARTSYS;
1926 down(&s->open_sem);
1927 }
1928 if (file->f_mode & FMODE_READ) {
1929 fmtm &= ~((SV_CFMT_STEREO | SV_CFMT_16BIT) << SV_CFMT_CSHIFT);
1930 if ((minor & 0xf) == SND_DEV_DSP16)
1931 fmts |= SV_CFMT_16BIT << SV_CFMT_CSHIFT;
1932 s->dma_adc.ossfragshift = s->dma_adc.ossmaxfrags = s->dma_adc.subdivision = 0;
1933 s->dma_adc.enabled = 1;
1934 set_adc_rate(s, 8000);
1935 }
1936 if (file->f_mode & FMODE_WRITE) {
1937 fmtm &= ~((SV_CFMT_STEREO | SV_CFMT_16BIT) << SV_CFMT_ASHIFT);
1938 if ((minor & 0xf) == SND_DEV_DSP16)
1939 fmts |= SV_CFMT_16BIT << SV_CFMT_ASHIFT;
1940 s->dma_dac.ossfragshift = s->dma_dac.ossmaxfrags = s->dma_dac.subdivision = 0;
1941 s->dma_dac.enabled = 1;
1942 set_dac_rate(s, 8000);
1943 }
1944 set_fmt(s, fmtm, fmts);
1945 s->open_mode |= file->f_mode & (FMODE_READ | FMODE_WRITE);
1946 up(&s->open_sem);
1947 return 0;
1948 }
1949
1950 static int sv_release(struct inode *inode, struct file *file)
1951 {
1952 struct sv_state *s = (struct sv_state *)file->private_data;
1953
1954 VALIDATE_STATE(s);
1955 lock_kernel();
1956 if (file->f_mode & FMODE_WRITE)
1957 drain_dac(s, file->f_flags & O_NONBLOCK);
1958 down(&s->open_sem);
1959 if (file->f_mode & FMODE_WRITE) {
1960 stop_dac(s);
1961 dealloc_dmabuf(s, &s->dma_dac);
1962 }
1963 if (file->f_mode & FMODE_READ) {
1964 stop_adc(s);
1965 dealloc_dmabuf(s, &s->dma_adc);
1966 }
1967 s->open_mode &= (~file->f_mode) & (FMODE_READ|FMODE_WRITE);
1968 wake_up(&s->open_wait);
1969 up(&s->open_sem);
1970 unlock_kernel();
1971 return 0;
1972 }
1973
1974 static /*const*/ struct file_operations sv_audio_fops = {
1975 owner: THIS_MODULE,
1976 llseek: no_llseek,
1977 read: sv_read,
1978 write: sv_write,
1979 poll: sv_poll,
1980 ioctl: sv_ioctl,
1981 mmap: sv_mmap,
1982 open: sv_open,
1983 release: sv_release,
1984 };
1985
1986 /* --------------------------------------------------------------------- */
1987
1988 static ssize_t sv_midi_read(struct file *file, char *buffer, size_t count, loff_t *ppos)
1989 {
1990 struct sv_state *s = (struct sv_state *)file->private_data;
1991 DECLARE_WAITQUEUE(wait, current);
1992 ssize_t ret;
1993 unsigned long flags;
1994 unsigned ptr;
1995 int cnt;
1996
1997 VALIDATE_STATE(s);
1998 if (ppos != &file->f_pos)
1999 return -ESPIPE;
2000 if (!access_ok(VERIFY_WRITE, buffer, count))
2001 return -EFAULT;
2002 if (count == 0)
2003 return 0;
2004 ret = 0;
2005 add_wait_queue(&s->midi.iwait, &wait);
2006 while (count > 0) {
2007 spin_lock_irqsave(&s->lock, flags);
2008 ptr = s->midi.ird;
2009 cnt = MIDIINBUF - ptr;
2010 if (s->midi.icnt < cnt)
2011 cnt = s->midi.icnt;
2012 if (cnt <= 0)
2013 __set_current_state(TASK_INTERRUPTIBLE);
2014 spin_unlock_irqrestore(&s->lock, flags);
2015 if (cnt > count)
2016 cnt = count;
2017 if (cnt <= 0) {
2018 if (file->f_flags & O_NONBLOCK) {
2019 if (!ret)
2020 ret = -EAGAIN;
2021 break;
2022 }
2023 schedule();
2024 if (signal_pending(current)) {
2025 if (!ret)
2026 ret = -ERESTARTSYS;
2027 break;
2028 }
2029 continue;
2030 }
2031 if (copy_to_user(buffer, s->midi.ibuf + ptr, cnt)) {
2032 if (!ret)
2033 ret = -EFAULT;
2034 break;
2035 }
2036 ptr = (ptr + cnt) % MIDIINBUF;
2037 spin_lock_irqsave(&s->lock, flags);
2038 s->midi.ird = ptr;
2039 s->midi.icnt -= cnt;
2040 spin_unlock_irqrestore(&s->lock, flags);
2041 count -= cnt;
2042 buffer += cnt;
2043 ret += cnt;
2044 break;
2045 }
2046 __set_current_state(TASK_RUNNING);
2047 remove_wait_queue(&s->midi.iwait, &wait);
2048 return ret;
2049 }
2050
2051 static ssize_t sv_midi_write(struct file *file, const char *buffer, size_t count, loff_t *ppos)
2052 {
2053 struct sv_state *s = (struct sv_state *)file->private_data;
2054 DECLARE_WAITQUEUE(wait, current);
2055 ssize_t ret;
2056 unsigned long flags;
2057 unsigned ptr;
2058 int cnt;
2059
2060 VALIDATE_STATE(s);
2061 if (ppos != &file->f_pos)
2062 return -ESPIPE;
2063 if (!access_ok(VERIFY_READ, buffer, count))
2064 return -EFAULT;
2065 if (count == 0)
2066 return 0;
2067 ret = 0;
2068 add_wait_queue(&s->midi.owait, &wait);
2069 while (count > 0) {
2070 spin_lock_irqsave(&s->lock, flags);
2071 ptr = s->midi.owr;
2072 cnt = MIDIOUTBUF - ptr;
2073 if (s->midi.ocnt + cnt > MIDIOUTBUF)
2074 cnt = MIDIOUTBUF - s->midi.ocnt;
2075 if (cnt <= 0) {
2076 __set_current_state(TASK_INTERRUPTIBLE);
2077 sv_handle_midi(s);
2078 }
2079 spin_unlock_irqrestore(&s->lock, flags);
2080 if (cnt > count)
2081 cnt = count;
2082 if (cnt <= 0) {
2083 if (file->f_flags & O_NONBLOCK) {
2084 if (!ret)
2085 ret = -EAGAIN;
2086 break;
2087 }
2088 schedule();
2089 if (signal_pending(current)) {
2090 if (!ret)
2091 ret = -ERESTARTSYS;
2092 break;
2093 }
2094 continue;
2095 }
2096 if (copy_from_user(s->midi.obuf + ptr, buffer, cnt)) {
2097 if (!ret)
2098 ret = -EFAULT;
2099 break;
2100 }
2101 ptr = (ptr + cnt) % MIDIOUTBUF;
2102 spin_lock_irqsave(&s->lock, flags);
2103 s->midi.owr = ptr;
2104 s->midi.ocnt += cnt;
2105 spin_unlock_irqrestore(&s->lock, flags);
2106 count -= cnt;
2107 buffer += cnt;
2108 ret += cnt;
2109 spin_lock_irqsave(&s->lock, flags);
2110 sv_handle_midi(s);
2111 spin_unlock_irqrestore(&s->lock, flags);
2112 }
2113 __set_current_state(TASK_RUNNING);
2114 remove_wait_queue(&s->midi.owait, &wait);
2115 return ret;
2116 }
2117
2118 /* No kernel lock - we have our own spinlock */
2119 static unsigned int sv_midi_poll(struct file *file, struct poll_table_struct *wait)
2120 {
2121 struct sv_state *s = (struct sv_state *)file->private_data;
2122 unsigned long flags;
2123 unsigned int mask = 0;
2124
2125 VALIDATE_STATE(s);
2126 if (file->f_mode & FMODE_WRITE)
2127 poll_wait(file, &s->midi.owait, wait);
2128 if (file->f_mode & FMODE_READ)
2129 poll_wait(file, &s->midi.iwait, wait);
2130 spin_lock_irqsave(&s->lock, flags);
2131 if (file->f_mode & FMODE_READ) {
2132 if (s->midi.icnt > 0)
2133 mask |= POLLIN | POLLRDNORM;
2134 }
2135 if (file->f_mode & FMODE_WRITE) {
2136 if (s->midi.ocnt < MIDIOUTBUF)
2137 mask |= POLLOUT | POLLWRNORM;
2138 }
2139 spin_unlock_irqrestore(&s->lock, flags);
2140 return mask;
2141 }
2142
2143 static int sv_midi_open(struct inode *inode, struct file *file)
2144 {
2145 int minor = MINOR(inode->i_rdev);
2146 DECLARE_WAITQUEUE(wait, current);
2147 unsigned long flags;
2148 struct list_head *list;
2149 struct sv_state *s;
2150
2151 for (list = devs.next; ; list = list->next) {
2152 if (list == &devs)
2153 return -ENODEV;
2154 s = list_entry(list, struct sv_state, devs);
2155 if (s->dev_midi == minor)
2156 break;
2157 }
2158 VALIDATE_STATE(s);
2159 file->private_data = s;
2160 /* wait for device to become free */
2161 down(&s->open_sem);
2162 while (s->open_mode & (file->f_mode << FMODE_MIDI_SHIFT)) {
2163 if (file->f_flags & O_NONBLOCK) {
2164 up(&s->open_sem);
2165 return -EBUSY;
2166 }
2167 add_wait_queue(&s->open_wait, &wait);
2168 __set_current_state(TASK_INTERRUPTIBLE);
2169 up(&s->open_sem);
2170 schedule();
2171 remove_wait_queue(&s->open_wait, &wait);
2172 set_current_state(TASK_RUNNING);
2173 if (signal_pending(current))
2174 return -ERESTARTSYS;
2175 down(&s->open_sem);
2176 }
2177 spin_lock_irqsave(&s->lock, flags);
2178 if (!(s->open_mode & (FMODE_MIDI_READ | FMODE_MIDI_WRITE))) {
2179 s->midi.ird = s->midi.iwr = s->midi.icnt = 0;
2180 s->midi.ord = s->midi.owr = s->midi.ocnt = 0;
2181 //outb(inb(s->ioenh + SV_CODEC_CONTROL) | SV_CCTRL_WAVETABLE, s->ioenh + SV_CODEC_CONTROL);
2182 outb(inb(s->ioenh + SV_CODEC_INTMASK) | SV_CINTMASK_MIDI, s->ioenh + SV_CODEC_INTMASK);
2183 wrindir(s, SV_CIUARTCONTROL, 5); /* output MIDI data to external and internal synth */
2184 wrindir(s, SV_CIWAVETABLESRC, 1); /* Wavetable in PC RAM */
2185 outb(0xff, s->iomidi+1); /* reset command */
2186 outb(0x3f, s->iomidi+1); /* uart command */
2187 if (!(inb(s->iomidi+1) & 0x80))
2188 inb(s->iomidi);
2189 s->midi.ird = s->midi.iwr = s->midi.icnt = 0;
2190 init_timer(&s->midi.timer);
2191 s->midi.timer.expires = jiffies+1;
2192 s->midi.timer.data = (unsigned long)s;
2193 s->midi.timer.function = sv_midi_timer;
2194 add_timer(&s->midi.timer);
2195 }
2196 if (file->f_mode & FMODE_READ) {
2197 s->midi.ird = s->midi.iwr = s->midi.icnt = 0;
2198 }
2199 if (file->f_mode & FMODE_WRITE) {
2200 s->midi.ord = s->midi.owr = s->midi.ocnt = 0;
2201 }
2202 spin_unlock_irqrestore(&s->lock, flags);
2203 s->open_mode |= (file->f_mode << FMODE_MIDI_SHIFT) & (FMODE_MIDI_READ | FMODE_MIDI_WRITE);
2204 up(&s->open_sem);
2205 return 0;
2206 }
2207
2208 static int sv_midi_release(struct inode *inode, struct file *file)
2209 {
2210 struct sv_state *s = (struct sv_state *)file->private_data;
2211 DECLARE_WAITQUEUE(wait, current);
2212 unsigned long flags;
2213 unsigned count, tmo;
2214
2215 VALIDATE_STATE(s);
2216
2217 lock_kernel();
2218 if (file->f_mode & FMODE_WRITE) {
2219 add_wait_queue(&s->midi.owait, &wait);
2220 for (;;) {
2221 __set_current_state(TASK_INTERRUPTIBLE);
2222 spin_lock_irqsave(&s->lock, flags);
2223 count = s->midi.ocnt;
2224 spin_unlock_irqrestore(&s->lock, flags);
2225 if (count <= 0)
2226 break;
2227 if (signal_pending(current))
2228 break;
2229 if (file->f_flags & O_NONBLOCK) {
2230 remove_wait_queue(&s->midi.owait, &wait);
2231 set_current_state(TASK_RUNNING);
2232 unlock_kernel();
2233 return -EBUSY;
2234 }
2235 tmo = (count * HZ) / 3100;
2236 if (!schedule_timeout(tmo ? : 1) && tmo)
2237 printk(KERN_DEBUG "sv: midi timed out??\n");
2238 }
2239 remove_wait_queue(&s->midi.owait, &wait);
2240 set_current_state(TASK_RUNNING);
2241 }
2242 down(&s->open_sem);
2243 s->open_mode &= (~(file->f_mode << FMODE_MIDI_SHIFT)) & (FMODE_MIDI_READ|FMODE_MIDI_WRITE);
2244 spin_lock_irqsave(&s->lock, flags);
2245 if (!(s->open_mode & (FMODE_MIDI_READ | FMODE_MIDI_WRITE))) {
2246 outb(inb(s->ioenh + SV_CODEC_INTMASK) & ~SV_CINTMASK_MIDI, s->ioenh + SV_CODEC_INTMASK);
2247 del_timer(&s->midi.timer);
2248 }
2249 spin_unlock_irqrestore(&s->lock, flags);
2250 wake_up(&s->open_wait);
2251 up(&s->open_sem);
2252 unlock_kernel();
2253 return 0;
2254 }
2255
2256 static /*const*/ struct file_operations sv_midi_fops = {
2257 owner: THIS_MODULE,
2258 llseek: no_llseek,
2259 read: sv_midi_read,
2260 write: sv_midi_write,
2261 poll: sv_midi_poll,
2262 open: sv_midi_open,
2263 release: sv_midi_release,
2264 };
2265
2266 /* --------------------------------------------------------------------- */
2267
2268 static int sv_dmfm_ioctl(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg)
2269 {
2270 static const unsigned char op_offset[18] = {
2271 0x00, 0x01, 0x02, 0x03, 0x04, 0x05,
2272 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D,
2273 0x10, 0x11, 0x12, 0x13, 0x14, 0x15
2274 };
2275 struct sv_state *s = (struct sv_state *)file->private_data;
2276 struct dm_fm_voice v;
2277 struct dm_fm_note n;
2278 struct dm_fm_params p;
2279 unsigned int io;
2280 unsigned int regb;
2281
2282 switch (cmd) {
2283 case FM_IOCTL_RESET:
2284 for (regb = 0xb0; regb < 0xb9; regb++) {
2285 outb(regb, s->iosynth);
2286 outb(0, s->iosynth+1);
2287 outb(regb, s->iosynth+2);
2288 outb(0, s->iosynth+3);
2289 }
2290 return 0;
2291
2292 case FM_IOCTL_PLAY_NOTE:
2293 if (copy_from_user(&n, (void *)arg, sizeof(n)))
2294 return -EFAULT;
2295 if (n.voice >= 18)
2296 return -EINVAL;
2297 if (n.voice >= 9) {
2298 regb = n.voice - 9;
2299 io = s->iosynth+2;
2300 } else {
2301 regb = n.voice;
2302 io = s->iosynth;
2303 }
2304 outb(0xa0 + regb, io);
2305 outb(n.fnum & 0xff, io+1);
2306 outb(0xb0 + regb, io);
2307 outb(((n.fnum >> 8) & 3) | ((n.octave & 7) << 2) | ((n.key_on & 1) << 5), io+1);
2308 return 0;
2309
2310 case FM_IOCTL_SET_VOICE:
2311 if (copy_from_user(&v, (void *)arg, sizeof(v)))
2312 return -EFAULT;
2313 if (v.voice >= 18)
2314 return -EINVAL;
2315 regb = op_offset[v.voice];
2316 io = s->iosynth + ((v.op & 1) << 1);
2317 outb(0x20 + regb, io);
2318 outb(((v.am & 1) << 7) | ((v.vibrato & 1) << 6) | ((v.do_sustain & 1) << 5) |
2319 ((v.kbd_scale & 1) << 4) | (v.harmonic & 0xf), io+1);
2320 outb(0x40 + regb, io);
2321 outb(((v.scale_level & 0x3) << 6) | (v.volume & 0x3f), io+1);
2322 outb(0x60 + regb, io);
2323 outb(((v.attack & 0xf) << 4) | (v.decay & 0xf), io+1);
2324 outb(0x80 + regb, io);
2325 outb(((v.sustain & 0xf) << 4) | (v.release & 0xf), io+1);
2326 outb(0xe0 + regb, io);
2327 outb(v.waveform & 0x7, io+1);
2328 if (n.voice >= 9) {
2329 regb = n.voice - 9;
2330 io = s->iosynth+2;
2331 } else {
2332 regb = n.voice;
2333 io = s->iosynth;
2334 }
2335 outb(0xc0 + regb, io);
2336 outb(((v.right & 1) << 5) | ((v.left & 1) << 4) | ((v.feedback & 7) << 1) |
2337 (v.connection & 1), io+1);
2338 return 0;
2339
2340 case FM_IOCTL_SET_PARAMS:
2341 if (copy_from_user(&p, (void *)arg, sizeof(p)))
2342 return -EFAULT;
2343 outb(0x08, s->iosynth);
2344 outb((p.kbd_split & 1) << 6, s->iosynth+1);
2345 outb(0xbd, s->iosynth);
2346 outb(((p.am_depth & 1) << 7) | ((p.vib_depth & 1) << 6) | ((p.rhythm & 1) << 5) | ((p.bass & 1) << 4) |
2347 ((p.snare & 1) << 3) | ((p.tomtom & 1) << 2) | ((p.cymbal & 1) << 1) | (p.hihat & 1), s->iosynth+1);
2348 return 0;
2349
2350 case FM_IOCTL_SET_OPL:
2351 outb(4, s->iosynth+2);
2352 outb(arg, s->iosynth+3);
2353 return 0;
2354
2355 case FM_IOCTL_SET_MODE:
2356 outb(5, s->iosynth+2);
2357 outb(arg & 1, s->iosynth+3);
2358 return 0;
2359
2360 default:
2361 return -EINVAL;
2362 }
2363 }
2364
2365 static int sv_dmfm_open(struct inode *inode, struct file *file)
2366 {
2367 int minor = MINOR(inode->i_rdev);
2368 DECLARE_WAITQUEUE(wait, current);
2369 struct list_head *list;
2370 struct sv_state *s;
2371
2372 for (list = devs.next; ; list = list->next) {
2373 if (list == &devs)
2374 return -ENODEV;
2375 s = list_entry(list, struct sv_state, devs);
2376 if (s->dev_dmfm == minor)
2377 break;
2378 }
2379 VALIDATE_STATE(s);
2380 file->private_data = s;
2381 /* wait for device to become free */
2382 down(&s->open_sem);
2383 while (s->open_mode & FMODE_DMFM) {
2384 if (file->f_flags & O_NONBLOCK) {
2385 up(&s->open_sem);
2386 return -EBUSY;
2387 }
2388 add_wait_queue(&s->open_wait, &wait);
2389 __set_current_state(TASK_INTERRUPTIBLE);
2390 up(&s->open_sem);
2391 schedule();
2392 remove_wait_queue(&s->open_wait, &wait);
2393 set_current_state(TASK_RUNNING);
2394 if (signal_pending(current))
2395 return -ERESTARTSYS;
2396 down(&s->open_sem);
2397 }
2398 /* init the stuff */
2399 outb(1, s->iosynth);
2400 outb(0x20, s->iosynth+1); /* enable waveforms */
2401 outb(4, s->iosynth+2);
2402 outb(0, s->iosynth+3); /* no 4op enabled */
2403 outb(5, s->iosynth+2);
2404 outb(1, s->iosynth+3); /* enable OPL3 */
2405 s->open_mode |= FMODE_DMFM;
2406 up(&s->open_sem);
2407 return 0;
2408 }
2409
2410 static int sv_dmfm_release(struct inode *inode, struct file *file)
2411 {
2412 struct sv_state *s = (struct sv_state *)file->private_data;
2413 unsigned int regb;
2414
2415 VALIDATE_STATE(s);
2416 lock_kernel();
2417 down(&s->open_sem);
2418 s->open_mode &= ~FMODE_DMFM;
2419 for (regb = 0xb0; regb < 0xb9; regb++) {
2420 outb(regb, s->iosynth);
2421 outb(0, s->iosynth+1);
2422 outb(regb, s->iosynth+2);
2423 outb(0, s->iosynth+3);
2424 }
2425 wake_up(&s->open_wait);
2426 up(&s->open_sem);
2427 unlock_kernel();
2428 return 0;
2429 }
2430
2431 static /*const*/ struct file_operations sv_dmfm_fops = {
2432 owner: THIS_MODULE,
2433 llseek: no_llseek,
2434 ioctl: sv_dmfm_ioctl,
2435 open: sv_dmfm_open,
2436 release: sv_dmfm_release,
2437 };
2438
2439 /* --------------------------------------------------------------------- */
2440
2441 /* maximum number of devices; only used for command line params */
2442 #define NR_DEVICE 5
2443
2444 static int reverb[NR_DEVICE] = { 0, };
2445
2446 #if 0
2447 static int wavetable[NR_DEVICE] = { 0, };
2448 #endif
2449
2450 static unsigned int devindex = 0;
2451
2452 MODULE_PARM(reverb, "1-" __MODULE_STRING(NR_DEVICE) "i");
2453 MODULE_PARM_DESC(reverb, "if 1 enables the reverb circuitry. NOTE: your card must have the reverb RAM");
2454 #if 0
2455 MODULE_PARM(wavetable, "1-" __MODULE_STRING(NR_DEVICE) "i");
2456 MODULE_PARM_DESC(wavetable, "if 1 the wavetable synth is enabled");
2457 #endif
2458
2459 MODULE_AUTHOR("Thomas M. Sailer, sailer@ife.ee.ethz.ch, hb9jnx@hb9w.che.eu");
2460 MODULE_DESCRIPTION("S3 SonicVibes Driver");
2461
2462 /* --------------------------------------------------------------------- */
2463
2464 static struct initvol {
2465 int mixch;
2466 int vol;
2467 } initvol[] __initdata = {
2468 { SOUND_MIXER_WRITE_RECLEV, 0x4040 },
2469 { SOUND_MIXER_WRITE_LINE1, 0x4040 },
2470 { SOUND_MIXER_WRITE_CD, 0x4040 },
2471 { SOUND_MIXER_WRITE_LINE, 0x4040 },
2472 { SOUND_MIXER_WRITE_MIC, 0x4040 },
2473 { SOUND_MIXER_WRITE_SYNTH, 0x4040 },
2474 { SOUND_MIXER_WRITE_LINE2, 0x4040 },
2475 { SOUND_MIXER_WRITE_VOLUME, 0x4040 },
2476 { SOUND_MIXER_WRITE_PCM, 0x4040 }
2477 };
2478
2479 #define RSRCISIOREGION(dev,num) (pci_resource_start((dev), (num)) != 0 && \
2480 (pci_resource_flags((dev), (num)) & IORESOURCE_IO))
2481
2482 static int __devinit sv_probe(struct pci_dev *pcidev, const struct pci_device_id *pciid)
2483 {
2484 static char __initdata sv_ddma_name[] = "S3 Inc. SonicVibes DDMA Controller";
2485 struct sv_state *s;
2486 mm_segment_t fs;
2487 int i, val, ret;
2488 char *ddmaname;
2489 unsigned ddmanamelen;
2490
2491 if ((ret=pci_enable_device(pcidev)))
2492 return ret;
2493
2494 if (!RSRCISIOREGION(pcidev, RESOURCE_SB) ||
2495 !RSRCISIOREGION(pcidev, RESOURCE_ENH) ||
2496 !RSRCISIOREGION(pcidev, RESOURCE_SYNTH) ||
2497 !RSRCISIOREGION(pcidev, RESOURCE_MIDI) ||
2498 !RSRCISIOREGION(pcidev, RESOURCE_GAME))
2499 return -ENODEV;
2500 if (pcidev->irq == 0)
2501 return -ENODEV;
2502 if (pci_set_dma_mask(pcidev, 0x00ffffff)) {
2503 printk(KERN_WARNING "sonicvibes: architecture does not support 24bit PCI busmaster DMA\n");
2504 return -ENODEV;
2505 }
2506 /* try to allocate a DDMA resource if not already available */
2507 if (!RSRCISIOREGION(pcidev, RESOURCE_DDMA)) {
2508 pcidev->resource[RESOURCE_DDMA].start = 0;
2509 pcidev->resource[RESOURCE_DDMA].end = 2*SV_EXTENT_DMA-1;
2510 pcidev->resource[RESOURCE_DDMA].flags = PCI_BASE_ADDRESS_SPACE_IO | IORESOURCE_IO;
2511 ddmanamelen = strlen(sv_ddma_name)+1;
2512 if (!(ddmaname = kmalloc(ddmanamelen, GFP_KERNEL)))
2513 return -1;
2514 memcpy(ddmaname, sv_ddma_name, ddmanamelen);
2515 pcidev->resource[RESOURCE_DDMA].name = ddmaname;
2516 if (pci_assign_resource(pcidev, RESOURCE_DDMA)) {
2517 pcidev->resource[RESOURCE_DDMA].name = NULL;
2518 kfree(ddmaname);
2519 printk(KERN_ERR "sv: cannot allocate DDMA controller io ports\n");
2520 return -EBUSY;
2521 }
2522 }
2523 if (!(s = kmalloc(sizeof(struct sv_state), GFP_KERNEL))) {
2524 printk(KERN_WARNING "sv: out of memory\n");
2525 return -ENOMEM;
2526 }
2527 memset(s, 0, sizeof(struct sv_state));
2528 init_waitqueue_head(&s->dma_adc.wait);
2529 init_waitqueue_head(&s->dma_dac.wait);
2530 init_waitqueue_head(&s->open_wait);
2531 init_waitqueue_head(&s->midi.iwait);
2532 init_waitqueue_head(&s->midi.owait);
2533 init_MUTEX(&s->open_sem);
2534 spin_lock_init(&s->lock);
2535 s->magic = SV_MAGIC;
2536 s->dev = pcidev;
2537 s->iosb = pci_resource_start(pcidev, RESOURCE_SB);
2538 s->ioenh = pci_resource_start(pcidev, RESOURCE_ENH);
2539 s->iosynth = pci_resource_start(pcidev, RESOURCE_SYNTH);
2540 s->iomidi = pci_resource_start(pcidev, RESOURCE_MIDI);
2541 s->iodmaa = pci_resource_start(pcidev, RESOURCE_DDMA);
2542 s->iodmac = pci_resource_start(pcidev, RESOURCE_DDMA) + SV_EXTENT_DMA;
2543 s->gameport.io = pci_resource_start(pcidev, RESOURCE_GAME);
2544 pci_write_config_dword(pcidev, 0x40, s->iodmaa | 9); /* enable and use extended mode */
2545 pci_write_config_dword(pcidev, 0x48, s->iodmac | 9); /* enable */
2546 printk(KERN_DEBUG "sv: io ports: %#lx %#lx %#lx %#lx %#x %#x %#x\n",
2547 s->iosb, s->ioenh, s->iosynth, s->iomidi, s->gameport.io, s->iodmaa, s->iodmac);
2548 s->irq = pcidev->irq;
2549
2550 /* hack */
2551 pci_write_config_dword(pcidev, 0x60, wavetable_mem >> 12); /* wavetable base address */
2552
2553 ret = -EBUSY;
2554 if (!request_region(s->ioenh, SV_EXTENT_ENH, "S3 SonicVibes PCM")) {
2555 printk(KERN_ERR "sv: io ports %#lx-%#lx in use\n", s->ioenh, s->ioenh+SV_EXTENT_ENH-1);
2556 goto err_region5;
2557 }
2558 if (!request_region(s->iodmaa, SV_EXTENT_DMA, "S3 SonicVibes DMAA")) {
2559 printk(KERN_ERR "sv: io ports %#x-%#x in use\n", s->iodmaa, s->iodmaa+SV_EXTENT_DMA-1);
2560 goto err_region4;
2561 }
2562 if (!request_region(s->iodmac, SV_EXTENT_DMA, "S3 SonicVibes DMAC")) {
2563 printk(KERN_ERR "sv: io ports %#x-%#x in use\n", s->iodmac, s->iodmac+SV_EXTENT_DMA-1);
2564 goto err_region3;
2565 }
2566 if (!request_region(s->iomidi, SV_EXTENT_MIDI, "S3 SonicVibes Midi")) {
2567 printk(KERN_ERR "sv: io ports %#lx-%#lx in use\n", s->iomidi, s->iomidi+SV_EXTENT_MIDI-1);
2568 goto err_region2;
2569 }
2570 if (!request_region(s->iosynth, SV_EXTENT_SYNTH, "S3 SonicVibes Synth")) {
2571 printk(KERN_ERR "sv: io ports %#lx-%#lx in use\n", s->iosynth, s->iosynth+SV_EXTENT_SYNTH-1);
2572 goto err_region1;
2573 }
2574 if (s->gameport.io && !request_region(s->gameport.io, SV_EXTENT_GAME, "ESS Solo1")) {
2575 printk(KERN_ERR "sv: gameport io ports in use\n");
2576 s->gameport.io = 0;
2577 }
2578 /* initialize codec registers */
2579 outb(0x80, s->ioenh + SV_CODEC_CONTROL); /* assert reset */
2580 udelay(50);
2581 outb(0x00, s->ioenh + SV_CODEC_CONTROL); /* deassert reset */
2582 udelay(50);
2583 outb(SV_CCTRL_INTADRIVE | SV_CCTRL_ENHANCED /*| SV_CCTRL_WAVETABLE */
2584 | (reverb[devindex] ? SV_CCTRL_REVERB : 0), s->ioenh + SV_CODEC_CONTROL);
2585 inb(s->ioenh + SV_CODEC_STATUS); /* clear ints */
2586 wrindir(s, SV_CIDRIVECONTROL, 0); /* drive current 16mA */
2587 wrindir(s, SV_CIENABLE, s->enable = 0); /* disable DMAA and DMAC */
2588 outb(~(SV_CINTMASK_DMAA | SV_CINTMASK_DMAC), s->ioenh + SV_CODEC_INTMASK);
2589 /* outb(0xff, s->iodmaa + SV_DMA_RESET); */
2590 /* outb(0xff, s->iodmac + SV_DMA_RESET); */
2591 inb(s->ioenh + SV_CODEC_STATUS); /* ack interrupts */
2592 wrindir(s, SV_CIADCCLKSOURCE, 0); /* use pll as ADC clock source */
2593 wrindir(s, SV_CIANALOGPWRDOWN, 0); /* power up the analog parts of the device */
2594 wrindir(s, SV_CIDIGITALPWRDOWN, 0); /* power up the digital parts of the device */
2595 setpll(s, SV_CIADCPLLM, 8000);
2596 wrindir(s, SV_CISRSSPACE, 0x80); /* SRS off */
2597 wrindir(s, SV_CIPCMSR0, (8000 * 65536 / FULLRATE) & 0xff);
2598 wrindir(s, SV_CIPCMSR1, ((8000 * 65536 / FULLRATE) >> 8) & 0xff);
2599 wrindir(s, SV_CIADCOUTPUT, 0);
2600 /* request irq */
2601 if ((ret=request_irq(s->irq,sv_interrupt,SA_SHIRQ,"S3 SonicVibes",s))) {
2602 printk(KERN_ERR "sv: irq %u in use\n", s->irq);
2603 goto err_irq;
2604 }
2605 printk(KERN_INFO "sv: found adapter at io %#lx irq %u dmaa %#06x dmac %#06x revision %u\n",
2606 s->ioenh, s->irq, s->iodmaa, s->iodmac, rdindir(s, SV_CIREVISION));
2607 /* register devices */
2608 if ((s->dev_audio = register_sound_dsp(&sv_audio_fops, -1)) < 0) {
2609 ret = s->dev_audio;
2610 goto err_dev1;
2611 }
2612 if ((s->dev_mixer = register_sound_mixer(&sv_mixer_fops, -1)) < 0) {
2613 ret = s->dev_mixer;
2614 goto err_dev2;
2615 }
2616 if ((s->dev_midi = register_sound_midi(&sv_midi_fops, -1)) < 0) {
2617 ret = s->dev_midi;
2618 goto err_dev3;
2619 }
2620 if ((s->dev_dmfm = register_sound_special(&sv_dmfm_fops, 15 /* ?? */)) < 0) {
2621 ret = s->dev_dmfm;
2622 goto err_dev4;
2623 }
2624 pci_set_master(pcidev); /* enable bus mastering */
2625 /* initialize the chips */
2626 fs = get_fs();
2627 set_fs(KERNEL_DS);
2628 val = SOUND_MASK_LINE|SOUND_MASK_SYNTH;
2629 mixer_ioctl(s, SOUND_MIXER_WRITE_RECSRC, (unsigned long)&val);
2630 for (i = 0; i < sizeof(initvol)/sizeof(initvol[0]); i++) {
2631 val = initvol[i].vol;
2632 mixer_ioctl(s, initvol[i].mixch, (unsigned long)&val);
2633 }
2634 set_fs(fs);
2635 /* register gameport */
2636 gameport_register_port(&s->gameport);
2637 /* store it in the driver field */
2638 pci_set_drvdata(pcidev, s);
2639 /* put it into driver list */
2640 list_add_tail(&s->devs, &devs);
2641 /* increment devindex */
2642 if (devindex < NR_DEVICE-1)
2643 devindex++;
2644 return 0;
2645
2646 err_dev4:
2647 unregister_sound_midi(s->dev_midi);
2648 err_dev3:
2649 unregister_sound_mixer(s->dev_mixer);
2650 err_dev2:
2651 unregister_sound_dsp(s->dev_audio);
2652 err_dev1:
2653 printk(KERN_ERR "sv: cannot register misc device\n");
2654 free_irq(s->irq, s);
2655 err_irq:
2656 if (s->gameport.io)
2657 release_region(s->gameport.io, SV_EXTENT_GAME);
2658 release_region(s->iosynth, SV_EXTENT_SYNTH);
2659 err_region1:
2660 release_region(s->iomidi, SV_EXTENT_MIDI);
2661 err_region2:
2662 release_region(s->iodmac, SV_EXTENT_DMA);
2663 err_region3:
2664 release_region(s->iodmaa, SV_EXTENT_DMA);
2665 err_region4:
2666 release_region(s->ioenh, SV_EXTENT_ENH);
2667 err_region5:
2668 kfree(s);
2669 return ret;
2670 }
2671
2672 static void __devinit sv_remove(struct pci_dev *dev)
2673 {
2674 struct sv_state *s = pci_get_drvdata(dev);
2675
2676 if (!s)
2677 return;
2678 list_del(&s->devs);
2679 outb(~0, s->ioenh + SV_CODEC_INTMASK); /* disable ints */
2680 synchronize_irq();
2681 inb(s->ioenh + SV_CODEC_STATUS); /* ack interrupts */
2682 wrindir(s, SV_CIENABLE, 0); /* disable DMAA and DMAC */
2683 /*outb(0, s->iodmaa + SV_DMA_RESET);*/
2684 /*outb(0, s->iodmac + SV_DMA_RESET);*/
2685 free_irq(s->irq, s);
2686 if (s->gameport.io) {
2687 gameport_unregister_port(&s->gameport);
2688 release_region(s->gameport.io, SV_EXTENT_GAME);
2689 }
2690 release_region(s->iodmac, SV_EXTENT_DMA);
2691 release_region(s->iodmaa, SV_EXTENT_DMA);
2692 release_region(s->ioenh, SV_EXTENT_ENH);
2693 release_region(s->iomidi, SV_EXTENT_MIDI);
2694 release_region(s->iosynth, SV_EXTENT_SYNTH);
2695 unregister_sound_dsp(s->dev_audio);
2696 unregister_sound_mixer(s->dev_mixer);
2697 unregister_sound_midi(s->dev_midi);
2698 unregister_sound_special(s->dev_dmfm);
2699 kfree(s);
2700 pci_set_drvdata(dev, NULL);
2701 }
2702
2703 static struct pci_device_id id_table[] __devinitdata = {
2704 { PCI_VENDOR_ID_S3, PCI_DEVICE_ID_S3_SONICVIBES, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
2705 { 0, }
2706 };
2707
2708 MODULE_DEVICE_TABLE(pci, id_table);
2709
2710 static struct pci_driver sv_driver = {
2711 name: "sonicvibes",
2712 id_table: id_table,
2713 probe: sv_probe,
2714 remove: sv_remove
2715 };
2716
2717 static int __init init_sonicvibes(void)
2718 {
2719 if (!pci_present()) /* No PCI bus in this machine! */
2720 return -ENODEV;
2721 printk(KERN_INFO "sv: version v0.30 time " __TIME__ " " __DATE__ "\n");
2722 #if 0
2723 if (!(wavetable_mem = __get_free_pages(GFP_KERNEL, 20-PAGE_SHIFT)))
2724 printk(KERN_INFO "sv: cannot allocate 1MB of contiguous nonpageable memory for wavetable data\n");
2725 #endif
2726 return pci_module_init(&sv_driver);
2727 }
2728
2729 static void __exit cleanup_sonicvibes(void)
2730 {
2731 printk(KERN_INFO "sv: unloading\n");
2732 pci_unregister_driver(&sv_driver);
2733 if (wavetable_mem)
2734 free_pages(wavetable_mem, 20-PAGE_SHIFT);
2735 }
2736
2737 module_init(init_sonicvibes);
2738 module_exit(cleanup_sonicvibes);
2739
2740 /* --------------------------------------------------------------------- */
2741
2742 #ifndef MODULE
2743
2744 /* format is: sonicvibes=[reverb] sonicvibesdmaio=dmaioaddr */
2745
2746 static int __init sonicvibes_setup(char *str)
2747 {
2748 static unsigned __initdata nr_dev = 0;
2749
2750 if (nr_dev >= NR_DEVICE)
2751 return 0;
2752 #if 0
2753 if (get_option(&str, &reverb[nr_dev]) == 2)
2754 (void)get_option(&str, &wavetable[nr_dev]);
2755 #else
2756 (void)get_option(&str, &reverb[nr_dev]);
2757 #endif
2758
2759 nr_dev++;
2760 return 1;
2761 }
2762
2763 __setup("sonicvibes=", sonicvibes_setup);
2764
2765 #endif /* MODULE */
2766