1 /* 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 } 309