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