OpenCores
URL https://opencores.org/ocsvn/or1k_soc_on_altera_embedded_dev_kit/or1k_soc_on_altera_embedded_dev_kit/trunk

Subversion Repositories or1k_soc_on_altera_embedded_dev_kit

[/] [or1k_soc_on_altera_embedded_dev_kit/] [trunk/] [linux-2.6/] [linux-2.6.24/] [sound/] [oss/] [sscape.c] - Blame information for rev 3

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 3 xianfeng
/*
2
 * sound/oss/sscape.c
3
 *
4
 * Low level driver for Ensoniq SoundScape
5
 *
6
 *
7
 * Copyright (C) by Hannu Savolainen 1993-1997
8
 *
9
 * OSS/Free for Linux is distributed under the GNU GENERAL PUBLIC LICENSE (GPL)
10
 * Version 2 (June 1991). See the "COPYING" file distributed with this software
11
 * for more info.
12
 *
13
 *
14
 * Thomas Sailer        : ioctl code reworked (vmalloc/vfree removed)
15
 * Sergey Smitienko     : ensoniq p'n'p support
16
 * Christoph Hellwig    : adapted to module_init/module_exit
17
 * Bartlomiej Zolnierkiewicz : added __init to attach_sscape()
18
 * Chris Rankin         : Specify that this module owns the coprocessor
19
 * Arnaldo C. de Melo   : added missing restore_flags in sscape_pnp_upload_file
20
 */
21
 
22
#include <linux/init.h>
23
#include <linux/module.h>
24
 
25
#include "sound_config.h"
26
#include "sound_firmware.h"
27
 
28
#include <linux/types.h>
29
#include <linux/errno.h>
30
#include <linux/signal.h>
31
#include <linux/fcntl.h>
32
#include <linux/ctype.h>
33
#include <linux/stddef.h>
34
#include <linux/kmod.h>
35
#include <asm/dma.h>
36
#include <asm/io.h>
37
#include <linux/wait.h>
38
#include <linux/slab.h>
39
#include <linux/ioport.h>
40
#include <linux/delay.h>
41
#include <linux/proc_fs.h>
42
#include <linux/mm.h>
43
#include <linux/spinlock.h>
44
 
45
#include "coproc.h"
46
 
47
#include "ad1848.h"
48
#include "mpu401.h"
49
 
50
/*
51
 *    I/O ports
52
 */
53
#define MIDI_DATA       0
54
#define MIDI_CTRL       1
55
#define HOST_CTRL       2
56
#define TX_READY        0x02
57
#define RX_READY        0x01
58
#define HOST_DATA       3
59
#define ODIE_ADDR       4
60
#define ODIE_DATA       5
61
 
62
/*
63
 *    Indirect registers
64
 */
65
 
66
#define GA_INTSTAT_REG  0
67
#define GA_INTENA_REG   1
68
#define GA_DMAA_REG     2
69
#define GA_DMAB_REG     3
70
#define GA_INTCFG_REG   4
71
#define GA_DMACFG_REG   5
72
#define GA_CDCFG_REG    6
73
#define GA_SMCFGA_REG   7
74
#define GA_SMCFGB_REG   8
75
#define GA_HMCTL_REG    9
76
 
77
/*
78
 * DMA channel identifiers (A and B)
79
 */
80
 
81
#define SSCAPE_DMA_A    0
82
#define SSCAPE_DMA_B    1
83
 
84
#define PORT(name)      (devc->base+name)
85
 
86
/*
87
 * Host commands recognized by the OBP microcode
88
 */
89
 
90
#define CMD_GEN_HOST_ACK        0x80
91
#define CMD_GEN_MPU_ACK         0x81
92
#define CMD_GET_BOARD_TYPE      0x82
93
#define CMD_SET_CONTROL         0x88    /* Old firmware only */
94
#define CMD_GET_CONTROL         0x89    /* Old firmware only */
95
#define CTL_MASTER_VOL          0
96
#define CTL_MIC_MODE            2
97
#define CTL_SYNTH_VOL           4
98
#define CTL_WAVE_VOL            7
99
#define CMD_SET_EXTMIDI         0x8a
100
#define CMD_GET_EXTMIDI         0x8b
101
#define CMD_SET_MT32            0x8c
102
#define CMD_GET_MT32            0x8d
103
 
104
#define CMD_ACK                 0x80
105
 
106
#define IC_ODIE                 1
107
#define IC_OPUS                 2
108
 
109
typedef struct sscape_info
110
{
111
        int     base, irq, dma;
112
 
113
        int     codec, codec_irq;       /* required to setup pnp cards*/
114
        int     codec_type;
115
        int     ic_type;
116
        char*   raw_buf;
117
        unsigned long   raw_buf_phys;
118
        int     buffsize;               /* -------------------------- */
119
        spinlock_t lock;
120
        int     ok;     /* Properly detected */
121
        int     failed;
122
        int     dma_allocated;
123
        int     codec_audiodev;
124
        int     opened;
125
        int     *osp;
126
        int     my_audiodev;
127
} sscape_info;
128
 
129
static struct sscape_info adev_info = {
130
 
131
};
132
 
133
static struct sscape_info *devc = &adev_info;
134
static int sscape_mididev = -1;
135
 
136
/* Some older cards have assigned interrupt bits differently than new ones */
137
static char valid_interrupts_old[] = {
138
        9, 7, 5, 15
139
};
140
 
141
static char valid_interrupts_new[] = {
142
        9, 5, 7, 10
143
};
144
 
145
static char *valid_interrupts = valid_interrupts_new;
146
 
147
/*
148
 *      See the bottom of the driver. This can be set by spea =0/1.
149
 */
150
 
151
#ifdef REVEAL_SPEA
152
static char old_hardware = 1;
153
#else
154
static char old_hardware;
155
#endif
156
 
157
static void sleep(unsigned howlong)
158
{
159
        current->state = TASK_INTERRUPTIBLE;
160
        schedule_timeout(howlong);
161
}
162
 
163
static unsigned char sscape_read(struct sscape_info *devc, int reg)
164
{
165
        unsigned long flags;
166
        unsigned char val;
167
 
168
        spin_lock_irqsave(&devc->lock,flags);
169
        outb(reg, PORT(ODIE_ADDR));
170
        val = inb(PORT(ODIE_DATA));
171
        spin_unlock_irqrestore(&devc->lock,flags);
172
        return val;
173
}
174
 
175
static void __sscape_write(int reg, int data)
176
{
177
        outb(reg, PORT(ODIE_ADDR));
178
        outb(data, PORT(ODIE_DATA));
179
}
180
 
181
static void sscape_write(struct sscape_info *devc, int reg, int data)
182
{
183
        unsigned long flags;
184
 
185
        spin_lock_irqsave(&devc->lock,flags);
186
        __sscape_write(reg, data);
187
        spin_unlock_irqrestore(&devc->lock,flags);
188
}
189
 
190
static unsigned char sscape_pnp_read_codec(sscape_info* devc, unsigned char reg)
191
{
192
        unsigned char res;
193
        unsigned long flags;
194
 
195
        spin_lock_irqsave(&devc->lock,flags);
196
        outb( reg, devc -> codec);
197
        res = inb (devc -> codec + 1);
198
        spin_unlock_irqrestore(&devc->lock,flags);
199
        return res;
200
 
201
}
202
 
