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/moduleparam.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>
38 #include <sound/core.h>
39 #include <sound/control.h>
40 #include <sound/pcm.h>
41 #include <sound/initval.h>
42 #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 int 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 init_timer(&(dreamcastcard
->timer
));
347 dreamcastcard
->timer
.data
= (unsigned long) substream
;
348 dreamcastcard
->timer
.function
= aica_period_elapsed
;
349 dreamcastcard
->timer
.expires
= jiffies
+ 4;
350 add_timer(&(dreamcastcard
->timer
));
353 static int snd_aicapcm_pcm_open(struct snd_pcm_substream
356 struct snd_pcm_runtime
*runtime
;
357 struct aica_channel
*channel
;
358 struct snd_card_aica
*dreamcastcard
;
361 dreamcastcard
= substream
->pcm
->private_data
;
362 channel
= kmalloc(sizeof(struct aica_channel
), GFP_KERNEL
);
365 /* set defaults for channel */
366 channel
->sfmt
= SM_8BIT
;
367 channel
->cmd
= AICA_CMD_START
;
368 channel
->vol
= dreamcastcard
->master_volume
;
371 channel
->flags
= 0; /* default to mono */
372 dreamcastcard
->channel
= channel
;
373 runtime
= substream
->runtime
;
374 runtime
->hw
= snd_pcm_aica_playback_hw
;
376 dreamcastcard
->clicks
= 0;
377 dreamcastcard
->current_period
= 0;
378 dreamcastcard
->dma_check
= 0;
382 static int snd_aicapcm_pcm_close(struct snd_pcm_substream
385 struct snd_card_aica
*dreamcastcard
= substream
->pcm
->private_data
;
386 flush_workqueue(aica_queue
);
387 if (dreamcastcard
->timer
.data
)
388 del_timer(&dreamcastcard
->timer
);
389 kfree(dreamcastcard
->channel
);
394 static int snd_aicapcm_pcm_hw_free(struct snd_pcm_substream
397 /* Free the DMA buffer */
398 return snd_pcm_lib_free_pages(substream
);
401 static int snd_aicapcm_pcm_hw_params(struct snd_pcm_substream
402 *substream
, struct snd_pcm_hw_params
405 /* Allocate a DMA buffer using ALSA built-ins */
407 snd_pcm_lib_malloc_pages(substream
,
408 params_buffer_bytes(hw_params
));
411 static int snd_aicapcm_pcm_prepare(struct snd_pcm_substream
414 struct snd_card_aica
*dreamcastcard
= substream
->pcm
->private_data
;
415 if ((substream
->runtime
)->format
== SNDRV_PCM_FORMAT_S16_LE
)
416 dreamcastcard
->channel
->sfmt
= SM_16BIT
;
417 dreamcastcard
->channel
->freq
= substream
->runtime
->rate
;
418 dreamcastcard
->substream
= substream
;
422 static int snd_aicapcm_pcm_trigger(struct snd_pcm_substream
426 case SNDRV_PCM_TRIGGER_START
:
427 spu_begin_dma(substream
);
429 case SNDRV_PCM_TRIGGER_STOP
:
438 static unsigned long snd_aicapcm_pcm_pointer(struct snd_pcm_substream
441 return readl(AICA_CONTROL_CHANNEL_SAMPLE_NUMBER
);
444 static struct snd_pcm_ops snd_aicapcm_playback_ops
= {
445 .open
= snd_aicapcm_pcm_open
,
446 .close
= snd_aicapcm_pcm_close
,
447 .ioctl
= snd_pcm_lib_ioctl
,
448 .hw_params
= snd_aicapcm_pcm_hw_params
,
449 .hw_free
= snd_aicapcm_pcm_hw_free
,
450 .prepare
= snd_aicapcm_pcm_prepare
,
451 .trigger
= snd_aicapcm_pcm_trigger
,
452 .pointer
= snd_aicapcm_pcm_pointer
,
455 /* TO DO: set up to handle more than one pcm instance */
456 static int __init
snd_aicapcmchip(struct snd_card_aica
457 *dreamcastcard
, int pcm_index
)
461 /* AICA has no capture ability */
463 snd_pcm_new(dreamcastcard
->card
, "AICA PCM", pcm_index
, 1, 0,
465 if (unlikely(err
< 0))
467 pcm
->private_data
= dreamcastcard
;
468 strcpy(pcm
->name
, "AICA PCM");
469 snd_pcm_set_ops(pcm
, SNDRV_PCM_STREAM_PLAYBACK
,
470 &snd_aicapcm_playback_ops
);
471 /* Allocate the DMA buffers */
473 snd_pcm_lib_preallocate_pages_for_all(pcm
,
474 SNDRV_DMA_TYPE_CONTINUOUS
,
475 snd_dma_continuous_data
483 #define aica_pcmswitch_info snd_ctl_boolean_mono_info
485 static int aica_pcmswitch_get(struct snd_kcontrol
*kcontrol
,
486 struct snd_ctl_elem_value
*ucontrol
)
488 ucontrol
->value
.integer
.value
[0] = 1; /* TO DO: Fix me */
492 static int aica_pcmswitch_put(struct snd_kcontrol
*kcontrol
,
493 struct snd_ctl_elem_value
*ucontrol
)
495 if (ucontrol
->value
.integer
.value
[0] == 1)
496 return 0; /* TO DO: Fix me */
502 static int aica_pcmvolume_info(struct snd_kcontrol
*kcontrol
,
503 struct snd_ctl_elem_info
*uinfo
)
505 uinfo
->type
= SNDRV_CTL_ELEM_TYPE_INTEGER
;
507 uinfo
->value
.integer
.min
= 0;
508 uinfo
->value
.integer
.max
= 0xFF;
512 static int aica_pcmvolume_get(struct snd_kcontrol
*kcontrol
,
513 struct snd_ctl_elem_value
*ucontrol
)
515 struct snd_card_aica
*dreamcastcard
;
516 dreamcastcard
= kcontrol
->private_data
;
517 if (unlikely(!dreamcastcard
->channel
))
518 return -ETXTBSY
; /* we've not yet been set up */
519 ucontrol
->value
.integer
.value
[0] = dreamcastcard
->channel
->vol
;
523 static int aica_pcmvolume_put(struct snd_kcontrol
*kcontrol
,
524 struct snd_ctl_elem_value
*ucontrol
)
526 struct snd_card_aica
*dreamcastcard
;
528 dreamcastcard
= kcontrol
->private_data
;
529 if (unlikely(!dreamcastcard
->channel
))
531 vol
= ucontrol
->value
.integer
.value
[0];
534 if (unlikely(dreamcastcard
->channel
->vol
== vol
))
536 dreamcastcard
->channel
->vol
= ucontrol
->value
.integer
.value
[0];
537 dreamcastcard
->master_volume
= ucontrol
->value
.integer
.value
[0];
538 spu_memload(AICA_CHANNEL0_CONTROL_OFFSET
,
539 dreamcastcard
->channel
, sizeof(struct aica_channel
));
543 static struct snd_kcontrol_new snd_aica_pcmswitch_control __devinitdata
= {
544 .iface
= SNDRV_CTL_ELEM_IFACE_MIXER
,
545 .name
= "PCM Playback Switch",
547 .info
= aica_pcmswitch_info
,
548 .get
= aica_pcmswitch_get
,
549 .put
= aica_pcmswitch_put
552 static struct snd_kcontrol_new snd_aica_pcmvolume_control __devinitdata
= {
553 .iface
= SNDRV_CTL_ELEM_IFACE_MIXER
,
554 .name
= "PCM Playback Volume",
556 .info
= aica_pcmvolume_info
,
557 .get
= aica_pcmvolume_get
,
558 .put
= aica_pcmvolume_put
561 static int load_aica_firmware(void)
564 const struct firmware
*fw_entry
;
566 err
= request_firmware(&fw_entry
, "aica_firmware.bin", &pd
->dev
);
569 /* write firmware into memory */
571 spu_memload(0, fw_entry
->data
, fw_entry
->size
);
573 release_firmware(fw_entry
);
577 static int __devinit
add_aicamixer_controls(struct snd_card_aica
582 (dreamcastcard
->card
,
583 snd_ctl_new1(&snd_aica_pcmvolume_control
, dreamcastcard
));
584 if (unlikely(err
< 0))
587 (dreamcastcard
->card
,
588 snd_ctl_new1(&snd_aica_pcmswitch_control
, dreamcastcard
));
589 if (unlikely(err
< 0))
594 static int __devexit
snd_aica_remove(struct platform_device
*devptr
)
596 struct snd_card_aica
*dreamcastcard
;
597 dreamcastcard
= platform_get_drvdata(devptr
);
598 if (unlikely(!dreamcastcard
))
600 snd_card_free(dreamcastcard
->card
);
601 kfree(dreamcastcard
);
602 platform_set_drvdata(devptr
, NULL
);
606 static int __devinit
snd_aica_probe(struct platform_device
*devptr
)
609 struct snd_card_aica
*dreamcastcard
;
610 dreamcastcard
= kmalloc(sizeof(struct snd_card_aica
), GFP_KERNEL
);
611 if (unlikely(!dreamcastcard
))
613 err
= snd_card_create(index
, SND_AICA_DRIVER
, THIS_MODULE
, 0,
614 &dreamcastcard
->card
);
615 if (unlikely(err
< 0)) {
616 kfree(dreamcastcard
);
619 strcpy(dreamcastcard
->card
->driver
, "snd_aica");
620 strcpy(dreamcastcard
->card
->shortname
, SND_AICA_DRIVER
);
621 strcpy(dreamcastcard
->card
->longname
,
622 "Yamaha AICA Super Intelligent Sound Processor for SEGA Dreamcast");
623 /* Prepare to use the queue */
624 INIT_WORK(&(dreamcastcard
->spu_dma_work
), run_spu_dma
);
625 /* Load the PCM 'chip' */
626 err
= snd_aicapcmchip(dreamcastcard
, 0);
627 if (unlikely(err
< 0))
629 snd_card_set_dev(dreamcastcard
->card
, &devptr
->dev
);
630 dreamcastcard
->timer
.data
= 0;
631 dreamcastcard
->channel
= NULL
;
632 /* Add basic controls */
633 err
= add_aicamixer_controls(dreamcastcard
);
634 if (unlikely(err
< 0))
636 /* Register the card with ALSA subsystem */
637 err
= snd_card_register(dreamcastcard
->card
);
638 if (unlikely(err
< 0))
640 platform_set_drvdata(devptr
, dreamcastcard
);
641 aica_queue
= create_workqueue(CARD_NAME
);
642 if (unlikely(!aica_queue
))
645 ("ALSA Driver for Yamaha AICA Super Intelligent Sound Processor\n");
648 snd_card_free(dreamcastcard
->card
);
649 kfree(dreamcastcard
);
653 static struct platform_driver snd_aica_driver
= {
654 .probe
= snd_aica_probe
,
655 .remove
= __devexit_p(snd_aica_remove
),
657 .name
= SND_AICA_DRIVER
},
660 static int __init
aica_init(void)
663 err
= platform_driver_register(&snd_aica_driver
);
664 if (unlikely(err
< 0))
666 pd
= platform_device_register_simple(SND_AICA_DRIVER
, -1,
667 aica_memory_space
, 2);
669 platform_driver_unregister(&snd_aica_driver
);
672 /* Load the firmware */
673 return load_aica_firmware();
676 static void __exit
aica_exit(void)
678 /* Destroy the aica kernel thread *
679 * being extra cautious to check if it exists*/
680 if (likely(aica_queue
))
681 destroy_workqueue(aica_queue
);
682 platform_device_unregister(pd
);
683 platform_driver_unregister(&snd_aica_driver
);
684 /* Kill any sound still playing and reset ARM7 to safe state */
688 module_init(aica_init
);
689 module_exit(aica_exit
);