Merge git://git.kernel.org/pub/scm/linux/kernel/git/rusty/linux-2.6-for-linus
[sfrench/cifs-2.6.git] / sound / ppc / burgundy.c
1 /*
2  * PMac Burgundy lowlevel functions
3  *
4  * Copyright (c) by Takashi Iwai <tiwai@suse.de>
5  * code based on dmasound.c.
6  *
7  *   This program is free software; you can redistribute it and/or modify
8  *   it under the terms of the GNU General Public License as published by
9  *   the Free Software Foundation; either version 2 of the License, or
10  *   (at your option) any later version.
11  *
12  *   This program is distributed in the hope that it will be useful,
13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *   GNU General Public License for more details.
16  *
17  *   You should have received a copy of the GNU General Public License
18  *   along with this program; if not, write to the Free Software
19  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
20  */
21
22 #include <asm/io.h>
23 #include <linux/init.h>
24 #include <linux/slab.h>
25 #include <linux/delay.h>
26 #include <sound/core.h>
27 #include "pmac.h"
28 #include "burgundy.h"
29
30
31 /* Waits for busy flag to clear */
32 static inline void
33 snd_pmac_burgundy_busy_wait(struct snd_pmac *chip)
34 {
35         int timeout = 50;
36         while ((in_le32(&chip->awacs->codec_ctrl) & MASK_NEWECMD) && timeout--)
37                 udelay(1);
38         if (! timeout)
39                 printk(KERN_DEBUG "burgundy_busy_wait: timeout\n");
40 }
41
42 static inline void
43 snd_pmac_burgundy_extend_wait(struct snd_pmac *chip)
44 {
45         int timeout;
46         timeout = 50;
47         while (!(in_le32(&chip->awacs->codec_stat) & MASK_EXTEND) && timeout--)
48                 udelay(1);
49         if (! timeout)
50                 printk(KERN_DEBUG "burgundy_extend_wait: timeout #1\n");
51         timeout = 50;
52         while ((in_le32(&chip->awacs->codec_stat) & MASK_EXTEND) && timeout--)
53                 udelay(1);
54         if (! timeout)
55                 printk(KERN_DEBUG "burgundy_extend_wait: timeout #2\n");
56 }
57
58 static void
59 snd_pmac_burgundy_wcw(struct snd_pmac *chip, unsigned addr, unsigned val)
60 {
61         out_le32(&chip->awacs->codec_ctrl, addr + 0x200c00 + (val & 0xff));
62         snd_pmac_burgundy_busy_wait(chip);
63         out_le32(&chip->awacs->codec_ctrl, addr + 0x200d00 +((val>>8) & 0xff));
64         snd_pmac_burgundy_busy_wait(chip);
65         out_le32(&chip->awacs->codec_ctrl, addr + 0x200e00 +((val>>16) & 0xff));
66         snd_pmac_burgundy_busy_wait(chip);
67         out_le32(&chip->awacs->codec_ctrl, addr + 0x200f00 +((val>>24) & 0xff));
68         snd_pmac_burgundy_busy_wait(chip);
69 }
70
71 static unsigned
72 snd_pmac_burgundy_rcw(struct snd_pmac *chip, unsigned addr)
73 {
74         unsigned val = 0;
75         unsigned long flags;
76
77         spin_lock_irqsave(&chip->reg_lock, flags);
78
79         out_le32(&chip->awacs->codec_ctrl, addr + 0x100000);
80         snd_pmac_burgundy_busy_wait(chip);
81         snd_pmac_burgundy_extend_wait(chip);
82         val += (in_le32(&chip->awacs->codec_stat) >> 4) & 0xff;
83
84         out_le32(&chip->awacs->codec_ctrl, addr + 0x100100);
85         snd_pmac_burgundy_busy_wait(chip);
86         snd_pmac_burgundy_extend_wait(chip);
87         val += ((in_le32(&chip->awacs->codec_stat)>>4) & 0xff) <<8;
88
89         out_le32(&chip->awacs->codec_ctrl, addr + 0x100200);
90         snd_pmac_burgundy_busy_wait(chip);
91         snd_pmac_burgundy_extend_wait(chip);
92         val += ((in_le32(&chip->awacs->codec_stat)>>4) & 0xff) <<16;
93
94         out_le32(&chip->awacs->codec_ctrl, addr + 0x100300);
95         snd_pmac_burgundy_busy_wait(chip);
96         snd_pmac_burgundy_extend_wait(chip);
97         val += ((in_le32(&chip->awacs->codec_stat)>>4) & 0xff) <<24;
98
99         spin_unlock_irqrestore(&chip->reg_lock, flags);
100
101         return val;
102 }
103
104 static void
105 snd_pmac_burgundy_wcb(struct snd_pmac *chip, unsigned int addr, unsigned int val)
106 {
107         out_le32(&chip->awacs->codec_ctrl, addr + 0x300000 + (val & 0xff));
108         snd_pmac_burgundy_busy_wait(chip);
109 }
110
111 static unsigned
112 snd_pmac_burgundy_rcb(struct snd_pmac *chip, unsigned int addr)
113 {
114         unsigned val = 0;
115         unsigned long flags;
116
117         spin_lock_irqsave(&chip->reg_lock, flags);
118
119         out_le32(&chip->awacs->codec_ctrl, addr + 0x100000);
120         snd_pmac_burgundy_busy_wait(chip);
121         snd_pmac_burgundy_extend_wait(chip);
122         val += (in_le32(&chip->awacs->codec_stat) >> 4) & 0xff;
123
124         spin_unlock_irqrestore(&chip->reg_lock, flags);
125
126         return val;
127 }
128
129 /*
130  * Burgundy volume: 0 - 100, stereo
131  */
132 static void
133 snd_pmac_burgundy_write_volume(struct snd_pmac *chip, unsigned int address,
134                                long *volume, int shift)
135 {
136         int hardvolume, lvolume, rvolume;
137
138         if (volume[0] < 0 || volume[0] > 100 ||
139             volume[1] < 0 || volume[1] > 100)
140                 return; /* -EINVAL */
141         lvolume = volume[0] ? volume[0] + BURGUNDY_VOLUME_OFFSET : 0;
142         rvolume = volume[1] ? volume[1] + BURGUNDY_VOLUME_OFFSET : 0;
143
144         hardvolume = lvolume + (rvolume << shift);
145         if (shift == 8)
146                 hardvolume |= hardvolume << 16;
147
148         snd_pmac_burgundy_wcw(chip, address, hardvolume);
149 }
150
151 static void
152 snd_pmac_burgundy_read_volume(struct snd_pmac *chip, unsigned int address,
153                               long *volume, int shift)
154 {
155         int wvolume;
156
157         wvolume = snd_pmac_burgundy_rcw(chip, address);
158
159         volume[0] = wvolume & 0xff;
160         if (volume[0] >= BURGUNDY_VOLUME_OFFSET)
161                 volume[0] -= BURGUNDY_VOLUME_OFFSET;
162         else
163                 volume[0] = 0;
164         volume[1] = (wvolume >> shift) & 0xff;
165         if (volume[1] >= BURGUNDY_VOLUME_OFFSET)
166                 volume[1] -= BURGUNDY_VOLUME_OFFSET;
167         else
168                 volume[1] = 0;
169 }
170
171
172 /*
173  */
174
175 #define BASE2ADDR(base) ((base) << 12)
176 #define ADDR2BASE(addr) ((addr) >> 12)
177
178 static int snd_pmac_burgundy_info_volume(struct snd_kcontrol *kcontrol,
179                                          struct snd_ctl_elem_info *uinfo)
180 {
181         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
182         uinfo->count = 2;
183         uinfo->value.integer.min = 0;
184         uinfo->value.integer.max = 100;
185         return 0;
186 }
187
188 static int snd_pmac_burgundy_get_volume(struct snd_kcontrol *kcontrol,
189                                         struct snd_ctl_elem_value *ucontrol)
190 {
191         struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
192         unsigned int addr = BASE2ADDR(kcontrol->private_value & 0xff);
193         int shift = (kcontrol->private_value >> 8) & 0xff;
194         snd_pmac_burgundy_read_volume(chip, addr, ucontrol->value.integer.value,
195                                       shift);
196         return 0;
197 }
198
199 static int snd_pmac_burgundy_put_volume(struct snd_kcontrol *kcontrol,
200                                         struct snd_ctl_elem_value *ucontrol)
201 {
202         struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
203         unsigned int addr = BASE2ADDR(kcontrol->private_value & 0xff);
204         int shift = (kcontrol->private_value >> 8) & 0xff;
205         long nvoices[2];
206
207         snd_pmac_burgundy_write_volume(chip, addr, ucontrol->value.integer.value,
208                                        shift);
209         snd_pmac_burgundy_read_volume(chip, addr, nvoices, shift);
210         return (nvoices[0] != ucontrol->value.integer.value[0] ||
211                 nvoices[1] != ucontrol->value.integer.value[1]);
212 }
213
214 #define BURGUNDY_VOLUME(xname, xindex, addr, shift) \
215 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex,\
216   .info = snd_pmac_burgundy_info_volume,\
217   .get = snd_pmac_burgundy_get_volume,\
218   .put = snd_pmac_burgundy_put_volume,\
219   .private_value = ((ADDR2BASE(addr) & 0xff) | ((shift) << 8)) }
220
221 /* lineout/speaker */
222
223 static int snd_pmac_burgundy_info_switch_out(struct snd_kcontrol *kcontrol,
224                                              struct snd_ctl_elem_info *uinfo)
225 {
226         int stereo = (kcontrol->private_value >> 24) & 1;
227         uinfo->type = SNDRV_CTL_ELEM_TYPE_BOOLEAN;
228         uinfo->count = stereo + 1;
229         uinfo->value.integer.min = 0;
230         uinfo->value.integer.max = 1;
231         return 0;
232 }
233
234 static int snd_pmac_burgundy_get_switch_out(struct snd_kcontrol *kcontrol,
235                                             struct snd_ctl_elem_value *ucontrol)
236 {
237         struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
238         int lmask = kcontrol->private_value & 0xff;
239         int rmask = (kcontrol->private_value >> 8) & 0xff;
240         int stereo = (kcontrol->private_value >> 24) & 1;
241         int val = snd_pmac_burgundy_rcb(chip, MASK_ADDR_BURGUNDY_MORE_OUTPUTENABLES);
242         ucontrol->value.integer.value[0] = (val & lmask) ? 1 : 0;
243         if (stereo)
244                 ucontrol->value.integer.value[1] = (val & rmask) ? 1 : 0;
245         return 0;
246 }
247
248 static int snd_pmac_burgundy_put_switch_out(struct snd_kcontrol *kcontrol,
249                                             struct snd_ctl_elem_value *ucontrol)
250 {
251         struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
252         int lmask = kcontrol->private_value & 0xff;
253         int rmask = (kcontrol->private_value >> 8) & 0xff;
254         int stereo = (kcontrol->private_value >> 24) & 1;
255         int val, oval;
256         oval = snd_pmac_burgundy_rcb(chip, MASK_ADDR_BURGUNDY_MORE_OUTPUTENABLES);
257         val = oval & ~(lmask | rmask);
258         if (ucontrol->value.integer.value[0])
259                 val |= lmask;
260         if (stereo && ucontrol->value.integer.value[1])
261                 val |= rmask;
262         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_MORE_OUTPUTENABLES, val);
263         return val != oval;
264 }
265
266 #define BURGUNDY_OUTPUT_SWITCH(xname, xindex, lmask, rmask, stereo) \
267 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex,\
268   .info = snd_pmac_burgundy_info_switch_out,\
269   .get = snd_pmac_burgundy_get_switch_out,\
270   .put = snd_pmac_burgundy_put_switch_out,\
271   .private_value = ((lmask) | ((rmask) << 8) | ((stereo) << 24)) }
272
273 /* line/speaker output volume */
274 static int snd_pmac_burgundy_info_volume_out(struct snd_kcontrol *kcontrol,
275                                              struct snd_ctl_elem_info *uinfo)
276 {
277         int stereo = (kcontrol->private_value >> 24) & 1;
278         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
279         uinfo->count = stereo + 1;
280         uinfo->value.integer.min = 0;
281         uinfo->value.integer.max = 15;
282         return 0;
283 }
284
285 static int snd_pmac_burgundy_get_volume_out(struct snd_kcontrol *kcontrol,
286                                             struct snd_ctl_elem_value *ucontrol)
287 {
288         struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
289         unsigned int addr = BASE2ADDR(kcontrol->private_value & 0xff);
290         int stereo = (kcontrol->private_value >> 24) & 1;
291         int oval;
292
293         oval = ~snd_pmac_burgundy_rcb(chip, addr) & 0xff;
294         ucontrol->value.integer.value[0] = oval & 0xf;
295         if (stereo)
296                 ucontrol->value.integer.value[1] = (oval >> 4) & 0xf;
297         return 0;
298 }
299
300 static int snd_pmac_burgundy_put_volume_out(struct snd_kcontrol *kcontrol,
301                                             struct snd_ctl_elem_value *ucontrol)
302 {
303         struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
304         unsigned int addr = BASE2ADDR(kcontrol->private_value & 0xff);
305         int stereo = (kcontrol->private_value >> 24) & 1;
306         unsigned int oval, val;
307
308         oval = ~snd_pmac_burgundy_rcb(chip, addr) & 0xff;
309         val = ucontrol->value.integer.value[0] & 15;
310         if (stereo)
311                 val |= (ucontrol->value.integer.value[1] & 15) << 4;
312         else
313                 val |= val << 4;
314         val = ~val & 0xff;
315         snd_pmac_burgundy_wcb(chip, addr, val);
316         return val != oval;
317 }
318
319 #define BURGUNDY_OUTPUT_VOLUME(xname, xindex, addr, stereo) \
320 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex,\
321   .info = snd_pmac_burgundy_info_volume_out,\
322   .get = snd_pmac_burgundy_get_volume_out,\
323   .put = snd_pmac_burgundy_put_volume_out,\
324   .private_value = (ADDR2BASE(addr) | ((stereo) << 24)) }
325
326 static struct snd_kcontrol_new snd_pmac_burgundy_mixers[] __initdata = {
327         BURGUNDY_VOLUME("Master Playback Volume", 0, MASK_ADDR_BURGUNDY_MASTER_VOLUME, 8),
328         BURGUNDY_VOLUME("Line Playback Volume", 0, MASK_ADDR_BURGUNDY_VOLLINE, 16),
329         BURGUNDY_VOLUME("CD Playback Volume", 0, MASK_ADDR_BURGUNDY_VOLCD, 16),
330         BURGUNDY_VOLUME("Mic Playback Volume", 0, MASK_ADDR_BURGUNDY_VOLMIC, 16),
331         BURGUNDY_OUTPUT_VOLUME("PC Speaker Playback Volume", 0, MASK_ADDR_BURGUNDY_ATTENHP, 0),
332         /*BURGUNDY_OUTPUT_VOLUME("PCM Playback Volume", 0, MASK_ADDR_BURGUNDY_ATTENLINEOUT, 1),*/
333         BURGUNDY_OUTPUT_VOLUME("Headphone Playback Volume", 0, MASK_ADDR_BURGUNDY_ATTENSPEAKER, 1),
334 };      
335 static struct snd_kcontrol_new snd_pmac_burgundy_master_sw __initdata = 
336 BURGUNDY_OUTPUT_SWITCH("Headphone Playback Switch", 0, BURGUNDY_OUTPUT_LEFT, BURGUNDY_OUTPUT_RIGHT, 1);
337 static struct snd_kcontrol_new snd_pmac_burgundy_speaker_sw __initdata = 
338 BURGUNDY_OUTPUT_SWITCH("PC Speaker Playback Switch", 0, BURGUNDY_OUTPUT_INTERN, 0, 0);
339
340
341 #ifdef PMAC_SUPPORT_AUTOMUTE
342 /*
343  * auto-mute stuffs
344  */
345 static int snd_pmac_burgundy_detect_headphone(struct snd_pmac *chip)
346 {
347         return (in_le32(&chip->awacs->codec_stat) & chip->hp_stat_mask) ? 1 : 0;
348 }
349
350 static void snd_pmac_burgundy_update_automute(struct snd_pmac *chip, int do_notify)
351 {
352         if (chip->auto_mute) {
353                 int reg, oreg;
354                 reg = oreg = snd_pmac_burgundy_rcb(chip, MASK_ADDR_BURGUNDY_MORE_OUTPUTENABLES);
355                 reg &= ~(BURGUNDY_OUTPUT_LEFT | BURGUNDY_OUTPUT_RIGHT | BURGUNDY_OUTPUT_INTERN);
356                 if (snd_pmac_burgundy_detect_headphone(chip))
357                         reg |= BURGUNDY_OUTPUT_LEFT | BURGUNDY_OUTPUT_RIGHT;
358                 else
359                         reg |= BURGUNDY_OUTPUT_INTERN;
360                 if (do_notify && reg == oreg)
361                         return;
362                 snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_MORE_OUTPUTENABLES, reg);
363                 if (do_notify) {
364                         snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
365                                        &chip->master_sw_ctl->id);
366                         snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
367                                        &chip->speaker_sw_ctl->id);
368                         snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
369                                        &chip->hp_detect_ctl->id);
370                 }
371         }
372 }
373 #endif /* PMAC_SUPPORT_AUTOMUTE */
374
375
376 /*
377  * initialize burgundy
378  */
379 int __init snd_pmac_burgundy_init(struct snd_pmac *chip)
380 {
381         int i, err;
382
383         /* Checks to see the chip is alive and kicking */
384         if ((in_le32(&chip->awacs->codec_ctrl) & MASK_ERRCODE) == 0xf0000) {
385                 printk(KERN_WARNING "pmac burgundy: disabled by MacOS :-(\n");
386                 return 1;
387         }
388
389         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_OUTPUTENABLES,
390                            DEF_BURGUNDY_OUTPUTENABLES);
391         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_MORE_OUTPUTENABLES,
392                            DEF_BURGUNDY_MORE_OUTPUTENABLES);
393         snd_pmac_burgundy_wcw(chip, MASK_ADDR_BURGUNDY_OUTPUTSELECTS,
394                            DEF_BURGUNDY_OUTPUTSELECTS);
395
396         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_INPSEL21,
397                            DEF_BURGUNDY_INPSEL21);
398         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_INPSEL3,
399                            DEF_BURGUNDY_INPSEL3);
400         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_GAINCD,
401                            DEF_BURGUNDY_GAINCD);
402         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_GAINLINE,
403                            DEF_BURGUNDY_GAINLINE);
404         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_GAINMIC,
405                            DEF_BURGUNDY_GAINMIC);
406         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_GAINMODEM,
407                            DEF_BURGUNDY_GAINMODEM);
408
409         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_ATTENSPEAKER,
410                            DEF_BURGUNDY_ATTENSPEAKER);
411         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_ATTENLINEOUT,
412                            DEF_BURGUNDY_ATTENLINEOUT);
413         snd_pmac_burgundy_wcb(chip, MASK_ADDR_BURGUNDY_ATTENHP,
414                            DEF_BURGUNDY_ATTENHP);
415
416         snd_pmac_burgundy_wcw(chip, MASK_ADDR_BURGUNDY_MASTER_VOLUME,
417                            DEF_BURGUNDY_MASTER_VOLUME);
418         snd_pmac_burgundy_wcw(chip, MASK_ADDR_BURGUNDY_VOLCD,
419                            DEF_BURGUNDY_VOLCD);
420         snd_pmac_burgundy_wcw(chip, MASK_ADDR_BURGUNDY_VOLLINE,
421                            DEF_BURGUNDY_VOLLINE);
422         snd_pmac_burgundy_wcw(chip, MASK_ADDR_BURGUNDY_VOLMIC,
423                            DEF_BURGUNDY_VOLMIC);
424
425         if (chip->hp_stat_mask == 0)
426                 /* set headphone-jack detection bit */
427                 chip->hp_stat_mask = 0x04;
428
429         /*
430          * build burgundy mixers
431          */
432         strcpy(chip->card->mixername, "PowerMac Burgundy");
433
434         for (i = 0; i < ARRAY_SIZE(snd_pmac_burgundy_mixers); i++) {
435                 if ((err = snd_ctl_add(chip->card, snd_ctl_new1(&snd_pmac_burgundy_mixers[i], chip))) < 0)
436                         return err;
437         }
438         chip->master_sw_ctl = snd_ctl_new1(&snd_pmac_burgundy_master_sw, chip);
439         if ((err = snd_ctl_add(chip->card, chip->master_sw_ctl)) < 0)
440                 return err;
441         chip->speaker_sw_ctl = snd_ctl_new1(&snd_pmac_burgundy_speaker_sw, chip);
442         if ((err = snd_ctl_add(chip->card, chip->speaker_sw_ctl)) < 0)
443                 return err;
444 #ifdef PMAC_SUPPORT_AUTOMUTE
445         if ((err = snd_pmac_add_automute(chip)) < 0)
446                 return err;
447
448         chip->detect_headphone = snd_pmac_burgundy_detect_headphone;
449         chip->update_automute = snd_pmac_burgundy_update_automute;
450         snd_pmac_burgundy_update_automute(chip, 0); /* update the status only */
451 #endif
452
453         return 0;
454 }