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/] [arch/] [m68k/] [mac/] [macboing.c] - Blame information for rev 3

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 3 xianfeng
/*
2
 *      Mac bong noise generator. Note - we ought to put a boingy noise
3
 *      here 8)
4
 *
5
 *      ----------------------------------------------------------------------
6
 *      16.11.98:
7
 *      rewrote some functions, added support for Enhanced ASC (Quadras)
8
 *      after the NetBSD asc.c console bell patch by Colin Wood/Frederick Bruck
9
 *      Juergen Mellinger (juergen.mellinger@t-online.de)
10
 */
11
 
12
#include <linux/sched.h>
13
#include <linux/timer.h>
14
 
15
#include <asm/macintosh.h>
16
#include <asm/mac_asc.h>
17
 
18
static int mac_asc_inited;
19
/*
20
 * dumb triangular wave table
21
 */
22
static __u8 mac_asc_wave_tab[ 0x800 ];
23
 
24
/*
25
 * Alan's original sine table; needs interpolating to 0x800
26
 * (hint: interpolate or hardwire [0 -> Pi/2[, it's symmetric)
27
 */
28
static const signed char sine_data[] = {
29
        0,  39,  75,  103,  121,  127,  121,  103,  75,  39,
30
        0, -39, -75, -103, -121, -127, -121, -103, -75, -39
31
};
32
 
33
/*
34
 * where the ASC hides ...
35
 */
36
static volatile __u8* mac_asc_regs = ( void* )0x50F14000;
37
 
38
/*
39
 * sample rate; is this a good default value?
40
 */
41
static unsigned long mac_asc_samplespersec = 11050;
42
static int mac_bell_duration;
43
static unsigned long mac_bell_phase; /* 0..2*Pi -> 0..0x800 (wavetable size) */
44
static unsigned long mac_bell_phasepersample;
45
 
46
/*
47
 * some function protos
48
 */
49
static void mac_init_asc( void );
50
static void mac_nosound( unsigned long );
51
static void mac_quadra_start_bell( unsigned int, unsigned int, unsigned int );
52
static void mac_quadra_ring_bell( unsigned long );
53
static void mac_av_start_bell( unsigned int, unsigned int, unsigned int );
54
static void ( *mac_special_bell )( unsigned int, unsigned int, unsigned int );
55
 
56
/*
57
 * our timer to start/continue/stop the bell
58
 */
59
static DEFINE_TIMER(mac_sound_timer, mac_nosound, 0, 0);
60
 
61
/*
62
 * Sort of initialize the sound chip (called from mac_mksound on the first
63
 * beep).
64
 */
