2 * This code is licenced under
3 * the General Public Licence
6 * Copyright Adrian McMenamin 2005, 2006, 2007
7 * <adrian@mcmen.demon.co.uk>
8 * Requires firmware (BSD licenced) available from:
9 * http://linuxdc.cvs.sourceforge.net/linuxdc/linux-sh-dc/sound/oss/aica/firmware/
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of version 2 of the GNU General Public License as published by
14 * the Free Software Foundation.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
27 #include <linux/init.h>
28 #include <linux/jiffies.h>
29 #include <linux/slab.h>
30 #include <linux/time.h>
31 #include <linux/wait.h>
32 #include <linux/module.h>
33 #include <linux/platform_device.h>
34 #include <linux/firmware.h>
35 #include <linux/timer.h>
36 #include <linux/delay.h>
37 #include <linux/workqueue.h>
39 #include <sound/core.h>
40 #include <sound/control.h>
41 #include <sound/pcm.h>
42 #include <sound/initval.h>
43 #include <sound/info.h>
45 #include <mach/sysasic.h>
48 MODULE_AUTHOR("Adrian McMenamin <adrian@mcmen.demon.co.uk>");
49 MODULE_DESCRIPTION("Dreamcast AICA sound (pcm) driver");
50 MODULE_LICENSE("GPL");
51 MODULE_SUPPORTED_DEVICE("{{Yamaha/SEGA, AICA}}");
52 MODULE_FIRMWARE("aica_firmware.bin");
54 /* module parameters */
55 #define CARD_NAME "AICA"
56 static int index = -1;
58 static bool enable = 1;
59 module_param(index, int, 0444);
60 MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
61 module_param(id, charp, 0444);
62 MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
63 module_param(enable, bool, 0644);
64 MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
67 static struct workqueue_struct *aica_queue;
69 /* Simple platform device */
70 static struct platform_device *pd;
71 static struct resource aica_memory_space[2] = {
73 .name = "AICA ARM CONTROL",
74 .start = ARM_RESET_REGISTER,
75 .flags = IORESOURCE_MEM,
76 .end = ARM_RESET_REGISTER + 3,
79 .name = "AICA Sound RAM",
80 .start = SPU_MEMORY_BASE,
81 .flags = IORESOURCE_MEM,
82 .end = SPU_MEMORY_BASE + 0x200000 - 1,
86 /* SPU specific functions */
87 /* spu_write_wait - wait for G2-SH FIFO to clear */
88 static void spu_write_wait(void)
93 if (!(readl(G2_FIFO) & 0x11))
95 /* To ensure hardware failure doesn't wedge kernel */
97 if (time_count > 0x10000) {
99 ("WARNING: G2 FIFO appears to be blocked.\n");
105 /* spu_memset - write to memory in SPU address space */
106 static void spu_memset(u32 toi, u32 what, int length)
110 if (snd_BUG_ON(length % 4))
112 for (i = 0; i < length; i++) {
115 local_irq_save(flags);
116 writel(what, toi + SPU_MEMORY_BASE);
117 local_irq_restore(flags);
122 /* spu_memload - write to SPU address space */
123 static void spu_memload(u32 toi, void *from, int length)
127 u32 __iomem *to = (u32 __iomem *) (SPU_MEMORY_BASE + toi);
130 length = DIV_ROUND_UP(length, 4);
132 for (i = 0; i < length; i++) {
136 local_irq_save(flags);
138 local_irq_restore(flags);
144 /* spu_disable - set spu registers to stop sound output */
145 static void spu_disable(void)
151 regval = readl(ARM_RESET_REGISTER);
154 local_irq_save(flags);
155 writel(regval, ARM_RESET_REGISTER);
156 local_irq_restore(flags);
157 for (i = 0; i < 64; i++) {
159 regval = readl(SPU_REGISTER_BASE + (i * 0x80));
160 regval = (regval & ~0x4000) | 0x8000;
162 local_irq_save(flags);
163 writel(regval, SPU_REGISTER_BASE + (i * 0x80));
164 local_irq_restore(flags);
168 /* spu_enable - set spu registers to enable sound output */
169 static void spu_enable(void)
172 u32 regval = readl(ARM_RESET_REGISTER);
175 local_irq_save(flags);
176 writel(regval, ARM_RESET_REGISTER);
177 local_irq_restore(flags);
181 * Halt the sound processor, clear the memory,
182 * load some default ARM7 code, and then restart ARM7
184 static void spu_reset(void)
188 spu_memset(0, 0, 0x200000 / 4);
189 /* Put ARM7 in endless loop */
190 local_irq_save(flags);
191 __raw_writel(0xea000002, SPU_MEMORY_BASE);
192 local_irq_restore(flags);
196 /* aica_chn_start - write to spu to start playback */
197 static void aica_chn_start(void)
201 local_irq_save(flags);
202 writel(AICA_CMD_KICK | AICA_CMD_START, (u32 *) AICA_CONTROL_POINT);
203 local_irq_restore(flags);
206 /* aica_chn_halt - write to spu to halt playback */
207 static void aica_chn_halt(void)
211 local_irq_save(flags);
212 writel(AICA_CMD_KICK | AICA_CMD_STOP, (u32 *) AICA_CONTROL_POINT);
213 local_irq_restore(flags);
216 /* ALSA code below */
217 static struct snd_pcm_hardware snd_pcm_aica_playback_hw = {
218 .info = (SNDRV_PCM_INFO_NONINTERLEAVED),
220 (SNDRV_PCM_FMTBIT_S8 | SNDRV_PCM_FMTBIT_S16_LE |
221 SNDRV_PCM_FMTBIT_IMA_ADPCM),
222 .rates = SNDRV_PCM_RATE_8000_48000,
227 .buffer_bytes_max = AICA_BUFFER_SIZE,
228 .period_bytes_min = AICA_PERIOD_SIZE,
229 .period_bytes_max = AICA_PERIOD_SIZE,
230 .periods_min = AICA_PERIOD_NUMBER,
231 .periods_max = AICA_PERIOD_NUMBER,
234 static int aica_dma_transfer(int channels, int buffer_size,
235 struct snd_pcm_substream *substream)
237 int q, err, period_offset;
238 struct snd_card_aica *dreamcastcard;
239 struct snd_pcm_runtime *runtime;
242 dreamcastcard = substream->pcm->private_data;
243 period_offset = dreamcastcard->clicks;
244 period_offset %= (AICA_PERIOD_NUMBER / channels);
245 runtime = substream->runtime;
246 for (q = 0; q < channels; q++) {
247 local_irq_save(flags);
248 err = dma_xfer(AICA_DMA_CHANNEL,
249 (unsigned long) (runtime->dma_area +
250 (AICA_BUFFER_SIZE * q) /
254 AICA_CHANNEL0_OFFSET + q * CHANNEL_OFFSET +
255 AICA_PERIOD_SIZE * period_offset,
256 buffer_size / channels, AICA_DMA_MODE);
257 if (unlikely(err < 0)) {
258 local_irq_restore(flags);
261 dma_wait_for_completion(AICA_DMA_CHANNEL);
262 local_irq_restore(flags);
267 static void startup_aica(struct snd_card_aica *dreamcastcard)
269 spu_memload(AICA_CHANNEL0_CONTROL_OFFSET,
270 dreamcastcard->channel, sizeof(struct aica_channel));
274 static void run_spu_dma(struct work_struct *work)
277 struct snd_pcm_runtime *runtime;
278 struct snd_card_aica *dreamcastcard;
280 container_of(work, struct snd_card_aica, spu_dma_work);
281 runtime = dreamcastcard->substream->runtime;
282 if (unlikely(dreamcastcard->dma_check == 0)) {
284 frames_to_bytes(runtime, runtime->buffer_size);
285 if (runtime->channels > 1)
286 dreamcastcard->channel->flags |= 0x01;
287 aica_dma_transfer(runtime->channels, buffer_size,
288 dreamcastcard->substream);
289 startup_aica(dreamcastcard);
290 dreamcastcard->clicks =
291 buffer_size / (AICA_PERIOD_SIZE * runtime->channels);
294 aica_dma_transfer(runtime->channels,
295 AICA_PERIOD_SIZE * runtime->channels,
296 dreamcastcard->substream);
297 snd_pcm_period_elapsed(dreamcastcard->substream);
298 dreamcastcard->clicks++;
299 if (unlikely(dreamcastcard->clicks >= AICA_PERIOD_NUMBER))
300 dreamcastcard->clicks %= AICA_PERIOD_NUMBER;
301 mod_timer(&dreamcastcard->timer, jiffies + 1);
305 static void aica_period_elapsed(unsigned long timer_var)
307 /*timer function - so cannot sleep */
309 struct snd_pcm_runtime *runtime;
310 struct snd_pcm_substream *substream;
311 struct snd_card_aica *dreamcastcard;
312 substream = (struct snd_pcm_substream *) timer_var;
313 runtime = substream->runtime;
314 dreamcastcard = substream->pcm->private_data;
315 /* Have we played out an additional period? */
317 frames_to_bytes(runtime,
319 (AICA_CONTROL_CHANNEL_SAMPLE_NUMBER)) /
321 if (play_period == dreamcastcard->current_period) {
322 /* reschedule the timer */
323 mod_timer(&(dreamcastcard->timer), jiffies + 1);
326 if (runtime->channels > 1)
327 dreamcastcard->current_period = play_period;
328 if (unlikely(dreamcastcard->dma_check == 0))
329 dreamcastcard->dma_check = 1;
330 queue_work(aica_queue, &(dreamcastcard->spu_dma_work));
333 static void spu_begin_dma(struct snd_pcm_substream *substream)
335 struct snd_card_aica *dreamcastcard;
336 struct snd_pcm_runtime *runtime;
337 runtime = substream->runtime;
338 dreamcastcard = substream->pcm->private_data;
339 /*get the queue to do the work */
340 queue_work(aica_queue, &(dreamcastcard->spu_dma_work));
341 /* Timer may already be running */
342 if (unlikely(dreamcastcard->timer.data)) {
343 mod_timer(&dreamcastcard->timer, jiffies + 4);
346 setup_timer(&dreamcastcard->timer, aica_period_elapsed,
347 (unsigned long) substream);
348 mod_timer(&dreamcastcard->timer, jiffies + 4);
351 static int snd_aicapcm_pcm_open(struct snd_pcm_substream
354 struct snd_pcm_runtime *runtime;
355 struct aica_channel *channel;
356 struct snd_card_aica *dreamcastcard;
359 dreamcastcard = substream->pcm->private_data;
360 channel = kmalloc(sizeof(struct aica_channel), GFP_KERNEL);
363 /* set defaults for channel */
364 channel->sfmt = SM_8BIT;
365 channel->cmd = AICA_CMD_START;
366 channel->vol = dreamcastcard->master_volume;
369 channel->flags = 0; /* default to mono */
370 dreamcastcard->channel = channel;
371 runtime = substream->runtime;
372 runtime->hw = snd_pcm_aica_playback_hw;
374 dreamcastcard->clicks = 0;
375 dreamcastcard->current_period = 0;
376 dreamcastcard->dma_check = 0;
380 static int snd_aicapcm_pcm_close(struct snd_pcm_substream
383 struct snd_card_aica *dreamcastcard = substream->pcm->private_data;
384 flush_workqueue(aica_queue);
385 if (dreamcastcard->timer.data)
386 del_timer(&dreamcastcard->timer);
387 kfree(dreamcastcard->channel);
392 static int snd_aicapcm_pcm_hw_free(struct snd_pcm_substream
395 /* Free the DMA buffer */
396 return snd_pcm_lib_free_pages(substream);
399 static int snd_aicapcm_pcm_hw_params(struct snd_pcm_substream
400 *substream, struct snd_pcm_hw_params
403 /* Allocate a DMA buffer using ALSA built-ins */
405 snd_pcm_lib_malloc_pages(substream,
406 params_buffer_bytes(hw_params));
409 static int snd_aicapcm_pcm_prepare(struct snd_pcm_substream
412 struct snd_card_aica *dreamcastcard = substream->pcm->private_data;
413 if ((substream->runtime)->format == SNDRV_PCM_FORMAT_S16_LE)
414 dreamcastcard->channel->sfmt = SM_16BIT;
415 dreamcastcard->channel->freq = substream->runtime->rate;
416 dreamcastcard->substream = substream;
420 static int snd_aicapcm_pcm_trigger(struct snd_pcm_substream
424 case SNDRV_PCM_TRIGGER_START:
425 spu_begin_dma(substream);
427 case SNDRV_PCM_TRIGGER_STOP:
436 static unsigned long snd_aicapcm_pcm_pointer(struct snd_pcm_substream
439 return readl(AICA_CONTROL_CHANNEL_SAMPLE_NUMBER);
442 static struct snd_pcm_ops snd_aicapcm_playback_ops = {
443 .open = snd_aicapcm_pcm_open,
444 .close = snd_aicapcm_pcm_close,
445 .ioctl = snd_pcm_lib_ioctl,
446 .hw_params = snd_aicapcm_pcm_hw_params,
447 .hw_free = snd_aicapcm_pcm_hw_free,
448 .prepare = snd_aicapcm_pcm_prepare,
449 .trigger = snd_aicapcm_pcm_trigger,
450 .pointer = snd_aicapcm_pcm_pointer,
453 /* TO DO: set up to handle more than one pcm instance */
454 static int __init snd_aicapcmchip(struct snd_card_aica
455 *dreamcastcard, int pcm_index)
459 /* AICA has no capture ability */
461 snd_pcm_new(dreamcastcard->card, "AICA PCM", pcm_index, 1, 0,
463 if (unlikely(err < 0))
465 pcm->private_data = dreamcastcard;
466 strcpy(pcm->name, "AICA PCM");
467 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
468 &snd_aicapcm_playback_ops);
469 /* Allocate the DMA buffers */
471 snd_pcm_lib_preallocate_pages_for_all(pcm,
472 SNDRV_DMA_TYPE_CONTINUOUS,
473 snd_dma_continuous_data
481 #define aica_pcmswitch_info snd_ctl_boolean_mono_info
483 static int aica_pcmswitch_get(struct snd_kcontrol *kcontrol,
484 struct snd_ctl_elem_value *ucontrol)
486 ucontrol->value.integer.value[0] = 1; /* TO DO: Fix me */
490 static int aica_pcmswitch_put(struct snd_kcontrol *kcontrol,
491 struct snd_ctl_elem_value *ucontrol)
493 if (ucontrol->value.integer.value[0] == 1)
494 return 0; /* TO DO: Fix me */
500 static int aica_pcmvolume_info(struct snd_kcontrol *kcontrol,
501 struct snd_ctl_elem_info *uinfo)
503 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
505 uinfo->value.integer.min = 0;
506 uinfo->value.integer.max = 0xFF;
510 static int aica_pcmvolume_get(struct snd_kcontrol *kcontrol,
511 struct snd_ctl_elem_value *ucontrol)
513 struct snd_card_aica *dreamcastcard;
514 dreamcastcard = kcontrol->private_data;
515 if (unlikely(!dreamcastcard->channel))
516 return -ETXTBSY; /* we've not yet been set up */
517 ucontrol->value.integer.value[0] = dreamcastcard->channel->vol;
521 static int aica_pcmvolume_put(struct snd_kcontrol *kcontrol,
522 struct snd_ctl_elem_value *ucontrol)
524 struct snd_card_aica *dreamcastcard;
526 dreamcastcard = kcontrol->private_data;
527 if (unlikely(!dreamcastcard->channel))
529 vol = ucontrol->value.integer.value[0];
532 if (unlikely(dreamcastcard->channel->vol == vol))
534 dreamcastcard->channel->vol = ucontrol->value.integer.value[0];
535 dreamcastcard->master_volume = ucontrol->value.integer.value[0];
536 spu_memload(AICA_CHANNEL0_CONTROL_OFFSET,
537 dreamcastcard->channel, sizeof(struct aica_channel));
541 static struct snd_kcontrol_new snd_aica_pcmswitch_control = {
542 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
543 .name = "PCM Playback Switch",
545 .info = aica_pcmswitch_info,
546 .get = aica_pcmswitch_get,
547 .put = aica_pcmswitch_put
550 static struct snd_kcontrol_new snd_aica_pcmvolume_control = {
551 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
552 .name = "PCM Playback Volume",
554 .info = aica_pcmvolume_info,
555 .get = aica_pcmvolume_get,
556 .put = aica_pcmvolume_put
559 static int load_aica_firmware(void)
562 const struct firmware *fw_entry;
564 err = request_firmware(&fw_entry, "aica_firmware.bin", &pd->dev);
567 /* write firmware into memory */
569 spu_memload(0, fw_entry->data, fw_entry->size);
571 release_firmware(fw_entry);
575 static int add_aicamixer_controls(struct snd_card_aica *dreamcastcard)
579 (dreamcastcard->card,
580 snd_ctl_new1(&snd_aica_pcmvolume_control, dreamcastcard));
581 if (unlikely(err < 0))
584 (dreamcastcard->card,
585 snd_ctl_new1(&snd_aica_pcmswitch_control, dreamcastcard));
586 if (unlikely(err < 0))
591 static int snd_aica_remove(struct platform_device *devptr)
593 struct snd_card_aica *dreamcastcard;
594 dreamcastcard = platform_get_drvdata(devptr);
595 if (unlikely(!dreamcastcard))
597 snd_card_free(dreamcastcard->card);
598 kfree(dreamcastcard);
602 static int snd_aica_probe(struct platform_device *devptr)
605 struct snd_card_aica *dreamcastcard;
606 dreamcastcard = kmalloc(sizeof(struct snd_card_aica), GFP_KERNEL);
607 if (unlikely(!dreamcastcard))
609 err = snd_card_new(&devptr->dev, index, SND_AICA_DRIVER,
610 THIS_MODULE, 0, &dreamcastcard->card);
611 if (unlikely(err < 0)) {
612 kfree(dreamcastcard);
615 strcpy(dreamcastcard->card->driver, "snd_aica");
616 strcpy(dreamcastcard->card->shortname, SND_AICA_DRIVER);
617 strcpy(dreamcastcard->card->longname,
618 "Yamaha AICA Super Intelligent Sound Processor for SEGA Dreamcast");
619 /* Prepare to use the queue */
620 INIT_WORK(&(dreamcastcard->spu_dma_work), run_spu_dma);
621 /* Load the PCM 'chip' */
622 err = snd_aicapcmchip(dreamcastcard, 0);
623 if (unlikely(err < 0))
625 dreamcastcard->timer.data = 0;
626 dreamcastcard->channel = NULL;
627 /* Add basic controls */
628 err = add_aicamixer_controls(dreamcastcard);
629 if (unlikely(err < 0))
631 /* Register the card with ALSA subsystem */
632 err = snd_card_register(dreamcastcard->card);
633 if (unlikely(err < 0))
635 platform_set_drvdata(devptr, dreamcastcard);
636 aica_queue = create_workqueue(CARD_NAME);
637 if (unlikely(!aica_queue))
640 ("ALSA Driver for Yamaha AICA Super Intelligent Sound Processor\n");
643 snd_card_free(dreamcastcard->card);
644 kfree(dreamcastcard);
648 static struct platform_driver snd_aica_driver = {
649 .probe = snd_aica_probe,
650 .remove = snd_aica_remove,
652 .name = SND_AICA_DRIVER,
656 static int __init aica_init(void)
659 err = platform_driver_register(&snd_aica_driver);
660 if (unlikely(err < 0))
662 pd = platform_device_register_simple(SND_AICA_DRIVER, -1,
663 aica_memory_space, 2);
665 platform_driver_unregister(&snd_aica_driver);
668 /* Load the firmware */
669 return load_aica_firmware();
672 static void __exit aica_exit(void)
674 /* Destroy the aica kernel thread *
675 * being extra cautious to check if it exists*/
676 if (likely(aica_queue))
677 destroy_workqueue(aica_queue);
678 platform_device_unregister(pd);
679 platform_driver_unregister(&snd_aica_driver);
680 /* Kill any sound still playing and reset ARM7 to safe state */
684 module_init(aica_init);
685 module_exit(aica_exit);