203
static void sscape_pnp_write_codec(sscape_info* devc, unsigned char reg, unsigned char data)
204
{
205
        unsigned long flags;
206
 
207
        spin_lock_irqsave(&devc->lock,flags);
208
        outb( reg, devc -> codec);
209
        outb( data, devc -> codec + 1);
210
        spin_unlock_irqrestore(&devc->lock,flags);
211
}
212
 
213
static void host_open(struct sscape_info *devc)
214
{
215
        outb((0x00), PORT(HOST_CTRL));  /* Put the board to the host mode */
216
}
217
 
218
static void host_close(struct sscape_info *devc)
219
{
220
        outb((0x03), PORT(HOST_CTRL));  /* Put the board to the MIDI mode */
221
}
222
 
223
static int host_write(struct sscape_info *devc, unsigned char *data, int count)
224
{
225
        unsigned long flags;
226
        int i, timeout_val;
227
 
228
        spin_lock_irqsave(&devc->lock,flags);
229
        /*
230
         * Send the command and data bytes
231
         */
232
 
233
        for (i = 0; i < count; i++)
234
        {
235
                for (timeout_val = 10000; timeout_val > 0; timeout_val--)
236
                        if (inb(PORT(HOST_CTRL)) & TX_READY)
237
                                break;
238
 
239
                if (timeout_val <= 0)
240
                {
241
                                spin_unlock_irqrestore(&devc->lock,flags);
242
                            return 0;
243
                }
244
                outb(data[i], PORT(HOST_DATA));
245
        }
246
        spin_unlock_irqrestore(&devc->lock,flags);
247
        return 1;
248
}
249
 
250
static int host_read(struct sscape_info *devc)
251
{
252
        unsigned long flags;
253
        int timeout_val;
254
        unsigned char data;
255
 
256
        spin_lock_irqsave(&devc->lock,flags);
257
        /*
258
         * Read a byte
259
         */
260
 
261
        for (timeout_val = 10000; timeout_val > 0; timeout_val--)
262
                if (inb(PORT(HOST_CTRL)) & RX_READY)
263
                        break;
264
 
265
        if (timeout_val <= 0)
266
        {
267
                spin_unlock_irqrestore(&devc->lock,flags);
268
                return -1;
269
        }
270
        data = inb(PORT(HOST_DATA));
271
        spin_unlock_irqrestore(&devc->lock,flags);
272
        return data;
273
}
274
 
275
#if 0 /* unused */
276
static int host_command1(struct sscape_info *devc, int cmd)
277
{
278
        unsigned char buf[10];
279
        buf[0] = (unsigned char) (cmd & 0xff);
280
        return host_write(devc, buf, 1);
281
}
282
#endif /* unused */
283
 
284
 
285
static int host_command2(struct sscape_info *devc, int cmd, int parm1)
286
{
287
        unsigned char buf[10];
288
 
289
        buf[0] = (unsigned char) (cmd & 0xff);
290
        buf[1] = (unsigned char) (parm1 & 0xff);
291
 
292
        return host_write(devc, buf, 2);
293
}
294
 
295
static int host_command3(struct sscape_info *devc, int cmd, int parm1, int parm2)
296
{
297
        unsigned char buf[10];
298
 
299
        buf[0] = (unsigned char) (cmd & 0xff);
300
        buf[1] = (unsigned char) (parm1 & 0xff);
301
        buf[2] = (unsigned char) (parm2 & 0xff);
302
        return host_write(devc, buf, 3);
303
}
304
 
305
static void set_mt32(struct sscape_info *devc, int value)
306
{
307
        host_open(devc);
308
        host_command2(devc, CMD_SET_MT32, value ? 1 : 0);
309
        if (host_read(devc) != CMD_ACK)
310
        {
311
                /* printk( "SNDSCAPE: Setting MT32 mode failed\n"); */
312
        }
313
        host_close(devc);
314
}
315
 
316
static void set_control(struct sscape_info *devc, int ctrl, int value)
317
{
318
        host_open(devc);
319
        host_command3(devc, CMD_SET_CONTROL, ctrl, value);
320
        if (host_read(devc) != CMD_ACK)
321
        {
322
                /* printk( "SNDSCAPE: Setting control (%d) failed\n",  ctrl); */
323
        }
324
        host_close(devc);
325
}
326
 
327
static void do_dma(struct sscape_info *devc, int dma_chan, unsigned long buf, int blk_size, int mode)
328
{
329
        unsigned char temp;
330
 
331
        if (dma_chan != SSCAPE_DMA_A)
332
        {
333
                printk(KERN_WARNING "soundscape: Tried to use DMA channel  != A. Why?\n");
334
                return;
335
        }
336
        audio_devs[devc->codec_audiodev]->flags &= ~DMA_AUTOMODE;
337
        DMAbuf_start_dma(devc->codec_audiodev, buf, blk_size, mode);
338
        audio_devs[devc->codec_audiodev]->flags |= DMA_AUTOMODE;
339
 
340
        temp = devc->dma << 4;  /* Setup DMA channel select bits */
341
        if (devc->dma <= 3)
342
                temp |= 0x80;   /* 8 bit DMA channel */
343
 
344
        temp |= 1;              /* Trigger DMA */
345
        sscape_write(devc, GA_DMAA_REG, temp);
346
        temp &= 0xfe;           /* Clear DMA trigger */
347
        sscape_write(devc, GA_DMAA_REG, temp);
348
}
349
 
350
static int verify_mpu(struct sscape_info *devc)
351
{
352
        /*
353
         * The SoundScape board could be in three modes (MPU, 8250 and host).
354
         * If the card is not in the MPU mode, enabling the MPU driver will
355
         * cause infinite loop (the driver believes that there is always some
356
         * received data in the buffer.
357
         *
358
         * Detect this by looking if there are more than 10 received MIDI bytes
359
         * (0x00) in the buffer.
360
         */
361
 
362
        int i;
363
 
364
        for (i = 0; i < 10; i++)
365
        {
366
                if (inb(devc->base + HOST_CTRL) & 0x80)
367
                        return 1;
368
 
369
                if (inb(devc->base) != 0x00)
370
                        return 1;
371
        }
372
        printk(KERN_WARNING "SoundScape: The device is not in the MPU-401 mode\n");
373
        return 0;
374
}
375
 
376
static int sscape_coproc_open(void *dev_info, int sub_device)
377
{
378
        if (sub_device == COPR_MIDI)
379
        {
380
                set_mt32(devc, 0);
381
                if (!verify_mpu(devc))
382
                        return -EIO;
383
        }
384
        return 0;
385
}
386
 
387
static void sscape_coproc_close(void *dev_info, int sub_device)
388
{
389
        struct sscape_info *devc = dev_info;
390
        unsigned long   flags;
391
 
392
        spin_lock_irqsave(&devc->lock,flags);
393
        if (devc->dma_allocated)
394
        {
395
                __sscape_write(GA_DMAA_REG, 0x20);      /* DMA channel disabled */
396
                devc->dma_allocated = 0;
397
        }
398
        spin_unlock_irqrestore(&devc->lock,flags);
399
        return;
400
}
401
 
402
static void sscape_coproc_reset(void *dev_info)
403
{
404
}
405
 