65
static void mac_init_asc( void )
66
{
67
        int i;
68
 
69
        /*
70
         * do some machine specific initialization
71
         * BTW:
72
         * the NetBSD Quadra patch identifies the Enhanced Apple Sound Chip via
73
         *      mac_asc_regs[ 0x800 ] & 0xF0 != 0
74
         * this makes no sense here, because we have to set the default sample
75
         * rate anyway if we want correct frequencies
76
         */
77
        switch ( macintosh_config->ident )
78
        {
79
                case MAC_MODEL_IIFX:
80
                        /*
81
                         * The IIfx is always special ...
82
                         */
83
                        mac_asc_regs = ( void* )0x50010000;
84
                        break;
85
                        /*
86
                         * not sure about how correct this list is
87
                         * machines with the EASC enhanced apple sound chip
88
                         */
89
                case MAC_MODEL_Q630:
90
                case MAC_MODEL_P475:
91
                        mac_special_bell = mac_quadra_start_bell;
92
                        mac_asc_samplespersec = 22150;
93
                        break;
94
                case MAC_MODEL_C660:
95
                case MAC_MODEL_Q840:
96
                        /*
97
                         * The Quadra 660AV and 840AV use the "Singer" custom ASIC for sound I/O.
98
                         * It appears to be similar to the "AWACS" custom ASIC in the Power Mac
99
                         * [678]100.  Because Singer and AWACS may have a similar hardware
100
                         * interface, this would imply that the code in drivers/sound/dmasound.c
101
                         * for AWACS could be used as a basis for Singer support.  All we have to
102
                         * do is figure out how to do DMA on the 660AV/840AV through the PSC and
103
                         * figure out where the Singer hardware sits in memory. (I'd look in the
104
                         * vicinity of the AWACS location in a Power Mac [678]100 first, or the
105
                         * current location of the Apple Sound Chip--ASC--in other Macs.)  The
106
                         * Power Mac [678]100 info can be found in MkLinux Mach kernel sources.
107
                         *
108
                         * Quoted from Apple's Tech Info Library, article number 16405:
109
                         *   "Among desktop Macintosh computers, only the 660AV, 840AV, and Power
110
                         *   Macintosh models have 16-bit audio input and output capability
111
                         *   because of the AT&T DSP3210 hardware circuitry and the 16-bit Singer
112
                         *   codec circuitry in the AVs.  The Audio Waveform Amplifier and
113
                         *   Converter (AWAC) chip in the Power Macintosh performs the same
114
                         *   16-bit I/O functionality.  The PowerBook 500 series computers
115
                         *   support 16-bit stereo output, but only mono input."
116
                         *
117
                         *   http://til.info.apple.com/techinfo.nsf/artnum/n16405
118
                         *
119
                         * --David Kilzer
120
                         */
121
                        mac_special_bell = mac_av_start_bell;
122
                        break;
123
                case MAC_MODEL_Q650:
124
                case MAC_MODEL_Q700:
125
                case MAC_MODEL_Q800:
126
                case MAC_MODEL_Q900:
127
                case MAC_MODEL_Q950:
128
                        /*
129
                         * Currently not implemented!
130
                         */
131
                        mac_special_bell = NULL;
132
                        break;
133
                default:
134
                        /*
135
                         * Every switch needs a default
136
                         */
137
                        mac_special_bell = NULL;
138
                        break;
139
        }
140
 
141
        /*
142
         * init the wave table with a simple triangular wave
143
         * A sine wave would sure be nicer here ...
144
         */
145
        for ( i = 0; i < 0x400; i++ )
146
        {
147
                mac_asc_wave_tab[ i ] = i / 4;
148
                mac_asc_wave_tab[ i + 0x400 ] = 0xFF - i / 4;
149
        }
150
        mac_asc_inited = 1;
151
}
152
 
153
/*
154
 * Called to make noise; current single entry to the boing driver.
155
 * Does the job for simple ASC, calls other routines else.
156
 * XXX Fixme:
157
 * Should be split into asc_mksound, easc_mksound, av_mksound and
158
 * function pointer set in mac_init_asc which would be called at
159
 * init time.
160
 * _This_ is rather ugly ...
161
 */
162
void mac_mksound( unsigned int freq, unsigned int length )
163
{
164
        __u32 cfreq = ( freq << 5 ) / 468;
165
        __u32 flags;
166
        int i;
167
 
168
        if ( mac_special_bell == NULL )
169
        {
170
                /* Do nothing */
171
                return;
172
        }
173
 
174
        if ( !mac_asc_inited )
175
                mac_init_asc();
176
 
177
        if ( mac_special_bell )
178
        {
179
                mac_special_bell( freq, length, 128 );
180
                return;
181
        }
182
 
183
        if ( freq < 20 || freq > 20000 || length == 0 )
184
        {
185
                mac_nosound( 0 );
186
                return;
187
        }
188
 
189
        local_irq_save(flags);
190
 
191
        del_timer( &mac_sound_timer );
192
 
193
        for ( i = 0; i < 0x800; i++ )
194
                mac_asc_regs[ i ] = 0;
195
        for ( i = 0; i < 0x800; i++ )
196
                mac_asc_regs[ i ] = mac_asc_wave_tab[ i ];
197
 
198
        for ( i = 0; i < 8; i++ )
199
                *( __u32* )( ( __u32 )mac_asc_regs + ASC_CONTROL + 0x814 + 8 * i ) = cfreq;
200
 
201
        mac_asc_regs[ 0x807 ] = 0;
202
        mac_asc_regs[ ASC_VOLUME ] = 128;
203
        mac_asc_regs[ 0x805 ] = 0;
204
        mac_asc_regs[ 0x80F ] = 0;
205
        mac_asc_regs[ ASC_MODE ] = ASC_MODE_SAMPLE;
206
        mac_asc_regs[ ASC_ENABLE ] = ASC_ENABLE_SAMPLE;
207
 
208
        mac_sound_timer.expires = jiffies + length;
209
        add_timer( &mac_sound_timer );
210
 
211
        local_irq_restore(flags);
212
}
213
 
