sound/isa/gus/gus_pcm.c

   1 /*
   2  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
   3  *  Routines for control of GF1 chip (PCM things)
   4  *
   5  *  InterWave chips supports interleaved DMA, but this feature isn't used in
   6  *  this code.
   7  *
   8  *  This code emulates autoinit DMA transfer for playback, recording by GF1
   9  *  chip doesn't support autoinit DMA.
  10  *
  11  *
  12  *   This program is free software; you can redistribute it and/or modify
  13  *   it under the terms of the GNU General Public License as published by
  14  *   the Free Software Foundation; either version 2 of the License, or
  15  *   (at your option) any later version.
  16  *
  17  *   This program is distributed in the hope that it will be useful,
  18  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  *   GNU General Public License for more details.
  21  *
  22  *   You should have received a copy of the GNU General Public License
  23  *   along with this program; if not, write to the Free Software
  24  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  25  *
  26  */
  27
  28 #include <asm/dma.h>
  29 #include <linux/slab.h>
  30 #include <sound/core.h>
  31 #include <sound/control.h>
  32 #include <sound/gus.h>
  33 #include <sound/pcm_params.h>
  34 #include "gus_tables.h"
  35
  36 /* maximum rate */
  37
  38 #define SNDRV_GF1_PCM_RATE              48000
  39
  40 #define SNDRV_GF1_PCM_PFLG_NONE         0
  41 #define SNDRV_GF1_PCM_PFLG_ACTIVE       (1<<0)
  42 #define SNDRV_GF1_PCM_PFLG_NEUTRAL      (2<<0)
  43
  44 struct gus_pcm_private {
  45         struct snd_gus_card * gus;
  46         struct snd_pcm_substream *substream;
  47         spinlock_t lock;
  48         unsigned int voices;
  49         struct snd_gus_voice *pvoices[2];
  50         unsigned int memory;
  51         unsigned short flags;
  52         unsigned char voice_ctrl, ramp_ctrl;
  53         unsigned int bpos;
  54         unsigned int blocks;
  55         unsigned int block_size;
  56         unsigned int dma_size;
  57         wait_queue_head_t sleep;
  58         atomic_t dma_count;
  59         int final_volume;
  60 };
  61
  62 static int snd_gf1_pcm_use_dma = 1;
  63
  64 static void snd_gf1_pcm_block_change_ack(struct snd_gus_card * gus, void *private_data)
  65 {
  66         struct gus_pcm_private *pcmp = private_data;
  67
  68         if (pcmp) {
  69                 atomic_dec(&pcmp->dma_count);
  70                 wake_up(&pcmp->sleep);
  71         }
  72 }
  73
  74 static int snd_gf1_pcm_block_change(struct snd_pcm_substream *substream,
  75                                     unsigned int offset,
  76                                     unsigned int addr,
  77                                     unsigned int count)
  78 {
  79         struct snd_gf1_dma_block block;
  80         struct snd_pcm_runtime *runtime = substream->runtime;
  81         struct gus_pcm_private *pcmp = runtime->private_data;
  82
  83         count += offset & 31;
  84         offset &= ~31;
  85         /*
  86         snd_printk(KERN_DEBUG "block change - offset = 0x%x, count = 0x%x\n",
  87                    offset, count);
  88         */
  89         memset(&block, 0, sizeof(block));
  90         block.cmd = SNDRV_GF1_DMA_IRQ;
  91         if (snd_pcm_format_unsigned(runtime->format))
  92                 block.cmd |= SNDRV_GF1_DMA_UNSIGNED;
  93         if (snd_pcm_format_width(runtime->format) == 16)
  94                 block.cmd |= SNDRV_GF1_DMA_16BIT;
  95         block.addr = addr & ~31;
  96         block.buffer = runtime->dma_area + offset;
  97         block.buf_addr = runtime->dma_addr + offset;
  98         block.count = count;
  99         block.private_data = pcmp;
 100         block.ack = snd_gf1_pcm_block_change_ack;
 101         if (!snd_gf1_dma_transfer_block(pcmp->gus, &block, 0, 0))
 102                 atomic_inc(&pcmp->dma_count);
 103         return 0;
 104 }
 105
 106 static void snd_gf1_pcm_trigger_up(struct snd_pcm_substream *substream)
 107 {
 108         struct snd_pcm_runtime *runtime = substream->runtime;
 109         struct gus_pcm_private *pcmp = runtime->private_data;
 110         struct snd_gus_card * gus = pcmp->gus;
 111         unsigned long flags;
 112         unsigned char voice_ctrl, ramp_ctrl;
 113         unsigned short rate;
 114         unsigned int curr, begin, end;
 115         unsigned short vol;
 116         unsigned char pan;
 117         unsigned int voice;
 118
 119         spin_lock_irqsave(&pcmp->lock, flags);
 120         if (pcmp->flags & SNDRV_GF1_PCM_PFLG_ACTIVE) {
 121                 spin_unlock_irqrestore(&pcmp->lock, flags);
 122                 return;
 123         }
 124         pcmp->flags |= SNDRV_GF1_PCM_PFLG_ACTIVE;
 125         pcmp->final_volume = 0;
 126         spin_unlock_irqrestore(&pcmp->lock, flags);
 127         rate = snd_gf1_translate_freq(gus, runtime->rate << 4);
 128         /* enable WAVE IRQ */
 129         voice_ctrl = snd_pcm_format_width(runtime->format) == 16 ? 0x24 : 0x20;
 130         /* enable RAMP IRQ + rollover */
 131         ramp_ctrl = 0x24;
 132         if (pcmp->blocks == 1) {
 133                 voice_ctrl |= 0x08;     /* loop enable */
 134                 ramp_ctrl &= ~0x04;     /* disable rollover */
 135         }
 136         for (voice = 0; voice < pcmp->voices; voice++) {
 137                 begin = pcmp->memory + voice * (pcmp->dma_size / runtime->channels);
 138                 curr = begin + (pcmp->bpos * pcmp->block_size) / runtime->channels;
 139                 end = curr + (pcmp->block_size / runtime->channels);
 140                 end -= snd_pcm_format_width(runtime->format) == 16 ? 2 : 1;
 141                 /*
 142                 snd_printk(KERN_DEBUG "init: curr=0x%x, begin=0x%x, end=0x%x, "
 143                            "ctrl=0x%x, ramp=0x%x, rate=0x%x\n",
 144                            curr, begin, end, voice_ctrl, ramp_ctrl, rate);
 145                 */
 146                 pan = runtime->channels == 2 ? (!voice ? 1 : 14) : 8;
 147                 vol = !voice ? gus->gf1.pcm_volume_level_left : gus->gf1.pcm_volume_level_right;
 148                 spin_lock_irqsave(&gus->reg_lock, flags);
 149                 snd_gf1_select_voice(gus, pcmp->pvoices[voice]->number);
 150                 snd_gf1_write8(gus, SNDRV_GF1_VB_PAN, pan);
 151                 snd_gf1_write16(gus, SNDRV_GF1_VW_FREQUENCY, rate);
 152                 snd_gf1_write_addr(gus, SNDRV_GF1_VA_START, begin << 4, voice_ctrl & 4);
 153                 snd_gf1_write_addr(gus, SNDRV_GF1_VA_END, end << 4, voice_ctrl & 4);
 154                 snd_gf1_write_addr(gus, SNDRV_GF1_VA_CURRENT, curr << 4, voice_ctrl & 4);
 155                 snd_gf1_write16(gus, SNDRV_GF1_VW_VOLUME, SNDRV_GF1_MIN_VOLUME << 4);
 156                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_RATE, 0x2f);
 157                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_START, SNDRV_GF1_MIN_OFFSET);
 158                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_END, vol >> 8);
 159                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, ramp_ctrl);
 160                 if (!gus->gf1.enh_mode) {
 161                         snd_gf1_delay(gus);
 162                         snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, ramp_ctrl);
 163                 }
 164                 spin_unlock_irqrestore(&gus->reg_lock, flags);
 165         }
 166         spin_lock_irqsave(&gus->reg_lock, flags);
 167         for (voice = 0; voice < pcmp->voices; voice++) {
 168                 snd_gf1_select_voice(gus, pcmp->pvoices[voice]->number);
 169                 if (gus->gf1.enh_mode)
 170                         snd_gf1_write8(gus, SNDRV_GF1_VB_MODE, 0x00);   /* deactivate voice */
 171                 snd_gf1_write8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL, voice_ctrl);
 172                 voice_ctrl &= ~0x20;
 173         }
 174         voice_ctrl |= 0x20;
 175         if (!gus->gf1.enh_mode) {
 176                 snd_gf1_delay(gus);
 177                 for (voice = 0; voice < pcmp->voices; voice++) {
 178                         snd_gf1_select_voice(gus, pcmp->pvoices[voice]->number);
 179                         snd_gf1_write8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL, voice_ctrl);
 180                         voice_ctrl &= ~0x20;    /* disable IRQ for next voice */
 181                 }
 182         }
 183         spin_unlock_irqrestore(&gus->reg_lock, flags);
 184 }
 185
 186 static void snd_gf1_pcm_interrupt_wave(struct snd_gus_card * gus,
 187                                        struct snd_gus_voice *pvoice)
 188 {
 189         struct gus_pcm_private * pcmp;
 190         struct snd_pcm_runtime *runtime;
 191         unsigned char voice_ctrl, ramp_ctrl;
 192         unsigned int idx;
 193         unsigned int end, step;
 194
 195         if (!pvoice->private_data) {
 196                 snd_printd("snd_gf1_pcm: unknown wave irq?\n");
 197                 snd_gf1_smart_stop_voice(gus, pvoice->number);
 198                 return;
 199         }
 200         pcmp = pvoice->private_data;
 201         if (pcmp == NULL) {
 202                 snd_printd("snd_gf1_pcm: unknown wave irq?\n");
 203                 snd_gf1_smart_stop_voice(gus, pvoice->number);
 204                 return;
 205         }
 206         gus = pcmp->gus;
 207         runtime = pcmp->substream->runtime;
 208
 209         spin_lock(&gus->reg_lock);
 210         snd_gf1_select_voice(gus, pvoice->number);
 211         voice_ctrl = snd_gf1_read8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL) & ~0x8b;
 212         ramp_ctrl = (snd_gf1_read8(gus, SNDRV_GF1_VB_VOLUME_CONTROL) & ~0xa4) | 0x03;
 213 #if 0
 214         snd_gf1_select_voice(gus, pvoice->number);
 215         printk(KERN_DEBUG "position = 0x%x\n",
 216                (snd_gf1_read_addr(gus, SNDRV_GF1_VA_CURRENT, voice_ctrl & 4) >> 4));
 217         snd_gf1_select_voice(gus, pcmp->pvoices[1]->number);
 218         printk(KERN_DEBUG "position = 0x%x\n",
 219                (snd_gf1_read_addr(gus, SNDRV_GF1_VA_CURRENT, voice_ctrl & 4) >> 4));
 220         snd_gf1_select_voice(gus, pvoice->number);
 221 #endif
 222         pcmp->bpos++;
 223         pcmp->bpos %= pcmp->blocks;
 224         if (pcmp->bpos + 1 >= pcmp->blocks) {   /* last block? */
 225                 voice_ctrl |= 0x08;     /* enable loop */
 226         } else {
 227                 ramp_ctrl |= 0x04;      /* enable rollover */
 228         }
 229         end = pcmp->memory + (((pcmp->bpos + 1) * pcmp->block_size) / runtime->channels);
 230         end -= voice_ctrl & 4 ? 2 : 1;
 231         step = pcmp->dma_size / runtime->channels;
 232         voice_ctrl |= 0x20;
 233         if (!pcmp->final_volume) {
 234                 ramp_ctrl |= 0x20;
 235                 ramp_ctrl &= ~0x03;
 236         }
 237         for (idx = 0; idx < pcmp->voices; idx++, end += step) {
 238                 snd_gf1_select_voice(gus, pcmp->pvoices[idx]->number);
 239                 snd_gf1_write_addr(gus, SNDRV_GF1_VA_END, end << 4, voice_ctrl & 4);
 240                 snd_gf1_write8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL, voice_ctrl);
 241                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, ramp_ctrl);
 242                 voice_ctrl &= ~0x20;
 243         }
 244         if (!gus->gf1.enh_mode) {
 245                 snd_gf1_delay(gus);
 246                 voice_ctrl |= 0x20;
 247                 for (idx = 0; idx < pcmp->voices; idx++) {
 248                         snd_gf1_select_voice(gus, pcmp->pvoices[idx]->number);
 249                         snd_gf1_write8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL, voice_ctrl);
 250                         snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, ramp_ctrl);
 251                         voice_ctrl &= ~0x20;
 252                 }
 253         }
 254         spin_unlock(&gus->reg_lock);
 255
 256         snd_pcm_period_elapsed(pcmp->substream);
 257 #if 0
 258         if ((runtime->flags & SNDRV_PCM_FLG_MMAP) &&
 259             *runtime->state == SNDRV_PCM_STATE_RUNNING) {
 260                 end = pcmp->bpos * pcmp->block_size;
 261                 if (runtime->channels > 1) {
 262                         snd_gf1_pcm_block_change(pcmp->substream, end, pcmp->memory + (end / 2), pcmp->block_size / 2);
 263                         snd_gf1_pcm_block_change(pcmp->substream, end + (pcmp->block_size / 2), pcmp->memory + (pcmp->dma_size / 2) + (end / 2), pcmp->block_size / 2);
 264                 } else {
 265                         snd_gf1_pcm_block_change(pcmp->substream, end, pcmp->memory + end, pcmp->block_size);
 266                 }
 267         }
 268 #endif
 269 }
 270
 271 static void snd_gf1_pcm_interrupt_volume(struct snd_gus_card * gus,
 272                                          struct snd_gus_voice * pvoice)
 273 {
 274         unsigned short vol;
 275         int cvoice;
 276         struct gus_pcm_private *pcmp = pvoice->private_data;
 277
 278         /* stop ramp, but leave rollover bit untouched */
 279         spin_lock(&gus->reg_lock);
 280         snd_gf1_select_voice(gus, pvoice->number);
 281         snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);
 282         spin_unlock(&gus->reg_lock);
 283         if (pcmp == NULL)
 284                 return;
 285         /* are we active? */
 286         if (!(pcmp->flags & SNDRV_GF1_PCM_PFLG_ACTIVE))
 287                 return;
 288         /* load real volume - better precision */
 289         cvoice = pcmp->pvoices[0] == pvoice ? 0 : 1;
 290         if (pcmp->substream == NULL)
 291                 return;
 292         vol = !cvoice ? gus->gf1.pcm_volume_level_left : gus->gf1.pcm_volume_level_right;
 293         spin_lock(&gus->reg_lock);
 294         snd_gf1_select_voice(gus, pvoice->number);
 295         snd_gf1_write16(gus, SNDRV_GF1_VW_VOLUME, vol);
 296         pcmp->final_volume = 1;
 297         spin_unlock(&gus->reg_lock);
 298 }
 299
 300 static void snd_gf1_pcm_volume_change(struct snd_gus_card * gus)
 301 {
 302 }
 303
 304 static int snd_gf1_pcm_poke_block(struct snd_gus_card *gus, unsigned char *buf,
 305                                   unsigned int pos, unsigned int count,
 306                                   int w16, int invert)
 307 {
 308         unsigned int len;
 309         unsigned long flags;
 310
 311         /*
 312         printk(KERN_DEBUG
 313                "poke block; buf = 0x%x, pos = %i, count = %i, port = 0x%x\n",
 314                (int)buf, pos, count, gus->gf1.port);
 315         */
 316         while (count > 0) {
 317                 len = count;
 318                 if (len > 512)          /* limit, to allow IRQ */
 319                         len = 512;
 320                 count -= len;
 321                 if (gus->interwave) {
 322                         spin_lock_irqsave(&gus->reg_lock, flags);
 323                         snd_gf1_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01 | (invert ? 0x08 : 0x00));
 324                         snd_gf1_dram_addr(gus, pos);
 325                         if (w16) {
 326                                 outb(SNDRV_GF1_GW_DRAM_IO16, GUSP(gus, GF1REGSEL));
 327                                 outsw(GUSP(gus, GF1DATALOW), buf, len >> 1);
 328                         } else {
 329                                 outsb(GUSP(gus, DRAM), buf, len);
 330                         }
 331                         spin_unlock_irqrestore(&gus->reg_lock, flags);
 332                         buf += 512;
 333                         pos += 512;
 334                 } else {
 335                         invert = invert ? 0x80 : 0x00;
 336                         if (w16) {
 337                                 len >>= 1;
 338                                 while (len--) {
 339                                         snd_gf1_poke(gus, pos++, *buf++);
 340                                         snd_gf1_poke(gus, pos++, *buf++ ^ invert);
 341                                 }
 342                         } else {
 343                                 while (len--)
 344                                         snd_gf1_poke(gus, pos++, *buf++ ^ invert);
 345                         }
 346                 }
 347                 if (count > 0 && !in_interrupt()) {
 348                         schedule_timeout_interruptible(1);
 349                         if (signal_pending(current))
 350                                 return -EAGAIN;
 351                 }
 352         }
 353         return 0;
 354 }
 355
 356 static int snd_gf1_pcm_playback_copy(struct snd_pcm_substream *substream,
 357                                      int voice,
 358                                      snd_pcm_uframes_t pos,
 359                                      void __user *src,
 360                                      snd_pcm_uframes_t count)
 361 {
 362         struct snd_pcm_runtime *runtime = substream->runtime;
 363         struct gus_pcm_private *pcmp = runtime->private_data;
 364         unsigned int bpos, len;
 365
 366         bpos = samples_to_bytes(runtime, pos) + (voice * (pcmp->dma_size / 2));
 367         len = samples_to_bytes(runtime, count);
 368         if (snd_BUG_ON(bpos > pcmp->dma_size))
 369                 return -EIO;
 370         if (snd_BUG_ON(bpos + len > pcmp->dma_size))
 371                 return -EIO;
 372         if (copy_from_user(runtime->dma_area + bpos, src, len))
 373                 return -EFAULT;
 374         if (snd_gf1_pcm_use_dma && len > 32) {
 375                 return snd_gf1_pcm_block_change(substream, bpos, pcmp->memory + bpos, len);
 376         } else {
 377                 struct snd_gus_card *gus = pcmp->gus;
 378                 int err, w16, invert;
 379
 380                 w16 = (snd_pcm_format_width(runtime->format) == 16);
 381                 invert = snd_pcm_format_unsigned(runtime->format);
 382                 if ((err = snd_gf1_pcm_poke_block(gus, runtime->dma_area + bpos, pcmp->memory + bpos, len, w16, invert)) < 0)
 383                         return err;
 384         }
 385         return 0;
 386 }
 387
 388 static int snd_gf1_pcm_playback_silence(struct snd_pcm_substream *substream,
 389                                         int voice,
 390                                         snd_pcm_uframes_t pos,
 391                                         snd_pcm_uframes_t count)
 392 {
 393         struct snd_pcm_runtime *runtime = substream->runtime;
 394         struct gus_pcm_private *pcmp = runtime->private_data;
 395         unsigned int bpos, len;
 396
 397         bpos = samples_to_bytes(runtime, pos) + (voice * (pcmp->dma_size / 2));
 398         len = samples_to_bytes(runtime, count);
 399         if (snd_BUG_ON(bpos > pcmp->dma_size))
 400                 return -EIO;
 401         if (snd_BUG_ON(bpos + len > pcmp->dma_size))
 402                 return -EIO;
 403         snd_pcm_format_set_silence(runtime->format, runtime->dma_area + bpos, count);
 404         if (snd_gf1_pcm_use_dma && len > 32) {
 405                 return snd_gf1_pcm_block_change(substream, bpos, pcmp->memory + bpos, len);
 406         } else {
 407                 struct snd_gus_card *gus = pcmp->gus;
 408                 int err, w16, invert;
 409
 410                 w16 = (snd_pcm_format_width(runtime->format) == 16);
 411                 invert = snd_pcm_format_unsigned(runtime->format);
 412                 if ((err = snd_gf1_pcm_poke_block(gus, runtime->dma_area + bpos, pcmp->memory + bpos, len, w16, invert)) < 0)
 413                         return err;
 414         }
 415         return 0;
 416 }
 417
 418 static int snd_gf1_pcm_playback_hw_params(struct snd_pcm_substream *substream,
 419                                           struct snd_pcm_hw_params *hw_params)
 420 {
 421         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 422         struct snd_pcm_runtime *runtime = substream->runtime;
 423         struct gus_pcm_private *pcmp = runtime->private_data;
 424         int err;
 425
 426         if ((err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params))) < 0)
 427                 return err;
 428         if (err > 0) {  /* change */
 429                 struct snd_gf1_mem_block *block;
 430                 if (pcmp->memory > 0) {
 431                         snd_gf1_mem_free(&gus->gf1.mem_alloc, pcmp->memory);
 432                         pcmp->memory = 0;
 433                 }
 434                 if ((block = snd_gf1_mem_alloc(&gus->gf1.mem_alloc,
 435                                                SNDRV_GF1_MEM_OWNER_DRIVER,
 436                                                "GF1 PCM",
 437                                                runtime->dma_bytes, 1, 32,
 438                                                NULL)) == NULL)
 439                         return -ENOMEM;
 440                 pcmp->memory = block->ptr;
 441         }
 442         pcmp->voices = params_channels(hw_params);
 443         if (pcmp->pvoices[0] == NULL) {
 444                 if ((pcmp->pvoices[0] = snd_gf1_alloc_voice(pcmp->gus, SNDRV_GF1_VOICE_TYPE_PCM, 0, 0)) == NULL)
 445                         return -ENOMEM;
 446                 pcmp->pvoices[0]->handler_wave = snd_gf1_pcm_interrupt_wave;
 447                 pcmp->pvoices[0]->handler_volume = snd_gf1_pcm_interrupt_volume;
 448                 pcmp->pvoices[0]->volume_change = snd_gf1_pcm_volume_change;
 449                 pcmp->pvoices[0]->private_data = pcmp;
 450         }
 451         if (pcmp->voices > 1 && pcmp->pvoices[1] == NULL) {
 452                 if ((pcmp->pvoices[1] = snd_gf1_alloc_voice(pcmp->gus, SNDRV_GF1_VOICE_TYPE_PCM, 0, 0)) == NULL)
 453                         return -ENOMEM;
 454                 pcmp->pvoices[1]->handler_wave = snd_gf1_pcm_interrupt_wave;
 455                 pcmp->pvoices[1]->handler_volume = snd_gf1_pcm_interrupt_volume;
 456                 pcmp->pvoices[1]->volume_change = snd_gf1_pcm_volume_change;
 457                 pcmp->pvoices[1]->private_data = pcmp;
 458         } else if (pcmp->voices == 1) {
 459                 if (pcmp->pvoices[1]) {
 460                         snd_gf1_free_voice(pcmp->gus, pcmp->pvoices[1]);
 461                         pcmp->pvoices[1] = NULL;
 462                 }
 463         }
 464         return 0;
 465 }
 466
 467 static int snd_gf1_pcm_playback_hw_free(struct snd_pcm_substream *substream)
 468 {
 469         struct snd_pcm_runtime *runtime = substream->runtime;
 470         struct gus_pcm_private *pcmp = runtime->private_data;
 471
 472         snd_pcm_lib_free_pages(substream);
 473         if (pcmp->pvoices[0]) {
 474                 snd_gf1_free_voice(pcmp->gus, pcmp->pvoices[0]);
 475                 pcmp->pvoices[0] = NULL;
 476         }
 477         if (pcmp->pvoices[1]) {
 478                 snd_gf1_free_voice(pcmp->gus, pcmp->pvoices[1]);
 479                 pcmp->pvoices[1] = NULL;
 480         }
 481         if (pcmp->memory > 0) {
 482                 snd_gf1_mem_free(&pcmp->gus->gf1.mem_alloc, pcmp->memory);
 483                 pcmp->memory = 0;
 484         }
 485         return 0;
 486 }
 487
 488 static int snd_gf1_pcm_playback_prepare(struct snd_pcm_substream *substream)
 489 {
 490         struct snd_pcm_runtime *runtime = substream->runtime;
 491         struct gus_pcm_private *pcmp = runtime->private_data;
 492
 493         pcmp->bpos = 0;
 494         pcmp->dma_size = snd_pcm_lib_buffer_bytes(substream);
 495         pcmp->block_size = snd_pcm_lib_period_bytes(substream);
 496         pcmp->blocks = pcmp->dma_size / pcmp->block_size;
 497         return 0;
 498 }
 499
 500 static int snd_gf1_pcm_playback_trigger(struct snd_pcm_substream *substream,
 501                                         int cmd)
 502 {
 503         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 504         struct snd_pcm_runtime *runtime = substream->runtime;
 505         struct gus_pcm_private *pcmp = runtime->private_data;
 506         int voice;
 507
 508         if (cmd == SNDRV_PCM_TRIGGER_START) {
 509                 snd_gf1_pcm_trigger_up(substream);
 510         } else if (cmd == SNDRV_PCM_TRIGGER_STOP) {
 511                 spin_lock(&pcmp->lock);
 512                 pcmp->flags &= ~SNDRV_GF1_PCM_PFLG_ACTIVE;
 513                 spin_unlock(&pcmp->lock);
 514                 voice = pcmp->pvoices[0]->number;
 515                 snd_gf1_stop_voices(gus, voice, voice);
 516                 if (pcmp->pvoices[1]) {
 517                         voice = pcmp->pvoices[1]->number;
 518                         snd_gf1_stop_voices(gus, voice, voice);
 519                 }
 520         } else {
 521                 return -EINVAL;
 522         }
 523         return 0;
 524 }
 525
 526 static snd_pcm_uframes_t snd_gf1_pcm_playback_pointer(struct snd_pcm_substream *substream)
 527 {
 528         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 529         struct snd_pcm_runtime *runtime = substream->runtime;
 530         struct gus_pcm_private *pcmp = runtime->private_data;
 531         unsigned int pos;
 532         unsigned char voice_ctrl;
 533
 534         pos = 0;
 535         spin_lock(&gus->reg_lock);
 536         if (pcmp->flags & SNDRV_GF1_PCM_PFLG_ACTIVE) {
 537                 snd_gf1_select_voice(gus, pcmp->pvoices[0]->number);
 538                 voice_ctrl = snd_gf1_read8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL);
 539                 pos = (snd_gf1_read_addr(gus, SNDRV_GF1_VA_CURRENT, voice_ctrl & 4) >> 4) - pcmp->memory;
 540                 if (substream->runtime->channels > 1)
 541                         pos <<= 1;
 542                 pos = bytes_to_frames(runtime, pos);
 543         }
 544         spin_unlock(&gus->reg_lock);
 545         return pos;
 546 }
 547
 548 static struct snd_ratnum clock = {
 549         .num = 9878400/16,
 550         .den_min = 2,
 551         .den_max = 257,
 552         .den_step = 1,
 553 };
 554
 555 static struct snd_pcm_hw_constraint_ratnums hw_constraints_clocks  = {
 556         .nrats = 1,
 557         .rats = &clock,
 558 };
 559
 560 static int snd_gf1_pcm_capture_hw_params(struct snd_pcm_substream *substream,
 561                                          struct snd_pcm_hw_params *hw_params)
 562 {
 563         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 564
 565         gus->c_dma_size = params_buffer_bytes(hw_params);
 566         gus->c_period_size = params_period_bytes(hw_params);
 567         gus->c_pos = 0;
 568         gus->gf1.pcm_rcntrl_reg = 0x21;         /* IRQ at end, enable & start */
 569         if (params_channels(hw_params) > 1)
 570                 gus->gf1.pcm_rcntrl_reg |= 2;
 571         if (gus->gf1.dma2 > 3)
 572                 gus->gf1.pcm_rcntrl_reg |= 4;
 573         if (snd_pcm_format_unsigned(params_format(hw_params)))
 574                 gus->gf1.pcm_rcntrl_reg |= 0x80;
 575         return snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params));
 576 }
 577
 578 static int snd_gf1_pcm_capture_hw_free(struct snd_pcm_substream *substream)
 579 {
 580         return snd_pcm_lib_free_pages(substream);
 581 }
 582
 583 static int snd_gf1_pcm_capture_prepare(struct snd_pcm_substream *substream)
 584 {
 585         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 586         struct snd_pcm_runtime *runtime = substream->runtime;
 587
 588         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RECORD_RATE, runtime->rate_den - 2);
 589         snd_gf1_i_write8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL, 0); /* disable sampling */
 590         snd_gf1_i_look8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL);     /* Sampling Control Register */
 591         snd_dma_program(gus->gf1.dma2, runtime->dma_addr, gus->c_period_size, DMA_MODE_READ);
 592         return 0;
 593 }
 594
 595 static int snd_gf1_pcm_capture_trigger(struct snd_pcm_substream *substream,
 596                                        int cmd)
 597 {
 598         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 599         int val;
 600
 601         if (cmd == SNDRV_PCM_TRIGGER_START) {
 602                 val = gus->gf1.pcm_rcntrl_reg;
 603         } else if (cmd == SNDRV_PCM_TRIGGER_STOP) {
 604                 val = 0;
 605         } else {
 606                 return -EINVAL;
 607         }
 608
 609         spin_lock(&gus->reg_lock);
 610         snd_gf1_write8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL, val);
 611         snd_gf1_look8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL);
 612         spin_unlock(&gus->reg_lock);
 613         return 0;
 614 }
 615
 616 static snd_pcm_uframes_t snd_gf1_pcm_capture_pointer(struct snd_pcm_substream *substream)
 617 {
 618         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 619         int pos = snd_dma_pointer(gus->gf1.dma2, gus->c_period_size);
 620         pos = bytes_to_frames(substream->runtime, (gus->c_pos + pos) % gus->c_dma_size);
 621         return pos;
 622 }
 623
 624 static void snd_gf1_pcm_interrupt_dma_read(struct snd_gus_card * gus)
 625 {
 626         snd_gf1_i_write8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL, 0); /* disable sampling */
 627         snd_gf1_i_look8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL);     /* Sampling Control Register */
 628         if (gus->pcm_cap_substream != NULL) {
 629                 snd_gf1_pcm_capture_prepare(gus->pcm_cap_substream);
 630                 snd_gf1_pcm_capture_trigger(gus->pcm_cap_substream, SNDRV_PCM_TRIGGER_START);
 631                 gus->c_pos += gus->c_period_size;
 632                 snd_pcm_period_elapsed(gus->pcm_cap_substream);
 633         }
 634 }
 635
 636 static struct snd_pcm_hardware snd_gf1_pcm_playback =
 637 {
 638         .info =                 SNDRV_PCM_INFO_NONINTERLEAVED,
 639         .formats                = (SNDRV_PCM_FMTBIT_S8 | SNDRV_PCM_FMTBIT_U8 |
 640                                  SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_U16_LE),
 641         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
 642         .rate_min =             5510,
 643         .rate_max =             48000,
 644         .channels_min =         1,
 645         .channels_max =         2,
 646         .buffer_bytes_max =     (128*1024),
 647         .period_bytes_min =     64,
 648         .period_bytes_max =     (128*1024),
 649         .periods_min =          1,
 650         .periods_max =          1024,
 651         .fifo_size =            0,
 652 };
 653
 654 static struct snd_pcm_hardware snd_gf1_pcm_capture =
 655 {
 656         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
 657                                  SNDRV_PCM_INFO_MMAP_VALID),
 658         .formats =              SNDRV_PCM_FMTBIT_S8 | SNDRV_PCM_FMTBIT_U8,
 659         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_44100,
 660         .rate_min =             5510,
 661         .rate_max =             44100,
 662         .channels_min =         1,
 663         .channels_max =         2,
 664         .buffer_bytes_max =     (128*1024),
 665         .period_bytes_min =     64,
 666         .period_bytes_max =     (128*1024),
 667         .periods_min =          1,
 668         .periods_max =          1024,
 669         .fifo_size =            0,
 670 };
 671
 672 static void snd_gf1_pcm_playback_free(struct snd_pcm_runtime *runtime)
 673 {
 674         kfree(runtime->private_data);
 675 }
 676
 677 static int snd_gf1_pcm_playback_open(struct snd_pcm_substream *substream)
 678 {
 679         struct gus_pcm_private *pcmp;
 680         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 681         struct snd_pcm_runtime *runtime = substream->runtime;
 682         int err;
 683
 684         pcmp = kzalloc(sizeof(*pcmp), GFP_KERNEL);
 685         if (pcmp == NULL)
 686                 return -ENOMEM;
 687         pcmp->gus = gus;
 688         spin_lock_init(&pcmp->lock);
 689         init_waitqueue_head(&pcmp->sleep);
 690         atomic_set(&pcmp->dma_count, 0);
 691
 692         runtime->private_data = pcmp;
 693         runtime->private_free = snd_gf1_pcm_playback_free;
 694
 695 #if 0
 696         printk(KERN_DEBUG "playback.buffer = 0x%lx, gf1.pcm_buffer = 0x%lx\n",
 697                (long) pcm->playback.buffer, (long) gus->gf1.pcm_buffer);
 698 #endif
 699         if ((err = snd_gf1_dma_init(gus)) < 0)
 700                 return err;
 701         pcmp->flags = SNDRV_GF1_PCM_PFLG_NONE;
 702         pcmp->substream = substream;
 703         runtime->hw = snd_gf1_pcm_playback;
 704         snd_pcm_limit_isa_dma_size(gus->gf1.dma1, &runtime->hw.buffer_bytes_max);
 705         snd_pcm_limit_isa_dma_size(gus->gf1.dma1, &runtime->hw.period_bytes_max);
 706         snd_pcm_hw_constraint_step(runtime, 0, SNDRV_PCM_HW_PARAM_PERIOD_BYTES, 64);
 707         return 0;
 708 }
 709
 710 static int snd_gf1_pcm_playback_close(struct snd_pcm_substream *substream)
 711 {
 712         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 713         struct snd_pcm_runtime *runtime = substream->runtime;
 714         struct gus_pcm_private *pcmp = runtime->private_data;
 715
 716         if (!wait_event_timeout(pcmp->sleep, (atomic_read(&pcmp->dma_count) <= 0), 2*HZ))
 717                 snd_printk(KERN_ERR "gf1 pcm - serious DMA problem\n");
 718
 719         snd_gf1_dma_done(gus);
 720         return 0;
 721 }
 722
 723 static int snd_gf1_pcm_capture_open(struct snd_pcm_substream *substream)
 724 {
 725         struct snd_pcm_runtime *runtime = substream->runtime;
 726         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 727
 728         gus->gf1.interrupt_handler_dma_read = snd_gf1_pcm_interrupt_dma_read;
 729         gus->pcm_cap_substream = substream;
 730         substream->runtime->hw = snd_gf1_pcm_capture;
 731         snd_pcm_limit_isa_dma_size(gus->gf1.dma2, &runtime->hw.buffer_bytes_max);
 732         snd_pcm_limit_isa_dma_size(gus->gf1.dma2, &runtime->hw.period_bytes_max);
 733         snd_pcm_hw_constraint_ratnums(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
 734                                       &hw_constraints_clocks);
 735         return 0;
 736 }
 737
 738 static int snd_gf1_pcm_capture_close(struct snd_pcm_substream *substream)
 739 {
 740         struct snd_gus_card *gus = snd_pcm_substream_chip(substream);
 741
 742         gus->pcm_cap_substream = NULL;
 743         snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_DMA_READ);
 744         return 0;
 745 }
 746
 747 static int snd_gf1_pcm_volume_info(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
 748 {
 749         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 750         uinfo->count = 2;
 751         uinfo->value.integer.min = 0;
 752         uinfo->value.integer.max = 127;
 753         return 0;
 754 }
 755
 756 static int snd_gf1_pcm_volume_get(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 757 {
 758         struct snd_gus_card *gus = snd_kcontrol_chip(kcontrol);
 759         unsigned long flags;
 760
 761         spin_lock_irqsave(&gus->pcm_volume_level_lock, flags);
 762         ucontrol->value.integer.value[0] = gus->gf1.pcm_volume_level_left1;
 763         ucontrol->value.integer.value[1] = gus->gf1.pcm_volume_level_right1;
 764         spin_unlock_irqrestore(&gus->pcm_volume_level_lock, flags);
 765         return 0;
 766 }
 767
 768 static int snd_gf1_pcm_volume_put(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
 769 {
 770         struct snd_gus_card *gus = snd_kcontrol_chip(kcontrol);
 771         unsigned long flags;
 772         int change;
 773         unsigned int idx;
 774         unsigned short val1, val2, vol;
 775         struct gus_pcm_private *pcmp;
 776         struct snd_gus_voice *pvoice;
 777
 778         val1 = ucontrol->value.integer.value[0] & 127;
 779         val2 = ucontrol->value.integer.value[1] & 127;
 780         spin_lock_irqsave(&gus->pcm_volume_level_lock, flags);
 781         change = val1 != gus->gf1.pcm_volume_level_left1 ||
 782                  val2 != gus->gf1.pcm_volume_level_right1;
 783         gus->gf1.pcm_volume_level_left1 = val1;
 784         gus->gf1.pcm_volume_level_right1 = val2;
 785         gus->gf1.pcm_volume_level_left = snd_gf1_lvol_to_gvol_raw(val1 << 9) << 4;
 786         gus->gf1.pcm_volume_level_right = snd_gf1_lvol_to_gvol_raw(val2 << 9) << 4;
 787         spin_unlock_irqrestore(&gus->pcm_volume_level_lock, flags);
 788         /* are we active? */
 789         spin_lock_irqsave(&gus->voice_alloc, flags);
 790         for (idx = 0; idx < 32; idx++) {
 791                 pvoice = &gus->gf1.voices[idx];
 792                 if (!pvoice->pcm)
 793                         continue;
 794                 pcmp = pvoice->private_data;
 795                 if (!(pcmp->flags & SNDRV_GF1_PCM_PFLG_ACTIVE))
 796                         continue;
 797                 /* load real volume - better precision */
 798                 spin_lock(&gus->reg_lock);
 799                 snd_gf1_select_voice(gus, pvoice->number);
 800                 snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);
 801                 vol = pvoice == pcmp->pvoices[0] ? gus->gf1.pcm_volume_level_left : gus->gf1.pcm_volume_level_right;
 802                 snd_gf1_write16(gus, SNDRV_GF1_VW_VOLUME, vol);
 803                 pcmp->final_volume = 1;
 804                 spin_unlock(&gus->reg_lock);
 805         }
 806         spin_unlock_irqrestore(&gus->voice_alloc, flags);
 807         return change;
 808 }
 809
 810 static struct snd_kcontrol_new snd_gf1_pcm_volume_control =
 811 {
 812         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
 813         .name = "PCM Playback Volume",
 814         .info = snd_gf1_pcm_volume_info,
 815         .get = snd_gf1_pcm_volume_get,
 816         .put = snd_gf1_pcm_volume_put
 817 };
 818
 819 static struct snd_kcontrol_new snd_gf1_pcm_volume_control1 =
 820 {
 821         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
 822         .name = "GPCM Playback Volume",
 823         .info = snd_gf1_pcm_volume_info,
 824         .get = snd_gf1_pcm_volume_get,
 825         .put = snd_gf1_pcm_volume_put
 826 };
 827
 828 static struct snd_pcm_ops snd_gf1_pcm_playback_ops = {
 829         .open =         snd_gf1_pcm_playback_open,
 830         .close =        snd_gf1_pcm_playback_close,
 831         .ioctl =        snd_pcm_lib_ioctl,
 832         .hw_params =    snd_gf1_pcm_playback_hw_params,
 833         .hw_free =      snd_gf1_pcm_playback_hw_free,
 834         .prepare =      snd_gf1_pcm_playback_prepare,
 835         .trigger =      snd_gf1_pcm_playback_trigger,
 836         .pointer =      snd_gf1_pcm_playback_pointer,
 837         .copy =         snd_gf1_pcm_playback_copy,
 838         .silence =      snd_gf1_pcm_playback_silence,
 839 };
 840
 841 static struct snd_pcm_ops snd_gf1_pcm_capture_ops = {
 842         .open =         snd_gf1_pcm_capture_open,
 843         .close =        snd_gf1_pcm_capture_close,
 844         .ioctl =        snd_pcm_lib_ioctl,
 845         .hw_params =    snd_gf1_pcm_capture_hw_params,
 846         .hw_free =      snd_gf1_pcm_capture_hw_free,
 847         .prepare =      snd_gf1_pcm_capture_prepare,
 848         .trigger =      snd_gf1_pcm_capture_trigger,
 849         .pointer =      snd_gf1_pcm_capture_pointer,
 850 };
 851
 852 int snd_gf1_pcm_new(struct snd_gus_card *gus, int pcm_dev, int control_index)
 853 {
 854         struct snd_card *card;
 855         struct snd_kcontrol *kctl;
 856         struct snd_pcm *pcm;
 857         struct snd_pcm_substream *substream;
 858         int capture, err;
 859
 860         card = gus->card;
 861         capture = !gus->interwave && !gus->ess_flag && !gus->ace_flag ? 1 : 0;
 862         err = snd_pcm_new(card,
 863                           gus->interwave ? "AMD InterWave" : "GF1",
 864                           pcm_dev,
 865                           gus->gf1.pcm_channels / 2,
 866                           capture,
 867                           &pcm);
 868         if (err < 0)
 869                 return err;
 870         pcm->private_data = gus;
 871         /* playback setup */
 872         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_gf1_pcm_playback_ops);
 873
 874         for (substream = pcm->streams[SNDRV_PCM_STREAM_PLAYBACK].substream; substream; substream = substream->next)
 875                 snd_pcm_lib_preallocate_pages(substream, SNDRV_DMA_TYPE_DEV,
 876                                               snd_dma_isa_data(),
 877                                               64*1024, gus->gf1.dma1 > 3 ? 128*1024 : 64*1024);
 878
 879         pcm->info_flags = 0;
 880         pcm->dev_subclass = SNDRV_PCM_SUBCLASS_GENERIC_MIX;
 881         if (capture) {
 882                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_gf1_pcm_capture_ops);
 883                 if (gus->gf1.dma2 == gus->gf1.dma1)
 884                         pcm->info_flags |= SNDRV_PCM_INFO_HALF_DUPLEX;
 885                 snd_pcm_lib_preallocate_pages(pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream,
 886                                               SNDRV_DMA_TYPE_DEV, snd_dma_isa_data(),
 887                                               64*1024, gus->gf1.dma2 > 3 ? 128*1024 : 64*1024);
 888         }
 889         strcpy(pcm->name, pcm->id);
 890         if (gus->interwave) {
 891                 sprintf(pcm->name + strlen(pcm->name), " rev %c", gus->revision + 'A');
 892         }
 893         strcat(pcm->name, " (synth)");
 894         gus->pcm = pcm;
 895
 896         if (gus->codec_flag)
 897                 kctl = snd_ctl_new1(&snd_gf1_pcm_volume_control1, gus);
 898         else
 899                 kctl = snd_ctl_new1(&snd_gf1_pcm_volume_control, gus);
 900         if ((err = snd_ctl_add(card, kctl)) < 0)
 901                 return err;
 902         kctl->id.index = control_index;
 903
 904         return 0;
 905 }
 906