sb_common.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:29k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.  * sound/sb_common.c
  3.  *
  4.  * Common routines for Sound Blaster compatible cards.
  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.  * Daniel J. Rodriksson: Modified sbintr to handle 8 and 16 bit interrupts
  15.  *                       for full duplex support ( only sb16 by now )
  16.  * Rolf Fokkens:  Added (BETA?) support for ES1887 chips.
  17.  * (fokkensr@vertis.nl)  Which means: You can adjust the recording levels.
  18.  *
  19.  * 2000/01/18 - separated sb_card and sb_common -
  20.  * Jeff Garzik <jgarzik@mandrakesoft.com>
  21.  *
  22.  * 2000/09/18 - got rid of attach_uart401
  23.  * Arnaldo Carvalho de Melo <acme@conectiva.com.br>
  24.  *
  25.  * 2001/01/26 - replaced CLI/STI with spinlocks
  26.  * Chris Rankin <rankinc@zipworld.com.au>
  27.  */
  28. #include <linux/config.h>
  29. #include <linux/init.h>
  30. #include <linux/module.h>
  31. #include <linux/delay.h>
  32. #include <linux/spinlock.h>
  33. #include "sound_config.h"
  34. #include "sound_firmware.h"
  35. #include "mpu401.h"
  36. #include "sb_mixer.h"
  37. #include "sb.h"
  38. #include "sb_ess.h"
  39. /*
  40.  * global module flag
  41.  */
  42. int sb_be_quiet;
  43. static sb_devc *detected_devc; /* For communication from probe to init */
  44. static sb_devc *last_devc; /* For MPU401 initialization */
  45. static unsigned char jazz_irq_bits[] = {
  46. 0, 0, 2, 3, 0, 1, 0, 4, 0, 2, 5, 0, 0, 0, 0, 6
  47. };
  48. static unsigned char jazz_dma_bits[] = {
  49. 0, 1, 0, 2, 0, 3, 0, 4
  50. };
  51. void *smw_free;
  52. /*
  53.  * Jazz16 chipset specific control variables
  54.  */
  55. static int jazz16_base; /* Not detected */
  56. static unsigned char jazz16_bits; /* I/O relocation bits */
  57. static spinlock_t jazz16_lock = SPIN_LOCK_UNLOCKED;
  58. /*
  59.  * Logitech Soundman Wave specific initialization code
  60.  */
  61. #ifdef SMW_MIDI0001_INCLUDED
  62. #include "smw-midi0001.h"
  63. #else
  64. static unsigned char *smw_ucode;
  65. static int      smw_ucodeLen;
  66. #endif
  67. sb_devc *last_sb; /* Last sb loaded */
  68. int sb_dsp_command(sb_devc * devc, unsigned char val)
  69. {
  70. int i;
  71. unsigned long limit;
  72. limit = jiffies + HZ / 10; /* Timeout */
  73. /*
  74.  * Note! the i<500000 is an emergency exit. The sb_dsp_command() is sometimes
  75.  * called while interrupts are disabled. This means that the timer is
  76.  * disabled also. However the timeout situation is a abnormal condition.
  77.  * Normally the DSP should be ready to accept commands after just couple of
  78.  * loops.
  79.  */
  80. for (i = 0; i < 500000 && (limit-jiffies)>0; i++)
  81. {
  82. if ((inb(DSP_STATUS) & 0x80) == 0)
  83. {
  84. outb((val), DSP_COMMAND);
  85. return 1;
  86. }
  87. }
  88. printk(KERN_WARNING "Sound Blaster:  DSP command(%x) timeout.n", val);
  89. return 0;
  90. }
  91. int sb_dsp_get_byte(sb_devc * devc)
  92. {
  93. int i;
  94. for (i = 1000; i; i--)
  95. {
  96. if (inb(DSP_DATA_AVAIL) & 0x80)
  97. return inb(DSP_READ);
  98. }
  99. return 0xffff;
  100. }
  101. static void sb_intr (sb_devc *devc)
  102. {
  103. int status;
  104. unsigned char   src = 0xff;
  105. if (devc->model == MDL_SB16)
  106. {
  107. src = sb_getmixer(devc, IRQ_STAT); /* Interrupt source register */
  108. if (src & 4) /* MPU401 interrupt */
  109. if(devc->midi_irq_cookie)
  110. uart401intr(devc->irq, devc->midi_irq_cookie, NULL);
  111. if (!(src & 3))
  112. return; /* Not a DSP interrupt */
  113. }
  114. if (devc->intr_active && (!devc->fullduplex || (src & 0x01)))
  115. {
  116. switch (devc->irq_mode)
  117. {
  118. case IMODE_OUTPUT:
  119. DMAbuf_outputintr(devc->dev, 1);
  120. break;
  121. case IMODE_INPUT:
  122. DMAbuf_inputintr(devc->dev);
  123. break;
  124. case IMODE_INIT:
  125. break;
  126. case IMODE_MIDI:
  127. sb_midi_interrupt(devc);
  128. break;
  129. default:
  130. /* printk(KERN_WARN "Sound Blaster: Unexpected interruptn"); */
  131. ;
  132. }
  133. }
  134. else if (devc->intr_active_16 && (src & 0x02))
  135. {
  136. switch (devc->irq_mode_16)
  137. {
  138. case IMODE_OUTPUT:
  139. DMAbuf_outputintr(devc->dev, 1);
  140. break;
  141. case IMODE_INPUT:
  142. DMAbuf_inputintr(devc->dev);
  143. break;
  144. case IMODE_INIT:
  145. break;
  146. default:
  147. /* printk(KERN_WARN "Sound Blaster: Unexpected interruptn"); */
  148. ;
  149. }
  150. }
  151. /*
  152.  * Acknowledge interrupts 
  153.  */
  154. if (src & 0x01)
  155. status = inb(DSP_DATA_AVAIL);
  156. if (devc->model == MDL_SB16 && src & 0x02)
  157. status = inb(DSP_DATA_AVL16);
  158. }
  159. static void pci_intr(sb_devc *devc)
  160. {
  161. int src = inb(devc->pcibase+0x1A);
  162. src&=3;
  163. if(src)
  164. sb_intr(devc);
  165. }
  166. static void sbintr(int irq, void *dev_id, struct pt_regs *dummy)
  167. {
  168. sb_devc *devc = dev_id;
  169. devc->irq_ok = 1;
  170. switch (devc->model) {
  171. case MDL_ESSPCI:
  172. pci_intr (devc);
  173. break;
  174. case MDL_ESS:
  175. ess_intr (devc);
  176. break;
  177. default:
  178. sb_intr (devc);
  179. break;
  180. }
  181. }
  182. int sb_dsp_reset(sb_devc * devc)
  183. {
  184. int loopc;
  185. DEB(printk("Entered sb_dsp_reset()n"));
  186. if (devc->model == MDL_ESS) return ess_dsp_reset (devc);
  187. /* This is only for non-ESS chips */
  188. outb(1, DSP_RESET);
  189. udelay(10);
  190. outb(0, DSP_RESET);
  191. udelay(30);
  192. for (loopc = 0; loopc < 1000 && !(inb(DSP_DATA_AVAIL) & 0x80); loopc++);
  193. if (inb(DSP_READ) != 0xAA)
  194. {
  195. DDB(printk("sb: No response to RESETn"));
  196. return 0; /* Sorry */
  197. }
  198. DEB(printk("sb_dsp_reset() OKn"));
  199. return 1;
  200. }
  201. static void dsp_get_vers(sb_devc * devc)
  202. {
  203. int i;
  204. unsigned long   flags;
  205. DDB(printk("Entered dsp_get_vers()n"));
  206. spin_lock_irqsave(&devc->lock, flags);
  207. devc->major = devc->minor = 0;
  208. sb_dsp_command(devc, 0xe1); /* Get version */
  209. for (i = 100000; i; i--)
  210. {
  211. if (inb(DSP_DATA_AVAIL) & 0x80)
  212. {
  213. if (devc->major == 0)
  214. devc->major = inb(DSP_READ);
  215. else
  216. {
  217. devc->minor = inb(DSP_READ);
  218. break;
  219. }
  220. }
  221. }
  222. spin_unlock_irqrestore(&devc->lock, flags);
  223. DDB(printk("DSP version %d.%02dn", devc->major, devc->minor));
  224. }
  225. static int sb16_set_dma_hw(sb_devc * devc)
  226. {
  227. int bits;
  228. if (devc->dma8 != 0 && devc->dma8 != 1 && devc->dma8 != 3)
  229. {
  230. printk(KERN_ERR "SB16: Invalid 8 bit DMA (%d)n", devc->dma8);
  231. return 0;
  232. }
  233. bits = (1 << devc->dma8);
  234. if (devc->dma16 >= 5 && devc->dma16 <= 7)
  235. bits |= (1 << devc->dma16);
  236. sb_setmixer(devc, DMA_NR, bits);
  237. return 1;
  238. }
  239. static void sb16_set_mpu_port(sb_devc * devc, struct address_info *hw_config)
  240. {
  241. /*
  242.  * This routine initializes new MIDI port setup register of SB Vibra (CT2502).
  243.  */
  244. unsigned char   bits = sb_getmixer(devc, 0x84) & ~0x06;
  245. switch (hw_config->io_base)
  246. {
  247. case 0x300:
  248. sb_setmixer(devc, 0x84, bits | 0x04);
  249. break;
  250. case 0x330:
  251. sb_setmixer(devc, 0x84, bits | 0x00);
  252. break;
  253. default:
  254. sb_setmixer(devc, 0x84, bits | 0x02); /* Disable MPU */
  255. printk(KERN_ERR "SB16: Invalid MIDI I/O port %xn", hw_config->io_base);
  256. }
  257. }
  258. static int sb16_set_irq_hw(sb_devc * devc, int level)
  259. {
  260. int ival;
  261. switch (level)
  262. {
  263. case 5:
  264. ival = 2;
  265. break;
  266. case 7:
  267. ival = 4;
  268. break;
  269. case 9:
  270. ival = 1;
  271. break;
  272. case 10:
  273. ival = 8;
  274. break;
  275. default:
  276. printk(KERN_ERR "SB16: Invalid IRQ%dn", level);
  277. return 0;
  278. }
  279. sb_setmixer(devc, IRQ_NR, ival);
  280. return 1;
  281. }
  282. static void relocate_Jazz16(sb_devc * devc, struct address_info *hw_config)
  283. {
  284. unsigned char bits = 0;
  285. unsigned long flags;
  286. if (jazz16_base != 0 && jazz16_base != hw_config->io_base)
  287. return;
  288. switch (hw_config->io_base)
  289. {
  290. case 0x220:
  291. bits = 1;
  292. break;
  293. case 0x240:
  294. bits = 2;
  295. break;
  296. case 0x260:
  297. bits = 3;
  298. break;
  299. default:
  300. return;
  301. }
  302. bits = jazz16_bits = bits << 5;
  303. jazz16_base = hw_config->io_base;
  304. /*
  305.  * Magic wake up sequence by writing to 0x201 (aka Joystick port)
  306.  */
  307. spin_lock_irqsave(&jazz16_lock, flags);
  308. outb((0xAF), 0x201);
  309. outb((0x50), 0x201);
  310. outb((bits), 0x201);
  311. spin_unlock_irqrestore(&jazz16_lock, flags);
  312. }
  313. static int init_Jazz16(sb_devc * devc, struct address_info *hw_config)
  314. {
  315. char name[100];
  316. /*
  317.  * First try to check that the card has Jazz16 chip. It identifies itself
  318.  * by returning 0x12 as response to DSP command 0xfa.
  319.  */
  320. if (!sb_dsp_command(devc, 0xfa))
  321. return 0;
  322. if (sb_dsp_get_byte(devc) != 0x12)
  323. return 0;
  324. /*
  325.  * OK so far. Now configure the IRQ and DMA channel used by the card.
  326.  */
  327. if (hw_config->irq < 1 || hw_config->irq > 15 || jazz_irq_bits[hw_config->irq] == 0)
  328. {
  329. printk(KERN_ERR "Jazz16: Invalid interrupt (IRQ%d)n", hw_config->irq);
  330. return 0;
  331. }
  332. if (hw_config->dma < 0 || hw_config->dma > 3 || jazz_dma_bits[hw_config->dma] == 0)
  333. {
  334.   printk(KERN_ERR "Jazz16: Invalid 8 bit DMA (DMA%d)n", hw_config->dma);
  335.   return 0;
  336. }
  337. if (hw_config->dma2 < 0)
  338. {
  339. printk(KERN_ERR "Jazz16: No 16 bit DMA channel definedn");
  340. return 0;
  341. }
  342. if (hw_config->dma2 < 5 || hw_config->dma2 > 7 || jazz_dma_bits[hw_config->dma2] == 0)
  343. {
  344. printk(KERN_ERR "Jazz16: Invalid 16 bit DMA (DMA%d)n", hw_config->dma2);
  345. return 0;
  346. }
  347. devc->dma16 = hw_config->dma2;
  348. if (!sb_dsp_command(devc, 0xfb))
  349. return 0;
  350. if (!sb_dsp_command(devc, jazz_dma_bits[hw_config->dma] |
  351. (jazz_dma_bits[hw_config->dma2] << 4)))
  352. return 0;
  353. if (!sb_dsp_command(devc, jazz_irq_bits[hw_config->irq]))
  354. return 0;
  355. /*
  356.  * Now we have configured a standard Jazz16 device. 
  357.  */
  358. devc->model = MDL_JAZZ;
  359. strcpy(name, "Jazz16");
  360. hw_config->name = "Jazz16";
  361. devc->caps |= SB_NO_MIDI;
  362. return 1;
  363. }
  364. static void relocate_ess1688(sb_devc * devc)
  365. {
  366. unsigned char bits;
  367. switch (devc->base)
  368. {
  369. case 0x220:
  370. bits = 0x04;
  371. break;
  372. case 0x230:
  373. bits = 0x05;
  374. break;
  375. case 0x240:
  376. bits = 0x06;
  377. break;
  378. case 0x250:
  379. bits = 0x07;
  380. break;
  381. default:
  382. return; /* Wrong port */
  383. }
  384. DDB(printk("Doing ESS1688 address selectionn"));
  385. /*
  386.  * ES1688 supports two alternative ways for software address config.
  387.  * First try the so called Read-Sequence-Key method.
  388.  */
  389. /* Reset the sequence logic */
  390. inb(0x229);
  391. inb(0x229);
  392. inb(0x229);
  393. /* Perform the read sequence */
  394. inb(0x22b);
  395. inb(0x229);
  396. inb(0x22b);
  397. inb(0x229);
  398. inb(0x229);
  399. inb(0x22b);
  400. inb(0x229);
  401. /* Select the base address by reading from it. Then probe using the port. */
  402. inb(devc->base);
  403. if (sb_dsp_reset(devc)) /* Bingo */
  404. return;
  405. #if 0 /* This causes system lockups (Nokia 386/25 at least) */
  406. /*
  407.  * The last resort is the system control register method.
  408.  */
  409. outb((0x00), 0xfb); /* 0xFB is the unlock register */
  410. outb((0x00), 0xe0); /* Select index 0 */
  411. outb((bits), 0xe1); /* Write the config bits */
  412. outb((0x00), 0xf9); /* 0xFB is the lock register */
  413. #endif
  414. }
  415. int sb_dsp_detect(struct address_info *hw_config, int pci, int pciio, struct sb_module_options *sbmo)
  416. {
  417. sb_devc sb_info;
  418. sb_devc *devc = &sb_info;
  419. memset((char *) &sb_info, 0, sizeof(sb_info)); /* Zero everything */
  420. /* Copy module options in place */
  421. if(sbmo) memcpy(&devc->sbmo, sbmo, sizeof(struct sb_module_options));
  422. sb_info.my_mididev = -1;
  423. sb_info.my_mixerdev = -1;
  424. sb_info.dev = -1;
  425. /*
  426.  * Initialize variables 
  427.  */
  428. DDB(printk("sb_dsp_detect(%x) enteredn", hw_config->io_base));
  429. if (check_region(hw_config->io_base, 16))
  430. {
  431. #ifdef MODULE
  432. printk(KERN_INFO "sb: I/O region in use.n");
  433. #endif
  434. return 0;
  435. }
  436. devc->lock = SPIN_LOCK_UNLOCKED;
  437. devc->type = hw_config->card_subtype;
  438. devc->base = hw_config->io_base;
  439. devc->irq = hw_config->irq;
  440. devc->dma8 = hw_config->dma;
  441. devc->dma16 = -1;
  442. devc->pcibase = pciio;
  443. if(pci == SB_PCI_ESSMAESTRO)
  444. {
  445. devc->model = MDL_ESSPCI;
  446. devc->caps |= SB_PCI_IRQ;
  447. hw_config->driver_use_1 |= SB_PCI_IRQ;
  448. hw_config->card_subtype = MDL_ESSPCI;
  449. }
  450. if(pci == SB_PCI_YAMAHA)
  451. {
  452. devc->model = MDL_YMPCI;
  453. devc->caps |= SB_PCI_IRQ;
  454. hw_config->driver_use_1 |= SB_PCI_IRQ;
  455. hw_config->card_subtype = MDL_YMPCI;
  456. printk("Yamaha PCI mode.n");
  457. }
  458. if (devc->sbmo.acer)
  459. {
  460. unsigned long flags;
  461. spin_lock_irqsave(&devc->lock, flags);
  462. inb(devc->base + 0x09);
  463. inb(devc->base + 0x09);
  464. inb(devc->base + 0x09);
  465. inb(devc->base + 0x0b);
  466. inb(devc->base + 0x09);
  467. inb(devc->base + 0x0b);
  468. inb(devc->base + 0x09);
  469. inb(devc->base + 0x09);
  470. inb(devc->base + 0x0b);
  471. inb(devc->base + 0x09);
  472. inb(devc->base + 0x00);
  473. spin_unlock_irqrestore(&devc->lock, flags);
  474. }
  475. /*
  476.  * Detect the device
  477.  */
  478. if (sb_dsp_reset(devc))
  479. dsp_get_vers(devc);
  480. else
  481. devc->major = 0;
  482. if (devc->type == 0 || devc->type == MDL_JAZZ || devc->type == MDL_SMW)
  483. if (devc->major == 0 || (devc->major == 3 && devc->minor == 1))
  484. relocate_Jazz16(devc, hw_config);
  485. if (devc->major == 0 && (devc->type == MDL_ESS || devc->type == 0))
  486. relocate_ess1688(devc);
  487. if (!sb_dsp_reset(devc))
  488. {
  489. DDB(printk("SB reset failedn"));
  490. #ifdef MODULE
  491. printk(KERN_INFO "sb: dsp reset failed.n");
  492. #endif
  493. return 0;
  494. }
  495. if (devc->major == 0)
  496. dsp_get_vers(devc);
  497. if (devc->major == 3 && devc->minor == 1)
  498. {
  499. if (devc->type == MDL_AZTECH) /* SG Washington? */
  500. {
  501. if (sb_dsp_command(devc, 0x09))
  502. if (sb_dsp_command(devc, 0x00)) /* Enter WSS mode */
  503. {
  504. int i;
  505. /* Have some delay */
  506. for (i = 0; i < 10000; i++)
  507. inb(DSP_DATA_AVAIL);
  508. devc->caps = SB_NO_AUDIO | SB_NO_MIDI; /* Mixer only */
  509. devc->model = MDL_AZTECH;
  510. }
  511. }
  512. }
  513. if(devc->type == MDL_ESSPCI)
  514. devc->model = MDL_ESSPCI;
  515. if(devc->type == MDL_YMPCI)
  516. {
  517. printk("YMPCI selectedn");
  518. devc->model = MDL_YMPCI;
  519. }
  520. /*
  521.  * Save device information for sb_dsp_init()
  522.  */
  523. detected_devc = (sb_devc *)kmalloc(sizeof(sb_devc), GFP_KERNEL);
  524. if (detected_devc == NULL)
  525. {
  526. printk(KERN_ERR "sb: Can't allocate memory for device informationn");
  527. return 0;
  528. }
  529. memcpy(detected_devc, devc, sizeof(sb_devc));
  530. MDB(printk(KERN_INFO "SB %d.%02d detected OK (%x)n", devc->major, devc->minor, hw_config->io_base));
  531. return 1;
  532. }
  533. int sb_dsp_init(struct address_info *hw_config, struct module *owner)
  534. {
  535. sb_devc *devc;
  536. char name[100];
  537. extern int sb_be_quiet;
  538. int mixer22, mixer30;
  539. /*
  540.  * Check if we had detected a SB device earlier
  541.  */
  542. DDB(printk("sb_dsp_init(%x) enteredn", hw_config->io_base));
  543. name[0] = 0;
  544. if (detected_devc == NULL)
  545. {
  546. MDB(printk("No detected devicen"));
  547. return 0;
  548. }
  549. devc = detected_devc;
  550. detected_devc = NULL;
  551. if (devc->base != hw_config->io_base)
  552. {
  553. DDB(printk("I/O port mismatchn"));
  554. return 0;
  555. }
  556. /*
  557.  * Now continue initialization of the device
  558.  */
  559. devc->caps = hw_config->driver_use_1;
  560. if (!((devc->caps & SB_NO_AUDIO) && (devc->caps & SB_NO_MIDI)) && hw_config->irq > 0)
  561. { /* IRQ setup */
  562. /*
  563.  * ESS PCI cards do shared PCI IRQ stuff. Since they
  564.  * will get shared PCI irq lines we must cope.
  565.  */
  566.  
  567. int i=(devc->caps&SB_PCI_IRQ)?SA_SHIRQ:0;
  568. if (request_irq(hw_config->irq, sbintr, i, "soundblaster", devc) < 0)
  569. {
  570. printk(KERN_ERR "SB: Can't allocate IRQ%dn", hw_config->irq);
  571. return 0;
  572. }
  573. devc->irq_ok = 0;
  574. if (devc->major == 4)
  575. if (!sb16_set_irq_hw(devc, devc->irq)) /* Unsupported IRQ */
  576. {
  577. free_irq(devc->irq, devc);
  578. return 0;
  579. }
  580. if ((devc->type == 0 || devc->type == MDL_ESS) &&
  581. devc->major == 3 && devc->minor == 1)
  582. { /* Handle various chipsets which claim they are SB Pro compatible */
  583. if ((devc->type != 0 && devc->type != MDL_ESS) ||
  584. !ess_init(devc, hw_config))
  585. {
  586. if ((devc->type != 0 && devc->type != MDL_JAZZ &&
  587.  devc->type != MDL_SMW) || !init_Jazz16(devc, hw_config))
  588. {
  589. DDB(printk("This is a genuine SB Pron"));
  590. }
  591. }
  592. }
  593. if (devc->major == 4 && devc->minor <= 11 ) /* Won't work */
  594. devc->irq_ok = 1;
  595. else
  596. {
  597. int n;
  598. for (n = 0; n < 3 && devc->irq_ok == 0; n++)
  599. {
  600. if (sb_dsp_command(devc, 0xf2)) /* Cause interrupt immediately */
  601. {
  602. int i;
  603. for (i = 0; !devc->irq_ok && i < 10000; i++);
  604. }
  605. }
  606. if (!devc->irq_ok)
  607. printk(KERN_WARNING "sb: Interrupt test on IRQ%d failed - Probable IRQ conflictn", devc->irq);
  608. else
  609. {
  610. DDB(printk("IRQ test OK (IRQ%d)n", devc->irq));
  611. }
  612. }
  613. } /* IRQ setup */
  614. request_region(hw_config->io_base, 16, "soundblaster");
  615. last_sb = devc;
  616. switch (devc->major)
  617. {
  618. case 1: /* SB 1.0 or 1.5 */
  619. devc->model = hw_config->card_subtype = MDL_SB1;
  620. break;
  621. case 2: /* SB 2.x */
  622. if (devc->minor == 0)
  623. devc->model = hw_config->card_subtype = MDL_SB2;
  624. else
  625. devc->model = hw_config->card_subtype = MDL_SB201;
  626. break;
  627. case 3: /* SB Pro and most clones */
  628. switch (devc->model) {
  629. case 0:
  630. devc->model = hw_config->card_subtype = MDL_SBPRO;
  631. if (hw_config->name == NULL)
  632. hw_config->name = "Sound Blaster Pro (8 BIT ONLY)";
  633. break;
  634. case MDL_ESS:
  635. ess_dsp_init(devc, hw_config);
  636. break;
  637. }
  638. break;
  639. case 4:
  640. devc->model = hw_config->card_subtype = MDL_SB16;
  641. /* 
  642.  * ALS007 and ALS100 return DSP version 4.2 and have 2 post-reset !=0
  643.  * registers at 0x3c and 0x4c (output ctrl registers on ALS007) whereas
  644.  * a "standard" SB16 doesn't have a register at 0x4c.  ALS100 actively
  645.  * updates register 0x22 whenever 0x30 changes, as per the SB16 spec.
  646.  * Since ALS007 doesn't, this can be used to differentiate the 2 cards.
  647.  */
  648. if ((devc->minor == 2) && sb_getmixer(devc,0x3c) && sb_getmixer(devc,0x4c)) 
  649. {
  650. mixer30 = sb_getmixer(devc,0x30);
  651. sb_setmixer(devc,0x22,(mixer22=sb_getmixer(devc,0x22)) & 0x0f);
  652. sb_setmixer(devc,0x30,0xff);
  653. /* ALS100 will force 0x30 to 0xf8 like SB16; ALS007 will allow 0xff. */
  654. /* Register 0x22 & 0xf0 on ALS100 == 0xf0; on ALS007 it == 0x10.     */
  655. if ((sb_getmixer(devc,0x30) != 0xff) || ((sb_getmixer(devc,0x22) & 0xf0) != 0x10)) 
  656. {
  657. devc->submodel = SUBMDL_ALS100;
  658. if (hw_config->name == NULL)
  659. hw_config->name = "Sound Blaster 16 (ALS-100)";
  660.          }
  661.          else
  662.          {
  663.          sb_setmixer(devc,0x3c,0x1f);    /* Enable all inputs */
  664. sb_setmixer(devc,0x4c,0x1f);
  665. sb_setmixer(devc,0x22,mixer22); /* Restore 0x22 to original value */
  666. devc->submodel = SUBMDL_ALS007;
  667. if (hw_config->name == NULL)
  668. hw_config->name = "Sound Blaster 16 (ALS-007)";
  669. }
  670. sb_setmixer(devc,0x30,mixer30);
  671. }
  672. else if (hw_config->name == NULL)
  673. hw_config->name = "Sound Blaster 16";
  674. if (hw_config->dma2 == -1)
  675. devc->dma16 = devc->dma8;
  676. else if (hw_config->dma2 < 5 || hw_config->dma2 > 7)
  677. {
  678. printk(KERN_WARNING  "SB16: Bad or missing 16 bit DMA channeln");
  679. devc->dma16 = devc->dma8;
  680. }
  681. else
  682. devc->dma16 = hw_config->dma2;
  683. if(!sb16_set_dma_hw(devc)) {
  684. free_irq(devc->irq, devc);
  685.         release_region(hw_config->io_base, 16);
  686. return 0;
  687. }
  688. devc->caps |= SB_NO_MIDI;
  689. }
  690. if (!(devc->caps & SB_NO_MIXER))
  691. if (devc->major == 3 || devc->major == 4)
  692. sb_mixer_init(devc, owner);
  693. if (!(devc->caps & SB_NO_MIDI))
  694. sb_dsp_midi_init(devc, owner);
  695. if (hw_config->name == NULL)
  696. hw_config->name = "Sound Blaster (8 BIT/MONO ONLY)";
  697. sprintf(name, "%s (%d.%02d)", hw_config->name, devc->major, devc->minor);
  698. conf_printf(name, hw_config);
  699. /*
  700.  * Assuming that a sound card is Sound Blaster (compatible) is the most common
  701.  * configuration error and the mother of all problems. Usually sound cards
  702.  * emulate SB Pro but in addition they have a 16 bit native mode which should be
  703.  * used in Unix. See Readme.cards for more information about configuring OSS/Free
  704.  * properly.
  705.  */
  706. if (devc->model <= MDL_SBPRO)
  707. {
  708. if (devc->major == 3 && devc->minor != 1) /* "True" SB Pro should have v3.1 (rare ones may have 3.2). */
  709. {
  710. printk(KERN_INFO "This sound card may not be fully Sound Blaster Pro compatible.n");
  711. printk(KERN_INFO "In many cases there is another way to configure OSS so thatn");
  712. printk(KERN_INFO "it works properly with OSS (for example in 16 bit mode).n");
  713. printk(KERN_INFO "Please ignore this message if you _really_ have a SB Pro.n");
  714. }
  715. else if (!sb_be_quiet && devc->model == MDL_SBPRO)
  716. {
  717. printk(KERN_INFO "SB DSP version is just %d.%02d which means that your card isn", devc->major, devc->minor);
  718. printk(KERN_INFO "several years old (8 bit only device) or alternatively the sound drivern");
  719. printk(KERN_INFO "is incorrectly configured.n");
  720. }
  721. }
  722. hw_config->card_subtype = devc->model;
  723. hw_config->slots[0]=devc->dev;
  724. last_devc = devc; /* For SB MPU detection */
  725. if (!(devc->caps & SB_NO_AUDIO) && devc->dma8 >= 0)
  726. {
  727. if (sound_alloc_dma(devc->dma8, "SoundBlaster8"))
  728. {
  729. printk(KERN_WARNING "Sound Blaster: Can't allocate 8 bit DMA channel %dn", devc->dma8);
  730. }
  731. if (devc->dma16 >= 0 && devc->dma16 != devc->dma8)
  732. {
  733. if (sound_alloc_dma(devc->dma16, "SoundBlaster16"))
  734. printk(KERN_WARNING "Sound Blaster:  can't allocate 16 bit DMA channel %d.n", devc->dma16);
  735. }
  736. sb_audio_init(devc, name, owner);
  737. hw_config->slots[0]=devc->dev;
  738. }
  739. else
  740. {
  741. MDB(printk("Sound Blaster:  no audio devices found.n"));
  742. }
  743. return 1;
  744. }
  745. void sb_dsp_disable_midi(int io_base)
  746. {
  747. }
  748. void sb_dsp_disable_recording(int io_base)
  749. {
  750. }
  751. /* if (sbmpu) below we allow mpu401 to manage the midi devs
  752.    otherwise we have to unload them. (Andrzej Krzysztofowicz) */
  753.    
  754. void sb_dsp_unload(struct address_info *hw_config, int sbmpu)
  755. {
  756. sb_devc *devc;
  757. devc = audio_devs[hw_config->slots[0]]->devc;
  758. if (devc && devc->base == hw_config->io_base)
  759. {
  760. if ((devc->model & MDL_ESS) && devc->pcibase)
  761. release_region(devc->pcibase, 8);
  762. release_region(devc->base, 16);
  763. if (!(devc->caps & SB_NO_AUDIO))
  764. {
  765. sound_free_dma(devc->dma8);
  766. if (devc->dma16 >= 0)
  767. sound_free_dma(devc->dma16);
  768. }
  769. if (!(devc->caps & SB_NO_AUDIO && devc->caps & SB_NO_MIDI))
  770. {
  771. if (devc->irq > 0)
  772. free_irq(devc->irq, devc);
  773. sb_mixer_unload(devc);
  774. /* We don't have to do this bit any more the UART401 is its own
  775. master  -- Krzysztof Halasa */
  776. /* But we have to do it, if UART401 is not detected */
  777. if (!sbmpu)
  778. sound_unload_mididev(devc->my_mididev);
  779. sound_unload_audiodev(devc->dev);
  780. }
  781. kfree(devc);
  782. }
  783. else
  784. release_region(hw_config->io_base, 16);
  785. if(detected_devc)
  786. kfree(detected_devc);
  787. }
  788. /*
  789.  * Mixer access routines
  790.  *
  791.  * ES1887 modifications: some mixer registers reside in the
  792.  * range above 0xa0. These must be accessed in another way.
  793.  */
  794. void sb_setmixer(sb_devc * devc, unsigned int port, unsigned int value)
  795. {
  796. unsigned long flags;
  797. if (devc->model == MDL_ESS) return ess_setmixer (devc, port, value);
  798. spin_lock_irqsave(&devc->lock, flags);
  799. outb(((unsigned char) (port & 0xff)), MIXER_ADDR);
  800. udelay(20);
  801. outb(((unsigned char) (value & 0xff)), MIXER_DATA);
  802. udelay(20);
  803. spin_unlock_irqrestore(&devc->lock, flags);
  804. }
  805. unsigned int sb_getmixer(sb_devc * devc, unsigned int port)
  806. {
  807. unsigned int val;
  808. unsigned long flags;
  809. if (devc->model == MDL_ESS) return ess_getmixer (devc, port);
  810. spin_lock_irqsave(&devc->lock, flags);
  811. outb(((unsigned char) (port & 0xff)), MIXER_ADDR);
  812. udelay(20);
  813. val = inb(MIXER_DATA);
  814. udelay(20);
  815. spin_unlock_irqrestore(&devc->lock, flags);
  816. return val;
  817. }
  818. void sb_chgmixer
  819. (sb_devc * devc, unsigned int reg, unsigned int mask, unsigned int val)
  820. {
  821. int value;
  822. value = sb_getmixer(devc, reg);
  823. value = (value & ~mask) | (val & mask);
  824. sb_setmixer(devc, reg, value);
  825. }
  826. /*
  827.  * MPU401 MIDI initialization.
  828.  */
  829. static void smw_putmem(sb_devc * devc, int base, int addr, unsigned char val)
  830. {
  831. unsigned long flags;
  832. spin_lock_irqsave(&jazz16_lock, flags);  /* NOT the SB card? */
  833. outb((addr & 0xff), base + 1); /* Low address bits */
  834. outb((addr >> 8), base + 2); /* High address bits */
  835. outb((val), base); /* Data */
  836. spin_unlock_irqrestore(&jazz16_lock, flags);
  837. }
  838. static unsigned char smw_getmem(sb_devc * devc, int base, int addr)
  839. {
  840. unsigned long flags;
  841. unsigned char val;
  842. spin_lock_irqsave(&jazz16_lock, flags);  /* NOT the SB card? */
  843. outb((addr & 0xff), base + 1); /* Low address bits */
  844. outb((addr >> 8), base + 2); /* High address bits */
  845. val = inb(base); /* Data */
  846. spin_unlock_irqrestore(&jazz16_lock, flags);
  847. return val;
  848. }
  849. static int smw_midi_init(sb_devc * devc, struct address_info *hw_config)
  850. {
  851. int mpu_base = hw_config->io_base;
  852. int mp_base = mpu_base + 4; /* Microcontroller base */
  853. int i;
  854. unsigned char control;
  855. /*
  856.  *  Reset the microcontroller so that the RAM can be accessed
  857.  */
  858. control = inb(mpu_base + 7);
  859. outb((control | 3), mpu_base + 7); /* Set last two bits to 1 (?) */
  860. outb(((control & 0xfe) | 2), mpu_base + 7); /* xxxxxxx0 resets the mc */
  861. mdelay(3); /* Wait at least 1ms */
  862. outb((control & 0xfc), mpu_base + 7); /* xxxxxx00 enables RAM */
  863. /*
  864.  *  Detect microcontroller by probing the 8k RAM area
  865.  */
  866. smw_putmem(devc, mp_base, 0, 0x00);
  867. smw_putmem(devc, mp_base, 1, 0xff);
  868. udelay(10);
  869. if (smw_getmem(devc, mp_base, 0) != 0x00 || smw_getmem(devc, mp_base, 1) != 0xff)
  870. {
  871. DDB(printk("SM Wave: No microcontroller RAM detected (%02x, %02x)n", smw_getmem(devc, mp_base, 0), smw_getmem(devc, mp_base, 1)));
  872. return 0; /* No RAM */
  873. }
  874. /*
  875.  *  There is RAM so assume it's really a SM Wave
  876.  */
  877. devc->model = MDL_SMW;
  878. smw_mixer_init(devc);
  879. #ifdef MODULE
  880. if (!smw_ucode)
  881. {
  882. smw_ucodeLen = mod_firmware_load("/etc/sound/midi0001.bin", (void *) &smw_ucode);
  883. smw_free = smw_ucode;
  884. }
  885. #endif
  886. if (smw_ucodeLen > 0)
  887. {
  888. if (smw_ucodeLen != 8192)
  889. {
  890. printk(KERN_ERR "SM Wave: Invalid microcode (MIDI0001.BIN) lengthn");
  891. return 1;
  892. }
  893. /*
  894.  *  Download microcode
  895.  */
  896. for (i = 0; i < 8192; i++)
  897. smw_putmem(devc, mp_base, i, smw_ucode[i]);
  898. /*
  899.  *  Verify microcode
  900.  */
  901. for (i = 0; i < 8192; i++)
  902. if (smw_getmem(devc, mp_base, i) != smw_ucode[i])
  903. {
  904. printk(KERN_ERR "SM Wave: Microcode verification failedn");
  905. return 0;
  906. }
  907. }
  908. control = 0;
  909. #ifdef SMW_SCSI_IRQ
  910. /*
  911.  * Set the SCSI interrupt (IRQ2/9, IRQ3 or IRQ10). The SCSI interrupt
  912.  * is disabled by default.
  913.  *
  914.  * FIXME - make this a module option
  915.  *
  916.  * BTW the Zilog 5380 SCSI controller is located at MPU base + 0x10.
  917.  */
  918. {
  919. static unsigned char scsi_irq_bits[] = {
  920. 0, 0, 3, 1, 0, 0, 0, 0, 0, 3, 2, 0, 0, 0, 0, 0
  921. };
  922. control |= scsi_irq_bits[SMW_SCSI_IRQ] << 6;
  923. }
  924. #endif
  925. #ifdef SMW_OPL4_ENABLE
  926. /*
  927.  *  Make the OPL4 chip visible on the PC bus at 0x380.
  928.  *
  929.  *  There is no need to enable this feature since this driver
  930.  *  doesn't support OPL4 yet. Also there is no RAM in SM Wave so
  931.  *  enabling OPL4 is pretty useless.
  932.  */
  933. control |= 0x10; /* Uses IRQ12 if bit 0x20 == 0 */
  934. /* control |= 0x20;      Uncomment this if you want to use IRQ7 */
  935. #endif
  936. outb((control | 0x03), mpu_base + 7); /* xxxxxx11 restarts */
  937. hw_config->name = "SoundMan Wave";
  938. return 1;
  939. }
  940. static int init_Jazz16_midi(sb_devc * devc, struct address_info *hw_config)
  941. {
  942. int mpu_base = hw_config->io_base;
  943. int sb_base = devc->base;
  944. int irq = hw_config->irq;
  945. unsigned char bits = 0;
  946. unsigned long flags;
  947. if (irq < 0)
  948. irq *= -1;
  949. if (irq < 1 || irq > 15 ||
  950.     jazz_irq_bits[irq] == 0)
  951. {
  952. printk(KERN_ERR "Jazz16: Invalid MIDI interrupt (IRQ%d)n", irq);
  953. return 0;
  954. }
  955. switch (sb_base)
  956. {
  957. case 0x220:
  958. bits = 1;
  959. break;
  960. case 0x240:
  961. bits = 2;
  962. break;
  963. case 0x260:
  964. bits = 3;
  965. break;
  966. default:
  967. return 0;
  968. }
  969. bits = jazz16_bits = bits << 5;
  970. switch (mpu_base)
  971. {
  972. case 0x310:
  973. bits |= 1;
  974. break;
  975. case 0x320:
  976. bits |= 2;
  977. break;
  978. case 0x330:
  979. bits |= 3;
  980. break;
  981. default:
  982. printk(KERN_ERR "Jazz16: Invalid MIDI I/O port %xn", mpu_base);
  983. return 0;
  984. }
  985. /*
  986.  * Magic wake up sequence by writing to 0x201 (aka Joystick port)
  987.  */
  988. spin_lock_irqsave(&jazz16_lock, flags);
  989. outb(0xAF, 0x201);
  990. outb(0x50, 0x201);
  991. outb(bits, 0x201);
  992. spin_unlock_irqrestore(&jazz16_lock, flags);
  993. hw_config->name = "Jazz16";
  994. smw_midi_init(devc, hw_config);
  995. if (!sb_dsp_command(devc, 0xfb))
  996. return 0;
  997. if (!sb_dsp_command(devc, jazz_dma_bits[devc->dma8] |
  998.     (jazz_dma_bits[devc->dma16] << 4)))
  999. return 0;
  1000. if (!sb_dsp_command(devc, jazz_irq_bits[devc->irq] |
  1001.     (jazz_irq_bits[irq] << 4)))
  1002. return 0;
  1003. return 1;
  1004. }
  1005. int probe_sbmpu(struct address_info *hw_config, struct module *owner)
  1006. {
  1007. sb_devc *devc = last_devc;
  1008. int ret;
  1009. if (last_devc == NULL)
  1010. return 0;
  1011. last_devc = 0;
  1012. if (hw_config->io_base <= 0)
  1013. {
  1014. /* The real vibra16 is fine about this, but we have to go
  1015.    wipe up after Cyrix again */
  1016.        
  1017. if(devc->model == MDL_SB16 && devc->minor >= 12)
  1018. {
  1019. unsigned char   bits = sb_getmixer(devc, 0x84) & ~0x06;
  1020. sb_setmixer(devc, 0x84, bits | 0x02); /* Disable MPU */
  1021. }
  1022. return 0;
  1023. }
  1024. #if defined(CONFIG_SOUND_MPU401)
  1025. if (devc->model == MDL_ESS)
  1026. {
  1027. if (check_region(hw_config->io_base, 2))
  1028. {
  1029. printk(KERN_ERR "sbmpu: I/O port conflict (%x)n", hw_config->io_base);
  1030. return 0;
  1031. }
  1032. if (!ess_midi_init(devc, hw_config))
  1033. return 0;
  1034. hw_config->name = "ESS1xxx MPU";
  1035. devc->midi_irq_cookie = NULL;
  1036. if (!probe_mpu401(hw_config))
  1037. return 0;
  1038. attach_mpu401(hw_config, owner);
  1039. if (last_sb->irq == -hw_config->irq)
  1040. last_sb->midi_irq_cookie=(void *)hw_config->slots[1];
  1041. return 1;
  1042. }
  1043. #endif
  1044. switch (devc->model)
  1045. {
  1046. case MDL_SB16:
  1047. if (hw_config->io_base != 0x300 && hw_config->io_base != 0x330)
  1048. {
  1049. printk(KERN_ERR "SB16: Invalid MIDI port %xn", hw_config->io_base);
  1050. return 0;
  1051. }
  1052. hw_config->name = "Sound Blaster 16";
  1053. if (hw_config->irq < 3 || hw_config->irq == devc->irq)
  1054. hw_config->irq = -devc->irq;
  1055. if (devc->minor > 12) /* What is Vibra's version??? */
  1056. sb16_set_mpu_port(devc, hw_config);
  1057. break;
  1058. case MDL_JAZZ:
  1059. if (hw_config->irq < 3 || hw_config->irq == devc->irq)
  1060. hw_config->irq = -devc->irq;
  1061. if (!init_Jazz16_midi(devc, hw_config))
  1062. return 0;
  1063. break;
  1064. case MDL_YMPCI:
  1065. hw_config->name = "Yamaha PCI Legacy";
  1066. printk("Yamaha PCI legacy UART401 check.n");
  1067. break;
  1068. default:
  1069. return 0;
  1070. }
  1071. ret = probe_uart401(hw_config, owner);
  1072. if (ret)
  1073. last_sb->midi_irq_cookie=midi_devs[hw_config->slots[4]]->devc;
  1074. return ret;
  1075. }
  1076. void unload_sbmpu(struct address_info *hw_config)
  1077. {
  1078. #if defined(CONFIG_SOUND_MPU401)
  1079. if (!strcmp (hw_config->name, "ESS1xxx MPU")) {
  1080. unload_mpu401(hw_config);
  1081. return;
  1082. }
  1083. #endif
  1084. unload_uart401(hw_config);
  1085. }
  1086. EXPORT_SYMBOL(sb_dsp_init);
  1087. EXPORT_SYMBOL(sb_dsp_detect);
  1088. EXPORT_SYMBOL(sb_dsp_unload);
  1089. EXPORT_SYMBOL(sb_dsp_disable_midi);
  1090. EXPORT_SYMBOL(sb_be_quiet);
  1091. EXPORT_SYMBOL(probe_sbmpu);
  1092. EXPORT_SYMBOL(unload_sbmpu);
  1093. EXPORT_SYMBOL(smw_free);
  1094. MODULE_LICENSE("GPL");