linux/sound/ppc/burgundy.c
<<
>>
Prefs
   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 */
  32static inline void
  33snd_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
  42static inline void
  43snd_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
  58static void
  59snd_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
  71static unsigned
  72snd_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
 104static void
 105snd_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
 111static unsigned
 112snd_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 */
 132static void
 133snd_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
 151static void
 152snd_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
 178static 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
 188static 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
 199static 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
 223static 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
 234static 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
 248static 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 */
 274static 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
 285static 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
 300static 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
 326static 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};      
 335static struct snd_kcontrol_new snd_pmac_burgundy_master_sw __initdata = 
 336BURGUNDY_OUTPUT_SWITCH("Headphone Playback Switch", 0, BURGUNDY_OUTPUT_LEFT, BURGUNDY_OUTPUT_RIGHT, 1);
 337static struct snd_kcontrol_new snd_pmac_burgundy_speaker_sw __initdata = 
 338BURGUNDY_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 */
 345static 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
 350static 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 */
 379int __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}
 455
lxr.linux.no kindly hosted by Redpill Linpro AS, provider of Linux consulting and operations services since 1995.