1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44#include <linux/init.h>
45#include <linux/interrupt.h>
46#include <linux/module.h>
47#include <linux/stddef.h>
48#include <linux/slab.h>
49#include <linux/isapnp.h>
50#include <linux/pnp.h>
51#include <linux/spinlock.h>
52
53#define DEB(x)
54#define DEB1(x)
55#include "sound_config.h"
56
57#include "ad1848.h"
58#include "ad1848_mixer.h"
59
60typedef struct
61{
62 spinlock_t lock;
63 int base;
64 int irq;
65 int dma1, dma2;
66 int dual_dma;
67 int subtype;
68 unsigned char MCE_bit;
69 unsigned char saved_regs[64];
70 int debug_flag;
71
72 int audio_flags;
73 int record_dev, playback_dev;
74
75 int xfer_count;
76 int audio_mode;
77 int open_mode;
78 int intr_active;
79 char *chip_name, *name;
80 int model;
81#define MD_1848 1
82#define MD_4231 2
83#define MD_4231A 3
84#define MD_1845 4
85#define MD_4232 5
86#define MD_C930 6
87#define MD_IWAVE 7
88#define MD_4235 8
89#define MD_1845_SSCAPE 9
90#define MD_4236 10
91#define MD_42xB 11
92#define MD_4239 12
93
94
95 int recmask;
96 int supported_devices, orig_devices;
97 int supported_rec_devices, orig_rec_devices;
98 int *levels;
99 short mixer_reroute[32];
100 int dev_no;
101 volatile unsigned long timer_ticks;
102 int timer_running;
103 int irq_ok;
104 mixer_ents *mix_devices;
105 int mixer_output_port;
106} ad1848_info;
107
108typedef struct ad1848_port_info
109{
110 int open_mode;
111 int speed;
112 unsigned char speed_bits;
113 int channels;
114 int audio_format;
115 unsigned char format_bits;
116}
117ad1848_port_info;
118
119static struct address_info cfg;
120static int nr_ad1848_devs;
121
122static bool deskpro_xl;
123static bool deskpro_m;
124static bool soundpro;
125
126static volatile signed char irq2dev[17] = {
127 -1, -1, -1, -1, -1, -1, -1, -1,
128 -1, -1, -1, -1, -1, -1, -1, -1, -1
129};
130
131#ifndef EXCLUDE_TIMERS
132static int timer_installed = -1;
133#endif
134
135static int loaded;
136
137static int ad_format_mask[13 ] =
138{
139 0,
140 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW,
141 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
142 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
143 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW,
144 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
145 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
146 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
147 AFMT_U8 | AFMT_S16_LE ,
148 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW ,
149 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
150 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM,
151 AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_S16_BE | AFMT_IMA_ADPCM
152};
153
154static ad1848_info adev_info[MAX_AUDIO_DEV];
155
156#define io_Index_Addr(d) ((d)->base)
157#define io_Indexed_Data(d) ((d)->base+1)
158#define io_Status(d) ((d)->base+2)
159#define io_Polled_IO(d) ((d)->base+3)
160
161static struct {
162 unsigned char flags;
163#define CAP_F_TIMER 0x01
164} capabilities [10 ] = {
165 {0}
166 ,{0}
167 ,{CAP_F_TIMER}
168 ,{CAP_F_TIMER}
169 ,{CAP_F_TIMER}
170 ,{CAP_F_TIMER}
171 ,{0}
172 ,{CAP_F_TIMER}
173 ,{0}
174 ,{CAP_F_TIMER}
175};
176
177#ifdef CONFIG_PNP
178static int isapnp = 1;
179static int isapnpjump;
180static bool reverse;
181
182static int audio_activated;
183#else
184static int isapnp;
185#endif
186
187
188
189static int ad1848_open(int dev, int mode);
190static void ad1848_close(int dev);
191static void ad1848_output_block(int dev, unsigned long buf, int count, int intrflag);
192static void ad1848_start_input(int dev, unsigned long buf, int count, int intrflag);
193static int ad1848_prepare_for_output(int dev, int bsize, int bcount);
194static int ad1848_prepare_for_input(int dev, int bsize, int bcount);
195static void ad1848_halt(int dev);
196static void ad1848_halt_input(int dev);
197static void ad1848_halt_output(int dev);
198static void ad1848_trigger(int dev, int bits);
199static irqreturn_t adintr(int irq, void *dev_id);
200
201#ifndef EXCLUDE_TIMERS
202static int ad1848_tmr_install(int dev);
203static void ad1848_tmr_reprogram(int dev);
204#endif
205
206static int ad_read(ad1848_info * devc, int reg)
207{
208 int x;
209 int timeout = 900000;
210
211 while (timeout > 0 && inb(devc->base) == 0x80)
212 timeout--;
213
214 if(reg < 32)
215 {
216 outb(((unsigned char) (reg & 0xff) | devc->MCE_bit), io_Index_Addr(devc));
217 x = inb(io_Indexed_Data(devc));
218 }
219 else
220 {
221 int xreg, xra;
222
223 xreg = (reg & 0xff) - 32;
224 xra = (((xreg & 0x0f) << 4) & 0xf0) | 0x08 | ((xreg & 0x10) >> 2);
225 outb(((unsigned char) (23 & 0xff) | devc->MCE_bit), io_Index_Addr(devc));
226 outb(((unsigned char) (xra & 0xff)), io_Indexed_Data(devc));
227 x = inb(io_Indexed_Data(devc));
228 }
229
230 return x;
231}
232
233static void ad_write(ad1848_info * devc, int reg, int data)
234{
235 int timeout = 900000;
236
237 while (timeout > 0 && inb(devc->base) == 0x80)
238 timeout--;
239
240 if(reg < 32)
241 {
242 outb(((unsigned char) (reg & 0xff) | devc->MCE_bit), io_Index_Addr(devc));
243 outb(((unsigned char) (data & 0xff)), io_Indexed_Data(devc));
244 }
245 else
246 {
247 int xreg, xra;
248
249 xreg = (reg & 0xff) - 32;
250 xra = (((xreg & 0x0f) << 4) & 0xf0) | 0x08 | ((xreg & 0x10) >> 2);
251 outb(((unsigned char) (23 & 0xff) | devc->MCE_bit), io_Index_Addr(devc));
252 outb(((unsigned char) (xra & 0xff)), io_Indexed_Data(devc));
253 outb((unsigned char) (data & 0xff), io_Indexed_Data(devc));
254 }
255}
256
257static void wait_for_calibration(ad1848_info * devc)
258{
259 int timeout = 0;
260
261
262
263
264
265
266
267
268 timeout = 100000;
269 while (timeout > 0 && inb(devc->base) == 0x80)
270 timeout--;
271 if (inb(devc->base) & 0x80)
272 printk(KERN_WARNING "ad1848: Auto calibration timed out(1).\n");
273
274 timeout = 100;
275 while (timeout > 0 && !(ad_read(devc, 11) & 0x20))
276 timeout--;
277 if (!(ad_read(devc, 11) & 0x20))
278 return;
279
280 timeout = 80000;
281 while (timeout > 0 && (ad_read(devc, 11) & 0x20))
282 timeout--;
283 if (ad_read(devc, 11) & 0x20)
284 if ((devc->model != MD_1845) && (devc->model != MD_1845_SSCAPE))
285 printk(KERN_WARNING "ad1848: Auto calibration timed out(3).\n");
286}
287
288static void ad_mute(ad1848_info * devc)
289{
290 int i;
291 unsigned char prev;
292
293
294
295
296
297 for (i = 6; i < 8; i++)
298 {
299 prev = devc->saved_regs[i] = ad_read(devc, i);
300 }
301
302}
303
304static void ad_unmute(ad1848_info * devc)
305{
306}
307
308static void ad_enter_MCE(ad1848_info * devc)
309{
310 int timeout = 1000;
311 unsigned short prev;
312
313 while (timeout > 0 && inb(devc->base) == 0x80)
314 timeout--;
315
316 devc->MCE_bit = 0x40;
317 prev = inb(io_Index_Addr(devc));
318 if (prev & 0x40)
319 {
320 return;
321 }
322 outb((devc->MCE_bit), io_Index_Addr(devc));
323}
324
325static void ad_leave_MCE(ad1848_info * devc)
326{
327 unsigned char prev, acal;
328 int timeout = 1000;
329
330 while (timeout > 0 && inb(devc->base) == 0x80)
331 timeout--;
332
333 acal = ad_read(devc, 9);
334
335 devc->MCE_bit = 0x00;
336 prev = inb(io_Index_Addr(devc));
337 outb((0x00), io_Index_Addr(devc));
338
339 if ((prev & 0x40) == 0)
340 {
341 return;
342 }
343 outb((0x00), io_Index_Addr(devc));
344 if (acal & 0x08)
345 wait_for_calibration(devc);
346}
347
348static int ad1848_set_recmask(ad1848_info * devc, int mask)
349{
350 unsigned char recdev;
351 int i, n;
352 unsigned long flags;
353
354 mask &= devc->supported_rec_devices;
355
356
357 for (i = 0; i < 32; i++)
358 {
359 if (devc->mixer_reroute[i] != i)
360 {
361 if (mask & (1 << i))
362 {
363 mask &= ~(1 << i);
364 mask |= (1 << devc->mixer_reroute[i]);
365 }
366 }
367 }
368
369 n = 0;
370 for (i = 0; i < 32; i++)
371 if (mask & (1 << i))
372 n++;
373
374 spin_lock_irqsave(&devc->lock,flags);
375 if (!soundpro) {
376 if (n == 0)
377 mask = SOUND_MASK_MIC;
378 else if (n != 1) {
379 mask &= ~devc->recmask;
380
381 n = 0;
382 for (i = 0; i < 32; i++)
383 if (mask & (1 << i))
384 n++;
385
386 if (n != 1)
387 mask = SOUND_MASK_MIC;
388 }
389 switch (mask) {
390 case SOUND_MASK_MIC:
391 recdev = 2;
392 break;
393
394 case SOUND_MASK_LINE:
395 case SOUND_MASK_LINE3:
396 recdev = 0;
397 break;
398
399 case SOUND_MASK_CD:
400 case SOUND_MASK_LINE1:
401 recdev = 1;
402 break;
403
404 case SOUND_MASK_IMIX:
405 recdev = 3;
406 break;
407
408 default:
409 mask = SOUND_MASK_MIC;
410 recdev = 2;
411 }
412
413 recdev <<= 6;
414 ad_write(devc, 0, (ad_read(devc, 0) & 0x3f) | recdev);
415 ad_write(devc, 1, (ad_read(devc, 1) & 0x3f) | recdev);
416 } else {
417 unsigned char val;
418 int set_rec_bit;
419 int j;
420
421 for (i = 0; i < 32; i++) {
422 if ((devc->supported_rec_devices & (1 << i)) == 0)
423 continue;
424
425 for (j = LEFT_CHN; j <= RIGHT_CHN; j++) {
426 if (devc->mix_devices[i][j].nbits == 0)
427 continue;
428
429
430
431
432
433
434 set_rec_bit = ((mask & (1 << i)) != 0) ^ devc->mix_devices[i][j].recpol;
435
436 val = ad_read(devc, devc->mix_devices[i][j].recreg);
437 val &= ~(1 << devc->mix_devices[i][j].recpos);
438 val |= (set_rec_bit << devc->mix_devices[i][j].recpos);
439 ad_write(devc, devc->mix_devices[i][j].recreg, val);
440 }
441 }
442 }
443 spin_unlock_irqrestore(&devc->lock,flags);
444
445
446 for (i = 0; i < 32; i++)
447 {
448 if (devc->mixer_reroute[i] != i)
449 {
450 if (mask & (1 << devc->mixer_reroute[i]))
451 {
452 mask &= ~(1 << devc->mixer_reroute[i]);
453 mask |= (1 << i);
454 }
455 }
456 }
457 devc->recmask = mask;
458 return mask;
459}
460
461static void oss_change_bits(ad1848_info *devc, unsigned char *regval,
462 unsigned char *muteval, int dev, int chn, int newval)
463{
464 unsigned char mask;
465 int shift;
466 int mute;
467 int mutemask;
468 int set_mute_bit;
469
470 set_mute_bit = (newval == 0) ^ devc->mix_devices[dev][chn].mutepol;
471
472 if (devc->mix_devices[dev][chn].polarity == 1)
473 newval = 100 - newval;
474
475 mask = (1 << devc->mix_devices[dev][chn].nbits) - 1;
476 shift = devc->mix_devices[dev][chn].bitpos;
477
478 if (devc->mix_devices[dev][chn].mutepos == 8)
479 {
480 mute = 0;
481 mutemask = ~0;
482 }
483 else
484 {
485 mute = (set_mute_bit << devc->mix_devices[dev][chn].mutepos);
486 mutemask = ~(1 << devc->mix_devices[dev][chn].mutepos);
487 }
488
489 newval = (int) ((newval * mask) + 50) / 100;
490 *regval &= ~(mask << shift);
491 *regval |= (newval & mask) << shift;
492
493 *muteval &= mutemask;
494 *muteval |= mute;
495}
496
497static int ad1848_mixer_get(ad1848_info * devc, int dev)
498{
499 if (!((1 << dev) & devc->supported_devices))
500 return -EINVAL;
501
502 dev = devc->mixer_reroute[dev];
503
504 return devc->levels[dev];
505}
506
507static void ad1848_mixer_set_channel(ad1848_info *devc, int dev, int value, int channel)
508{
509 int regoffs, muteregoffs;
510 unsigned char val, muteval;
511 unsigned long flags;
512
513 regoffs = devc->mix_devices[dev][channel].regno;
514 muteregoffs = devc->mix_devices[dev][channel].mutereg;
515 val = ad_read(devc, regoffs);
516
517 if (muteregoffs != regoffs) {
518 muteval = ad_read(devc, muteregoffs);
519 oss_change_bits(devc, &val, &muteval, dev, channel, value);
520 }
521 else
522 oss_change_bits(devc, &val, &val, dev, channel, value);
523
524 spin_lock_irqsave(&devc->lock,flags);
525 ad_write(devc, regoffs, val);
526 devc->saved_regs[regoffs] = val;
527 if (muteregoffs != regoffs) {
528 ad_write(devc, muteregoffs, muteval);
529 devc->saved_regs[muteregoffs] = muteval;
530 }
531 spin_unlock_irqrestore(&devc->lock,flags);
532}
533
534static int ad1848_mixer_set(ad1848_info * devc, int dev, int value)
535{
536 int left = value & 0x000000ff;
537 int right = (value & 0x0000ff00) >> 8;
538 int retvol;
539
540 if (dev > 31)
541 return -EINVAL;
542
543 if (!(devc->supported_devices & (1 << dev)))
544 return -EINVAL;
545
546 dev = devc->mixer_reroute[dev];
547
548 if (devc->mix_devices[dev][LEFT_CHN].nbits == 0)
549 return -EINVAL;
550
551 if (left > 100)
552 left = 100;
553 if (right > 100)
554 right = 100;
555
556 if (devc->mix_devices[dev][RIGHT_CHN].nbits == 0)
557 right = left;
558
559 retvol = left | (right << 8);
560
561
562 left = mix_cvt[left];
563 right = mix_cvt[right];
564
565 devc->levels[dev] = retvol;
566
567
568
569
570 ad1848_mixer_set_channel(devc, dev, left, LEFT_CHN);
571
572
573
574
575 if (devc->mix_devices[dev][RIGHT_CHN].nbits == 0)
576 goto out;
577 ad1848_mixer_set_channel(devc, dev, right, RIGHT_CHN);
578
579 out:
580 return retvol;
581}
582
583static void ad1848_mixer_reset(ad1848_info * devc)
584{
585 int i;
586 char name[32];
587 unsigned long flags;
588
589 devc->mix_devices = &(ad1848_mix_devices[0]);
590
591 sprintf(name, "%s_%d", devc->chip_name, nr_ad1848_devs);
592
593 for (i = 0; i < 32; i++)
594 devc->mixer_reroute[i] = i;
595
596 devc->supported_rec_devices = MODE1_REC_DEVICES;
597
598 switch (devc->model)
599 {
600 case MD_4231:
601 case MD_4231A:
602 case MD_1845:
603 case MD_1845_SSCAPE:
604 devc->supported_devices = MODE2_MIXER_DEVICES;
605 break;
606
607 case MD_C930:
608 devc->supported_devices = C930_MIXER_DEVICES;
609 devc->mix_devices = &(c930_mix_devices[0]);
610 break;
611
612 case MD_IWAVE:
613 devc->supported_devices = MODE3_MIXER_DEVICES;
614 devc->mix_devices = &(iwave_mix_devices[0]);
615 break;
616
617 case MD_42xB:
618 case MD_4239:
619 devc->mix_devices = &(cs42xb_mix_devices[0]);
620 devc->supported_devices = MODE3_MIXER_DEVICES;
621 break;
622 case MD_4232:
623 case MD_4235:
624 case MD_4236:
625 devc->supported_devices = MODE3_MIXER_DEVICES;
626 break;
627
628 case MD_1848:
629 if (soundpro) {
630 devc->supported_devices = SPRO_MIXER_DEVICES;
631 devc->supported_rec_devices = SPRO_REC_DEVICES;
632 devc->mix_devices = &(spro_mix_devices[0]);
633 break;
634 }
635
636 default:
637 devc->supported_devices = MODE1_MIXER_DEVICES;
638 }
639
640 devc->orig_devices = devc->supported_devices;
641 devc->orig_rec_devices = devc->supported_rec_devices;
642
643 devc->levels = load_mixer_volumes(name, default_mixer_levels, 1);
644
645 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
646 {
647 if (devc->supported_devices & (1 << i))
648 ad1848_mixer_set(devc, i, devc->levels[i]);
649 }
650
651 ad1848_set_recmask(devc, SOUND_MASK_MIC);
652
653 devc->mixer_output_port = devc->levels[31] | AUDIO_HEADPHONE | AUDIO_LINE_OUT;
654
655 spin_lock_irqsave(&devc->lock,flags);
656 if (!soundpro) {
657 if (devc->mixer_output_port & AUDIO_SPEAKER)
658 ad_write(devc, 26, ad_read(devc, 26) & ~0x40);
659 else
660 ad_write(devc, 26, ad_read(devc, 26) | 0x40);
661 } else {
662
663
664
665
666
667 ad_write(devc, 16, 0x60);
668 }
669 spin_unlock_irqrestore(&devc->lock,flags);
670}
671
672static int ad1848_mixer_ioctl(int dev, unsigned int cmd, void __user *arg)
673{
674 ad1848_info *devc = mixer_devs[dev]->devc;
675 int val;
676
677 if (cmd == SOUND_MIXER_PRIVATE1)
678 {
679 if (get_user(val, (int __user *)arg))
680 return -EFAULT;
681
682 if (val != 0xffff)
683 {
684 unsigned long flags;
685 val &= (AUDIO_SPEAKER | AUDIO_HEADPHONE | AUDIO_LINE_OUT);
686 devc->mixer_output_port = val;
687 val |= AUDIO_HEADPHONE | AUDIO_LINE_OUT;
688 devc->mixer_output_port = val;
689 spin_lock_irqsave(&devc->lock,flags);
690 if (val & AUDIO_SPEAKER)
691 ad_write(devc, 26, ad_read(devc, 26) & ~0x40);
692 else
693 ad_write(devc, 26, ad_read(devc, 26) | 0x40);
694 spin_unlock_irqrestore(&devc->lock,flags);
695 }
696 val = devc->mixer_output_port;
697 return put_user(val, (int __user *)arg);
698 }
699 if (cmd == SOUND_MIXER_PRIVATE2)
700 {
701 if (get_user(val, (int __user *)arg))
702 return -EFAULT;
703 return(ad1848_control(AD1848_MIXER_REROUTE, val));
704 }
705 if (((cmd >> 8) & 0xff) == 'M')
706 {
707 if (_SIOC_DIR(cmd) & _SIOC_WRITE)
708 {
709 switch (cmd & 0xff)
710 {
711 case SOUND_MIXER_RECSRC:
712 if (get_user(val, (int __user *)arg))
713 return -EFAULT;
714 val = ad1848_set_recmask(devc, val);
715 break;
716
717 default:
718 if (get_user(val, (int __user *)arg))
719 return -EFAULT;
720 val = ad1848_mixer_set(devc, cmd & 0xff, val);
721 break;
722 }
723 return put_user(val, (int __user *)arg);
724 }
725 else
726 {
727 switch (cmd & 0xff)
728 {
729
730
731
732
733 case SOUND_MIXER_RECSRC:
734 val = devc->recmask;
735 break;
736
737 case SOUND_MIXER_DEVMASK:
738 val = devc->supported_devices;
739 break;
740
741 case SOUND_MIXER_STEREODEVS:
742 val = devc->supported_devices;
743 if (devc->model != MD_C930)
744 val &= ~(SOUND_MASK_SPEAKER | SOUND_MASK_IMIX);
745 break;
746
747 case SOUND_MIXER_RECMASK:
748 val = devc->supported_rec_devices;
749 break;
750
751 case SOUND_MIXER_CAPS:
752 val=SOUND_CAP_EXCL_INPUT;
753 break;
754
755 default:
756 val = ad1848_mixer_get(devc, cmd & 0xff);
757 break;
758 }
759 return put_user(val, (int __user *)arg);
760 }
761 }
762 else
763 return -EINVAL;
764}
765
766static int ad1848_set_speed(int dev, int arg)
767{
768 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
769 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
770
771
772
773
774
775
776
777
778
779 typedef struct
780 {
781 int speed;
782 unsigned char bits;
783 }
784 speed_struct;
785
786 static speed_struct speed_table[] =
787 {
788 {5510, (0 << 1) | 1},
789 {5510, (0 << 1) | 1},
790 {6620, (7 << 1) | 1},
791 {8000, (0 << 1) | 0},
792 {9600, (7 << 1) | 0},
793 {11025, (1 << 1) | 1},
794 {16000, (1 << 1) | 0},
795 {18900, (2 << 1) | 1},
796 {22050, (3 << 1) | 1},
797 {27420, (2 << 1) | 0},
798 {32000, (3 << 1) | 0},
799 {33075, (6 << 1) | 1},
800 {37800, (4 << 1) | 1},
801 {44100, (5 << 1) | 1},
802 {48000, (6 << 1) | 0}
803 };
804
805 int i, n, selected = -1;
806
807 n = sizeof(speed_table) / sizeof(speed_struct);
808
809 if (arg <= 0)
810 return portc->speed;
811
812 if (devc->model == MD_1845 || devc->model == MD_1845_SSCAPE)
813 {
814 if (arg < 4000)
815 arg = 4000;
816 if (arg > 50000)
817 arg = 50000;
818
819 portc->speed = arg;
820 portc->speed_bits = speed_table[3].bits;
821 return portc->speed;
822 }
823 if (arg < speed_table[0].speed)
824 selected = 0;
825 if (arg > speed_table[n - 1].speed)
826 selected = n - 1;
827
828 for (i = 1 ; selected == -1 && i < n; i++)
829 {
830 if (speed_table[i].speed == arg)
831 selected = i;
832 else if (speed_table[i].speed > arg)
833 {
834 int diff1, diff2;
835
836 diff1 = arg - speed_table[i - 1].speed;
837 diff2 = speed_table[i].speed - arg;
838
839 if (diff1 < diff2)
840 selected = i - 1;
841 else
842 selected = i;
843 }
844 }
845 if (selected == -1)
846 {
847 printk(KERN_WARNING "ad1848: Can't find speed???\n");
848 selected = 3;
849 }
850 portc->speed = speed_table[selected].speed;
851 portc->speed_bits = speed_table[selected].bits;
852 return portc->speed;
853}
854
855static short ad1848_set_channels(int dev, short arg)
856{
857 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
858
859 if (arg != 1 && arg != 2)
860 return portc->channels;
861
862 portc->channels = arg;
863 return arg;
864}
865
866static unsigned int ad1848_set_bits(int dev, unsigned int arg)
867{
868 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
869 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
870
871 static struct format_tbl
872 {
873 int format;
874 unsigned char bits;
875 }
876 format2bits[] =
877 {
878 {
879 0, 0
880 }
881 ,
882 {
883 AFMT_MU_LAW, 1
884 }
885 ,
886 {
887 AFMT_A_LAW, 3
888 }
889 ,
890 {
891 AFMT_IMA_ADPCM, 5
892 }
893 ,
894 {
895 AFMT_U8, 0
896 }
897 ,
898 {
899 AFMT_S16_LE, 2
900 }
901 ,
902 {
903 AFMT_S16_BE, 6
904 }
905 ,
906 {
907 AFMT_S8, 0
908 }
909 ,
910 {
911 AFMT_U16_LE, 0
912 }
913 ,
914 {
915 AFMT_U16_BE, 0
916 }
917 };
918 int i, n = sizeof(format2bits) / sizeof(struct format_tbl);
919
920 if (arg == 0)
921 return portc->audio_format;
922
923 if (!(arg & ad_format_mask[devc->model]))
924 arg = AFMT_U8;
925
926 portc->audio_format = arg;
927
928 for (i = 0; i < n; i++)
929 if (format2bits[i].format == arg)
930 {
931 if ((portc->format_bits = format2bits[i].bits) == 0)
932 return portc->audio_format = AFMT_U8;
933
934 return arg;
935 }
936
937 portc->format_bits = 0;
938 return portc->audio_format = AFMT_U8;
939}
940
941static struct audio_driver ad1848_audio_driver =
942{
943 .owner = THIS_MODULE,
944 .open = ad1848_open,
945 .close = ad1848_close,
946 .output_block = ad1848_output_block,
947 .start_input = ad1848_start_input,
948 .prepare_for_input = ad1848_prepare_for_input,
949 .prepare_for_output = ad1848_prepare_for_output,
950 .halt_io = ad1848_halt,
951 .halt_input = ad1848_halt_input,
952 .halt_output = ad1848_halt_output,
953 .trigger = ad1848_trigger,
954 .set_speed = ad1848_set_speed,
955 .set_bits = ad1848_set_bits,
956 .set_channels = ad1848_set_channels
957};
958
959static struct mixer_operations ad1848_mixer_operations =
960{
961 .owner = THIS_MODULE,
962 .id = "SOUNDPORT",
963 .name = "AD1848/CS4248/CS4231",
964 .ioctl = ad1848_mixer_ioctl
965};
966
967static int ad1848_open(int dev, int mode)
968{
969 ad1848_info *devc;
970 ad1848_port_info *portc;
971 unsigned long flags;
972
973 if (dev < 0 || dev >= num_audiodevs)
974 return -ENXIO;
975
976 devc = (ad1848_info *) audio_devs[dev]->devc;
977 portc = (ad1848_port_info *) audio_devs[dev]->portc;
978
979
980 spin_lock(&devc->lock);
981 if (portc->open_mode || (devc->open_mode & mode))
982 {
983 spin_unlock(&devc->lock);
984 return -EBUSY;
985 }
986 devc->dual_dma = 0;
987
988 if (audio_devs[dev]->flags & DMA_DUPLEX)
989 {
990 devc->dual_dma = 1;
991 }
992 devc->intr_active = 0;
993 devc->audio_mode = 0;
994 devc->open_mode |= mode;
995 portc->open_mode = mode;
996 spin_unlock(&devc->lock);
997 ad1848_trigger(dev, 0);
998
999 if (mode & OPEN_READ)
1000 devc->record_dev = dev;
1001 if (mode & OPEN_WRITE)
1002 devc->playback_dev = dev;
1003
1004
1005
1006 spin_lock_irqsave(&devc->lock,flags);
1007 ad_mute(devc);
1008 spin_unlock_irqrestore(&devc->lock,flags);
1009
1010 return 0;
1011}
1012
1013static void ad1848_close(int dev)
1014{
1015 unsigned long flags;
1016 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1017 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1018
1019 DEB(printk("ad1848_close(void)\n"));
1020
1021 devc->intr_active = 0;
1022 ad1848_halt(dev);
1023
1024 spin_lock_irqsave(&devc->lock,flags);
1025
1026 devc->audio_mode = 0;
1027 devc->open_mode &= ~portc->open_mode;
1028 portc->open_mode = 0;
1029
1030 ad_unmute(devc);
1031 spin_unlock_irqrestore(&devc->lock,flags);
1032}
1033
1034static void ad1848_output_block(int dev, unsigned long buf, int count, int intrflag)
1035{
1036 unsigned long flags, cnt;
1037 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1038 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1039
1040 cnt = count;
1041
1042 if (portc->audio_format == AFMT_IMA_ADPCM)
1043 {
1044 cnt /= 4;
1045 }
1046 else
1047 {
1048 if (portc->audio_format & (AFMT_S16_LE | AFMT_S16_BE))
1049 cnt >>= 1;
1050 }
1051 if (portc->channels > 1)
1052 cnt >>= 1;
1053 cnt--;
1054
1055 if ((devc->audio_mode & PCM_ENABLE_OUTPUT) && (audio_devs[dev]->flags & DMA_AUTOMODE) &&
1056 intrflag &&
1057 cnt == devc->xfer_count)
1058 {
1059 devc->audio_mode |= PCM_ENABLE_OUTPUT;
1060 devc->intr_active = 1;
1061 return;
1062
1063
1064 }
1065 spin_lock_irqsave(&devc->lock,flags);
1066
1067 ad_write(devc, 15, (unsigned char) (cnt & 0xff));
1068 ad_write(devc, 14, (unsigned char) ((cnt >> 8) & 0xff));
1069
1070 devc->xfer_count = cnt;
1071 devc->audio_mode |= PCM_ENABLE_OUTPUT;
1072 devc->intr_active = 1;
1073 spin_unlock_irqrestore(&devc->lock,flags);
1074}
1075
1076static void ad1848_start_input(int dev, unsigned long buf, int count, int intrflag)
1077{
1078 unsigned long flags, cnt;
1079 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1080 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1081
1082 cnt = count;
1083 if (portc->audio_format == AFMT_IMA_ADPCM)
1084 {
1085 cnt /= 4;
1086 }
1087 else
1088 {
1089 if (portc->audio_format & (AFMT_S16_LE | AFMT_S16_BE))
1090 cnt >>= 1;
1091 }
1092 if (portc->channels > 1)
1093 cnt >>= 1;
1094 cnt--;
1095
1096 if ((devc->audio_mode & PCM_ENABLE_INPUT) && (audio_devs[dev]->flags & DMA_AUTOMODE) &&
1097 intrflag &&
1098 cnt == devc->xfer_count)
1099 {
1100 devc->audio_mode |= PCM_ENABLE_INPUT;
1101 devc->intr_active = 1;
1102 return;
1103
1104
1105 }
1106 spin_lock_irqsave(&devc->lock,flags);
1107
1108 if (devc->model == MD_1848)
1109 {
1110 ad_write(devc, 15, (unsigned char) (cnt & 0xff));
1111 ad_write(devc, 14, (unsigned char) ((cnt >> 8) & 0xff));
1112 }
1113 else
1114 {
1115 ad_write(devc, 31, (unsigned char) (cnt & 0xff));
1116 ad_write(devc, 30, (unsigned char) ((cnt >> 8) & 0xff));
1117 }
1118
1119 ad_unmute(devc);
1120
1121 devc->xfer_count = cnt;
1122 devc->audio_mode |= PCM_ENABLE_INPUT;
1123 devc->intr_active = 1;
1124 spin_unlock_irqrestore(&devc->lock,flags);
1125}
1126
1127static int ad1848_prepare_for_output(int dev, int bsize, int bcount)
1128{
1129 int timeout;
1130 unsigned char fs, old_fs, tmp = 0;
1131 unsigned long flags;
1132 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1133 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1134
1135 ad_mute(devc);
1136
1137 spin_lock_irqsave(&devc->lock,flags);
1138 fs = portc->speed_bits | (portc->format_bits << 5);
1139
1140 if (portc->channels > 1)
1141 fs |= 0x10;
1142
1143 ad_enter_MCE(devc);
1144
1145 if (devc->model == MD_1845 || devc->model == MD_1845_SSCAPE)
1146 {
1147 fs &= 0xf0;
1148
1149 ad_write(devc, 22, (portc->speed >> 8) & 0xff);
1150 ad_write(devc, 23, portc->speed & 0xff);
1151 }
1152 old_fs = ad_read(devc, 8);
1153
1154 if (devc->model == MD_4232 || devc->model >= MD_4236)
1155 {
1156 tmp = ad_read(devc, 16);
1157 ad_write(devc, 16, tmp | 0x30);
1158 }
1159 if (devc->model == MD_IWAVE)
1160 ad_write(devc, 17, 0xc2);
1161
1162 ad_write(devc, 8, fs);
1163
1164
1165
1166
1167
1168 timeout = 0;
1169 while (timeout < 100 && inb(devc->base) != 0x80)
1170 timeout++;
1171 timeout = 0;
1172 while (timeout < 10000 && inb(devc->base) == 0x80)
1173 timeout++;
1174
1175 if (devc->model >= MD_4232)
1176 ad_write(devc, 16, tmp & ~0x30);
1177
1178 ad_leave_MCE(devc);
1179
1180
1181 spin_unlock_irqrestore(&devc->lock,flags);
1182 devc->xfer_count = 0;
1183
1184#ifndef EXCLUDE_TIMERS
1185 if (dev == timer_installed && devc->timer_running)
1186 if ((fs & 0x01) != (old_fs & 0x01))
1187 {
1188 ad1848_tmr_reprogram(dev);
1189 }
1190#endif
1191 ad1848_halt_output(dev);
1192 return 0;
1193}
1194
1195static int ad1848_prepare_for_input(int dev, int bsize, int bcount)
1196{
1197 int timeout;
1198 unsigned char fs, old_fs, tmp = 0;
1199 unsigned long flags;
1200 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1201 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1202
1203 if (devc->audio_mode)
1204 return 0;
1205
1206 spin_lock_irqsave(&devc->lock,flags);
1207 fs = portc->speed_bits | (portc->format_bits << 5);
1208
1209 if (portc->channels > 1)
1210 fs |= 0x10;
1211
1212 ad_enter_MCE(devc);
1213
1214 if ((devc->model == MD_1845) || (devc->model == MD_1845_SSCAPE))
1215 {
1216 fs &= 0xf0;
1217
1218 ad_write(devc, 22, (portc->speed >> 8) & 0xff);
1219 ad_write(devc, 23, portc->speed & 0xff);
1220 }
1221 if (devc->model == MD_4232)
1222 {
1223 tmp = ad_read(devc, 16);
1224 ad_write(devc, 16, tmp | 0x30);
1225 }
1226 if (devc->model == MD_IWAVE)
1227 ad_write(devc, 17, 0xc2);
1228
1229
1230
1231
1232
1233 if (devc->model != MD_1848)
1234 {
1235 old_fs = ad_read(devc, 28);
1236 ad_write(devc, 28, fs);
1237
1238
1239
1240
1241
1242 timeout = 0;
1243 while (timeout < 100 && inb(devc->base) != 0x80)
1244 timeout++;
1245
1246 timeout = 0;
1247 while (timeout < 10000 && inb(devc->base) == 0x80)
1248 timeout++;
1249
1250 if (devc->model != MD_1848 && devc->model != MD_1845 && devc->model != MD_1845_SSCAPE)
1251 {
1252
1253
1254
1255
1256
1257 unsigned char tmp = portc->speed_bits | (ad_read(devc, 8) & 0xf0);
1258
1259 ad_write(devc, 8, tmp);
1260
1261
1262
1263 timeout = 0;
1264 while (timeout < 100 && inb(devc->base) != 0x80)
1265 timeout++;
1266
1267 timeout = 0;
1268 while (timeout < 10000 && inb(devc->base) == 0x80)
1269 timeout++;
1270 }
1271 }
1272 else
1273 {
1274
1275 old_fs = ad_read(devc, 8);
1276 ad_write(devc, 8, fs);
1277
1278
1279
1280 timeout = 0;
1281 while (timeout < 100 && inb(devc->base) != 0x80)
1282 timeout++;
1283 timeout = 0;
1284 while (timeout < 10000 && inb(devc->base) == 0x80)
1285 timeout++;
1286 }
1287
1288 if (devc->model == MD_4232)
1289 ad_write(devc, 16, tmp & ~0x30);
1290
1291 ad_leave_MCE(devc);
1292
1293
1294 spin_unlock_irqrestore(&devc->lock,flags);
1295 devc->xfer_count = 0;
1296
1297#ifndef EXCLUDE_TIMERS
1298 if (dev == timer_installed && devc->timer_running)
1299 {
1300 if ((fs & 0x01) != (old_fs & 0x01))
1301 {
1302 ad1848_tmr_reprogram(dev);
1303 }
1304 }
1305#endif
1306 ad1848_halt_input(dev);
1307 return 0;
1308}
1309
1310static void ad1848_halt(int dev)
1311{
1312 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1313 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1314
1315 unsigned char bits = ad_read(devc, 9);
1316
1317 if (bits & 0x01 && (portc->open_mode & OPEN_WRITE))
1318 ad1848_halt_output(dev);
1319
1320 if (bits & 0x02 && (portc->open_mode & OPEN_READ))
1321 ad1848_halt_input(dev);
1322 devc->audio_mode = 0;
1323}
1324
1325static void ad1848_halt_input(int dev)
1326{
1327 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1328 unsigned long flags;
1329
1330 if (!(ad_read(devc, 9) & 0x02))
1331 return;
1332
1333 spin_lock_irqsave(&devc->lock,flags);
1334
1335 ad_mute(devc);
1336
1337 {
1338 int tmout;
1339
1340 if(!isa_dma_bridge_buggy)
1341 disable_dma(audio_devs[dev]->dmap_in->dma);
1342
1343 for (tmout = 0; tmout < 100000; tmout++)
1344 if (ad_read(devc, 11) & 0x10)
1345 break;
1346 ad_write(devc, 9, ad_read(devc, 9) & ~0x02);
1347
1348 if(!isa_dma_bridge_buggy)
1349 enable_dma(audio_devs[dev]->dmap_in->dma);
1350 devc->audio_mode &= ~PCM_ENABLE_INPUT;
1351 }
1352
1353 outb(0, io_Status(devc));
1354 outb(0, io_Status(devc));
1355
1356 devc->audio_mode &= ~PCM_ENABLE_INPUT;
1357
1358 spin_unlock_irqrestore(&devc->lock,flags);
1359}
1360
1361static void ad1848_halt_output(int dev)
1362{
1363 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1364 unsigned long flags;
1365
1366 if (!(ad_read(devc, 9) & 0x01))
1367 return;
1368
1369 spin_lock_irqsave(&devc->lock,flags);
1370
1371 ad_mute(devc);
1372 {
1373 int tmout;
1374
1375 if(!isa_dma_bridge_buggy)
1376 disable_dma(audio_devs[dev]->dmap_out->dma);
1377
1378 for (tmout = 0; tmout < 100000; tmout++)
1379 if (ad_read(devc, 11) & 0x10)
1380 break;
1381 ad_write(devc, 9, ad_read(devc, 9) & ~0x01);
1382
1383 if(!isa_dma_bridge_buggy)
1384 enable_dma(audio_devs[dev]->dmap_out->dma);
1385
1386 devc->audio_mode &= ~PCM_ENABLE_OUTPUT;
1387 }
1388
1389 outb((0), io_Status(devc));
1390 outb((0), io_Status(devc));
1391
1392 devc->audio_mode &= ~PCM_ENABLE_OUTPUT;
1393
1394 spin_unlock_irqrestore(&devc->lock,flags);
1395}
1396
1397static void ad1848_trigger(int dev, int state)
1398{
1399 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
1400 ad1848_port_info *portc = (ad1848_port_info *) audio_devs[dev]->portc;
1401 unsigned long flags;
1402 unsigned char tmp, old;
1403
1404 spin_lock_irqsave(&devc->lock,flags);
1405 state &= devc->audio_mode;
1406
1407 tmp = old = ad_read(devc, 9);
1408
1409 if (portc->open_mode & OPEN_READ)
1410 {
1411 if (state & PCM_ENABLE_INPUT)
1412 tmp |= 0x02;
1413 else
1414 tmp &= ~0x02;
1415 }
1416 if (portc->open_mode & OPEN_WRITE)
1417 {
1418 if (state & PCM_ENABLE_OUTPUT)
1419 tmp |= 0x01;
1420 else
1421 tmp &= ~0x01;
1422 }
1423
1424 if (tmp != old)
1425 {
1426 ad_write(devc, 9, tmp);
1427 ad_unmute(devc);
1428 }
1429 spin_unlock_irqrestore(&devc->lock,flags);
1430}
1431
1432static void ad1848_init_hw(ad1848_info * devc)
1433{
1434 int i;
1435 int *init_values;
1436
1437
1438
1439
1440 static int init_values_a[] =
1441 {
1442 0xa8, 0xa8, 0x08, 0x08, 0x08, 0x08, 0x00, 0x00,
1443 0x00, 0x0c, 0x02, 0x00, 0x8a, 0x01, 0x00, 0x00,
1444
1445
1446 0x80, 0x00, 0x10, 0x10, 0x00, 0x00, 0x1f, 0x40,
1447 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
1448 };
1449
1450 static int init_values_b[] =
1451 {
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462 0xa8, 0xa8, 0x08, 0x08, 0x08, 0x08, 0x00, 0x00,
1463 0x00, 0x00, 0x06, 0x00, 0xe0, 0x01, 0x00, 0x00,
1464 0x80, 0x00, 0x10, 0x10, 0x00, 0x00, 0x1f, 0x40,
1465 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
1466 };
1467
1468
1469
1470
1471
1472 init_values = init_values_a;
1473 if(devc->model >= MD_4236)
1474 init_values = init_values_b;
1475
1476 for (i = 0; i < 16; i++)
1477 ad_write(devc, i, init_values[i]);
1478
1479
1480 ad_mute(devc);
1481 ad_unmute(devc);
1482
1483 if (devc->model > MD_1848)
1484 {
1485 if (devc->model == MD_1845_SSCAPE)
1486 ad_write(devc, 12, ad_read(devc, 12) | 0x50);
1487 else
1488 ad_write(devc, 12, ad_read(devc, 12) | 0x40);
1489
1490 if (devc->model == MD_IWAVE)
1491 ad_write(devc, 12, 0x6c);
1492
1493 if (devc->model != MD_1845_SSCAPE)
1494 for (i = 16; i < 32; i++)
1495 ad_write(devc, i, init_values[i]);
1496
1497 if (devc->model == MD_IWAVE)
1498 ad_write(devc, 16, 0x30);
1499 }
1500 if (devc->model > MD_1848)
1501 {
1502 if (devc->audio_flags & DMA_DUPLEX)
1503 ad_write(devc, 9, ad_read(devc, 9) & ~0x04);
1504 else
1505 ad_write(devc, 9, ad_read(devc, 9) | 0x04);
1506
1507 if (devc->model == MD_1845 || devc->model == MD_1845_SSCAPE)
1508 ad_write(devc, 27, ad_read(devc, 27) | 0x08);
1509
1510 if (devc->model == MD_IWAVE)
1511 {
1512 ad_write(devc, 12, 0x6c);
1513 ad_write(devc, 16, 0x30);
1514 ad_write(devc, 17, 0xc2);
1515 }
1516 }
1517 else
1518 {
1519 devc->audio_flags &= ~DMA_DUPLEX;
1520 ad_write(devc, 9, ad_read(devc, 9) | 0x04);
1521 if (soundpro)
1522 ad_write(devc, 12, ad_read(devc, 12) | 0x40);
1523 }
1524
1525 outb((0), io_Status(devc));
1526
1527
1528
1529
1530
1531 ad_enter_MCE(devc);
1532 ad_leave_MCE(devc);
1533
1534 ad1848_mixer_reset(devc);
1535}
1536
1537int ad1848_detect(struct resource *ports, int *ad_flags, int *osp)
1538{
1539 unsigned char tmp;
1540 ad1848_info *devc = &adev_info[nr_ad1848_devs];
1541 unsigned char tmp1 = 0xff, tmp2 = 0xff;
1542 int optiC930 = 0;
1543 int interwave = 0;
1544 int ad1847_flag = 0;
1545 int cs4248_flag = 0;
1546 int sscape_flag = 0;
1547 int io_base = ports->start;
1548
1549 int i;
1550
1551 DDB(printk("ad1848_detect(%x)\n", io_base));
1552
1553 if (ad_flags)
1554 {
1555 if (*ad_flags == 0x12345678)
1556 {
1557 interwave = 1;
1558 *ad_flags = 0;
1559 }
1560
1561 if (*ad_flags == 0x87654321)
1562 {
1563 sscape_flag = 1;
1564 *ad_flags = 0;
1565 }
1566
1567 if (*ad_flags == 0x12345677)
1568 {
1569 cs4248_flag = 1;
1570 *ad_flags = 0;
1571 }
1572 }
1573 if (nr_ad1848_devs >= MAX_AUDIO_DEV)
1574 {
1575 printk(KERN_ERR "ad1848 - Too many audio devices\n");
1576 return 0;
1577 }
1578 spin_lock_init(&devc->lock);
1579 devc->base = io_base;
1580 devc->irq_ok = 0;
1581 devc->timer_running = 0;
1582 devc->MCE_bit = 0x40;
1583 devc->irq = 0;
1584 devc->open_mode = 0;
1585 devc->chip_name = devc->name = "AD1848";
1586 devc->model = MD_1848;
1587 devc->levels = NULL;
1588 devc->debug_flag = 0;
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600 if (inb(devc->base) == 0xff)
1601 {
1602 DDB(printk("ad1848_detect: The base I/O address appears to be dead\n"));
1603 }
1604
1605
1606
1607
1608
1609 DDB(printk("ad1848_detect() - step 0\n"));
1610
1611 for (i = 0; i < 10000000; i++)
1612 {
1613 unsigned char x = inb(devc->base);
1614
1615 if (x == 0xff || !(x & 0x80))
1616 break;
1617 }
1618
1619 DDB(printk("ad1848_detect() - step A\n"));
1620
1621 if (inb(devc->base) == 0x80)
1622 ad_leave_MCE(devc);
1623
1624 if ((inb(devc->base) & 0x80) != 0x00)
1625 {
1626 DDB(printk("ad1848 detect error - step A (%02x)\n", (int) inb(devc->base)));
1627 return 0;
1628 }
1629
1630
1631
1632
1633
1634
1635
1636 DDB(printk("ad1848_detect() - step B\n"));
1637 ad_write(devc, 0, 0xaa);
1638 ad_write(devc, 1, 0x45);
1639
1640 if ((tmp1 = ad_read(devc, 0)) != 0xaa || (tmp2 = ad_read(devc, 1)) != 0x45)
1641 {
1642 if (tmp2 == 0x65)
1643 ad1847_flag = 1;
1644 else
1645 {
1646 DDB(printk("ad1848 detect error - step B (%x/%x)\n", tmp1, tmp2));
1647 return 0;
1648 }
1649 }
1650 DDB(printk("ad1848_detect() - step C\n"));
1651 ad_write(devc, 0, 0x45);
1652 ad_write(devc, 1, 0xaa);
1653
1654 if ((tmp1 = ad_read(devc, 0)) != 0x45 || (tmp2 = ad_read(devc, 1)) != 0xaa)
1655 {
1656 if (tmp2 == 0x8a)
1657 ad1847_flag = 1;
1658 else
1659 {
1660 DDB(printk("ad1848 detect error - step C (%x/%x)\n", tmp1, tmp2));
1661 return 0;
1662 }
1663 }
1664
1665
1666
1667
1668
1669
1670 DDB(printk("ad1848_detect() - step D\n"));
1671 tmp = ad_read(devc, 12);
1672 ad_write(devc, 12, (~tmp) & 0x0f);
1673
1674 if ((tmp & 0x0f) != ((tmp1 = ad_read(devc, 12)) & 0x0f))
1675 {
1676 DDB(printk("ad1848 detect error - step D (%x)\n", tmp1));
1677 return 0;
1678 }
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699 DDB(printk("ad1848_detect() - step F\n"));
1700 ad_write(devc, 12, 0);
1701
1702 for (i = 0; i < 16; i++)
1703 {
1704 if ((tmp1 = ad_read(devc, i)) != (tmp2 = ad_read(devc, i + 16)))
1705 {
1706 DDB(printk("ad1848 detect step F(%d/%x/%x) - OPTi chip???\n", i, tmp1, tmp2));
1707 if (!ad1847_flag)
1708 optiC930 = 1;
1709 break;
1710 }
1711 }
1712
1713
1714
1715
1716
1717
1718 DDB(printk("ad1848_detect() - step G\n"));
1719
1720 if (ad_flags && *ad_flags == 400)
1721 *ad_flags = 0;
1722 else
1723 ad_write(devc, 12, 0x40);
1724
1725
1726 if (ad_flags)
1727 *ad_flags = 0;
1728
1729 tmp1 = ad_read(devc, 12);
1730 if (tmp1 & 0x80)
1731 {
1732 if (ad_flags)
1733 *ad_flags |= AD_F_CS4248;
1734
1735 devc->chip_name = "CS4248";
1736 }
1737 if (optiC930 || (tmp1 & 0xc0) == (0x80 | 0x40))
1738 {
1739
1740
1741
1742
1743
1744
1745 DDB(printk("ad1848_detect() - step H\n"));
1746 ad_write(devc, 16, 0);
1747
1748 ad_write(devc, 0, 0x45);
1749 if ((tmp1 = ad_read(devc, 16)) != 0x45)
1750 {
1751 ad_write(devc, 0, 0xaa);
1752 if ((tmp1 = ad_read(devc, 16)) == 0xaa)
1753 {
1754 DDB(printk("ad1848 detect error - step H(%x)\n", tmp1));
1755 return 0;
1756 }
1757
1758
1759
1760
1761
1762 DDB(printk("ad1848_detect() - step I\n"));
1763 tmp1 = ad_read(devc, 25);
1764 ad_write(devc, 25, ~tmp1);
1765 if ((ad_read(devc, 25) & 0xe7) == (tmp1 & 0xe7))
1766 {
1767 int id;
1768
1769
1770
1771
1772
1773 devc->chip_name = "CS4231";
1774 devc->model = MD_4231;
1775
1776
1777
1778
1779
1780
1781
1782 id = ad_read(devc, 25);
1783 if ((id & 0xe7) == 0x80)
1784 id = ad_read(devc, 25);
1785 if ((id & 0xe7) == 0x80)
1786 id = ad_read(devc, 25);
1787 DDB(printk("ad1848_detect() - step J (%02x/%02x)\n", id, ad_read(devc, 25)));
1788
1789 if ((id & 0xe7) == 0x80) {
1790
1791
1792
1793
1794
1795
1796
1797 unsigned char tmp = ad_read(devc, 23);
1798 ad_write(devc, 23, ~tmp);
1799
1800 if (interwave)
1801 {
1802 devc->model = MD_IWAVE;
1803 devc->chip_name = "IWave";
1804 }
1805 else if (ad_read(devc, 23) != tmp)
1806 {
1807 devc->chip_name = "AD1845";
1808 devc->model = MD_1845;
1809 }
1810 else if (cs4248_flag)
1811 {
1812 if (ad_flags)
1813 *ad_flags |= AD_F_CS4248;
1814 devc->chip_name = "CS4248";
1815 devc->model = MD_1848;
1816 ad_write(devc, 12, ad_read(devc, 12) & ~0x40);
1817 }
1818 ad_write(devc, 23, tmp);
1819 }
1820 else
1821 {
1822 switch (id & 0x1f) {
1823 case 3:
1824 {
1825 int xid;
1826 ad_write(devc, 12, ad_read(devc, 12) | 0x60);
1827 ad_write(devc, 23, 0x9c);
1828 xid = inb(io_Indexed_Data(devc));
1829 ad_write(devc, 12, ad_read(devc, 12) & ~0x60);
1830 switch (xid & 0x1f)
1831 {
1832 case 0x00:
1833 devc->chip_name = "CS4237B(B)";
1834 devc->model = MD_42xB;
1835 break;
1836 case 0x08:
1837
1838 devc->chip_name = "CS4238";
1839 devc->model = MD_42xB;
1840 break;
1841 case 0x09:
1842 devc->chip_name = "CS4238B";
1843 devc->model = MD_42xB;
1844 break;
1845 case 0x0b:
1846 devc->chip_name = "CS4236B";
1847 devc->model = MD_4236;
1848 break;
1849 case 0x10:
1850 devc->chip_name = "CS4237B";
1851 devc->model = MD_42xB;
1852 break;
1853 case 0x1d:
1854 devc->chip_name = "CS4235";
1855 devc->model = MD_4235;
1856 break;
1857 case 0x1e:
1858 devc->chip_name = "CS4239";
1859 devc->model = MD_4239;
1860 break;
1861 default:
1862 printk("Chip ident is %X.\n", xid&0x1F);
1863 devc->chip_name = "CS42xx";
1864 devc->model = MD_4232;
1865 break;
1866 }
1867 }
1868 break;
1869
1870 case 2:
1871 devc->chip_name = "CS4232";
1872 devc->model = MD_4232;
1873 break;
1874
1875 case 0:
1876 if ((id & 0xe0) == 0xa0)
1877 {
1878 devc->chip_name = "CS4231A";
1879 devc->model = MD_4231A;
1880 }
1881 else
1882 {
1883 devc->chip_name = "CS4321";
1884 devc->model = MD_4231;
1885 }
1886 break;
1887
1888 default:
1889 DDB(printk("ad1848: I25 = %02x/%02x\n", ad_read(devc, 25), ad_read(devc, 25) & 0xe7));
1890 if (optiC930)
1891 {
1892 devc->chip_name = "82C930";
1893 devc->model = MD_C930;
1894 }
1895 else
1896 {
1897 devc->chip_name = "CS4231";
1898 devc->model = MD_4231;
1899 }
1900 }
1901 }
1902 }
1903 ad_write(devc, 25, tmp1);
1904
1905 DDB(printk("ad1848_detect() - step K\n"));
1906 }
1907 } else if (tmp1 == 0x0a) {
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918 for (i = 0; i < 16; i++) {
1919 if ((tmp1 = ad_read(devc, i)) != (tmp2 = ad_read(devc, i + 16))) {
1920 DDB(printk("ad1848 detect step H(%d/%x/%x) - SoundPro chip?\n", i, tmp1, tmp2));
1921 soundpro = 1;
1922 devc->chip_name = "SoundPro CMI 8330";
1923 break;
1924 }
1925 }
1926 }
1927
1928 DDB(printk("ad1848_detect() - step L\n"));
1929 if (ad_flags)
1930 {
1931 if (devc->model != MD_1848)
1932 *ad_flags |= AD_F_CS4231;
1933 }
1934 DDB(printk("ad1848_detect() - Detected OK\n"));
1935
1936 if (devc->model == MD_1848 && ad1847_flag)
1937 devc->chip_name = "AD1847";
1938
1939
1940 if (sscape_flag == 1)
1941 devc->model = MD_1845_SSCAPE;
1942
1943 return 1;
1944}
1945
1946int ad1848_init (char *name, struct resource *ports, int irq, int dma_playback,
1947 int dma_capture, int share_dma, int *osp, struct module *owner)
1948{
1949
1950
1951
1952
1953
1954
1955 int my_dev;
1956 char dev_name[100];
1957 int e;
1958
1959 ad1848_info *devc = &adev_info[nr_ad1848_devs];
1960
1961 ad1848_port_info *portc = NULL;
1962
1963 devc->irq = (irq > 0) ? irq : 0;
1964 devc->open_mode = 0;
1965 devc->timer_ticks = 0;
1966 devc->dma1 = dma_playback;
1967 devc->dma2 = dma_capture;
1968 devc->subtype = cfg.card_subtype;
1969 devc->audio_flags = DMA_AUTOMODE;
1970 devc->playback_dev = devc->record_dev = 0;
1971 if (name != NULL)
1972 devc->name = name;
1973
1974 if (name != NULL && name[0] != 0)
1975 sprintf(dev_name,
1976 "%s (%s)", name, devc->chip_name);
1977 else
1978 sprintf(dev_name,
1979 "Generic audio codec (%s)", devc->chip_name);
1980
1981 rename_region(ports, devc->name);
1982
1983 conf_printf2(dev_name, devc->base, devc->irq, dma_playback, dma_capture);
1984
1985 if (devc->model == MD_1848 || devc->model == MD_C930)
1986 devc->audio_flags |= DMA_HARDSTOP;
1987
1988 if (devc->model > MD_1848)
1989 {
1990 if (devc->dma1 == devc->dma2 || devc->dma2 == -1 || devc->dma1 == -1)
1991 devc->audio_flags &= ~DMA_DUPLEX;
1992 else
1993 devc->audio_flags |= DMA_DUPLEX;
1994 }
1995
1996 portc = kmalloc(sizeof(ad1848_port_info), GFP_KERNEL);
1997 if(portc==NULL) {
1998 release_region(devc->base, 4);
1999 return -1;
2000 }
2001
2002 if ((my_dev = sound_install_audiodrv(AUDIO_DRIVER_VERSION,
2003 dev_name,
2004 &ad1848_audio_driver,
2005 sizeof(struct audio_driver),
2006 devc->audio_flags,
2007 ad_format_mask[devc->model],
2008 devc,
2009 dma_playback,
2010 dma_capture)) < 0)
2011 {
2012 release_region(devc->base, 4);
2013 kfree(portc);
2014 return -1;
2015 }
2016
2017 audio_devs[my_dev]->portc = portc;
2018 audio_devs[my_dev]->mixer_dev = -1;
2019 if (owner)
2020 audio_devs[my_dev]->d->owner = owner;
2021 memset((char *) portc, 0, sizeof(*portc));
2022
2023 nr_ad1848_devs++;
2024
2025 ad1848_init_hw(devc);
2026
2027 if (irq > 0)
2028 {
2029 devc->dev_no = my_dev;
2030 if (request_irq(devc->irq, adintr, 0, devc->name,
2031 (void *)(long)my_dev) < 0)
2032 {
2033 printk(KERN_WARNING "ad1848: Unable to allocate IRQ\n");
2034
2035 devc->irq = 0;
2036 }
2037 if (capabilities[devc->model].flags & CAP_F_TIMER)
2038 {
2039#ifndef CONFIG_SMP
2040 int x;
2041 unsigned char tmp = ad_read(devc, 16);
2042#endif
2043
2044 devc->timer_ticks = 0;
2045
2046 ad_write(devc, 21, 0x00);
2047 ad_write(devc, 20, 0x10);
2048#ifndef CONFIG_SMP
2049 ad_write(devc, 16, tmp | 0x40);
2050 for (x = 0; x < 100000 && devc->timer_ticks == 0; x++);
2051 ad_write(devc, 16, tmp & ~0x40);
2052
2053 if (devc->timer_ticks == 0)
2054 printk(KERN_WARNING "ad1848: Interrupt test failed (IRQ%d)\n", irq);
2055 else
2056 {
2057 DDB(printk("Interrupt test OK\n"));
2058 devc->irq_ok = 1;
2059 }
2060#else
2061 devc->irq_ok = 1;
2062#endif
2063 }
2064 else
2065 devc->irq_ok = 1;
2066 } else if (irq < 0)
2067 irq2dev[-irq] = devc->dev_no = my_dev;
2068
2069#ifndef EXCLUDE_TIMERS
2070 if ((capabilities[devc->model].flags & CAP_F_TIMER) &&
2071 devc->irq_ok)
2072 ad1848_tmr_install(my_dev);
2073#endif
2074
2075 if (!share_dma)
2076 {
2077 if (sound_alloc_dma(dma_playback, devc->name))
2078 printk(KERN_WARNING "ad1848.c: Can't allocate DMA%d\n", dma_playback);
2079
2080 if (dma_capture != dma_playback)
2081 if (sound_alloc_dma(dma_capture, devc->name))
2082 printk(KERN_WARNING "ad1848.c: Can't allocate DMA%d\n", dma_capture);
2083 }
2084
2085 if ((e = sound_install_mixer(MIXER_DRIVER_VERSION,
2086 dev_name,
2087 &ad1848_mixer_operations,
2088 sizeof(struct mixer_operations),
2089 devc)) >= 0)
2090 {
2091 audio_devs[my_dev]->mixer_dev = e;
2092 if (owner)
2093 mixer_devs[e]->owner = owner;
2094 }
2095 return my_dev;
2096}
2097
2098int ad1848_control(int cmd, int arg)
2099{
2100 ad1848_info *devc;
2101 unsigned long flags;
2102
2103 if (nr_ad1848_devs < 1)
2104 return -ENODEV;
2105
2106 devc = &adev_info[nr_ad1848_devs - 1];
2107
2108 switch (cmd)
2109 {
2110 case AD1848_SET_XTAL:
2111 if (devc->model != MD_1845 && devc->model != MD_1845_SSCAPE)
2112 return -EINVAL;
2113 spin_lock_irqsave(&devc->lock,flags);
2114 ad_enter_MCE(devc);
2115 ad_write(devc, 29, (ad_read(devc, 29) & 0x1f) | (arg << 5));
2116 ad_leave_MCE(devc);
2117 spin_unlock_irqrestore(&devc->lock,flags);
2118 break;
2119
2120 case AD1848_MIXER_REROUTE:
2121 {
2122 int o = (arg >> 8) & 0xff;
2123 int n = arg & 0xff;
2124
2125 if (o < 0 || o >= SOUND_MIXER_NRDEVICES)
2126 return -EINVAL;
2127
2128 if (!(devc->supported_devices & (1 << o)) &&
2129 !(devc->supported_rec_devices & (1 << o)))
2130 return -EINVAL;
2131
2132 if (n == SOUND_MIXER_NONE)
2133 {
2134 ad1848_mixer_set(devc, o, 0);
2135 devc->supported_devices &= ~(1 << o);
2136 devc->supported_rec_devices &= ~(1 << o);
2137 break;
2138 }
2139
2140
2141 if (n < 0 || n >= SOUND_MIXER_NRDEVICES)
2142 return -EINVAL;
2143
2144 devc->mixer_reroute[n] = o;
2145 if (devc->supported_devices & (1 << o))
2146 devc->supported_devices |= (1 << n);
2147 if (devc->supported_rec_devices & (1 << o))
2148 devc->supported_rec_devices |= (1 << n);
2149
2150 devc->supported_devices &= ~(1 << o);
2151 devc->supported_rec_devices &= ~(1 << o);
2152 }
2153 break;
2154 }
2155 return 0;
2156}
2157
2158void ad1848_unload(int io_base, int irq, int dma_playback, int dma_capture, int share_dma)
2159{
2160 int i, mixer, dev = 0;
2161 ad1848_info *devc = NULL;
2162
2163 for (i = 0; devc == NULL && i < nr_ad1848_devs; i++)
2164 {
2165 if (adev_info[i].base == io_base)
2166 {
2167 devc = &adev_info[i];
2168 dev = devc->dev_no;
2169 }
2170 }
2171
2172 if (devc != NULL)
2173 {
2174 kfree(audio_devs[dev]->portc);
2175 release_region(devc->base, 4);
2176
2177 if (!share_dma)
2178 {
2179 if (devc->irq > 0)
2180 free_irq(devc->irq, (void *)(long)devc->dev_no);
2181
2182 sound_free_dma(dma_playback);
2183
2184 if (dma_playback != dma_capture)
2185 sound_free_dma(dma_capture);
2186
2187 }
2188 mixer = audio_devs[devc->dev_no]->mixer_dev;
2189 if(mixer>=0)
2190 sound_unload_mixerdev(mixer);
2191
2192 nr_ad1848_devs--;
2193 for ( ; i < nr_ad1848_devs ; i++)
2194 adev_info[i] = adev_info[i+1];
2195 }
2196 else
2197 printk(KERN_ERR "ad1848: Can't find device to be unloaded. Base=%x\n", io_base);
2198}
2199
2200static irqreturn_t adintr(int irq, void *dev_id)
2201{
2202 unsigned char status;
2203 ad1848_info *devc;
2204 int dev;
2205 int alt_stat = 0xff;
2206 unsigned char c930_stat = 0;
2207 int cnt = 0;
2208
2209 dev = (long)dev_id;
2210 devc = (ad1848_info *) audio_devs[dev]->devc;
2211
2212interrupt_again:
2213
2214 status = inb(io_Status(devc));
2215
2216 if (status == 0x80)
2217 printk(KERN_DEBUG "adintr: Why?\n");
2218 if (devc->model == MD_1848)
2219 outb((0), io_Status(devc));
2220
2221 if (status & 0x01)
2222 {
2223 if (devc->model == MD_C930)
2224 {
2225
2226 spin_lock(&devc->lock);
2227
2228
2229
2230
2231 outb(11, 0xe0e);
2232 c930_stat = inb(0xe0f);
2233 outb((~c930_stat), 0xe0f);
2234
2235 spin_unlock(&devc->lock);
2236
2237 alt_stat = (c930_stat << 2) & 0x30;
2238 }
2239 else if (devc->model != MD_1848)
2240 {
2241 spin_lock(&devc->lock);
2242 alt_stat = ad_read(devc, 24);
2243 ad_write(devc, 24, ad_read(devc, 24) & ~alt_stat);
2244 spin_unlock(&devc->lock);
2245 }
2246
2247 if ((devc->open_mode & OPEN_READ) && (devc->audio_mode & PCM_ENABLE_INPUT) && (alt_stat & 0x20))
2248 {
2249 DMAbuf_inputintr(devc->record_dev);
2250 }
2251 if ((devc->open_mode & OPEN_WRITE) && (devc->audio_mode & PCM_ENABLE_OUTPUT) &&
2252 (alt_stat & 0x10))
2253 {
2254 DMAbuf_outputintr(devc->playback_dev, 1);
2255 }
2256 if (devc->model != MD_1848 && (alt_stat & 0x40))
2257 {
2258 devc->timer_ticks++;
2259#ifndef EXCLUDE_TIMERS
2260 if (timer_installed == dev && devc->timer_running)
2261 sound_timer_interrupt();
2262#endif
2263 }
2264 }
2265
2266
2267
2268
2269
2270
2271 if (inb(io_Status(devc)) & 0x01 && cnt++ < 4)
2272 {
2273 goto interrupt_again;
2274 }
2275 return IRQ_HANDLED;
2276}
2277
2278
2279
2280
2281
2282
2283static int init_deskpro_m(struct address_info *hw_config)
2284{
2285 unsigned char tmp;
2286
2287 if ((tmp = inb(0xc44)) == 0xff)
2288 {
2289 DDB(printk("init_deskpro_m: Dead port 0xc44\n"));
2290 return 0;
2291 }
2292
2293 outb(0x10, 0xc44);
2294 outb(0x40, 0xc45);
2295 outb(0x00, 0xc46);
2296 outb(0xe8, 0xc47);
2297 outb(0x14, 0xc44);
2298 outb(0x40, 0xc45);
2299 outb(0x00, 0xc46);
2300 outb(0xe8, 0xc47);
2301 outb(0x10, 0xc44);
2302
2303 return 1;
2304}
2305
2306
2307
2308
2309
2310
2311static int init_deskpro(struct address_info *hw_config)
2312{
2313 unsigned char tmp;
2314
2315 if ((tmp = inb(0xc44)) == 0xff)
2316 {
2317 DDB(printk("init_deskpro: Dead port 0xc44\n"));
2318 return 0;
2319 }
2320 outb((tmp | 0x04), 0xc44);
2321 if (inb(0xc44) != 0x04)
2322 {
2323 DDB(printk("init_deskpro: Invalid bank1 signature in port 0xc44\n"));
2324 return 0;
2325 }
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357#ifdef DEBUGXL
2358
2359 printk("Port 0xc44 (before): ");
2360 outb((tmp & ~0x04), 0xc44);
2361 printk("%02x ", inb(0xc44));
2362 outb((tmp | 0x04), 0xc44);
2363 printk("%02x\n", inb(0xc44));
2364#endif
2365
2366
2367 tmp = 0x58;
2368
2369 switch (hw_config->io_base)
2370 {
2371 case 0x530:
2372 tmp |= 0x00;
2373 break;
2374 case 0x604:
2375 tmp |= 0x01;
2376 break;
2377 case 0xf40:
2378 tmp |= 0x02;
2379 break;
2380 case 0xe80:
2381 tmp |= 0x03;
2382 break;
2383 default:
2384 DDB(printk("init_deskpro: Invalid MSS port %x\n", hw_config->io_base));
2385 return 0;
2386 }
2387 outb((tmp & ~0x04), 0xc44);
2388
2389#ifdef DEBUGXL
2390
2391 printk("Port 0xc44 (after): ");
2392 outb((tmp & ~0x04), 0xc44);
2393 printk("%02x ", inb(0xc44));
2394 outb((tmp | 0x04), 0xc44);
2395 printk("%02x\n", inb(0xc44));
2396#endif
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408#ifdef DEBUGXL
2409
2410 printk("Port 0xc45 (before): ");
2411 outb((tmp & ~0x04), 0xc44);
2412 printk("%02x ", inb(0xc45));
2413 outb((tmp | 0x04), 0xc44);
2414 printk("%02x\n", inb(0xc45));
2415#endif
2416
2417 outb((tmp & ~0x04), 0xc44);
2418 outb((0x88), 0xc45);
2419 outb((tmp | 0x04), 0xc44);
2420 outb((0x10), 0xc45);
2421
2422#ifdef DEBUGXL
2423
2424 printk("Port 0xc45 (after): ");
2425 outb((tmp & ~0x04), 0xc44);
2426 printk("%02x ", inb(0xc45));
2427 outb((tmp | 0x04), 0xc44);
2428 printk("%02x\n", inb(0xc45));
2429#endif
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439#ifdef DEBUGXL
2440
2441 printk("Port 0xc46 (before): ");
2442 outb((tmp & ~0x04), 0xc44);
2443 printk("%02x ", inb(0xc46));
2444 outb((tmp | 0x04), 0xc44);
2445 printk("%02x\n", inb(0xc46));
2446#endif
2447
2448 outb((tmp & ~0x04), 0xc44);
2449 outb((0x03), 0xc46);
2450 outb((tmp | 0x04), 0xc44);
2451 outb((0x11), 0xc46);
2452
2453#ifdef DEBUGXL
2454
2455 printk("Port 0xc46 (after): ");
2456 outb((tmp & ~0x04), 0xc44);
2457 printk("%02x ", inb(0xc46));
2458 outb((tmp | 0x04), 0xc44);
2459 printk("%02x\n", inb(0xc46));
2460#endif
2461
2462
2463
2464
2465
2466
2467
2468
2469#ifdef DEBUGXL
2470
2471 printk("Port 0xc47 (before): ");
2472 outb((tmp & ~0x04), 0xc44);
2473 printk("%02x ", inb(0xc47));
2474 outb((tmp | 0x04), 0xc44);
2475 printk("%02x\n", inb(0xc47));
2476#endif
2477
2478 outb((tmp & ~0x04), 0xc44);
2479 outb((0x7c), 0xc47);
2480 outb((tmp | 0x04), 0xc44);
2481 outb((0x00), 0xc47);
2482
2483#ifdef DEBUGXL
2484
2485 printk("Port 0xc47 (after): ");
2486 outb((tmp & ~0x04), 0xc44);
2487 printk("%02x ", inb(0xc47));
2488 outb((tmp | 0x04), 0xc44);
2489 printk("%02x\n", inb(0xc47));
2490#endif
2491
2492
2493
2494
2495
2496#ifdef DEBUGXL
2497 printk("Port 0xc6f (before) = %02x\n", inb(0xc6f));
2498#endif
2499
2500 outb((0x80), 0xc6f);
2501
2502#ifdef DEBUGXL
2503 printk("Port 0xc6f (after) = %02x\n", inb(0xc6f));
2504#endif
2505
2506 return 1;
2507}
2508
2509int probe_ms_sound(struct address_info *hw_config, struct resource *ports)
2510{
2511 unsigned char tmp;
2512
2513 DDB(printk("Entered probe_ms_sound(%x, %d)\n", hw_config->io_base, hw_config->card_subtype));
2514
2515 if (hw_config->card_subtype == 1)
2516 {
2517
2518 return ad1848_detect(ports, NULL, hw_config->osp);
2519 }
2520
2521 if (deskpro_xl && hw_config->card_subtype == 2)
2522 {
2523 if (!init_deskpro(hw_config))
2524 return 0;
2525 }
2526
2527 if (deskpro_m)
2528 {
2529 if (!init_deskpro_m(hw_config))
2530 return 0;
2531 }
2532
2533
2534
2535
2536
2537
2538
2539 if ((tmp = inb(hw_config->io_base + 3)) == 0xff)
2540 {
2541 int ret;
2542
2543 DDB(printk("I/O address is inactive (%x)\n", tmp));
2544 if (!(ret = ad1848_detect(ports, NULL, hw_config->osp)))
2545 return 0;
2546 return 1;
2547 }
2548 DDB(printk("MSS signature = %x\n", tmp & 0x3f));
2549 if ((tmp & 0x3f) != 0x04 &&
2550 (tmp & 0x3f) != 0x0f &&
2551 (tmp & 0x3f) != 0x00)
2552 {
2553 int ret;
2554
2555 MDB(printk(KERN_ERR "No MSS signature detected on port 0x%x (0x%x)\n", hw_config->io_base, (int) inb(hw_config->io_base + 3)));
2556 DDB(printk("Trying to detect codec anyway but IRQ/DMA may not work\n"));
2557 if (!(ret = ad1848_detect(ports, NULL, hw_config->osp)))
2558 return 0;
2559
2560 hw_config->card_subtype = 1;
2561 return 1;
2562 }
2563 if ((hw_config->irq != 5) &&
2564 (hw_config->irq != 7) &&
2565 (hw_config->irq != 9) &&
2566 (hw_config->irq != 10) &&
2567 (hw_config->irq != 11) &&
2568 (hw_config->irq != 12))
2569 {
2570 printk(KERN_ERR "MSS: Bad IRQ %d\n", hw_config->irq);
2571 return 0;
2572 }
2573 if (hw_config->dma != 0 && hw_config->dma != 1 && hw_config->dma != 3)
2574 {
2575 printk(KERN_ERR "MSS: Bad DMA %d\n", hw_config->dma);
2576 return 0;
2577 }
2578
2579
2580
2581
2582 if (hw_config->dma == 0 && inb(hw_config->io_base + 3) & 0x80)
2583 {
2584 printk(KERN_ERR "MSS: Can't use DMA0 with a 8 bit card/slot\n");
2585 return 0;
2586 }
2587 if (hw_config->irq > 7 && hw_config->irq != 9 && inb(hw_config->io_base + 3) & 0x80)
2588 {
2589 printk(KERN_ERR "MSS: Can't use IRQ%d with a 8 bit card/slot\n", hw_config->irq);
2590 return 0;
2591 }
2592 return ad1848_detect(ports, NULL, hw_config->osp);
2593}
2594
2595void attach_ms_sound(struct address_info *hw_config, struct resource *ports, struct module *owner)
2596{
2597 static signed char interrupt_bits[12] =
2598 {
2599 -1, -1, -1, -1, -1, 0x00, -1, 0x08, -1, 0x10, 0x18, 0x20
2600 };
2601 signed char bits;
2602 char dma2_bit = 0;
2603
2604 static char dma_bits[4] =
2605 {
2606 1, 2, 0, 3
2607 };
2608
2609 int config_port = hw_config->io_base + 0;
2610 int version_port = hw_config->io_base + 3;
2611 int dma = hw_config->dma;
2612 int dma2 = hw_config->dma2;
2613
2614 if (hw_config->card_subtype == 1)
2615 {
2616 hw_config->slots[0] = ad1848_init("MS Sound System", ports,
2617 hw_config->irq,
2618 hw_config->dma,
2619 hw_config->dma2, 0,
2620 hw_config->osp,
2621 owner);
2622 return;
2623 }
2624
2625
2626
2627
2628 bits = interrupt_bits[hw_config->irq];
2629 if (bits == -1)
2630 {
2631 printk(KERN_ERR "MSS: Bad IRQ %d\n", hw_config->irq);
2632 release_region(ports->start, 4);
2633 release_region(ports->start - 4, 4);
2634 return;
2635 }
2636 outb((bits | 0x40), config_port);
2637 if ((inb(version_port) & 0x40) == 0)
2638 printk(KERN_ERR "[MSS: IRQ Conflict?]\n");
2639
2640
2641
2642
2643
2644 if (dma2 != -1 && dma2 != dma)
2645 {
2646 if (!((dma == 0 && dma2 == 1) ||
2647 (dma == 1 && dma2 == 0) ||
2648 (dma == 3 && dma2 == 0)))
2649 {
2650 int tmp = dma;
2651
2652 dma = dma2;
2653 dma2 = tmp;
2654 }
2655 if ((dma == 0 && dma2 == 1) ||
2656 (dma == 1 && dma2 == 0) ||
2657 (dma == 3 && dma2 == 0))
2658 {
2659 dma2_bit = 0x04;
2660 }
2661 else
2662 {
2663 printk(KERN_WARNING "MSS: Invalid capture DMA\n");
2664 dma2 = dma;
2665 }
2666 }
2667 else
2668 {
2669 dma2 = dma;
2670 }
2671
2672 hw_config->dma = dma;
2673 hw_config->dma2 = dma2;
2674
2675 outb((bits | dma_bits[dma] | dma2_bit), config_port);
2676
2677 hw_config->slots[0] = ad1848_init("MS Sound System", ports,
2678 hw_config->irq,
2679 dma, dma2, 0,
2680 hw_config->osp,
2681 THIS_MODULE);
2682}
2683
2684void unload_ms_sound(struct address_info *hw_config)
2685{
2686 ad1848_unload(hw_config->io_base + 4,
2687 hw_config->irq,
2688 hw_config->dma,
2689 hw_config->dma2, 0);
2690 sound_unload_audiodev(hw_config->slots[0]);
2691 release_region(hw_config->io_base, 4);
2692}
2693
2694#ifndef EXCLUDE_TIMERS
2695
2696
2697
2698
2699
2700static unsigned int current_interval;
2701
2702static unsigned int ad1848_tmr_start(int dev, unsigned int usecs)
2703{
2704 unsigned long flags;
2705 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
2706 unsigned long xtal_nsecs;
2707 unsigned long divider;
2708
2709 spin_lock_irqsave(&devc->lock,flags);
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722 if (devc->model == MD_1845 || devc->model == MD_1845_SSCAPE)
2723 xtal_nsecs = 10050;
2724 else if (ad_read(devc, 8) & 0x01)
2725 xtal_nsecs = 9920;
2726 else
2727 xtal_nsecs = 9969;
2728
2729 divider = (usecs * 1000 + xtal_nsecs / 2) / xtal_nsecs;
2730
2731 if (divider < 100)
2732 divider = 100;
2733
2734 if (divider > 65535)
2735 divider = 65535;
2736
2737 ad_write(devc, 21, (divider >> 8) & 0xff);
2738 ad_write(devc, 20, divider & 0xff);
2739 ad_write(devc, 16, ad_read(devc, 16) | 0x40);
2740 devc->timer_running = 1;
2741 spin_unlock_irqrestore(&devc->lock,flags);
2742
2743 return current_interval = (divider * xtal_nsecs + 500) / 1000;
2744}
2745
2746static void ad1848_tmr_reprogram(int dev)
2747{
2748
2749
2750
2751
2752
2753 ad1848_tmr_start(dev, current_interval);
2754 sound_timer_syncinterval(current_interval);
2755}
2756
2757static void ad1848_tmr_disable(int dev)
2758{
2759 unsigned long flags;
2760 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
2761
2762 spin_lock_irqsave(&devc->lock,flags);
2763 ad_write(devc, 16, ad_read(devc, 16) & ~0x40);
2764 devc->timer_running = 0;
2765 spin_unlock_irqrestore(&devc->lock,flags);
2766}
2767
2768static void ad1848_tmr_restart(int dev)
2769{
2770 unsigned long flags;
2771 ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
2772
2773 if (current_interval == 0)
2774 return;
2775
2776 spin_lock_irqsave(&devc->lock,flags);
2777 ad_write(devc, 16, ad_read(devc, 16) | 0x40);
2778 devc->timer_running = 1;
2779 spin_unlock_irqrestore(&devc->lock,flags);
2780}
2781
2782static struct sound_lowlev_timer ad1848_tmr =
2783{
2784 0,
2785 2,
2786 ad1848_tmr_start,
2787 ad1848_tmr_disable,
2788 ad1848_tmr_restart
2789};
2790
2791static int ad1848_tmr_install(int dev)
2792{
2793 if (timer_installed != -1)
2794 return 0;
2795
2796 timer_installed = ad1848_tmr.dev = dev;
2797 sound_timer_init(&ad1848_tmr, audio_devs[dev]->name);
2798
2799 return 1;
2800}
2801#endif
2802
2803EXPORT_SYMBOL(ad1848_detect);
2804EXPORT_SYMBOL(ad1848_init);
2805EXPORT_SYMBOL(ad1848_unload);
2806EXPORT_SYMBOL(ad1848_control);
2807EXPORT_SYMBOL(probe_ms_sound);
2808EXPORT_SYMBOL(attach_ms_sound);
2809EXPORT_SYMBOL(unload_ms_sound);
2810
2811static int __initdata io = -1;
2812static int __initdata irq = -1;
2813static int __initdata dma = -1;
2814static int __initdata dma2 = -1;
2815static int __initdata type = 0;
2816
2817module_param(io, int, 0);
2818module_param(irq, int, 0);
2819module_param(dma, int, 0);
2820module_param(dma2, int, 0);
2821module_param(type, int, 0);
2822module_param(deskpro_xl, bool, 0);
2823module_param(deskpro_m, bool, 0);
2824module_param(soundpro, bool, 0);
2825
2826#ifdef CONFIG_PNP
2827module_param(isapnp, int, 0);
2828module_param(isapnpjump, int, 0);
2829module_param(reverse, bool, 0);
2830MODULE_PARM_DESC(isapnp, "When set to 0, Plug & Play support will be disabled");
2831MODULE_PARM_DESC(isapnpjump, "Jumps to a specific slot in the driver's PnP table. Use the source, Luke.");
2832MODULE_PARM_DESC(reverse, "When set to 1, will reverse ISAPnP search order");
2833
2834static struct pnp_dev *ad1848_dev = NULL;
2835
2836
2837static struct {
2838 char *name;
2839 unsigned short card_vendor, card_device,
2840 vendor, function;
2841 short mss_io, irq, dma, dma2;
2842 int type;
2843} ad1848_isapnp_list[] __initdata = {
2844 {"CMI 8330 SoundPRO",
2845 ISAPNP_VENDOR('C','M','I'), ISAPNP_DEVICE(0x0001),
2846 ISAPNP_VENDOR('@','@','@'), ISAPNP_FUNCTION(0x0001),
2847 0, 0, 0,-1, 0},
2848 {"CS4232 based card",
2849 ISAPNP_ANY_ID, ISAPNP_ANY_ID,
2850 ISAPNP_VENDOR('C','S','C'), ISAPNP_FUNCTION(0x0000),
2851 0, 0, 0, 1, 0},
2852 {"CS4232 based card",
2853 ISAPNP_ANY_ID, ISAPNP_ANY_ID,
2854 ISAPNP_VENDOR('C','S','C'), ISAPNP_FUNCTION(0x0100),
2855 0, 0, 0, 1, 0},
2856 {"OPL3-SA2 WSS mode",
2857 ISAPNP_ANY_ID, ISAPNP_ANY_ID,
2858 ISAPNP_VENDOR('Y','M','H'), ISAPNP_FUNCTION(0x0021),
2859 1, 0, 0, 1, 1},
2860 {"Advanced Gravis InterWave Audio",
2861 ISAPNP_VENDOR('G','R','V'), ISAPNP_DEVICE(0x0001),
2862 ISAPNP_VENDOR('G','R','V'), ISAPNP_FUNCTION(0x0000),
2863 0, 0, 0, 1, 0},
2864 {NULL}
2865};
2866
2867static struct isapnp_device_id id_table[] = {
2868 { ISAPNP_VENDOR('C','M','I'), ISAPNP_DEVICE(0x0001),
2869 ISAPNP_VENDOR('@','@','@'), ISAPNP_FUNCTION(0x0001), 0 },
2870 { ISAPNP_ANY_ID, ISAPNP_ANY_ID,
2871 ISAPNP_VENDOR('C','S','C'), ISAPNP_FUNCTION(0x0000), 0 },
2872 { ISAPNP_ANY_ID, ISAPNP_ANY_ID,
2873 ISAPNP_VENDOR('C','S','C'), ISAPNP_FUNCTION(0x0100), 0 },
2874
2875
2876
2877
2878 { ISAPNP_VENDOR('G','R','V'), ISAPNP_DEVICE(0x0001),
2879 ISAPNP_VENDOR('G','R','V'), ISAPNP_FUNCTION(0x0000), 0 },
2880 {0}
2881};
2882
2883MODULE_DEVICE_TABLE(isapnp, id_table);
2884
2885static struct pnp_dev *activate_dev(char *devname, char *resname, struct pnp_dev *dev)
2886{
2887 int err;
2888
2889 err = pnp_device_attach(dev);
2890 if (err < 0)
2891 return(NULL);
2892
2893 if((err = pnp_activate_dev(dev)) < 0) {
2894 printk(KERN_ERR "ad1848: %s %s config failed (out of resources?)[%d]\n", devname, resname, err);
2895
2896 pnp_device_detach(dev);
2897
2898 return(NULL);
2899 }
2900 audio_activated = 1;
2901 return(dev);
2902}
2903
2904static struct pnp_dev __init *ad1848_init_generic(struct pnp_card *bus,
2905 struct address_info *hw_config, int slot)
2906{
2907
2908
2909 if((ad1848_dev = pnp_find_dev(bus, ad1848_isapnp_list[slot].vendor, ad1848_isapnp_list[slot].function, NULL)))
2910 {
2911 if((ad1848_dev = activate_dev(ad1848_isapnp_list[slot].name, "ad1848", ad1848_dev)))
2912 {
2913 hw_config->io_base = pnp_port_start(ad1848_dev, ad1848_isapnp_list[slot].mss_io);
2914 hw_config->irq = pnp_irq(ad1848_dev, ad1848_isapnp_list[slot].irq);
2915 hw_config->dma = pnp_dma(ad1848_dev, ad1848_isapnp_list[slot].dma);
2916 if(ad1848_isapnp_list[slot].dma2 != -1)
2917 hw_config->dma2 = pnp_dma(ad1848_dev, ad1848_isapnp_list[slot].dma2);
2918 else
2919 hw_config->dma2 = -1;
2920 hw_config->card_subtype = ad1848_isapnp_list[slot].type;
2921 } else
2922 return(NULL);
2923 } else
2924 return(NULL);
2925
2926 return(ad1848_dev);
2927}
2928
2929static int __init ad1848_isapnp_init(struct address_info *hw_config, struct pnp_card *bus, int slot)
2930{
2931 char *busname = bus->name[0] ? bus->name : ad1848_isapnp_list[slot].name;
2932
2933
2934
2935 if(ad1848_init_generic(bus, hw_config, slot)) {
2936
2937
2938 printk(KERN_NOTICE "ad1848: PnP reports '%s' at i/o %#x, irq %d, dma %d, %d\n",
2939 busname,
2940 hw_config->io_base, hw_config->irq, hw_config->dma,
2941 hw_config->dma2);
2942 return 1;
2943 }
2944 return 0;
2945}
2946
2947static int __init ad1848_isapnp_probe(struct address_info *hw_config)
2948{
2949 static int first = 1;
2950 int i;
2951
2952
2953 for (i = 0; ad1848_isapnp_list[i].card_vendor != 0; i++);
2954 i--;
2955
2956
2957 if( isapnpjump < 0 || isapnpjump > i) {
2958 isapnpjump = reverse ? i : 0;
2959 printk(KERN_ERR "ad1848: Valid range for isapnpjump is 0-%d. Adjusted to %d.\n", i, isapnpjump);
2960 }
2961
2962 if(!first || !reverse)
2963 i = isapnpjump;
2964 first = 0;
2965 while(ad1848_isapnp_list[i].card_vendor != 0) {
2966 static struct pnp_card *bus = NULL;
2967
2968 while ((bus = pnp_find_card(
2969 ad1848_isapnp_list[i].card_vendor,
2970 ad1848_isapnp_list[i].card_device,
2971 bus))) {
2972
2973 if(ad1848_isapnp_init(hw_config, bus, i)) {
2974 isapnpjump = i;
2975 return 0;
2976 }
2977 }
2978 i += reverse ? -1 : 1;
2979 }
2980
2981 return -ENODEV;
2982}
2983#endif
2984
2985
2986static int __init init_ad1848(void)
2987{
2988 printk(KERN_INFO "ad1848/cs4248 codec driver Copyright (C) by Hannu Savolainen 1993-1996\n");
2989
2990#ifdef CONFIG_PNP
2991 if(isapnp && (ad1848_isapnp_probe(&cfg) < 0) ) {
2992 printk(KERN_NOTICE "ad1848: No ISAPnP cards found, trying standard ones...\n");
2993 isapnp = 0;
2994 }
2995#endif
2996
2997 if(io != -1) {
2998 struct resource *ports;
2999 if( isapnp == 0 )
3000 {
3001 if(irq == -1 || dma == -1) {
3002 printk(KERN_WARNING "ad1848: must give I/O , IRQ and DMA.\n");
3003 return -EINVAL;
3004 }
3005
3006 cfg.irq = irq;
3007 cfg.io_base = io;
3008 cfg.dma = dma;
3009 cfg.dma2 = dma2;
3010 cfg.card_subtype = type;
3011 }
3012
3013 ports = request_region(io + 4, 4, "ad1848");
3014
3015 if (!ports)
3016 return -EBUSY;
3017
3018 if (!request_region(io, 4, "WSS config")) {
3019 release_region(io + 4, 4);
3020 return -EBUSY;
3021 }
3022
3023 if (!probe_ms_sound(&cfg, ports)) {
3024 release_region(io + 4, 4);
3025 release_region(io, 4);
3026 return -ENODEV;
3027 }
3028 attach_ms_sound(&cfg, ports, THIS_MODULE);
3029 loaded = 1;
3030 }
3031 return 0;
3032}
3033
3034static void __exit cleanup_ad1848(void)
3035{
3036 if(loaded)
3037 unload_ms_sound(&cfg);
3038
3039#ifdef CONFIG_PNP
3040 if(ad1848_dev){
3041 if(audio_activated)
3042 pnp_device_detach(ad1848_dev);
3043 }
3044#endif
3045}
3046
3047module_init(init_ad1848);
3048module_exit(cleanup_ad1848);
3049
3050#ifndef MODULE
3051static int __init setup_ad1848(char *str)
3052{
3053
3054 int ints[6];
3055
3056 str = get_options(str, ARRAY_SIZE(ints), ints);
3057
3058 io = ints[1];
3059 irq = ints[2];
3060 dma = ints[3];
3061 dma2 = ints[4];
3062 type = ints[5];
3063
3064 return 1;
3065}
3066
3067__setup("ad1848=", setup_ad1848);
3068#endif
3069MODULE_LICENSE("GPL");
3070