sound/isa/gus/gus_pcm.c

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