406
static int sscape_download_boot(struct sscape_info *devc, unsigned char *block, int size, int flag)
407
{
408
        unsigned long flags;
409
        unsigned char temp;
410
        volatile int done, timeout_val;
411
        static unsigned char codec_dma_bits;
412
 
413
        if (flag & CPF_FIRST)
414
        {
415
                /*
416
                 * First block. Have to allocate DMA and to reset the board
417
                 * before continuing.
418
                 */
419
 
420
                spin_lock_irqsave(&devc->lock,flags);
421
                codec_dma_bits = sscape_read(devc, GA_CDCFG_REG);
422
 
423
                if (devc->dma_allocated == 0)
424
                        devc->dma_allocated = 1;
425
 
426
                spin_unlock_irqrestore(&devc->lock,flags);
427
 
428
                sscape_write(devc, GA_HMCTL_REG,
429
                        (temp = sscape_read(devc, GA_HMCTL_REG)) & 0x3f);       /*Reset */
430
 
431
                for (timeout_val = 10000; timeout_val > 0; timeout_val--)
432
                        sscape_read(devc, GA_HMCTL_REG);        /* Delay */
433
 
434
                /* Take board out of reset */
435
                sscape_write(devc, GA_HMCTL_REG,
436
                        (temp = sscape_read(devc, GA_HMCTL_REG)) | 0x80);
437
        }
438
        /*
439
         * Transfer one code block using DMA
440
         */
441
        if (audio_devs[devc->codec_audiodev]->dmap_out->raw_buf == NULL)
442
        {
443
                printk(KERN_WARNING "soundscape: DMA buffer not available\n");
444
                return 0;
445
        }
446
        memcpy(audio_devs[devc->codec_audiodev]->dmap_out->raw_buf, block, size);
447
 
448
        spin_lock_irqsave(&devc->lock,flags);
449
 
450
        /******** INTERRUPTS DISABLED NOW ********/
451
 
452
        do_dma(devc, SSCAPE_DMA_A,
453
               audio_devs[devc->codec_audiodev]->dmap_out->raw_buf_phys,
454
               size, DMA_MODE_WRITE);
455
 
456
        /*
457
         * Wait until transfer completes.
458
         */
459
 
460
        done = 0;
461
        timeout_val = 30;
462
        while (!done && timeout_val-- > 0)
463
        {
464
                int resid;
465
 
466
                if (HZ / 50)
467
                        sleep(HZ / 50);
468
                clear_dma_ff(devc->dma);
469
                if ((resid = get_dma_residue(devc->dma)) == 0)
470
                        done = 1;
471
        }
472
 
473
        spin_unlock_irqrestore(&devc->lock,flags);
474
        if (!done)
475
                return 0;
476
 
477
        if (flag & CPF_LAST)
478
        {
479
                /*
480
                 * Take the board out of reset
481
                 */
482
                outb((0x00), PORT(HOST_CTRL));
483
                outb((0x00), PORT(MIDI_CTRL));
484
 
485
                temp = sscape_read(devc, GA_HMCTL_REG);
486
                temp |= 0x40;
487
                sscape_write(devc, GA_HMCTL_REG, temp); /* Kickstart the board */
488
 
489
                /*
490
                 * Wait until the ODB wakes up
491
                 */
492
                spin_lock_irqsave(&devc->lock,flags);
493
                done = 0;
494
                timeout_val = 5 * HZ;
495
                while (!done && timeout_val-- > 0)
496
                {
497
                        unsigned char x;
498
 
499
                        sleep(1);
500
                        x = inb(PORT(HOST_DATA));
501
                        if (x == 0xff || x == 0xfe)             /* OBP startup acknowledge */
502
                        {
503
                                DDB(printk("Soundscape: Acknowledge = %x\n", x));
504
                                done = 1;
505
                        }
506
                }
507
                sscape_write(devc, GA_CDCFG_REG, codec_dma_bits);
508
 
509
                spin_unlock_irqrestore(&devc->lock,flags);
510
                if (!done)
511
                {
512
                        printk(KERN_ERR "soundscape: The OBP didn't respond after code download\n");
513
                        return 0;
514
                }
515
                spin_lock_irqsave(&devc->lock,flags);
516
                done = 0;
517
                timeout_val = 5 * HZ;
518
                while (!done && timeout_val-- > 0)
519
                {
520
                        sleep(1);
521
                        if (inb(PORT(HOST_DATA)) == 0xfe)       /* Host startup acknowledge */
522
                                done = 1;
523
                }
524
                spin_unlock_irqrestore(&devc->lock,flags);
525
                if (!done)
526
                {
527
                        printk(KERN_ERR "soundscape: OBP Initialization failed.\n");
528
                        return 0;
529
                }
530
                printk(KERN_INFO "SoundScape board initialized OK\n");
531
                set_control(devc, CTL_MASTER_VOL, 100);
532
                set_control(devc, CTL_SYNTH_VOL, 100);
533
 
534
#ifdef SSCAPE_DEBUG3
535
                /*
536
                 * Temporary debugging aid. Print contents of the registers after
537
                 * downloading the code.
538
                 */
539
                {
540
                        int i;
541
 
542
                        for (i = 0; i < 13; i++)
543
                                printk("I%d = %02x (new value)\n", i, sscape_read(devc, i));
544
                }
545
#endif
546
 
547
        }
548
        return 1;
549
}
550
 
551
static int download_boot_block(void *dev_info, copr_buffer * buf)
552
{
553
        if (buf->len <= 0 || buf->len > sizeof(buf->data))
554
                return -EINVAL;
555
 
556
        if (!sscape_download_boot(devc, buf->data, buf->len, buf->flags))
557
        {
558
                printk(KERN_ERR "soundscape: Unable to load microcode block to the OBP.\n");
559
                return -EIO;
560
        }
561
        return 0;
562
}
563
 
564
static int sscape_coproc_ioctl(void *dev_info, unsigned int cmd, void __user *arg, int local)
565
{
566
        copr_buffer *buf;
567
        int err;
568
 
569
        switch (cmd)
570
        {
571
                case SNDCTL_COPR_RESET:
572
                        sscape_coproc_reset(dev_info);
573
                        return 0;
574
 
575
                case SNDCTL_COPR_LOAD:
576
                        buf = (copr_buffer *) vmalloc(sizeof(copr_buffer));
577
                        if (buf == NULL)
578
                                return -ENOSPC;
579
                        if (copy_from_user(buf, arg, sizeof(copr_buffer)))
580
                        {
581
                                vfree(buf);
582
                                return -EFAULT;
583
                        }
584
                        err = download_boot_block(dev_info, buf);
585
                        vfree(buf);
586
                        return err;
587
 
588
                default:
589
                        return -EINVAL;
590
        }
591
}
592
 
593
static coproc_operations sscape_coproc_operations =
594
{
595
        "SoundScape M68K",
596
        THIS_MODULE,
597
        sscape_coproc_open,
598
        sscape_coproc_close,
599
        sscape_coproc_ioctl,
600
        sscape_coproc_reset,
601
        &adev_info
602
};
603
 
604
static struct resource *sscape_ports;
605
static int sscape_is_pnp;
606
 
