1 /*
2  *  linux/sound/oss/dmasound/dmasound_core.c
3  *
4  *
5  *  OSS/Free compatible Atari TT/Falcon and Amiga DMA sound driver for
6  *  Linux/m68k
7  *  Extended to support Power Macintosh for Linux/ppc by Paul Mackerras
8  *
9  *  (c) 1995 by Michael Schlueter & Michael Marte
10  *
11  *  Michael Schlueter (michael@duck.syd.de) did the basic structure of the VFS
12  *  interface and the u-law to signed byte conversion.
13  *
14  *  Michael Marte (marte@informatik.uni-muenchen.de) did the sound queue,
15  *  /dev/mixer, /dev/sndstat and complemented the VFS interface. He would like
16  *  to thank:
17  *    - Michael Schlueter for initial ideas and documentation on the MFP and
18  *	the DMA sound hardware.
19  *    - Therapy? for their CD 'Troublegum' which really made me rock.
20  *
21  *  /dev/sndstat is based on code by Hannu Savolainen, the author of the
22  *  VoxWare family of drivers.
23  *
24  *  This file is subject to the terms and conditions of the GNU General Public
25  *  License.  See the file COPYING in the main directory of this archive
26  *  for more details.
27  *
28  *  History:
29  *
30  *	1995/8/25	First release
31  *
32  *	1995/9/02	Roman Hodek:
33  *			  - Fixed atari_stram_alloc() call, the timer
34  *			    programming and several race conditions
35  *	1995/9/14	Roman Hodek:
36  *			  - After some discussion with Michael Schlueter,
37  *			    revised the interrupt disabling
38  *			  - Slightly speeded up U8->S8 translation by using
39  *			    long operations where possible
40  *			  - Added 4:3 interpolation for /dev/audio
41  *
42  *	1995/9/20	Torsten Scherer:
43  *			  - Fixed a bug in sq_write and changed /dev/audio
44  *			    converting to play at 12517Hz instead of 6258Hz.
45  *
46  *	1995/9/23	Torsten Scherer:
47  *			  - Changed sq_interrupt() and sq_play() to pre-program
48  *			    the DMA for another frame while there's still one
49  *			    running. This allows the IRQ response to be
50  *			    arbitrarily delayed and playing will still continue.
51  *
52  *	1995/10/14	Guenther Kelleter, Torsten Scherer:
53  *			  - Better support for Falcon audio (the Falcon doesn't
54  *			    raise an IRQ at the end of a frame, but at the
55  *			    beginning instead!). uses 'if (codec_dma)' in lots
56  *			    of places to simply switch between Falcon and TT
57  *			    code.
58  *
59  *	1995/11/06	Torsten Scherer:
60  *			  - Started introducing a hardware abstraction scheme
61  *			    (may perhaps also serve for Amigas?)
62  *			  - Can now play samples at almost all frequencies by
63  *			    means of a more generalized expand routine
64  *			  - Takes a good deal of care to cut data only at
65  *			    sample sizes
66  *			  - Buffer size is now a kernel runtime option
67  *			  - Implemented fsync() & several minor improvements
68  *			Guenther Kelleter:
69  *			  - Useful hints and bug fixes
70  *			  - Cross-checked it for Falcons
71  *
72  *	1996/3/9	Geert Uytterhoeven:
73  *			  - Support added for Amiga, A-law, 16-bit little
74  *			    endian.
75  *			  - Unification to drivers/sound/dmasound.c.
76  *
77  *	1996/4/6	Martin Mitchell:
78  *			  - Updated to 1.3 kernel.
79  *
80  *	1996/6/13       Topi Kanerva:
81  *			  - Fixed things that were broken (mainly the amiga
82  *			    14-bit routines)
83  *			  - /dev/sndstat shows now the real hardware frequency
84  *			  - The lowpass filter is disabled by default now
85  *
86  *	1996/9/25	Geert Uytterhoeven:
87  *			  - Modularization
88  *
89  *	1998/6/10	Andreas Schwab:
90  *			  - Converted to use sound_core
91  *
92  *	1999/12/28	Richard Zidlicky:
93  *			  - Added support for Q40
94  *
95  *	2000/2/27	Geert Uytterhoeven:
96  *			  - Clean up and split the code into 4 parts:
97  *			      o dmasound_core: machine-independent code
98  *			      o dmasound_atari: Atari TT and Falcon support
99  *			      o dmasound_awacs: Apple PowerMac support
100  *			      o dmasound_paula: Amiga support
101  *
102  *	2000/3/25	Geert Uytterhoeven:
103  *			  - Integration of dmasound_q40
104  *			  - Small clean ups
105  *
106  *	2001/01/26 [1.0] Iain Sandoe
107  *			  - make /dev/sndstat show revision & edition info.
108  *			  - since dmasound.mach.sq_setup() can fail on pmac
109  *			    its type has been changed to int and the returns
110  *			    are checked.
111  *		   [1.1]  - stop missing translations from being called.
112  *	2001/02/08 [1.2]  - remove unused translation tables & move machine-
113  *			    specific tables to low-level.
114  *			  - return correct info. for SNDCTL_DSP_GETFMTS.
115  *		   [1.3]  - implement SNDCTL_DSP_GETCAPS fully.
116  *		   [1.4]  - make /dev/sndstat text length usage deterministic.
117  *			  - make /dev/sndstat call to low-level
118  *			    dmasound.mach.state_info() pass max space to ll driver.
119  *			  - tidy startup banners and output info.
120  *		   [1.5]  - tidy up a little (removed some unused #defines in
121  *			    dmasound.h)
122  *			  - fix up HAS_RECORD conditionalisation.
123  *			  - add record code in places it is missing...
124  *			  - change buf-sizes to bytes to allow < 1kb for pmac
125  *			    if user param entry is < 256 the value is taken to
126  *			    be in kb > 256 is taken to be in bytes.
127  *			  - make default buff/frag params conditional on
128  *			    machine to allow smaller values for pmac.
129  *			  - made the ioctls, read & write comply with the OSS
130  *			    rules on setting params.
131  *			  - added parsing of _setup() params for record.
132  *	2001/04/04 [1.6]  - fix bug where sample rates higher than maximum were
133  *			    being reported as OK.
134  *			  - fix open() to return -EBUSY as per OSS doc. when
135  *			    audio is in use - this is independent of O_NOBLOCK.
136  *			  - fix bug where SNDCTL_DSP_POST was blocking.
137  */
138 
139  /* Record capability notes 30/01/2001:
140   * At present these observations apply only to pmac LL driver (the only one
141   * that can do record, at present).  However, if other LL drivers for machines
142   * with record are added they may apply.
143   *
144   * The fragment parameters for the record and play channels are separate.
145   * However, if the driver is opened O_RDWR there is no way (in the current OSS
146   * API) to specify their values independently for the record and playback
147   * channels.  Since the only common factor between the input & output is the
148   * sample rate (on pmac) it should be possible to open /dev/dspX O_WRONLY and
149   * /dev/dspY O_RDONLY.  The input & output channels could then have different
150   * characteristics (other than the first that sets sample rate claiming the
151   * right to set it for ever).  As it stands, the format, channels, number of
152   * bits & sample rate are assumed to be common.  In the future perhaps these
153   * should be the responsibility of the LL driver - and then if a card really
154   * does not share items between record & playback they can be specified
155   * separately.
156 */
157 
158 /* Thread-safeness of shared_resources notes: 31/01/2001
159  * If the user opens O_RDWR and then splits record & play between two threads
160  * both of which inherit the fd - and then starts changing things from both
161  * - we will have difficulty telling.
162  *
163  * It's bad application coding - but ...
164  * TODO: think about how to sort this out... without bogging everything down in
165  * semaphores.
166  *
167  * Similarly, the OSS spec says "all changes to parameters must be between
168  * open() and the first read() or write(). - and a bit later on (by
169  * implication) "between SNDCTL_DSP_RESET and the first read() or write() after
170  * it".  If the app is multi-threaded and this rule is broken between threads
171  * we will have trouble spotting it - and the fault will be rather obscure :-(
172  *
173  * We will try and put out at least a kmsg if we see it happen... but I think
174  * it will be quite hard to trap it with an -EXXX return... because we can't
175  * see the fault until after the damage is done.
176 */
177 
178 #include <linux/module.h>
179 #include <linux/slab.h>
180 #include <linux/sound.h>
181 #include <linux/init.h>
182 #include <linux/soundcard.h>
183 #include <linux/poll.h>
184 #include <linux/mutex.h>
185 #include <linux/sched/signal.h>
186 
187 #include <linux/uaccess.h>
188 
189 #include "dmasound.h"
190 
191 #define DMASOUND_CORE_REVISION 1
192 #define DMASOUND_CORE_EDITION 6
193 
194     /*
195      *  Declarations
196      */
197 
198 static DEFINE_MUTEX(dmasound_core_mutex);
199 int dmasound_catchRadius = 0;
200 module_param(dmasound_catchRadius, int, 0);
201 
202 static unsigned int numWriteBufs = DEFAULT_N_BUFFERS;
203 module_param(numWriteBufs, int, 0);
204 static unsigned int writeBufSize = DEFAULT_BUFF_SIZE ;	/* in bytes */
205 module_param(writeBufSize, int, 0);
206 
207 MODULE_LICENSE("GPL");
208 
209 #ifdef MODULE
210 static int sq_unit = -1;
211 static int mixer_unit = -1;
212 static int state_unit = -1;
213 static int irq_installed;
214 #endif /* MODULE */
215 
216 /* control over who can modify resources shared between play/record */
217 static fmode_t shared_resource_owner;
218 static int shared_resources_initialised;
219 
220     /*
221      *  Mid level stuff
222      */
223 
224 struct sound_settings dmasound = {
225 	.lock = __SPIN_LOCK_UNLOCKED(dmasound.lock)
226 };
227 
228 static inline void sound_silence(void)
229 {
230 	dmasound.mach.silence(); /* _MUST_ stop DMA */
231 }
232 
233 static inline int sound_set_format(int format)
234 {
235 	return dmasound.mach.setFormat(format);
236 }
237 
238 
239 static int sound_set_speed(int speed)
240 {
241 	if (speed < 0)
242 		return dmasound.soft.speed;
243 
244 	/* trap out-of-range speed settings.
245 	   at present we allow (arbitrarily) low rates - using soft
246 	   up-conversion - but we can't allow > max because there is
247 	   no soft down-conversion.
248 	*/
249 	if (dmasound.mach.max_dsp_speed &&
250 	   (speed > dmasound.mach.max_dsp_speed))
251 		speed = dmasound.mach.max_dsp_speed ;
252 
253 	dmasound.soft.speed = speed;
254 
255 	if (dmasound.minDev == SND_DEV_DSP)
256 		dmasound.dsp.speed = dmasound.soft.speed;
257 
258 	return dmasound.soft.speed;
259 }
260 
261 static int sound_set_stereo(int stereo)
262 {
263 	if (stereo < 0)
264 		return dmasound.soft.stereo;
265 
266 	stereo = !!stereo;    /* should be 0 or 1 now */
267 
268 	dmasound.soft.stereo = stereo;
269 	if (dmasound.minDev == SND_DEV_DSP)
270 		dmasound.dsp.stereo = stereo;
271 
272 	return stereo;
273 }
274 
275 static ssize_t sound_copy_translate(TRANS *trans, const u_char __user *userPtr,
276 				    size_t userCount, u_char frame[],
277 				    ssize_t *frameUsed, ssize_t frameLeft)
278 {
279 	ssize_t (*ct_func)(const u_char __user *, size_t, u_char *, ssize_t *, ssize_t);
280 
281 	switch (dmasound.soft.format) {
282 	    case AFMT_MU_LAW:
283 		ct_func = trans->ct_ulaw;
284 		break;
285 	    case AFMT_A_LAW:
286 		ct_func = trans->ct_alaw;
287 		break;
288 	    case AFMT_S8:
289 		ct_func = trans->ct_s8;
290 		break;
291 	    case AFMT_U8:
292 		ct_func = trans->ct_u8;
293 		break;
294 	    case AFMT_S16_BE:
295 		ct_func = trans->ct_s16be;
296 		break;
297 	    case AFMT_U16_BE:
298 		ct_func = trans->ct_u16be;
299 		break;
300 	    case AFMT_S16_LE:
301 		ct_func = trans->ct_s16le;
302 		break;
303 	    case AFMT_U16_LE:
304 		ct_func = trans->ct_u16le;
305 		break;
306 	    default:
307 		return 0;
308 	}
309 	/* if the user has requested a non-existent translation don't try
310 	   to call it but just return 0 bytes moved
311 	*/
312 	if (ct_func)
313 		return ct_func(userPtr, userCount, frame, frameUsed, frameLeft);
314 	return 0;
315 }
316 
317     /*
318      *  /dev/mixer abstraction
319      */
320 
321 static struct {
322     int busy;
323     int modify_counter;
324 } mixer;
325 
326 static int mixer_open(struct inode *inode, struct file *file)
327 {
328 	mutex_lock(&dmasound_core_mutex);
329 	if (!try_module_get(dmasound.mach.owner)) {
330 		mutex_unlock(&dmasound_core_mutex);
331 		return -ENODEV;
332 	}
333 	mixer.busy = 1;
334 	mutex_unlock(&dmasound_core_mutex);
335 	return 0;
336 }
337 
338 static int mixer_release(struct inode *inode, struct file *file)
339 {
340 	mutex_lock(&dmasound_core_mutex);
341 	mixer.busy = 0;
342 	module_put(dmasound.mach.owner);
343 	mutex_unlock(&dmasound_core_mutex);
344 	return 0;
345 }
346 
347 static int mixer_ioctl(struct file *file, u_int cmd, u_long arg)
348 {
349 	if (_SIOC_DIR(cmd) & _SIOC_WRITE)
350 	    mixer.modify_counter++;
351 	switch (cmd) {
352 	    case OSS_GETVERSION:
353 		return IOCTL_OUT(arg, SOUND_VERSION);
354 	    case SOUND_MIXER_INFO:
355 		{
356 		    mixer_info info;
357 		    memset(&info, 0, sizeof(info));
358 		    strscpy(info.id, dmasound.mach.name2, sizeof(info.id));
359 		    strscpy(info.name, dmasound.mach.name2, sizeof(info.name));
360 		    info.modify_counter = mixer.modify_counter;
361 		    if (copy_to_user((void __user *)arg, &info, sizeof(info)))
362 			    return -EFAULT;
363 		    return 0;
364 		}
365 	}
366 	if (dmasound.mach.mixer_ioctl)
367 	    return dmasound.mach.mixer_ioctl(cmd, arg);
368 	return -EINVAL;
369 }
370 
371 static long mixer_unlocked_ioctl(struct file *file, u_int cmd, u_long arg)
372 {
373 	int ret;
374 
375 	mutex_lock(&dmasound_core_mutex);
376 	ret = mixer_ioctl(file, cmd, arg);
377 	mutex_unlock(&dmasound_core_mutex);
378 
379 	return ret;
380 }
381 
382 static const struct file_operations mixer_fops =
383 {
384 	.owner		= THIS_MODULE,
385 	.llseek		= no_llseek,
386 	.unlocked_ioctl	= mixer_unlocked_ioctl,
387 	.compat_ioctl	= compat_ptr_ioctl,
388 	.open		= mixer_open,
389 	.release	= mixer_release,
390 };
391 
392 static void mixer_init(void)
393 {
394 #ifndef MODULE
395 	int mixer_unit;
396 #endif
397 	mixer_unit = register_sound_mixer(&mixer_fops, -1);
398 	if (mixer_unit < 0)
399 		return;
400 
401 	mixer.busy = 0;
402 	dmasound.treble = 0;
403 	dmasound.bass = 0;
404 	if (dmasound.mach.mixer_init)
405 	    dmasound.mach.mixer_init();
406 }
407 
408 
409     /*
410      *  Sound queue stuff, the heart of the driver
411      */
412 
413 struct sound_queue dmasound_write_sq;
414 static void sq_reset_output(void) ;
415 
416 static int sq_allocate_buffers(struct sound_queue *sq, int num, int size)
417 {
418 	int i;
419 
420 	if (sq->buffers)
421 		return 0;
422 	sq->numBufs = num;
423 	sq->bufSize = size;
424 	sq->buffers = kmalloc_array (num, sizeof(char *), GFP_KERNEL);
425 	if (!sq->buffers)
426 		return -ENOMEM;
427 	for (i = 0; i < num; i++) {
428 		sq->buffers[i] = dmasound.mach.dma_alloc(size, GFP_KERNEL);
429 		if (!sq->buffers[i]) {
430 			while (i--)
431 				dmasound.mach.dma_free(sq->buffers[i], size);
432 			kfree(sq->buffers);
433 			sq->buffers = NULL;
434 			return -ENOMEM;
435 		}
436 	}
437 	return 0;
438 }
439 
440 static void sq_release_buffers(struct sound_queue *sq)
441 {
442 	int i;
443 
444 	if (sq->buffers) {
445 		for (i = 0; i < sq->numBufs; i++)
446 			dmasound.mach.dma_free(sq->buffers[i], sq->bufSize);
447 		kfree(sq->buffers);
448 		sq->buffers = NULL;
449 	}
450 }
451 
452 
453 static int sq_setup(struct sound_queue *sq)
454 {
455 	int (*setup_func)(void) = NULL;
456 	int hard_frame ;
457 
458 	if (sq->locked) { /* are we already set? - and not changeable */
459 #ifdef DEBUG_DMASOUND
460 printk("dmasound_core: tried to sq_setup a locked queue\n") ;
461 #endif
462 		return -EINVAL ;
463 	}
464 	sq->locked = 1 ; /* don't think we have a race prob. here _check_ */
465 
466 	/* make sure that the parameters are set up
467 	   This should have been done already...
468 	*/
469 
470 	dmasound.mach.init();
471 
472 	/* OK.  If the user has set fragment parameters explicitly, then we
473 	   should leave them alone... as long as they are valid.
474 	   Invalid user fragment params can occur if we allow the whole buffer
475 	   to be used when the user requests the fragments sizes (with no soft
476 	   x-lation) and then the user subsequently sets a soft x-lation that
477 	   requires increased internal buffering.
478 
479 	   Othwerwise (if the user did not set them) OSS says that we should
480 	   select frag params on the basis of 0.5 s output & 0.1 s input
481 	   latency. (TODO.  For now we will copy in the defaults.)
482 	*/
483 
484 	if (sq->user_frags <= 0) {
485 		sq->max_count = sq->numBufs ;
486 		sq->max_active = sq->numBufs ;
487 		sq->block_size = sq->bufSize;
488 		/* set up the user info */
489 		sq->user_frags = sq->numBufs ;
490 		sq->user_frag_size = sq->bufSize ;
491 		sq->user_frag_size *=
492 			(dmasound.soft.size * (dmasound.soft.stereo+1) ) ;
493 		sq->user_frag_size /=
494 			(dmasound.hard.size * (dmasound.hard.stereo+1) ) ;
495 	} else {
496 		/* work out requested block size */
497 		sq->block_size = sq->user_frag_size ;
498 		sq->block_size *=
499 			(dmasound.hard.size * (dmasound.hard.stereo+1) ) ;
500 		sq->block_size /=
501 			(dmasound.soft.size * (dmasound.soft.stereo+1) ) ;
502 		/* the user wants to write frag-size chunks */
503 		sq->block_size *= dmasound.hard.speed ;
504 		sq->block_size /= dmasound.soft.speed ;
505 		/* this only works for size values which are powers of 2 */
506 		hard_frame =
507 			(dmasound.hard.size * (dmasound.hard.stereo+1))/8 ;
508 		sq->block_size +=  (hard_frame - 1) ;
509 		sq->block_size &= ~(hard_frame - 1) ; /* make sure we are aligned */
510 		/* let's just check for obvious mistakes */
511 		if ( sq->block_size <= 0 || sq->block_size > sq->bufSize) {
512 #ifdef DEBUG_DMASOUND
513 printk("dmasound_core: invalid frag size (user set %d)\n", sq->user_frag_size) ;
514 #endif
515 			sq->block_size = sq->bufSize ;
516 		}
517 		if ( sq->user_frags <= sq->numBufs ) {
518 			sq->max_count = sq->user_frags ;
519 			/* if user has set max_active - then use it */
520 			sq->max_active = (sq->max_active <= sq->max_count) ?
521 				sq->max_active : sq->max_count ;
522 		} else {
523 #ifdef DEBUG_DMASOUND
524 printk("dmasound_core: invalid frag count (user set %d)\n", sq->user_frags) ;
525 #endif
526 			sq->max_count =
527 			sq->max_active = sq->numBufs ;
528 		}
529 	}
530 	sq->front = sq->count = sq->rear_size = 0;
531 	sq->syncing = 0;
532 	sq->active = 0;
533 
534 	if (sq == &write_sq) {
535 	    sq->rear = -1;
536 	    setup_func = dmasound.mach.write_sq_setup;
537 	}
538 	if (setup_func)
539 	    return setup_func();
540 	return 0 ;
541 }
542 
543 static inline void sq_play(void)
544 {
545 	dmasound.mach.play();
546 }
547 
548 static ssize_t sq_write(struct file *file, const char __user *src, size_t uLeft,
549 			loff_t *ppos)
550 {
551 	ssize_t uWritten = 0;
552 	u_char *dest;
553 	ssize_t uUsed = 0, bUsed, bLeft;
554 	unsigned long flags ;
555 
556 	/* ++TeSche: Is something like this necessary?
557 	 * Hey, that's an honest question! Or does any other part of the
558 	 * filesystem already checks this situation? I really don't know.
559 	 */
560 	if (uLeft == 0)
561 		return 0;
562 
563 	/* implement any changes we have made to the soft/hard params.
564 	   this is not satisfactory really, all we have done up to now is to
565 	   say what we would like - there hasn't been any real checking of capability
566 	*/
567 
568 	if (shared_resources_initialised == 0) {
569 		dmasound.mach.init() ;
570 		shared_resources_initialised = 1 ;
571 	}
572 
573 	/* set up the sq if it is not already done. This may seem a dumb place
574 	   to do it - but it is what OSS requires.  It means that write() can
575 	   return memory allocation errors.  To avoid this possibility use the
576 	   GETBLKSIZE or GETOSPACE ioctls (after you've fiddled with all the
577 	   params you want to change) - these ioctls also force the setup.
578 	*/
579 
580 	if (write_sq.locked == 0) {
581 		if ((uWritten = sq_setup(&write_sq)) < 0) return uWritten ;
582 		uWritten = 0 ;
583 	}
584 
585 /* FIXME: I think that this may be the wrong behaviour when we get strapped
586 	for time and the cpu is close to being (or actually) behind in sending data.
587 	- because we've lost the time that the N samples, already in the buffer,
588 	would have given us to get here with the next lot from the user.
589 */
590 	/* The interrupt doesn't start to play the last, incomplete frame.
591 	 * Thus we can append to it without disabling the interrupts! (Note
592 	 * also that write_sq.rear isn't affected by the interrupt.)
593 	 */
594 
595 	/* as of 1.6 this behaviour changes if SNDCTL_DSP_POST has been issued:
596 	   this will mimic the behaviour of syncing and allow the sq_play() to
597 	   queue a partial fragment.  Since sq_play() may/will be called from
598 	   the IRQ handler - at least on Pmac we have to deal with it.
599 	   The strategy - possibly not optimum - is to kill _POST status if we
600 	   get here.  This seems, at least, reasonable - in the sense that POST
601 	   is supposed to indicate that we might not write before the queue
602 	   is drained - and if we get here in time then it does not apply.
603 	*/
604 
605 	spin_lock_irqsave(&dmasound.lock, flags);
606 	write_sq.syncing &= ~2 ; /* take out POST status */
607 	spin_unlock_irqrestore(&dmasound.lock, flags);
608 
609 	if (write_sq.count > 0 &&
610 	    (bLeft = write_sq.block_size-write_sq.rear_size) > 0) {
611 		dest = write_sq.buffers[write_sq.rear];
612 		bUsed = write_sq.rear_size;
613 		uUsed = sound_copy_translate(dmasound.trans_write, src, uLeft,
614 					     dest, &bUsed, bLeft);
615 		if (uUsed <= 0)
616 			return uUsed;
617 		src += uUsed;
618 		uWritten += uUsed;
619 		uLeft = (uUsed <= uLeft) ? (uLeft - uUsed) : 0 ; /* paranoia */
620 		write_sq.rear_size = bUsed;
621 	}
622 
623 	while (uLeft) {
624 		DEFINE_WAIT(wait);
625 
626 		while (write_sq.count >= write_sq.max_active) {
627 			prepare_to_wait(&write_sq.action_queue, &wait, TASK_INTERRUPTIBLE);
628 			sq_play();
629 			if (write_sq.non_blocking) {
630 				finish_wait(&write_sq.action_queue, &wait);
631 				return uWritten > 0 ? uWritten : -EAGAIN;
632 			}
633 			if (write_sq.count < write_sq.max_active)
634 				break;
635 
636 			schedule_timeout(HZ);
637 			if (signal_pending(current)) {
638 				finish_wait(&write_sq.action_queue, &wait);
639 				return uWritten > 0 ? uWritten : -EINTR;
640 			}
641 		}
642 
643 		finish_wait(&write_sq.action_queue, &wait);
644 
645 		/* Here, we can avoid disabling the interrupt by first
646 		 * copying and translating the data, and then updating
647 		 * the write_sq variables. Until this is done, the interrupt
648 		 * won't see the new frame and we can work on it
649 		 * undisturbed.
650 		 */
651 
652 		dest = write_sq.buffers[(write_sq.rear+1) % write_sq.max_count];
653 		bUsed = 0;
654 		bLeft = write_sq.block_size;
655 		uUsed = sound_copy_translate(dmasound.trans_write, src, uLeft,
656 					     dest, &bUsed, bLeft);
657 		if (uUsed <= 0)
658 			break;
659 		src += uUsed;
660 		uWritten += uUsed;
661 		uLeft = (uUsed <= uLeft) ? (uLeft - uUsed) : 0 ; /* paranoia */
662 		if (bUsed) {
663 			write_sq.rear = (write_sq.rear+1) % write_sq.max_count;
664 			write_sq.rear_size = bUsed;
665 			write_sq.count++;
666 		}
667 	} /* uUsed may have been 0 */
668 
669 	sq_play();
670 
671 	return uUsed < 0? uUsed: uWritten;
672 }
673 
674 static __poll_t sq_poll(struct file *file, struct poll_table_struct *wait)
675 {
676 	__poll_t mask = 0;
677 	int retVal;
678 
679 	if (write_sq.locked == 0) {
680 		if ((retVal = sq_setup(&write_sq)) < 0)
681 			return retVal;
682 		return 0;
683 	}
684 	if (file->f_mode & FMODE_WRITE )
685 		poll_wait(file, &write_sq.action_queue, wait);
686 	if (file->f_mode & FMODE_WRITE)
687 		if (write_sq.count < write_sq.max_active || write_sq.block_size - write_sq.rear_size > 0)
688 			mask |= EPOLLOUT | EPOLLWRNORM;
689 	return mask;
690 
691 }
692 
693 static inline void sq_init_waitqueue(struct sound_queue *sq)
694 {
695 	init_waitqueue_head(&sq->action_queue);
696 	init_waitqueue_head(&sq->open_queue);
697 	init_waitqueue_head(&sq->sync_queue);
698 	sq->busy = 0;
699 }
700 
701 #if 0 /* blocking open() */
702 static inline void sq_wake_up(struct sound_queue *sq, struct file *file,
703 			      fmode_t mode)
704 {
705 	if (file->f_mode & mode) {
706 		sq->busy = 0; /* CHECK: IS THIS OK??? */
707 		WAKE_UP(sq->open_queue);
708 	}
709 }
710 #endif
711 
712 static int sq_open2(struct sound_queue *sq, struct file *file, fmode_t mode,
713 		    int numbufs, int bufsize)
714 {
715 	int rc = 0;
716 
717 	if (file->f_mode & mode) {
718 		if (sq->busy) {
719 #if 0 /* blocking open() */
720 			rc = -EBUSY;
721 			if (file->f_flags & O_NONBLOCK)
722 				return rc;
723 			rc = -EINTR;
724 			if (wait_event_interruptible(sq->open_queue, !sq->busy))
725 				return rc;
726 			rc = 0;
727 #else
728 			/* OSS manual says we will return EBUSY regardless
729 			   of O_NOBLOCK.
730 			*/
731 			return -EBUSY ;
732 #endif
733 		}
734 		sq->busy = 1; /* Let's play spot-the-race-condition */
735 
736 		/* allocate the default number & size of buffers.
737 		   (i.e. specified in _setup() or as module params)
738 		   can't be changed at the moment - but _could_ be perhaps
739 		   in the setfragments ioctl.
740 		*/
741 		if (( rc = sq_allocate_buffers(sq, numbufs, bufsize))) {
742 #if 0 /* blocking open() */
743 			sq_wake_up(sq, file, mode);
744 #else
745 			sq->busy = 0 ;
746 #endif
747 			return rc;
748 		}
749 
750 		sq->non_blocking = file->f_flags & O_NONBLOCK;
751 	}
752 	return rc;
753 }
754 
755 #define write_sq_init_waitqueue()	sq_init_waitqueue(&write_sq)
756 #if 0 /* blocking open() */
757 #define write_sq_wake_up(file)		sq_wake_up(&write_sq, file, FMODE_WRITE)
758 #endif
759 #define write_sq_release_buffers()	sq_release_buffers(&write_sq)
760 #define write_sq_open(file)	\
761 	sq_open2(&write_sq, file, FMODE_WRITE, numWriteBufs, writeBufSize )
762 
763 static int sq_open(struct inode *inode, struct file *file)
764 {
765 	int rc;
766 
767 	mutex_lock(&dmasound_core_mutex);
768 	if (!try_module_get(dmasound.mach.owner)) {
769 		mutex_unlock(&dmasound_core_mutex);
770 		return -ENODEV;
771 	}
772 
773 	rc = write_sq_open(file); /* checks the f_mode */
774 	if (rc)
775 		goto out;
776 	if (file->f_mode & FMODE_READ) {
777 		/* TODO: if O_RDWR, release any resources grabbed by write part */
778 		rc = -ENXIO ; /* I think this is what is required by open(2) */
779 		goto out;
780 	}
781 
782 	if (dmasound.mach.sq_open)
783 	    dmasound.mach.sq_open(file->f_mode);
784 
785 	/* CHECK whether this is sensible - in the case that dsp0 could be opened
786 	  O_RDONLY and dsp1 could be opened O_WRONLY
787 	*/
788 
789 	dmasound.minDev = iminor(inode) & 0x0f;
790 
791 	/* OK. - we should make some attempt at consistency. At least the H'ware
792 	   options should be set with a valid mode.  We will make it that the LL
793 	   driver must supply defaults for hard & soft params.
794 	*/
795 
796 	if (shared_resource_owner == 0) {
797 		/* you can make this AFMT_U8/mono/8K if you want to mimic old
798 		   OSS behaviour - while we still have soft translations ;-) */
799 		dmasound.soft = dmasound.mach.default_soft ;
800 		dmasound.dsp = dmasound.mach.default_soft ;
801 		dmasound.hard = dmasound.mach.default_hard ;
802 	}
803 
804 #ifndef DMASOUND_STRICT_OSS_COMPLIANCE
805 	/* none of the current LL drivers can actually do this "native" at the moment
806 	   OSS does not really require us to supply /dev/audio if we can't do it.
807 	*/
808 	if (dmasound.minDev == SND_DEV_AUDIO) {
809 		sound_set_speed(8000);
810 		sound_set_stereo(0);
811 		sound_set_format(AFMT_MU_LAW);
812 	}
813 #endif
814 	mutex_unlock(&dmasound_core_mutex);
815 	return 0;
816  out:
817 	module_put(dmasound.mach.owner);
818 	mutex_unlock(&dmasound_core_mutex);
819 	return rc;
820 }
821 
822 static void sq_reset_output(void)
823 {
824 	sound_silence(); /* this _must_ stop DMA, we might be about to lose the buffers */
825 	write_sq.active = 0;
826 	write_sq.count = 0;
827 	write_sq.rear_size = 0;
828 	/* write_sq.front = (write_sq.rear+1) % write_sq.max_count;*/
829 	write_sq.front = 0 ;
830 	write_sq.rear = -1 ; /* same as for set-up */
831 
832 	/* OK - we can unlock the parameters and fragment settings */
833 	write_sq.locked = 0 ;
834 	write_sq.user_frags = 0 ;
835 	write_sq.user_frag_size = 0 ;
836 }
837 
838 static void sq_reset(void)
839 {
840 	sq_reset_output() ;
841 	/* we could consider resetting the shared_resources_owner here... but I
842 	   think it is probably still rather non-obvious to application writer
843 	*/
844 
845 	/* we release everything else though */
846 	shared_resources_initialised = 0 ;
847 }
848 
849 static int sq_fsync(void)
850 {
851 	int rc = 0;
852 	int timeout = 5;
853 
854 	write_sq.syncing |= 1;
855 	sq_play();	/* there may be an incomplete frame waiting */
856 
857 	while (write_sq.active) {
858 		wait_event_interruptible_timeout(write_sq.sync_queue,
859 						 !write_sq.active, HZ);
860 		if (signal_pending(current)) {
861 			/* While waiting for audio output to drain, an
862 			 * interrupt occurred.  Stop audio output immediately
863 			 * and clear the queue. */
864 			sq_reset_output();
865 			rc = -EINTR;
866 			break;
867 		}
868 		if (!--timeout) {
869 			printk(KERN_WARNING "dmasound: Timeout draining output\n");
870 			sq_reset_output();
871 			rc = -EIO;
872 			break;
873 		}
874 	}
875 
876 	/* flag no sync regardless of whether we had a DSP_POST or not */
877 	write_sq.syncing = 0 ;
878 	return rc;
879 }
880 
881 static int sq_release(struct inode *inode, struct file *file)
882 {
883 	int rc = 0;
884 
885 	mutex_lock(&dmasound_core_mutex);
886 
887 	if (file->f_mode & FMODE_WRITE) {
888 		if (write_sq.busy)
889 			rc = sq_fsync();
890 
891 		sq_reset_output() ; /* make sure dma is stopped and all is quiet */
892 		write_sq_release_buffers();
893 		write_sq.busy = 0;
894 	}
895 
896 	if (file->f_mode & shared_resource_owner) { /* it's us that has them */
897 		shared_resource_owner = 0 ;
898 		shared_resources_initialised = 0 ;
899 		dmasound.hard = dmasound.mach.default_hard ;
900 	}
901 
902 	module_put(dmasound.mach.owner);
903 
904 #if 0 /* blocking open() */
905 	/* Wake up a process waiting for the queue being released.
906 	 * Note: There may be several processes waiting for a call
907 	 * to open() returning. */
908 
909 	/* Iain: hmm I don't understand this next comment ... */
910 	/* There is probably a DOS atack here. They change the mode flag. */
911 	/* XXX add check here,*/
912 	read_sq_wake_up(file); /* checks f_mode */
913 	write_sq_wake_up(file); /* checks f_mode */
914 #endif /* blocking open() */
915 
916 	mutex_unlock(&dmasound_core_mutex);
917 
918 	return rc;
919 }
920 
921 /* here we see if we have a right to modify format, channels, size and so on
922    if no-one else has claimed it already then we do...
923 
924    TODO: We might change this to mask O_RDWR such that only one or the other channel
925    is the owner - if we have problems.
926 */
927 
928 static int shared_resources_are_mine(fmode_t md)
929 {
930 	if (shared_resource_owner)
931 		return (shared_resource_owner & md) != 0;
932 	else {
933 		shared_resource_owner = md ;
934 		return 1 ;
935 	}
936 }
937 
938 /* if either queue is locked we must deny the right to change shared params
939 */
940 
941 static int queues_are_quiescent(void)
942 {
943 	if (write_sq.locked)
944 		return 0 ;
945 	return 1 ;
946 }
947 
948 /* check and set a queue's fragments per user's wishes...
949    we will check against the pre-defined literals and the actual sizes.
950    This is a bit fraught - because soft translations can mess with our
951    buffer requirements *after* this call - OSS says "call setfrags first"
952 */
953 
954 /* It is possible to replace all the -EINVAL returns with an override that
955    just puts the allowable value in.  This may be what many OSS apps require
956 */
957 
958 static int set_queue_frags(struct sound_queue *sq, int bufs, int size)
959 {
960 	if (sq->locked) {
961 #ifdef DEBUG_DMASOUND
962 printk("dmasound_core: tried to set_queue_frags on a locked queue\n") ;
963 #endif
964 		return -EINVAL ;
965 	}
966 
967 	if ((size < MIN_FRAG_SIZE) || (size > MAX_FRAG_SIZE))
968 		return -EINVAL ;
969 	size = (1<<size) ; /* now in bytes */
970 	if (size > sq->bufSize)
971 		return -EINVAL ; /* this might still not work */
972 
973 	if (bufs <= 0)
974 		return -EINVAL ;
975 	if (bufs > sq->numBufs) /* the user is allowed say "don't care" with 0x7fff */
976 		bufs = sq->numBufs ;
977 
978 	/* there is, currently, no way to specify max_active separately
979 	   from max_count.  This could be a LL driver issue - I guess
980 	   if there is a requirement for these values to be different then
981 	  we will have to pass that info. up to this level.
982 	*/
983 	sq->user_frags =
984 	sq->max_active = bufs ;
985 	sq->user_frag_size = size ;
986 
987 	return 0 ;
988 }
989 
990 static int sq_ioctl(struct file *file, u_int cmd, u_long arg)
991 {
992 	int val, result;
993 	u_long fmt;
994 	int data;
995 	int size, nbufs;
996 	audio_buf_info info;
997 
998 	switch (cmd) {
999 	case SNDCTL_DSP_RESET:
1000 		sq_reset();
1001 		return 0;
1002 	case SNDCTL_DSP_GETFMTS:
1003 		fmt = dmasound.mach.hardware_afmts ; /* this is what OSS says.. */
1004 		return IOCTL_OUT(arg, fmt);
1005 	case SNDCTL_DSP_GETBLKSIZE:
1006 		/* this should tell the caller about bytes that the app can
1007 		   read/write - the app doesn't care about our internal buffers.
1008 		   We force sq_setup() here as per OSS 1.1 (which should
1009 		   compute the values necessary).
1010 		   Since there is no mechanism to specify read/write separately, for
1011 		   fds opened O_RDWR, the write_sq values will, arbitrarily, overwrite
1012 		   the read_sq ones.
1013 		*/
1014 		size = 0 ;
1015 		if (file->f_mode & FMODE_WRITE) {
1016 			if ( !write_sq.locked )
1017 				sq_setup(&write_sq) ;
1018 			size = write_sq.user_frag_size ;
1019 		}
1020 		return IOCTL_OUT(arg, size);
1021 	case SNDCTL_DSP_POST:
1022 		/* all we are going to do is to tell the LL that any
1023 		   partial frags can be queued for output.
1024 		   The LL will have to clear this flag when last output
1025 		   is queued.
1026 		*/
1027 		write_sq.syncing |= 0x2 ;
1028 		sq_play() ;
1029 		return 0 ;
1030 	case SNDCTL_DSP_SYNC:
1031 		/* This call, effectively, has the same behaviour as SNDCTL_DSP_RESET
1032 		   except that it waits for output to finish before resetting
1033 		   everything - read, however, is killed immediately.
1034 		*/
1035 		result = 0 ;
1036 		if (file->f_mode & FMODE_WRITE) {
1037 			result = sq_fsync();
1038 			sq_reset_output() ;
1039 		}
1040 		/* if we are the shared resource owner then release them */
1041 		if (file->f_mode & shared_resource_owner)
1042 			shared_resources_initialised = 0 ;
1043 		return result ;
1044 	case SOUND_PCM_READ_RATE:
1045 		return IOCTL_OUT(arg, dmasound.soft.speed);
1046 	case SNDCTL_DSP_SPEED:
1047 		/* changing this on the fly will have weird effects on the sound.
1048 		   Where there are rate conversions implemented in soft form - it
1049 		   will cause the _ctx_xxx() functions to be substituted.
1050 		   However, there doesn't appear to be any reason to dis-allow it from
1051 		   a driver pov.
1052 		*/
1053 		if (shared_resources_are_mine(file->f_mode)) {
1054 			IOCTL_IN(arg, data);
1055 			data = sound_set_speed(data) ;
1056 			shared_resources_initialised = 0 ;
1057 			return IOCTL_OUT(arg, data);
1058 		} else
1059 			return -EINVAL ;
1060 		break ;
1061 	/* OSS says these next 4 actions are undefined when the device is
1062 	   busy/active - we will just return -EINVAL.
1063 	   To be allowed to change one - (a) you have to own the right
1064 	    (b) the queue(s) must be quiescent
1065 	*/
1066 	case SNDCTL_DSP_STEREO:
1067 		if (shared_resources_are_mine(file->f_mode) &&
1068 		    queues_are_quiescent()) {
1069 			IOCTL_IN(arg, data);
1070 			shared_resources_initialised = 0 ;
1071 			return IOCTL_OUT(arg, sound_set_stereo(data));
1072 		} else
1073 			return -EINVAL ;
1074 		break ;
1075 	case SOUND_PCM_WRITE_CHANNELS:
1076 		if (shared_resources_are_mine(file->f_mode) &&
1077 		    queues_are_quiescent()) {
1078 			IOCTL_IN(arg, data);
1079 			/* the user might ask for 20 channels, we will return 1 or 2 */
1080 			shared_resources_initialised = 0 ;
1081 			return IOCTL_OUT(arg, sound_set_stereo(data-1)+1);
1082 		} else
1083 			return -EINVAL ;
1084 		break ;
1085 	case SNDCTL_DSP_SETFMT:
1086 		if (shared_resources_are_mine(file->f_mode) &&
1087 		    queues_are_quiescent()) {
1088 		    	int format;
1089 			IOCTL_IN(arg, data);
1090 			shared_resources_initialised = 0 ;
1091 			format = sound_set_format(data);
1092 			result = IOCTL_OUT(arg, format);
1093 			if (result < 0)
1094 				return result;
1095 			if (format != data && data != AFMT_QUERY)
1096 				return -EINVAL;
1097 			return 0;
1098 		} else
1099 			return -EINVAL ;
1100 	case SNDCTL_DSP_SUBDIVIDE:
1101 		return -EINVAL ;
1102 	case SNDCTL_DSP_SETFRAGMENT:
1103 		/* we can do this independently for the two queues - with the
1104 		   proviso that for fds opened O_RDWR we cannot separate the
1105 		   actions and both queues will be set per the last call.
1106 		   NOTE: this does *NOT* actually set the queue up - merely
1107 		   registers our intentions.
1108 		*/
1109 		IOCTL_IN(arg, data);
1110 		result = 0 ;
1111 		nbufs = (data >> 16) & 0x7fff ; /* 0x7fff is 'use maximum' */
1112 		size = data & 0xffff;
1113 		if (file->f_mode & FMODE_WRITE) {
1114 			result = set_queue_frags(&write_sq, nbufs, size) ;
1115 			if (result)
1116 				return result ;
1117 		}
1118 		/* NOTE: this return value is irrelevant - OSS specifically says that
1119 		   the value is 'random' and that the user _must_ check the actual
1120 		   frags values using SNDCTL_DSP_GETBLKSIZE or similar */
1121 		return IOCTL_OUT(arg, data);
1122 	case SNDCTL_DSP_GETOSPACE:
1123 		/*
1124 		*/
1125 		if (file->f_mode & FMODE_WRITE) {
1126 			if ( !write_sq.locked )
1127 				sq_setup(&write_sq) ;
1128 			info.fragments = write_sq.max_active - write_sq.count;
1129 			info.fragstotal = write_sq.max_active;
1130 			info.fragsize = write_sq.user_frag_size;
1131 			info.bytes = info.fragments * info.fragsize;
1132 			if (copy_to_user((void __user *)arg, &info, sizeof(info)))
1133 				return -EFAULT;
1134 			return 0;
1135 		} else
1136 			return -EINVAL ;
1137 		break ;
1138 	case SNDCTL_DSP_GETCAPS:
1139 		val = dmasound.mach.capabilities & 0xffffff00;
1140 		return IOCTL_OUT(arg,val);
1141 
1142 	default:
1143 		return mixer_ioctl(file, cmd, arg);
1144 	}
1145 	return -EINVAL;
1146 }
1147 
1148 static long sq_unlocked_ioctl(struct file *file, u_int cmd, u_long arg)
1149 {
1150 	int ret;
1151 
1152 	mutex_lock(&dmasound_core_mutex);
1153 	ret = sq_ioctl(file, cmd, arg);
1154 	mutex_unlock(&dmasound_core_mutex);
1155 
1156 	return ret;
1157 }
1158 
1159 static const struct file_operations sq_fops =
1160 {
1161 	.owner		= THIS_MODULE,
1162 	.llseek		= no_llseek,
1163 	.write		= sq_write,
1164 	.poll		= sq_poll,
1165 	.unlocked_ioctl	= sq_unlocked_ioctl,
1166 	.compat_ioctl	= compat_ptr_ioctl,
1167 	.open		= sq_open,
1168 	.release	= sq_release,
1169 };
1170 
1171 static int sq_init(void)
1172 {
1173 	const struct file_operations *fops = &sq_fops;
1174 #ifndef MODULE
1175 	int sq_unit;
1176 #endif
1177 
1178 	sq_unit = register_sound_dsp(fops, -1);
1179 	if (sq_unit < 0) {
1180 		printk(KERN_ERR "dmasound_core: couldn't register fops\n") ;
1181 		return sq_unit ;
1182 	}
1183 
1184 	write_sq_init_waitqueue();
1185 
1186 	/* These parameters will be restored for every clean open()
1187 	 * in the case of multiple open()s (e.g. dsp0 & dsp1) they
1188 	 * will be set so long as the shared resources have no owner.
1189 	 */
1190 
1191 	if (shared_resource_owner == 0) {
1192 		dmasound.soft = dmasound.mach.default_soft ;
1193 		dmasound.hard = dmasound.mach.default_hard ;
1194 		dmasound.dsp = dmasound.mach.default_soft ;
1195 		shared_resources_initialised = 0 ;
1196 	}
1197 	return 0 ;
1198 }
1199 
1200 
1201     /*
1202      *  /dev/sndstat
1203      */
1204 
1205 /* we allow more space for record-enabled because there are extra output lines.
1206    the number here must include the amount we are prepared to give to the low-level
1207    driver.
1208 */
1209 
1210 #define STAT_BUFF_LEN 768
1211 
1212 /* this is how much space we will allow the low-level driver to use
1213    in the stat buffer.  Currently, 2 * (80 character line + <NL>).
1214    We do not police this (it is up to the ll driver to be honest).
1215 */
1216 
1217 #define LOW_LEVEL_STAT_ALLOC 162
1218 
1219 static struct {
1220     int busy;
1221     char buf[STAT_BUFF_LEN];	/* state.buf should not overflow! */
1222     int len, ptr;
1223 } state;
1224 
1225 /* publish this function for use by low-level code, if required */
1226 
1227 static char *get_afmt_string(int afmt)
1228 {
1229         switch(afmt) {
1230             case AFMT_MU_LAW:
1231                 return "mu-law";
1232             case AFMT_A_LAW:
1233                 return "A-law";
1234             case AFMT_U8:
1235                 return "unsigned 8 bit";
1236             case AFMT_S8:
1237                 return "signed 8 bit";
1238             case AFMT_S16_BE:
1239                 return "signed 16 bit BE";
1240             case AFMT_U16_BE:
1241                 return "unsigned 16 bit BE";
1242             case AFMT_S16_LE:
1243                 return "signed 16 bit LE";
1244             case AFMT_U16_LE:
1245                 return "unsigned 16 bit LE";
1246 	    case 0:
1247 		return "format not set" ;
1248             default:
1249                 break ;
1250         }
1251         return "ERROR: Unsupported AFMT_XXXX code" ;
1252 }
1253 
1254 static int state_open(struct inode *inode, struct file *file)
1255 {
1256 	char *buffer = state.buf;
1257 	int len = 0;
1258 	int ret;
1259 
1260 	mutex_lock(&dmasound_core_mutex);
1261 	ret = -EBUSY;
1262 	if (state.busy)
1263 		goto out;
1264 
1265 	ret = -ENODEV;
1266 	if (!try_module_get(dmasound.mach.owner))
1267 		goto out;
1268 
1269 	state.ptr = 0;
1270 	state.busy = 1;
1271 
1272 	len += sprintf(buffer+len, "%sDMA sound driver rev %03d :\n",
1273 		dmasound.mach.name, (DMASOUND_CORE_REVISION<<4) +
1274 		((dmasound.mach.version>>8) & 0x0f));
1275 	len += sprintf(buffer+len,
1276 		"Core driver edition %02d.%02d : %s driver edition %02d.%02d\n",
1277 		DMASOUND_CORE_REVISION, DMASOUND_CORE_EDITION, dmasound.mach.name2,
1278 		(dmasound.mach.version >> 8), (dmasound.mach.version & 0xff)) ;
1279 
1280 	/* call the low-level module to fill in any stat info. that it has
1281 	   if present.  Maximum buffer usage is specified.
1282 	*/
1283 
1284 	if (dmasound.mach.state_info)
1285 		len += dmasound.mach.state_info(buffer+len,
1286 			(size_t) LOW_LEVEL_STAT_ALLOC) ;
1287 
1288 	/* make usage of the state buffer as deterministic as poss.
1289 	   exceptional conditions could cause overrun - and this is flagged as
1290 	   a kernel error.
1291 	*/
1292 
1293 	/* formats and settings */
1294 
1295 	len += sprintf(buffer+len,"\t\t === Formats & settings ===\n") ;
1296 	len += sprintf(buffer+len,"Parameter %20s%20s\n","soft","hard") ;
1297 	len += sprintf(buffer+len,"Format   :%20s%20s\n",
1298 		get_afmt_string(dmasound.soft.format),
1299 		get_afmt_string(dmasound.hard.format));
1300 
1301 	len += sprintf(buffer+len,"Samp Rate:%14d s/sec%14d s/sec\n",
1302 		       dmasound.soft.speed, dmasound.hard.speed);
1303 
1304 	len += sprintf(buffer+len,"Channels :%20s%20s\n",
1305 		       dmasound.soft.stereo ? "stereo" : "mono",
1306 		       dmasound.hard.stereo ? "stereo" : "mono" );
1307 
1308 	/* sound queue status */
1309 
1310 	len += sprintf(buffer+len,"\t\t === Sound Queue status ===\n");
1311 	len += sprintf(buffer+len,"Allocated:%8s%6s\n","Buffers","Size") ;
1312 	len += sprintf(buffer+len,"%9s:%8d%6d\n",
1313 		"write", write_sq.numBufs, write_sq.bufSize) ;
1314 	len += sprintf(buffer+len,
1315 		"Current  : MaxFrg FragSiz MaxAct Frnt Rear "
1316 		"Cnt RrSize A B S L  xruns\n") ;
1317 	len += sprintf(buffer+len,"%9s:%7d%8d%7d%5d%5d%4d%7d%2d%2d%2d%2d%7d\n",
1318 		"write", write_sq.max_count, write_sq.block_size,
1319 		write_sq.max_active, write_sq.front, write_sq.rear,
1320 		write_sq.count, write_sq.rear_size, write_sq.active,
1321 		write_sq.busy, write_sq.syncing, write_sq.locked, write_sq.xruns) ;
1322 #ifdef DEBUG_DMASOUND
1323 printk("dmasound: stat buffer used %d bytes\n", len) ;
1324 #endif
1325 
1326 	if (len >= STAT_BUFF_LEN)
1327 		printk(KERN_ERR "dmasound_core: stat buffer overflowed!\n");
1328 
1329 	state.len = len;
1330 	ret = 0;
1331 out:
1332 	mutex_unlock(&dmasound_core_mutex);
1333 	return ret;
1334 }
1335 
1336 static int state_release(struct inode *inode, struct file *file)
1337 {
1338 	mutex_lock(&dmasound_core_mutex);
1339 	state.busy = 0;
1340 	module_put(dmasound.mach.owner);
1341 	mutex_unlock(&dmasound_core_mutex);
1342 	return 0;
1343 }
1344 
1345 static ssize_t state_read(struct file *file, char __user *buf, size_t count,
1346 			  loff_t *ppos)
1347 {
1348 	int n = state.len - state.ptr;
1349 	if (n > count)
1350 		n = count;
1351 	if (n <= 0)
1352 		return 0;
1353 	if (copy_to_user(buf, &state.buf[state.ptr], n))
1354 		return -EFAULT;
1355 	state.ptr += n;
1356 	return n;
1357 }
1358 
1359 static const struct file_operations state_fops = {
1360 	.owner		= THIS_MODULE,
1361 	.llseek		= no_llseek,
1362 	.read		= state_read,
1363 	.open		= state_open,
1364 	.release	= state_release,
1365 };
1366 
1367 static int state_init(void)
1368 {
1369 #ifndef MODULE
1370 	int state_unit;
1371 #endif
1372 	state_unit = register_sound_special(&state_fops, SND_DEV_STATUS);
1373 	if (state_unit < 0)
1374 		return state_unit ;
1375 	state.busy = 0;
1376 	return 0 ;
1377 }
1378 
1379 
1380     /*
1381      *  Config & Setup
1382      *
1383      *  This function is called by _one_ chipset-specific driver
1384      */
1385 
1386 int dmasound_init(void)
1387 {
1388 	int res ;
1389 #ifdef MODULE
1390 	if (irq_installed)
1391 		return -EBUSY;
1392 #endif
1393 
1394 	/* Set up sound queue, /dev/audio and /dev/dsp. */
1395 
1396 	/* Set default settings. */
1397 	if ((res = sq_init()) < 0)
1398 		return res ;
1399 
1400 	/* Set up /dev/sndstat. */
1401 	if ((res = state_init()) < 0)
1402 		return res ;
1403 
1404 	/* Set up /dev/mixer. */
1405 	mixer_init();
1406 
1407 	if (!dmasound.mach.irqinit()) {
1408 		printk(KERN_ERR "DMA sound driver: Interrupt initialization failed\n");
1409 		return -ENODEV;
1410 	}
1411 #ifdef MODULE
1412 	irq_installed = 1;
1413 #endif
1414 
1415 	printk(KERN_INFO "%s DMA sound driver rev %03d installed\n",
1416 		dmasound.mach.name, (DMASOUND_CORE_REVISION<<4) +
1417 		((dmasound.mach.version>>8) & 0x0f));
1418 	printk(KERN_INFO
1419 		"Core driver edition %02d.%02d : %s driver edition %02d.%02d\n",
1420 		DMASOUND_CORE_REVISION, DMASOUND_CORE_EDITION, dmasound.mach.name2,
1421 		(dmasound.mach.version >> 8), (dmasound.mach.version & 0xff)) ;
1422 	printk(KERN_INFO "Write will use %4d fragments of %7d bytes as default\n",
1423 		numWriteBufs, writeBufSize) ;
1424 	return 0;
1425 }
1426 
1427 #ifdef MODULE
1428 
1429 void dmasound_deinit(void)
1430 {
1431 	if (irq_installed) {
1432 		sound_silence();
1433 		dmasound.mach.irqcleanup();
1434 		irq_installed = 0;
1435 	}
1436 
1437 	write_sq_release_buffers();
1438 
1439 	if (mixer_unit >= 0)
1440 		unregister_sound_mixer(mixer_unit);
1441 	if (state_unit >= 0)
1442 		unregister_sound_special(state_unit);
1443 	if (sq_unit >= 0)
1444 		unregister_sound_dsp(sq_unit);
1445 }
1446 
1447 #else /* !MODULE */
1448 
1449 static int dmasound_setup(char *str)
1450 {
1451 	int ints[6], size;
1452 
1453 	str = get_options(str, ARRAY_SIZE(ints), ints);
1454 
1455 	/* check the bootstrap parameter for "dmasound=" */
1456 
1457 	/* FIXME: other than in the most naive of cases there is no sense in these
1458 	 *	  buffers being other than powers of two.  This is not checked yet.
1459 	 */
1460 
1461 	switch (ints[0]) {
1462 	case 3:
1463 		if ((ints[3] < 0) || (ints[3] > MAX_CATCH_RADIUS))
1464 			printk("dmasound_setup: invalid catch radius, using default = %d\n", catchRadius);
1465 		else
1466 			catchRadius = ints[3];
1467 		fallthrough;
1468 	case 2:
1469 		if (ints[1] < MIN_BUFFERS)
1470 			printk("dmasound_setup: invalid number of buffers, using default = %d\n", numWriteBufs);
1471 		else
1472 			numWriteBufs = ints[1];
1473 		fallthrough;
1474 	case 1:
1475 		if ((size = ints[2]) < 256) /* check for small buffer specs */
1476 			size <<= 10 ;
1477                 if (size < MIN_BUFSIZE || size > MAX_BUFSIZE)
1478                         printk("dmasound_setup: invalid write buffer size, using default = %d\n", writeBufSize);
1479                 else
1480                         writeBufSize = size;
1481 	case 0:
1482 		break;
1483 	default:
1484 		printk("dmasound_setup: invalid number of arguments\n");
1485 		return 0;
1486 	}
1487 	return 1;
1488 }
1489 
1490 __setup("dmasound=", dmasound_setup);
1491 
1492 #endif /* !MODULE */
1493 
1494     /*
1495      *  Conversion tables
1496      */
1497 
1498 #ifdef HAS_8BIT_TABLES
1499 /* 8 bit mu-law */
1500 
1501 char dmasound_ulaw2dma8[] = {
1502 	-126,	-122,	-118,	-114,	-110,	-106,	-102,	-98,
1503 	-94,	-90,	-86,	-82,	-78,	-74,	-70,	-66,
1504 	-63,	-61,	-59,	-57,	-55,	-53,	-51,	-49,
1505 	-47,	-45,	-43,	-41,	-39,	-37,	-35,	-33,
1506 	-31,	-30,	-29,	-28,	-27,	-26,	-25,	-24,
1507 	-23,	-22,	-21,	-20,	-19,	-18,	-17,	-16,
1508 	-16,	-15,	-15,	-14,	-14,	-13,	-13,	-12,
1509 	-12,	-11,	-11,	-10,	-10,	-9,	-9,	-8,
1510 	-8,	-8,	-7,	-7,	-7,	-7,	-6,	-6,
1511 	-6,	-6,	-5,	-5,	-5,	-5,	-4,	-4,
1512 	-4,	-4,	-4,	-4,	-3,	-3,	-3,	-3,
1513 	-3,	-3,	-3,	-3,	-2,	-2,	-2,	-2,
1514 	-2,	-2,	-2,	-2,	-2,	-2,	-2,	-2,
1515 	-1,	-1,	-1,	-1,	-1,	-1,	-1,	-1,
1516 	-1,	-1,	-1,	-1,	-1,	-1,	-1,	-1,
1517 	-1,	-1,	-1,	-1,	-1,	-1,	-1,	0,
1518 	125,	121,	117,	113,	109,	105,	101,	97,
1519 	93,	89,	85,	81,	77,	73,	69,	65,
1520 	62,	60,	58,	56,	54,	52,	50,	48,
1521 	46,	44,	42,	40,	38,	36,	34,	32,
1522 	30,	29,	28,	27,	26,	25,	24,	23,
1523 	22,	21,	20,	19,	18,	17,	16,	15,
1524 	15,	14,	14,	13,	13,	12,	12,	11,
1525 	11,	10,	10,	9,	9,	8,	8,	7,
1526 	7,	7,	6,	6,	6,	6,	5,	5,
1527 	5,	5,	4,	4,	4,	4,	3,	3,
1528 	3,	3,	3,	3,	2,	2,	2,	2,
1529 	2,	2,	2,	2,	1,	1,	1,	1,
1530 	1,	1,	1,	1,	1,	1,	1,	1,
1531 	0,	0,	0,	0,	0,	0,	0,	0,
1532 	0,	0,	0,	0,	0,	0,	0,	0,
1533 	0,	0,	0,	0,	0,	0,	0,	0
1534 };
1535 
1536 /* 8 bit A-law */
1537 
1538 char dmasound_alaw2dma8[] = {
1539 	-22,	-21,	-24,	-23,	-18,	-17,	-20,	-19,
1540 	-30,	-29,	-32,	-31,	-26,	-25,	-28,	-27,
1541 	-11,	-11,	-12,	-12,	-9,	-9,	-10,	-10,
1542 	-15,	-15,	-16,	-16,	-13,	-13,	-14,	-14,
1543 	-86,	-82,	-94,	-90,	-70,	-66,	-78,	-74,
1544 	-118,	-114,	-126,	-122,	-102,	-98,	-110,	-106,
1545 	-43,	-41,	-47,	-45,	-35,	-33,	-39,	-37,
1546 	-59,	-57,	-63,	-61,	-51,	-49,	-55,	-53,
1547 	-2,	-2,	-2,	-2,	-2,	-2,	-2,	-2,
1548 	-2,	-2,	-2,	-2,	-2,	-2,	-2,	-2,
1549 	-1,	-1,	-1,	-1,	-1,	-1,	-1,	-1,
1550 	-1,	-1,	-1,	-1,	-1,	-1,	-1,	-1,
1551 	-6,	-6,	-6,	-6,	-5,	-5,	-5,	-5,
1552 	-8,	-8,	-8,	-8,	-7,	-7,	-7,	-7,
1553 	-3,	-3,	-3,	-3,	-3,	-3,	-3,	-3,
1554 	-4,	-4,	-4,	-4,	-4,	-4,	-4,	-4,
1555 	21,	20,	23,	22,	17,	16,	19,	18,
1556 	29,	28,	31,	30,	25,	24,	27,	26,
1557 	10,	10,	11,	11,	8,	8,	9,	9,
1558 	14,	14,	15,	15,	12,	12,	13,	13,
1559 	86,	82,	94,	90,	70,	66,	78,	74,
1560 	118,	114,	126,	122,	102,	98,	110,	106,
1561 	43,	41,	47,	45,	35,	33,	39,	37,
1562 	59,	57,	63,	61,	51,	49,	55,	53,
1563 	1,	1,	1,	1,	1,	1,	1,	1,
1564 	1,	1,	1,	1,	1,	1,	1,	1,
1565 	0,	0,	0,	0,	0,	0,	0,	0,
1566 	0,	0,	0,	0,	0,	0,	0,	0,
1567 	5,	5,	5,	5,	4,	4,	4,	4,
1568 	7,	7,	7,	7,	6,	6,	6,	6,
1569 	2,	2,	2,	2,	2,	2,	2,	2,
1570 	3,	3,	3,	3,	3,	3,	3,	3
1571 };
1572 #endif /* HAS_8BIT_TABLES */
1573 
1574     /*
1575      *  Visible symbols for modules
1576      */
1577 
1578 EXPORT_SYMBOL(dmasound);
1579 EXPORT_SYMBOL(dmasound_init);
1580 #ifdef MODULE
1581 EXPORT_SYMBOL(dmasound_deinit);
1582 #endif
1583 EXPORT_SYMBOL(dmasound_write_sq);
1584 EXPORT_SYMBOL(dmasound_catchRadius);
1585 #ifdef HAS_8BIT_TABLES
1586 EXPORT_SYMBOL(dmasound_ulaw2dma8);
1587 EXPORT_SYMBOL(dmasound_alaw2dma8);
1588 #endif
1589