Linux Kernel  3.7.1
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
emu8000_patch.c
Go to the documentation of this file.
1 /*
2  * Patch routines for the emu8000 (AWE32/64)
3  *
4  * Copyright (C) 1999 Steve Ratcliffe
5  * Copyright (C) 1999-2000 Takashi Iwai <[email protected]>
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20  */
21 
22 #include "emu8000_local.h"
23 #include <asm/uaccess.h>
24 #include <linux/moduleparam.h>
25 
26 static int emu8000_reset_addr;
27 module_param(emu8000_reset_addr, int, 0444);
28 MODULE_PARM_DESC(emu8000_reset_addr, "reset write address at each time (makes slowdown)");
29 
30 
31 /*
32  * Open up channels.
33  */
34 static int
35 snd_emu8000_open_dma(struct snd_emu8000 *emu, int write)
36 {
37  int i;
38 
39  /* reserve all 30 voices for loading */
40  for (i = 0; i < EMU8000_DRAM_VOICES; i++) {
41  snd_emux_lock_voice(emu->emu, i);
42  snd_emu8000_dma_chan(emu, i, write);
43  }
44 
45  /* assign voice 31 and 32 to ROM */
46  EMU8000_VTFT_WRITE(emu, 30, 0);
47  EMU8000_PSST_WRITE(emu, 30, 0x1d8);
48  EMU8000_CSL_WRITE(emu, 30, 0x1e0);
49  EMU8000_CCCA_WRITE(emu, 30, 0x1d8);
50  EMU8000_VTFT_WRITE(emu, 31, 0);
51  EMU8000_PSST_WRITE(emu, 31, 0x1d8);
52  EMU8000_CSL_WRITE(emu, 31, 0x1e0);
53  EMU8000_CCCA_WRITE(emu, 31, 0x1d8);
54 
55  return 0;
56 }
57 
58 /*
59  * Close all dram channels.
60  */
61 static void
62 snd_emu8000_close_dma(struct snd_emu8000 *emu)
63 {
64  int i;
65 
66  for (i = 0; i < EMU8000_DRAM_VOICES; i++) {
68  snd_emux_unlock_voice(emu->emu, i);
69  }
70 }
71 
72 /*
73  */
74 
75 #define BLANK_LOOP_START 4
76 #define BLANK_LOOP_END 8
77 #define BLANK_LOOP_SIZE 12
78 #define BLANK_HEAD_SIZE 48
79 
80 /*
81  * Read a word from userland, taking care of conversions from
82  * 8bit samples etc.
83  */
84 static unsigned short
85 read_word(const void __user *buf, int offset, int mode)
86 {
87  unsigned short c;
88  if (mode & SNDRV_SFNT_SAMPLE_8BITS) {
89  unsigned char cc;
90  get_user(cc, (unsigned char __user *)buf + offset);
91  c = cc << 8; /* convert 8bit -> 16bit */
92  } else {
93 #ifdef SNDRV_LITTLE_ENDIAN
94  get_user(c, (unsigned short __user *)buf + offset);
95 #else
96  unsigned short cc;
97  get_user(cc, (unsigned short __user *)buf + offset);
98  c = swab16(cc);
99 #endif
100  }
101  if (mode & SNDRV_SFNT_SAMPLE_UNSIGNED)
102  c ^= 0x8000; /* unsigned -> signed */
103  return c;
104 }
105 
106 /*
107  */
108 static void
109 snd_emu8000_write_wait(struct snd_emu8000 *emu)
110 {
111  while ((EMU8000_SMALW_READ(emu) & 0x80000000) != 0) {
113  if (signal_pending(current))
114  break;
115  }
116 }
117 
118 /*
119  * write sample word data
120  *
121  * You should not have to keep resetting the address each time
122  * as the chip is supposed to step on the next address automatically.
123  * It mostly does, but during writes of some samples at random it
124  * completely loses words (every one in 16 roughly but with no
125  * obvious pattern).
126  *
127  * This is therefore much slower than need be, but is at least
128  * working.
129  */
130 static inline void
131 write_word(struct snd_emu8000 *emu, int *offset, unsigned short data)
132 {
133  if (emu8000_reset_addr) {
134  if (emu8000_reset_addr > 1)
135  snd_emu8000_write_wait(emu);
136  EMU8000_SMALW_WRITE(emu, *offset);
137  }
138  EMU8000_SMLD_WRITE(emu, data);
139  *offset += 1;
140 }
141 
142 /*
143  * Write the sample to EMU800 memory. This routine is invoked out of
144  * the generic soundfont routines as a callback.
145  */
146 int
148  struct snd_util_memhdr *hdr,
149  const void __user *data, long count)
150 {
151  int i;
152  int rc;
153  int offset;
154  int truesize;
155  int dram_offset, dram_start;
156  struct snd_emu8000 *emu;
157 
158  emu = rec->hw;
159  if (snd_BUG_ON(!sp))
160  return -EINVAL;
161 
162  if (sp->v.size == 0)
163  return 0;
164 
165  /* be sure loop points start < end */
166  if (sp->v.loopstart > sp->v.loopend) {
167  int tmp = sp->v.loopstart;
168  sp->v.loopstart = sp->v.loopend;
169  sp->v.loopend = tmp;
170  }
171 
172  /* compute true data size to be loaded */
173  truesize = sp->v.size;
175  truesize += sp->v.loopend - sp->v.loopstart;
176  if (sp->v.mode_flags & SNDRV_SFNT_SAMPLE_NO_BLANK)
177  truesize += BLANK_LOOP_SIZE;
178 
179  sp->block = snd_util_mem_alloc(hdr, truesize * 2);
180  if (sp->block == NULL) {
181  /*snd_printd("EMU8000: out of memory\n");*/
182  /* not ENOMEM (for compatibility) */
183  return -ENOSPC;
184  }
185 
186  if (sp->v.mode_flags & SNDRV_SFNT_SAMPLE_8BITS) {
187  if (!access_ok(VERIFY_READ, data, sp->v.size))
188  return -EFAULT;
189  } else {
190  if (!access_ok(VERIFY_READ, data, sp->v.size * 2))
191  return -EFAULT;
192  }
193 
194  /* recalculate address offset */
195  sp->v.end -= sp->v.start;
196  sp->v.loopstart -= sp->v.start;
197  sp->v.loopend -= sp->v.start;
198  sp->v.start = 0;
199 
200  /* dram position (in word) -- mem_offset is byte */
201  dram_offset = EMU8000_DRAM_OFFSET + (sp->block->offset >> 1);
202  dram_start = dram_offset;
203 
204  /* set the total size (store onto obsolete checksum value) */
205  sp->v.truesize = truesize * 2; /* in bytes */
206 
208  if ((rc = snd_emu8000_open_dma(emu, EMU8000_RAM_WRITE)) != 0)
209  return rc;
210 
211  /* Set the address to start writing at */
212  snd_emu8000_write_wait(emu);
213  EMU8000_SMALW_WRITE(emu, dram_offset);
214 
215  /*snd_emu8000_init_fm(emu);*/
216 
217 #if 0
218  /* first block - write 48 samples for silence */
219  if (! sp->block->offset) {
220  for (i = 0; i < BLANK_HEAD_SIZE; i++) {
221  write_word(emu, &dram_offset, 0);
222  }
223  }
224 #endif
225 
226  offset = 0;
227  for (i = 0; i < sp->v.size; i++) {
228  unsigned short s;
229 
230  s = read_word(data, offset, sp->v.mode_flags);
231  offset++;
232  write_word(emu, &dram_offset, s);
233 
234  /* we may take too long time in this loop.
235  * so give controls back to kernel if needed.
236  */
237  cond_resched();
238 
239  if (i == sp->v.loopend &&
241  {
242  int looplen = sp->v.loopend - sp->v.loopstart;
243  int k;
244 
245  /* copy reverse loop */
246  for (k = 1; k <= looplen; k++) {
247  s = read_word(data, offset - k, sp->v.mode_flags);
248  write_word(emu, &dram_offset, s);
249  }
250  if (sp->v.mode_flags & SNDRV_SFNT_SAMPLE_BIDIR_LOOP) {
251  sp->v.loopend += looplen;
252  } else {
253  sp->v.loopstart += looplen;
254  sp->v.loopend += looplen;
255  }
256  sp->v.end += looplen;
257  }
258  }
259 
260  /* if no blank loop is attached in the sample, add it */
261  if (sp->v.mode_flags & SNDRV_SFNT_SAMPLE_NO_BLANK) {
262  for (i = 0; i < BLANK_LOOP_SIZE; i++) {
263  write_word(emu, &dram_offset, 0);
264  }
265  if (sp->v.mode_flags & SNDRV_SFNT_SAMPLE_SINGLESHOT) {
266  sp->v.loopstart = sp->v.end + BLANK_LOOP_START;
267  sp->v.loopend = sp->v.end + BLANK_LOOP_END;
268  }
269  }
270 
271  /* add dram offset */
272  sp->v.start += dram_start;
273  sp->v.end += dram_start;
274  sp->v.loopstart += dram_start;
275  sp->v.loopend += dram_start;
276 
277  snd_emu8000_close_dma(emu);
278  snd_emu8000_init_fm(emu);
279 
280  return 0;
281 }
282 
283 /*
284  * free a sample block
285  */
286 int
288  struct snd_util_memhdr *hdr)
289 {
290  if (sp->block) {
291  snd_util_mem_free(hdr, sp->block);
292  sp->block = NULL;
293  }
294  return 0;
295 }
296 
297 
298 /*
299  * sample_reset callback - terminate voices
300  */
301 void
303 {
305 }