sound/mips/sgio2audio.c

   1 /*
   2  *   Sound driver for Silicon Graphics O2 Workstations A/V board audio.
   3  *
   4  *   Copyright 2003 Vivien Chappelier <vivien.chappelier@linux-mips.org>
   5  *   Copyright 2008 Thomas Bogendoerfer <tsbogend@alpha.franken.de>
   6  *   Mxier part taken from mace_audio.c:
   7  *   Copyright 2007 Thorben Jändling <tj.trevelyan@gmail.com>
   8  *
   9  *   This program is free software; you can redistribute it and/or modify
  10  *   it under the terms of the GNU General Public License as published by
  11  *   the Free Software Foundation; either version 2 of the License, or
  12  *   (at your option) any later version.
  13  *
  14  *   This program is distributed in the hope that it will be useful,
  15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *   GNU General Public License for more details.
  18  *
  19  *   You should have received a copy of the GNU General Public License
  20  *   along with this program; if not, write to the Free Software
  21  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  22  *
  23  */
  24
  25 #include <linux/init.h>
  26 #include <linux/delay.h>
  27 #include <linux/spinlock.h>
  28 #include <linux/interrupt.h>
  29 #include <linux/dma-mapping.h>
  30 #include <linux/platform_device.h>
  31 #include <linux/io.h>
  32 #include <linux/slab.h>
  33 #include <linux/module.h>
  34
  35 #include <asm/ip32/ip32_ints.h>
  36 #include <asm/ip32/mace.h>
  37
  38 #include <sound/core.h>
  39 #include <sound/control.h>
  40 #include <sound/pcm.h>
  41 #define SNDRV_GET_ID
  42 #include <sound/initval.h>
  43 #include <sound/ad1843.h>
  44
  45
  46 MODULE_AUTHOR("Vivien Chappelier <vivien.chappelier@linux-mips.org>");
  47 MODULE_DESCRIPTION("SGI O2 Audio");
  48 MODULE_LICENSE("GPL");
  49 MODULE_SUPPORTED_DEVICE("{{Silicon Graphics, O2 Audio}}");
  50
  51 static int index = SNDRV_DEFAULT_IDX1;  /* Index 0-MAX */
  52 static char *id = SNDRV_DEFAULT_STR1;   /* ID for this card */
  53
  54 module_param(index, int, 0444);
  55 MODULE_PARM_DESC(index, "Index value for SGI O2 soundcard.");
  56 module_param(id, charp, 0444);
  57 MODULE_PARM_DESC(id, "ID string for SGI O2 soundcard.");
  58
  59
  60 #define AUDIO_CONTROL_RESET              BIT(0) /* 1: reset audio interface */
  61 #define AUDIO_CONTROL_CODEC_PRESENT      BIT(1) /* 1: codec detected */
  62
  63 #define CODEC_CONTROL_WORD_SHIFT        0
  64 #define CODEC_CONTROL_READ              BIT(16)
  65 #define CODEC_CONTROL_ADDRESS_SHIFT     17
  66
  67 #define CHANNEL_CONTROL_RESET           BIT(10) /* 1: reset channel */
  68 #define CHANNEL_DMA_ENABLE              BIT(9)  /* 1: enable DMA transfer */
  69 #define CHANNEL_INT_THRESHOLD_DISABLED  (0 << 5) /* interrupt disabled */
  70 #define CHANNEL_INT_THRESHOLD_25        (1 << 5) /* int on buffer >25% full */
  71 #define CHANNEL_INT_THRESHOLD_50        (2 << 5) /* int on buffer >50% full */
  72 #define CHANNEL_INT_THRESHOLD_75        (3 << 5) /* int on buffer >75% full */
  73 #define CHANNEL_INT_THRESHOLD_EMPTY     (4 << 5) /* int on buffer empty */
  74 #define CHANNEL_INT_THRESHOLD_NOT_EMPTY (5 << 5) /* int on buffer !empty */
  75 #define CHANNEL_INT_THRESHOLD_FULL      (6 << 5) /* int on buffer empty */
  76 #define CHANNEL_INT_THRESHOLD_NOT_FULL  (7 << 5) /* int on buffer !empty */
  77
  78 #define CHANNEL_RING_SHIFT              12
  79 #define CHANNEL_RING_SIZE               (1 << CHANNEL_RING_SHIFT)
  80 #define CHANNEL_RING_MASK               (CHANNEL_RING_SIZE - 1)
  81
  82 #define CHANNEL_LEFT_SHIFT 40
  83 #define CHANNEL_RIGHT_SHIFT 8
  84
  85 struct snd_sgio2audio_chan {
  86         int idx;
  87         struct snd_pcm_substream *substream;
  88         int pos;
  89         snd_pcm_uframes_t size;
  90         spinlock_t lock;
  91 };
  92
  93 /* definition of the chip-specific record */
  94 struct snd_sgio2audio {
  95         struct snd_card *card;
  96
  97         /* codec */
  98         struct snd_ad1843 ad1843;
  99         spinlock_t ad1843_lock;
 100
 101         /* channels */
 102         struct snd_sgio2audio_chan channel[3];
 103
 104         /* resources */
 105         void *ring_base;
 106         dma_addr_t ring_base_dma;
 107 };
 108
 109 /* AD1843 access */
 110
 111 /*
 112  * read_ad1843_reg returns the current contents of a 16 bit AD1843 register.
 113  *
 114  * Returns unsigned register value on success, -errno on failure.
 115  */
 116 static int read_ad1843_reg(void *priv, int reg)
 117 {
 118         struct snd_sgio2audio *chip = priv;
 119         int val;
 120         unsigned long flags;
 121
 122         spin_lock_irqsave(&chip->ad1843_lock, flags);
 123
 124         writeq((reg << CODEC_CONTROL_ADDRESS_SHIFT) |
 125                CODEC_CONTROL_READ, &mace->perif.audio.codec_control);
 126         wmb();
 127         val = readq(&mace->perif.audio.codec_control); /* flush bus */
 128         udelay(200);
 129
 130         val = readq(&mace->perif.audio.codec_read);
 131
 132         spin_unlock_irqrestore(&chip->ad1843_lock, flags);
 133         return val;
 134 }
 135
 136 /*
 137  * write_ad1843_reg writes the specified value to a 16 bit AD1843 register.
 138  */
 139 static int write_ad1843_reg(void *priv, int reg, int word)
 140 {
 141         struct snd_sgio2audio *chip = priv;
 142         int val;
 143         unsigned long flags;
 144
 145         spin_lock_irqsave(&chip->ad1843_lock, flags);
 146
 147         writeq((reg << CODEC_CONTROL_ADDRESS_SHIFT) |
 148                (word << CODEC_CONTROL_WORD_SHIFT),
 149                &mace->perif.audio.codec_control);
 150         wmb();
 151         val = readq(&mace->perif.audio.codec_control); /* flush bus */
 152         udelay(200);
 153
 154         spin_unlock_irqrestore(&chip->ad1843_lock, flags);
 155         return 0;
 156 }
 157
 158 static int sgio2audio_gain_info(struct snd_kcontrol *kcontrol,
 159                                struct snd_ctl_elem_info *uinfo)
 160 {
 161         struct snd_sgio2audio *chip = snd_kcontrol_chip(kcontrol);
 162
 163         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 164         uinfo->count = 2;
 165         uinfo->value.integer.min = 0;
 166         uinfo->value.integer.max = ad1843_get_gain_max(&chip->ad1843,
 167                                              (int)kcontrol->private_value);
 168         return 0;
 169 }
 170
 171 static int sgio2audio_gain_get(struct snd_kcontrol *kcontrol,
 172                                struct snd_ctl_elem_value *ucontrol)
 173 {
 174         struct snd_sgio2audio *chip = snd_kcontrol_chip(kcontrol);
 175         int vol;
 176
 177         vol = ad1843_get_gain(&chip->ad1843, (int)kcontrol->private_value);
 178
 179         ucontrol->value.integer.value[0] = (vol >> 8) & 0xFF;
 180         ucontrol->value.integer.value[1] = vol & 0xFF;
 181
 182         return 0;
 183 }
 184
 185 static int sgio2audio_gain_put(struct snd_kcontrol *kcontrol,
 186                         struct snd_ctl_elem_value *ucontrol)
 187 {
 188         struct snd_sgio2audio *chip = snd_kcontrol_chip(kcontrol);
 189         int newvol, oldvol;
 190
 191         oldvol = ad1843_get_gain(&chip->ad1843, kcontrol->private_value);
 192         newvol = (ucontrol->value.integer.value[0] << 8) |
 193                 ucontrol->value.integer.value[1];
 194
 195         newvol = ad1843_set_gain(&chip->ad1843, kcontrol->private_value,
 196                 newvol);
 197
 198         return newvol != oldvol;
 199 }
 200
 201 static int sgio2audio_source_info(struct snd_kcontrol *kcontrol,
 202                                struct snd_ctl_elem_info *uinfo)
 203 {
 204         static const char *texts[3] = {
 205                 "Cam Mic", "Mic", "Line"
 206         };
 207         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
 208         uinfo->count = 1;
 209         uinfo->value.enumerated.items = 3;
 210         if (uinfo->value.enumerated.item >= 3)
 211                 uinfo->value.enumerated.item = 1;
 212         strcpy(uinfo->value.enumerated.name,
 213                texts[uinfo->value.enumerated.item]);
 214         return 0;
 215 }
 216
 217 static int sgio2audio_source_get(struct snd_kcontrol *kcontrol,
 218                                struct snd_ctl_elem_value *ucontrol)
 219 {
 220         struct snd_sgio2audio *chip = snd_kcontrol_chip(kcontrol);
 221
 222         ucontrol->value.enumerated.item[0] = ad1843_get_recsrc(&chip->ad1843);
 223         return 0;
 224 }
 225
 226 static int sgio2audio_source_put(struct snd_kcontrol *kcontrol,
 227                         struct snd_ctl_elem_value *ucontrol)
 228 {
 229         struct snd_sgio2audio *chip = snd_kcontrol_chip(kcontrol);
 230         int newsrc, oldsrc;
 231
 232         oldsrc = ad1843_get_recsrc(&chip->ad1843);
 233         newsrc = ad1843_set_recsrc(&chip->ad1843,
 234                                    ucontrol->value.enumerated.item[0]);
 235
 236         return newsrc != oldsrc;
 237 }
 238
 239 /* dac1/pcm0 mixer control */
 240 static struct snd_kcontrol_new sgio2audio_ctrl_pcm0 = {
 241         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 242         .name           = "PCM Playback Volume",
 243         .index          = 0,
 244         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 245         .private_value  = AD1843_GAIN_PCM_0,
 246         .info           = sgio2audio_gain_info,
 247         .get            = sgio2audio_gain_get,
 248         .put            = sgio2audio_gain_put,
 249 };
 250
 251 /* dac2/pcm1 mixer control */
 252 static struct snd_kcontrol_new sgio2audio_ctrl_pcm1 = {
 253         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 254         .name           = "PCM Playback Volume",
 255         .index          = 1,
 256         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 257         .private_value  = AD1843_GAIN_PCM_1,
 258         .info           = sgio2audio_gain_info,
 259         .get            = sgio2audio_gain_get,
 260         .put            = sgio2audio_gain_put,
 261 };
 262
 263 /* record level mixer control */
 264 static struct snd_kcontrol_new sgio2audio_ctrl_reclevel = {
 265         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 266         .name           = "Capture Volume",
 267         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 268         .private_value  = AD1843_GAIN_RECLEV,
 269         .info           = sgio2audio_gain_info,
 270         .get            = sgio2audio_gain_get,
 271         .put            = sgio2audio_gain_put,
 272 };
 273
 274 /* record level source control */
 275 static struct snd_kcontrol_new sgio2audio_ctrl_recsource = {
 276         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 277         .name           = "Capture Source",
 278         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 279         .info           = sgio2audio_source_info,
 280         .get            = sgio2audio_source_get,
 281         .put            = sgio2audio_source_put,
 282 };
 283
 284 /* line mixer control */
 285 static struct snd_kcontrol_new sgio2audio_ctrl_line = {
 286         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 287         .name           = "Line Playback Volume",
 288         .index          = 0,
 289         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 290         .private_value  = AD1843_GAIN_LINE,
 291         .info           = sgio2audio_gain_info,
 292         .get            = sgio2audio_gain_get,
 293         .put            = sgio2audio_gain_put,
 294 };
 295
 296 /* cd mixer control */
 297 static struct snd_kcontrol_new sgio2audio_ctrl_cd = {
 298         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 299         .name           = "Line Playback Volume",
 300         .index          = 1,
 301         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 302         .private_value  = AD1843_GAIN_LINE_2,
 303         .info           = sgio2audio_gain_info,
 304         .get            = sgio2audio_gain_get,
 305         .put            = sgio2audio_gain_put,
 306 };
 307
 308 /* mic mixer control */
 309 static struct snd_kcontrol_new sgio2audio_ctrl_mic = {
 310         .iface          = SNDRV_CTL_ELEM_IFACE_MIXER,
 311         .name           = "Mic Playback Volume",
 312         .access         = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 313         .private_value  = AD1843_GAIN_MIC,
 314         .info           = sgio2audio_gain_info,
 315         .get            = sgio2audio_gain_get,
 316         .put            = sgio2audio_gain_put,
 317 };
 318
 319
 320 static int snd_sgio2audio_new_mixer(struct snd_sgio2audio *chip)
 321 {
 322         int err;
 323
 324         err = snd_ctl_add(chip->card,
 325                           snd_ctl_new1(&sgio2audio_ctrl_pcm0, chip));
 326         if (err < 0)
 327                 return err;
 328
 329         err = snd_ctl_add(chip->card,
 330                           snd_ctl_new1(&sgio2audio_ctrl_pcm1, chip));
 331         if (err < 0)
 332                 return err;
 333
 334         err = snd_ctl_add(chip->card,
 335                           snd_ctl_new1(&sgio2audio_ctrl_reclevel, chip));
 336         if (err < 0)
 337                 return err;
 338
 339         err = snd_ctl_add(chip->card,
 340                           snd_ctl_new1(&sgio2audio_ctrl_recsource, chip));
 341         if (err < 0)
 342                 return err;
 343         err = snd_ctl_add(chip->card,
 344                           snd_ctl_new1(&sgio2audio_ctrl_line, chip));
 345         if (err < 0)
 346                 return err;
 347
 348         err = snd_ctl_add(chip->card,
 349                           snd_ctl_new1(&sgio2audio_ctrl_cd, chip));
 350         if (err < 0)
 351                 return err;
 352
 353         err = snd_ctl_add(chip->card,
 354                           snd_ctl_new1(&sgio2audio_ctrl_mic, chip));
 355         if (err < 0)
 356                 return err;
 357
 358         return 0;
 359 }
 360
 361 /* low-level audio interface DMA */
 362
 363 /* get data out of bounce buffer, count must be a multiple of 32 */
 364 /* returns 1 if a period has elapsed */
 365 static int snd_sgio2audio_dma_pull_frag(struct snd_sgio2audio *chip,
 366                                         unsigned int ch, unsigned int count)
 367 {
 368         int ret;
 369         unsigned long src_base, src_pos, dst_mask;
 370         unsigned char *dst_base;
 371         int dst_pos;
 372         u64 *src;
 373         s16 *dst;
 374         u64 x;
 375         unsigned long flags;
 376         struct snd_pcm_runtime *runtime = chip->channel[ch].substream->runtime;
 377
 378         spin_lock_irqsave(&chip->channel[ch].lock, flags);
 379
 380         src_base = (unsigned long) chip->ring_base | (ch << CHANNEL_RING_SHIFT);
 381         src_pos = readq(&mace->perif.audio.chan[ch].read_ptr);
 382         dst_base = runtime->dma_area;
 383         dst_pos = chip->channel[ch].pos;
 384         dst_mask = frames_to_bytes(runtime, runtime->buffer_size) - 1;
 385
 386         /* check if a period has elapsed */
 387         chip->channel[ch].size += (count >> 3); /* in frames */
 388         ret = chip->channel[ch].size >= runtime->period_size;
 389         chip->channel[ch].size %= runtime->period_size;
 390
 391         while (count) {
 392                 src = (u64 *)(src_base + src_pos);
 393                 dst = (s16 *)(dst_base + dst_pos);
 394
 395                 x = *src;
 396                 dst[0] = (x >> CHANNEL_LEFT_SHIFT) & 0xffff;
 397                 dst[1] = (x >> CHANNEL_RIGHT_SHIFT) & 0xffff;
 398
 399                 src_pos = (src_pos + sizeof(u64)) & CHANNEL_RING_MASK;
 400                 dst_pos = (dst_pos + 2 * sizeof(s16)) & dst_mask;
 401                 count -= sizeof(u64);
 402         }
 403
 404         writeq(src_pos, &mace->perif.audio.chan[ch].read_ptr); /* in bytes */
 405         chip->channel[ch].pos = dst_pos;
 406
 407         spin_unlock_irqrestore(&chip->channel[ch].lock, flags);
 408         return ret;
 409 }
 410
 411 /* put some DMA data in bounce buffer, count must be a multiple of 32 */
 412 /* returns 1 if a period has elapsed */
 413 static int snd_sgio2audio_dma_push_frag(struct snd_sgio2audio *chip,
 414                                         unsigned int ch, unsigned int count)
 415 {
 416         int ret;
 417         s64 l, r;
 418         unsigned long dst_base, dst_pos, src_mask;
 419         unsigned char *src_base;
 420         int src_pos;
 421         u64 *dst;
 422         s16 *src;
 423         unsigned long flags;
 424         struct snd_pcm_runtime *runtime = chip->channel[ch].substream->runtime;
 425
 426         spin_lock_irqsave(&chip->channel[ch].lock, flags);
 427
 428         dst_base = (unsigned long)chip->ring_base | (ch << CHANNEL_RING_SHIFT);
 429         dst_pos = readq(&mace->perif.audio.chan[ch].write_ptr);
 430         src_base = runtime->dma_area;
 431         src_pos = chip->channel[ch].pos;
 432         src_mask = frames_to_bytes(runtime, runtime->buffer_size) - 1;
 433
 434         /* check if a period has elapsed */
 435         chip->channel[ch].size += (count >> 3); /* in frames */
 436         ret = chip->channel[ch].size >= runtime->period_size;
 437         chip->channel[ch].size %= runtime->period_size;
 438
 439         while (count) {
 440                 src = (s16 *)(src_base + src_pos);
 441                 dst = (u64 *)(dst_base + dst_pos);
 442
 443                 l = src[0]; /* sign extend */
 444                 r = src[1]; /* sign extend */
 445
 446                 *dst = ((l & 0x00ffffff) << CHANNEL_LEFT_SHIFT) |
 447                         ((r & 0x00ffffff) << CHANNEL_RIGHT_SHIFT);
 448
 449                 dst_pos = (dst_pos + sizeof(u64)) & CHANNEL_RING_MASK;
 450                 src_pos = (src_pos + 2 * sizeof(s16)) & src_mask;
 451                 count -= sizeof(u64);
 452         }
 453
 454         writeq(dst_pos, &mace->perif.audio.chan[ch].write_ptr); /* in bytes */
 455         chip->channel[ch].pos = src_pos;
 456
 457         spin_unlock_irqrestore(&chip->channel[ch].lock, flags);
 458         return ret;
 459 }
 460
 461 static int snd_sgio2audio_dma_start(struct snd_pcm_substream *substream)
 462 {
 463         struct snd_sgio2audio *chip = snd_pcm_substream_chip(substream);
 464         struct snd_sgio2audio_chan *chan = substream->runtime->private_data;
 465         int ch = chan->idx;
 466
 467         /* reset DMA channel */
 468         writeq(CHANNEL_CONTROL_RESET, &mace->perif.audio.chan[ch].control);
 469         udelay(10);
 470         writeq(0, &mace->perif.audio.chan[ch].control);
 471
 472         if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK) {
 473                 /* push a full buffer */
 474                 snd_sgio2audio_dma_push_frag(chip, ch, CHANNEL_RING_SIZE - 32);
 475         }
 476         /* set DMA to wake on 50% empty and enable interrupt */
 477         writeq(CHANNEL_DMA_ENABLE | CHANNEL_INT_THRESHOLD_50,
 478                &mace->perif.audio.chan[ch].control);
 479         return 0;
 480 }
 481
 482 static int snd_sgio2audio_dma_stop(struct snd_pcm_substream *substream)
 483 {
 484         struct snd_sgio2audio_chan *chan = substream->runtime->private_data;
 485
 486         writeq(0, &mace->perif.audio.chan[chan->idx].control);
 487         return 0;
 488 }
 489
 490 static irqreturn_t snd_sgio2audio_dma_in_isr(int irq, void *dev_id)
 491 {
 492         struct snd_sgio2audio_chan *chan = dev_id;
 493         struct snd_pcm_substream *substream;
 494         struct snd_sgio2audio *chip;
 495         int count, ch;
 496
 497         substream = chan->substream;
 498         chip = snd_pcm_substream_chip(substream);
 499         ch = chan->idx;
 500
 501         /* empty the ring */
 502         count = CHANNEL_RING_SIZE -
 503                 readq(&mace->perif.audio.chan[ch].depth) - 32;
 504         if (snd_sgio2audio_dma_pull_frag(chip, ch, count))
 505                 snd_pcm_period_elapsed(substream);
 506
 507         return IRQ_HANDLED;
 508 }
 509
 510 static irqreturn_t snd_sgio2audio_dma_out_isr(int irq, void *dev_id)
 511 {
 512         struct snd_sgio2audio_chan *chan = dev_id;
 513         struct snd_pcm_substream *substream;
 514         struct snd_sgio2audio *chip;
 515         int count, ch;
 516
 517         substream = chan->substream;
 518         chip = snd_pcm_substream_chip(substream);
 519         ch = chan->idx;
 520         /* fill the ring */
 521         count = CHANNEL_RING_SIZE -
 522                 readq(&mace->perif.audio.chan[ch].depth) - 32;
 523         if (snd_sgio2audio_dma_push_frag(chip, ch, count))
 524                 snd_pcm_period_elapsed(substream);
 525
 526         return IRQ_HANDLED;
 527 }
 528
 529 static irqreturn_t snd_sgio2audio_error_isr(int irq, void *dev_id)
 530 {
 531         struct snd_sgio2audio_chan *chan = dev_id;
 532         struct snd_pcm_substream *substream;
 533
 534         substream = chan->substream;
 535         snd_sgio2audio_dma_stop(substream);
 536         snd_sgio2audio_dma_start(substream);
 537         return IRQ_HANDLED;
 538 }
 539
 540 /* PCM part */
 541 /* PCM hardware definition */
 542 static struct snd_pcm_hardware snd_sgio2audio_pcm_hw = {
 543         .info = (SNDRV_PCM_INFO_MMAP |
 544                  SNDRV_PCM_INFO_MMAP_VALID |
 545                  SNDRV_PCM_INFO_INTERLEAVED |
 546                  SNDRV_PCM_INFO_BLOCK_TRANSFER),
 547         .formats =          SNDRV_PCM_FMTBIT_S16_BE,
 548         .rates =            SNDRV_PCM_RATE_8000_48000,
 549         .rate_min =         8000,
 550         .rate_max =         48000,
 551         .channels_min =     2,
 552         .channels_max =     2,
 553         .buffer_bytes_max = 65536,
 554         .period_bytes_min = 32768,
 555         .period_bytes_max = 65536,
 556         .periods_min =      1,
 557         .periods_max =      1024,
 558 };
 559
 560 /* PCM playback open callback */
 561 static int snd_sgio2audio_playback1_open(struct snd_pcm_substream *substream)
 562 {
 563         struct snd_sgio2audio *chip = snd_pcm_substream_chip(substream);
 564         struct snd_pcm_runtime *runtime = substream->runtime;
 565
 566         runtime->hw = snd_sgio2audio_pcm_hw;
 567         runtime->private_data = &chip->channel[1];
 568         return 0;
 569 }
 570
 571 static int snd_sgio2audio_playback2_open(struct snd_pcm_substream *substream)
 572 {
 573         struct snd_sgio2audio *chip = snd_pcm_substream_chip(substream);
 574         struct snd_pcm_runtime *runtime = substream->runtime;
 575
 576         runtime->hw = snd_sgio2audio_pcm_hw;
 577         runtime->private_data = &chip->channel[2];
 578         return 0;
 579 }
 580
 581 /* PCM capture open callback */
 582 static int snd_sgio2audio_capture_open(struct snd_pcm_substream *substream)
 583 {
 584         struct snd_sgio2audio *chip = snd_pcm_substream_chip(substream);
 585         struct snd_pcm_runtime *runtime = substream->runtime;
 586
 587         runtime->hw = snd_sgio2audio_pcm_hw;
 588         runtime->private_data = &chip->channel[0];
 589         return 0;
 590 }
 591
 592 /* PCM close callback */
 593 static int snd_sgio2audio_pcm_close(struct snd_pcm_substream *substream)
 594 {
 595         struct snd_pcm_runtime *runtime = substream->runtime;
 596
 597         runtime->private_data = NULL;
 598         return 0;
 599 }
 600
 601
 602 /* hw_params callback */
 603 static int snd_sgio2audio_pcm_hw_params(struct snd_pcm_substream *substream,
 604                                         struct snd_pcm_hw_params *hw_params)
 605 {
 606         return snd_pcm_lib_alloc_vmalloc_buffer(substream,
 607                                                 params_buffer_bytes(hw_params));
 608 }
 609
 610 /* hw_free callback */
 611 static int snd_sgio2audio_pcm_hw_free(struct snd_pcm_substream *substream)
 612 {
 613         return snd_pcm_lib_free_vmalloc_buffer(substream);
 614 }
 615
 616 /* prepare callback */
 617 static int snd_sgio2audio_pcm_prepare(struct snd_pcm_substream *substream)
 618 {
 619         struct snd_sgio2audio *chip = snd_pcm_substream_chip(substream);
 620         struct snd_pcm_runtime *runtime = substream->runtime;
 621         struct snd_sgio2audio_chan *chan = substream->runtime->private_data;
 622         int ch = chan->idx;
 623         unsigned long flags;
 624
 625         spin_lock_irqsave(&chip->channel[ch].lock, flags);
 626
 627         /* Setup the pseudo-dma transfer pointers.  */
 628         chip->channel[ch].pos = 0;
 629         chip->channel[ch].size = 0;
 630         chip->channel[ch].substream = substream;
 631
 632         /* set AD1843 format */
 633         /* hardware format is always S16_LE */
 634         switch (substream->stream) {
 635         case SNDRV_PCM_STREAM_PLAYBACK:
 636                 ad1843_setup_dac(&chip->ad1843,
 637                                  ch - 1,
 638                                  runtime->rate,
 639                                  SNDRV_PCM_FORMAT_S16_LE,
 640                                  runtime->channels);
 641                 break;
 642         case SNDRV_PCM_STREAM_CAPTURE:
 643                 ad1843_setup_adc(&chip->ad1843,
 644                                  runtime->rate,
 645                                  SNDRV_PCM_FORMAT_S16_LE,
 646                                  runtime->channels);
 647                 break;
 648         }
 649         spin_unlock_irqrestore(&chip->channel[ch].lock, flags);
 650         return 0;
 651 }
 652
 653 /* trigger callback */
 654 static int snd_sgio2audio_pcm_trigger(struct snd_pcm_substream *substream,
 655                                       int cmd)
 656 {
 657         switch (cmd) {
 658         case SNDRV_PCM_TRIGGER_START:
 659                 /* start the PCM engine */
 660                 snd_sgio2audio_dma_start(substream);
 661                 break;
 662         case SNDRV_PCM_TRIGGER_STOP:
 663                 /* stop the PCM engine */
 664                 snd_sgio2audio_dma_stop(substream);
 665                 break;
 666         default:
 667                 return -EINVAL;
 668         }
 669         return 0;
 670 }
 671
 672 /* pointer callback */
 673 static snd_pcm_uframes_t
 674 snd_sgio2audio_pcm_pointer(struct snd_pcm_substream *substream)
 675 {
 676         struct snd_sgio2audio *chip = snd_pcm_substream_chip(substream);
 677         struct snd_sgio2audio_chan *chan = substream->runtime->private_data;
 678
 679         /* get the current hardware pointer */
 680         return bytes_to_frames(substream->runtime,
 681                                chip->channel[chan->idx].pos);
 682 }
 683
 684 /* operators */
 685 static struct snd_pcm_ops snd_sgio2audio_playback1_ops = {
 686         .open =        snd_sgio2audio_playback1_open,
 687         .close =       snd_sgio2audio_pcm_close,
 688         .ioctl =       snd_pcm_lib_ioctl,
 689         .hw_params =   snd_sgio2audio_pcm_hw_params,
 690         .hw_free =     snd_sgio2audio_pcm_hw_free,
 691         .prepare =     snd_sgio2audio_pcm_prepare,
 692         .trigger =     snd_sgio2audio_pcm_trigger,
 693         .pointer =     snd_sgio2audio_pcm_pointer,
 694         .page =        snd_pcm_lib_get_vmalloc_page,
 695         .mmap =        snd_pcm_lib_mmap_vmalloc,
 696 };
 697
 698 static struct snd_pcm_ops snd_sgio2audio_playback2_ops = {
 699         .open =        snd_sgio2audio_playback2_open,
 700         .close =       snd_sgio2audio_pcm_close,
 701         .ioctl =       snd_pcm_lib_ioctl,
 702         .hw_params =   snd_sgio2audio_pcm_hw_params,
 703         .hw_free =     snd_sgio2audio_pcm_hw_free,
 704         .prepare =     snd_sgio2audio_pcm_prepare,
 705         .trigger =     snd_sgio2audio_pcm_trigger,
 706         .pointer =     snd_sgio2audio_pcm_pointer,
 707         .page =        snd_pcm_lib_get_vmalloc_page,
 708         .mmap =        snd_pcm_lib_mmap_vmalloc,
 709 };
 710
 711 static struct snd_pcm_ops snd_sgio2audio_capture_ops = {
 712         .open =        snd_sgio2audio_capture_open,
 713         .close =       snd_sgio2audio_pcm_close,
 714         .ioctl =       snd_pcm_lib_ioctl,
 715         .hw_params =   snd_sgio2audio_pcm_hw_params,
 716         .hw_free =     snd_sgio2audio_pcm_hw_free,
 717         .prepare =     snd_sgio2audio_pcm_prepare,
 718         .trigger =     snd_sgio2audio_pcm_trigger,
 719         .pointer =     snd_sgio2audio_pcm_pointer,
 720         .page =        snd_pcm_lib_get_vmalloc_page,
 721         .mmap =        snd_pcm_lib_mmap_vmalloc,
 722 };
 723
 724 /*
 725  *  definitions of capture are omitted here...
 726  */
 727
 728 /* create a pcm device */
 729 static int snd_sgio2audio_new_pcm(struct snd_sgio2audio *chip)
 730 {
 731         struct snd_pcm *pcm;
 732         int err;
 733
 734         /* create first pcm device with one outputs and one input */
 735         err = snd_pcm_new(chip->card, "SGI O2 Audio", 0, 1, 1, &pcm);
 736         if (err < 0)
 737                 return err;
 738
 739         pcm->private_data = chip;
 740         strcpy(pcm->name, "SGI O2 DAC1");
 741
 742         /* set operators */
 743         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
 744                         &snd_sgio2audio_playback1_ops);
 745         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
 746                         &snd_sgio2audio_capture_ops);
 747
 748         /* create second  pcm device with one outputs and no input */
 749         err = snd_pcm_new(chip->card, "SGI O2 Audio", 1, 1, 0, &pcm);
 750         if (err < 0)
 751                 return err;
 752
 753         pcm->private_data = chip;
 754         strcpy(pcm->name, "SGI O2 DAC2");
 755
 756         /* set operators */
 757         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
 758                         &snd_sgio2audio_playback2_ops);
 759
 760         return 0;
 761 }
 762
 763 static struct {
 764         int idx;
 765         int irq;
 766         irqreturn_t (*isr)(int, void *);
 767         const char *desc;
 768 } snd_sgio2_isr_table[] = {
 769         {
 770                 .idx = 0,
 771                 .irq = MACEISA_AUDIO1_DMAT_IRQ,
 772                 .isr = snd_sgio2audio_dma_in_isr,
 773                 .desc = "Capture DMA Channel 0"
 774         }, {
 775                 .idx = 0,
 776                 .irq = MACEISA_AUDIO1_OF_IRQ,
 777                 .isr = snd_sgio2audio_error_isr,
 778                 .desc = "Capture Overflow"
 779         }, {
 780                 .idx = 1,
 781                 .irq = MACEISA_AUDIO2_DMAT_IRQ,
 782                 .isr = snd_sgio2audio_dma_out_isr,
 783                 .desc = "Playback DMA Channel 1"
 784         }, {
 785                 .idx = 1,
 786                 .irq = MACEISA_AUDIO2_MERR_IRQ,
 787                 .isr = snd_sgio2audio_error_isr,
 788                 .desc = "Memory Error Channel 1"
 789         }, {
 790                 .idx = 2,
 791                 .irq = MACEISA_AUDIO3_DMAT_IRQ,
 792                 .isr = snd_sgio2audio_dma_out_isr,
 793                 .desc = "Playback DMA Channel 2"
 794         }, {
 795                 .idx = 2,
 796                 .irq = MACEISA_AUDIO3_MERR_IRQ,
 797                 .isr = snd_sgio2audio_error_isr,
 798                 .desc = "Memory Error Channel 2"
 799         }
 800 };
 801
 802 /* ALSA driver */
 803
 804 static int snd_sgio2audio_free(struct snd_sgio2audio *chip)
 805 {
 806         int i;
 807
 808         /* reset interface */
 809         writeq(AUDIO_CONTROL_RESET, &mace->perif.audio.control);
 810         udelay(1);
 811         writeq(0, &mace->perif.audio.control);
 812
 813         /* release IRQ's */
 814         for (i = 0; i < ARRAY_SIZE(snd_sgio2_isr_table); i++)
 815                 free_irq(snd_sgio2_isr_table[i].irq,
 816                          &chip->channel[snd_sgio2_isr_table[i].idx]);
 817
 818         dma_free_coherent(NULL, MACEISA_RINGBUFFERS_SIZE,
 819                           chip->ring_base, chip->ring_base_dma);
 820
 821         /* release card data */
 822         kfree(chip);
 823         return 0;
 824 }
 825
 826 static int snd_sgio2audio_dev_free(struct snd_device *device)
 827 {
 828         struct snd_sgio2audio *chip = device->device_data;
 829
 830         return snd_sgio2audio_free(chip);
 831 }
 832
 833 static struct snd_device_ops ops = {
 834         .dev_free = snd_sgio2audio_dev_free,
 835 };
 836
 837 static int snd_sgio2audio_create(struct snd_card *card,
 838                                  struct snd_sgio2audio **rchip)
 839 {
 840         struct snd_sgio2audio *chip;
 841         int i, err;
 842
 843         *rchip = NULL;
 844
 845         /* check if a codec is attached to the interface */
 846         /* (Audio or Audio/Video board present) */
 847         if (!(readq(&mace->perif.audio.control) & AUDIO_CONTROL_CODEC_PRESENT))
 848                 return -ENOENT;
 849
 850         chip = kzalloc(sizeof(struct snd_sgio2audio), GFP_KERNEL);
 851         if (chip == NULL)
 852                 return -ENOMEM;
 853
 854         chip->card = card;
 855
 856         chip->ring_base = dma_alloc_coherent(NULL, MACEISA_RINGBUFFERS_SIZE,
 857                                              &chip->ring_base_dma, GFP_USER);
 858         if (chip->ring_base == NULL) {
 859                 printk(KERN_ERR
 860                        "sgio2audio: could not allocate ring buffers\n");
 861                 kfree(chip);
 862                 return -ENOMEM;
 863         }
 864
 865         spin_lock_init(&chip->ad1843_lock);
 866
 867         /* initialize channels */
 868         for (i = 0; i < 3; i++) {
 869                 spin_lock_init(&chip->channel[i].lock);
 870                 chip->channel[i].idx = i;
 871         }
 872
 873         /* allocate IRQs */
 874         for (i = 0; i < ARRAY_SIZE(snd_sgio2_isr_table); i++) {
 875                 if (request_irq(snd_sgio2_isr_table[i].irq,
 876                                 snd_sgio2_isr_table[i].isr,
 877                                 0,
 878                                 snd_sgio2_isr_table[i].desc,
 879                                 &chip->channel[snd_sgio2_isr_table[i].idx])) {
 880                         snd_sgio2audio_free(chip);
 881                         printk(KERN_ERR "sgio2audio: cannot allocate irq %d\n",
 882                                snd_sgio2_isr_table[i].irq);
 883                         return -EBUSY;
 884                 }
 885         }
 886
 887         /* reset the interface */
 888         writeq(AUDIO_CONTROL_RESET, &mace->perif.audio.control);
 889         udelay(1);
 890         writeq(0, &mace->perif.audio.control);
 891         msleep_interruptible(1); /* give time to recover */
 892
 893         /* set ring base */
 894         writeq(chip->ring_base_dma, &mace->perif.ctrl.ringbase);
 895
 896         /* attach the AD1843 codec */
 897         chip->ad1843.read = read_ad1843_reg;
 898         chip->ad1843.write = write_ad1843_reg;
 899         chip->ad1843.chip = chip;
 900
 901         /* initialize the AD1843 codec */
 902         err = ad1843_init(&chip->ad1843);
 903         if (err < 0) {
 904                 snd_sgio2audio_free(chip);
 905                 return err;
 906         }
 907
 908         err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops);
 909         if (err < 0) {
 910                 snd_sgio2audio_free(chip);
 911                 return err;
 912         }
 913         *rchip = chip;
 914         return 0;
 915 }
 916
 917 static int snd_sgio2audio_probe(struct platform_device *pdev)
 918 {
 919         struct snd_card *card;
 920         struct snd_sgio2audio *chip;
 921         int err;
 922
 923         err = snd_card_create(index, id, THIS_MODULE, 0, &card);
 924         if (err < 0)
 925                 return err;
 926
 927         err = snd_sgio2audio_create(card, &chip);
 928         if (err < 0) {
 929                 snd_card_free(card);
 930                 return err;
 931         }
 932         snd_card_set_dev(card, &pdev->dev);
 933
 934         err = snd_sgio2audio_new_pcm(chip);
 935         if (err < 0) {
 936                 snd_card_free(card);
 937                 return err;
 938         }
 939         err = snd_sgio2audio_new_mixer(chip);
 940         if (err < 0) {
 941                 snd_card_free(card);
 942                 return err;
 943         }
 944
 945         strcpy(card->driver, "SGI O2 Audio");
 946         strcpy(card->shortname, "SGI O2 Audio");
 947         sprintf(card->longname, "%s irq %i-%i",
 948                 card->shortname,
 949                 MACEISA_AUDIO1_DMAT_IRQ,
 950                 MACEISA_AUDIO3_MERR_IRQ);
 951
 952         err = snd_card_register(card);
 953         if (err < 0) {
 954                 snd_card_free(card);
 955                 return err;
 956         }
 957         platform_set_drvdata(pdev, card);
 958         return 0;
 959 }
 960
 961 static int snd_sgio2audio_remove(struct platform_device *pdev)
 962 {
 963         struct snd_card *card = platform_get_drvdata(pdev);
 964
 965         snd_card_free(card);
 966         return 0;
 967 }
 968
 969 static struct platform_driver sgio2audio_driver = {
 970         .probe  = snd_sgio2audio_probe,
 971         .remove = snd_sgio2audio_remove,
 972         .driver = {
 973                 .name   = "sgio2audio",
 974                 .owner  = THIS_MODULE,
 975         }
 976 };
 977
 978 module_platform_driver(sgio2audio_driver);