214
/*
215
 * regular ASC: stop whining ..
216
 */
217
static void mac_nosound( unsigned long ignored )
218
{
219
        mac_asc_regs[ ASC_ENABLE ] = 0;
220
}
221
 
222
/*
223
 * EASC entry; init EASC, don't load wavetable, schedule 'start whining'.
224
 */
225
static void mac_quadra_start_bell( unsigned int freq, unsigned int length, unsigned int volume )
226
{
227
        __u32 flags;
228
 
229
        /* if the bell is already ringing, ring longer */
230
        if ( mac_bell_duration > 0 )
231
        {
232
                mac_bell_duration += length;
233
                return;
234
        }
235
 
236
        mac_bell_duration = length;
237
        mac_bell_phase = 0;
238
        mac_bell_phasepersample = ( freq * sizeof( mac_asc_wave_tab ) ) / mac_asc_samplespersec;
239
        /* this is reasonably big for small frequencies */
240
 
241
        local_irq_save(flags);
242
 
243
        /* set the volume */
244
        mac_asc_regs[ 0x806 ] = volume;
245
 
246
        /* set up the ASC registers */
247
        if ( mac_asc_regs[ 0x801 ] != 1 )
248
        {
249
                /* select mono mode */
250
                mac_asc_regs[ 0x807 ] = 0;
251
                /* select sampled sound mode */
252
                mac_asc_regs[ 0x802 ] = 0;
253
                /* ??? */
254
                mac_asc_regs[ 0x801 ] = 1;
255
                mac_asc_regs[ 0x803 ] |= 0x80;
256
                mac_asc_regs[ 0x803 ] &= 0x7F;
257
        }
258
 
259
        mac_sound_timer.function = mac_quadra_ring_bell;
260
        mac_sound_timer.expires = jiffies + 1;
261
        add_timer( &mac_sound_timer );
262
 
263
        local_irq_restore(flags);
264
}
265
 
266
/*
267
 * EASC 'start/continue whining'; I'm not sure why the above function didn't
268
 * already load the wave table, or at least call this one...
269
 * This piece keeps reloading the wave table until done.
270
 */
271
static void mac_quadra_ring_bell( unsigned long ignored )
272
{
273
        int     i, count = mac_asc_samplespersec / HZ;
274
        __u32 flags;
275
 
276
        /*
277
         * we neither want a sound buffer overflow nor underflow, so we need to match
278
         * the number of samples per timer interrupt as exactly as possible.
279
         * using the asc interrupt will give better results in the future
280
         * ...and the possibility to use a real sample (a boingy noise, maybe...)
281
         */
282
 
283
        local_irq_save(flags);
284
 
285
        del_timer( &mac_sound_timer );
286
 
287
        if ( mac_bell_duration-- > 0 )
288
        {
289
                for ( i = 0; i < count; i++ )
290
                {
291
                        mac_bell_phase += mac_bell_phasepersample;
292
                        mac_asc_regs[ 0 ] = mac_asc_wave_tab[ mac_bell_phase & ( sizeof( mac_asc_wave_tab ) - 1 ) ];
293
                }
294
                mac_sound_timer.expires = jiffies + 1;
295
                add_timer( &mac_sound_timer );
296
        }
297
        else
298
                mac_asc_regs[ 0x801 ] = 0;
299
 
300
        local_irq_restore(flags);
301
}
302
 
303
/*
304
 * AV code - please fill in.
305
 */
306
static void mac_av_start_bell( unsigned int freq, unsigned int length, unsigned int volume )
307
{
308
}

powered by: WebSVN 2.1.0

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