sound/isa/ad1816a/ad1816a_lib.c

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