607
static void __init attach_sscape(struct address_info *hw_config)
608
{
609
#ifndef SSCAPE_REGS
610
        /*
611
         * Config register values for Spea/V7 Media FX and Ensoniq S-2000.
612
         * These values are card
613
         * dependent. If you have another SoundScape based card, you have to
614
         * find the correct values. Do the following:
615
         *  - Compile this driver with SSCAPE_DEBUG1 defined.
616
         *  - Shut down and power off your machine.
617
         *  - Boot with DOS so that the SSINIT.EXE program is run.
618
         *  - Warm boot to {Linux|SYSV|BSD} and write down the lines displayed
619
         *    when detecting the SoundScape.
620
         *  - Modify the following list to use the values printed during boot.
621
         *    Undefine the SSCAPE_DEBUG1
622
         */
623
#define SSCAPE_REGS { \
624
/* I0 */        0x00, \
625
/* I1 */        0xf0, /* Note! Ignored. Set always to 0xf0 */ \
626
/* I2 */        0x20, /* Note! Ignored. Set always to 0x20 */ \
627
/* I3 */        0x20, /* Note! Ignored. Set always to 0x20 */ \
628
/* I4 */        0xf5, /* Ignored */ \
629
/* I5 */        0x10, \
630
/* I6 */        0x00, \
631
/* I7 */        0x2e, /* I7 MEM config A. Likely to vary between models */ \
632
/* I8 */        0x00, /* I8 MEM config B. Likely to vary between models */ \
633
/* I9 */        0x40 /* Ignored */ \
634
        }
635
#endif
636
 
637
        unsigned long   flags;
638
        static unsigned char regs[10] = SSCAPE_REGS;
639
 
640
        int i, irq_bits = 0xff;
641
 
642
        if (old_hardware)
643
        {
644
                valid_interrupts = valid_interrupts_old;
645
                conf_printf("Ensoniq SoundScape (old)", hw_config);
646
        }
647
        else
648
                conf_printf("Ensoniq SoundScape", hw_config);
649
 
650
        for (i = 0; i < 4; i++)
651
        {
652
                if (hw_config->irq == valid_interrupts[i])
653
                {
654
                        irq_bits = i;
655
                        break;
656
                }
657
        }
658
        if (hw_config->irq > 15 || (regs[4] = irq_bits == 0xff))
659
        {
660
                printk(KERN_ERR "Invalid IRQ%d\n", hw_config->irq);
661
                release_region(devc->base, 2);
662
                release_region(devc->base + 2, 6);
663
                if (sscape_is_pnp)
664
                        release_region(devc->codec, 2);
665
                return;
666
        }
667
 
668
        if (!sscape_is_pnp) {
669
 
670
                spin_lock_irqsave(&devc->lock,flags);
671
                /* Host interrupt enable */
672
                sscape_write(devc, 1, 0xf0);    /* All interrupts enabled */
673
                /* DMA A status/trigger register */
674
                sscape_write(devc, 2, 0x20);    /* DMA channel disabled */
675
                /* DMA B status/trigger register */
676
                sscape_write(devc, 3, 0x20);    /* DMA channel disabled */
677
                /* Host interrupt config reg */
678
                sscape_write(devc, 4, 0xf0 | (irq_bits << 2) | irq_bits);
679
                /* Don't destroy CD-ROM DMA config bits (0xc0) */
680
                sscape_write(devc, 5, (regs[5] & 0x3f) | (sscape_read(devc, 5) & 0xc0));
681
                /* CD-ROM config (WSS codec actually) */
682
                sscape_write(devc, 6, regs[6]);
683
                sscape_write(devc, 7, regs[7]);
684
                sscape_write(devc, 8, regs[8]);
685
                /* Master control reg. Don't modify CR-ROM bits. Disable SB emul */
686
                sscape_write(devc, 9, (sscape_read(devc, 9) & 0xf0) | 0x08);
687
                spin_unlock_irqrestore(&devc->lock,flags);
688
        }
689
#ifdef SSCAPE_DEBUG2
690
        /*
691
         * Temporary debugging aid. Print contents of the registers after
692
         * changing them.
693
         */
694
        {
695
                int i;
696
 
697
                for (i = 0; i < 13; i++)
698
                        printk("I%d = %02x (new value)\n", i, sscape_read(devc, i));
699
        }
700
#endif
701
 
702
        if (probe_mpu401(hw_config, sscape_ports))
703
                hw_config->always_detect = 1;
704
        hw_config->name = "SoundScape";
705
 
706
        hw_config->irq *= -1;   /* Negative value signals IRQ sharing */
707
        attach_mpu401(hw_config, THIS_MODULE);
708
        hw_config->irq *= -1;   /* Restore it */
709
 
710
        if (hw_config->slots[1] != -1)  /* The MPU driver installed itself */
711
        {
712
                sscape_mididev = hw_config->slots[1];
713
                midi_devs[hw_config->slots[1]]->coproc = &sscape_coproc_operations;
714
        }
715
        sscape_write(devc, GA_INTENA_REG, 0x80);        /* Master IRQ enable */
716
        devc->ok = 1;
717
        devc->failed = 0;
718
}
719
 
720
static int detect_ga(sscape_info * devc)
721
{
722
        unsigned char save;
723
 
724
        DDB(printk("Entered Soundscape detect_ga(%x)\n", devc->base));
725
 
726
        /*
727
         * First check that the address register of "ODIE" is
728
         * there and that it has exactly 4 writable bits.
729
         * First 4 bits
730
         */
731
 
732
        if ((save = inb(PORT(ODIE_ADDR))) & 0xf0)
733
        {
734
                DDB(printk("soundscape: Detect error A\n"));
735
                return 0;
736
        }
737
        outb((0x00), PORT(ODIE_ADDR));
738
        if (inb(PORT(ODIE_ADDR)) != 0x00)
739
        {
740
                DDB(printk("soundscape: Detect error B\n"));
741
                return 0;
742
        }
743
        outb((0xff), PORT(ODIE_ADDR));
744
        if (inb(PORT(ODIE_ADDR)) != 0x0f)
745
        {
746
                DDB(printk("soundscape: Detect error C\n"));
747
                return 0;
748
        }
749
        outb((save), PORT(ODIE_ADDR));
750
 
751
        /*
752
         * Now verify that some indirect registers return zero on some bits.
753
         * This may break the driver with some future revisions of "ODIE" but...
754
         */
755
 
756
        if (sscape_read(devc, 0) & 0x0c)
757
        {
758
                DDB(printk("soundscape: Detect error D (%x)\n", sscape_read(devc, 0)));
759
                return 0;
760
        }
761
        if (sscape_read(devc, 1) & 0x0f)
762
        {
763
                DDB(printk("soundscape: Detect error E\n"));
764
                return 0;
765
        }
766
        if (sscape_read(devc, 5) & 0x0f)
767
        {
768
                DDB(printk("soundscape: Detect error F\n"));
769
                return 0;
770
        }
771
        return 1;
772
}
773
 
774
static  int sscape_read_host_ctrl(sscape_info* devc)
775
{
776
        return host_read(devc);
777
}
778
 
779
static  void sscape_write_host_ctrl2(sscape_info *devc, int a, int b)
780
{
781
        host_command2(devc, a, b);
782
}
783
 
