sound/arm/aaci.c

   1 /*
   2  *  linux/sound/arm/aaci.c - ARM PrimeCell AACI PL041 driver
   3  *
   4  *  Copyright (C) 2003 Deep Blue Solutions Ltd, All Rights Reserved.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 as
   8  * published by the Free Software Foundation.
   9  *
  10  *  Documentation: ARM DDI 0173B
  11  */
  12 #include <linux/module.h>
  13 #include <linux/delay.h>
  14 #include <linux/init.h>
  15 #include <linux/ioport.h>
  16 #include <linux/device.h>
  17 #include <linux/spinlock.h>
  18 #include <linux/interrupt.h>
  19 #include <linux/err.h>
  20 #include <linux/amba/bus.h>
  21 #include <linux/io.h>
  22
  23 #include <sound/core.h>
  24 #include <sound/initval.h>
  25 #include <sound/ac97_codec.h>
  26 #include <sound/pcm.h>
  27 #include <sound/pcm_params.h>
  28
  29 #include "aaci.h"
  30
  31 #define DRIVER_NAME     "aaci-pl041"
  32
  33 /*
  34  * PM support is not complete.  Turn it off.
  35  */
  36 #undef CONFIG_PM
  37
  38 static void aaci_ac97_select_codec(struct aaci *aaci, struct snd_ac97 *ac97)
  39 {
  40         u32 v, maincr = aaci->maincr | MAINCR_SCRA(ac97->num);
  41
  42         /*
  43          * Ensure that the slot 1/2 RX registers are empty.
  44          */
  45         v = readl(aaci->base + AACI_SLFR);
  46         if (v & SLFR_2RXV)
  47                 readl(aaci->base + AACI_SL2RX);
  48         if (v & SLFR_1RXV)
  49                 readl(aaci->base + AACI_SL1RX);
  50
  51         writel(maincr, aaci->base + AACI_MAINCR);
  52 }
  53
  54 /*
  55  * P29:
  56  *  The recommended use of programming the external codec through slot 1
  57  *  and slot 2 data is to use the channels during setup routines and the
  58  *  slot register at any other time.  The data written into slot 1, slot 2
  59  *  and slot 12 registers is transmitted only when their corresponding
  60  *  SI1TxEn, SI2TxEn and SI12TxEn bits are set in the AACI_MAINCR
  61  *  register.
  62  */
  63 static void aaci_ac97_write(struct snd_ac97 *ac97, unsigned short reg,
  64                             unsigned short val)
  65 {
  66         struct aaci *aaci = ac97->private_data;
  67         u32 v;
  68         int timeout = 5000;
  69
  70         if (ac97->num >= 4)
  71                 return;
  72
  73         mutex_lock(&aaci->ac97_sem);
  74
  75         aaci_ac97_select_codec(aaci, ac97);
  76
  77         /*
  78          * P54: You must ensure that AACI_SL2TX is always written
  79          * to, if required, before data is written to AACI_SL1TX.
  80          */
  81         writel(val << 4, aaci->base + AACI_SL2TX);
  82         writel(reg << 12, aaci->base + AACI_SL1TX);
  83
  84         /*
  85          * Wait for the transmission of both slots to complete.
  86          */
  87         do {
  88                 v = readl(aaci->base + AACI_SLFR);
  89         } while ((v & (SLFR_1TXB|SLFR_2TXB)) && --timeout);
  90
  91         if (!timeout)
  92                 dev_err(&aaci->dev->dev,
  93                         "timeout waiting for write to complete\n");
  94
  95         mutex_unlock(&aaci->ac97_sem);
  96 }
  97
  98 /*
  99  * Read an AC'97 register.
 100  */
 101 static unsigned short aaci_ac97_read(struct snd_ac97 *ac97, unsigned short reg)
 102 {
 103         struct aaci *aaci = ac97->private_data;
 104         u32 v;
 105         int timeout = 5000;
 106         int retries = 10;
 107
 108         if (ac97->num >= 4)
 109                 return ~0;
 110
 111         mutex_lock(&aaci->ac97_sem);
 112
 113         aaci_ac97_select_codec(aaci, ac97);
 114
 115         /*
 116          * Write the register address to slot 1.
 117          */
 118         writel((reg << 12) | (1 << 19), aaci->base + AACI_SL1TX);
 119
 120         /*
 121          * Wait for the transmission to complete.
 122          */
 123         do {
 124                 v = readl(aaci->base + AACI_SLFR);
 125         } while ((v & SLFR_1TXB) && --timeout);
 126
 127         if (!timeout) {
 128                 dev_err(&aaci->dev->dev, "timeout on slot 1 TX busy\n");
 129                 v = ~0;
 130                 goto out;
 131         }
 132
 133         /*
 134          * Give the AC'97 codec more than enough time
 135          * to respond. (42us = ~2 frames at 48kHz.)
 136          */
 137         udelay(42);
 138
 139         /*
 140          * Wait for slot 2 to indicate data.
 141          */
 142         timeout = 5000;
 143         do {
 144                 cond_resched();
 145                 v = readl(aaci->base + AACI_SLFR) & (SLFR_1RXV|SLFR_2RXV);
 146         } while ((v != (SLFR_1RXV|SLFR_2RXV)) && --timeout);
 147
 148         if (!timeout) {
 149                 dev_err(&aaci->dev->dev, "timeout on RX valid\n");
 150                 v = ~0;
 151                 goto out;
 152         }
 153
 154         do {
 155                 v = readl(aaci->base + AACI_SL1RX) >> 12;
 156                 if (v == reg) {
 157                         v = readl(aaci->base + AACI_SL2RX) >> 4;
 158                         break;
 159                 } else if (--retries) {
 160                         dev_warn(&aaci->dev->dev,
 161                                  "ac97 read back fail.  retry\n");
 162                         continue;
 163                 } else {
 164                         dev_warn(&aaci->dev->dev,
 165                                 "wrong ac97 register read back (%x != %x)\n",
 166                                 v, reg);
 167                         v = ~0;
 168                 }
 169         } while (retries);
 170  out:
 171         mutex_unlock(&aaci->ac97_sem);
 172         return v;
 173 }
 174
 175 static inline void
 176 aaci_chan_wait_ready(struct aaci_runtime *aacirun, unsigned long mask)
 177 {
 178         u32 val;
 179         int timeout = 5000;
 180
 181         do {
 182                 val = readl(aacirun->base + AACI_SR);
 183         } while (val & mask && timeout--);
 184 }
 185
 186
 187
 188 /*
 189  * Interrupt support.
 190  */
 191 static void aaci_fifo_irq(struct aaci *aaci, int channel, u32 mask)
 192 {
 193         if (mask & ISR_ORINTR) {
 194                 dev_warn(&aaci->dev->dev, "RX overrun on chan %d\n", channel);
 195                 writel(ICLR_RXOEC1 << channel, aaci->base + AACI_INTCLR);
 196         }
 197
 198         if (mask & ISR_RXTOINTR) {
 199                 dev_warn(&aaci->dev->dev, "RX timeout on chan %d\n", channel);
 200                 writel(ICLR_RXTOFEC1 << channel, aaci->base + AACI_INTCLR);
 201         }
 202
 203         if (mask & ISR_RXINTR) {
 204                 struct aaci_runtime *aacirun = &aaci->capture;
 205                 void *ptr;
 206
 207                 if (!aacirun->substream || !aacirun->start) {
 208                         dev_warn(&aaci->dev->dev, "RX interrupt???\n");
 209                         writel(0, aacirun->base + AACI_IE);
 210                         return;
 211                 }
 212
 213                 spin_lock(&aacirun->lock);
 214
 215                 ptr = aacirun->ptr;
 216                 do {
 217                         unsigned int len = aacirun->fifosz;
 218                         u32 val;
 219
 220                         if (aacirun->bytes <= 0) {
 221                                 aacirun->bytes += aacirun->period;
 222                                 aacirun->ptr = ptr;
 223                                 spin_unlock(&aacirun->lock);
 224                                 snd_pcm_period_elapsed(aacirun->substream);
 225                                 spin_lock(&aacirun->lock);
 226                         }
 227                         if (!(aacirun->cr & CR_EN))
 228                                 break;
 229
 230                         val = readl(aacirun->base + AACI_SR);
 231                         if (!(val & SR_RXHF))
 232                                 break;
 233                         if (!(val & SR_RXFF))
 234                                 len >>= 1;
 235
 236                         aacirun->bytes -= len;
 237
 238                         /* reading 16 bytes at a time */
 239                         for( ; len > 0; len -= 16) {
 240                                 asm(
 241                                         "ldmia  %1, {r0, r1, r2, r3}\n\t"
 242                                         "stmia  %0!, {r0, r1, r2, r3}"
 243                                         : "+r" (ptr)
 244                                         : "r" (aacirun->fifo)
 245                                         : "r0", "r1", "r2", "r3", "cc");
 246
 247                                 if (ptr >= aacirun->end)
 248                                         ptr = aacirun->start;
 249                         }
 250                 } while(1);
 251
 252                 aacirun->ptr = ptr;
 253
 254                 spin_unlock(&aacirun->lock);
 255         }
 256
 257         if (mask & ISR_URINTR) {
 258                 dev_dbg(&aaci->dev->dev, "TX underrun on chan %d\n", channel);
 259                 writel(ICLR_TXUEC1 << channel, aaci->base + AACI_INTCLR);
 260         }
 261
 262         if (mask & ISR_TXINTR) {
 263                 struct aaci_runtime *aacirun = &aaci->playback;
 264                 void *ptr;
 265
 266                 if (!aacirun->substream || !aacirun->start) {
 267                         dev_warn(&aaci->dev->dev, "TX interrupt???\n");
 268                         writel(0, aacirun->base + AACI_IE);
 269                         return;
 270                 }
 271
 272                 spin_lock(&aacirun->lock);
 273
 274                 ptr = aacirun->ptr;
 275                 do {
 276                         unsigned int len = aacirun->fifosz;
 277                         u32 val;
 278
 279                         if (aacirun->bytes <= 0) {
 280                                 aacirun->bytes += aacirun->period;
 281                                 aacirun->ptr = ptr;
 282                                 spin_unlock(&aacirun->lock);
 283                                 snd_pcm_period_elapsed(aacirun->substream);
 284                                 spin_lock(&aacirun->lock);
 285                         }
 286                         if (!(aacirun->cr & CR_EN))
 287                                 break;
 288
 289                         val = readl(aacirun->base + AACI_SR);
 290                         if (!(val & SR_TXHE))
 291                                 break;
 292                         if (!(val & SR_TXFE))
 293                                 len >>= 1;
 294
 295                         aacirun->bytes -= len;
 296
 297                         /* writing 16 bytes at a time */
 298                         for ( ; len > 0; len -= 16) {
 299                                 asm(
 300                                         "ldmia  %0!, {r0, r1, r2, r3}\n\t"
 301                                         "stmia  %1, {r0, r1, r2, r3}"
 302                                         : "+r" (ptr)
 303                                         : "r" (aacirun->fifo)
 304                                         : "r0", "r1", "r2", "r3", "cc");
 305
 306                                 if (ptr >= aacirun->end)
 307                                         ptr = aacirun->start;
 308                         }
 309                 } while (1);
 310
 311                 aacirun->ptr = ptr;
 312
 313                 spin_unlock(&aacirun->lock);
 314         }
 315 }
 316
 317 static irqreturn_t aaci_irq(int irq, void *devid)
 318 {
 319         struct aaci *aaci = devid;
 320         u32 mask;
 321         int i;
 322
 323         mask = readl(aaci->base + AACI_ALLINTS);
 324         if (mask) {
 325                 u32 m = mask;
 326                 for (i = 0; i < 4; i++, m >>= 7) {
 327                         if (m & 0x7f) {
 328                                 aaci_fifo_irq(aaci, i, m);
 329                         }
 330                 }
 331         }
 332
 333         return mask ? IRQ_HANDLED : IRQ_NONE;
 334 }
 335
 336
 337
 338 /*
 339  * ALSA support.
 340  */
 341 static struct snd_pcm_hardware aaci_hw_info = {
 342         .info                   = SNDRV_PCM_INFO_MMAP |
 343                                   SNDRV_PCM_INFO_MMAP_VALID |
 344                                   SNDRV_PCM_INFO_INTERLEAVED |
 345                                   SNDRV_PCM_INFO_BLOCK_TRANSFER |
 346                                   SNDRV_PCM_INFO_RESUME,
 347
 348         /*
 349          * ALSA doesn't support 18-bit or 20-bit packed into 32-bit
 350          * words.  It also doesn't support 12-bit at all.
 351          */
 352         .formats                = SNDRV_PCM_FMTBIT_S16_LE,
 353
 354         /* rates are setup from the AC'97 codec */
 355         .channels_min           = 2,
 356         .channels_max           = 6,
 357         .buffer_bytes_max       = 64 * 1024,
 358         .period_bytes_min       = 256,
 359         .period_bytes_max       = PAGE_SIZE,
 360         .periods_min            = 4,
 361         .periods_max            = PAGE_SIZE / 16,
 362 };
 363
 364 static int __aaci_pcm_open(struct aaci *aaci,
 365                            struct snd_pcm_substream *substream,
 366                            struct aaci_runtime *aacirun)
 367 {
 368         struct snd_pcm_runtime *runtime = substream->runtime;
 369         int ret;
 370
 371         aacirun->substream = substream;
 372         runtime->private_data = aacirun;
 373         runtime->hw = aaci_hw_info;
 374         runtime->hw.rates = aacirun->pcm->rates;
 375         snd_pcm_limit_hw_rates(runtime);
 376
 377         if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK &&
 378             aacirun->pcm->r[1].slots)
 379                 snd_ac97_pcm_double_rate_rules(runtime);
 380
 381         /*
 382          * FIXME: ALSA specifies fifo_size in bytes.  If we're in normal
 383          * mode, each 32-bit word contains one sample.  If we're in
 384          * compact mode, each 32-bit word contains two samples, effectively
 385          * halving the FIFO size.  However, we don't know for sure which
 386          * we'll be using at this point.  We set this to the lower limit.
 387          */
 388         runtime->hw.fifo_size = aaci->fifosize * 2;
 389
 390         ret = request_irq(aaci->dev->irq[0], aaci_irq, IRQF_SHARED|IRQF_DISABLED,
 391                           DRIVER_NAME, aaci);
 392         if (ret)
 393                 goto out;
 394
 395         return 0;
 396
 397  out:
 398         return ret;
 399 }
 400
 401
 402 /*
 403  * Common ALSA stuff
 404  */
 405 static int aaci_pcm_close(struct snd_pcm_substream *substream)
 406 {
 407         struct aaci *aaci = substream->private_data;
 408         struct aaci_runtime *aacirun = substream->runtime->private_data;
 409
 410         WARN_ON(aacirun->cr & CR_EN);
 411
 412         aacirun->substream = NULL;
 413         free_irq(aaci->dev->irq[0], aaci);
 414
 415         return 0;
 416 }
 417
 418 static int aaci_pcm_hw_free(struct snd_pcm_substream *substream)
 419 {
 420         struct aaci_runtime *aacirun = substream->runtime->private_data;
 421
 422         /*
 423          * This must not be called with the device enabled.
 424          */
 425         WARN_ON(aacirun->cr & CR_EN);
 426
 427         if (aacirun->pcm_open)
 428                 snd_ac97_pcm_close(aacirun->pcm);
 429         aacirun->pcm_open = 0;
 430
 431         /*
 432          * Clear out the DMA and any allocated buffers.
 433          */
 434         snd_pcm_lib_free_pages(substream);
 435
 436         return 0;
 437 }
 438
 439 static int aaci_pcm_hw_params(struct snd_pcm_substream *substream,
 440                               struct aaci_runtime *aacirun,
 441                               struct snd_pcm_hw_params *params)
 442 {
 443         int err;
 444         struct aaci *aaci = substream->private_data;
 445
 446         aaci_pcm_hw_free(substream);
 447         if (aacirun->pcm_open) {
 448                 snd_ac97_pcm_close(aacirun->pcm);
 449                 aacirun->pcm_open = 0;
 450         }
 451
 452         err = snd_pcm_lib_malloc_pages(substream,
 453                                        params_buffer_bytes(params));
 454         if (err >= 0) {
 455                 unsigned int rate = params_rate(params);
 456                 int dbl = rate > 48000;
 457
 458                 err = snd_ac97_pcm_open(aacirun->pcm, rate,
 459                                         params_channels(params),
 460                                         aacirun->pcm->r[dbl].slots);
 461
 462                 aacirun->pcm_open = err == 0;
 463                 aacirun->cr = CR_FEN | CR_COMPACT | CR_SZ16;
 464                 aacirun->fifosz = aaci->fifosize * 4;
 465
 466                 if (aacirun->cr & CR_COMPACT)
 467                         aacirun->fifosz >>= 1;
 468         }
 469
 470         return err;
 471 }
 472
 473 static int aaci_pcm_prepare(struct snd_pcm_substream *substream)
 474 {
 475         struct snd_pcm_runtime *runtime = substream->runtime;
 476         struct aaci_runtime *aacirun = runtime->private_data;
 477
 478         aacirun->start  = runtime->dma_area;
 479         aacirun->end    = aacirun->start + snd_pcm_lib_buffer_bytes(substream);
 480         aacirun->ptr    = aacirun->start;
 481         aacirun->period =
 482         aacirun->bytes  = frames_to_bytes(runtime, runtime->period_size);
 483
 484         return 0;
 485 }
 486
 487 static snd_pcm_uframes_t aaci_pcm_pointer(struct snd_pcm_substream *substream)
 488 {
 489         struct snd_pcm_runtime *runtime = substream->runtime;
 490         struct aaci_runtime *aacirun = runtime->private_data;
 491         ssize_t bytes = aacirun->ptr - aacirun->start;
 492
 493         return bytes_to_frames(runtime, bytes);
 494 }
 495
 496
 497 /*
 498  * Playback specific ALSA stuff
 499  */
 500 static const u32 channels_to_txmask[] = {
 501         [2] = CR_SL3 | CR_SL4,
 502         [4] = CR_SL3 | CR_SL4 | CR_SL7 | CR_SL8,
 503         [6] = CR_SL3 | CR_SL4 | CR_SL7 | CR_SL8 | CR_SL6 | CR_SL9,
 504 };
 505
 506 /*
 507  * We can support two and four channel audio.  Unfortunately
 508  * six channel audio requires a non-standard channel ordering:
 509  *   2 -> FL(3), FR(4)
 510  *   4 -> FL(3), FR(4), SL(7), SR(8)
 511  *   6 -> FL(3), FR(4), SL(7), SR(8), C(6), LFE(9) (required)
 512  *        FL(3), FR(4), C(6), SL(7), SR(8), LFE(9) (actual)
 513  * This requires an ALSA configuration file to correct.
 514  */
 515 static unsigned int channel_list[] = { 2, 4, 6 };
 516
 517 static int
 518 aaci_rule_channels(struct snd_pcm_hw_params *p, struct snd_pcm_hw_rule *rule)
 519 {
 520         struct aaci *aaci = rule->private;
 521         unsigned int chan_mask = 1 << 0, slots;
 522
 523         /*
 524          * pcms[0] is the our 5.1 PCM instance.
 525          */
 526         slots = aaci->ac97_bus->pcms[0].r[0].slots;
 527         if (slots & (1 << AC97_SLOT_PCM_SLEFT)) {
 528                 chan_mask |= 1 << 1;
 529                 if (slots & (1 << AC97_SLOT_LFE))
 530                         chan_mask |= 1 << 2;
 531         }
 532
 533         return snd_interval_list(hw_param_interval(p, rule->var),
 534                                  ARRAY_SIZE(channel_list), channel_list,
 535                                  chan_mask);
 536 }
 537
 538 static int aaci_pcm_open(struct snd_pcm_substream *substream)
 539 {
 540         struct aaci *aaci = substream->private_data;
 541         int ret;
 542
 543         /*
 544          * Add rule describing channel dependency.
 545          */
 546         ret = snd_pcm_hw_rule_add(substream->runtime, 0,
 547                                   SNDRV_PCM_HW_PARAM_CHANNELS,
 548                                   aaci_rule_channels, aaci,
 549                                   SNDRV_PCM_HW_PARAM_CHANNELS, -1);
 550         if (ret)
 551                 return ret;
 552
 553         if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK) {
 554                 ret = __aaci_pcm_open(aaci, substream, &aaci->playback);
 555         } else {
 556                 ret = __aaci_pcm_open(aaci, substream, &aaci->capture);
 557         }
 558         return ret;
 559 }
 560
 561 static int aaci_pcm_playback_hw_params(struct snd_pcm_substream *substream,
 562                                        struct snd_pcm_hw_params *params)
 563 {
 564         struct aaci_runtime *aacirun = substream->runtime->private_data;
 565         unsigned int channels = params_channels(params);
 566         int ret;
 567
 568         WARN_ON(channels >= ARRAY_SIZE(channels_to_txmask) ||
 569                 !channels_to_txmask[channels]);
 570
 571         ret = aaci_pcm_hw_params(substream, aacirun, params);
 572
 573         /*
 574          * Enable FIFO, compact mode, 16 bits per sample.
 575          * FIXME: double rate slots?
 576          */
 577         if (ret >= 0)
 578                 aacirun->cr |= channels_to_txmask[channels];
 579
 580         return ret;
 581 }
 582
 583 static void aaci_pcm_playback_stop(struct aaci_runtime *aacirun)
 584 {
 585         u32 ie;
 586
 587         ie = readl(aacirun->base + AACI_IE);
 588         ie &= ~(IE_URIE|IE_TXIE);
 589         writel(ie, aacirun->base + AACI_IE);
 590         aacirun->cr &= ~CR_EN;
 591         aaci_chan_wait_ready(aacirun, SR_TXB);
 592         writel(aacirun->cr, aacirun->base + AACI_TXCR);
 593 }
 594
 595 static void aaci_pcm_playback_start(struct aaci_runtime *aacirun)
 596 {
 597         u32 ie;
 598
 599         aaci_chan_wait_ready(aacirun, SR_TXB);
 600         aacirun->cr |= CR_EN;
 601
 602         ie = readl(aacirun->base + AACI_IE);
 603         ie |= IE_URIE | IE_TXIE;
 604         writel(ie, aacirun->base + AACI_IE);
 605         writel(aacirun->cr, aacirun->base + AACI_TXCR);
 606 }
 607
 608 static int aaci_pcm_playback_trigger(struct snd_pcm_substream *substream, int cmd)
 609 {
 610         struct aaci_runtime *aacirun = substream->runtime->private_data;
 611         unsigned long flags;
 612         int ret = 0;
 613
 614         spin_lock_irqsave(&aacirun->lock, flags);
 615
 616         switch (cmd) {
 617         case SNDRV_PCM_TRIGGER_START:
 618                 aaci_pcm_playback_start(aacirun);
 619                 break;
 620
 621         case SNDRV_PCM_TRIGGER_RESUME:
 622                 aaci_pcm_playback_start(aacirun);
 623                 break;
 624
 625         case SNDRV_PCM_TRIGGER_STOP:
 626                 aaci_pcm_playback_stop(aacirun);
 627                 break;
 628
 629         case SNDRV_PCM_TRIGGER_SUSPEND:
 630                 aaci_pcm_playback_stop(aacirun);
 631                 break;
 632
 633         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
 634                 break;
 635
 636         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
 637                 break;
 638
 639         default:
 640                 ret = -EINVAL;
 641         }
 642
 643         spin_unlock_irqrestore(&aacirun->lock, flags);
 644
 645         return ret;
 646 }
 647
 648 static struct snd_pcm_ops aaci_playback_ops = {
 649         .open           = aaci_pcm_open,
 650         .close          = aaci_pcm_close,
 651         .ioctl          = snd_pcm_lib_ioctl,
 652         .hw_params      = aaci_pcm_playback_hw_params,
 653         .hw_free        = aaci_pcm_hw_free,
 654         .prepare        = aaci_pcm_prepare,
 655         .trigger        = aaci_pcm_playback_trigger,
 656         .pointer        = aaci_pcm_pointer,
 657 };
 658
 659 static int aaci_pcm_capture_hw_params(struct snd_pcm_substream *substream,
 660                                       struct snd_pcm_hw_params *params)
 661 {
 662         struct aaci_runtime *aacirun = substream->runtime->private_data;
 663         int ret;
 664
 665         ret = aaci_pcm_hw_params(substream, aacirun, params);
 666         if (ret >= 0)
 667                 /* Line in record: slot 3 and 4 */
 668                 aacirun->cr |= CR_SL3 | CR_SL4;
 669
 670         return ret;
 671 }
 672
 673 static void aaci_pcm_capture_stop(struct aaci_runtime *aacirun)
 674 {
 675         u32 ie;
 676
 677         aaci_chan_wait_ready(aacirun, SR_RXB);
 678
 679         ie = readl(aacirun->base + AACI_IE);
 680         ie &= ~(IE_ORIE | IE_RXIE);
 681         writel(ie, aacirun->base+AACI_IE);
 682
 683         aacirun->cr &= ~CR_EN;
 684
 685         writel(aacirun->cr, aacirun->base + AACI_RXCR);
 686 }
 687
 688 static void aaci_pcm_capture_start(struct aaci_runtime *aacirun)
 689 {
 690         u32 ie;
 691
 692         aaci_chan_wait_ready(aacirun, SR_RXB);
 693
 694 #ifdef DEBUG
 695         /* RX Timeout value: bits 28:17 in RXCR */
 696         aacirun->cr |= 0xf << 17;
 697 #endif
 698
 699         aacirun->cr |= CR_EN;
 700         writel(aacirun->cr, aacirun->base + AACI_RXCR);
 701
 702         ie = readl(aacirun->base + AACI_IE);
 703         ie |= IE_ORIE |IE_RXIE; // overrun and rx interrupt -- half full
 704         writel(ie, aacirun->base + AACI_IE);
 705 }
 706
 707 static int aaci_pcm_capture_trigger(struct snd_pcm_substream *substream, int cmd)
 708 {
 709         struct aaci_runtime *aacirun = substream->runtime->private_data;
 710         unsigned long flags;
 711         int ret = 0;
 712
 713         spin_lock_irqsave(&aacirun->lock, flags);
 714
 715         switch (cmd) {
 716         case SNDRV_PCM_TRIGGER_START:
 717                 aaci_pcm_capture_start(aacirun);
 718                 break;
 719
 720         case SNDRV_PCM_TRIGGER_RESUME:
 721                 aaci_pcm_capture_start(aacirun);
 722                 break;
 723
 724         case SNDRV_PCM_TRIGGER_STOP:
 725                 aaci_pcm_capture_stop(aacirun);
 726                 break;
 727
 728         case SNDRV_PCM_TRIGGER_SUSPEND:
 729                 aaci_pcm_capture_stop(aacirun);
 730                 break;
 731
 732         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
 733                 break;
 734
 735         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
 736                 break;
 737
 738         default:
 739                 ret = -EINVAL;
 740         }
 741
 742         spin_unlock_irqrestore(&aacirun->lock, flags);
 743
 744         return ret;
 745 }
 746
 747 static int aaci_pcm_capture_prepare(struct snd_pcm_substream *substream)
 748 {
 749         struct snd_pcm_runtime *runtime = substream->runtime;
 750         struct aaci *aaci = substream->private_data;
 751
 752         aaci_pcm_prepare(substream);
 753
 754         /* allow changing of sample rate */
 755         aaci_ac97_write(aaci->ac97, AC97_EXTENDED_STATUS, 0x0001); /* VRA */
 756         aaci_ac97_write(aaci->ac97, AC97_PCM_LR_ADC_RATE, runtime->rate);
 757         aaci_ac97_write(aaci->ac97, AC97_PCM_MIC_ADC_RATE, runtime->rate);
 758
 759         /* Record select: Mic: 0, Aux: 3, Line: 4 */
 760         aaci_ac97_write(aaci->ac97, AC97_REC_SEL, 0x0404);
 761
 762         return 0;
 763 }
 764
 765 static struct snd_pcm_ops aaci_capture_ops = {
 766         .open           = aaci_pcm_open,
 767         .close          = aaci_pcm_close,
 768         .ioctl          = snd_pcm_lib_ioctl,
 769         .hw_params      = aaci_pcm_capture_hw_params,
 770         .hw_free        = aaci_pcm_hw_free,
 771         .prepare        = aaci_pcm_capture_prepare,
 772         .trigger        = aaci_pcm_capture_trigger,
 773         .pointer        = aaci_pcm_pointer,
 774 };
 775
 776 /*
 777  * Power Management.
 778  */
 779 #ifdef CONFIG_PM
 780 static int aaci_do_suspend(struct snd_card *card, unsigned int state)
 781 {
 782         struct aaci *aaci = card->private_data;
 783         snd_power_change_state(card, SNDRV_CTL_POWER_D3cold);
 784         snd_pcm_suspend_all(aaci->pcm);
 785         return 0;
 786 }
 787
 788 static int aaci_do_resume(struct snd_card *card, unsigned int state)
 789 {
 790         snd_power_change_state(card, SNDRV_CTL_POWER_D0);
 791         return 0;
 792 }
 793
 794 static int aaci_suspend(struct amba_device *dev, pm_message_t state)
 795 {
 796         struct snd_card *card = amba_get_drvdata(dev);
 797         return card ? aaci_do_suspend(card) : 0;
 798 }
 799
 800 static int aaci_resume(struct amba_device *dev)
 801 {
 802         struct snd_card *card = amba_get_drvdata(dev);
 803         return card ? aaci_do_resume(card) : 0;
 804 }
 805 #else
 806 #define aaci_do_suspend         NULL
 807 #define aaci_do_resume          NULL
 808 #define aaci_suspend            NULL
 809 #define aaci_resume             NULL
 810 #endif
 811
 812
 813 static struct ac97_pcm ac97_defs[] __devinitdata = {
 814         [0] = { /* Front PCM */
 815                 .exclusive = 1,
 816                 .r = {
 817                         [0] = {
 818                                 .slots  = (1 << AC97_SLOT_PCM_LEFT) |
 819                                           (1 << AC97_SLOT_PCM_RIGHT) |
 820                                           (1 << AC97_SLOT_PCM_CENTER) |
 821                                           (1 << AC97_SLOT_PCM_SLEFT) |
 822                                           (1 << AC97_SLOT_PCM_SRIGHT) |
 823                                           (1 << AC97_SLOT_LFE),
 824                         },
 825                         [1] = {
 826                                 .slots  = (1 << AC97_SLOT_PCM_LEFT) |
 827                                           (1 << AC97_SLOT_PCM_RIGHT) |
 828                                           (1 << AC97_SLOT_PCM_LEFT_0) |
 829                                           (1 << AC97_SLOT_PCM_RIGHT_0),
 830                         },
 831                 },
 832         },
 833         [1] = { /* PCM in */
 834                 .stream = 1,
 835                 .exclusive = 1,
 836                 .r = {
 837                         [0] = {
 838                                 .slots  = (1 << AC97_SLOT_PCM_LEFT) |
 839                                           (1 << AC97_SLOT_PCM_RIGHT),
 840                         },
 841                 },
 842         },
 843         [2] = { /* Mic in */
 844                 .stream = 1,
 845                 .exclusive = 1,
 846                 .r = {
 847                         [0] = {
 848                                 .slots  = (1 << AC97_SLOT_MIC),
 849                         },
 850                 },
 851         }
 852 };
 853
 854 static struct snd_ac97_bus_ops aaci_bus_ops = {
 855         .write  = aaci_ac97_write,
 856         .read   = aaci_ac97_read,
 857 };
 858
 859 static int __devinit aaci_probe_ac97(struct aaci *aaci)
 860 {
 861         struct snd_ac97_template ac97_template;
 862         struct snd_ac97_bus *ac97_bus;
 863         struct snd_ac97 *ac97;
 864         int ret;
 865
 866         /*
 867          * Assert AACIRESET for 2us
 868          */
 869         writel(0, aaci->base + AACI_RESET);
 870         udelay(2);
 871         writel(RESET_NRST, aaci->base + AACI_RESET);
 872
 873         /*
 874          * Give the AC'97 codec more than enough time
 875          * to wake up. (42us = ~2 frames at 48kHz.)
 876          */
 877         udelay(42);
 878
 879         ret = snd_ac97_bus(aaci->card, 0, &aaci_bus_ops, aaci, &ac97_bus);
 880         if (ret)
 881                 goto out;
 882
 883         ac97_bus->clock = 48000;
 884         aaci->ac97_bus = ac97_bus;
 885
 886         memset(&ac97_template, 0, sizeof(struct snd_ac97_template));
 887         ac97_template.private_data = aaci;
 888         ac97_template.num = 0;
 889         ac97_template.scaps = AC97_SCAP_SKIP_MODEM;
 890
 891         ret = snd_ac97_mixer(ac97_bus, &ac97_template, &ac97);
 892         if (ret)
 893                 goto out;
 894         aaci->ac97 = ac97;
 895
 896         /*
 897          * Disable AC97 PC Beep input on audio codecs.
 898          */
 899         if (ac97_is_audio(ac97))
 900                 snd_ac97_write_cache(ac97, AC97_PC_BEEP, 0x801e);
 901
 902         ret = snd_ac97_pcm_assign(ac97_bus, ARRAY_SIZE(ac97_defs), ac97_defs);
 903         if (ret)
 904                 goto out;
 905
 906         aaci->playback.pcm = &ac97_bus->pcms[0];
 907         aaci->capture.pcm  = &ac97_bus->pcms[1];
 908
 909  out:
 910         return ret;
 911 }
 912
 913 static void aaci_free_card(struct snd_card *card)
 914 {
 915         struct aaci *aaci = card->private_data;
 916         if (aaci->base)
 917                 iounmap(aaci->base);
 918 }
 919
 920 static struct aaci * __devinit aaci_init_card(struct amba_device *dev)
 921 {
 922         struct aaci *aaci;
 923         struct snd_card *card;
 924         int err;
 925
 926         err = snd_card_create(SNDRV_DEFAULT_IDX1, SNDRV_DEFAULT_STR1,
 927                               THIS_MODULE, sizeof(struct aaci), &card);
 928         if (err < 0)
 929                 return NULL;
 930
 931         card->private_free = aaci_free_card;
 932
 933         strlcpy(card->driver, DRIVER_NAME, sizeof(card->driver));
 934         strlcpy(card->shortname, "ARM AC'97 Interface", sizeof(card->shortname));
 935         snprintf(card->longname, sizeof(card->longname),
 936                  "%s at 0x%016llx, irq %d",
 937                  card->shortname, (unsigned long long)dev->res.start,
 938                  dev->irq[0]);
 939
 940         aaci = card->private_data;
 941         mutex_init(&aaci->ac97_sem);
 942         aaci->card = card;
 943         aaci->dev = dev;
 944
 945         /* Set MAINCR to allow slot 1 and 2 data IO */
 946         aaci->maincr = MAINCR_IE | MAINCR_SL1RXEN | MAINCR_SL1TXEN |
 947                        MAINCR_SL2RXEN | MAINCR_SL2TXEN;
 948
 949         return aaci;
 950 }
 951
 952 static int __devinit aaci_init_pcm(struct aaci *aaci)
 953 {
 954         struct snd_pcm *pcm;
 955         int ret;
 956
 957         ret = snd_pcm_new(aaci->card, "AACI AC'97", 0, 1, 1, &pcm);
 958         if (ret == 0) {
 959                 aaci->pcm = pcm;
 960                 pcm->private_data = aaci;
 961                 pcm->info_flags = 0;
 962
 963                 strlcpy(pcm->name, DRIVER_NAME, sizeof(pcm->name));
 964
 965                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &aaci_playback_ops);
 966                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &aaci_capture_ops);
 967                 snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
 968                                                       NULL, 0, 64 * 1024);
 969         }
 970
 971         return ret;
 972 }
 973
 974 static unsigned int __devinit aaci_size_fifo(struct aaci *aaci)
 975 {
 976         struct aaci_runtime *aacirun = &aaci->playback;
 977         int i;
 978
 979         writel(CR_FEN | CR_SZ16 | CR_EN, aacirun->base + AACI_TXCR);
 980
 981         for (i = 0; !(readl(aacirun->base + AACI_SR) & SR_TXFF) && i < 4096; i++)
 982                 writel(0, aacirun->fifo);
 983
 984         writel(0, aacirun->base + AACI_TXCR);
 985
 986         /*
 987          * Re-initialise the AACI after the FIFO depth test, to
 988          * ensure that the FIFOs are empty.  Unfortunately, merely
 989          * disabling the channel doesn't clear the FIFO.
 990          */
 991         writel(aaci->maincr & ~MAINCR_IE, aaci->base + AACI_MAINCR);
 992         writel(aaci->maincr, aaci->base + AACI_MAINCR);
 993
 994         /*
 995          * If we hit 4096, we failed.  Go back to the specified
 996          * fifo depth.
 997          */
 998         if (i == 4096)
 999                 i = 8;
1000
1001         return i;
1002 }
1003
1004 static int __devinit aaci_probe(struct amba_device *dev, struct amba_id *id)
1005 {
1006         struct aaci *aaci;
1007         int ret, i;
1008
1009         ret = amba_request_regions(dev, NULL);
1010         if (ret)
1011                 return ret;
1012
1013         aaci = aaci_init_card(dev);
1014         if (!aaci) {
1015                 ret = -ENOMEM;
1016                 goto out;
1017         }
1018
1019         aaci->base = ioremap(dev->res.start, resource_size(&dev->res));
1020         if (!aaci->base) {
1021                 ret = -ENOMEM;
1022                 goto out;
1023         }
1024
1025         /*
1026          * Playback uses AACI channel 0
1027          */
1028         spin_lock_init(&aaci->playback.lock);
1029         aaci->playback.base = aaci->base + AACI_CSCH1;
1030         aaci->playback.fifo = aaci->base + AACI_DR1;
1031
1032         /*
1033          * Capture uses AACI channel 0
1034          */
1035         spin_lock_init(&aaci->capture.lock);
1036         aaci->capture.base = aaci->base + AACI_CSCH1;
1037         aaci->capture.fifo = aaci->base + AACI_DR1;
1038
1039         for (i = 0; i < 4; i++) {
1040                 void __iomem *base = aaci->base + i * 0x14;
1041
1042                 writel(0, base + AACI_IE);
1043                 writel(0, base + AACI_TXCR);
1044                 writel(0, base + AACI_RXCR);
1045         }
1046
1047         writel(0x1fff, aaci->base + AACI_INTCLR);
1048         writel(aaci->maincr, aaci->base + AACI_MAINCR);
1049         /*
1050          * Fix: ac97 read back fail errors by reading
1051          * from any arbitrary aaci register.
1052          */
1053         readl(aaci->base + AACI_CSCH1);
1054         ret = aaci_probe_ac97(aaci);
1055         if (ret)
1056                 goto out;
1057
1058         /*
1059          * Size the FIFOs (must be multiple of 16).
1060          */
1061         aaci->fifosize = aaci_size_fifo(aaci);
1062         if (aaci->fifosize & 15) {
1063                 printk(KERN_WARNING "AACI: fifosize = %d not supported\n",
1064                        aaci->fifosize);
1065                 ret = -ENODEV;
1066                 goto out;
1067         }
1068
1069         ret = aaci_init_pcm(aaci);
1070         if (ret)
1071                 goto out;
1072
1073         snd_card_set_dev(aaci->card, &dev->dev);
1074
1075         ret = snd_card_register(aaci->card);
1076         if (ret == 0) {
1077                 dev_info(&dev->dev, "%s, fifo %d\n", aaci->card->longname,
1078                          aaci->fifosize);
1079                 amba_set_drvdata(dev, aaci->card);
1080                 return ret;
1081         }
1082
1083  out:
1084         if (aaci)
1085                 snd_card_free(aaci->card);
1086         amba_release_regions(dev);
1087         return ret;
1088 }
1089
1090 static int __devexit aaci_remove(struct amba_device *dev)
1091 {
1092         struct snd_card *card = amba_get_drvdata(dev);
1093
1094         amba_set_drvdata(dev, NULL);
1095
1096         if (card) {
1097                 struct aaci *aaci = card->private_data;
1098                 writel(0, aaci->base + AACI_MAINCR);
1099
1100                 snd_card_free(card);
1101                 amba_release_regions(dev);
1102         }
1103
1104         return 0;
1105 }
1106
1107 static struct amba_id aaci_ids[] = {
1108         {
1109                 .id     = 0x00041041,
1110                 .mask   = 0x000fffff,
1111         },
1112         { 0, 0 },
1113 };
1114
1115 static struct amba_driver aaci_driver = {
1116         .drv            = {
1117                 .name   = DRIVER_NAME,
1118         },
1119         .probe          = aaci_probe,
1120         .remove         = __devexit_p(aaci_remove),
1121         .suspend        = aaci_suspend,
1122         .resume         = aaci_resume,
1123         .id_table       = aaci_ids,
1124 };
1125
1126 static int __init aaci_init(void)
1127 {
1128         return amba_driver_register(&aaci_driver);
1129 }
1130
1131 static void __exit aaci_exit(void)
1132 {
1133         amba_driver_unregister(&aaci_driver);
1134 }
1135
1136 module_init(aaci_init);
1137 module_exit(aaci_exit);
1138
1139 MODULE_LICENSE("GPL");
1140 MODULE_DESCRIPTION("ARM PrimeCell PL041 Advanced Audio CODEC Interface driver");