USB: cdc-wdm: better allocate a buffer that is at least as big as we tell the USB...
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / sound / isa / wavefront / wavefront_synth.c
blob405f8b6a58b53db482376efd456c6e2ddaf6e2a3
1 /* Copyright (C) by Paul Barton-Davis 1998-1999
3 * Some portions of this file are taken from work that is
4 * copyright (C) by Hannu Savolainen 1993-1996
6 * This program is distributed under the GNU GENERAL PUBLIC LICENSE (GPL)
7 * Version 2 (June 1991). See the "COPYING" file distributed with this software
8 * for more info.
9 */
11 /*
12 * An ALSA lowlevel driver for Turtle Beach ICS2115 wavetable synth
13 * (Maui, Tropez, Tropez Plus)
15 * This driver supports the onboard wavetable synthesizer (an ICS2115),
16 * including patch, sample and program loading and unloading, conversion
17 * of GUS patches during loading, and full user-level access to all
18 * WaveFront commands. It tries to provide semi-intelligent patch and
19 * sample management as well.
23 #include <asm/io.h>
24 #include <linux/interrupt.h>
25 #include <linux/init.h>
26 #include <linux/delay.h>
27 #include <linux/time.h>
28 #include <linux/wait.h>
29 #include <linux/firmware.h>
30 #include <linux/moduleparam.h>
31 #include <linux/slab.h>
32 #include <linux/module.h>
33 #include <sound/core.h>
34 #include <sound/snd_wavefront.h>
35 #include <sound/initval.h>
37 static int wf_raw = 0; /* we normally check for "raw state" to firmware
38 loading. if non-zero, then during driver loading, the
39 state of the board is ignored, and we reset the
40 board and load the firmware anyway.
43 static int fx_raw = 1; /* if this is zero, we'll leave the FX processor in
44 whatever state it is when the driver is loaded.
45 The default is to download the microprogram and
46 associated coefficients to set it up for "default"
47 operation, whatever that means.
50 static int debug_default = 0; /* you can set this to control debugging
51 during driver loading. it takes any combination
52 of the WF_DEBUG_* flags defined in
53 wavefront.h
56 /* XXX this needs to be made firmware and hardware version dependent */
58 #define DEFAULT_OSPATH "wavefront.os"
59 static char *ospath = DEFAULT_OSPATH; /* the firmware file name */
61 static int wait_usecs = 150; /* This magic number seems to give pretty optimal
62 throughput based on my limited experimentation.
63 If you want to play around with it and find a better
64 value, be my guest. Remember, the idea is to
65 get a number that causes us to just busy wait
66 for as many WaveFront commands as possible, without
67 coming up with a number so large that we hog the
68 whole CPU.
70 Specifically, with this number, out of about 134,000
71 status waits, only about 250 result in a sleep.
74 static int sleep_interval = 100; /* HZ/sleep_interval seconds per sleep */
75 static int sleep_tries = 50; /* number of times we'll try to sleep */
77 static int reset_time = 2; /* hundreths of a second we wait after a HW
78 reset for the expected interrupt.
81 static int ramcheck_time = 20; /* time in seconds to wait while ROM code
82 checks on-board RAM.
85 static int osrun_time = 10; /* time in seconds we wait for the OS to
86 start running.
88 module_param(wf_raw, int, 0444);
89 MODULE_PARM_DESC(wf_raw, "if non-zero, assume that we need to boot the OS");
90 module_param(fx_raw, int, 0444);
91 MODULE_PARM_DESC(fx_raw, "if non-zero, assume that the FX process needs help");
92 module_param(debug_default, int, 0444);
93 MODULE_PARM_DESC(debug_default, "debug parameters for card initialization");
94 module_param(wait_usecs, int, 0444);
95 MODULE_PARM_DESC(wait_usecs, "how long to wait without sleeping, usecs");
96 module_param(sleep_interval, int, 0444);
97 MODULE_PARM_DESC(sleep_interval, "how long to sleep when waiting for reply");
98 module_param(sleep_tries, int, 0444);
99 MODULE_PARM_DESC(sleep_tries, "how many times to try sleeping during a wait");
100 module_param(ospath, charp, 0444);
101 MODULE_PARM_DESC(ospath, "pathname to processed ICS2115 OS firmware");
102 module_param(reset_time, int, 0444);
103 MODULE_PARM_DESC(reset_time, "how long to wait for a reset to take effect");
104 module_param(ramcheck_time, int, 0444);
105 MODULE_PARM_DESC(ramcheck_time, "how many seconds to wait for the RAM test");
106 module_param(osrun_time, int, 0444);
107 MODULE_PARM_DESC(osrun_time, "how many seconds to wait for the ICS2115 OS");
109 /* if WF_DEBUG not defined, no run-time debugging messages will
110 be available via the debug flag setting. Given the current
111 beta state of the driver, this will remain set until a future
112 version.
115 #define WF_DEBUG 1
117 #ifdef WF_DEBUG
119 #define DPRINT(cond, ...) \
120 if ((dev->debug & (cond)) == (cond)) { \
121 snd_printk (__VA_ARGS__); \
123 #else
124 #define DPRINT(cond, args...)
125 #endif /* WF_DEBUG */
127 #define LOGNAME "WaveFront: "
129 /* bitmasks for WaveFront status port value */
131 #define STAT_RINTR_ENABLED 0x01
132 #define STAT_CAN_READ 0x02
133 #define STAT_INTR_READ 0x04
134 #define STAT_WINTR_ENABLED 0x10
135 #define STAT_CAN_WRITE 0x20
136 #define STAT_INTR_WRITE 0x40
138 static int wavefront_delete_sample (snd_wavefront_t *, int sampnum);
139 static int wavefront_find_free_sample (snd_wavefront_t *);
141 struct wavefront_command {
142 int cmd;
143 char *action;
144 unsigned int read_cnt;
145 unsigned int write_cnt;
146 int need_ack;
149 static struct {
150 int errno;
151 const char *errstr;
152 } wavefront_errors[] = {
153 { 0x01, "Bad sample number" },
154 { 0x02, "Out of sample memory" },
155 { 0x03, "Bad patch number" },
156 { 0x04, "Error in number of voices" },
157 { 0x06, "Sample load already in progress" },
158 { 0x0B, "No sample load request pending" },
159 { 0x0E, "Bad MIDI channel number" },
160 { 0x10, "Download Record Error" },
161 { 0x80, "Success" },
162 { 0x0 }
165 #define NEEDS_ACK 1
167 static struct wavefront_command wavefront_commands[] = {
168 { WFC_SET_SYNTHVOL, "set synthesizer volume", 0, 1, NEEDS_ACK },
169 { WFC_GET_SYNTHVOL, "get synthesizer volume", 1, 0, 0},
170 { WFC_SET_NVOICES, "set number of voices", 0, 1, NEEDS_ACK },
171 { WFC_GET_NVOICES, "get number of voices", 1, 0, 0 },
172 { WFC_SET_TUNING, "set synthesizer tuning", 0, 2, NEEDS_ACK },
173 { WFC_GET_TUNING, "get synthesizer tuning", 2, 0, 0 },
174 { WFC_DISABLE_CHANNEL, "disable synth channel", 0, 1, NEEDS_ACK },
175 { WFC_ENABLE_CHANNEL, "enable synth channel", 0, 1, NEEDS_ACK },
176 { WFC_GET_CHANNEL_STATUS, "get synth channel status", 3, 0, 0 },
177 { WFC_MISYNTH_OFF, "disable midi-in to synth", 0, 0, NEEDS_ACK },
178 { WFC_MISYNTH_ON, "enable midi-in to synth", 0, 0, NEEDS_ACK },
179 { WFC_VMIDI_ON, "enable virtual midi mode", 0, 0, NEEDS_ACK },
180 { WFC_VMIDI_OFF, "disable virtual midi mode", 0, 0, NEEDS_ACK },
181 { WFC_MIDI_STATUS, "report midi status", 1, 0, 0 },
182 { WFC_FIRMWARE_VERSION, "report firmware version", 2, 0, 0 },
183 { WFC_HARDWARE_VERSION, "report hardware version", 2, 0, 0 },
184 { WFC_GET_NSAMPLES, "report number of samples", 2, 0, 0 },
185 { WFC_INSTOUT_LEVELS, "report instantaneous output levels", 7, 0, 0 },
186 { WFC_PEAKOUT_LEVELS, "report peak output levels", 7, 0, 0 },
187 { WFC_DOWNLOAD_SAMPLE, "download sample",
188 0, WF_SAMPLE_BYTES, NEEDS_ACK },
189 { WFC_DOWNLOAD_BLOCK, "download block", 0, 0, NEEDS_ACK},
190 { WFC_DOWNLOAD_SAMPLE_HEADER, "download sample header",
191 0, WF_SAMPLE_HDR_BYTES, NEEDS_ACK },
192 { WFC_UPLOAD_SAMPLE_HEADER, "upload sample header", 13, 2, 0 },
194 /* This command requires a variable number of bytes to be written.
195 There is a hack in snd_wavefront_cmd() to support this. The actual
196 count is passed in as the read buffer ptr, cast appropriately.
197 Ugh.
200 { WFC_DOWNLOAD_MULTISAMPLE, "download multisample", 0, 0, NEEDS_ACK },
202 /* This one is a hack as well. We just read the first byte of the
203 response, don't fetch an ACK, and leave the rest to the
204 calling function. Ugly, ugly, ugly.
207 { WFC_UPLOAD_MULTISAMPLE, "upload multisample", 2, 1, 0 },
208 { WFC_DOWNLOAD_SAMPLE_ALIAS, "download sample alias",
209 0, WF_ALIAS_BYTES, NEEDS_ACK },
210 { WFC_UPLOAD_SAMPLE_ALIAS, "upload sample alias", WF_ALIAS_BYTES, 2, 0},
211 { WFC_DELETE_SAMPLE, "delete sample", 0, 2, NEEDS_ACK },
212 { WFC_IDENTIFY_SAMPLE_TYPE, "identify sample type", 5, 2, 0 },
213 { WFC_UPLOAD_SAMPLE_PARAMS, "upload sample parameters" },
214 { WFC_REPORT_FREE_MEMORY, "report free memory", 4, 0, 0 },
215 { WFC_DOWNLOAD_PATCH, "download patch", 0, 134, NEEDS_ACK },
216 { WFC_UPLOAD_PATCH, "upload patch", 132, 2, 0 },
217 { WFC_DOWNLOAD_PROGRAM, "download program", 0, 33, NEEDS_ACK },
218 { WFC_UPLOAD_PROGRAM, "upload program", 32, 1, 0 },
219 { WFC_DOWNLOAD_EDRUM_PROGRAM, "download enhanced drum program", 0, 9,
220 NEEDS_ACK},
221 { WFC_UPLOAD_EDRUM_PROGRAM, "upload enhanced drum program", 8, 1, 0},
222 { WFC_SET_EDRUM_CHANNEL, "set enhanced drum program channel",
223 0, 1, NEEDS_ACK },
224 { WFC_DISABLE_DRUM_PROGRAM, "disable drum program", 0, 1, NEEDS_ACK },
225 { WFC_REPORT_CHANNEL_PROGRAMS, "report channel program numbers",
226 32, 0, 0 },
227 { WFC_NOOP, "the no-op command", 0, 0, NEEDS_ACK },
228 { 0x00 }
231 static const char *
232 wavefront_errorstr (int errnum)
235 int i;
237 for (i = 0; wavefront_errors[i].errstr; i++) {
238 if (wavefront_errors[i].errno == errnum) {
239 return wavefront_errors[i].errstr;
243 return "Unknown WaveFront error";
246 static struct wavefront_command *
247 wavefront_get_command (int cmd)
250 int i;
252 for (i = 0; wavefront_commands[i].cmd != 0; i++) {
253 if (cmd == wavefront_commands[i].cmd) {
254 return &wavefront_commands[i];
258 return NULL;
261 static inline int
262 wavefront_status (snd_wavefront_t *dev)
265 return inb (dev->status_port);
268 static int
269 wavefront_sleep (int limit)
272 schedule_timeout_interruptible(limit);
274 return signal_pending(current);
277 static int
278 wavefront_wait (snd_wavefront_t *dev, int mask)
281 int i;
283 /* Spin for a short period of time, because >99% of all
284 requests to the WaveFront can be serviced inline like this.
287 for (i = 0; i < wait_usecs; i += 5) {
288 if (wavefront_status (dev) & mask) {
289 return 1;
291 udelay(5);
294 for (i = 0; i < sleep_tries; i++) {
296 if (wavefront_status (dev) & mask) {
297 return 1;
300 if (wavefront_sleep (HZ/sleep_interval)) {
301 return (0);
305 return (0);
308 static int
309 wavefront_read (snd_wavefront_t *dev)
312 if (wavefront_wait (dev, STAT_CAN_READ))
313 return inb (dev->data_port);
315 DPRINT (WF_DEBUG_DATA, "read timeout.\n");
317 return -1;
320 static int
321 wavefront_write (snd_wavefront_t *dev, unsigned char data)
324 if (wavefront_wait (dev, STAT_CAN_WRITE)) {
325 outb (data, dev->data_port);
326 return 0;
329 DPRINT (WF_DEBUG_DATA, "write timeout.\n");
331 return -1;
335 snd_wavefront_cmd (snd_wavefront_t *dev,
336 int cmd, unsigned char *rbuf, unsigned char *wbuf)
339 int ack;
340 unsigned int i;
341 int c;
342 struct wavefront_command *wfcmd;
344 if ((wfcmd = wavefront_get_command (cmd)) == NULL) {
345 snd_printk ("command 0x%x not supported.\n",
346 cmd);
347 return 1;
350 /* Hack to handle the one variable-size write command. See
351 wavefront_send_multisample() for the other half of this
352 gross and ugly strategy.
355 if (cmd == WFC_DOWNLOAD_MULTISAMPLE) {
356 wfcmd->write_cnt = (unsigned long) rbuf;
357 rbuf = NULL;
360 DPRINT (WF_DEBUG_CMD, "0x%x [%s] (%d,%d,%d)\n",
361 cmd, wfcmd->action, wfcmd->read_cnt,
362 wfcmd->write_cnt, wfcmd->need_ack);
364 if (wavefront_write (dev, cmd)) {
365 DPRINT ((WF_DEBUG_IO|WF_DEBUG_CMD), "cannot request "
366 "0x%x [%s].\n",
367 cmd, wfcmd->action);
368 return 1;
371 if (wfcmd->write_cnt > 0) {
372 DPRINT (WF_DEBUG_DATA, "writing %d bytes "
373 "for 0x%x\n",
374 wfcmd->write_cnt, cmd);
376 for (i = 0; i < wfcmd->write_cnt; i++) {
377 if (wavefront_write (dev, wbuf[i])) {
378 DPRINT (WF_DEBUG_IO, "bad write for byte "
379 "%d of 0x%x [%s].\n",
380 i, cmd, wfcmd->action);
381 return 1;
384 DPRINT (WF_DEBUG_DATA, "write[%d] = 0x%x\n",
385 i, wbuf[i]);
389 if (wfcmd->read_cnt > 0) {
390 DPRINT (WF_DEBUG_DATA, "reading %d ints "
391 "for 0x%x\n",
392 wfcmd->read_cnt, cmd);
394 for (i = 0; i < wfcmd->read_cnt; i++) {
396 if ((c = wavefront_read (dev)) == -1) {
397 DPRINT (WF_DEBUG_IO, "bad read for byte "
398 "%d of 0x%x [%s].\n",
399 i, cmd, wfcmd->action);
400 return 1;
403 /* Now handle errors. Lots of special cases here */
405 if (c == 0xff) {
406 if ((c = wavefront_read (dev)) == -1) {
407 DPRINT (WF_DEBUG_IO, "bad read for "
408 "error byte at "
409 "read byte %d "
410 "of 0x%x [%s].\n",
411 i, cmd,
412 wfcmd->action);
413 return 1;
416 /* Can you believe this madness ? */
418 if (c == 1 &&
419 wfcmd->cmd == WFC_IDENTIFY_SAMPLE_TYPE) {
420 rbuf[0] = WF_ST_EMPTY;
421 return (0);
423 } else if (c == 3 &&
424 wfcmd->cmd == WFC_UPLOAD_PATCH) {
426 return 3;
428 } else if (c == 1 &&
429 wfcmd->cmd == WFC_UPLOAD_PROGRAM) {
431 return 1;
433 } else {
435 DPRINT (WF_DEBUG_IO, "error %d (%s) "
436 "during "
437 "read for byte "
438 "%d of 0x%x "
439 "[%s].\n",
441 wavefront_errorstr (c),
442 i, cmd,
443 wfcmd->action);
444 return 1;
448 } else {
449 rbuf[i] = c;
452 DPRINT (WF_DEBUG_DATA, "read[%d] = 0x%x\n",i, rbuf[i]);
456 if ((wfcmd->read_cnt == 0 && wfcmd->write_cnt == 0) || wfcmd->need_ack) {
458 DPRINT (WF_DEBUG_CMD, "reading ACK for 0x%x\n", cmd);
460 /* Some commands need an ACK, but return zero instead
461 of the standard value.
464 if ((ack = wavefront_read (dev)) == 0) {
465 ack = WF_ACK;
468 if (ack != WF_ACK) {
469 if (ack == -1) {
470 DPRINT (WF_DEBUG_IO, "cannot read ack for "
471 "0x%x [%s].\n",
472 cmd, wfcmd->action);
473 return 1;
475 } else {
476 int err = -1; /* something unknown */
478 if (ack == 0xff) { /* explicit error */
480 if ((err = wavefront_read (dev)) == -1) {
481 DPRINT (WF_DEBUG_DATA,
482 "cannot read err "
483 "for 0x%x [%s].\n",
484 cmd, wfcmd->action);
488 DPRINT (WF_DEBUG_IO, "0x%x [%s] "
489 "failed (0x%x, 0x%x, %s)\n",
490 cmd, wfcmd->action, ack, err,
491 wavefront_errorstr (err));
493 return -err;
497 DPRINT (WF_DEBUG_DATA, "ack received "
498 "for 0x%x [%s]\n",
499 cmd, wfcmd->action);
500 } else {
502 DPRINT (WF_DEBUG_CMD, "0x%x [%s] does not need "
503 "ACK (%d,%d,%d)\n",
504 cmd, wfcmd->action, wfcmd->read_cnt,
505 wfcmd->write_cnt, wfcmd->need_ack);
508 return 0;
512 /***********************************************************************
513 WaveFront data munging
515 Things here are weird. All data written to the board cannot
516 have its most significant bit set. Any data item with values
517 potentially > 0x7F (127) must be split across multiple bytes.
519 Sometimes, we need to munge numeric values that are represented on
520 the x86 side as 8-32 bit values. Sometimes, we need to munge data
521 that is represented on the x86 side as an array of bytes. The most
522 efficient approach to handling both cases seems to be to use 2
523 different functions for munging and 2 for de-munging. This avoids
524 weird casting and worrying about bit-level offsets.
526 **********************************************************************/
528 static unsigned char *
529 munge_int32 (unsigned int src,
530 unsigned char *dst,
531 unsigned int dst_size)
533 unsigned int i;
535 for (i = 0; i < dst_size; i++) {
536 *dst = src & 0x7F; /* Mask high bit of LSB */
537 src = src >> 7; /* Rotate Right 7 bits */
538 /* Note: we leave the upper bits in place */
540 dst++;
542 return dst;
545 static int
546 demunge_int32 (unsigned char* src, int src_size)
549 int i;
550 int outval = 0;
552 for (i = src_size - 1; i >= 0; i--) {
553 outval=(outval<<7)+src[i];
556 return outval;
559 static
560 unsigned char *
561 munge_buf (unsigned char *src, unsigned char *dst, unsigned int dst_size)
564 unsigned int i;
565 unsigned int last = dst_size / 2;
567 for (i = 0; i < last; i++) {
568 *dst++ = src[i] & 0x7f;
569 *dst++ = src[i] >> 7;
571 return dst;
574 static
575 unsigned char *
576 demunge_buf (unsigned char *src, unsigned char *dst, unsigned int src_bytes)
579 int i;
580 unsigned char *end = src + src_bytes;
582 end = src + src_bytes;
584 /* NOTE: src and dst *CAN* point to the same address */
586 for (i = 0; src != end; i++) {
587 dst[i] = *src++;
588 dst[i] |= (*src++)<<7;
591 return dst;
594 /***********************************************************************
595 WaveFront: sample, patch and program management.
596 ***********************************************************************/
598 static int
599 wavefront_delete_sample (snd_wavefront_t *dev, int sample_num)
602 unsigned char wbuf[2];
603 int x;
605 wbuf[0] = sample_num & 0x7f;
606 wbuf[1] = sample_num >> 7;
608 if ((x = snd_wavefront_cmd (dev, WFC_DELETE_SAMPLE, NULL, wbuf)) == 0) {
609 dev->sample_status[sample_num] = WF_ST_EMPTY;
612 return x;
615 static int
616 wavefront_get_sample_status (snd_wavefront_t *dev, int assume_rom)
619 int i;
620 unsigned char rbuf[32], wbuf[32];
621 unsigned int sc_real, sc_alias, sc_multi;
623 /* check sample status */
625 if (snd_wavefront_cmd (dev, WFC_GET_NSAMPLES, rbuf, wbuf)) {
626 snd_printk ("cannot request sample count.\n");
627 return -1;
630 sc_real = sc_alias = sc_multi = dev->samples_used = 0;
632 for (i = 0; i < WF_MAX_SAMPLE; i++) {
634 wbuf[0] = i & 0x7f;
635 wbuf[1] = i >> 7;
637 if (snd_wavefront_cmd (dev, WFC_IDENTIFY_SAMPLE_TYPE, rbuf, wbuf)) {
638 snd_printk(KERN_WARNING "cannot identify sample "
639 "type of slot %d\n", i);
640 dev->sample_status[i] = WF_ST_EMPTY;
641 continue;
644 dev->sample_status[i] = (WF_SLOT_FILLED|rbuf[0]);
646 if (assume_rom) {
647 dev->sample_status[i] |= WF_SLOT_ROM;
650 switch (rbuf[0] & WF_ST_MASK) {
651 case WF_ST_SAMPLE:
652 sc_real++;
653 break;
654 case WF_ST_MULTISAMPLE:
655 sc_multi++;
656 break;
657 case WF_ST_ALIAS:
658 sc_alias++;
659 break;
660 case WF_ST_EMPTY:
661 break;
663 default:
664 snd_printk ("unknown sample type for "
665 "slot %d (0x%x)\n",
666 i, rbuf[0]);
669 if (rbuf[0] != WF_ST_EMPTY) {
670 dev->samples_used++;
674 snd_printk ("%d samples used (%d real, %d aliases, %d multi), "
675 "%d empty\n", dev->samples_used, sc_real, sc_alias, sc_multi,
676 WF_MAX_SAMPLE - dev->samples_used);
679 return (0);
683 static int
684 wavefront_get_patch_status (snd_wavefront_t *dev)
687 unsigned char patchbuf[WF_PATCH_BYTES];
688 unsigned char patchnum[2];
689 wavefront_patch *p;
690 int i, x, cnt, cnt2;
692 for (i = 0; i < WF_MAX_PATCH; i++) {
693 patchnum[0] = i & 0x7f;
694 patchnum[1] = i >> 7;
696 if ((x = snd_wavefront_cmd (dev, WFC_UPLOAD_PATCH, patchbuf,
697 patchnum)) == 0) {
699 dev->patch_status[i] |= WF_SLOT_FILLED;
700 p = (wavefront_patch *) patchbuf;
701 dev->sample_status
702 [p->sample_number|(p->sample_msb<<7)] |=
703 WF_SLOT_USED;
705 } else if (x == 3) { /* Bad patch number */
706 dev->patch_status[i] = 0;
707 } else {
708 snd_printk ("upload patch "
709 "error 0x%x\n", x);
710 dev->patch_status[i] = 0;
711 return 1;
715 /* program status has already filled in slot_used bits */
717 for (i = 0, cnt = 0, cnt2 = 0; i < WF_MAX_PATCH; i++) {
718 if (dev->patch_status[i] & WF_SLOT_FILLED) {
719 cnt++;
721 if (dev->patch_status[i] & WF_SLOT_USED) {
722 cnt2++;
726 snd_printk ("%d patch slots filled, %d in use\n", cnt, cnt2);
728 return (0);
731 static int
732 wavefront_get_program_status (snd_wavefront_t *dev)
735 unsigned char progbuf[WF_PROGRAM_BYTES];
736 wavefront_program prog;
737 unsigned char prognum;
738 int i, x, l, cnt;
740 for (i = 0; i < WF_MAX_PROGRAM; i++) {
741 prognum = i;
743 if ((x = snd_wavefront_cmd (dev, WFC_UPLOAD_PROGRAM, progbuf,
744 &prognum)) == 0) {
746 dev->prog_status[i] |= WF_SLOT_USED;
748 demunge_buf (progbuf, (unsigned char *) &prog,
749 WF_PROGRAM_BYTES);
751 for (l = 0; l < WF_NUM_LAYERS; l++) {
752 if (prog.layer[l].mute) {
753 dev->patch_status
754 [prog.layer[l].patch_number] |=
755 WF_SLOT_USED;
758 } else if (x == 1) { /* Bad program number */
759 dev->prog_status[i] = 0;
760 } else {
761 snd_printk ("upload program "
762 "error 0x%x\n", x);
763 dev->prog_status[i] = 0;
767 for (i = 0, cnt = 0; i < WF_MAX_PROGRAM; i++) {
768 if (dev->prog_status[i]) {
769 cnt++;
773 snd_printk ("%d programs slots in use\n", cnt);
775 return (0);
778 static int
779 wavefront_send_patch (snd_wavefront_t *dev, wavefront_patch_info *header)
782 unsigned char buf[WF_PATCH_BYTES+2];
783 unsigned char *bptr;
785 DPRINT (WF_DEBUG_LOAD_PATCH, "downloading patch %d\n",
786 header->number);
788 dev->patch_status[header->number] |= WF_SLOT_FILLED;
790 bptr = buf;
791 bptr = munge_int32 (header->number, buf, 2);
792 munge_buf ((unsigned char *)&header->hdr.p, bptr, WF_PATCH_BYTES);
794 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_PATCH, NULL, buf)) {
795 snd_printk ("download patch failed\n");
796 return -(EIO);
799 return (0);
802 static int
803 wavefront_send_program (snd_wavefront_t *dev, wavefront_patch_info *header)
806 unsigned char buf[WF_PROGRAM_BYTES+1];
807 int i;
809 DPRINT (WF_DEBUG_LOAD_PATCH, "downloading program %d\n",
810 header->number);
812 dev->prog_status[header->number] = WF_SLOT_USED;
814 /* XXX need to zero existing SLOT_USED bit for program_status[i]
815 where `i' is the program that's being (potentially) overwritten.
818 for (i = 0; i < WF_NUM_LAYERS; i++) {
819 if (header->hdr.pr.layer[i].mute) {
820 dev->patch_status[header->hdr.pr.layer[i].patch_number] |=
821 WF_SLOT_USED;
823 /* XXX need to mark SLOT_USED for sample used by
824 patch_number, but this means we have to load it. Ick.
829 buf[0] = header->number;
830 munge_buf ((unsigned char *)&header->hdr.pr, &buf[1], WF_PROGRAM_BYTES);
832 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_PROGRAM, NULL, buf)) {
833 snd_printk ("download patch failed\n");
834 return -(EIO);
837 return (0);
840 static int
841 wavefront_freemem (snd_wavefront_t *dev)
844 char rbuf[8];
846 if (snd_wavefront_cmd (dev, WFC_REPORT_FREE_MEMORY, rbuf, NULL)) {
847 snd_printk ("can't get memory stats.\n");
848 return -1;
849 } else {
850 return demunge_int32 (rbuf, 4);
854 static int
855 wavefront_send_sample (snd_wavefront_t *dev,
856 wavefront_patch_info *header,
857 u16 __user *dataptr,
858 int data_is_unsigned)
861 /* samples are downloaded via a 16-bit wide i/o port
862 (you could think of it as 2 adjacent 8-bit wide ports
863 but its less efficient that way). therefore, all
864 the blocksizes and so forth listed in the documentation,
865 and used conventionally to refer to sample sizes,
866 which are given in 8-bit units (bytes), need to be
867 divided by 2.
870 u16 sample_short = 0;
871 u32 length;
872 u16 __user *data_end = NULL;
873 unsigned int i;
874 const unsigned int max_blksize = 4096/2;
875 unsigned int written;
876 unsigned int blocksize;
877 int dma_ack;
878 int blocknum;
879 unsigned char sample_hdr[WF_SAMPLE_HDR_BYTES];
880 unsigned char *shptr;
881 int skip = 0;
882 int initial_skip = 0;
884 DPRINT (WF_DEBUG_LOAD_PATCH, "sample %sdownload for slot %d, "
885 "type %d, %d bytes from 0x%lx\n",
886 header->size ? "" : "header ",
887 header->number, header->subkey,
888 header->size,
889 (unsigned long) header->dataptr);
891 if (header->number == WAVEFRONT_FIND_FREE_SAMPLE_SLOT) {
892 int x;
894 if ((x = wavefront_find_free_sample (dev)) < 0) {
895 return -ENOMEM;
897 snd_printk ("unspecified sample => %d\n", x);
898 header->number = x;
901 if (header->size) {
903 /* XXX it's a debatable point whether or not RDONLY semantics
904 on the ROM samples should cover just the sample data or
905 the sample header. For now, it only covers the sample data,
906 so anyone is free at all times to rewrite sample headers.
908 My reason for this is that we have the sample headers
909 available in the WFB file for General MIDI, and so these
910 can always be reset if needed. The sample data, however,
911 cannot be recovered without a complete reset and firmware
912 reload of the ICS2115, which is a very expensive operation.
914 So, doing things this way allows us to honor the notion of
915 "RESETSAMPLES" reasonably cheaply. Note however, that this
916 is done purely at user level: there is no WFB parser in
917 this driver, and so a complete reset (back to General MIDI,
918 or theoretically some other configuration) is the
919 responsibility of the user level library.
921 To try to do this in the kernel would be a little
922 crazy: we'd need 158K of kernel space just to hold
923 a copy of the patch/program/sample header data.
926 if (dev->rom_samples_rdonly) {
927 if (dev->sample_status[header->number] & WF_SLOT_ROM) {
928 snd_printk ("sample slot %d "
929 "write protected\n",
930 header->number);
931 return -EACCES;
935 wavefront_delete_sample (dev, header->number);
938 if (header->size) {
939 dev->freemem = wavefront_freemem (dev);
941 if (dev->freemem < (int)header->size) {
942 snd_printk ("insufficient memory to "
943 "load %d byte sample.\n",
944 header->size);
945 return -ENOMEM;
950 skip = WF_GET_CHANNEL(&header->hdr.s);
952 if (skip > 0 && header->hdr.s.SampleResolution != LINEAR_16BIT) {
953 snd_printk ("channel selection only "
954 "possible on 16-bit samples");
955 return -(EINVAL);
958 switch (skip) {
959 case 0:
960 initial_skip = 0;
961 skip = 1;
962 break;
963 case 1:
964 initial_skip = 0;
965 skip = 2;
966 break;
967 case 2:
968 initial_skip = 1;
969 skip = 2;
970 break;
971 case 3:
972 initial_skip = 2;
973 skip = 3;
974 break;
975 case 4:
976 initial_skip = 3;
977 skip = 4;
978 break;
979 case 5:
980 initial_skip = 4;
981 skip = 5;
982 break;
983 case 6:
984 initial_skip = 5;
985 skip = 6;
986 break;
989 DPRINT (WF_DEBUG_LOAD_PATCH, "channel selection: %d => "
990 "initial skip = %d, skip = %d\n",
991 WF_GET_CHANNEL (&header->hdr.s),
992 initial_skip, skip);
994 /* Be safe, and zero the "Unused" bits ... */
996 WF_SET_CHANNEL(&header->hdr.s, 0);
998 /* adjust size for 16 bit samples by dividing by two. We always
999 send 16 bits per write, even for 8 bit samples, so the length
1000 is always half the size of the sample data in bytes.
1003 length = header->size / 2;
1005 /* the data we're sent has not been munged, and in fact, the
1006 header we have to send isn't just a munged copy either.
1007 so, build the sample header right here.
1010 shptr = &sample_hdr[0];
1012 shptr = munge_int32 (header->number, shptr, 2);
1014 if (header->size) {
1015 shptr = munge_int32 (length, shptr, 4);
1018 /* Yes, a 4 byte result doesn't contain all of the offset bits,
1019 but the offset only uses 24 bits.
1022 shptr = munge_int32 (*((u32 *) &header->hdr.s.sampleStartOffset),
1023 shptr, 4);
1024 shptr = munge_int32 (*((u32 *) &header->hdr.s.loopStartOffset),
1025 shptr, 4);
1026 shptr = munge_int32 (*((u32 *) &header->hdr.s.loopEndOffset),
1027 shptr, 4);
1028 shptr = munge_int32 (*((u32 *) &header->hdr.s.sampleEndOffset),
1029 shptr, 4);
1031 /* This one is truly weird. What kind of weirdo decided that in
1032 a system dominated by 16 and 32 bit integers, they would use
1033 a just 12 bits ?
1036 shptr = munge_int32 (header->hdr.s.FrequencyBias, shptr, 3);
1038 /* Why is this nybblified, when the MSB is *always* zero ?
1039 Anyway, we can't take address of bitfield, so make a
1040 good-faith guess at where it starts.
1043 shptr = munge_int32 (*(&header->hdr.s.FrequencyBias+1),
1044 shptr, 2);
1046 if (snd_wavefront_cmd (dev,
1047 header->size ?
1048 WFC_DOWNLOAD_SAMPLE : WFC_DOWNLOAD_SAMPLE_HEADER,
1049 NULL, sample_hdr)) {
1050 snd_printk ("sample %sdownload refused.\n",
1051 header->size ? "" : "header ");
1052 return -(EIO);
1055 if (header->size == 0) {
1056 goto sent; /* Sorry. Just had to have one somewhere */
1059 data_end = dataptr + length;
1061 /* Do any initial skip over an unused channel's data */
1063 dataptr += initial_skip;
1065 for (written = 0, blocknum = 0;
1066 written < length; written += max_blksize, blocknum++) {
1068 if ((length - written) > max_blksize) {
1069 blocksize = max_blksize;
1070 } else {
1071 /* round to nearest 16-byte value */
1072 blocksize = ALIGN(length - written, 8);
1075 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_BLOCK, NULL, NULL)) {
1076 snd_printk ("download block "
1077 "request refused.\n");
1078 return -(EIO);
1081 for (i = 0; i < blocksize; i++) {
1083 if (dataptr < data_end) {
1085 __get_user (sample_short, dataptr);
1086 dataptr += skip;
1088 if (data_is_unsigned) { /* GUS ? */
1090 if (WF_SAMPLE_IS_8BIT(&header->hdr.s)) {
1092 /* 8 bit sample
1093 resolution, sign
1094 extend both bytes.
1097 ((unsigned char*)
1098 &sample_short)[0] += 0x7f;
1099 ((unsigned char*)
1100 &sample_short)[1] += 0x7f;
1102 } else {
1104 /* 16 bit sample
1105 resolution, sign
1106 extend the MSB.
1109 sample_short += 0x7fff;
1113 } else {
1115 /* In padding section of final block:
1117 Don't fetch unsupplied data from
1118 user space, just continue with
1119 whatever the final value was.
1123 if (i < blocksize - 1) {
1124 outw (sample_short, dev->block_port);
1125 } else {
1126 outw (sample_short, dev->last_block_port);
1130 /* Get "DMA page acknowledge", even though its really
1131 nothing to do with DMA at all.
1134 if ((dma_ack = wavefront_read (dev)) != WF_DMA_ACK) {
1135 if (dma_ack == -1) {
1136 snd_printk ("upload sample "
1137 "DMA ack timeout\n");
1138 return -(EIO);
1139 } else {
1140 snd_printk ("upload sample "
1141 "DMA ack error 0x%x\n",
1142 dma_ack);
1143 return -(EIO);
1148 dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_SAMPLE);
1150 /* Note, label is here because sending the sample header shouldn't
1151 alter the sample_status info at all.
1154 sent:
1155 return (0);
1158 static int
1159 wavefront_send_alias (snd_wavefront_t *dev, wavefront_patch_info *header)
1162 unsigned char alias_hdr[WF_ALIAS_BYTES];
1164 DPRINT (WF_DEBUG_LOAD_PATCH, "download alias, %d is "
1165 "alias for %d\n",
1166 header->number,
1167 header->hdr.a.OriginalSample);
1169 munge_int32 (header->number, &alias_hdr[0], 2);
1170 munge_int32 (header->hdr.a.OriginalSample, &alias_hdr[2], 2);
1171 munge_int32 (*((unsigned int *)&header->hdr.a.sampleStartOffset),
1172 &alias_hdr[4], 4);
1173 munge_int32 (*((unsigned int *)&header->hdr.a.loopStartOffset),
1174 &alias_hdr[8], 4);
1175 munge_int32 (*((unsigned int *)&header->hdr.a.loopEndOffset),
1176 &alias_hdr[12], 4);
1177 munge_int32 (*((unsigned int *)&header->hdr.a.sampleEndOffset),
1178 &alias_hdr[16], 4);
1179 munge_int32 (header->hdr.a.FrequencyBias, &alias_hdr[20], 3);
1180 munge_int32 (*(&header->hdr.a.FrequencyBias+1), &alias_hdr[23], 2);
1182 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_SAMPLE_ALIAS, NULL, alias_hdr)) {
1183 snd_printk ("download alias failed.\n");
1184 return -(EIO);
1187 dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_ALIAS);
1189 return (0);
1192 static int
1193 wavefront_send_multisample (snd_wavefront_t *dev, wavefront_patch_info *header)
1195 int i;
1196 int num_samples;
1197 unsigned char *msample_hdr;
1199 msample_hdr = kmalloc(sizeof(WF_MSAMPLE_BYTES), GFP_KERNEL);
1200 if (! msample_hdr)
1201 return -ENOMEM;
1203 munge_int32 (header->number, &msample_hdr[0], 2);
1205 /* You'll recall at this point that the "number of samples" value
1206 in a wavefront_multisample struct is actually the log2 of the
1207 real number of samples.
1210 num_samples = (1<<(header->hdr.ms.NumberOfSamples&7));
1211 msample_hdr[2] = (unsigned char) header->hdr.ms.NumberOfSamples;
1213 DPRINT (WF_DEBUG_LOAD_PATCH, "multi %d with %d=%d samples\n",
1214 header->number,
1215 header->hdr.ms.NumberOfSamples,
1216 num_samples);
1218 for (i = 0; i < num_samples; i++) {
1219 DPRINT(WF_DEBUG_LOAD_PATCH|WF_DEBUG_DATA, "sample[%d] = %d\n",
1220 i, header->hdr.ms.SampleNumber[i]);
1221 munge_int32 (header->hdr.ms.SampleNumber[i],
1222 &msample_hdr[3+(i*2)], 2);
1225 /* Need a hack here to pass in the number of bytes
1226 to be written to the synth. This is ugly, and perhaps
1227 one day, I'll fix it.
1230 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_MULTISAMPLE,
1231 (unsigned char *) (long) ((num_samples*2)+3),
1232 msample_hdr)) {
1233 snd_printk ("download of multisample failed.\n");
1234 kfree(msample_hdr);
1235 return -(EIO);
1238 dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_MULTISAMPLE);
1240 kfree(msample_hdr);
1241 return (0);
1244 static int
1245 wavefront_fetch_multisample (snd_wavefront_t *dev,
1246 wavefront_patch_info *header)
1248 int i;
1249 unsigned char log_ns[1];
1250 unsigned char number[2];
1251 int num_samples;
1253 munge_int32 (header->number, number, 2);
1255 if (snd_wavefront_cmd (dev, WFC_UPLOAD_MULTISAMPLE, log_ns, number)) {
1256 snd_printk ("upload multisample failed.\n");
1257 return -(EIO);
1260 DPRINT (WF_DEBUG_DATA, "msample %d has %d samples\n",
1261 header->number, log_ns[0]);
1263 header->hdr.ms.NumberOfSamples = log_ns[0];
1265 /* get the number of samples ... */
1267 num_samples = (1 << log_ns[0]);
1269 for (i = 0; i < num_samples; i++) {
1270 char d[2];
1271 int val;
1273 if ((val = wavefront_read (dev)) == -1) {
1274 snd_printk ("upload multisample failed "
1275 "during sample loop.\n");
1276 return -(EIO);
1278 d[0] = val;
1280 if ((val = wavefront_read (dev)) == -1) {
1281 snd_printk ("upload multisample failed "
1282 "during sample loop.\n");
1283 return -(EIO);
1285 d[1] = val;
1287 header->hdr.ms.SampleNumber[i] =
1288 demunge_int32 ((unsigned char *) d, 2);
1290 DPRINT (WF_DEBUG_DATA, "msample sample[%d] = %d\n",
1291 i, header->hdr.ms.SampleNumber[i]);
1294 return (0);
1298 static int
1299 wavefront_send_drum (snd_wavefront_t *dev, wavefront_patch_info *header)
1302 unsigned char drumbuf[WF_DRUM_BYTES];
1303 wavefront_drum *drum = &header->hdr.d;
1304 int i;
1306 DPRINT (WF_DEBUG_LOAD_PATCH, "downloading edrum for MIDI "
1307 "note %d, patch = %d\n",
1308 header->number, drum->PatchNumber);
1310 drumbuf[0] = header->number & 0x7f;
1312 for (i = 0; i < 4; i++) {
1313 munge_int32 (((unsigned char *)drum)[i], &drumbuf[1+(i*2)], 2);
1316 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_EDRUM_PROGRAM, NULL, drumbuf)) {
1317 snd_printk ("download drum failed.\n");
1318 return -(EIO);
1321 return (0);
1324 static int
1325 wavefront_find_free_sample (snd_wavefront_t *dev)
1328 int i;
1330 for (i = 0; i < WF_MAX_SAMPLE; i++) {
1331 if (!(dev->sample_status[i] & WF_SLOT_FILLED)) {
1332 return i;
1335 snd_printk ("no free sample slots!\n");
1336 return -1;
1339 #if 0
1340 static int
1341 wavefront_find_free_patch (snd_wavefront_t *dev)
1344 int i;
1346 for (i = 0; i < WF_MAX_PATCH; i++) {
1347 if (!(dev->patch_status[i] & WF_SLOT_FILLED)) {
1348 return i;
1351 snd_printk ("no free patch slots!\n");
1352 return -1;
1354 #endif
1356 static int
1357 wavefront_load_patch (snd_wavefront_t *dev, const char __user *addr)
1359 wavefront_patch_info *header;
1360 int err;
1362 header = kmalloc(sizeof(*header), GFP_KERNEL);
1363 if (! header)
1364 return -ENOMEM;
1366 if (copy_from_user (header, addr, sizeof(wavefront_patch_info) -
1367 sizeof(wavefront_any))) {
1368 snd_printk ("bad address for load patch.\n");
1369 err = -EFAULT;
1370 goto __error;
1373 DPRINT (WF_DEBUG_LOAD_PATCH, "download "
1374 "Sample type: %d "
1375 "Sample number: %d "
1376 "Sample size: %d\n",
1377 header->subkey,
1378 header->number,
1379 header->size);
1381 switch (header->subkey) {
1382 case WF_ST_SAMPLE: /* sample or sample_header, based on patch->size */
1384 if (copy_from_user (&header->hdr.s, header->hdrptr,
1385 sizeof (wavefront_sample))) {
1386 err = -EFAULT;
1387 break;
1390 err = wavefront_send_sample (dev, header, header->dataptr, 0);
1391 break;
1393 case WF_ST_MULTISAMPLE:
1395 if (copy_from_user (&header->hdr.s, header->hdrptr,
1396 sizeof (wavefront_multisample))) {
1397 err = -EFAULT;
1398 break;
1401 err = wavefront_send_multisample (dev, header);
1402 break;
1404 case WF_ST_ALIAS:
1406 if (copy_from_user (&header->hdr.a, header->hdrptr,
1407 sizeof (wavefront_alias))) {
1408 err = -EFAULT;
1409 break;
1412 err = wavefront_send_alias (dev, header);
1413 break;
1415 case WF_ST_DRUM:
1416 if (copy_from_user (&header->hdr.d, header->hdrptr,
1417 sizeof (wavefront_drum))) {
1418 err = -EFAULT;
1419 break;
1422 err = wavefront_send_drum (dev, header);
1423 break;
1425 case WF_ST_PATCH:
1426 if (copy_from_user (&header->hdr.p, header->hdrptr,
1427 sizeof (wavefront_patch))) {
1428 err = -EFAULT;
1429 break;
1432 err = wavefront_send_patch (dev, header);
1433 break;
1435 case WF_ST_PROGRAM:
1436 if (copy_from_user (&header->hdr.pr, header->hdrptr,
1437 sizeof (wavefront_program))) {
1438 err = -EFAULT;
1439 break;
1442 err = wavefront_send_program (dev, header);
1443 break;
1445 default:
1446 snd_printk ("unknown patch type %d.\n",
1447 header->subkey);
1448 err = -EINVAL;
1449 break;
1452 __error:
1453 kfree(header);
1454 return err;
1457 /***********************************************************************
1458 WaveFront: hardware-dependent interface
1459 ***********************************************************************/
1461 static void
1462 process_sample_hdr (u8 *buf)
1465 wavefront_sample s;
1466 u8 *ptr;
1468 ptr = buf;
1470 /* The board doesn't send us an exact copy of a "wavefront_sample"
1471 in response to an Upload Sample Header command. Instead, we
1472 have to convert the data format back into our data structure,
1473 just as in the Download Sample command, where we have to do
1474 something very similar in the reverse direction.
1477 *((u32 *) &s.sampleStartOffset) = demunge_int32 (ptr, 4); ptr += 4;
1478 *((u32 *) &s.loopStartOffset) = demunge_int32 (ptr, 4); ptr += 4;
1479 *((u32 *) &s.loopEndOffset) = demunge_int32 (ptr, 4); ptr += 4;
1480 *((u32 *) &s.sampleEndOffset) = demunge_int32 (ptr, 4); ptr += 4;
1481 *((u32 *) &s.FrequencyBias) = demunge_int32 (ptr, 3); ptr += 3;
1483 s.SampleResolution = *ptr & 0x3;
1484 s.Loop = *ptr & 0x8;
1485 s.Bidirectional = *ptr & 0x10;
1486 s.Reverse = *ptr & 0x40;
1488 /* Now copy it back to where it came from */
1490 memcpy (buf, (unsigned char *) &s, sizeof (wavefront_sample));
1493 static int
1494 wavefront_synth_control (snd_wavefront_card_t *acard,
1495 wavefront_control *wc)
1498 snd_wavefront_t *dev = &acard->wavefront;
1499 unsigned char patchnumbuf[2];
1500 int i;
1502 DPRINT (WF_DEBUG_CMD, "synth control with "
1503 "cmd 0x%x\n", wc->cmd);
1505 /* Pre-handling of or for various commands */
1507 switch (wc->cmd) {
1509 case WFC_DISABLE_INTERRUPTS:
1510 snd_printk ("interrupts disabled.\n");
1511 outb (0x80|0x20, dev->control_port);
1512 dev->interrupts_are_midi = 1;
1513 return 0;
1515 case WFC_ENABLE_INTERRUPTS:
1516 snd_printk ("interrupts enabled.\n");
1517 outb (0x80|0x40|0x20, dev->control_port);
1518 dev->interrupts_are_midi = 1;
1519 return 0;
1521 case WFC_INTERRUPT_STATUS:
1522 wc->rbuf[0] = dev->interrupts_are_midi;
1523 return 0;
1525 case WFC_ROMSAMPLES_RDONLY:
1526 dev->rom_samples_rdonly = wc->wbuf[0];
1527 wc->status = 0;
1528 return 0;
1530 case WFC_IDENTIFY_SLOT_TYPE:
1531 i = wc->wbuf[0] | (wc->wbuf[1] << 7);
1532 if (i <0 || i >= WF_MAX_SAMPLE) {
1533 snd_printk ("invalid slot ID %d\n",
1535 wc->status = EINVAL;
1536 return -EINVAL;
1538 wc->rbuf[0] = dev->sample_status[i];
1539 wc->status = 0;
1540 return 0;
1542 case WFC_DEBUG_DRIVER:
1543 dev->debug = wc->wbuf[0];
1544 snd_printk ("debug = 0x%x\n", dev->debug);
1545 return 0;
1547 case WFC_UPLOAD_PATCH:
1548 munge_int32 (*((u32 *) wc->wbuf), patchnumbuf, 2);
1549 memcpy (wc->wbuf, patchnumbuf, 2);
1550 break;
1552 case WFC_UPLOAD_MULTISAMPLE:
1553 /* multisamples have to be handled differently, and
1554 cannot be dealt with properly by snd_wavefront_cmd() alone.
1556 wc->status = wavefront_fetch_multisample
1557 (dev, (wavefront_patch_info *) wc->rbuf);
1558 return 0;
1560 case WFC_UPLOAD_SAMPLE_ALIAS:
1561 snd_printk ("support for sample alias upload "
1562 "being considered.\n");
1563 wc->status = EINVAL;
1564 return -EINVAL;
1567 wc->status = snd_wavefront_cmd (dev, wc->cmd, wc->rbuf, wc->wbuf);
1569 /* Post-handling of certain commands.
1571 In particular, if the command was an upload, demunge the data
1572 so that the user-level doesn't have to think about it.
1575 if (wc->status == 0) {
1576 switch (wc->cmd) {
1577 /* intercept any freemem requests so that we know
1578 we are always current with the user-level view
1579 of things.
1582 case WFC_REPORT_FREE_MEMORY:
1583 dev->freemem = demunge_int32 (wc->rbuf, 4);
1584 break;
1586 case WFC_UPLOAD_PATCH:
1587 demunge_buf (wc->rbuf, wc->rbuf, WF_PATCH_BYTES);
1588 break;
1590 case WFC_UPLOAD_PROGRAM:
1591 demunge_buf (wc->rbuf, wc->rbuf, WF_PROGRAM_BYTES);
1592 break;
1594 case WFC_UPLOAD_EDRUM_PROGRAM:
1595 demunge_buf (wc->rbuf, wc->rbuf, WF_DRUM_BYTES - 1);
1596 break;
1598 case WFC_UPLOAD_SAMPLE_HEADER:
1599 process_sample_hdr (wc->rbuf);
1600 break;
1602 case WFC_UPLOAD_SAMPLE_ALIAS:
1603 snd_printk ("support for "
1604 "sample aliases still "
1605 "being considered.\n");
1606 break;
1608 case WFC_VMIDI_OFF:
1609 snd_wavefront_midi_disable_virtual (acard);
1610 break;
1612 case WFC_VMIDI_ON:
1613 snd_wavefront_midi_enable_virtual (acard);
1614 break;
1618 return 0;
1621 int
1622 snd_wavefront_synth_open (struct snd_hwdep *hw, struct file *file)
1625 if (!try_module_get(hw->card->module))
1626 return -EFAULT;
1627 file->private_data = hw;
1628 return 0;
1631 int
1632 snd_wavefront_synth_release (struct snd_hwdep *hw, struct file *file)
1635 module_put(hw->card->module);
1636 return 0;
1640 snd_wavefront_synth_ioctl (struct snd_hwdep *hw, struct file *file,
1641 unsigned int cmd, unsigned long arg)
1644 struct snd_card *card;
1645 snd_wavefront_t *dev;
1646 snd_wavefront_card_t *acard;
1647 wavefront_control *wc;
1648 void __user *argp = (void __user *)arg;
1649 int err;
1651 card = (struct snd_card *) hw->card;
1653 if (snd_BUG_ON(!card))
1654 return -ENODEV;
1655 if (snd_BUG_ON(!card->private_data))
1656 return -ENODEV;
1658 acard = card->private_data;
1659 dev = &acard->wavefront;
1661 switch (cmd) {
1662 case WFCTL_LOAD_SPP:
1663 if (wavefront_load_patch (dev, argp) != 0) {
1664 return -EIO;
1666 break;
1668 case WFCTL_WFCMD:
1669 wc = memdup_user(argp, sizeof(*wc));
1670 if (IS_ERR(wc))
1671 return PTR_ERR(wc);
1673 if (wavefront_synth_control (acard, wc) < 0)
1674 err = -EIO;
1675 else if (copy_to_user (argp, wc, sizeof (*wc)))
1676 err = -EFAULT;
1677 else
1678 err = 0;
1679 kfree(wc);
1680 return err;
1682 default:
1683 return -EINVAL;
1686 return 0;
1690 /***********************************************************************/
1691 /* WaveFront: interface for card-level wavefront module */
1692 /***********************************************************************/
1694 void
1695 snd_wavefront_internal_interrupt (snd_wavefront_card_t *card)
1697 snd_wavefront_t *dev = &card->wavefront;
1700 Some comments on interrupts. I attempted a version of this
1701 driver that used interrupts throughout the code instead of
1702 doing busy and/or sleep-waiting. Alas, it appears that once
1703 the Motorola firmware is downloaded, the card *never*
1704 generates an RX interrupt. These are successfully generated
1705 during firmware loading, and after that wavefront_status()
1706 reports that an interrupt is pending on the card from time
1707 to time, but it never seems to be delivered to this
1708 driver. Note also that wavefront_status() continues to
1709 report that RX interrupts are enabled, suggesting that I
1710 didn't goof up and disable them by mistake.
1712 Thus, I stepped back to a prior version of
1713 wavefront_wait(), the only place where this really
1714 matters. Its sad, but I've looked through the code to check
1715 on things, and I really feel certain that the Motorola
1716 firmware prevents RX-ready interrupts.
1719 if ((wavefront_status(dev) & (STAT_INTR_READ|STAT_INTR_WRITE)) == 0) {
1720 return;
1723 spin_lock(&dev->irq_lock);
1724 dev->irq_ok = 1;
1725 dev->irq_cnt++;
1726 spin_unlock(&dev->irq_lock);
1727 wake_up(&dev->interrupt_sleeper);
1730 /* STATUS REGISTER
1732 0 Host Rx Interrupt Enable (1=Enabled)
1733 1 Host Rx Register Full (1=Full)
1734 2 Host Rx Interrupt Pending (1=Interrupt)
1735 3 Unused
1736 4 Host Tx Interrupt (1=Enabled)
1737 5 Host Tx Register empty (1=Empty)
1738 6 Host Tx Interrupt Pending (1=Interrupt)
1739 7 Unused
1742 static int __devinit
1743 snd_wavefront_interrupt_bits (int irq)
1746 int bits;
1748 switch (irq) {
1749 case 9:
1750 bits = 0x00;
1751 break;
1752 case 5:
1753 bits = 0x08;
1754 break;
1755 case 12:
1756 bits = 0x10;
1757 break;
1758 case 15:
1759 bits = 0x18;
1760 break;
1762 default:
1763 snd_printk ("invalid IRQ %d\n", irq);
1764 bits = -1;
1767 return bits;
1770 static void __devinit
1771 wavefront_should_cause_interrupt (snd_wavefront_t *dev,
1772 int val, int port, unsigned long timeout)
1775 wait_queue_t wait;
1777 init_waitqueue_entry(&wait, current);
1778 spin_lock_irq(&dev->irq_lock);
1779 add_wait_queue(&dev->interrupt_sleeper, &wait);
1780 dev->irq_ok = 0;
1781 outb (val,port);
1782 spin_unlock_irq(&dev->irq_lock);
1783 while (!dev->irq_ok && time_before(jiffies, timeout)) {
1784 schedule_timeout_uninterruptible(1);
1785 barrier();
1789 static int __devinit
1790 wavefront_reset_to_cleanliness (snd_wavefront_t *dev)
1793 int bits;
1794 int hwv[2];
1796 /* IRQ already checked */
1798 bits = snd_wavefront_interrupt_bits (dev->irq);
1800 /* try reset of port */
1802 outb (0x0, dev->control_port);
1804 /* At this point, the board is in reset, and the H/W initialization
1805 register is accessed at the same address as the data port.
1807 Bit 7 - Enable IRQ Driver
1808 0 - Tri-state the Wave-Board drivers for the PC Bus IRQs
1809 1 - Enable IRQ selected by bits 5:3 to be driven onto the PC Bus.
1811 Bit 6 - MIDI Interface Select
1813 0 - Use the MIDI Input from the 26-pin WaveBlaster
1814 compatible header as the serial MIDI source
1815 1 - Use the MIDI Input from the 9-pin D connector as the
1816 serial MIDI source.
1818 Bits 5:3 - IRQ Selection
1819 0 0 0 - IRQ 2/9
1820 0 0 1 - IRQ 5
1821 0 1 0 - IRQ 12
1822 0 1 1 - IRQ 15
1823 1 0 0 - Reserved
1824 1 0 1 - Reserved
1825 1 1 0 - Reserved
1826 1 1 1 - Reserved
1828 Bits 2:1 - Reserved
1829 Bit 0 - Disable Boot ROM
1830 0 - memory accesses to 03FC30-03FFFFH utilize the internal Boot ROM
1831 1 - memory accesses to 03FC30-03FFFFH are directed to external
1832 storage.
1836 /* configure hardware: IRQ, enable interrupts,
1837 plus external 9-pin MIDI interface selected
1840 outb (0x80 | 0x40 | bits, dev->data_port);
1842 /* CONTROL REGISTER
1844 0 Host Rx Interrupt Enable (1=Enabled) 0x1
1845 1 Unused 0x2
1846 2 Unused 0x4
1847 3 Unused 0x8
1848 4 Host Tx Interrupt Enable 0x10
1849 5 Mute (0=Mute; 1=Play) 0x20
1850 6 Master Interrupt Enable (1=Enabled) 0x40
1851 7 Master Reset (0=Reset; 1=Run) 0x80
1853 Take us out of reset, mute output, master + TX + RX interrupts on.
1855 We'll get an interrupt presumably to tell us that the TX
1856 register is clear.
1859 wavefront_should_cause_interrupt(dev, 0x80|0x40|0x10|0x1,
1860 dev->control_port,
1861 (reset_time*HZ)/100);
1863 /* Note: data port is now the data port, not the h/w initialization
1864 port.
1867 if (!dev->irq_ok) {
1868 snd_printk ("intr not received after h/w un-reset.\n");
1869 goto gone_bad;
1872 /* Note: data port is now the data port, not the h/w initialization
1873 port.
1875 At this point, only "HW VERSION" or "DOWNLOAD OS" commands
1876 will work. So, issue one of them, and wait for TX
1877 interrupt. This can take a *long* time after a cold boot,
1878 while the ISC ROM does its RAM test. The SDK says up to 4
1879 seconds - with 12MB of RAM on a Tropez+, it takes a lot
1880 longer than that (~16secs). Note that the card understands
1881 the difference between a warm and a cold boot, so
1882 subsequent ISC2115 reboots (say, caused by module
1883 reloading) will get through this much faster.
1885 XXX Interesting question: why is no RX interrupt received first ?
1888 wavefront_should_cause_interrupt(dev, WFC_HARDWARE_VERSION,
1889 dev->data_port, ramcheck_time*HZ);
1891 if (!dev->irq_ok) {
1892 snd_printk ("post-RAM-check interrupt not received.\n");
1893 goto gone_bad;
1896 if (!wavefront_wait (dev, STAT_CAN_READ)) {
1897 snd_printk ("no response to HW version cmd.\n");
1898 goto gone_bad;
1901 if ((hwv[0] = wavefront_read (dev)) == -1) {
1902 snd_printk ("board not responding correctly.\n");
1903 goto gone_bad;
1906 if (hwv[0] == 0xFF) { /* NAK */
1908 /* Board's RAM test failed. Try to read error code,
1909 and tell us about it either way.
1912 if ((hwv[0] = wavefront_read (dev)) == -1) {
1913 snd_printk ("on-board RAM test failed "
1914 "(bad error code).\n");
1915 } else {
1916 snd_printk ("on-board RAM test failed "
1917 "(error code: 0x%x).\n",
1918 hwv[0]);
1920 goto gone_bad;
1923 /* We're OK, just get the next byte of the HW version response */
1925 if ((hwv[1] = wavefront_read (dev)) == -1) {
1926 snd_printk ("incorrect h/w response.\n");
1927 goto gone_bad;
1930 snd_printk ("hardware version %d.%d\n",
1931 hwv[0], hwv[1]);
1933 return 0;
1936 gone_bad:
1937 return (1);
1940 static int __devinit
1941 wavefront_download_firmware (snd_wavefront_t *dev, char *path)
1944 const unsigned char *buf;
1945 int len, err;
1946 int section_cnt_downloaded = 0;
1947 const struct firmware *firmware;
1949 err = request_firmware(&firmware, path, dev->card->dev);
1950 if (err < 0) {
1951 snd_printk(KERN_ERR "firmware (%s) download failed!!!\n", path);
1952 return 1;
1955 len = 0;
1956 buf = firmware->data;
1957 for (;;) {
1958 int section_length = *(signed char *)buf;
1959 if (section_length == 0)
1960 break;
1961 if (section_length < 0 || section_length > WF_SECTION_MAX) {
1962 snd_printk(KERN_ERR
1963 "invalid firmware section length %d\n",
1964 section_length);
1965 goto failure;
1967 buf++;
1968 len++;
1970 if (firmware->size < len + section_length) {
1971 snd_printk(KERN_ERR "firmware section read error.\n");
1972 goto failure;
1975 /* Send command */
1976 if (wavefront_write(dev, WFC_DOWNLOAD_OS))
1977 goto failure;
1979 for (; section_length; section_length--) {
1980 if (wavefront_write(dev, *buf))
1981 goto failure;
1982 buf++;
1983 len++;
1986 /* get ACK */
1987 if (!wavefront_wait(dev, STAT_CAN_READ)) {
1988 snd_printk(KERN_ERR "time out for firmware ACK.\n");
1989 goto failure;
1991 err = inb(dev->data_port);
1992 if (err != WF_ACK) {
1993 snd_printk(KERN_ERR
1994 "download of section #%d not "
1995 "acknowledged, ack = 0x%x\n",
1996 section_cnt_downloaded + 1, err);
1997 goto failure;
2000 section_cnt_downloaded++;
2003 release_firmware(firmware);
2004 return 0;
2006 failure:
2007 release_firmware(firmware);
2008 snd_printk(KERN_ERR "firmware download failed!!!\n");
2009 return 1;
2013 static int __devinit
2014 wavefront_do_reset (snd_wavefront_t *dev)
2017 char voices[1];
2019 if (wavefront_reset_to_cleanliness (dev)) {
2020 snd_printk ("hw reset failed.\n");
2021 goto gone_bad;
2024 if (dev->israw) {
2025 if (wavefront_download_firmware (dev, ospath)) {
2026 goto gone_bad;
2029 dev->israw = 0;
2031 /* Wait for the OS to get running. The protocol for
2032 this is non-obvious, and was determined by
2033 using port-IO tracing in DOSemu and some
2034 experimentation here.
2036 Rather than using timed waits, use interrupts creatively.
2039 wavefront_should_cause_interrupt (dev, WFC_NOOP,
2040 dev->data_port,
2041 (osrun_time*HZ));
2043 if (!dev->irq_ok) {
2044 snd_printk ("no post-OS interrupt.\n");
2045 goto gone_bad;
2048 /* Now, do it again ! */
2050 wavefront_should_cause_interrupt (dev, WFC_NOOP,
2051 dev->data_port, (10*HZ));
2053 if (!dev->irq_ok) {
2054 snd_printk ("no post-OS interrupt(2).\n");
2055 goto gone_bad;
2058 /* OK, no (RX/TX) interrupts any more, but leave mute
2059 in effect.
2062 outb (0x80|0x40, dev->control_port);
2065 /* SETUPSND.EXE asks for sample memory config here, but since i
2066 have no idea how to interpret the result, we'll forget
2067 about it.
2070 if ((dev->freemem = wavefront_freemem (dev)) < 0) {
2071 goto gone_bad;
2074 snd_printk ("available DRAM %dk\n", dev->freemem / 1024);
2076 if (wavefront_write (dev, 0xf0) ||
2077 wavefront_write (dev, 1) ||
2078 (wavefront_read (dev) < 0)) {
2079 dev->debug = 0;
2080 snd_printk ("MPU emulation mode not set.\n");
2081 goto gone_bad;
2084 voices[0] = 32;
2086 if (snd_wavefront_cmd (dev, WFC_SET_NVOICES, NULL, voices)) {
2087 snd_printk ("cannot set number of voices to 32.\n");
2088 goto gone_bad;
2092 return 0;
2094 gone_bad:
2095 /* reset that sucker so that it doesn't bother us. */
2097 outb (0x0, dev->control_port);
2098 dev->interrupts_are_midi = 0;
2099 return 1;
2102 int __devinit
2103 snd_wavefront_start (snd_wavefront_t *dev)
2106 int samples_are_from_rom;
2108 /* IMPORTANT: assumes that snd_wavefront_detect() and/or
2109 wavefront_reset_to_cleanliness() has already been called
2112 if (dev->israw) {
2113 samples_are_from_rom = 1;
2114 } else {
2115 /* XXX is this always true ? */
2116 samples_are_from_rom = 0;
2119 if (dev->israw || fx_raw) {
2120 if (wavefront_do_reset (dev)) {
2121 return -1;
2124 /* Check for FX device, present only on Tropez+ */
2126 dev->has_fx = (snd_wavefront_fx_detect (dev) == 0);
2128 if (dev->has_fx && fx_raw) {
2129 snd_wavefront_fx_start (dev);
2132 wavefront_get_sample_status (dev, samples_are_from_rom);
2133 wavefront_get_program_status (dev);
2134 wavefront_get_patch_status (dev);
2136 /* Start normal operation: unreset, master interrupt enabled, no mute
2139 outb (0x80|0x40|0x20, dev->control_port);
2141 return (0);
2144 int __devinit
2145 snd_wavefront_detect (snd_wavefront_card_t *card)
2148 unsigned char rbuf[4], wbuf[4];
2149 snd_wavefront_t *dev = &card->wavefront;
2151 /* returns zero if a WaveFront card is successfully detected.
2152 negative otherwise.
2155 dev->israw = 0;
2156 dev->has_fx = 0;
2157 dev->debug = debug_default;
2158 dev->interrupts_are_midi = 0;
2159 dev->irq_cnt = 0;
2160 dev->rom_samples_rdonly = 1;
2162 if (snd_wavefront_cmd (dev, WFC_FIRMWARE_VERSION, rbuf, wbuf) == 0) {
2164 dev->fw_version[0] = rbuf[0];
2165 dev->fw_version[1] = rbuf[1];
2167 snd_printk ("firmware %d.%d already loaded.\n",
2168 rbuf[0], rbuf[1]);
2170 /* check that a command actually works */
2172 if (snd_wavefront_cmd (dev, WFC_HARDWARE_VERSION,
2173 rbuf, wbuf) == 0) {
2174 dev->hw_version[0] = rbuf[0];
2175 dev->hw_version[1] = rbuf[1];
2176 } else {
2177 snd_printk ("not raw, but no "
2178 "hardware version!\n");
2179 return -1;
2182 if (!wf_raw) {
2183 return 0;
2184 } else {
2185 snd_printk ("reloading firmware as you requested.\n");
2186 dev->israw = 1;
2189 } else {
2191 dev->israw = 1;
2192 snd_printk ("no response to firmware probe, assume raw.\n");
2196 return 0;
2199 MODULE_FIRMWARE(DEFAULT_OSPATH);