784
static int sscape_alloc_dma(sscape_info *devc)
785
{
786
        char *start_addr, *end_addr;
787
        int dma_pagesize;
788
        int sz, size;
789
        struct page *page;
790
 
791
        if (devc->raw_buf != NULL) return 0;     /* Already done */
792
        dma_pagesize = (devc->dma < 4) ? (64 * 1024) : (128 * 1024);
793
        devc->raw_buf = NULL;
794
        devc->buffsize = 8192*4;
795
        if (devc->buffsize > dma_pagesize) devc->buffsize = dma_pagesize;
796
        start_addr = NULL;
797
        /*
798
         * Now loop until we get a free buffer. Try to get smaller buffer if
799
         * it fails. Don't accept smaller than 8k buffer for performance
800
         * reasons.
801
         */
802
        while (start_addr == NULL && devc->buffsize > PAGE_SIZE) {
803
                for (sz = 0, size = PAGE_SIZE; size < devc->buffsize; sz++, size <<= 1);
804
                devc->buffsize = PAGE_SIZE * (1 << sz);
805
                start_addr = (char *) __get_free_pages(GFP_ATOMIC|GFP_DMA, sz);
806
                if (start_addr == NULL) devc->buffsize /= 2;
807
        }
808
 
809
        if (start_addr == NULL) {
810
                printk(KERN_ERR "sscape pnp init error: Couldn't allocate DMA buffer\n");
811
                return 0;
812
        } else {
813
                /* make some checks */
814
                end_addr = start_addr + devc->buffsize - 1;
815
                /* now check if it fits into the same dma-pagesize */
816
 
817
                if (((long) start_addr & ~(dma_pagesize - 1)) != ((long) end_addr & ~(dma_pagesize - 1))
818
                    || end_addr >= (char *) (MAX_DMA_ADDRESS)) {
819
                        printk(KERN_ERR "sscape pnp: Got invalid address 0x%lx for %db DMA-buffer\n", (long) start_addr, devc->buffsize);
820
                        return 0;
821
                }
822
        }
823
        devc->raw_buf = start_addr;
824
        devc->raw_buf_phys = virt_to_bus(start_addr);
825
 
826
        for (page = virt_to_page(start_addr); page <= virt_to_page(end_addr); page++)
827
                SetPageReserved(page);
828
        return 1;
829
}
830
 
831
static void sscape_free_dma(sscape_info *devc)
832
{
833
        int sz, size;
834
        unsigned long start_addr, end_addr;
835
        struct page *page;
836
 
837
        if (devc->raw_buf == NULL) return;
838
        for (sz = 0, size = PAGE_SIZE; size < devc->buffsize; sz++, size <<= 1);
839
        start_addr = (unsigned long) devc->raw_buf;
840
        end_addr = start_addr + devc->buffsize;
841
 
842
        for (page = virt_to_page(start_addr); page <= virt_to_page(end_addr); page++)
843
                ClearPageReserved(page);
844
 
845
        free_pages((unsigned long) devc->raw_buf, sz);
846
        devc->raw_buf = NULL;
847
}
848
 
849
/* Intel version !!!!!!!!! */
850
 
851
static int sscape_start_dma(int chan, unsigned long physaddr, int count, int dma_mode)
852
{
853
        unsigned long flags;
854
 
855
        flags = claim_dma_lock();
856
        disable_dma(chan);
857
        clear_dma_ff(chan);
858
        set_dma_mode(chan, dma_mode);
859
        set_dma_addr(chan, physaddr);
860
        set_dma_count(chan, count);
861
        enable_dma(chan);
862
        release_dma_lock(flags);
863
        return 0;
864
}
865
 
866
static void sscape_pnp_start_dma(sscape_info* devc, int arg )
867
{
868
        int reg;
869
        if (arg == 0) reg = 2;
870
        else reg = 3;
871
 
872
        sscape_write(devc, reg, sscape_read( devc, reg) | 0x01);
873
        sscape_write(devc, reg, sscape_read( devc, reg) & 0xFE);
874
}
875
 
876
static int sscape_pnp_wait_dma (sscape_info* devc, int arg )
877
{
878
        int             reg;
879
        unsigned long   i;
880
        unsigned char   d;
881
 
882
        if (arg == 0) reg = 2;
883
        else reg = 3;
884
 
885
        sleep ( 1 );
886
        i = 0;
887
        do {
888
                d = sscape_read(devc, reg) & 1;
889
                if ( d == 1)  break;
890
                i++;
891
        } while (i < 500000);
892
        d = sscape_read(devc, reg) & 1;
893
        return d;
894
}
895
 
896
static  int     sscape_pnp_alloc_dma(sscape_info* devc)
897
{
898
        /* printk(KERN_INFO "sscape: requesting dma\n"); */
899
        if (request_dma(devc -> dma, "sscape")) return 0;
900
        /* printk(KERN_INFO "sscape: dma channel allocated\n"); */
901
        if (!sscape_alloc_dma(devc)) {
902
                free_dma(devc -> dma);
903
                return 0;
904
        };
905
        return 1;
906
}
907
 
908
static  void    sscape_pnp_free_dma(sscape_info* devc)
909
{
910
        sscape_free_dma( devc);
911
        free_dma(devc -> dma );
912
        /* printk(KERN_INFO "sscape: dma released\n"); */
913
}
914
 
915
static  int     sscape_pnp_upload_file(sscape_info* devc, char* fn)
916
{
917
        int             done = 0;
918
        int             timeout_val;
919
        char*           data,*dt;
920
        int             len,l;
921
        unsigned long   flags;
922
 
923
        sscape_write( devc, 9, sscape_read(devc, 9 )  & 0x3F );
924
        sscape_write( devc, 2, (devc -> dma << 4) | 0x80 );
925
        sscape_write( devc, 3, 0x20 );
926
        sscape_write( devc, 9, sscape_read( devc, 9 )  | 0x80 );
927
 
928
        len = mod_firmware_load(fn, &data);
929
        if (len == 0) {
930
                    printk(KERN_ERR "sscape: file not found: %s\n", fn);
931
                    return 0;
932
        }
933
        dt = data;
934
        spin_lock_irqsave(&devc->lock,flags);
935
        while ( len > 0 ) {
936
                if (len > devc -> buffsize) l = devc->buffsize;
937
                else l = len;
938
                len -= l;
939
                memcpy(devc->raw_buf, dt, l); dt += l;
940
                sscape_start_dma(devc->dma, devc->raw_buf_phys, l, 0x48);
941
                sscape_pnp_start_dma ( devc, 0 );
942
                if (sscape_pnp_wait_dma ( devc, 0 ) == 0) {
943
                        spin_unlock_irqrestore(&devc->lock,flags);
944
                        return 0;
945
                }
946
        }
947
 
948
        spin_unlock_irqrestore(&devc->lock,flags);
949
        vfree(data);
950
 
951
        outb(0, devc -> base + 2);
952
        outb(0, devc -> base);
953
 
954
        sscape_write ( devc, 9, sscape_read( devc, 9 ) | 0x40);
955
 
956
        timeout_val = 5 * HZ;
957
        while (!done && timeout_val-- > 0)
958
        {
959
                unsigned char x;
960
                sleep(1);
961
                x = inb( devc -> base + 3);
962
                if (x == 0xff || x == 0xfe)             /* OBP startup acknowledge */
963
                {
964
                        //printk(KERN_ERR "Soundscape: Acknowledge = %x\n", x);
965
                        done = 1;
966
                }
967
        }
968
        timeout_val = 5 * HZ;
969
        done = 0;
970
        while (!done && timeout_val-- > 0)
971
        {
972
                unsigned char x;
973
                sleep(1);
974
                x = inb( devc -> base + 3);
975
                if (x == 0xfe)          /* OBP startup acknowledge */
976
                {
977
                        //printk(KERN_ERR "Soundscape: Acknowledge = %x\n", x);
978
                        done = 1;
979
                }
980
        }
981
 
982
        if ( !done ) printk(KERN_ERR "soundscape: OBP Initialization failed.\n");
983
 
984
        sscape_write( devc, 2, devc->ic_type == IC_ODIE ? 0x70 : 0x40);
985
        sscape_write( devc, 3, (devc -> dma << 4) + 0x80);
986
        return 1;
987
}
988
 
