summaryrefslogtreecommitdiffstats
path: root/sys/i386/isa/sound/cs4232.c
blob: c95842a5b7e7cf7121849199f2ec2779332d8ab4 (plain)
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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
/*
 * sound/cs4232.c
 * 
 * The low level driver for Crystal CS4232 based cards. The CS4232 is a PnP
 * compatible chip which contains a CS4231A codec, SB emulation, a MPU401
 * compatible MIDI port, joystick and synthesizer and IDE CD-ROM interfaces.
 * This is just a temporary driver until full PnP support gets inplemented.
 * Just the WSS codec, FM synth and the MIDI ports are supported. Other
 * interfaces are left uninitialized.
 * 
 * Copyright by Hannu Savolainen 1995
 * 
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are
 * met: 1. Redistributions of source code must retain the above copyright
 * notice, this list of conditions and the following disclaimer. 2.
 * Redistributions in binary form must reproduce the above copyright notice,
 * this list of conditions and the following disclaimer in the documentation
 * and/or other materials provided with the distribution.
 * 
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 * 
 */

#include <i386/isa/sound/sound_config.h>

#if defined(CONFIG_CS4232)

#define KEY_PORT	0x279	/* Same as LPT1 status port */
#define CSN_NUM		0x99	/* Just a random number */

#define CS_OUT(a) 		outb( KEY_PORT,  a)
#define CS_OUT2(a, b)		{CS_OUT(a);CS_OUT(b);}
#define CS_OUT3(a, b, c)	{CS_OUT(a);CS_OUT(b);CS_OUT(c);}

static int      mpu_base = 0, mpu_irq = 0;
static int      mpu_detected = 0;

int
probe_cs4232_mpu(struct address_info * hw_config)
{
    /*
     * Just write down the config values.
     */

    mpu_base = hw_config->io_base;
    mpu_irq = hw_config->irq;
    return 0;
}

void
attach_cs4232_mpu(struct address_info * hw_config)
{
}

static unsigned char crystal_key[] =	/* A 32 byte magic key sequence */
{
    0x96, 0x35, 0x9a, 0xcd, 0xe6, 0xf3, 0x79, 0xbc,
    0x5e, 0xaf, 0x57, 0x2b, 0x15, 0x8a, 0xc5, 0xe2,
    0xf1, 0xf8, 0x7c, 0x3e, 0x9f, 0x4f, 0x27, 0x13,
    0x09, 0x84, 0x42, 0xa1, 0xd0, 0x68, 0x34, 0x1a
};

int
probe_cs4232(struct address_info * hw_config)
{
    int             i;
    int             base = hw_config->io_base, irq = hw_config->irq;
    int             dma1 = hw_config->dma, dma2 = hw_config->dma2;

    /*
     * Verify that the I/O port range is free.
     */

    if (0) {
	printf("cs4232.c: I/O port 0x%03x not free\n", base);
	return 0;
    }
    /*
     * This version of the driver doesn't use the PnP method when
     * configuring the card but a simplified method defined by Crystal.
     * This means that just one CS4232 compatible device can exist on the
     * system. Also this method conflicts with possible PnP support in
     * the OS. For this reason driver is just a temporary kludge.
     */

    /*
     * Wake up the card by sending a 32 byte Crystal key to the key port.
     */
    for (i = 0; i < 32; i++)
	CS_OUT(crystal_key[i]);

    /*
     * Now set the CSN (Card Select Number).
     */

    CS_OUT2(0x06, CSN_NUM);

    /*
     * Ensure that there is no other codec using the same address.
     */

    CS_OUT2(0x15, 0x00);	/* Select logical device 0 (WSS/SB/FM) */
    CS_OUT2(0x33, 0x00);	/* Inactivate logical dev 0 */

    /*
     * Then set some config bytes. First logical device 0
     */

    CS_OUT2(0x15, 0x00);	/* Select logical device 0 (WSS/SB/FM) */
    CS_OUT3(0x47, (base >> 8) & 0xff, base & 0xff);	/* WSSbase */

    if (0)			/* Not free */
	CS_OUT3(0x48, 0x00, 0x00)	/* FMbase off */
    else
	CS_OUT3(0x48, 0x03, 0x88);	/* FMbase 0x388 */

    CS_OUT3(0x42, 0x00, 0x00);	/* SBbase off */
    CS_OUT2(0x22, irq);	/* SB+WSS IRQ */
    CS_OUT2(0x2a, dma1);	/* SB+WSS DMA */

    if (dma2 != -1)
	CS_OUT2(0x25, dma2)	/* WSS DMA2 */
    else
	CS_OUT2(0x25, 4);	/* No WSS DMA2 */

    CS_OUT2(0x33, 0x01);	/* Activate logical dev 0 */

    /*
     * Initialize logical device 3 (MPU)
     */

#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI)
    if (mpu_base != 0 && mpu_irq != 0) {
	CS_OUT2(0x15, 0x03);	/* Select logical device 3 (MPU) */
	CS_OUT3(0x47, (mpu_base >> 8) & 0xff, mpu_base & 0xff);	/* MPUbase */
	CS_OUT2(0x22, mpu_irq);	/* MPU IRQ */
	CS_OUT2(0x33, 0x01);	/* Activate logical dev 3 */
    }
#endif

    /*
     * Finally activate the chip
     */
    CS_OUT(0x79);

    /*
     * Then try to detect the codec part of the chip
     */

    return ad1848_detect(hw_config->io_base, NULL, hw_config->osp);
}

void
attach_cs4232(struct address_info * hw_config)
{
    int             base = hw_config->io_base, irq = hw_config->irq;
    int             dma1 = hw_config->dma, dma2 = hw_config->dma2;

    if (dma2 == -1)
	dma2 = dma1;

    ad1848_init("CS4232", base,
	irq,
	dma1,	/* Playback DMA */
	dma2,	/* Capture DMA */
	0,
	hw_config->osp);

#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI)
    if (mpu_base != 0 && mpu_irq != 0) {
	static struct address_info hw_config2 =
	{0};		/* Ensure it's initialized */

	hw_config2.io_base = mpu_base;
	hw_config2.irq = mpu_irq;
	hw_config2.dma = -1;
	hw_config2.dma2 = -1;
	hw_config2.always_detect = 0;
	hw_config2.name = NULL;
	hw_config2.card_subtype = 0;
	hw_config2.osp = hw_config->osp;

	if (probe_mpu401(&hw_config2)) {
	    mpu_detected = 1;
	    attach_mpu401(&hw_config2);
	} else {
	    mpu_base = mpu_irq = 0;
	}
    }
#endif
}

#endif
OpenPOWER on IntegriCloud