[ALSA] Remove xxx_t typedefs: USB-USX2Y
[linux-2.6.git] / sound / parisc / harmony.c
1 /* Hewlett-Packard Harmony audio driver
2  *
3  *   This is a driver for the Harmony audio chipset found
4  *   on the LASI ASIC of various early HP PA-RISC workstations.
5  *
6  *   Copyright (C) 2004, Kyle McMartin <kyle@{debian.org,parisc-linux.org}>
7  *
8  *     Based on the previous Harmony incarnations by,
9  *       Copyright 2000 (c) Linuxcare Canada, Alex deVries
10  *       Copyright 2000-2003 (c) Helge Deller
11  *       Copyright 2001 (c) Matthieu Delahaye
12  *       Copyright 2001 (c) Jean-Christophe Vaugeois
13  *       Copyright 2003 (c) Laurent Canet
14  *       Copyright 2004 (c) Stuart Brady
15  *
16  *   This program is free software; you can redistribute it and/or modify
17  *   it under the terms of the GNU General Public License, version 2, as
18  *   published by the Free Software Foundation.
19  *
20  *   This program is distributed in the hope that it will be useful,
21  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
22  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
23  *   GNU General Public License for more details.
24  *
25  *   You should have received a copy of the GNU General Public License
26  *   along with this program; if not, write to the Free Software
27  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
28  *
29  * Notes:
30  *   - graveyard and silence buffers last for lifetime of
31  *     the driver. playback and capture buffers are allocated
32  *     per _open()/_close().
33  * 
34  * TODO:
35  *
36  */
37
38 #include <linux/init.h>
39 #include <linux/slab.h>
40 #include <linux/time.h>
41 #include <linux/wait.h>
42 #include <linux/delay.h>
43 #include <linux/module.h>
44 #include <linux/interrupt.h>
45 #include <linux/spinlock.h>
46 #include <linux/dma-mapping.h>
47
48 #include <sound/driver.h>
49 #include <sound/core.h>
50 #include <sound/pcm.h>
51 #include <sound/control.h>
52 #include <sound/rawmidi.h>
53 #include <sound/initval.h>
54 #include <sound/info.h>
55
56 #include <asm/io.h>
57 #include <asm/hardware.h>
58 #include <asm/parisc-device.h>
59
60 #include "harmony.h"
61
62 static int index = SNDRV_DEFAULT_IDX1;  /* Index 0-MAX */
63 static char *id = SNDRV_DEFAULT_STR1;   /* ID for this card */
64 module_param(index, int, 0444);
65 MODULE_PARM_DESC(index, "Index value for Harmony driver.");
66 module_param(id, charp, 0444);
67 MODULE_PARM_DESC(id, "ID string for Harmony driver.");
68
69
70 static struct parisc_device_id snd_harmony_devtable[] = {
71         /* bushmaster / flounder */
72         { HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007A }, 
73         /* 712 / 715 */
74         { HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007B }, 
75         /* pace */
76         { HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007E }, 
77         /* outfield / coral II */
78         { HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007F },
79         { 0, }
80 };
81
82 MODULE_DEVICE_TABLE(parisc, snd_harmony_devtable);
83
84 #define NAME "harmony"
85 #define PFX  NAME ": "
86
87 static unsigned int snd_harmony_rates[] = {
88         5512, 6615, 8000, 9600,
89         11025, 16000, 18900, 22050,
90         27428, 32000, 33075, 37800,
91         44100, 48000
92 };
93
94 static unsigned int rate_bits[14] = {
95         HARMONY_SR_5KHZ, HARMONY_SR_6KHZ, HARMONY_SR_8KHZ,
96         HARMONY_SR_9KHZ, HARMONY_SR_11KHZ, HARMONY_SR_16KHZ,
97         HARMONY_SR_18KHZ, HARMONY_SR_22KHZ, HARMONY_SR_27KHZ,
98         HARMONY_SR_32KHZ, HARMONY_SR_33KHZ, HARMONY_SR_37KHZ,
99         HARMONY_SR_44KHZ, HARMONY_SR_48KHZ
100 };
101
102 static snd_pcm_hw_constraint_list_t hw_constraint_rates = {
103         .count = ARRAY_SIZE(snd_harmony_rates),
104         .list = snd_harmony_rates,
105         .mask = 0,
106 };
107
108 inline unsigned long
109 harmony_read(harmony_t *h, unsigned r)
110 {
111         return __raw_readl(h->iobase + r);
112 }
113
114 inline void
115 harmony_write(harmony_t *h, unsigned r, unsigned long v)
116 {
117         __raw_writel(v, h->iobase + r);
118 }
119
120 static void
121 harmony_wait_for_control(harmony_t *h)
122 {
123         while (harmony_read(h, HARMONY_CNTL) & HARMONY_CNTL_C) ;
124 }
125
126 inline void
127 harmony_reset(harmony_t *h)
128 {
129         harmony_write(h, HARMONY_RESET, 1);
130         mdelay(50);
131         harmony_write(h, HARMONY_RESET, 0);
132 }
133
134 static void
135 harmony_disable_interrupts(harmony_t *h)
136 {
137         u32 dstatus;
138         harmony_wait_for_control(h);
139         dstatus = harmony_read(h, HARMONY_DSTATUS);
140         dstatus &= ~HARMONY_DSTATUS_IE;
141         harmony_write(h, HARMONY_DSTATUS, dstatus);
142 }
143
144 static void
145 harmony_enable_interrupts(harmony_t *h)
146 {
147         u32 dstatus;
148         harmony_wait_for_control(h);
149         dstatus = harmony_read(h, HARMONY_DSTATUS);
150         dstatus |= HARMONY_DSTATUS_IE;
151         harmony_write(h, HARMONY_DSTATUS, dstatus);
152 }
153
154 static void
155 harmony_mute(harmony_t *h)
156 {
157         unsigned long flags;
158
159         spin_lock_irqsave(&h->mixer_lock, flags);
160         harmony_wait_for_control(h);
161         harmony_write(h, HARMONY_GAINCTL, HARMONY_GAIN_SILENCE);
162         spin_unlock_irqrestore(&h->mixer_lock, flags);
163 }
164
165 static void
166 harmony_unmute(harmony_t *h)
167 {
168         unsigned long flags;
169
170         spin_lock_irqsave(&h->mixer_lock, flags);
171         harmony_wait_for_control(h);
172         harmony_write(h, HARMONY_GAINCTL, h->st.gain);
173         spin_unlock_irqrestore(&h->mixer_lock, flags);
174 }
175
176 static void
177 harmony_set_control(harmony_t *h)
178 {
179         u32 ctrl;
180         unsigned long flags;
181
182         spin_lock_irqsave(&h->lock, flags);
183
184         ctrl = (HARMONY_CNTL_C      |
185                 (h->st.format << 6) |
186                 (h->st.stereo << 5) |
187                 (h->st.rate));
188
189         harmony_wait_for_control(h);
190         harmony_write(h, HARMONY_CNTL, ctrl);
191
192         spin_unlock_irqrestore(&h->lock, flags);
193 }
194
195 static irqreturn_t
196 snd_harmony_interrupt(int irq, void *dev, struct pt_regs *regs)
197 {
198         u32 dstatus;
199         harmony_t *h = dev;
200
201         spin_lock(&h->lock);
202         harmony_disable_interrupts(h);
203         harmony_wait_for_control(h);
204         dstatus = harmony_read(h, HARMONY_DSTATUS);
205         spin_unlock(&h->lock);
206
207         if (dstatus & HARMONY_DSTATUS_PN) {
208                 if (h->psubs && h->st.playing) {
209                         spin_lock(&h->lock);
210                         h->pbuf.buf += h->pbuf.count; /* PAGE_SIZE */
211                         h->pbuf.buf %= h->pbuf.size; /* MAX_BUFS*PAGE_SIZE */
212
213                         harmony_write(h, HARMONY_PNXTADD, 
214                                       h->pbuf.addr + h->pbuf.buf);
215                         h->stats.play_intr++;
216                         spin_unlock(&h->lock);
217                         snd_pcm_period_elapsed(h->psubs);
218                 } else {
219                         spin_lock(&h->lock);
220                         harmony_write(h, HARMONY_PNXTADD, h->sdma.addr);
221                         h->stats.silence_intr++;
222                         spin_unlock(&h->lock);
223                 }
224         }
225
226         if (dstatus & HARMONY_DSTATUS_RN) {
227                 if (h->csubs && h->st.capturing) {
228                         spin_lock(&h->lock);
229                         h->cbuf.buf += h->cbuf.count;
230                         h->cbuf.buf %= h->cbuf.size;
231
232                         harmony_write(h, HARMONY_RNXTADD,
233                                       h->cbuf.addr + h->cbuf.buf);
234                         h->stats.rec_intr++;
235                         spin_unlock(&h->lock);
236                         snd_pcm_period_elapsed(h->csubs);
237                 } else {
238                         spin_lock(&h->lock);
239                         harmony_write(h, HARMONY_RNXTADD, h->gdma.addr);
240                         h->stats.graveyard_intr++;
241                         spin_unlock(&h->lock);
242                 }
243         }
244
245         spin_lock(&h->lock);
246         harmony_enable_interrupts(h);
247         spin_unlock(&h->lock);
248
249         return IRQ_HANDLED;
250 }
251
252 static unsigned int 
253 snd_harmony_rate_bits(int rate)
254 {
255         unsigned int i;
256         
257         for (i = 0; i < ARRAY_SIZE(snd_harmony_rates); i++)
258                 if (snd_harmony_rates[i] == rate)
259                         return rate_bits[i];
260
261         return HARMONY_SR_44KHZ;
262 }
263
264 static snd_pcm_hardware_t snd_harmony_playback =
265 {
266         .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED | 
267                  SNDRV_PCM_INFO_JOINT_DUPLEX | SNDRV_PCM_INFO_MMAP_VALID |
268                  SNDRV_PCM_INFO_BLOCK_TRANSFER),
269         .formats = (SNDRV_PCM_FMTBIT_S16_BE | SNDRV_PCM_FMTBIT_MU_LAW |
270                     SNDRV_PCM_FMTBIT_A_LAW),
271         .rates = (SNDRV_PCM_RATE_5512 | SNDRV_PCM_RATE_8000_48000 |
272                   SNDRV_PCM_RATE_KNOT),
273         .rate_min = 5512,
274         .rate_max = 48000,
275         .channels_min = 1,
276         .channels_max = 2,
277         .buffer_bytes_max = MAX_BUF_SIZE,
278         .period_bytes_min = BUF_SIZE,
279         .period_bytes_max = BUF_SIZE,
280         .periods_min = 1,
281         .periods_max = MAX_BUFS,
282         .fifo_size = 0,
283 };
284
285 static snd_pcm_hardware_t snd_harmony_capture =
286 {
287         .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
288                  SNDRV_PCM_INFO_JOINT_DUPLEX | SNDRV_PCM_INFO_MMAP_VALID |
289                  SNDRV_PCM_INFO_BLOCK_TRANSFER),
290         .formats = (SNDRV_PCM_FMTBIT_S16_BE | SNDRV_PCM_FMTBIT_MU_LAW |
291                     SNDRV_PCM_FMTBIT_A_LAW),
292         .rates = (SNDRV_PCM_RATE_5512 | SNDRV_PCM_RATE_8000_48000 |
293                   SNDRV_PCM_RATE_KNOT),
294         .rate_min = 5512,
295         .rate_max = 48000,
296         .channels_min = 1,
297         .channels_max = 2,
298         .buffer_bytes_max = MAX_BUF_SIZE,
299         .period_bytes_min = BUF_SIZE,
300         .period_bytes_max = BUF_SIZE,
301         .periods_min = 1,
302         .periods_max = MAX_BUFS,
303         .fifo_size = 0,
304 };
305
306 static int
307 snd_harmony_playback_trigger(snd_pcm_substream_t *ss, int cmd)
308 {
309         harmony_t *h = snd_pcm_substream_chip(ss);
310
311         if (h->st.capturing)
312                 return -EBUSY;
313
314         spin_lock(&h->lock);
315         switch (cmd) {
316         case SNDRV_PCM_TRIGGER_START:
317                 h->st.playing = 1;
318                 harmony_write(h, HARMONY_PNXTADD, h->pbuf.addr);
319                 harmony_write(h, HARMONY_RNXTADD, h->gdma.addr);
320                 harmony_unmute(h);
321                 harmony_enable_interrupts(h);
322                 break;
323         case SNDRV_PCM_TRIGGER_STOP:
324                 h->st.playing = 0;
325                 harmony_mute(h);
326                 harmony_write(h, HARMONY_PNXTADD, h->sdma.addr);
327                 harmony_disable_interrupts(h);
328                 break;
329         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
330         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
331         case SNDRV_PCM_TRIGGER_SUSPEND:
332         default:
333                 spin_unlock(&h->lock);
334                 snd_BUG();
335                 return -EINVAL;
336         }
337         spin_unlock(&h->lock);
338         
339         return 0;
340 }
341
342 static int
343 snd_harmony_capture_trigger(snd_pcm_substream_t *ss, int cmd)
344 {
345         harmony_t *h = snd_pcm_substream_chip(ss);
346
347         if (h->st.playing)
348                 return -EBUSY;
349
350         spin_lock(&h->lock);
351         switch (cmd) {
352         case SNDRV_PCM_TRIGGER_START:
353                 h->st.capturing = 1;
354                 harmony_write(h, HARMONY_PNXTADD, h->sdma.addr);
355                 harmony_write(h, HARMONY_RNXTADD, h->cbuf.addr);
356                 harmony_unmute(h);
357                 harmony_enable_interrupts(h);
358                 break;
359         case SNDRV_PCM_TRIGGER_STOP:
360                 h->st.capturing = 0;
361                 harmony_mute(h);
362                 harmony_write(h, HARMONY_RNXTADD, h->gdma.addr);
363                 harmony_disable_interrupts(h);
364                 break;
365         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
366         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
367         case SNDRV_PCM_TRIGGER_SUSPEND:
368         default:
369                 spin_unlock(&h->lock);
370                 snd_BUG();
371                 return -EINVAL;
372         }
373         spin_unlock(&h->lock);
374                 
375         return 0;
376 }
377
378 static int
379 snd_harmony_set_data_format(harmony_t *h, int fmt, int force)
380 {
381         int o = h->st.format;
382         int n;
383
384         switch(fmt) {
385         case SNDRV_PCM_FORMAT_S16_BE:
386                 n = HARMONY_DF_16BIT_LINEAR;
387                 break;
388         case SNDRV_PCM_FORMAT_A_LAW:
389                 n = HARMONY_DF_8BIT_ALAW;
390                 break;
391         case SNDRV_PCM_FORMAT_MU_LAW:
392                 n = HARMONY_DF_8BIT_ULAW;
393                 break;
394         default:
395                 n = HARMONY_DF_16BIT_LINEAR;
396                 break;
397         }
398
399         if (force || o != n) {
400                 snd_pcm_format_set_silence(fmt, h->sdma.area, SILENCE_BUFSZ / 
401                                            (snd_pcm_format_physical_width(fmt)
402                                             / 8));
403         }
404
405         return n;
406 }
407
408 static int
409 snd_harmony_playback_prepare(snd_pcm_substream_t *ss)
410 {
411         harmony_t *h = snd_pcm_substream_chip(ss);
412         snd_pcm_runtime_t *rt = ss->runtime;
413         
414         if (h->st.capturing)
415                 return -EBUSY;
416         
417         h->pbuf.size = snd_pcm_lib_buffer_bytes(ss);
418         h->pbuf.count = snd_pcm_lib_period_bytes(ss);
419         if (h->pbuf.buf >= h->pbuf.size)
420                 h->pbuf.buf = 0;
421         h->st.playing = 0;
422
423         h->st.rate = snd_harmony_rate_bits(rt->rate);
424         h->st.format = snd_harmony_set_data_format(h, rt->format, 0);
425         
426         if (rt->channels == 2)
427                 h->st.stereo = HARMONY_SS_STEREO;
428         else
429                 h->st.stereo = HARMONY_SS_MONO;
430
431         harmony_set_control(h);
432
433         h->pbuf.addr = rt->dma_addr;
434
435         return 0;
436 }
437
438 static int
439 snd_harmony_capture_prepare(snd_pcm_substream_t *ss)
440 {
441         harmony_t *h = snd_pcm_substream_chip(ss);
442         snd_pcm_runtime_t *rt = ss->runtime;
443
444         if (h->st.playing)
445                 return -EBUSY;
446
447         h->cbuf.size = snd_pcm_lib_buffer_bytes(ss);
448         h->cbuf.count = snd_pcm_lib_period_bytes(ss);
449         if (h->cbuf.buf >= h->cbuf.size)
450                 h->cbuf.buf = 0;
451         h->st.capturing = 0;
452
453         h->st.rate = snd_harmony_rate_bits(rt->rate);
454         h->st.format = snd_harmony_set_data_format(h, rt->format, 0);
455
456         if (rt->channels == 2)
457                 h->st.stereo = HARMONY_SS_STEREO;
458         else
459                 h->st.stereo = HARMONY_SS_MONO;
460
461         harmony_set_control(h);
462
463         h->cbuf.addr = rt->dma_addr;
464
465         return 0;
466 }
467
468 static snd_pcm_uframes_t 
469 snd_harmony_playback_pointer(snd_pcm_substream_t *ss)
470 {
471         snd_pcm_runtime_t *rt = ss->runtime;
472         harmony_t *h = snd_pcm_substream_chip(ss);
473         unsigned long pcuradd;
474         unsigned long played;
475
476         if (!(h->st.playing) || (h->psubs == NULL)) 
477                 return 0;
478
479         if ((h->pbuf.addr == 0) || (h->pbuf.size == 0))
480                 return 0;
481         
482         pcuradd = harmony_read(h, HARMONY_PCURADD);
483         played = pcuradd - h->pbuf.addr;
484
485 #ifdef HARMONY_DEBUG
486         printk(KERN_DEBUG PFX "playback_pointer is 0x%lx-0x%lx = %d bytes\n", 
487                pcuradd, h->pbuf.addr, played);  
488 #endif
489
490         if (pcuradd > h->pbuf.addr + h->pbuf.size) {
491                 return 0;
492         }
493
494         return bytes_to_frames(rt, played);
495 }
496
497 static snd_pcm_uframes_t
498 snd_harmony_capture_pointer(snd_pcm_substream_t *ss)
499 {
500         snd_pcm_runtime_t *rt = ss->runtime;
501         harmony_t *h = snd_pcm_substream_chip(ss);
502         unsigned long rcuradd;
503         unsigned long caught;
504
505         if (!(h->st.capturing) || (h->csubs == NULL))
506                 return 0;
507
508         if ((h->cbuf.addr == 0) || (h->cbuf.size == 0))
509                 return 0;
510
511         rcuradd = harmony_read(h, HARMONY_RCURADD);
512         caught = rcuradd - h->cbuf.addr;
513
514 #ifdef HARMONY_DEBUG
515         printk(KERN_DEBUG PFX "capture_pointer is 0x%lx-0x%lx = %d bytes\n",
516                rcuradd, h->cbuf.addr, caught);
517 #endif
518
519         if (rcuradd > h->cbuf.addr + h->cbuf.size) {
520                 return 0;
521         }
522
523         return bytes_to_frames(rt, caught);
524 }
525
526 static int 
527 snd_harmony_playback_open(snd_pcm_substream_t *ss)
528 {
529         harmony_t *h = snd_pcm_substream_chip(ss);
530         snd_pcm_runtime_t *rt = ss->runtime;
531         int err;
532         
533         h->psubs = ss;
534         rt->hw = snd_harmony_playback;
535         snd_pcm_hw_constraint_list(rt, 0, SNDRV_PCM_HW_PARAM_RATE, 
536                                    &hw_constraint_rates);
537         
538         err = snd_pcm_hw_constraint_integer(rt, SNDRV_PCM_HW_PARAM_PERIODS);
539         if (err < 0)
540                 return err;
541         
542         return 0;
543 }
544
545 static int
546 snd_harmony_capture_open(snd_pcm_substream_t *ss)
547 {
548         harmony_t *h = snd_pcm_substream_chip(ss);
549         snd_pcm_runtime_t *rt = ss->runtime;
550         int err;
551
552         h->csubs = ss;
553         rt->hw = snd_harmony_capture;
554         snd_pcm_hw_constraint_list(rt, 0, SNDRV_PCM_HW_PARAM_RATE,
555                                    &hw_constraint_rates);
556
557         err = snd_pcm_hw_constraint_integer(rt, SNDRV_PCM_HW_PARAM_PERIODS);
558         if (err < 0)
559                 return err;
560
561         return 0;
562 }
563
564 static int 
565 snd_harmony_playback_close(snd_pcm_substream_t *ss)
566 {
567         harmony_t *h = snd_pcm_substream_chip(ss);
568         h->psubs = NULL;
569         return 0;
570 }
571
572 static int
573 snd_harmony_capture_close(snd_pcm_substream_t *ss)
574 {
575         harmony_t *h = snd_pcm_substream_chip(ss);
576         h->csubs = NULL;
577         return 0;
578 }
579
580 static int 
581 snd_harmony_hw_params(snd_pcm_substream_t *ss,
582                       snd_pcm_hw_params_t *hw)
583 {
584         int err;
585         harmony_t *h = snd_pcm_substream_chip(ss);
586         
587         err = snd_pcm_lib_malloc_pages(ss, params_buffer_bytes(hw));
588         if (err > 0 && h->dma.type == SNDRV_DMA_TYPE_CONTINUOUS)
589                 ss->runtime->dma_addr = __pa(ss->runtime->dma_area);
590         
591         return err;
592 }
593
594 static int 
595 snd_harmony_hw_free(snd_pcm_substream_t *ss) 
596 {
597         return snd_pcm_lib_free_pages(ss);
598 }
599
600 static snd_pcm_ops_t snd_harmony_playback_ops = {
601         .open = snd_harmony_playback_open,
602         .close = snd_harmony_playback_close,
603         .ioctl = snd_pcm_lib_ioctl,
604         .hw_params = snd_harmony_hw_params,
605         .hw_free = snd_harmony_hw_free,
606         .prepare = snd_harmony_playback_prepare,
607         .trigger = snd_harmony_playback_trigger,
608         .pointer = snd_harmony_playback_pointer,
609 };
610
611 static snd_pcm_ops_t snd_harmony_capture_ops = {
612         .open = snd_harmony_capture_open,
613         .close = snd_harmony_capture_close,
614         .ioctl = snd_pcm_lib_ioctl,
615         .hw_params = snd_harmony_hw_params,
616         .hw_free = snd_harmony_hw_free,
617         .prepare = snd_harmony_capture_prepare,
618         .trigger = snd_harmony_capture_trigger,
619         .pointer = snd_harmony_capture_pointer,
620 };
621
622 static int 
623 snd_harmony_pcm_init(harmony_t *h)
624 {
625         snd_pcm_t *pcm;
626         int err;
627
628         harmony_disable_interrupts(h);
629         
630         err = snd_pcm_new(h->card, "harmony", 0, 1, 1, &pcm);
631         if (err < 0)
632                 return err;
633         
634         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, 
635                         &snd_harmony_playback_ops);
636         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
637                         &snd_harmony_capture_ops);
638
639         pcm->private_data = h;
640         pcm->info_flags = 0;
641         strcpy(pcm->name, "harmony");
642         h->pcm = pcm;
643
644         h->psubs = NULL;
645         h->csubs = NULL;
646         
647         /* initialize graveyard buffer */
648         h->dma.type = SNDRV_DMA_TYPE_DEV;
649         h->dma.dev = &h->dev->dev;
650         err = snd_dma_alloc_pages(h->dma.type,
651                                   h->dma.dev,
652                                   BUF_SIZE*GRAVEYARD_BUFS,
653                                   &h->gdma);
654         if (err < 0) {
655                 printk(KERN_ERR PFX "cannot allocate graveyard buffer!\n");
656                 return err;
657         }
658         
659         /* initialize silence buffers */
660         err = snd_dma_alloc_pages(h->dma.type,
661                                   h->dma.dev,
662                                   BUF_SIZE*SILENCE_BUFS,
663                                   &h->sdma);
664         if (err < 0) {
665                 printk(KERN_ERR PFX "cannot allocate silence buffer!\n");
666                 return err;
667         }
668
669         /* pre-allocate space for DMA */
670         err = snd_pcm_lib_preallocate_pages_for_all(pcm, h->dma.type,
671                                                     h->dma.dev,
672                                                     MAX_BUF_SIZE, 
673                                                     MAX_BUF_SIZE);
674         if (err < 0) {
675                 printk(KERN_ERR PFX "buffer allocation error: %d\n", err);
676                 return err;
677         }
678
679         h->st.format = snd_harmony_set_data_format(h,
680                 SNDRV_PCM_FORMAT_S16_BE, 1);
681
682         return 0;
683 }
684
685 static void 
686 snd_harmony_set_new_gain(harmony_t *h)
687 {
688         harmony_wait_for_control(h);
689         harmony_write(h, HARMONY_GAINCTL, h->st.gain);
690 }
691
692 static int 
693 snd_harmony_mixercontrol_info(snd_kcontrol_t *kc, 
694                               snd_ctl_elem_info_t *uinfo)
695 {
696         int mask = (kc->private_value >> 16) & 0xff;
697         int left_shift = (kc->private_value) & 0xff;
698         int right_shift = (kc->private_value >> 8) & 0xff;
699         
700         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : 
701                        SNDRV_CTL_ELEM_TYPE_INTEGER;
702         uinfo->count = left_shift == right_shift ? 1 : 2;
703         uinfo->value.integer.min = 0;
704         uinfo->value.integer.max = mask;
705
706         return 0;
707 }
708
709 static int 
710 snd_harmony_volume_get(snd_kcontrol_t *kc, 
711                        snd_ctl_elem_value_t *ucontrol)
712 {
713         harmony_t *h = snd_kcontrol_chip(kc);
714         int shift_left = (kc->private_value) & 0xff;
715         int shift_right = (kc->private_value >> 8) & 0xff;
716         int mask = (kc->private_value >> 16) & 0xff;
717         int invert = (kc->private_value >> 24) & 0xff;
718         int left, right;
719         
720         spin_lock_irq(&h->mixer_lock);
721
722         left = (h->st.gain >> shift_left) & mask;
723         right = (h->st.gain >> shift_right) & mask;
724         if (invert) {
725                 left = mask - left;
726                 right = mask - right;
727         }
728         
729         ucontrol->value.integer.value[0] = left;
730         if (shift_left != shift_right)
731                 ucontrol->value.integer.value[1] = right;
732
733         spin_unlock_irq(&h->mixer_lock);
734
735         return 0;
736 }  
737
738 static int 
739 snd_harmony_volume_put(snd_kcontrol_t *kc, 
740                        snd_ctl_elem_value_t *ucontrol)
741 {
742         harmony_t *h = snd_kcontrol_chip(kc);
743         int shift_left = (kc->private_value) & 0xff;
744         int shift_right = (kc->private_value >> 8) & 0xff;
745         int mask = (kc->private_value >> 16) & 0xff;
746         int invert = (kc->private_value >> 24) & 0xff;
747         int left, right;
748         int old_gain = h->st.gain;
749         
750         spin_lock_irq(&h->mixer_lock);
751
752         left = ucontrol->value.integer.value[0] & mask;
753         if (invert)
754                 left = mask - left;
755         h->st.gain &= ~( (mask << shift_left ) );
756         h->st.gain |= (left << shift_left);
757
758         if (shift_left != shift_right) {
759                 right = ucontrol->value.integer.value[1] & mask;
760                 if (invert)
761                         right = mask - right;
762                 h->st.gain &= ~( (mask << shift_right) );
763                 h->st.gain |= (right << shift_right);
764         }
765
766         snd_harmony_set_new_gain(h);
767
768         spin_unlock_irq(&h->mixer_lock);
769         
770         return h->st.gain != old_gain;
771 }
772
773 static int 
774 snd_harmony_captureroute_info(snd_kcontrol_t *kc, 
775                               snd_ctl_elem_info_t *uinfo)
776 {
777         static char *texts[2] = { "Line", "Mic" };
778         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
779         uinfo->count = 1;
780         uinfo->value.enumerated.items = 2;
781         if (uinfo->value.enumerated.item > 1)
782                 uinfo->value.enumerated.item = 1;
783         strcpy(uinfo->value.enumerated.name,
784                texts[uinfo->value.enumerated.item]);
785         return 0;
786 }
787
788 static int 
789 snd_harmony_captureroute_get(snd_kcontrol_t *kc, 
790                              snd_ctl_elem_value_t *ucontrol)
791 {
792         harmony_t *h = snd_kcontrol_chip(kc);
793         int value;
794         
795         spin_lock_irq(&h->mixer_lock);
796
797         value = (h->st.gain >> HARMONY_GAIN_IS_SHIFT) & 1;
798         ucontrol->value.enumerated.item[0] = value;
799
800         spin_unlock_irq(&h->mixer_lock);
801
802         return 0;
803 }  
804
805 static int 
806 snd_harmony_captureroute_put(snd_kcontrol_t *kc, 
807                              snd_ctl_elem_value_t *ucontrol)
808 {
809         harmony_t *h = snd_kcontrol_chip(kc);
810         int value;
811         int old_gain = h->st.gain;
812         
813         spin_lock_irq(&h->mixer_lock);
814
815         value = ucontrol->value.enumerated.item[0] & 1;
816         h->st.gain &= ~HARMONY_GAIN_IS_MASK;
817         h->st.gain |= value << HARMONY_GAIN_IS_SHIFT;
818
819         snd_harmony_set_new_gain(h);
820
821         spin_unlock_irq(&h->mixer_lock);
822         
823         return h->st.gain != old_gain;
824 }
825
826 #define HARMONY_CONTROLS (sizeof(snd_harmony_controls)/ \
827                           sizeof(snd_kcontrol_new_t))
828
829 #define HARMONY_VOLUME(xname, left_shift, right_shift, mask, invert) \
830 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname,                \
831   .info = snd_harmony_mixercontrol_info,                             \
832   .get = snd_harmony_volume_get, .put = snd_harmony_volume_put,      \
833   .private_value = ((left_shift) | ((right_shift) << 8) |            \
834                    ((mask) << 16) | ((invert) << 24)) }
835
836 static snd_kcontrol_new_t snd_harmony_controls[] = {
837         HARMONY_VOLUME("Master Playback Volume", HARMONY_GAIN_LO_SHIFT, 
838                        HARMONY_GAIN_RO_SHIFT, HARMONY_GAIN_OUT, 1),
839         HARMONY_VOLUME("Capture Volume", HARMONY_GAIN_LI_SHIFT,
840                        HARMONY_GAIN_RI_SHIFT, HARMONY_GAIN_IN, 0),
841         HARMONY_VOLUME("Monitor Volume", HARMONY_GAIN_MA_SHIFT,
842                        HARMONY_GAIN_MA_SHIFT, HARMONY_GAIN_MA, 1),
843         {
844                 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
845                 .name = "Input Route",
846                 .info = snd_harmony_captureroute_info,
847                 .get = snd_harmony_captureroute_get,
848                 .put = snd_harmony_captureroute_put
849         },
850         HARMONY_VOLUME("Internal Speaker Switch", HARMONY_GAIN_SE_SHIFT,
851                        HARMONY_GAIN_SE_SHIFT, 1, 0),
852         HARMONY_VOLUME("Line-Out Switch", HARMONY_GAIN_LE_SHIFT,
853                        HARMONY_GAIN_LE_SHIFT, 1, 0),
854         HARMONY_VOLUME("Headphones Switch", HARMONY_GAIN_HE_SHIFT,
855                        HARMONY_GAIN_HE_SHIFT, 1, 0),
856 };
857
858 static void __init 
859 snd_harmony_mixer_reset(harmony_t *h)
860 {
861         harmony_mute(h);
862         harmony_reset(h);
863         h->st.gain = HARMONY_GAIN_DEFAULT;
864         harmony_unmute(h);
865 }
866
867 static int __init 
868 snd_harmony_mixer_init(harmony_t *h)
869 {
870         snd_card_t *card = h->card;
871         int idx, err;
872
873         snd_assert(h != NULL, return -EINVAL);
874         strcpy(card->mixername, "Harmony Gain control interface");
875
876         for (idx = 0; idx < HARMONY_CONTROLS; idx++) {
877                 err = snd_ctl_add(card, 
878                                   snd_ctl_new1(&snd_harmony_controls[idx], h));
879                 if (err < 0)
880                         return err;
881         }
882         
883         snd_harmony_mixer_reset(h);
884
885         return 0;
886 }
887
888 static int
889 snd_harmony_free(harmony_t *h)
890 {
891         if (h->gdma.addr)
892                 snd_dma_free_pages(&h->gdma);
893         if (h->sdma.addr)
894                 snd_dma_free_pages(&h->sdma);
895
896         if (h->irq >= 0)
897                 free_irq(h->irq, h);
898
899         if (h->iobase)
900                 iounmap(h->iobase);
901
902         parisc_set_drvdata(h->dev, NULL);
903
904         kfree(h);
905         return 0;
906 }
907
908 static int
909 snd_harmony_dev_free(snd_device_t *dev)
910 {
911         harmony_t *h = dev->device_data;
912         return snd_harmony_free(h);
913 }
914
915 static int __devinit
916 snd_harmony_create(snd_card_t *card, 
917                    struct parisc_device *padev, 
918                    harmony_t **rchip)
919 {
920         int err;
921         harmony_t *h;
922         static snd_device_ops_t ops = {
923                 .dev_free = snd_harmony_dev_free,
924         };
925
926         *rchip = NULL;
927
928         h = kzalloc(sizeof(*h), GFP_KERNEL);
929         if (h == NULL)
930                 return -ENOMEM;
931
932         h->hpa = padev->hpa.start;
933         h->card = card;
934         h->dev = padev;
935         h->irq = -1;
936         h->iobase = ioremap_nocache(padev->hpa.start, HARMONY_SIZE);
937         if (h->iobase == NULL) {
938                 printk(KERN_ERR PFX "unable to remap hpa 0x%lx\n",
939                        padev->hpa.start);
940                 err = -EBUSY;
941                 goto free_and_ret;
942         }
943                 
944         err = request_irq(padev->irq, snd_harmony_interrupt, 0,
945                           "harmony", h);
946         if (err) {
947                 printk(KERN_ERR PFX "could not obtain interrupt %d",
948                        padev->irq);
949                 goto free_and_ret;
950         }
951         h->irq = padev->irq;
952
953         spin_lock_init(&h->mixer_lock);
954         spin_lock_init(&h->lock);
955
956         if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL,
957                                   h, &ops)) < 0) {
958                 goto free_and_ret;
959         }
960
961         snd_card_set_dev(card, &padev->dev);
962
963         *rchip = h;
964
965         return 0;
966
967 free_and_ret:
968         snd_harmony_free(h);
969         return err;
970 }
971
972 static int __devinit
973 snd_harmony_probe(struct parisc_device *padev)
974 {
975         int err;
976         snd_card_t *card;
977         harmony_t *h;
978
979         card = snd_card_new(index, id, THIS_MODULE, 0);
980         if (card == NULL)
981                 return -ENOMEM;
982
983         err = snd_harmony_create(card, padev, &h);
984         if (err < 0)
985                 goto free_and_ret;
986
987         err = snd_harmony_pcm_init(h);
988         if (err < 0)
989                 goto free_and_ret;
990
991         err = snd_harmony_mixer_init(h);
992         if (err < 0)
993                 goto free_and_ret;
994
995         strcpy(card->driver, "harmony");
996         strcpy(card->shortname, "Harmony");
997         sprintf(card->longname, "%s at 0x%lx, irq %i",
998                 card->shortname, h->hpa, h->irq);
999
1000         err = snd_card_register(card);
1001         if (err < 0)
1002                 goto free_and_ret;
1003
1004         parisc_set_drvdata(padev, card);
1005         return 0;
1006
1007 free_and_ret:
1008         snd_card_free(card);
1009         return err;
1010 }
1011
1012 static int __devexit
1013 snd_harmony_remove(struct parisc_device *padev)
1014 {
1015         snd_card_free(parisc_get_drvdata(padev));
1016         parisc_set_drvdata(padev, NULL);
1017         return 0;
1018 }
1019
1020 static struct parisc_driver snd_harmony_driver = {
1021         .name = "harmony",
1022         .id_table = snd_harmony_devtable,
1023         .probe = snd_harmony_probe,
1024         .remove = snd_harmony_remove,
1025 };
1026
1027 static int __init 
1028 alsa_harmony_init(void)
1029 {
1030         return register_parisc_driver(&snd_harmony_driver);
1031 }
1032
1033 static void __exit
1034 alsa_harmony_fini(void)
1035 {
1036         return unregister_parisc_driver(&snd_harmony_driver);
1037 }
1038
1039 MODULE_LICENSE("GPL");
1040 MODULE_AUTHOR("Kyle McMartin <kyle@parisc-linux.org>");
1041 MODULE_DESCRIPTION("Harmony sound driver");
1042
1043 module_init(alsa_harmony_init);
1044 module_exit(alsa_harmony_fini);