Merge branch 'for-2.6.30' into for-2.6.31
[linux-2.6] / 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_irqsave(&gus->reg_lock, flags);
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_irqrestore(&gus->reg_lock, flags);
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, struct snd_pcm ** rpcm)
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         if (rpcm)
861                 *rpcm = NULL;
862         card = gus->card;
863         capture = !gus->interwave && !gus->ess_flag && !gus->ace_flag ? 1 : 0;
864         err = snd_pcm_new(card,
865                           gus->interwave ? "AMD InterWave" : "GF1",
866                           pcm_dev,
867                           gus->gf1.pcm_channels / 2,
868                           capture,
869                           &pcm);
870         if (err < 0)
871                 return err;
872         pcm->private_data = gus;
873         /* playback setup */
874         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_gf1_pcm_playback_ops);
875
876         for (substream = pcm->streams[SNDRV_PCM_STREAM_PLAYBACK].substream; substream; substream = substream->next)
877                 snd_pcm_lib_preallocate_pages(substream, SNDRV_DMA_TYPE_DEV,
878                                               snd_dma_isa_data(),
879                                               64*1024, gus->gf1.dma1 > 3 ? 128*1024 : 64*1024);
880         
881         pcm->info_flags = 0;
882         pcm->dev_subclass = SNDRV_PCM_SUBCLASS_GENERIC_MIX;
883         if (capture) {
884                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_gf1_pcm_capture_ops);
885                 if (gus->gf1.dma2 == gus->gf1.dma1)
886                         pcm->info_flags |= SNDRV_PCM_INFO_HALF_DUPLEX;
887                 snd_pcm_lib_preallocate_pages(pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream,
888                                               SNDRV_DMA_TYPE_DEV, snd_dma_isa_data(),
889                                               64*1024, gus->gf1.dma2 > 3 ? 128*1024 : 64*1024);
890         }
891         strcpy(pcm->name, pcm->id);
892         if (gus->interwave) {
893                 sprintf(pcm->name + strlen(pcm->name), " rev %c", gus->revision + 'A');
894         }
895         strcat(pcm->name, " (synth)");
896         gus->pcm = pcm;
897
898         if (gus->codec_flag)
899                 kctl = snd_ctl_new1(&snd_gf1_pcm_volume_control1, gus);
900         else
901                 kctl = snd_ctl_new1(&snd_gf1_pcm_volume_control, gus);
902         if ((err = snd_ctl_add(card, kctl)) < 0)
903                 return err;
904         kctl->id.index = control_index;
905
906         if (rpcm)
907                 *rpcm = pcm;
908         return 0;
909 }
910