989
static void __init sscape_pnp_init_hw(sscape_info* devc)
990
{
991
        unsigned char midi_irq = 0, sb_irq = 0;
992
        unsigned i;
993
        static  char code_file_name[23] = "/sndscape/sndscape.cox";
994
 
995
        int sscape_joystic_enable       = 0x7f;
996
        int sscape_mic_enable           = 0;
997
        int sscape_ext_midi             = 0;
998
 
999
        if ( !sscape_pnp_alloc_dma(devc) ) {
1000
                printk(KERN_ERR "sscape: faild to allocate dma\n");
1001
                return;
1002
        }
1003
 
1004
        for (i = 0; i < 4; i++) {
1005
                if ( devc -> irq   == valid_interrupts[i] )
1006
                        midi_irq = i;
1007
                if ( devc -> codec_irq == valid_interrupts[i] )
1008
                        sb_irq = i;
1009
        }
1010
 
1011
        sscape_write( devc, 5, 0x50);
1012
        sscape_write( devc, 7, 0x2e);
1013
        sscape_write( devc, 8, 0x00);
1014
 
1015
        sscape_write( devc, 2, devc->ic_type == IC_ODIE ? 0x70 : 0x40);
1016
        sscape_write( devc, 3, ( devc -> dma << 4) | 0x80);
1017
 
1018
        sscape_write (devc, 4, 0xF0 | (midi_irq<<2) | midi_irq);
1019
 
1020
        i = 0x10; //sscape_read(devc, 9) & (devc->ic_type == IC_ODIE ? 0xf0 : 0xc0);
1021
        if (sscape_joystic_enable) i |= 8;
1022
 
1023
        sscape_write (devc, 9, i);
1024
        sscape_write (devc, 6, 0x80);
1025
        sscape_write (devc, 1, 0x80);
1026
 
1027
        if (devc -> codec_type == 2) {
1028
                sscape_pnp_write_codec( devc, 0x0C, 0x50);
1029
                sscape_pnp_write_codec( devc, 0x10, sscape_pnp_read_codec( devc, 0x10) & 0x3F);
1030
                sscape_pnp_write_codec( devc, 0x11, sscape_pnp_read_codec( devc, 0x11) | 0xC0);
1031
                sscape_pnp_write_codec( devc, 29, 0x20);
1032
        }
1033
 
1034
        if (sscape_pnp_upload_file(devc, "/sndscape/scope.cod") == 0 ) {
1035
                printk(KERN_ERR "sscape: faild to upload file /sndscape/scope.cod\n");
1036
                sscape_pnp_free_dma(devc);
1037
                return;
1038
        }
1039
 
1040
        i = sscape_read_host_ctrl( devc );
1041
 
1042
        if ( (i & 0x0F) >  7 ) {
1043
                printk(KERN_ERR "sscape: scope.cod faild\n");
1044
                sscape_pnp_free_dma(devc);
1045
                return;
1046
        }
1047
        if ( i & 0x10 ) sscape_write( devc, 7, 0x2F);
1048
        code_file_name[21] = (char) ( i & 0x0F) + 0x30;
1049
        if (sscape_pnp_upload_file( devc, code_file_name) == 0) {
1050
                printk(KERN_ERR "sscape: faild to upload file %s\n", code_file_name);
1051
                sscape_pnp_free_dma(devc);
1052
                return;
1053
        }
1054
 
1055
        if (devc->ic_type != IC_ODIE) {
1056
                sscape_pnp_write_codec( devc, 10, (sscape_pnp_read_codec(devc, 10) & 0x7f) |
1057
                 ( sscape_mic_enable == 0 ? 0x00 : 0x80) );
1058
        }
1059
        sscape_write_host_ctrl2( devc, 0x84, 0x64 );  /* MIDI volume */
1060
        sscape_write_host_ctrl2( devc, 0x86, 0x64 );  /* MIDI volume?? */
1061
        sscape_write_host_ctrl2( devc, 0x8A, sscape_ext_midi);
1062
 
1063
        sscape_pnp_write_codec ( devc, 6, 0x3f ); //WAV_VOL
1064
        sscape_pnp_write_codec ( devc, 7, 0x3f ); //WAV_VOL
1065
        sscape_pnp_write_codec ( devc, 2, 0x1F ); //WD_CDXVOLL
1066
        sscape_pnp_write_codec ( devc, 3, 0x1F ); //WD_CDXVOLR
1067
 
1068
        if (devc -> codec_type == 1) {
1069
                sscape_pnp_write_codec ( devc, 4, 0x1F );
1070
                sscape_pnp_write_codec ( devc, 5, 0x1F );
1071
                sscape_write_host_ctrl2( devc, 0x88, sscape_mic_enable);
1072
        } else {
1073
                int t;
1074
                sscape_pnp_write_codec ( devc, 0x10, 0x1F << 1);
1075
                sscape_pnp_write_codec ( devc, 0x11, 0xC0 | (0x1F << 1));
1076
 
1077
                t = sscape_pnp_read_codec( devc, 0x00) & 0xDF;
1078
                if ( (sscape_mic_enable == 0)) t |= 0;
1079
                else t |= 0x20;
1080
                sscape_pnp_write_codec ( devc, 0x00, t);
1081
                t = sscape_pnp_read_codec( devc, 0x01) & 0xDF;
1082
                if ( (sscape_mic_enable == 0) ) t |= 0;
1083
                else t |= 0x20;
1084
                sscape_pnp_write_codec ( devc, 0x01, t);
1085
                sscape_pnp_write_codec ( devc, 0x40 | 29 , 0x20);
1086
                outb(0, devc -> codec);
1087
        }
1088
        if (devc -> ic_type == IC_OPUS ) {
1089
                int i = sscape_read( devc, 9 );
1090
                sscape_write( devc, 9, i | 3 );
1091
                sscape_write( devc, 3, 0x40);
1092
 
1093
                if (request_region(0x228, 1, "sscape setup junk")) {
1094
                        outb(0, 0x228);
1095
                        release_region(0x228,1);
1096
                }
1097
                sscape_write( devc, 3, (devc -> dma << 4) | 0x80);
1098
                sscape_write( devc, 9, i );
1099
        }
1100
 
1101
        host_close ( devc );
1102
        sscape_pnp_free_dma(devc);
1103
}
1104
 
