sound/isa/ad1816a/ad1816a_lib.c

   1 /*
   2     ad1816a.c - lowlevel code for Analog Devices AD1816A chip.
   3     Copyright (C) 1999-2000 by Massimo Piccioni <dafastidio@libero.it>
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program; if not, write to the Free Software
  17     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  18 */
  19
  20 #include <sound/driver.h>
  21 #include <linux/delay.h>
  22 #include <linux/init.h>
  23 #include <linux/interrupt.h>
  24 #include <linux/slab.h>
  25 #include <linux/ioport.h>
  26 #include <sound/core.h>
  27 #include <sound/tlv.h>
  28 #include <sound/ad1816a.h>
  29
  30 #include <asm/io.h>
  31 #include <asm/dma.h>
  32
  33 static inline int snd_ad1816a_busy_wait(struct snd_ad1816a *chip)
  34 {
  35         int timeout;
  36
  37         for (timeout = 1000; timeout-- > 0; udelay(10))
  38                 if (inb(AD1816A_REG(AD1816A_CHIP_STATUS)) & AD1816A_READY)
  39                         return 0;
  40
  41         snd_printk("chip busy.\n");
  42         return -EBUSY;
  43 }
  44
  45 static inline unsigned char snd_ad1816a_in(struct snd_ad1816a *chip, unsigned char reg)
  46 {
  47         snd_ad1816a_busy_wait(chip);
  48         return inb(AD1816A_REG(reg));
  49 }
  50
  51 static inline void snd_ad1816a_out(struct snd_ad1816a *chip, unsigned char reg,
  52                             unsigned char value)
  53 {
  54         snd_ad1816a_busy_wait(chip);
  55         outb(value, AD1816A_REG(reg));
  56 }
  57
  58 static inline void snd_ad1816a_out_mask(struct snd_ad1816a *chip, unsigned char reg,
  59                                  unsigned char mask, unsigned char value)
  60 {
  61         snd_ad1816a_out(chip, reg,
  62                 (value & mask) | (snd_ad1816a_in(chip, reg) & ~mask));
  63 }
  64
  65 static unsigned short snd_ad1816a_read(struct snd_ad1816a *chip, unsigned char reg)
  66 {
  67         snd_ad1816a_out(chip, AD1816A_INDIR_ADDR, reg & 0x3f);
  68         return snd_ad1816a_in(chip, AD1816A_INDIR_DATA_LOW) |
  69                 (snd_ad1816a_in(chip, AD1816A_INDIR_DATA_HIGH) << 8);
  70 }
  71
  72 static void snd_ad1816a_write(struct snd_ad1816a *chip, unsigned char reg,
  73                               unsigned short value)
  74 {
  75         snd_ad1816a_out(chip, AD1816A_INDIR_ADDR, reg & 0x3f);
  76         snd_ad1816a_out(chip, AD1816A_INDIR_DATA_LOW, value & 0xff);
  77         snd_ad1816a_out(chip, AD1816A_INDIR_DATA_HIGH, (value >> 8) & 0xff);
  78 }
  79
  80 static void snd_ad1816a_write_mask(struct snd_ad1816a *chip, unsigned char reg,
  81                                    unsigned short mask, unsigned short value)
  82 {
  83         snd_ad1816a_write(chip, reg,
  84                 (value & mask) | (snd_ad1816a_read(chip, reg) & ~mask));
  85 }
  86
  87
  88 static unsigned char snd_ad1816a_get_format(struct snd_ad1816a *chip,
  89                                             unsigned int format, int channels)
  90 {
  91         unsigned char retval = AD1816A_FMT_LINEAR_8;
  92
  93         switch (format) {
  94         case SNDRV_PCM_FORMAT_MU_LAW:
  95                 retval = AD1816A_FMT_ULAW_8;
  96                 break;
  97         case SNDRV_PCM_FORMAT_A_LAW:
  98                 retval = AD1816A_FMT_ALAW_8;
  99                 break;
 100         case SNDRV_PCM_FORMAT_S16_LE:
 101                 retval = AD1816A_FMT_LINEAR_16_LIT;
 102                 break;
 103         case SNDRV_PCM_FORMAT_S16_BE:
 104                 retval = AD1816A_FMT_LINEAR_16_BIG;
 105         }
 106         return (channels > 1) ? (retval | AD1816A_FMT_STEREO) : retval;
 107 }
 108
 109 static int snd_ad1816a_open(struct snd_ad1816a *chip, unsigned int mode)
 110 {
 111         unsigned long flags;
 112
 113         spin_lock_irqsave(&chip->lock, flags);
 114
 115         if (chip->mode & mode) {
 116                 spin_unlock_irqrestore(&chip->lock, flags);
 117                 return -EAGAIN;
 118         }
 119
 120         switch ((mode &= AD1816A_MODE_OPEN)) {
 121         case AD1816A_MODE_PLAYBACK:
 122                 snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
 123                         AD1816A_PLAYBACK_IRQ_PENDING, 0x00);
 124                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 125                         AD1816A_PLAYBACK_IRQ_ENABLE, 0xffff);
 126                 break;
 127         case AD1816A_MODE_CAPTURE:
 128                 snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
 129                         AD1816A_CAPTURE_IRQ_PENDING, 0x00);
 130                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 131                         AD1816A_CAPTURE_IRQ_ENABLE, 0xffff);
 132                 break;
 133         case AD1816A_MODE_TIMER:
 134                 snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
 135                         AD1816A_TIMER_IRQ_PENDING, 0x00);
 136                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 137                         AD1816A_TIMER_IRQ_ENABLE, 0xffff);
 138         }
 139         chip->mode |= mode;
 140
 141         spin_unlock_irqrestore(&chip->lock, flags);
 142         return 0;
 143 }
 144
 145 static void snd_ad1816a_close(struct snd_ad1816a *chip, unsigned int mode)
 146 {
 147         unsigned long flags;
 148
 149         spin_lock_irqsave(&chip->lock, flags);
 150
 151         switch ((mode &= AD1816A_MODE_OPEN)) {
 152         case AD1816A_MODE_PLAYBACK:
 153                 snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
 154                         AD1816A_PLAYBACK_IRQ_PENDING, 0x00);
 155                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 156                         AD1816A_PLAYBACK_IRQ_ENABLE, 0x0000);
 157                 break;
 158         case AD1816A_MODE_CAPTURE:
 159                 snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
 160                         AD1816A_CAPTURE_IRQ_PENDING, 0x00);
 161                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 162                         AD1816A_CAPTURE_IRQ_ENABLE, 0x0000);
 163                 break;
 164         case AD1816A_MODE_TIMER:
 165                 snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
 166                         AD1816A_TIMER_IRQ_PENDING, 0x00);
 167                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 168                         AD1816A_TIMER_IRQ_ENABLE, 0x0000);
 169         }
 170         if (!((chip->mode &= ~mode) & AD1816A_MODE_OPEN))
 171                 chip->mode = 0;
 172
 173         spin_unlock_irqrestore(&chip->lock, flags);
 174 }
 175
 176
 177 static int snd_ad1816a_trigger(struct snd_ad1816a *chip, unsigned char what,
 178                                int channel, int cmd, int iscapture)
 179 {
 180         int error = 0;
 181
 182         switch (cmd) {
 183         case SNDRV_PCM_TRIGGER_START:
 184         case SNDRV_PCM_TRIGGER_STOP:
 185                 spin_lock(&chip->lock);
 186                 cmd = (cmd == SNDRV_PCM_TRIGGER_START) ? 0xff: 0x00;
 187                 /* if (what & AD1816A_PLAYBACK_ENABLE) */
 188                 /* That is not valid, because playback and capture enable
 189                  * are the same bit pattern, just to different addresses
 190                  */
 191                 if (! iscapture)
 192                         snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
 193                                 AD1816A_PLAYBACK_ENABLE, cmd);
 194                 else
 195                         snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
 196                                 AD1816A_CAPTURE_ENABLE, cmd);
 197                 spin_unlock(&chip->lock);
 198                 break;
 199         default:
 200                 snd_printk("invalid trigger mode 0x%x.\n", what);
 201                 error = -EINVAL;
 202         }
 203
 204         return error;
 205 }
 206
 207 static int snd_ad1816a_playback_trigger(struct snd_pcm_substream *substream, int cmd)
 208 {
 209         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 210         return snd_ad1816a_trigger(chip, AD1816A_PLAYBACK_ENABLE,
 211                                    SNDRV_PCM_STREAM_PLAYBACK, cmd, 0);
 212 }
 213
 214 static int snd_ad1816a_capture_trigger(struct snd_pcm_substream *substream, int cmd)
 215 {
 216         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 217         return snd_ad1816a_trigger(chip, AD1816A_CAPTURE_ENABLE,
 218                                    SNDRV_PCM_STREAM_CAPTURE, cmd, 1);
 219 }
 220
 221 static int snd_ad1816a_hw_params(struct snd_pcm_substream *substream,
 222                                  struct snd_pcm_hw_params *hw_params)
 223 {
 224         return snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params));
 225 }
 226
 227 static int snd_ad1816a_hw_free(struct snd_pcm_substream *substream)
 228 {
 229         return snd_pcm_lib_free_pages(substream);
 230 }
 231
 232 static int snd_ad1816a_playback_prepare(struct snd_pcm_substream *substream)
 233 {
 234         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 235         unsigned long flags;
 236         struct snd_pcm_runtime *runtime = substream->runtime;
 237         unsigned int size, rate;
 238
 239         spin_lock_irqsave(&chip->lock, flags);
 240
 241         chip->p_dma_size = size = snd_pcm_lib_buffer_bytes(substream);
 242         snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
 243                 AD1816A_PLAYBACK_ENABLE | AD1816A_PLAYBACK_PIO, 0x00);
 244
 245         snd_dma_program(chip->dma1, runtime->dma_addr, size,
 246                         DMA_MODE_WRITE | DMA_AUTOINIT);
 247
 248         rate = runtime->rate;
 249         if (chip->clock_freq)
 250                 rate = (rate * 33000) / chip->clock_freq;
 251         snd_ad1816a_write(chip, AD1816A_PLAYBACK_SAMPLE_RATE, rate);
 252         snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
 253                 AD1816A_FMT_ALL | AD1816A_FMT_STEREO,
 254                 snd_ad1816a_get_format(chip, runtime->format,
 255                         runtime->channels));
 256
 257         snd_ad1816a_write(chip, AD1816A_PLAYBACK_BASE_COUNT,
 258                 snd_pcm_lib_period_bytes(substream) / 4 - 1);
 259
 260         spin_unlock_irqrestore(&chip->lock, flags);
 261         return 0;
 262 }
 263
 264 static int snd_ad1816a_capture_prepare(struct snd_pcm_substream *substream)
 265 {
 266         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 267         unsigned long flags;
 268         struct snd_pcm_runtime *runtime = substream->runtime;
 269         unsigned int size, rate;
 270
 271         spin_lock_irqsave(&chip->lock, flags);
 272
 273         chip->c_dma_size = size = snd_pcm_lib_buffer_bytes(substream);
 274         snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
 275                 AD1816A_CAPTURE_ENABLE | AD1816A_CAPTURE_PIO, 0x00);
 276
 277         snd_dma_program(chip->dma2, runtime->dma_addr, size,
 278                         DMA_MODE_READ | DMA_AUTOINIT);
 279
 280         rate = runtime->rate;
 281         if (chip->clock_freq)
 282                 rate = (rate * 33000) / chip->clock_freq;
 283         snd_ad1816a_write(chip, AD1816A_CAPTURE_SAMPLE_RATE, rate);
 284         snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
 285                 AD1816A_FMT_ALL | AD1816A_FMT_STEREO,
 286                 snd_ad1816a_get_format(chip, runtime->format,
 287                         runtime->channels));
 288
 289         snd_ad1816a_write(chip, AD1816A_CAPTURE_BASE_COUNT,
 290                 snd_pcm_lib_period_bytes(substream) / 4 - 1);
 291
 292         spin_unlock_irqrestore(&chip->lock, flags);
 293         return 0;
 294 }
 295
 296
 297 static snd_pcm_uframes_t snd_ad1816a_playback_pointer(struct snd_pcm_substream *substream)
 298 {
 299         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 300         size_t ptr;
 301         if (!(chip->mode & AD1816A_MODE_PLAYBACK))
 302                 return 0;
 303         ptr = snd_dma_pointer(chip->dma1, chip->p_dma_size);
 304         return bytes_to_frames(substream->runtime, ptr);
 305 }
 306
 307 static snd_pcm_uframes_t snd_ad1816a_capture_pointer(struct snd_pcm_substream *substream)
 308 {
 309         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 310         size_t ptr;
 311         if (!(chip->mode & AD1816A_MODE_CAPTURE))
 312                 return 0;
 313         ptr = snd_dma_pointer(chip->dma2, chip->c_dma_size);
 314         return bytes_to_frames(substream->runtime, ptr);
 315 }
 316
 317
 318 static irqreturn_t snd_ad1816a_interrupt(int irq, void *dev_id)
 319 {
 320         struct snd_ad1816a *chip = dev_id;
 321         unsigned char status;
 322
 323         spin_lock(&chip->lock);
 324         status = snd_ad1816a_in(chip, AD1816A_INTERRUPT_STATUS);
 325         spin_unlock(&chip->lock);
 326
 327         if ((status & AD1816A_PLAYBACK_IRQ_PENDING) && chip->playback_substream)
 328                 snd_pcm_period_elapsed(chip->playback_substream);
 329
 330         if ((status & AD1816A_CAPTURE_IRQ_PENDING) && chip->capture_substream)
 331                 snd_pcm_period_elapsed(chip->capture_substream);
 332
 333         if ((status & AD1816A_TIMER_IRQ_PENDING) && chip->timer)
 334                 snd_timer_interrupt(chip->timer, chip->timer->sticks);
 335
 336         spin_lock(&chip->lock);
 337         snd_ad1816a_out(chip, AD1816A_INTERRUPT_STATUS, 0x00);
 338         spin_unlock(&chip->lock);
 339         return IRQ_HANDLED;
 340 }
 341
 342
 343 static struct snd_pcm_hardware snd_ad1816a_playback = {
 344         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
 345                                  SNDRV_PCM_INFO_MMAP_VALID),
 346         .formats =              (SNDRV_PCM_FMTBIT_MU_LAW | SNDRV_PCM_FMTBIT_A_LAW |
 347                                  SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE |
 348                                  SNDRV_PCM_FMTBIT_S16_BE),
 349         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
 350         .rate_min =             4000,
 351         .rate_max =             55200,
 352         .channels_min =         1,
 353         .channels_max =         2,
 354         .buffer_bytes_max =     (128*1024),
 355         .period_bytes_min =     64,
 356         .period_bytes_max =     (128*1024),
 357         .periods_min =          1,
 358         .periods_max =          1024,
 359         .fifo_size =            0,
 360 };
 361
 362 static struct snd_pcm_hardware snd_ad1816a_capture = {
 363         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
 364                                  SNDRV_PCM_INFO_MMAP_VALID),
 365         .formats =              (SNDRV_PCM_FMTBIT_MU_LAW | SNDRV_PCM_FMTBIT_A_LAW |
 366                                  SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE |
 367                                  SNDRV_PCM_FMTBIT_S16_BE),
 368         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
 369         .rate_min =             4000,
 370         .rate_max =             55200,
 371         .channels_min =         1,
 372         .channels_max =         2,
 373         .buffer_bytes_max =     (128*1024),
 374         .period_bytes_min =     64,
 375         .period_bytes_max =     (128*1024),
 376         .periods_min =          1,
 377         .periods_max =          1024,
 378         .fifo_size =            0,
 379 };
 380
 381 #if 0 /* not used now */
 382 static int snd_ad1816a_timer_close(struct snd_timer *timer)
 383 {
 384         struct snd_ad1816a *chip = snd_timer_chip(timer);
 385         snd_ad1816a_close(chip, AD1816A_MODE_TIMER);
 386         return 0;
 387 }
 388
 389 static int snd_ad1816a_timer_open(struct snd_timer *timer)
 390 {
 391         struct snd_ad1816a *chip = snd_timer_chip(timer);
 392         snd_ad1816a_open(chip, AD1816A_MODE_TIMER);
 393         return 0;
 394 }
 395
 396 static unsigned long snd_ad1816a_timer_resolution(struct snd_timer *timer)
 397 {
 398         snd_assert(timer != NULL, return 0);
 399
 400         return 10000;
 401 }
 402
 403 static int snd_ad1816a_timer_start(struct snd_timer *timer)
 404 {
 405         unsigned short bits;
 406         unsigned long flags;
 407         struct snd_ad1816a *chip = snd_timer_chip(timer);
 408         spin_lock_irqsave(&chip->lock, flags);
 409         bits = snd_ad1816a_read(chip, AD1816A_INTERRUPT_ENABLE);
 410
 411         if (!(bits & AD1816A_TIMER_ENABLE)) {
 412                 snd_ad1816a_write(chip, AD1816A_TIMER_BASE_COUNT,
 413                         timer->sticks & 0xffff);
 414
 415                 snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 416                         AD1816A_TIMER_ENABLE, 0xffff);
 417         }
 418         spin_unlock_irqrestore(&chip->lock, flags);
 419         return 0;
 420 }
 421
 422 static int snd_ad1816a_timer_stop(struct snd_timer *timer)
 423 {
 424         unsigned long flags;
 425         struct snd_ad1816a *chip = snd_timer_chip(timer);
 426         spin_lock_irqsave(&chip->lock, flags);
 427
 428         snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
 429                 AD1816A_TIMER_ENABLE, 0x0000);
 430
 431         spin_unlock_irqrestore(&chip->lock, flags);
 432         return 0;
 433 }
 434
 435 static struct snd_timer_hardware snd_ad1816a_timer_table = {
 436         .flags =        SNDRV_TIMER_HW_AUTO,
 437         .resolution =   10000,
 438         .ticks =        65535,
 439         .open =         snd_ad1816a_timer_open,
 440         .close =        snd_ad1816a_timer_close,
 441         .c_resolution = snd_ad1816a_timer_resolution,
 442         .start =        snd_ad1816a_timer_start,
 443         .stop =         snd_ad1816a_timer_stop,
 444 };
 445 #endif /* not used now */
 446
 447
 448 static int snd_ad1816a_playback_open(struct snd_pcm_substream *substream)
 449 {
 450         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 451         struct snd_pcm_runtime *runtime = substream->runtime;
 452         int error;
 453
 454         if ((error = snd_ad1816a_open(chip, AD1816A_MODE_PLAYBACK)) < 0)
 455                 return error;
 456         runtime->hw = snd_ad1816a_playback;
 457         snd_pcm_limit_isa_dma_size(chip->dma1, &runtime->hw.buffer_bytes_max);
 458         snd_pcm_limit_isa_dma_size(chip->dma1, &runtime->hw.period_bytes_max);
 459         chip->playback_substream = substream;
 460         return 0;
 461 }
 462
 463 static int snd_ad1816a_capture_open(struct snd_pcm_substream *substream)
 464 {
 465         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 466         struct snd_pcm_runtime *runtime = substream->runtime;
 467         int error;
 468
 469         if ((error = snd_ad1816a_open(chip, AD1816A_MODE_CAPTURE)) < 0)
 470                 return error;
 471         runtime->hw = snd_ad1816a_capture;
 472         snd_pcm_limit_isa_dma_size(chip->dma2, &runtime->hw.buffer_bytes_max);
 473         snd_pcm_limit_isa_dma_size(chip->dma2, &runtime->hw.period_bytes_max);
 474         chip->capture_substream = substream;
 475         return 0;
 476 }
 477
 478 static int snd_ad1816a_playback_close(struct snd_pcm_substream *substream)
 479 {
 480         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 481
 482         chip->playback_substream = NULL;
 483         snd_ad1816a_close(chip, AD1816A_MODE_PLAYBACK);
 484         return 0;
 485 }
 486
 487 static int snd_ad1816a_capture_close(struct snd_pcm_substream *substream)
 488 {
 489         struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
 490
 491         chip->capture_substream = NULL;
 492         snd_ad1816a_close(chip, AD1816A_MODE_CAPTURE);
 493         return 0;
 494 }
 495
 496
 497 static void __devinit snd_ad1816a_init(struct snd_ad1816a *chip)
 498 {
 499         unsigned long flags;
 500
 501         spin_lock_irqsave(&chip->lock, flags);
 502
 503         snd_ad1816a_out(chip, AD1816A_INTERRUPT_STATUS, 0x00);
 504         snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
 505                 AD1816A_PLAYBACK_ENABLE | AD1816A_PLAYBACK_PIO, 0x00);
 506         snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
 507                 AD1816A_CAPTURE_ENABLE | AD1816A_CAPTURE_PIO, 0x00);
 508         snd_ad1816a_write(chip, AD1816A_INTERRUPT_ENABLE, 0x0000);
 509         snd_ad1816a_write_mask(chip, AD1816A_CHIP_CONFIG,
 510                 AD1816A_CAPTURE_NOT_EQUAL | AD1816A_WSS_ENABLE, 0xffff);
 511         snd_ad1816a_write(chip, AD1816A_DSP_CONFIG, 0x0000);
 512         snd_ad1816a_write(chip, AD1816A_POWERDOWN_CTRL, 0x0000);
 513
 514         spin_unlock_irqrestore(&chip->lock, flags);
 515 }
 516
 517 static int __devinit snd_ad1816a_probe(struct snd_ad1816a *chip)
 518 {
 519         unsigned long flags;
 520
 521         spin_lock_irqsave(&chip->lock, flags);
 522
 523         switch (chip->version = snd_ad1816a_read(chip, AD1816A_VERSION_ID)) {
 524         case 0:
 525                 chip->hardware = AD1816A_HW_AD1815;
 526                 break;
 527         case 1:
 528                 chip->hardware = AD1816A_HW_AD18MAX10;
 529                 break;
 530         case 3:
 531                 chip->hardware = AD1816A_HW_AD1816A;
 532                 break;
 533         default:
 534                 chip->hardware = AD1816A_HW_AUTO;
 535         }
 536
 537         spin_unlock_irqrestore(&chip->lock, flags);
 538         return 0;
 539 }
 540
 541 static int snd_ad1816a_free(struct snd_ad1816a *chip)
 542 {
 543         release_and_free_resource(chip->res_port);
 544         if (chip->irq >= 0)
 545                 free_irq(chip->irq, (void *) chip);
 546         if (chip->dma1 >= 0) {
 547                 snd_dma_disable(chip->dma1);
 548                 free_dma(chip->dma1);
 549         }
 550         if (chip->dma2 >= 0) {
 551                 snd_dma_disable(chip->dma2);
 552                 free_dma(chip->dma2);
 553         }
 554         kfree(chip);
 555         return 0;
 556 }
 557
 558 static int snd_ad1816a_dev_free(struct snd_device *device)
 559 {
 560         struct snd_ad1816a *chip = device->device_data;
 561         return snd_ad1816a_free(chip);
 562 }
 563
 564 static const char __devinit *snd_ad1816a_chip_id(struct snd_ad1816a *chip)
 565 {
 566         switch (chip->hardware) {
 567         case AD1816A_HW_AD1816A: return "AD1816A";
 568         case AD1816A_HW_AD1815: return "AD1815";
 569         case AD1816A_HW_AD18MAX10: return "AD18max10";
 570         default:
 571                 snd_printk("Unknown chip version %d:%d.\n",
 572                         chip->version, chip->hardware);
 573                 return "AD1816A - unknown";
 574         }
 575 }
 576
 577 int __devinit snd_ad1816a_create(struct snd_card *card,
 578                                  unsigned long port, int irq, int dma1, int dma2,
 579                                  struct snd_ad1816a **rchip)
 580 {
 581         static struct snd_device_ops ops = {
 582                 .dev_free =     snd_ad1816a_dev_free,
 583         };
 584         int error;
 585         struct snd_ad1816a *chip;
 586
 587         *rchip = NULL;
 588
 589         chip = kzalloc(sizeof(*chip), GFP_KERNEL);
 590         if (chip == NULL)
 591                 return -ENOMEM;
 592         chip->irq = -1;
 593         chip->dma1 = -1;
 594         chip->dma2 = -1;
 595
 596         if ((chip->res_port = request_region(port, 16, "AD1816A")) == NULL) {
 597                 snd_printk(KERN_ERR "ad1816a: can't grab port 0x%lx\n", port);
 598                 snd_ad1816a_free(chip);
 599                 return -EBUSY;
 600         }
 601         if (request_irq(irq, snd_ad1816a_interrupt, IRQF_DISABLED, "AD1816A", (void *) chip)) {
 602                 snd_printk(KERN_ERR "ad1816a: can't grab IRQ %d\n", irq);
 603                 snd_ad1816a_free(chip);
 604                 return -EBUSY;
 605         }
 606         chip->irq = irq;
 607         if (request_dma(dma1, "AD1816A - 1")) {
 608                 snd_printk(KERN_ERR "ad1816a: can't grab DMA1 %d\n", dma1);
 609                 snd_ad1816a_free(chip);
 610                 return -EBUSY;
 611         }
 612         chip->dma1 = dma1;
 613         if (request_dma(dma2, "AD1816A - 2")) {
 614                 snd_printk(KERN_ERR "ad1816a: can't grab DMA2 %d\n", dma2);
 615                 snd_ad1816a_free(chip);
 616                 return -EBUSY;
 617         }
 618         chip->dma2 = dma2;
 619
 620         chip->card = card;
 621         chip->port = port;
 622         spin_lock_init(&chip->lock);
 623
 624         if ((error = snd_ad1816a_probe(chip))) {
 625                 snd_ad1816a_free(chip);
 626                 return error;
 627         }
 628
 629         snd_ad1816a_init(chip);
 630
 631         /* Register device */
 632         if ((error = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
 633                 snd_ad1816a_free(chip);
 634                 return error;
 635         }
 636
 637         *rchip = chip;
 638         return 0;
 639 }
 640
 641 static struct snd_pcm_ops snd_ad1816a_playback_ops = {
 642         .open =         snd_ad1816a_playback_open,
 643         .close =        snd_ad1816a_playback_close,
 644         .ioctl =        snd_pcm_lib_ioctl,
 645         .hw_params =    snd_ad1816a_hw_params,
 646         .hw_free =      snd_ad1816a_hw_free,
 647         .prepare =      snd_ad1816a_playback_prepare,
 648         .trigger =      snd_ad1816a_playback_trigger,
 649         .pointer =      snd_ad1816a_playback_pointer,
 650 };
 651
 652 static struct snd_pcm_ops snd_ad1816a_capture_ops = {
 653         .open =         snd_ad1816a_capture_open,
 654         .close =        snd_ad1816a_capture_close,
 655         .ioctl =        snd_pcm_lib_ioctl,
 656         .hw_params =    snd_ad1816a_hw_params,
 657         .hw_free =      snd_ad1816a_hw_free,
 658         .prepare =      snd_ad1816a_capture_prepare,
 659         .trigger =      snd_ad1816a_capture_trigger,
 660         .pointer =      snd_ad1816a_capture_pointer,
 661 };
 662
 663 int __devinit snd_ad1816a_pcm(struct snd_ad1816a *chip, int device, struct snd_pcm **rpcm)
 664 {
 665         int error;
 666         struct snd_pcm *pcm;
 667
 668         if ((error = snd_pcm_new(chip->card, "AD1816A", device, 1, 1, &pcm)))
 669                 return error;
 670
 671         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_ad1816a_playback_ops);
 672         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_ad1816a_capture_ops);
 673
 674         pcm->private_data = chip;
 675         pcm->info_flags = (chip->dma1 == chip->dma2 ) ? SNDRV_PCM_INFO_JOINT_DUPLEX : 0;
 676
 677         strcpy(pcm->name, snd_ad1816a_chip_id(chip));
 678         snd_ad1816a_init(chip);
 679
 680         snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
 681                                               snd_dma_isa_data(),
 682                                               64*1024, chip->dma1 > 3 || chip->dma2 > 3 ? 128*1024 : 64*1024);
 683
 684         chip->pcm = pcm;
 685         if (rpcm)
 686                 *rpcm = pcm;
 687         return 0;
 688 }
 689
 690 #if 0 /* not used now */
 691 int __devinit snd_ad1816a_timer(struct snd_ad1816a *chip, int device, struct snd_timer **rtimer)
 692 {
 693         struct snd_timer *timer;
 694         struct snd_timer_id tid;
 695         int error;
 696
 697         tid.dev_class = SNDRV_TIMER_CLASS_CARD;
 698         tid.dev_sclass = SNDRV_TIMER_SCLASS_NONE;
 699         tid.card = chip->card->number;
 700         tid.device = device;
 701         tid.subdevice = 0;
 702         if ((error = snd_timer_new(chip->card, "AD1816A", &tid, &timer)) < 0)
 703                 return error;
 704         strcpy(timer->name, snd_ad1816a_chip_id(chip));
 705         timer->private_data = chip;
 706         chip->timer = timer;
 707         timer->hw = snd_ad1816a_timer_table;
 708         if (rtimer)
 709                 *rtimer = timer;
 710         return 0;
 711 }
 712 #endif /* not used now */
 713
 714 /*
 715  *
 716  */
 717
 718 static int snd_ad1816a_info_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
 719 {
 720         static char *texts[8] = {
 721                 "Line", "Mix", "CD", "Synth", "Video",
 722                 "Mic", "Phone",
 723         };
 724
 725         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
 726         uinfo->count = 2;
 727         uinfo->value.enumerated.items = 7;
 728         if (uinfo->value.enumerated.item > 6)
 729                 uinfo->value.enumerated.item = 6;
 730         strcpy(uinfo->value.enumerated.name, texts[uinfo->value.enumerated.item]);
 731         return 0;
 732 }
 733
 734 static int snd_ad1816a_get_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 735 {
 736         struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
 737         unsigned long flags;
 738         unsigned short val;
 739
 740         spin_lock_irqsave(&chip->lock, flags);
 741         val = snd_ad1816a_read(chip, AD1816A_ADC_SOURCE_SEL);
 742         spin_unlock_irqrestore(&chip->lock, flags);
 743         ucontrol->value.enumerated.item[0] = (val >> 12) & 7;
 744         ucontrol->value.enumerated.item[1] = (val >> 4) & 7;
 745         return 0;
 746 }
 747
 748 static int snd_ad1816a_put_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 749 {
 750         struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
 751         unsigned long flags;
 752         unsigned short val;
 753         int change;
 754
 755         if (ucontrol->value.enumerated.item[0] > 6 ||
 756             ucontrol->value.enumerated.item[1] > 6)
 757                 return -EINVAL;
 758         val = (ucontrol->value.enumerated.item[0] << 12) |
 759               (ucontrol->value.enumerated.item[1] << 4);
 760         spin_lock_irqsave(&chip->lock, flags);
 761         change = snd_ad1816a_read(chip, AD1816A_ADC_SOURCE_SEL) != val;
 762         snd_ad1816a_write(chip, AD1816A_ADC_SOURCE_SEL, val);
 763         spin_unlock_irqrestore(&chip->lock, flags);
 764         return change;
 765 }
 766
 767 #define AD1816A_SINGLE_TLV(xname, reg, shift, mask, invert, xtlv)       \
 768 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
 769   .access = SNDRV_CTL_ELEM_ACCESS_READWRITE | SNDRV_CTL_ELEM_ACCESS_TLV_READ, \
 770   .name = xname, .info = snd_ad1816a_info_single, \
 771   .get = snd_ad1816a_get_single, .put = snd_ad1816a_put_single, \
 772   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24), \
 773   .tlv = { .p = (xtlv) } }
 774 #define AD1816A_SINGLE(xname, reg, shift, mask, invert) \
 775 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .info = snd_ad1816a_info_single, \
 776   .get = snd_ad1816a_get_single, .put = snd_ad1816a_put_single, \
 777   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24) }
 778
 779 static int snd_ad1816a_info_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
 780 {
 781         int mask = (kcontrol->private_value >> 16) & 0xff;
 782
 783         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
 784         uinfo->count = 1;
 785         uinfo->value.integer.min = 0;
 786         uinfo->value.integer.max = mask;
 787         return 0;
 788 }
 789
 790 static int snd_ad1816a_get_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 791 {
 792         struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
 793         unsigned long flags;
 794         int reg = kcontrol->private_value & 0xff;
 795         int shift = (kcontrol->private_value >> 8) & 0xff;
 796         int mask = (kcontrol->private_value >> 16) & 0xff;
 797         int invert = (kcontrol->private_value >> 24) & 0xff;
 798
 799         spin_lock_irqsave(&chip->lock, flags);
 800         ucontrol->value.integer.value[0] = (snd_ad1816a_read(chip, reg) >> shift) & mask;
 801         spin_unlock_irqrestore(&chip->lock, flags);
 802         if (invert)
 803                 ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
 804         return 0;
 805 }
 806
 807 static int snd_ad1816a_put_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 808 {
 809         struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
 810         unsigned long flags;
 811         int reg = kcontrol->private_value & 0xff;
 812         int shift = (kcontrol->private_value >> 8) & 0xff;
 813         int mask = (kcontrol->private_value >> 16) & 0xff;
 814         int invert = (kcontrol->private_value >> 24) & 0xff;
 815         int change;
 816         unsigned short old_val, val;
 817
 818         val = (ucontrol->value.integer.value[0] & mask);
 819         if (invert)
 820                 val = mask - val;
 821         val <<= shift;
 822         spin_lock_irqsave(&chip->lock, flags);
 823         old_val = snd_ad1816a_read(chip, reg);
 824         val = (old_val & ~(mask << shift)) | val;
 825         change = val != old_val;
 826         snd_ad1816a_write(chip, reg, val);
 827         spin_unlock_irqrestore(&chip->lock, flags);
 828         return change;
 829 }
 830
 831 #define AD1816A_DOUBLE_TLV(xname, reg, shift_left, shift_right, mask, invert, xtlv) \
 832 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
 833   .access = SNDRV_CTL_ELEM_ACCESS_READWRITE | SNDRV_CTL_ELEM_ACCESS_TLV_READ, \
 834   .name = xname, .info = snd_ad1816a_info_double,               \
 835   .get = snd_ad1816a_get_double, .put = snd_ad1816a_put_double, \
 836   .private_value = reg | (shift_left << 8) | (shift_right << 12) | (mask << 16) | (invert << 24), \
 837   .tlv = { .p = (xtlv) } }
 838
 839 #define AD1816A_DOUBLE(xname, reg, shift_left, shift_right, mask, invert) \
 840 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .info = snd_ad1816a_info_double, \
 841   .get = snd_ad1816a_get_double, .put = snd_ad1816a_put_double, \
 842   .private_value = reg | (shift_left << 8) | (shift_right << 12) | (mask << 16) | (invert << 24) }
 843
 844 static int snd_ad1816a_info_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
 845 {
 846         int mask = (kcontrol->private_value >> 16) & 0xff;
 847
 848         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
 849         uinfo->count = 2;
 850         uinfo->value.integer.min = 0;
 851         uinfo->value.integer.max = mask;
 852         return 0;
 853 }
 854
 855 static int snd_ad1816a_get_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 856 {
 857         struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
 858         unsigned long flags;
 859         int reg = kcontrol->private_value & 0xff;
 860         int shift_left = (kcontrol->private_value >> 8) & 0x0f;
 861         int shift_right = (kcontrol->private_value >> 12) & 0x0f;
 862         int mask = (kcontrol->private_value >> 16) & 0xff;
 863         int invert = (kcontrol->private_value >> 24) & 0xff;
 864         unsigned short val;
 865
 866         spin_lock_irqsave(&chip->lock, flags);
 867         val = snd_ad1816a_read(chip, reg);
 868         ucontrol->value.integer.value[0] = (val >> shift_left) & mask;
 869         ucontrol->value.integer.value[1] = (val >> shift_right) & mask;
 870         spin_unlock_irqrestore(&chip->lock, flags);
 871         if (invert) {
 872                 ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
 873                 ucontrol->value.integer.value[1] = mask - ucontrol->value.integer.value[1];
 874         }
 875         return 0;
 876 }
 877
 878 static int snd_ad1816a_put_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 879 {
 880         struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
 881         unsigned long flags;
 882         int reg = kcontrol->private_value & 0xff;
 883         int shift_left = (kcontrol->private_value >> 8) & 0x0f;
 884         int shift_right = (kcontrol->private_value >> 12) & 0x0f;
 885         int mask = (kcontrol->private_value >> 16) & 0xff;
 886         int invert = (kcontrol->private_value >> 24) & 0xff;
 887         int change;
 888         unsigned short old_val, val1, val2;
 889
 890         val1 = ucontrol->value.integer.value[0] & mask;
 891         val2 = ucontrol->value.integer.value[1] & mask;
 892         if (invert) {
 893                 val1 = mask - val1;
 894                 val2 = mask - val2;
 895         }
 896         val1 <<= shift_left;
 897         val2 <<= shift_right;
 898         spin_lock_irqsave(&chip->lock, flags);
 899         old_val = snd_ad1816a_read(chip, reg);
 900         val1 = (old_val & ~((mask << shift_left) | (mask << shift_right))) | val1 | val2;
 901         change = val1 != old_val;
 902         snd_ad1816a_write(chip, reg, val1);
 903         spin_unlock_irqrestore(&chip->lock, flags);
 904         return change;
 905 }
 906
 907 static const DECLARE_TLV_DB_SCALE(db_scale_4bit, -4500, 300, 0);
 908 static const DECLARE_TLV_DB_SCALE(db_scale_5bit, -4650, 150, 0);
 909 static const DECLARE_TLV_DB_SCALE(db_scale_6bit, -9450, 150, 0);
 910 static const DECLARE_TLV_DB_SCALE(db_scale_5bit_12db_max, -3450, 150, 0);
 911 static const DECLARE_TLV_DB_SCALE(db_scale_rec_gain, 0, 150, 0);
 912
 913 static struct snd_kcontrol_new snd_ad1816a_controls[] __devinitdata = {
 914 AD1816A_DOUBLE("Master Playback Switch", AD1816A_MASTER_ATT, 15, 7, 1, 1),
 915 AD1816A_DOUBLE_TLV("Master Playback Volume", AD1816A_MASTER_ATT, 8, 0, 31, 1,
 916                    db_scale_5bit),
 917 AD1816A_DOUBLE("PCM Playback Switch", AD1816A_VOICE_ATT, 15, 7, 1, 1),
 918 AD1816A_DOUBLE_TLV("PCM Playback Volume", AD1816A_VOICE_ATT, 8, 0, 63, 1,
 919                    db_scale_6bit),
 920 AD1816A_DOUBLE("Line Playback Switch", AD1816A_LINE_GAIN_ATT, 15, 7, 1, 1),
 921 AD1816A_DOUBLE_TLV("Line Playback Volume", AD1816A_LINE_GAIN_ATT, 8, 0, 31, 1,
 922                    db_scale_5bit_12db_max),
 923 AD1816A_DOUBLE("CD Playback Switch", AD1816A_CD_GAIN_ATT, 15, 7, 1, 1),
 924 AD1816A_DOUBLE_TLV("CD Playback Volume", AD1816A_CD_GAIN_ATT, 8, 0, 31, 1,
 925                    db_scale_5bit_12db_max),
 926 AD1816A_DOUBLE("Synth Playback Switch", AD1816A_SYNTH_GAIN_ATT, 15, 7, 1, 1),
 927 AD1816A_DOUBLE_TLV("Synth Playback Volume", AD1816A_SYNTH_GAIN_ATT, 8, 0, 31, 1,
 928                    db_scale_5bit_12db_max),
 929 AD1816A_DOUBLE("FM Playback Switch", AD1816A_FM_ATT, 15, 7, 1, 1),
 930 AD1816A_DOUBLE_TLV("FM Playback Volume", AD1816A_FM_ATT, 8, 0, 63, 1,
 931                    db_scale_6bit),
 932 AD1816A_SINGLE("Mic Playback Switch", AD1816A_MIC_GAIN_ATT, 15, 1, 1),
 933 AD1816A_SINGLE_TLV("Mic Playback Volume", AD1816A_MIC_GAIN_ATT, 8, 31, 1,
 934                    db_scale_5bit_12db_max),
 935 AD1816A_SINGLE("Mic Boost", AD1816A_MIC_GAIN_ATT, 14, 1, 0),
 936 AD1816A_DOUBLE("Video Playback Switch", AD1816A_VID_GAIN_ATT, 15, 7, 1, 1),
 937 AD1816A_DOUBLE_TLV("Video Playback Volume", AD1816A_VID_GAIN_ATT, 8, 0, 31, 1,
 938                    db_scale_5bit_12db_max),
 939 AD1816A_SINGLE("Phone Capture Switch", AD1816A_PHONE_IN_GAIN_ATT, 15, 1, 1),
 940 AD1816A_SINGLE_TLV("Phone Capture Volume", AD1816A_PHONE_IN_GAIN_ATT, 0, 15, 1,
 941                    db_scale_4bit),
 942 AD1816A_SINGLE("Phone Playback Switch", AD1816A_PHONE_OUT_ATT, 7, 1, 1),
 943 AD1816A_SINGLE_TLV("Phone Playback Volume", AD1816A_PHONE_OUT_ATT, 0, 31, 1,
 944                    db_scale_5bit),
 945 {
 946         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
 947         .name = "Capture Source",
 948         .info = snd_ad1816a_info_mux,
 949         .get = snd_ad1816a_get_mux,
 950         .put = snd_ad1816a_put_mux,
 951 },
 952 AD1816A_DOUBLE("Capture Switch", AD1816A_ADC_PGA, 15, 7, 1, 1),
 953 AD1816A_DOUBLE_TLV("Capture Volume", AD1816A_ADC_PGA, 8, 0, 15, 0,
 954                    db_scale_rec_gain),
 955 AD1816A_SINGLE("3D Control - Switch", AD1816A_3D_PHAT_CTRL, 15, 1, 1),
 956 AD1816A_SINGLE("3D Control - Level", AD1816A_3D_PHAT_CTRL, 0, 15, 0),
 957 };
 958
 959 int __devinit snd_ad1816a_mixer(struct snd_ad1816a *chip)
 960 {
 961         struct snd_card *card;
 962         unsigned int idx;
 963         int err;
 964
 965         snd_assert(chip != NULL && chip->card != NULL, return -EINVAL);
 966
 967         card = chip->card;
 968
 969         strcpy(card->mixername, snd_ad1816a_chip_id(chip));
 970
 971         for (idx = 0; idx < ARRAY_SIZE(snd_ad1816a_controls); idx++) {
 972                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_ad1816a_controls[idx], chip))) < 0)
 973                         return err;
 974         }
 975         return 0;
 976 }