sound/isa/sb/emu8000_pcm.c

   1 /*
   2  * pcm emulation on emu8000 wavetable
   3  *
   4  *  Copyright (C) 2002 Takashi Iwai <tiwai@suse.de>
   5  *
   6  *   This program is free software; you can redistribute it and/or modify
   7  *   it under the terms of the GNU General Public License as published by
   8  *   the Free Software Foundation; either version 2 of the License, or
   9  *   (at your option) any later version.
  10  *
  11  *   This program is distributed in the hope that it will be useful,
  12  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *   GNU General Public License for more details.
  15  *
  16  *   You should have received a copy of the GNU General Public License
  17  *   along with this program; if not, write to the Free Software
  18  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19  */
  20
  21 #include "emu8000_local.h"
  22
  23 #include <linux/sched/signal.h>
  24 #include <linux/init.h>
  25 #include <linux/slab.h>
  26 #include <sound/initval.h>
  27 #include <sound/pcm.h>
  28
  29 /*
  30  * define the following if you want to use this pcm with non-interleaved mode
  31  */
  32 /* #define USE_NONINTERLEAVE */
  33
  34 /* NOTE: for using the non-interleaved mode with alsa-lib, you have to set
  35  * mmap_emulation flag to 1 in your .asoundrc, such like
  36  *
  37  *      pcm.emu8k {
  38  *              type plug
  39  *              slave.pcm {
  40  *                      type hw
  41  *                      card 0
  42  *                      device 1
  43  *                      mmap_emulation 1
  44  *              }
  45  *      }
  46  *
  47  * besides, for the time being, the non-interleaved mode doesn't work well on
  48  * alsa-lib...
  49  */
  50
  51
  52 struct snd_emu8k_pcm {
  53         struct snd_emu8000 *emu;
  54         struct snd_pcm_substream *substream;
  55
  56         unsigned int allocated_bytes;
  57         struct snd_util_memblk *block;
  58         unsigned int offset;
  59         unsigned int buf_size;
  60         unsigned int period_size;
  61         unsigned int loop_start[2];
  62         unsigned int pitch;
  63         int panning[2];
  64         int last_ptr;
  65         int period_pos;
  66         int voices;
  67         unsigned int dram_opened: 1;
  68         unsigned int running: 1;
  69         unsigned int timer_running: 1;
  70         struct timer_list timer;
  71         spinlock_t timer_lock;
  72 };
  73
  74 #define LOOP_BLANK_SIZE         8
  75
  76
  77 /*
  78  * open up channels for the simultaneous data transfer and playback
  79  */
  80 static int
  81 emu8k_open_dram_for_pcm(struct snd_emu8000 *emu, int channels)
  82 {
  83         int i;
  84
  85         /* reserve up to 2 voices for playback */
  86         snd_emux_lock_voice(emu->emu, 0);
  87         if (channels > 1)
  88                 snd_emux_lock_voice(emu->emu, 1);
  89
  90         /* reserve 28 voices for loading */
  91         for (i = channels + 1; i < EMU8000_DRAM_VOICES; i++) {
  92                 unsigned int mode = EMU8000_RAM_WRITE;
  93                 snd_emux_lock_voice(emu->emu, i);
  94 #ifndef USE_NONINTERLEAVE
  95                 if (channels > 1 && (i & 1) != 0)
  96                         mode |= EMU8000_RAM_RIGHT;
  97 #endif
  98                 snd_emu8000_dma_chan(emu, i, mode);
  99         }
 100
 101         /* assign voice 31 and 32 to ROM */
 102         EMU8000_VTFT_WRITE(emu, 30, 0);
 103         EMU8000_PSST_WRITE(emu, 30, 0x1d8);
 104         EMU8000_CSL_WRITE(emu, 30, 0x1e0);
 105         EMU8000_CCCA_WRITE(emu, 30, 0x1d8);
 106         EMU8000_VTFT_WRITE(emu, 31, 0);
 107         EMU8000_PSST_WRITE(emu, 31, 0x1d8);
 108         EMU8000_CSL_WRITE(emu, 31, 0x1e0);
 109         EMU8000_CCCA_WRITE(emu, 31, 0x1d8);
 110
 111         return 0;
 112 }
 113
 114 /*
 115  */
 116 static void
 117 snd_emu8000_write_wait(struct snd_emu8000 *emu, int can_schedule)
 118 {
 119         while ((EMU8000_SMALW_READ(emu) & 0x80000000) != 0) {
 120                 if (can_schedule) {
 121                         schedule_timeout_interruptible(1);
 122                         if (signal_pending(current))
 123                                 break;
 124                 }
 125         }
 126 }
 127
 128 /*
 129  * close all channels
 130  */
 131 static void
 132 emu8k_close_dram(struct snd_emu8000 *emu)
 133 {
 134         int i;
 135
 136         for (i = 0; i < 2; i++)
 137                 snd_emux_unlock_voice(emu->emu, i);
 138         for (; i < EMU8000_DRAM_VOICES; i++) {
 139                 snd_emu8000_dma_chan(emu, i, EMU8000_RAM_CLOSE);
 140                 snd_emux_unlock_voice(emu->emu, i);
 141         }
 142 }
 143
 144 /*
 145  * convert Hz to AWE32 rate offset (see emux/soundfont.c)
 146  */
 147
 148 #define OFFSET_SAMPLERATE       1011119         /* base = 44100 */
 149 #define SAMPLERATE_RATIO        4096
 150
 151 static int calc_rate_offset(int hz)
 152 {
 153         return snd_sf_linear_to_log(hz, OFFSET_SAMPLERATE, SAMPLERATE_RATIO);
 154 }
 155
 156
 157 /*
 158  */
 159
 160 static const struct snd_pcm_hardware emu8k_pcm_hw = {
 161 #ifdef USE_NONINTERLEAVE
 162         .info =                 SNDRV_PCM_INFO_NONINTERLEAVED,
 163 #else
 164         .info =                 SNDRV_PCM_INFO_INTERLEAVED,
 165 #endif
 166         .formats =              SNDRV_PCM_FMTBIT_S16_LE,
 167         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
 168         .rate_min =             4000,
 169         .rate_max =             48000,
 170         .channels_min =         1,
 171         .channels_max =         2,
 172         .buffer_bytes_max =     (128*1024),
 173         .period_bytes_min =     1024,
 174         .period_bytes_max =     (128*1024),
 175         .periods_min =          2,
 176         .periods_max =          1024,
 177         .fifo_size =            0,
 178
 179 };
 180
 181 /*
 182  * get the current position at the given channel from CCCA register
 183  */
 184 static inline int emu8k_get_curpos(struct snd_emu8k_pcm *rec, int ch)
 185 {
 186         int val = EMU8000_CCCA_READ(rec->emu, ch) & 0xfffffff;
 187         val -= rec->loop_start[ch] - 1;
 188         return val;
 189 }
 190
 191
 192 /*
 193  * timer interrupt handler
 194  * check the current position and update the period if necessary.
 195  */
 196 static void emu8k_pcm_timer_func(struct timer_list *t)
 197 {
 198         struct snd_emu8k_pcm *rec = from_timer(rec, t, timer);
 199         int ptr, delta;
 200
 201         spin_lock(&rec->timer_lock);
 202         /* update the current pointer */
 203         ptr = emu8k_get_curpos(rec, 0);
 204         if (ptr < rec->last_ptr)
 205                 delta = ptr + rec->buf_size - rec->last_ptr;
 206         else
 207                 delta = ptr - rec->last_ptr;
 208         rec->period_pos += delta;
 209         rec->last_ptr = ptr;
 210
 211         /* reprogram timer */
 212         mod_timer(&rec->timer, jiffies + 1);
 213
 214         /* update period */
 215         if (rec->period_pos >= (int)rec->period_size) {
 216                 rec->period_pos %= rec->period_size;
 217                 spin_unlock(&rec->timer_lock);
 218                 snd_pcm_period_elapsed(rec->substream);
 219                 return;
 220         }
 221         spin_unlock(&rec->timer_lock);
 222 }
 223
 224
 225 /*
 226  * open pcm
 227  * creating an instance here
 228  */
 229 static int emu8k_pcm_open(struct snd_pcm_substream *subs)
 230 {
 231         struct snd_emu8000 *emu = snd_pcm_substream_chip(subs);
 232         struct snd_emu8k_pcm *rec;
 233         struct snd_pcm_runtime *runtime = subs->runtime;
 234
 235         rec = kzalloc(sizeof(*rec), GFP_KERNEL);
 236         if (! rec)
 237                 return -ENOMEM;
 238
 239         rec->emu = emu;
 240         rec->substream = subs;
 241         runtime->private_data = rec;
 242
 243         spin_lock_init(&rec->timer_lock);
 244         timer_setup(&rec->timer, emu8k_pcm_timer_func, 0);
 245
 246         runtime->hw = emu8k_pcm_hw;
 247         runtime->hw.buffer_bytes_max = emu->mem_size - LOOP_BLANK_SIZE * 3;
 248         runtime->hw.period_bytes_max = runtime->hw.buffer_bytes_max / 2;
 249
 250         /* use timer to update periods.. (specified in msec) */
 251         snd_pcm_hw_constraint_minmax(runtime, SNDRV_PCM_HW_PARAM_PERIOD_TIME,
 252                                      (1000000 + HZ - 1) / HZ, UINT_MAX);
 253
 254         return 0;
 255 }
 256
 257 static int emu8k_pcm_close(struct snd_pcm_substream *subs)
 258 {
 259         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 260         kfree(rec);
 261         subs->runtime->private_data = NULL;
 262         return 0;
 263 }
 264
 265 /*
 266  * calculate pitch target
 267  */
 268 static int calc_pitch_target(int pitch)
 269 {
 270         int ptarget = 1 << (pitch >> 12);
 271         if (pitch & 0x800) ptarget += (ptarget * 0x102e) / 0x2710;
 272         if (pitch & 0x400) ptarget += (ptarget * 0x764) / 0x2710;
 273         if (pitch & 0x200) ptarget += (ptarget * 0x389) / 0x2710;
 274         ptarget += (ptarget >> 1);
 275         if (ptarget > 0xffff) ptarget = 0xffff;
 276         return ptarget;
 277 }
 278
 279 /*
 280  * set up the voice
 281  */
 282 static void setup_voice(struct snd_emu8k_pcm *rec, int ch)
 283 {
 284         struct snd_emu8000 *hw = rec->emu;
 285         unsigned int temp;
 286
 287         /* channel to be silent and idle */
 288         EMU8000_DCYSUSV_WRITE(hw, ch, 0x0080);
 289         EMU8000_VTFT_WRITE(hw, ch, 0x0000FFFF);
 290         EMU8000_CVCF_WRITE(hw, ch, 0x0000FFFF);
 291         EMU8000_PTRX_WRITE(hw, ch, 0);
 292         EMU8000_CPF_WRITE(hw, ch, 0);
 293
 294         /* pitch offset */
 295         EMU8000_IP_WRITE(hw, ch, rec->pitch);
 296         /* set envelope parameters */
 297         EMU8000_ENVVAL_WRITE(hw, ch, 0x8000);
 298         EMU8000_ATKHLD_WRITE(hw, ch, 0x7f7f);
 299         EMU8000_DCYSUS_WRITE(hw, ch, 0x7f7f);
 300         EMU8000_ENVVOL_WRITE(hw, ch, 0x8000);
 301         EMU8000_ATKHLDV_WRITE(hw, ch, 0x7f7f);
 302         /* decay/sustain parameter for volume envelope is used
 303            for triggerg the voice */
 304         /* modulation envelope heights */
 305         EMU8000_PEFE_WRITE(hw, ch, 0x0);
 306         /* lfo1/2 delay */
 307         EMU8000_LFO1VAL_WRITE(hw, ch, 0x8000);
 308         EMU8000_LFO2VAL_WRITE(hw, ch, 0x8000);
 309         /* lfo1 pitch & cutoff shift */
 310         EMU8000_FMMOD_WRITE(hw, ch, 0);
 311         /* lfo1 volume & freq */
 312         EMU8000_TREMFRQ_WRITE(hw, ch, 0);
 313         /* lfo2 pitch & freq */
 314         EMU8000_FM2FRQ2_WRITE(hw, ch, 0);
 315         /* pan & loop start */
 316         temp = rec->panning[ch];
 317         temp = (temp <<24) | ((unsigned int)rec->loop_start[ch] - 1);
 318         EMU8000_PSST_WRITE(hw, ch, temp);
 319         /* chorus & loop end (chorus 8bit, MSB) */
 320         temp = 0; // chorus
 321         temp = (temp << 24) | ((unsigned int)rec->loop_start[ch] + rec->buf_size - 1);
 322         EMU8000_CSL_WRITE(hw, ch, temp);
 323         /* Q & current address (Q 4bit value, MSB) */
 324         temp = 0; // filterQ
 325         temp = (temp << 28) | ((unsigned int)rec->loop_start[ch] - 1);
 326         EMU8000_CCCA_WRITE(hw, ch, temp);
 327         /* clear unknown registers */
 328         EMU8000_00A0_WRITE(hw, ch, 0);
 329         EMU8000_0080_WRITE(hw, ch, 0);
 330 }
 331
 332 /*
 333  * trigger the voice
 334  */
 335 static void start_voice(struct snd_emu8k_pcm *rec, int ch)
 336 {
 337         unsigned long flags;
 338         struct snd_emu8000 *hw = rec->emu;
 339         unsigned int temp, aux;
 340         int pt = calc_pitch_target(rec->pitch);
 341
 342         /* cutoff and volume */
 343         EMU8000_IFATN_WRITE(hw, ch, 0xff00);
 344         EMU8000_VTFT_WRITE(hw, ch, 0xffff);
 345         EMU8000_CVCF_WRITE(hw, ch, 0xffff);
 346         /* trigger envelope */
 347         EMU8000_DCYSUSV_WRITE(hw, ch, 0x7f7f);
 348         /* set reverb and pitch target */
 349         temp = 0; // reverb
 350         if (rec->panning[ch] == 0)
 351                 aux = 0xff;
 352         else
 353                 aux = (-rec->panning[ch]) & 0xff;
 354         temp = (temp << 8) | (pt << 16) | aux;
 355         EMU8000_PTRX_WRITE(hw, ch, temp);
 356         EMU8000_CPF_WRITE(hw, ch, pt << 16);
 357
 358         /* start timer */
 359         spin_lock_irqsave(&rec->timer_lock, flags);
 360         if (! rec->timer_running) {
 361                 mod_timer(&rec->timer, jiffies + 1);
 362                 rec->timer_running = 1;
 363         }
 364         spin_unlock_irqrestore(&rec->timer_lock, flags);
 365 }
 366
 367 /*
 368  * stop the voice immediately
 369  */
 370 static void stop_voice(struct snd_emu8k_pcm *rec, int ch)
 371 {
 372         unsigned long flags;
 373         struct snd_emu8000 *hw = rec->emu;
 374
 375         EMU8000_DCYSUSV_WRITE(hw, ch, 0x807F);
 376
 377         /* stop timer */
 378         spin_lock_irqsave(&rec->timer_lock, flags);
 379         if (rec->timer_running) {
 380                 del_timer(&rec->timer);
 381                 rec->timer_running = 0;
 382         }
 383         spin_unlock_irqrestore(&rec->timer_lock, flags);
 384 }
 385
 386 static int emu8k_pcm_trigger(struct snd_pcm_substream *subs, int cmd)
 387 {
 388         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 389         int ch;
 390
 391         switch (cmd) {
 392         case SNDRV_PCM_TRIGGER_START:
 393                 for (ch = 0; ch < rec->voices; ch++)
 394                         start_voice(rec, ch);
 395                 rec->running = 1;
 396                 break;
 397         case SNDRV_PCM_TRIGGER_STOP:
 398                 rec->running = 0;
 399                 for (ch = 0; ch < rec->voices; ch++)
 400                         stop_voice(rec, ch);
 401                 break;
 402         default:
 403                 return -EINVAL;
 404         }
 405         return 0;
 406 }
 407
 408
 409 /*
 410  * copy / silence ops
 411  */
 412
 413 /*
 414  * this macro should be inserted in the copy/silence loops
 415  * to reduce the latency.  without this, the system will hang up
 416  * during the whole loop.
 417  */
 418 #define CHECK_SCHEDULER() \
 419 do { \
 420         cond_resched();\
 421         if (signal_pending(current))\
 422                 return -EAGAIN;\
 423 } while (0)
 424
 425 enum {
 426         COPY_USER, COPY_KERNEL, FILL_SILENCE,
 427 };
 428
 429 #define GET_VAL(sval, buf, mode)                                        \
 430         do {                                                            \
 431                 switch (mode) {                                         \
 432                 case FILL_SILENCE:                                      \
 433                         sval = 0;                                       \
 434                         break;                                          \
 435                 case COPY_KERNEL:                                       \
 436                         sval = *buf++;                                  \
 437                         break;                                          \
 438                 default:                                                \
 439                         if (get_user(sval, (unsigned short __user *)buf)) \
 440                                 return -EFAULT;                         \
 441                         buf++;                                          \
 442                         break;                                          \
 443                 }                                                       \
 444         } while (0)
 445
 446 #ifdef USE_NONINTERLEAVE
 447
 448 #define LOOP_WRITE(rec, offset, _buf, count, mode)              \
 449         do {                                                    \
 450                 struct snd_emu8000 *emu = (rec)->emu;           \
 451                 unsigned short *buf = (unsigned short *)(_buf); \
 452                 snd_emu8000_write_wait(emu, 1);                 \
 453                 EMU8000_SMALW_WRITE(emu, offset);               \
 454                 while (count > 0) {                             \
 455                         unsigned short sval;                    \
 456                         CHECK_SCHEDULER();                      \
 457                         GET_VAL(sval, buf, mode);               \
 458                         EMU8000_SMLD_WRITE(emu, sval);          \
 459                         count--;                                \
 460                 }                                               \
 461         } while (0)
 462
 463 /* copy one channel block */
 464 static int emu8k_pcm_copy(struct snd_pcm_substream *subs,
 465                           int voice, unsigned long pos,
 466                           void __user *src, unsigned long count)
 467 {
 468         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 469
 470         /* convert to word unit */
 471         pos = (pos << 1) + rec->loop_start[voice];
 472         count <<= 1;
 473         LOOP_WRITE(rec, pos, src, count, COPY_USER);
 474         return 0;
 475 }
 476
 477 static int emu8k_pcm_copy_kernel(struct snd_pcm_substream *subs,
 478                                  int voice, unsigned long pos,
 479                                  void *src, unsigned long count)
 480 {
 481         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 482
 483         /* convert to word unit */
 484         pos = (pos << 1) + rec->loop_start[voice];
 485         count <<= 1;
 486         LOOP_WRITE(rec, pos, src, count, COPY_KERNEL);
 487         return 0;
 488 }
 489
 490 /* make a channel block silence */
 491 static int emu8k_pcm_silence(struct snd_pcm_substream *subs,
 492                              int voice, unsigned long pos, unsigned long count)
 493 {
 494         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 495
 496         /* convert to word unit */
 497         pos = (pos << 1) + rec->loop_start[voice];
 498         count <<= 1;
 499         LOOP_WRITE(rec, pos, NULL, count, FILL_SILENCE);
 500         return 0;
 501 }
 502
 503 #else /* interleave */
 504
 505 #define LOOP_WRITE(rec, pos, _buf, count, mode)                         \
 506         do {                                                            \
 507                 struct snd_emu8000 *emu = rec->emu;                     \
 508                 unsigned short *buf = (unsigned short *)(_buf);         \
 509                 snd_emu8000_write_wait(emu, 1);                         \
 510                 EMU8000_SMALW_WRITE(emu, pos + rec->loop_start[0]);     \
 511                 if (rec->voices > 1)                                    \
 512                         EMU8000_SMARW_WRITE(emu, pos + rec->loop_start[1]); \
 513                 while (count > 0) {                                     \
 514                         unsigned short sval;                            \
 515                         CHECK_SCHEDULER();                              \
 516                         GET_VAL(sval, buf, mode);                       \
 517                         EMU8000_SMLD_WRITE(emu, sval);                  \
 518                         if (rec->voices > 1) {                          \
 519                                 CHECK_SCHEDULER();                      \
 520                                 GET_VAL(sval, buf, mode);               \
 521                                 EMU8000_SMRD_WRITE(emu, sval);          \
 522                         }                                               \
 523                         count--;                                        \
 524                 }                                                       \
 525         } while (0)
 526
 527
 528 /*
 529  * copy the interleaved data can be done easily by using
 530  * DMA "left" and "right" channels on emu8k engine.
 531  */
 532 static int emu8k_pcm_copy(struct snd_pcm_substream *subs,
 533                           int voice, unsigned long pos,
 534                           void __user *src, unsigned long count)
 535 {
 536         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 537
 538         /* convert to frames */
 539         pos = bytes_to_frames(subs->runtime, pos);
 540         count = bytes_to_frames(subs->runtime, count);
 541         LOOP_WRITE(rec, pos, src, count, COPY_USER);
 542         return 0;
 543 }
 544
 545 static int emu8k_pcm_copy_kernel(struct snd_pcm_substream *subs,
 546                                  int voice, unsigned long pos,
 547                                  void *src, unsigned long count)
 548 {
 549         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 550
 551         /* convert to frames */
 552         pos = bytes_to_frames(subs->runtime, pos);
 553         count = bytes_to_frames(subs->runtime, count);
 554         LOOP_WRITE(rec, pos, src, count, COPY_KERNEL);
 555         return 0;
 556 }
 557
 558 static int emu8k_pcm_silence(struct snd_pcm_substream *subs,
 559                              int voice, unsigned long pos, unsigned long count)
 560 {
 561         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 562
 563         /* convert to frames */
 564         pos = bytes_to_frames(subs->runtime, pos);
 565         count = bytes_to_frames(subs->runtime, count);
 566         LOOP_WRITE(rec, pos, NULL, count, FILL_SILENCE);
 567         return 0;
 568 }
 569 #endif
 570
 571
 572 /*
 573  * allocate a memory block
 574  */
 575 static int emu8k_pcm_hw_params(struct snd_pcm_substream *subs,
 576                                struct snd_pcm_hw_params *hw_params)
 577 {
 578         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 579
 580         if (rec->block) {
 581                 /* reallocation - release the old block */
 582                 snd_util_mem_free(rec->emu->memhdr, rec->block);
 583                 rec->block = NULL;
 584         }
 585
 586         rec->allocated_bytes = params_buffer_bytes(hw_params) + LOOP_BLANK_SIZE * 4;
 587         rec->block = snd_util_mem_alloc(rec->emu->memhdr, rec->allocated_bytes);
 588         if (! rec->block)
 589                 return -ENOMEM;
 590         rec->offset = EMU8000_DRAM_OFFSET + (rec->block->offset >> 1); /* in word */
 591         /* at least dma_bytes must be set for non-interleaved mode */
 592         subs->dma_buffer.bytes = params_buffer_bytes(hw_params);
 593
 594         return 0;
 595 }
 596
 597 /*
 598  * free the memory block
 599  */
 600 static int emu8k_pcm_hw_free(struct snd_pcm_substream *subs)
 601 {
 602         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 603
 604         if (rec->block) {
 605                 int ch;
 606                 for (ch = 0; ch < rec->voices; ch++)
 607                         stop_voice(rec, ch); // to be sure
 608                 if (rec->dram_opened)
 609                         emu8k_close_dram(rec->emu);
 610                 snd_util_mem_free(rec->emu->memhdr, rec->block);
 611                 rec->block = NULL;
 612         }
 613         return 0;
 614 }
 615
 616 /*
 617  */
 618 static int emu8k_pcm_prepare(struct snd_pcm_substream *subs)
 619 {
 620         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 621
 622         rec->pitch = 0xe000 + calc_rate_offset(subs->runtime->rate);
 623         rec->last_ptr = 0;
 624         rec->period_pos = 0;
 625
 626         rec->buf_size = subs->runtime->buffer_size;
 627         rec->period_size = subs->runtime->period_size;
 628         rec->voices = subs->runtime->channels;
 629         rec->loop_start[0] = rec->offset + LOOP_BLANK_SIZE;
 630         if (rec->voices > 1)
 631                 rec->loop_start[1] = rec->loop_start[0] + rec->buf_size + LOOP_BLANK_SIZE;
 632         if (rec->voices > 1) {
 633                 rec->panning[0] = 0xff;
 634                 rec->panning[1] = 0x00;
 635         } else
 636                 rec->panning[0] = 0x80;
 637
 638         if (! rec->dram_opened) {
 639                 int err, i, ch;
 640
 641                 snd_emux_terminate_all(rec->emu->emu);
 642                 if ((err = emu8k_open_dram_for_pcm(rec->emu, rec->voices)) != 0)
 643                         return err;
 644                 rec->dram_opened = 1;
 645
 646                 /* clear loop blanks */
 647                 snd_emu8000_write_wait(rec->emu, 0);
 648                 EMU8000_SMALW_WRITE(rec->emu, rec->offset);
 649                 for (i = 0; i < LOOP_BLANK_SIZE; i++)
 650                         EMU8000_SMLD_WRITE(rec->emu, 0);
 651                 for (ch = 0; ch < rec->voices; ch++) {
 652                         EMU8000_SMALW_WRITE(rec->emu, rec->loop_start[ch] + rec->buf_size);
 653                         for (i = 0; i < LOOP_BLANK_SIZE; i++)
 654                                 EMU8000_SMLD_WRITE(rec->emu, 0);
 655                 }
 656         }
 657
 658         setup_voice(rec, 0);
 659         if (rec->voices > 1)
 660                 setup_voice(rec, 1);
 661         return 0;
 662 }
 663
 664 static snd_pcm_uframes_t emu8k_pcm_pointer(struct snd_pcm_substream *subs)
 665 {
 666         struct snd_emu8k_pcm *rec = subs->runtime->private_data;
 667         if (rec->running)
 668                 return emu8k_get_curpos(rec, 0);
 669         return 0;
 670 }
 671
 672
 673 static const struct snd_pcm_ops emu8k_pcm_ops = {
 674         .open =         emu8k_pcm_open,
 675         .close =        emu8k_pcm_close,
 676         .ioctl =        snd_pcm_lib_ioctl,
 677         .hw_params =    emu8k_pcm_hw_params,
 678         .hw_free =      emu8k_pcm_hw_free,
 679         .prepare =      emu8k_pcm_prepare,
 680         .trigger =      emu8k_pcm_trigger,
 681         .pointer =      emu8k_pcm_pointer,
 682         .copy_user =    emu8k_pcm_copy,
 683         .copy_kernel =  emu8k_pcm_copy_kernel,
 684         .fill_silence = emu8k_pcm_silence,
 685 };
 686
 687
 688 static void snd_emu8000_pcm_free(struct snd_pcm *pcm)
 689 {
 690         struct snd_emu8000 *emu = pcm->private_data;
 691         emu->pcm = NULL;
 692 }
 693
 694 int snd_emu8000_pcm_new(struct snd_card *card, struct snd_emu8000 *emu, int index)
 695 {
 696         struct snd_pcm *pcm;
 697         int err;
 698
 699         if ((err = snd_pcm_new(card, "Emu8000 PCM", index, 1, 0, &pcm)) < 0)
 700                 return err;
 701         pcm->private_data = emu;
 702         pcm->private_free = snd_emu8000_pcm_free;
 703         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &emu8k_pcm_ops);
 704         emu->pcm = pcm;
 705
 706         snd_device_register(card, pcm);
 707
 708         return 0;
 709 }