1105
static int __init detect_sscape_pnp(sscape_info* devc)
1106
{
1107
        long     i, irq_bits = 0xff;
1108
        unsigned int d;
1109
 
1110
        DDB(printk("Entered detect_sscape_pnp(%x)\n", devc->base));
1111
 
1112
        if (!request_region(devc->codec, 2, "sscape codec")) {
1113
                printk(KERN_ERR "detect_sscape_pnp: port %x is not free\n", devc->codec);
1114
                return 0;
1115
        }
1116
 
1117
        if ((inb(devc->base + 2) & 0x78) != 0)
1118
                goto fail;
1119
 
1120
        d = inb ( devc -> base + 4) & 0xF0;
1121
        if (d & 0x80)
1122
                goto fail;
1123
 
1124
        if (d == 0) {
1125
                devc->codec_type = 1;
1126
                devc->ic_type = IC_ODIE;
1127
        } else if ( (d & 0x60) != 0) {
1128
                devc->codec_type = 2;
1129
                devc->ic_type = IC_OPUS;
1130
        } else if ( (d & 0x40) != 0) {   /* WTF? */
1131
                devc->codec_type = 2;
1132
                devc->ic_type = IC_ODIE;
1133
        } else
1134
                goto fail;
1135
 
1136
        sscape_is_pnp = 1;
1137
 
1138
        outb(0xFA, devc -> base+4);
1139
        if  ((inb( devc -> base+4) & 0x9F) != 0x0A)
1140
                goto fail;
1141
        outb(0xFE, devc -> base+4);
1142
        if  ( (inb(devc -> base+4) & 0x9F) != 0x0E)
1143
                goto fail;
1144
        if  ( (inb(devc -> base+5) & 0x9F) != 0x0E)
1145
                goto fail;
1146
 
1147
        if (devc->codec_type == 2) {
1148
                if (devc->codec != devc->base + 8) {
1149
                        printk("soundscape warning: incorrect codec port specified\n");
1150
                        goto fail;
1151
                }
1152
                d = 0x10 | (sscape_read(devc, 9)  & 0xCF);
1153
                sscape_write(devc, 9, d);
1154
                sscape_write(devc, 6, 0x80);
1155
        } else {
1156
                //todo: check codec is not base + 8
1157
        }
1158
 
1159
        d  = (sscape_read(devc, 9) & 0x3F) | 0xC0;
1160
        sscape_write(devc, 9, d);
1161
 
1162
        for (i = 0; i < 550000; i++)
1163
                if ( !(inb(devc -> codec) & 0x80) ) break;
1164
 
1165
        d = inb(devc -> codec);
1166
        if (d & 0x80)
1167
                goto fail;
1168
        if ( inb(devc -> codec + 2) == 0xFF)
1169
                goto fail;
1170
 
1171
        sscape_write(devc, 9, sscape_read(devc, 9)  & 0x3F );
1172
 
1173
        d  = inb(devc -> codec) & 0x80;
1174
        if ( d == 0) {
1175
                printk(KERN_INFO "soundscape: hardware detected\n");
1176
                valid_interrupts = valid_interrupts_new;
1177
        } else  {
1178
                printk(KERN_INFO "soundscape: board looks like media fx\n");
1179
                valid_interrupts = valid_interrupts_old;
1180
                old_hardware = 1;
1181
        }
1182
 
1183
        sscape_write( devc, 9, 0xC0 | (sscape_read(devc, 9)  & 0x3F) );
1184
 
1185
        for (i = 0; i < 550000; i++)
1186
                if ( !(inb(devc -> codec) & 0x80))
1187
                        break;
1188
 
1189
        sscape_pnp_init_hw(devc);
1190
 
1191
        for (i = 0; i < 4; i++)
1192
        {
1193
                if (devc->codec_irq == valid_interrupts[i]) {
1194
                        irq_bits = i;
1195
                        break;
1196
                }
1197
        }
1198
        sscape_write(devc, GA_INTENA_REG, 0x00);
1199
        sscape_write(devc, GA_DMACFG_REG, 0x50);
1200
        sscape_write(devc, GA_DMAA_REG, 0x70);
1201
        sscape_write(devc, GA_DMAB_REG, 0x20);
1202
        sscape_write(devc, GA_INTCFG_REG, 0xf0);
1203
        sscape_write(devc, GA_CDCFG_REG, 0x89 | (devc->dma << 4) | (irq_bits << 1));
1204
 
1205
        sscape_pnp_write_codec( devc, 0, sscape_pnp_read_codec( devc, 0) | 0x20);
1206
        sscape_pnp_write_codec( devc, 0, sscape_pnp_read_codec( devc, 1) | 0x20);
1207
 
1208
        return 1;
1209
fail:
1210
        release_region(devc->codec, 2);
1211
        return 0;
1212
}
1213
 
1214
static int __init probe_sscape(struct address_info *hw_config)
1215
{
1216
        devc->base = hw_config->io_base;
1217
        devc->irq = hw_config->irq;
1218
        devc->dma = hw_config->dma;
1219
        devc->osp = hw_config->osp;
1220
 
1221
#ifdef SSCAPE_DEBUG1
1222
        /*
1223
         * Temporary debugging aid. Print contents of the registers before
1224
         * changing them.
1225
         */
1226
        {
1227
                int i;
1228
 
1229
                for (i = 0; i < 13; i++)
1230
                        printk("I%d = %02x (old value)\n", i, sscape_read(devc, i));
1231
        }
1232
#endif
1233
        devc->failed = 1;
1234
 
1235
        sscape_ports = request_region(devc->base, 2, "mpu401");
1236
        if (!sscape_ports)
1237
                return 0;
1238
 
1239
        if (!request_region(devc->base + 2, 6, "SoundScape")) {
1240
                release_region(devc->base, 2);
1241
                return 0;
1242
        }
1243
 
1244
        if (!detect_ga(devc)) {
1245
                if (detect_sscape_pnp(devc))
1246
                        return 1;
1247
                release_region(devc->base, 2);
1248
                release_region(devc->base + 2, 6);
1249
                return 0;
1250
        }
1251
 
1252
        if (old_hardware)       /* Check that it's really an old Spea/Reveal card. */
1253
        {
1254
                unsigned char   tmp;
1255
                int             cc;
1256
 
1257
                if (!((tmp = sscape_read(devc, GA_HMCTL_REG)) & 0xc0))
1258
                {
1259
                        sscape_write(devc, GA_HMCTL_REG, tmp | 0x80);
1260
                        for (cc = 0; cc < 200000; ++cc)
1261
                                inb(devc->base + ODIE_ADDR);
1262
                }
1263
        }
1264
        return 1;
1265
}
1266
 
1267
static int __init init_ss_ms_sound(struct address_info *hw_config)
1268
{
1269
        int i, irq_bits = 0xff;
1270
        int ad_flags = 0;
1271
        struct resource *ports;
1272
 
1273
        if (devc->failed)
1274
        {
1275
                printk(KERN_ERR "soundscape: Card not detected\n");
1276
                return 0;
1277
        }
1278
        if (devc->ok == 0)
1279
        {
1280
                printk(KERN_ERR "soundscape: Invalid initialization order.\n");
1281
                return 0;
1282
        }
1283
        for (i = 0; i < 4; i++)
1284
        {
1285
                if (hw_config->irq == valid_interrupts[i])
1286
                {
1287
                        irq_bits = i;
1288
                        break;
1289
                }
1290
        }
1291
        if (irq_bits == 0xff) {
1292
                printk(KERN_ERR "soundscape: Invalid MSS IRQ%d\n", hw_config->irq);
1293
                return 0;
1294
        }
1295
 
1296
        if (old_hardware)
1297
                ad_flags = 0x12345677;  /* Tell that we may have a CS4248 chip (Spea-V7 Media FX) */
1298
        else if (sscape_is_pnp)
1299
                ad_flags = 0x87654321;  /* Tell that we have a soundscape pnp with 1845 chip */
1300
 
1301
        ports = request_region(hw_config->io_base, 4, "ad1848");
1302
        if (!ports) {
1303
                printk(KERN_ERR "soundscape: ports busy\n");
1304
                return 0;
1305
        }
1306
 
1307
        if (!ad1848_detect(ports, &ad_flags, hw_config->osp)) {
1308
                release_region(hw_config->io_base, 4);
1309
                return 0;
1310
        }
1311
 
1312
        if (!sscape_is_pnp)  /*pnp is already setup*/
1313
        {
1314
                /*
1315
                 * Setup the DMA polarity.
1316
                 */
1317
                sscape_write(devc, GA_DMACFG_REG, 0x50);
1318
 
1319
                /*
1320
                 * Take the gate-array off of the DMA channel.
1321
                 */
1322
                sscape_write(devc, GA_DMAB_REG, 0x20);
1323
 
1324
                /*
1325
                 * Init the AD1848 (CD-ROM) config reg.
1326
                 */
1327
                sscape_write(devc, GA_CDCFG_REG, 0x89 | (hw_config->dma << 4) | (irq_bits << 1));
1328
        }
1329
 
1330
        if (hw_config->irq == devc->irq)
1331
                printk(KERN_WARNING "soundscape: Warning! The WSS mode can't share IRQ with MIDI\n");
1332
 
1333
        hw_config->slots[0] = ad1848_init(
1334
                        sscape_is_pnp ? "SoundScape" : "SoundScape PNP",
1335
                        ports,
1336
                        hw_config->irq,
1337
                        hw_config->dma,
1338
                        hw_config->dma,
1339
                        0,
1340
                        devc->osp,
1341
                        THIS_MODULE);
1342
 
1343
 
1344
        if (hw_config->slots[0] != -1)   /* The AD1848 driver installed itself */
1345
        {
1346
                audio_devs[hw_config->slots[0]]->coproc = &sscape_coproc_operations;
1347
                devc->codec_audiodev = hw_config->slots[0];
1348
                devc->my_audiodev = hw_config->slots[0];
1349
 
1350
                /* Set proper routings here (what are they) */
1351
                AD1848_REROUTE(SOUND_MIXER_LINE1, SOUND_MIXER_LINE);
1352
        }
1353
 
1354
#ifdef SSCAPE_DEBUG5
1355
        /*
1356
         * Temporary debugging aid. Print contents of the registers
1357
         * after the AD1848 device has been initialized.
1358
         */
1359
        {
1360
                int i;
1361
 
1362
                for (i = 0; i < 13; i++)
1363
                        printk("I%d = %02x\n", i, sscape_read(devc, i));
1364
        }
1365
#endif
1366
        return 1;
1367
}
1368
 
1369
static void __exit unload_sscape(struct address_info *hw_config)
1370
{
1371
        release_region(devc->base + 2, 6);
1372
        unload_mpu401(hw_config);
1373
        if (sscape_is_pnp)
1374
                release_region(devc->codec, 2);
1375
}
1376
 
1377
static void __exit unload_ss_ms_sound(struct address_info *hw_config)
1378
{
1379
        ad1848_unload(hw_config->io_base,
1380
                      hw_config->irq,
1381
                      devc->dma,
1382
                      devc->dma,
1383
                      0);
1384
        sound_unload_audiodev(hw_config->slots[0]);
1385
}
1386
 
1387
static struct address_info cfg;
1388
static struct address_info cfg_mpu;
1389
 
1390
static int __initdata spea = -1;
1391
static int mss = 0;
1392
static int __initdata dma = -1;
1393
static int __initdata irq = -1;
1394
static int __initdata io = -1;
1395
static int __initdata mpu_irq = -1;
1396
static int __initdata mpu_io = -1;
1397
 
1398
module_param(dma, int, 0);
1399
module_param(irq, int, 0);
1400
module_param(io, int, 0);
1401
module_param(spea, int, 0);              /* spea=0/1 set the old_hardware */
1402
module_param(mpu_irq, int, 0);
1403
module_param(mpu_io, int, 0);
1404
module_param(mss, int, 0);
1405
 
1406
static int __init init_sscape(void)
1407
{
1408
        printk(KERN_INFO "Soundscape driver Copyright (C) by Hannu Savolainen 1993-1996\n");
1409
 
1410
        cfg.irq = irq;
1411
        cfg.dma = dma;
1412
        cfg.io_base = io;
1413
 
1414
        cfg_mpu.irq = mpu_irq;
1415
        cfg_mpu.io_base = mpu_io;
1416
        /* WEH - Try to get right dma channel */
1417
        cfg_mpu.dma = dma;
1418
 
1419
        devc->codec = cfg.io_base;
1420
        devc->codec_irq = cfg.irq;
1421
        devc->codec_type = 0;
1422
        devc->ic_type = 0;
1423
        devc->raw_buf = NULL;
1424
        spin_lock_init(&devc->lock);
1425
 
1426
        if (cfg.dma == -1 || cfg.irq == -1 || cfg.io_base == -1) {
1427
                printk(KERN_ERR "DMA, IRQ, and IO port must be specified.\n");
1428
                return -EINVAL;
1429
        }
1430
 
1431
        if (cfg_mpu.irq == -1 && cfg_mpu.io_base != -1) {
1432
                printk(KERN_ERR "MPU_IRQ must be specified if MPU_IO is set.\n");
1433
                return -EINVAL;
1434
        }
1435
 
1436
        if(spea != -1) {
1437
                old_hardware = spea;
1438
                printk(KERN_INFO "Forcing %s hardware support.\n",
1439
                        spea?"new":"old");
1440
        }
1441
        if (probe_sscape(&cfg_mpu) == 0)
1442
                return -ENODEV;
1443
 
1444
        attach_sscape(&cfg_mpu);
1445
 
1446
        mss = init_ss_ms_sound(&cfg);
1447
 
1448
        return 0;
1449
}
1450
 
1451
static void __exit cleanup_sscape(void)
1452
{
1453
        if (mss)
1454
                unload_ss_ms_sound(&cfg);
1455
        unload_sscape(&cfg_mpu);
1456
}
1457
 
1458
module_init(init_sscape);
1459
module_exit(cleanup_sscape);
1460
 
1461
#ifndef MODULE
1462
static int __init setup_sscape(char *str)
1463
{
1464
        /* io, irq, dma, mpu_io, mpu_irq */
1465
        int ints[6];
1466
 
1467
        str = get_options(str, ARRAY_SIZE(ints), ints);
1468
 
1469
        io      = ints[1];
1470
        irq     = ints[2];
1471
        dma     = ints[3];
1472
        mpu_io  = ints[4];
1473
        mpu_irq = ints[5];
1474
 
1475
        return 1;
1476
}
1477
 
1478
__setup("sscape=", setup_sscape);
1479
#endif
1480
MODULE_LICENSE("GPL");

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.