projects / linux-2.6-block.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Merge tag 'soc-ep93xx-dt-6.12' of git://git.kernel.org/pub/scm/linux/kernel/git/soc/soc
[linux-2.6-block.git] / sound / isa / wavefront / wavefront_synth.c
CommitLineData
63682fb0 1// SPDX-License-Identifier: GPL-2.0-only
1da177e4
LT		 2/* Copyright (C) by Paul Barton-Davis 1998-1999
3 *
4 * Some portions of this file are taken from work that is
5 * copyright (C) by Hannu Savolainen 1993-1996
1da177e4
LT		 6 */
7
8/*
9 * An ALSA lowlevel driver for Turtle Beach ICS2115 wavetable synth
10 * (Maui, Tropez, Tropez Plus)
11 *
12 * This driver supports the onboard wavetable synthesizer (an ICS2115),
13 * including patch, sample and program loading and unloading, conversion
14 * of GUS patches during loading, and full user-level access to all
15 * WaveFront commands. It tries to provide semi-intelligent patch and
16 * sample management as well.
17 *
18 */
19
6cbbfe1c 20#include <linux/io.h>
1da177e4
LT		 21#include <linux/interrupt.h>
22#include <linux/init.h>
23#include <linux/delay.h>
24#include <linux/time.h>
25#include <linux/wait.h>
174cd4b1 26#include <linux/sched/signal.h>
c2b1239a 27#include <linux/firmware.h>
1da177e4 28#include <linux/moduleparam.h>
5a0e3ad6 29#include <linux/slab.h>
da155d5b 30#include <linux/module.h>
1da177e4
LT		 31#include <sound/core.h>
32#include <sound/snd_wavefront.h>
33#include <sound/initval.h>
34
35static int wf_raw = 0; /* we normally check for "raw state" to firmware
36 loading. if non-zero, then during driver loading, the
37 state of the board is ignored, and we reset the
38 board and load the firmware anyway.
39 */
40
41static int fx_raw = 1; /* if this is zero, we'll leave the FX processor in
42 whatever state it is when the driver is loaded.
43 The default is to download the microprogram and
44 associated coefficients to set it up for "default"
45 operation, whatever that means.
46 */
47
48static int debug_default = 0; /* you can set this to control debugging
49 during driver loading. it takes any combination
50 of the WF_DEBUG_* flags defined in
51 wavefront.h
52 */
53
54/* XXX this needs to be made firmware and hardware version dependent */
55
c2b1239a
TI		 56#define DEFAULT_OSPATH "wavefront.os"
57static char *ospath = DEFAULT_OSPATH; /* the firmware file name */
1da177e4
LT		 58
59static int wait_usecs = 150; /* This magic number seems to give pretty optimal
60 throughput based on my limited experimentation.
61 If you want to play around with it and find a better
62 value, be my guest. Remember, the idea is to
63 get a number that causes us to just busy wait
64 for as many WaveFront commands as possible, without
65 coming up with a number so large that we hog the
66 whole CPU.
67
68 Specifically, with this number, out of about 134,000
69 status waits, only about 250 result in a sleep.
70 */
71
72static int sleep_interval = 100; /* HZ/sleep_interval seconds per sleep */
73static int sleep_tries = 50; /* number of times we'll try to sleep */
74
75static int reset_time = 2; /* hundreths of a second we wait after a HW
76 reset for the expected interrupt.
77 */
78
79static int ramcheck_time = 20; /* time in seconds to wait while ROM code
80 checks on-board RAM.
81 */
82
83static int osrun_time = 10; /* time in seconds we wait for the OS to
84 start running.
85 */
86module_param(wf_raw, int, 0444);
87MODULE_PARM_DESC(wf_raw, "if non-zero, assume that we need to boot the OS");
88module_param(fx_raw, int, 0444);
89MODULE_PARM_DESC(fx_raw, "if non-zero, assume that the FX process needs help");
90module_param(debug_default, int, 0444);
91MODULE_PARM_DESC(debug_default, "debug parameters for card initialization");
92module_param(wait_usecs, int, 0444);
93MODULE_PARM_DESC(wait_usecs, "how long to wait without sleeping, usecs");
94module_param(sleep_interval, int, 0444);
95MODULE_PARM_DESC(sleep_interval, "how long to sleep when waiting for reply");
96module_param(sleep_tries, int, 0444);
97MODULE_PARM_DESC(sleep_tries, "how many times to try sleeping during a wait");
98module_param(ospath, charp, 0444);
c2b1239a 99MODULE_PARM_DESC(ospath, "pathname to processed ICS2115 OS firmware");
1da177e4
LT		 100module_param(reset_time, int, 0444);
101MODULE_PARM_DESC(reset_time, "how long to wait for a reset to take effect");
102module_param(ramcheck_time, int, 0444);
103MODULE_PARM_DESC(ramcheck_time, "how many seconds to wait for the RAM test");
104module_param(osrun_time, int, 0444);
105MODULE_PARM_DESC(osrun_time, "how many seconds to wait for the ICS2115 OS");
106
107/* if WF_DEBUG not defined, no run-time debugging messages will
108 be available via the debug flag setting. Given the current
109 beta state of the driver, this will remain set until a future
110 version.
111*/
112
113#define WF_DEBUG 1
114
115#ifdef WF_DEBUG
116
1da177e4
LT		 117#define DPRINT(cond, ...) \
118 if ((dev->debug & (cond)) == (cond)) { \
8b4ac542 119 pr_debug(__VA_ARGS__); \
1da177e4
LT		 120 }
121#else
1da177e4
LT		 122#define DPRINT(cond, args...)
123#endif /* WF_DEBUG */
124
125#define LOGNAME "WaveFront: "
126
127/* bitmasks for WaveFront status port value */
128
129#define STAT_RINTR_ENABLED 0x01
130#define STAT_CAN_READ 0x02
131#define STAT_INTR_READ 0x04
132#define STAT_WINTR_ENABLED 0x10
133#define STAT_CAN_WRITE 0x20
134#define STAT_INTR_WRITE 0x40
135
136static int wavefront_delete_sample (snd_wavefront_t *, int sampnum);
137static int wavefront_find_free_sample (snd_wavefront_t *);
138
542172f3 139struct wavefront_command {
1da177e4
LT		 140 int cmd;
141 char *action;
142 unsigned int read_cnt;
143 unsigned int write_cnt;
144 int need_ack;
542172f3 145};
1da177e4
LT		 146
147static struct {
148 int errno;
149 const char *errstr;
150} wavefront_errors[] = {
151 { 0x01, "Bad sample number" },
152 { 0x02, "Out of sample memory" },
153 { 0x03, "Bad patch number" },
154 { 0x04, "Error in number of voices" },
155 { 0x06, "Sample load already in progress" },
156 { 0x0B, "No sample load request pending" },
157 { 0x0E, "Bad MIDI channel number" },
158 { 0x10, "Download Record Error" },
159 { 0x80, "Success" },
160 { 0x0 }
161};
162
163#define NEEDS_ACK 1
164
542172f3 165static struct wavefront_command wavefront_commands[] = {
1da177e4
LT		 166 { WFC_SET_SYNTHVOL, "set synthesizer volume", 0, 1, NEEDS_ACK },
167 { WFC_GET_SYNTHVOL, "get synthesizer volume", 1, 0, 0},
168 { WFC_SET_NVOICES, "set number of voices", 0, 1, NEEDS_ACK },
169 { WFC_GET_NVOICES, "get number of voices", 1, 0, 0 },
170 { WFC_SET_TUNING, "set synthesizer tuning", 0, 2, NEEDS_ACK },
171 { WFC_GET_TUNING, "get synthesizer tuning", 2, 0, 0 },
172 { WFC_DISABLE_CHANNEL, "disable synth channel", 0, 1, NEEDS_ACK },
173 { WFC_ENABLE_CHANNEL, "enable synth channel", 0, 1, NEEDS_ACK },
174 { WFC_GET_CHANNEL_STATUS, "get synth channel status", 3, 0, 0 },
175 { WFC_MISYNTH_OFF, "disable midi-in to synth", 0, 0, NEEDS_ACK },
176 { WFC_MISYNTH_ON, "enable midi-in to synth", 0, 0, NEEDS_ACK },
177 { WFC_VMIDI_ON, "enable virtual midi mode", 0, 0, NEEDS_ACK },
178 { WFC_VMIDI_OFF, "disable virtual midi mode", 0, 0, NEEDS_ACK },
179 { WFC_MIDI_STATUS, "report midi status", 1, 0, 0 },
180 { WFC_FIRMWARE_VERSION, "report firmware version", 2, 0, 0 },
181 { WFC_HARDWARE_VERSION, "report hardware version", 2, 0, 0 },
182 { WFC_GET_NSAMPLES, "report number of samples", 2, 0, 0 },
183 { WFC_INSTOUT_LEVELS, "report instantaneous output levels", 7, 0, 0 },
184 { WFC_PEAKOUT_LEVELS, "report peak output levels", 7, 0, 0 },
185 { WFC_DOWNLOAD_SAMPLE, "download sample",
186 0, WF_SAMPLE_BYTES, NEEDS_ACK },
187 { WFC_DOWNLOAD_BLOCK, "download block", 0, 0, NEEDS_ACK},
188 { WFC_DOWNLOAD_SAMPLE_HEADER, "download sample header",
189 0, WF_SAMPLE_HDR_BYTES, NEEDS_ACK },
190 { WFC_UPLOAD_SAMPLE_HEADER, "upload sample header", 13, 2, 0 },
191
192 /* This command requires a variable number of bytes to be written.
193 There is a hack in snd_wavefront_cmd() to support this. The actual
194 count is passed in as the read buffer ptr, cast appropriately.
195 Ugh.
196 */
197
198 { WFC_DOWNLOAD_MULTISAMPLE, "download multisample", 0, 0, NEEDS_ACK },
199
200 /* This one is a hack as well. We just read the first byte of the
201 response, don't fetch an ACK, and leave the rest to the
202 calling function. Ugly, ugly, ugly.
203 */
204
205 { WFC_UPLOAD_MULTISAMPLE, "upload multisample", 2, 1, 0 },
206 { WFC_DOWNLOAD_SAMPLE_ALIAS, "download sample alias",
207 0, WF_ALIAS_BYTES, NEEDS_ACK },
208 { WFC_UPLOAD_SAMPLE_ALIAS, "upload sample alias", WF_ALIAS_BYTES, 2, 0},
209 { WFC_DELETE_SAMPLE, "delete sample", 0, 2, NEEDS_ACK },
210 { WFC_IDENTIFY_SAMPLE_TYPE, "identify sample type", 5, 2, 0 },
211 { WFC_UPLOAD_SAMPLE_PARAMS, "upload sample parameters" },
212 { WFC_REPORT_FREE_MEMORY, "report free memory", 4, 0, 0 },
213 { WFC_DOWNLOAD_PATCH, "download patch", 0, 134, NEEDS_ACK },
214 { WFC_UPLOAD_PATCH, "upload patch", 132, 2, 0 },
215 { WFC_DOWNLOAD_PROGRAM, "download program", 0, 33, NEEDS_ACK },
216 { WFC_UPLOAD_PROGRAM, "upload program", 32, 1, 0 },
217 { WFC_DOWNLOAD_EDRUM_PROGRAM, "download enhanced drum program", 0, 9,
218 NEEDS_ACK},
219 { WFC_UPLOAD_EDRUM_PROGRAM, "upload enhanced drum program", 8, 1, 0},
220 { WFC_SET_EDRUM_CHANNEL, "set enhanced drum program channel",
221 0, 1, NEEDS_ACK },
222 { WFC_DISABLE_DRUM_PROGRAM, "disable drum program", 0, 1, NEEDS_ACK },
223 { WFC_REPORT_CHANNEL_PROGRAMS, "report channel program numbers",
224 32, 0, 0 },
225 { WFC_NOOP, "the no-op command", 0, 0, NEEDS_ACK },
226 { 0x00 }
227};
228
229static const char *
230wavefront_errorstr (int errnum)
231
232{
233 int i;
234
235 for (i = 0; wavefront_errors[i].errstr; i++) {
236 if (wavefront_errors[i].errno == errnum) {
237 return wavefront_errors[i].errstr;
238 }
239 }
240
241 return "Unknown WaveFront error";
242}
243
542172f3 244static struct wavefront_command *
1da177e4
LT		 245wavefront_get_command (int cmd)
246
247{
248 int i;
249
250 for (i = 0; wavefront_commands[i].cmd != 0; i++) {
251 if (cmd == wavefront_commands[i].cmd) {
252 return &wavefront_commands[i];
253 }
254 }
255
542172f3 256 return NULL;
1da177e4
LT		 257}
258
259static inline int
260wavefront_status (snd_wavefront_t *dev)
261
262{
263 return inb (dev->status_port);
264}
265
266static int
267wavefront_sleep (int limit)
268
269{
8433a509 270 schedule_timeout_interruptible(limit);
1da177e4
LT		 271
272 return signal_pending(current);
273}
274
275static int
276wavefront_wait (snd_wavefront_t *dev, int mask)
277
278{
279 int i;
280
281 /* Spin for a short period of time, because >99% of all
282 requests to the WaveFront can be serviced inline like this.
283 */
284
285 for (i = 0; i < wait_usecs; i += 5) {
286 if (wavefront_status (dev) & mask) {
287 return 1;
288 }
289 udelay(5);
290 }
291
292 for (i = 0; i < sleep_tries; i++) {
293
294 if (wavefront_status (dev) & mask) {
295 return 1;
296 }
297
298 if (wavefront_sleep (HZ/sleep_interval)) {
299 return (0);
300 }
301 }
302
303 return (0);
304}
305
306static int
307wavefront_read (snd_wavefront_t *dev)
308
309{
310 if (wavefront_wait (dev, STAT_CAN_READ))
311 return inb (dev->data_port);
312
313 DPRINT (WF_DEBUG_DATA, "read timeout.\n");
314
315 return -1;
316}
317
318static int
319wavefront_write (snd_wavefront_t *dev, unsigned char data)
320
321{
322 if (wavefront_wait (dev, STAT_CAN_WRITE)) {
323 outb (data, dev->data_port);
324 return 0;
325 }
326
327 DPRINT (WF_DEBUG_DATA, "write timeout.\n");
328
329 return -1;
330}
331
332int
333snd_wavefront_cmd (snd_wavefront_t *dev,
334 int cmd, unsigned char *rbuf, unsigned char *wbuf)
335
336{
337 int ack;
338 unsigned int i;
339 int c;
542172f3 340 struct wavefront_command *wfcmd;
1da177e4 341
520226e9
TI		 342 wfcmd = wavefront_get_command(cmd);
343 if (!wfcmd) {
8b4ac542 344 dev_err(dev->card->dev, "command 0x%x not supported.\n",
1da177e4
LT		 345 cmd);
346 return 1;
347 }
348
349 /* Hack to handle the one variable-size write command. See
350 wavefront_send_multisample() for the other half of this
351 gross and ugly strategy.
352 */
353
354 if (cmd == WFC_DOWNLOAD_MULTISAMPLE) {
355 wfcmd->write_cnt = (unsigned long) rbuf;
356 rbuf = NULL;
357 }
358
359 DPRINT (WF_DEBUG_CMD, "0x%x [%s] (%d,%d,%d)\n",
360 cmd, wfcmd->action, wfcmd->read_cnt,
361 wfcmd->write_cnt, wfcmd->need_ack);
362
363 if (wavefront_write (dev, cmd)) {
364 DPRINT ((WF_DEBUG_IO|WF_DEBUG_CMD), "cannot request "
365 "0x%x [%s].\n",
366 cmd, wfcmd->action);
367 return 1;
368 }
369
370 if (wfcmd->write_cnt > 0) {
371 DPRINT (WF_DEBUG_DATA, "writing %d bytes "
372 "for 0x%x\n",
373 wfcmd->write_cnt, cmd);
374
375 for (i = 0; i < wfcmd->write_cnt; i++) {
376 if (wavefront_write (dev, wbuf[i])) {
377 DPRINT (WF_DEBUG_IO, "bad write for byte "
378 "%d of 0x%x [%s].\n",
379 i, cmd, wfcmd->action);
380 return 1;
381 }
382
383 DPRINT (WF_DEBUG_DATA, "write[%d] = 0x%x\n",
384 i, wbuf[i]);
385 }
386 }
387
388 if (wfcmd->read_cnt > 0) {
389 DPRINT (WF_DEBUG_DATA, "reading %d ints "
390 "for 0x%x\n",
391 wfcmd->read_cnt, cmd);
392
393 for (i = 0; i < wfcmd->read_cnt; i++) {
394
520226e9
TI		 395 c = wavefront_read(dev);
396 if (c == -1) {
1da177e4
LT		 397 DPRINT (WF_DEBUG_IO, "bad read for byte "
398 "%d of 0x%x [%s].\n",
399 i, cmd, wfcmd->action);
400 return 1;
401 }
402
403 /* Now handle errors. Lots of special cases here */
404
405 if (c == 0xff) {
520226e9
TI		 406 c = wavefront_read(dev);
407 if (c == -1) {
1da177e4
LT		 408 DPRINT (WF_DEBUG_IO, "bad read for "
409 "error byte at "
410 "read byte %d "
411 "of 0x%x [%s].\n",
412 i, cmd,
413 wfcmd->action);
414 return 1;
415 }
416
417 /* Can you believe this madness ? */
418
419 if (c == 1 &&
420 wfcmd->cmd == WFC_IDENTIFY_SAMPLE_TYPE) {
421 rbuf[0] = WF_ST_EMPTY;
422 return (0);
423
424 } else if (c == 3 &&
425 wfcmd->cmd == WFC_UPLOAD_PATCH) {
426
427 return 3;
428
429 } else if (c == 1 &&
430 wfcmd->cmd == WFC_UPLOAD_PROGRAM) {
431
432 return 1;
433
434 } else {
435
436 DPRINT (WF_DEBUG_IO, "error %d (%s) "
437 "during "
438 "read for byte "
439 "%d of 0x%x "
440 "[%s].\n",
441 c,
442 wavefront_errorstr (c),
443 i, cmd,
444 wfcmd->action);
445 return 1;
446
447 }
448
449 } else {
450 rbuf[i] = c;
451 }
452
453 DPRINT (WF_DEBUG_DATA, "read[%d] = 0x%x\n",i, rbuf[i]);
454 }
455 }
456
457 if ((wfcmd->read_cnt == 0 && wfcmd->write_cnt == 0) || wfcmd->need_ack) {
458
459 DPRINT (WF_DEBUG_CMD, "reading ACK for 0x%x\n", cmd);
460
461 /* Some commands need an ACK, but return zero instead
462 of the standard value.
463 */
464
520226e9
TI		 465 ack = wavefront_read(dev);
466 if (ack == 0)
1da177e4 467 ack = WF_ACK;
1da177e4
LT		 468
469 if (ack != WF_ACK) {
470 if (ack == -1) {
471 DPRINT (WF_DEBUG_IO, "cannot read ack for "
472 "0x%x [%s].\n",
473 cmd, wfcmd->action);
474 return 1;
475
476 } else {
477 int err = -1; /* something unknown */
478
479 if (ack == 0xff) { /* explicit error */
480
520226e9
TI		 481 err = wavefront_read(dev);
482 if (err == -1) {
1da177e4
LT		 483 DPRINT (WF_DEBUG_DATA,
484 "cannot read err "
485 "for 0x%x [%s].\n",
486 cmd, wfcmd->action);
487 }
488 }
489
490 DPRINT (WF_DEBUG_IO, "0x%x [%s] "
491 "failed (0x%x, 0x%x, %s)\n",
492 cmd, wfcmd->action, ack, err,
493 wavefront_errorstr (err));
494
495 return -err;
496 }
497 }
498
499 DPRINT (WF_DEBUG_DATA, "ack received "
500 "for 0x%x [%s]\n",
501 cmd, wfcmd->action);
502 } else {
503
504 DPRINT (WF_DEBUG_CMD, "0x%x [%s] does not need "
505 "ACK (%d,%d,%d)\n",
506 cmd, wfcmd->action, wfcmd->read_cnt,
507 wfcmd->write_cnt, wfcmd->need_ack);
508 }
509
510 return 0;
511
512}
513\f
514/***********************************************************************
515WaveFront data munging
516
517Things here are weird. All data written to the board cannot
518have its most significant bit set. Any data item with values
519potentially > 0x7F (127) must be split across multiple bytes.
520
521Sometimes, we need to munge numeric values that are represented on
522the x86 side as 8-32 bit values. Sometimes, we need to munge data
523that is represented on the x86 side as an array of bytes. The most
524efficient approach to handling both cases seems to be to use 2
525different functions for munging and 2 for de-munging. This avoids
526weird casting and worrying about bit-level offsets.
527
528**********************************************************************/
529
530static unsigned char *
531munge_int32 (unsigned int src,
532 unsigned char *dst,
533 unsigned int dst_size)
534{
535 unsigned int i;
536
537 for (i = 0; i < dst_size; i++) {
538 *dst = src & 0x7F; /* Mask high bit of LSB */
539 src = src >> 7; /* Rotate Right 7 bits */
540 /* Note: we leave the upper bits in place */
541
542 dst++;
395d9dd5 543 }
1da177e4
LT		 544 return dst;
545};
546
547static int
548demunge_int32 (unsigned char* src, int src_size)
549
550{
551 int i;
552 int outval = 0;
553
554 for (i = src_size - 1; i >= 0; i--) {
555 outval=(outval<<7)+src[i];
556 }
557
558 return outval;
559};
560
561static
562unsigned char *
563munge_buf (unsigned char *src, unsigned char *dst, unsigned int dst_size)
564
565{
566 unsigned int i;
567 unsigned int last = dst_size / 2;
568
569 for (i = 0; i < last; i++) {
570 *dst++ = src[i] & 0x7f;
571 *dst++ = src[i] >> 7;
572 }
573 return dst;
574}
575
576static
577unsigned char *
578demunge_buf (unsigned char *src, unsigned char *dst, unsigned int src_bytes)
579
580{
581 int i;
582 unsigned char *end = src + src_bytes;
583
1da177e4
LT		 584 /* NOTE: src and dst *CAN* point to the same address */
585
586 for (i = 0; src != end; i++) {
587 dst[i] = *src++;
588 dst[i] |= (*src++)<<7;
589 }
590
591 return dst;
592}
593\f
594/***********************************************************************
595WaveFront: sample, patch and program management.
596***********************************************************************/
597
598static int
599wavefront_delete_sample (snd_wavefront_t *dev, int sample_num)
600
601{
602 unsigned char wbuf[2];
603 int x;
604
605 wbuf[0] = sample_num & 0x7f;
606 wbuf[1] = sample_num >> 7;
607
520226e9
TI		 608 x = snd_wavefront_cmd(dev, WFC_DELETE_SAMPLE, NULL, wbuf);
609 if (!x)
1da177e4 610 dev->sample_status[sample_num] = WF_ST_EMPTY;
1da177e4
LT		 611
612 return x;
613}
614
615static int
616wavefront_get_sample_status (snd_wavefront_t *dev, int assume_rom)
617
618{
619 int i;
620 unsigned char rbuf[32], wbuf[32];
621 unsigned int sc_real, sc_alias, sc_multi;
622
623 /* check sample status */
624
625 if (snd_wavefront_cmd (dev, WFC_GET_NSAMPLES, rbuf, wbuf)) {
8b4ac542 626 dev_err(dev->card->dev, "cannot request sample count.\n");
1da177e4
LT		 627 return -1;
628 }
629
630 sc_real = sc_alias = sc_multi = dev->samples_used = 0;
631
632 for (i = 0; i < WF_MAX_SAMPLE; i++) {
633
634 wbuf[0] = i & 0x7f;
635 wbuf[1] = i >> 7;
636
637 if (snd_wavefront_cmd (dev, WFC_IDENTIFY_SAMPLE_TYPE, rbuf, wbuf)) {
8b4ac542
TI		 638 dev_warn(dev->card->dev,
639 "cannot identify sample type of slot %d\n", i);
1da177e4
LT		 640 dev->sample_status[i] = WF_ST_EMPTY;
641 continue;
642 }
643
644 dev->sample_status[i] = (WF_SLOT_FILLED|rbuf[0]);
645
646 if (assume_rom) {
647 dev->sample_status[i] |= WF_SLOT_ROM;
648 }
649
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;
662
663 default:
8b4ac542
TI		 664 dev_err(dev->card->dev,
665 "unknown sample type for slot %d (0x%x)\n",
666 i, rbuf[0]);
1da177e4
LT		 667 }
668
669 if (rbuf[0] != WF_ST_EMPTY) {
670 dev->samples_used++;
671 }
672 }
673
8b4ac542
TI		 674 dev_info(dev->card->dev,
675 "%d samples used (%d real, %d aliases, %d multi), %d empty\n",
676 dev->samples_used, sc_real, sc_alias, sc_multi,
677 WF_MAX_SAMPLE - dev->samples_used);
1da177e4
LT		 678
679
680 return (0);
681
682}
683
684static int
685wavefront_get_patch_status (snd_wavefront_t *dev)
686
687{
688 unsigned char patchbuf[WF_PATCH_BYTES];
689 unsigned char patchnum[2];
690 wavefront_patch *p;
691 int i, x, cnt, cnt2;
692
693 for (i = 0; i < WF_MAX_PATCH; i++) {
694 patchnum[0] = i & 0x7f;
695 patchnum[1] = i >> 7;
696
520226e9
TI		 697 x = snd_wavefront_cmd(dev, WFC_UPLOAD_PATCH, patchbuf,
698 patchnum);
699 if (x == 0) {
1da177e4
LT		 700
701 dev->patch_status[i] |= WF_SLOT_FILLED;
702 p = (wavefront_patch *) patchbuf;
703 dev->sample_status
704 [p->sample_number|(p->sample_msb<<7)] |=
705 WF_SLOT_USED;
706
707 } else if (x == 3) { /* Bad patch number */
708 dev->patch_status[i] = 0;
709 } else {
8b4ac542
TI		 710 dev_err(dev->card->dev,
711 "upload patch error 0x%x\n", x);
1da177e4
LT		 712 dev->patch_status[i] = 0;
713 return 1;
714 }
715 }
716
717 /* program status has already filled in slot_used bits */
718
719 for (i = 0, cnt = 0, cnt2 = 0; i < WF_MAX_PATCH; i++) {
720 if (dev->patch_status[i] & WF_SLOT_FILLED) {
721 cnt++;
722 }
723 if (dev->patch_status[i] & WF_SLOT_USED) {
724 cnt2++;
725 }
726
727 }
8b4ac542
TI		 728 dev_info(dev->card->dev, "%d patch slots filled, %d in use\n",
729 cnt, cnt2);
1da177e4
LT		 730
731 return (0);
732}
733
734static int
735wavefront_get_program_status (snd_wavefront_t *dev)
736
737{
738 unsigned char progbuf[WF_PROGRAM_BYTES];
739 wavefront_program prog;
740 unsigned char prognum;
741 int i, x, l, cnt;
742
743 for (i = 0; i < WF_MAX_PROGRAM; i++) {
744 prognum = i;
745
520226e9
TI		 746 x = snd_wavefront_cmd(dev, WFC_UPLOAD_PROGRAM, progbuf,
747 &prognum);
748 if (x == 0) {
1da177e4
LT		 749
750 dev->prog_status[i] |= WF_SLOT_USED;
751
752 demunge_buf (progbuf, (unsigned char *) &prog,
753 WF_PROGRAM_BYTES);
754
755 for (l = 0; l < WF_NUM_LAYERS; l++) {
756 if (prog.layer[l].mute) {
757 dev->patch_status
758 [prog.layer[l].patch_number] |=
759 WF_SLOT_USED;
760 }
761 }
762 } else if (x == 1) { /* Bad program number */
763 dev->prog_status[i] = 0;
764 } else {
8b4ac542
TI		 765 dev_err(dev->card->dev,
766 "upload program error 0x%x\n", x);
1da177e4
LT		 767 dev->prog_status[i] = 0;
768 }
769 }
770
771 for (i = 0, cnt = 0; i < WF_MAX_PROGRAM; i++) {
772 if (dev->prog_status[i]) {
773 cnt++;
774 }
775 }
776
8b4ac542 777 dev_info(dev->card->dev, "%d programs slots in use\n", cnt);
1da177e4
LT		 778
779 return (0);
780}
781
782static int
783wavefront_send_patch (snd_wavefront_t *dev, wavefront_patch_info *header)
784
785{
786 unsigned char buf[WF_PATCH_BYTES+2];
787 unsigned char *bptr;
788
789 DPRINT (WF_DEBUG_LOAD_PATCH, "downloading patch %d\n",
790 header->number);
791
84d7a447
DC		 792 if (header->number >= ARRAY_SIZE(dev->patch_status))
793 return -EINVAL;
794
1da177e4
LT		 795 dev->patch_status[header->number] |= WF_SLOT_FILLED;
796
1da177e4
LT		 797 bptr = munge_int32 (header->number, buf, 2);
798 munge_buf ((unsigned char *)&header->hdr.p, bptr, WF_PATCH_BYTES);
799
800 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_PATCH, NULL, buf)) {
8b4ac542 801 dev_err(dev->card->dev, "download patch failed\n");
9a303dc7 802 return -EIO;
1da177e4
LT		 803 }
804
805 return (0);
806}
807
808static int
809wavefront_send_program (snd_wavefront_t *dev, wavefront_patch_info *header)
810
811{
812 unsigned char buf[WF_PROGRAM_BYTES+1];
813 int i;
814
815 DPRINT (WF_DEBUG_LOAD_PATCH, "downloading program %d\n",
816 header->number);
817
84d7a447
DC		 818 if (header->number >= ARRAY_SIZE(dev->prog_status))
819 return -EINVAL;
820
1da177e4
LT		 821 dev->prog_status[header->number] = WF_SLOT_USED;
822
823 /* XXX need to zero existing SLOT_USED bit for program_status[i]
824 where `i' is the program that's being (potentially) overwritten.
825 */
826
827 for (i = 0; i < WF_NUM_LAYERS; i++) {
828 if (header->hdr.pr.layer[i].mute) {
829 dev->patch_status[header->hdr.pr.layer[i].patch_number] |=
830 WF_SLOT_USED;
831
832 /* XXX need to mark SLOT_USED for sample used by
833 patch_number, but this means we have to load it. Ick.
834 */
835 }
836 }
837
838 buf[0] = header->number;
839 munge_buf ((unsigned char *)&header->hdr.pr, &buf[1], WF_PROGRAM_BYTES);
840
841 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_PROGRAM, NULL, buf)) {
8b4ac542 842 dev_err(dev->card->dev, "download patch failed\n");
9a303dc7 843 return -EIO;
1da177e4
LT		 844 }
845
846 return (0);
847}
848
849static int
850wavefront_freemem (snd_wavefront_t *dev)
851
852{
853 char rbuf[8];
854
855 if (snd_wavefront_cmd (dev, WFC_REPORT_FREE_MEMORY, rbuf, NULL)) {
8b4ac542 856 dev_err(dev->card->dev, "can't get memory stats.\n");
1da177e4
LT		 857 return -1;
858 } else {
859 return demunge_int32 (rbuf, 4);
860 }
861}
862
863static int
864wavefront_send_sample (snd_wavefront_t *dev,
865 wavefront_patch_info *header,
866 u16 __user *dataptr,
867 int data_is_unsigned)
868
869{
870 /* samples are downloaded via a 16-bit wide i/o port
871 (you could think of it as 2 adjacent 8-bit wide ports
872 but its less efficient that way). therefore, all
873 the blocksizes and so forth listed in the documentation,
874 and used conventionally to refer to sample sizes,
875 which are given in 8-bit units (bytes), need to be
876 divided by 2.
877 */
878
fe25ad8a 879 u16 sample_short = 0;
1da177e4
LT		 880 u32 length;
881 u16 __user *data_end = NULL;
882 unsigned int i;
883 const unsigned int max_blksize = 4096/2;
884 unsigned int written;
885 unsigned int blocksize;
886 int dma_ack;
887 int blocknum;
888 unsigned char sample_hdr[WF_SAMPLE_HDR_BYTES];
889 unsigned char *shptr;
890 int skip = 0;
891 int initial_skip = 0;
892
893 DPRINT (WF_DEBUG_LOAD_PATCH, "sample %sdownload for slot %d, "
894 "type %d, %d bytes from 0x%lx\n",
895 header->size ? "" : "header ",
896 header->number, header->subkey,
897 header->size,
898 (unsigned long) header->dataptr);
899
900 if (header->number == WAVEFRONT_FIND_FREE_SAMPLE_SLOT) {
901 int x;
902
520226e9
TI		 903 x = wavefront_find_free_sample(dev);
904 if (x < 0)
1da177e4 905 return -ENOMEM;
8b4ac542 906 dev_info(dev->card->dev, "unspecified sample => %d\n", x);
1da177e4
LT		 907 header->number = x;
908 }
909
84d7a447
DC		 910 if (header->number >= WF_MAX_SAMPLE)
911 return -EINVAL;
912
1da177e4
LT		 913 if (header->size) {
914
915 /* XXX it's a debatable point whether or not RDONLY semantics
916 on the ROM samples should cover just the sample data or
917 the sample header. For now, it only covers the sample data,
918 so anyone is free at all times to rewrite sample headers.
919
920 My reason for this is that we have the sample headers
921 available in the WFB file for General MIDI, and so these
922 can always be reset if needed. The sample data, however,
923 cannot be recovered without a complete reset and firmware
924 reload of the ICS2115, which is a very expensive operation.
925
926 So, doing things this way allows us to honor the notion of
927 "RESETSAMPLES" reasonably cheaply. Note however, that this
928 is done purely at user level: there is no WFB parser in
929 this driver, and so a complete reset (back to General MIDI,
930 or theoretically some other configuration) is the
931 responsibility of the user level library.
932
933 To try to do this in the kernel would be a little
934 crazy: we'd need 158K of kernel space just to hold
935 a copy of the patch/program/sample header data.
936 */
937
938 if (dev->rom_samples_rdonly) {
939 if (dev->sample_status[header->number] & WF_SLOT_ROM) {
8b4ac542
TI		 940 dev_err(dev->card->dev,
941 "sample slot %d write protected\n",
942 header->number);
1da177e4
LT		 943 return -EACCES;
944 }
945 }
946
947 wavefront_delete_sample (dev, header->number);
948 }
949
950 if (header->size) {
951 dev->freemem = wavefront_freemem (dev);
952
953 if (dev->freemem < (int)header->size) {
8b4ac542
TI		 954 dev_err(dev->card->dev,
955 "insufficient memory to load %d byte sample.\n",
956 header->size);
1da177e4
LT		 957 return -ENOMEM;
958 }
959
960 }
961
962 skip = WF_GET_CHANNEL(&header->hdr.s);
963
964 if (skip > 0 && header->hdr.s.SampleResolution != LINEAR_16BIT) {
8b4ac542
TI		 965 dev_err(dev->card->dev,
966 "channel selection only possible on 16-bit samples");
9a303dc7 967 return -EINVAL;
1da177e4
LT		 968 }
969
970 switch (skip) {
971 case 0:
972 initial_skip = 0;
973 skip = 1;
974 break;
975 case 1:
976 initial_skip = 0;
977 skip = 2;
978 break;
979 case 2:
980 initial_skip = 1;
981 skip = 2;
982 break;
983 case 3:
984 initial_skip = 2;
985 skip = 3;
986 break;
987 case 4:
988 initial_skip = 3;
989 skip = 4;
990 break;
991 case 5:
992 initial_skip = 4;
993 skip = 5;
994 break;
995 case 6:
996 initial_skip = 5;
997 skip = 6;
998 break;
999 }
1000
1001 DPRINT (WF_DEBUG_LOAD_PATCH, "channel selection: %d => "
1002 "initial skip = %d, skip = %d\n",
1003 WF_GET_CHANNEL (&header->hdr.s),
1004 initial_skip, skip);
1005
1006 /* Be safe, and zero the "Unused" bits ... */
1007
1008 WF_SET_CHANNEL(&header->hdr.s, 0);
1009
1010 /* adjust size for 16 bit samples by dividing by two. We always
1011 send 16 bits per write, even for 8 bit samples, so the length
1012 is always half the size of the sample data in bytes.
1013 */
1014
1015 length = header->size / 2;
1016
1017 /* the data we're sent has not been munged, and in fact, the
1018 header we have to send isn't just a munged copy either.
1019 so, build the sample header right here.
1020 */
1021
1022 shptr = &sample_hdr[0];
1023
1024 shptr = munge_int32 (header->number, shptr, 2);
1025
1026 if (header->size) {
1027 shptr = munge_int32 (length, shptr, 4);
1028 }
1029
1030 /* Yes, a 4 byte result doesn't contain all of the offset bits,
1031 but the offset only uses 24 bits.
1032 */
1033
1034 shptr = munge_int32 (*((u32 *) &header->hdr.s.sampleStartOffset),
1035 shptr, 4);
1036 shptr = munge_int32 (*((u32 *) &header->hdr.s.loopStartOffset),
1037 shptr, 4);
1038 shptr = munge_int32 (*((u32 *) &header->hdr.s.loopEndOffset),
1039 shptr, 4);
1040 shptr = munge_int32 (*((u32 *) &header->hdr.s.sampleEndOffset),
1041 shptr, 4);
1042
1043 /* This one is truly weird. What kind of weirdo decided that in
1044 a system dominated by 16 and 32 bit integers, they would use
1045 a just 12 bits ?
1046 */
1047
1048 shptr = munge_int32 (header->hdr.s.FrequencyBias, shptr, 3);
1049
1050 /* Why is this nybblified, when the MSB is *always* zero ?
1051 Anyway, we can't take address of bitfield, so make a
1052 good-faith guess at where it starts.
1053 */
1054
1055 shptr = munge_int32 (*(&header->hdr.s.FrequencyBias+1),
1056 shptr, 2);
1057
1058 if (snd_wavefront_cmd (dev,
1059 header->size ?
1060 WFC_DOWNLOAD_SAMPLE : WFC_DOWNLOAD_SAMPLE_HEADER,
1061 NULL, sample_hdr)) {
8b4ac542
TI		 1062 dev_err(dev->card->dev, "sample %sdownload refused.\n",
1063 header->size ? "" : "header ");
9a303dc7 1064 return -EIO;
1da177e4
LT		 1065 }
1066
1067 if (header->size == 0) {
1068 goto sent; /* Sorry. Just had to have one somewhere */
1069 }
1070
1071 data_end = dataptr + length;
1072
1073 /* Do any initial skip over an unused channel's data */
1074
1075 dataptr += initial_skip;
1076
1077 for (written = 0, blocknum = 0;
1078 written < length; written += max_blksize, blocknum++) {
1079
1080 if ((length - written) > max_blksize) {
1081 blocksize = max_blksize;
1082 } else {
1083 /* round to nearest 16-byte value */
7ab39926 1084 blocksize = ALIGN(length - written, 8);
1da177e4
LT		 1085 }
1086
1087 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_BLOCK, NULL, NULL)) {
8b4ac542
TI		 1088 dev_err(dev->card->dev,
1089 "download block request refused.\n");
9a303dc7 1090 return -EIO;
1da177e4
LT		 1091 }
1092
1093 for (i = 0; i < blocksize; i++) {
1094
1095 if (dataptr < data_end) {
1096
a34ae6c0
TI		 1097 if (get_user(sample_short, dataptr))
1098 return -EFAULT;
1da177e4
LT		 1099 dataptr += skip;
1100
1101 if (data_is_unsigned) { /* GUS ? */
1102
1103 if (WF_SAMPLE_IS_8BIT(&header->hdr.s)) {
1104
1105 /* 8 bit sample
1106 resolution, sign
1107 extend both bytes.
1108 */
1109
1110 ((unsigned char*)
1111 &sample_short)[0] += 0x7f;
1112 ((unsigned char*)
1113 &sample_short)[1] += 0x7f;
1114
1115 } else {
1116
1117 /* 16 bit sample
1118 resolution, sign
1119 extend the MSB.
1120 */
1121
1122 sample_short += 0x7fff;
1123 }
1124 }
1125
1126 } else {
1127
1128 /* In padding section of final block:
1129
1130 Don't fetch unsupplied data from
1131 user space, just continue with
1132 whatever the final value was.
1133 */
1134 }
1135
1136 if (i < blocksize - 1) {
1137 outw (sample_short, dev->block_port);
1138 } else {
1139 outw (sample_short, dev->last_block_port);
1140 }
1141 }
1142
1143 /* Get "DMA page acknowledge", even though its really
1144 nothing to do with DMA at all.
1145 */
1146
520226e9
TI		 1147 dma_ack = wavefront_read(dev);
1148 if (dma_ack != WF_DMA_ACK) {
1da177e4 1149 if (dma_ack == -1) {
8b4ac542
TI		 1150 dev_err(dev->card->dev,
1151 "upload sample DMA ack timeout\n");
9a303dc7 1152 return -EIO;
1da177e4 1153 } else {
8b4ac542
TI		 1154 dev_err(dev->card->dev,
1155 "upload sample DMA ack error 0x%x\n",
1156 dma_ack);
9a303dc7 1157 return -EIO;
1da177e4
LT		 1158 }
1159 }
1160 }
1161
1162 dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_SAMPLE);
1163
1164 /* Note, label is here because sending the sample header shouldn't
1165 alter the sample_status info at all.
1166 */
1167
1168 sent:
1169 return (0);
1170}
1171
1172static int
1173wavefront_send_alias (snd_wavefront_t *dev, wavefront_patch_info *header)
1174
1175{
1176 unsigned char alias_hdr[WF_ALIAS_BYTES];
1177
1178 DPRINT (WF_DEBUG_LOAD_PATCH, "download alias, %d is "
1179 "alias for %d\n",
1180 header->number,
1181 header->hdr.a.OriginalSample);
7f0d5053
DC		 1182
1183 if (header->number >= WF_MAX_SAMPLE)
1184 return -EINVAL;
1185
1da177e4
LT		 1186 munge_int32 (header->number, &alias_hdr[0], 2);
1187 munge_int32 (header->hdr.a.OriginalSample, &alias_hdr[2], 2);
1188 munge_int32 (*((unsigned int *)&header->hdr.a.sampleStartOffset),
1189 &alias_hdr[4], 4);
1190 munge_int32 (*((unsigned int *)&header->hdr.a.loopStartOffset),
1191 &alias_hdr[8], 4);
1192 munge_int32 (*((unsigned int *)&header->hdr.a.loopEndOffset),
1193 &alias_hdr[12], 4);
1194 munge_int32 (*((unsigned int *)&header->hdr.a.sampleEndOffset),
1195 &alias_hdr[16], 4);
1196 munge_int32 (header->hdr.a.FrequencyBias, &alias_hdr[20], 3);
1197 munge_int32 (*(&header->hdr.a.FrequencyBias+1), &alias_hdr[23], 2);
1198
1199 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_SAMPLE_ALIAS, NULL, alias_hdr)) {
8b4ac542 1200 dev_err(dev->card->dev, "download alias failed.\n");
9a303dc7 1201 return -EIO;
1da177e4
LT		 1202 }
1203
1204 dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_ALIAS);
1205
1206 return (0);
1207}
1208
1209static int
1210wavefront_send_multisample (snd_wavefront_t *dev, wavefront_patch_info *header)
1211{
1212 int i;
1213 int num_samples;
1214 unsigned char *msample_hdr;
1215
7f0d5053
DC		 1216 if (header->number >= WF_MAX_SAMPLE)
1217 return -EINVAL;
1218
8ede6651 1219 msample_hdr = kmalloc(WF_MSAMPLE_BYTES, GFP_KERNEL);
1da177e4
LT		 1220 if (! msample_hdr)
1221 return -ENOMEM;
1222
1223 munge_int32 (header->number, &msample_hdr[0], 2);
1224
1225 /* You'll recall at this point that the "number of samples" value
1226 in a wavefront_multisample struct is actually the log2 of the
1227 real number of samples.
1228 */
1229
1230 num_samples = (1<<(header->hdr.ms.NumberOfSamples&7));
1231 msample_hdr[2] = (unsigned char) header->hdr.ms.NumberOfSamples;
1232
1233 DPRINT (WF_DEBUG_LOAD_PATCH, "multi %d with %d=%d samples\n",
1234 header->number,
1235 header->hdr.ms.NumberOfSamples,
1236 num_samples);
1237
1238 for (i = 0; i < num_samples; i++) {
1239 DPRINT(WF_DEBUG_LOAD_PATCH|WF_DEBUG_DATA, "sample[%d] = %d\n",
1240 i, header->hdr.ms.SampleNumber[i]);
1241 munge_int32 (header->hdr.ms.SampleNumber[i],
1242 &msample_hdr[3+(i*2)], 2);
1243 }
1244
1245 /* Need a hack here to pass in the number of bytes
1246 to be written to the synth. This is ugly, and perhaps
1247 one day, I'll fix it.
1248 */
1249
1250 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_MULTISAMPLE,
1251 (unsigned char *) (long) ((num_samples*2)+3),
1252 msample_hdr)) {
8b4ac542 1253 dev_err(dev->card->dev, "download of multisample failed.\n");
1da177e4 1254 kfree(msample_hdr);
9a303dc7 1255 return -EIO;
1da177e4
LT		 1256 }
1257
1258 dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_MULTISAMPLE);
1259
1260 kfree(msample_hdr);
1261 return (0);
1262}
1263
1264static int
1265wavefront_fetch_multisample (snd_wavefront_t *dev,
1266 wavefront_patch_info *header)
1267{
1268 int i;
1269 unsigned char log_ns[1];
1270 unsigned char number[2];
1271 int num_samples;
1272
1273 munge_int32 (header->number, number, 2);
1274
1275 if (snd_wavefront_cmd (dev, WFC_UPLOAD_MULTISAMPLE, log_ns, number)) {
8b4ac542 1276 dev_err(dev->card->dev, "upload multisample failed.\n");
9a303dc7 1277 return -EIO;
1da177e4
LT		 1278 }
1279
1280 DPRINT (WF_DEBUG_DATA, "msample %d has %d samples\n",
1281 header->number, log_ns[0]);
1282
1283 header->hdr.ms.NumberOfSamples = log_ns[0];
1284
1285 /* get the number of samples ... */
1286
1287 num_samples = (1 << log_ns[0]);
1288
1289 for (i = 0; i < num_samples; i++) {
1290 char d[2];
1291 int val;
1292
520226e9
TI		 1293 val = wavefront_read(dev);
1294 if (val == -1) {
8b4ac542
TI		 1295 dev_err(dev->card->dev,
1296 "upload multisample failed during sample loop.\n");
9a303dc7 1297 return -EIO;
1da177e4
LT		 1298 }
1299 d[0] = val;
1300
520226e9
TI		 1301 val = wavefront_read(dev);
1302 if (val == -1) {
8b4ac542
TI		 1303 dev_err(dev->card->dev,
1304 "upload multisample failed during sample loop.\n");
9a303dc7 1305 return -EIO;
1da177e4
LT		 1306 }
1307 d[1] = val;
1308
1309 header->hdr.ms.SampleNumber[i] =
1310 demunge_int32 ((unsigned char *) d, 2);
1311
1312 DPRINT (WF_DEBUG_DATA, "msample sample[%d] = %d\n",
1313 i, header->hdr.ms.SampleNumber[i]);
1314 }
1315
1316 return (0);
1317}
1318
1319
1320static int
1321wavefront_send_drum (snd_wavefront_t *dev, wavefront_patch_info *header)
1322
1323{
1324 unsigned char drumbuf[WF_DRUM_BYTES];
1325 wavefront_drum *drum = &header->hdr.d;
1326 int i;
1327
1328 DPRINT (WF_DEBUG_LOAD_PATCH, "downloading edrum for MIDI "
1329 "note %d, patch = %d\n",
1330 header->number, drum->PatchNumber);
1331
1332 drumbuf[0] = header->number & 0x7f;
1333
1334 for (i = 0; i < 4; i++) {
1335 munge_int32 (((unsigned char *)drum)[i], &drumbuf[1+(i*2)], 2);
1336 }
1337
1338 if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_EDRUM_PROGRAM, NULL, drumbuf)) {
8b4ac542 1339 dev_err(dev->card->dev, "download drum failed.\n");
9a303dc7 1340 return -EIO;
1da177e4
LT		 1341 }
1342
1343 return (0);
1344}
1345
1346static int
1347wavefront_find_free_sample (snd_wavefront_t *dev)
1348
1349{
1350 int i;
1351
1352 for (i = 0; i < WF_MAX_SAMPLE; i++) {
1353 if (!(dev->sample_status[i] & WF_SLOT_FILLED)) {
1354 return i;
1355 }
1356 }
8b4ac542 1357 dev_err(dev->card->dev, "no free sample slots!\n");
1da177e4
LT		 1358 return -1;
1359}
1360
1361#if 0
1362static int
1363wavefront_find_free_patch (snd_wavefront_t *dev)
1364
1365{
1366 int i;
1367
1368 for (i = 0; i < WF_MAX_PATCH; i++) {
1369 if (!(dev->patch_status[i] & WF_SLOT_FILLED)) {
1370 return i;
1371 }
1372 }
8b4ac542 1373 dev_err(dev->card->dev, "no free patch slots!\n");
1da177e4
LT		 1374 return -1;
1375}
1376#endif
1377
1378static int
1379wavefront_load_patch (snd_wavefront_t *dev, const char __user *addr)
1380{
1381 wavefront_patch_info *header;
1382 int err;
1383
1384 header = kmalloc(sizeof(*header), GFP_KERNEL);
1385 if (! header)
1386 return -ENOMEM;
1387
1388 if (copy_from_user (header, addr, sizeof(wavefront_patch_info) -
1389 sizeof(wavefront_any))) {
8b4ac542 1390 dev_err(dev->card->dev, "bad address for load patch.\n");
1da177e4
LT		 1391 err = -EFAULT;
1392 goto __error;
1393 }
1394
1395 DPRINT (WF_DEBUG_LOAD_PATCH, "download "
1396 "Sample type: %d "
1397 "Sample number: %d "
1398 "Sample size: %d\n",
1399 header->subkey,
1400 header->number,
1401 header->size);
1402
1403 switch (header->subkey) {
1404 case WF_ST_SAMPLE: /* sample or sample_header, based on patch->size */
1405
1406 if (copy_from_user (&header->hdr.s, header->hdrptr,
1407 sizeof (wavefront_sample))) {
1408 err = -EFAULT;
1409 break;
1410 }
1411
1412 err = wavefront_send_sample (dev, header, header->dataptr, 0);
1413 break;
1414
1415 case WF_ST_MULTISAMPLE:
1416
1417 if (copy_from_user (&header->hdr.s, header->hdrptr,
1418 sizeof (wavefront_multisample))) {
1419 err = -EFAULT;
1420 break;
1421 }
1422
1423 err = wavefront_send_multisample (dev, header);
1424 break;
1425
1426 case WF_ST_ALIAS:
1427
1428 if (copy_from_user (&header->hdr.a, header->hdrptr,
1429 sizeof (wavefront_alias))) {
1430 err = -EFAULT;
1431 break;
1432 }
1433
1434 err = wavefront_send_alias (dev, header);
1435 break;
1436
1437 case WF_ST_DRUM:
1438 if (copy_from_user (&header->hdr.d, header->hdrptr,
1439 sizeof (wavefront_drum))) {
1440 err = -EFAULT;
1441 break;
1442 }
1443
1444 err = wavefront_send_drum (dev, header);
1445 break;
1446
1447 case WF_ST_PATCH:
1448 if (copy_from_user (&header->hdr.p, header->hdrptr,
1449 sizeof (wavefront_patch))) {
1450 err = -EFAULT;
1451 break;
1452 }
1453
1454 err = wavefront_send_patch (dev, header);
1455 break;
1456
1457 case WF_ST_PROGRAM:
1458 if (copy_from_user (&header->hdr.pr, header->hdrptr,
1459 sizeof (wavefront_program))) {
1460 err = -EFAULT;
1461 break;
1462 }
1463
1464 err = wavefront_send_program (dev, header);
1465 break;
1466
1467 default:
8b4ac542
TI		 1468 dev_err(dev->card->dev, "unknown patch type %d.\n",
1469 header->subkey);
1da177e4
LT		 1470 err = -EINVAL;
1471 break;
1472 }
1473
1474 __error:
1475 kfree(header);
1476 return err;
1477}
1478\f
1479/***********************************************************************
1480WaveFront: hardware-dependent interface
1481***********************************************************************/
1482
1483static void
1484process_sample_hdr (u8 *buf)
1485
1486{
1487 wavefront_sample s;
1488 u8 *ptr;
1489
1490 ptr = buf;
1491
1492 /* The board doesn't send us an exact copy of a "wavefront_sample"
1493 in response to an Upload Sample Header command. Instead, we
1494 have to convert the data format back into our data structure,
1495 just as in the Download Sample command, where we have to do
1496 something very similar in the reverse direction.
1497 */
1498
1499 *((u32 *) &s.sampleStartOffset) = demunge_int32 (ptr, 4); ptr += 4;
1500 *((u32 *) &s.loopStartOffset) = demunge_int32 (ptr, 4); ptr += 4;
1501 *((u32 *) &s.loopEndOffset) = demunge_int32 (ptr, 4); ptr += 4;
1502 *((u32 *) &s.sampleEndOffset) = demunge_int32 (ptr, 4); ptr += 4;
1503 *((u32 *) &s.FrequencyBias) = demunge_int32 (ptr, 3); ptr += 3;
1504
1505 s.SampleResolution = *ptr & 0x3;
1506 s.Loop = *ptr & 0x8;
1507 s.Bidirectional = *ptr & 0x10;
1508 s.Reverse = *ptr & 0x40;
1509
1510 /* Now copy it back to where it came from */
1511
1512 memcpy (buf, (unsigned char *) &s, sizeof (wavefront_sample));
1513}
1514
1515static int
1516wavefront_synth_control (snd_wavefront_card_t *acard,
1517 wavefront_control *wc)
1518
1519{
1520 snd_wavefront_t *dev = &acard->wavefront;
1521 unsigned char patchnumbuf[2];
1522 int i;
1523
1524 DPRINT (WF_DEBUG_CMD, "synth control with "
1525 "cmd 0x%x\n", wc->cmd);
1526
1527 /* Pre-handling of or for various commands */
1528
1529 switch (wc->cmd) {
1530
1531 case WFC_DISABLE_INTERRUPTS:
8b4ac542 1532 dev_dbg(dev->card->dev, "interrupts disabled.\n");
1da177e4
LT		 1533 outb (0x80|0x20, dev->control_port);
1534 dev->interrupts_are_midi = 1;
1535 return 0;
1536
1537 case WFC_ENABLE_INTERRUPTS:
8b4ac542 1538 dev_dbg(dev->card->dev, "interrupts enabled.\n");
1da177e4
LT		 1539 outb (0x80|0x40|0x20, dev->control_port);
1540 dev->interrupts_are_midi = 1;
1541 return 0;
1542
1543 case WFC_INTERRUPT_STATUS:
1544 wc->rbuf[0] = dev->interrupts_are_midi;
1545 return 0;
1546
1547 case WFC_ROMSAMPLES_RDONLY:
1548 dev->rom_samples_rdonly = wc->wbuf[0];
1549 wc->status = 0;
1550 return 0;
1551
1552 case WFC_IDENTIFY_SLOT_TYPE:
1553 i = wc->wbuf[0] | (wc->wbuf[1] << 7);
1554 if (i <0 || i >= WF_MAX_SAMPLE) {
8b4ac542 1555 dev_err(dev->card->dev, "invalid slot ID %d\n",
1da177e4
LT		 1556 i);
1557 wc->status = EINVAL;
1558 return -EINVAL;
1559 }
1560 wc->rbuf[0] = dev->sample_status[i];
1561 wc->status = 0;
1562 return 0;
1563
1564 case WFC_DEBUG_DRIVER:
1565 dev->debug = wc->wbuf[0];
8b4ac542 1566 dev_dbg(dev->card->dev, "debug = 0x%x\n", dev->debug);
1da177e4
LT		 1567 return 0;
1568
1569 case WFC_UPLOAD_PATCH:
1570 munge_int32 (*((u32 *) wc->wbuf), patchnumbuf, 2);
1571 memcpy (wc->wbuf, patchnumbuf, 2);
1572 break;
1573
1574 case WFC_UPLOAD_MULTISAMPLE:
1575 /* multisamples have to be handled differently, and
1576 cannot be dealt with properly by snd_wavefront_cmd() alone.
1577 */
1578 wc->status = wavefront_fetch_multisample
1579 (dev, (wavefront_patch_info *) wc->rbuf);
1580 return 0;
1581
1582 case WFC_UPLOAD_SAMPLE_ALIAS:
8b4ac542
TI		 1583 dev_err(dev->card->dev,
1584 "support for sample alias upload being considered.\n");
1da177e4
LT		 1585 wc->status = EINVAL;
1586 return -EINVAL;
1587 }
1588
1589 wc->status = snd_wavefront_cmd (dev, wc->cmd, wc->rbuf, wc->wbuf);
1590
1591 /* Post-handling of certain commands.
1592
1593 In particular, if the command was an upload, demunge the data
1594 so that the user-level doesn't have to think about it.
1595 */
1596
1597 if (wc->status == 0) {
1598 switch (wc->cmd) {
1599 /* intercept any freemem requests so that we know
1600 we are always current with the user-level view
1601 of things.
1602 */
1603
1604 case WFC_REPORT_FREE_MEMORY:
1605 dev->freemem = demunge_int32 (wc->rbuf, 4);
1606 break;
1607
1608 case WFC_UPLOAD_PATCH:
1609 demunge_buf (wc->rbuf, wc->rbuf, WF_PATCH_BYTES);
1610 break;
1611
1612 case WFC_UPLOAD_PROGRAM:
1613 demunge_buf (wc->rbuf, wc->rbuf, WF_PROGRAM_BYTES);
1614 break;
1615
1616 case WFC_UPLOAD_EDRUM_PROGRAM:
1617 demunge_buf (wc->rbuf, wc->rbuf, WF_DRUM_BYTES - 1);
1618 break;
1619
1620 case WFC_UPLOAD_SAMPLE_HEADER:
1621 process_sample_hdr (wc->rbuf);
1622 break;
1623
1624 case WFC_UPLOAD_SAMPLE_ALIAS:
8b4ac542
TI		 1625 dev_err(dev->card->dev,
1626 "support for sample aliases still being considered.\n");
1da177e4
LT		 1627 break;
1628
1629 case WFC_VMIDI_OFF:
1630 snd_wavefront_midi_disable_virtual (acard);
1631 break;
1632
1633 case WFC_VMIDI_ON:
1634 snd_wavefront_midi_enable_virtual (acard);
1635 break;
1636 }
1637 }
1638
1639 return 0;
1640}
1641
1642int
542172f3 1643snd_wavefront_synth_open (struct snd_hwdep *hw, struct file *file)
1da177e4
LT		 1644
1645{
1646 if (!try_module_get(hw->card->module))
1647 return -EFAULT;
1648 file->private_data = hw;
1649 return 0;
1650}
1651
1652int
542172f3 1653snd_wavefront_synth_release (struct snd_hwdep *hw, struct file *file)
1da177e4
LT		 1654
1655{
1656 module_put(hw->card->module);
1657 return 0;
1658}
1659
1660int
542172f3 1661snd_wavefront_synth_ioctl (struct snd_hwdep *hw, struct file *file,
1da177e4
LT		 1662 unsigned int cmd, unsigned long arg)
1663
1664{
542172f3 1665 struct snd_card *card;
1da177e4
LT		 1666 snd_wavefront_t *dev;
1667 snd_wavefront_card_t *acard;
1668 wavefront_control *wc;
1669 void __user *argp = (void __user *)arg;
1670 int err;
1671
542172f3 1672 card = (struct snd_card *) hw->card;
1da177e4 1673
622207dc
TI		 1674 if (snd_BUG_ON(!card))
1675 return -ENODEV;
1676 if (snd_BUG_ON(!card->private_data))
1677 return -ENODEV;
1da177e4
LT		 1678
1679 acard = card->private_data;
1680 dev = &acard->wavefront;
1681
1682 switch (cmd) {
1683 case WFCTL_LOAD_SPP:
1684 if (wavefront_load_patch (dev, argp) != 0) {
1685 return -EIO;
1686 }
1687 break;
1688
1689 case WFCTL_WFCMD:
68425adc
LZ		 1690 wc = memdup_user(argp, sizeof(*wc));
1691 if (IS_ERR(wc))
1692 return PTR_ERR(wc);
1693
1694 if (wavefront_synth_control (acard, wc) < 0)
1da177e4
LT		 1695 err = -EIO;
1696 else if (copy_to_user (argp, wc, sizeof (*wc)))
1697 err = -EFAULT;
1698 else
1699 err = 0;
1700 kfree(wc);
1701 return err;
1702
1703 default:
1704 return -EINVAL;
1705 }
1706
1707 return 0;
1708}
1709
1710\f
1711/***********************************************************************/
1712/* WaveFront: interface for card-level wavefront module */
1713/***********************************************************************/
1714
1715void
1716snd_wavefront_internal_interrupt (snd_wavefront_card_t *card)
1717{
1718 snd_wavefront_t *dev = &card->wavefront;
1719
1720 /*
1721 Some comments on interrupts. I attempted a version of this
1722 driver that used interrupts throughout the code instead of
1723 doing busy and/or sleep-waiting. Alas, it appears that once
1724 the Motorola firmware is downloaded, the card *never*
1725 generates an RX interrupt. These are successfully generated
1726 during firmware loading, and after that wavefront_status()
1727 reports that an interrupt is pending on the card from time
1728 to time, but it never seems to be delivered to this
1729 driver. Note also that wavefront_status() continues to
1730 report that RX interrupts are enabled, suggesting that I
1731 didn't goof up and disable them by mistake.
1732
1733 Thus, I stepped back to a prior version of
1734 wavefront_wait(), the only place where this really
1735 matters. Its sad, but I've looked through the code to check
1736 on things, and I really feel certain that the Motorola
1737 firmware prevents RX-ready interrupts.
1738 */
1739
1740 if ((wavefront_status(dev) & (STAT_INTR_READ|STAT_INTR_WRITE)) == 0) {
1741 return;
1742 }
1743
1744 spin_lock(&dev->irq_lock);
1745 dev->irq_ok = 1;
1746 dev->irq_cnt++;
1747 spin_unlock(&dev->irq_lock);
1748 wake_up(&dev->interrupt_sleeper);
1749}
1750
1751/* STATUS REGISTER
1752
17530 Host Rx Interrupt Enable (1=Enabled)
17541 Host Rx Register Full (1=Full)
17552 Host Rx Interrupt Pending (1=Interrupt)
17563 Unused
17574 Host Tx Interrupt (1=Enabled)
17585 Host Tx Register empty (1=Empty)
17596 Host Tx Interrupt Pending (1=Interrupt)
17607 Unused
1761*/
1762
1bff292e 1763static int
8b4ac542 1764snd_wavefront_interrupt_bits(snd_wavefront_t *dev, int irq)
1da177e4
LT		 1765
1766{
1767 int bits;
1768
1769 switch (irq) {
1770 case 9:
1771 bits = 0x00;
1772 break;
1773 case 5:
1774 bits = 0x08;
1775 break;
1776 case 12:
1777 bits = 0x10;
1778 break;
1779 case 15:
1780 bits = 0x18;
1781 break;
1782
1783 default:
8b4ac542 1784 dev_err(dev->card->dev, "invalid IRQ %d\n", irq);
1da177e4
LT		 1785 bits = -1;
1786 }
1787
1788 return bits;
1789}
1790
1bff292e 1791static void
1da177e4 1792wavefront_should_cause_interrupt (snd_wavefront_t *dev,
d86d0193 1793 int val, int port, unsigned long timeout)
1da177e4
LT		 1794
1795{
ac6424b9 1796 wait_queue_entry_t wait;
1da177e4
LT		 1797
1798 init_waitqueue_entry(&wait, current);
1799 spin_lock_irq(&dev->irq_lock);
1800 add_wait_queue(&dev->interrupt_sleeper, &wait);
1801 dev->irq_ok = 0;
1802 outb (val,port);
1803 spin_unlock_irq(&dev->irq_lock);
d86d0193
RH		 1804 while (!dev->irq_ok && time_before(jiffies, timeout)) {
1805 schedule_timeout_uninterruptible(1);
1806 barrier();
1da177e4
LT		 1807 }
1808}
1809
1bff292e 1810static int
1da177e4
LT		 1811wavefront_reset_to_cleanliness (snd_wavefront_t *dev)
1812
1813{
1814 int bits;
1815 int hwv[2];
1816
1817 /* IRQ already checked */
1818
8b4ac542 1819 bits = snd_wavefront_interrupt_bits(dev, dev->irq);
1da177e4
LT		 1820
1821 /* try reset of port */
1822
1823 outb (0x0, dev->control_port);
1824
1825 /* At this point, the board is in reset, and the H/W initialization
1826 register is accessed at the same address as the data port.
1827
1828 Bit 7 - Enable IRQ Driver
1829 0 - Tri-state the Wave-Board drivers for the PC Bus IRQs
1830 1 - Enable IRQ selected by bits 5:3 to be driven onto the PC Bus.
1831
1832 Bit 6 - MIDI Interface Select
1833
1834 0 - Use the MIDI Input from the 26-pin WaveBlaster
1835 compatible header as the serial MIDI source
1836 1 - Use the MIDI Input from the 9-pin D connector as the
1837 serial MIDI source.
1838
1839 Bits 5:3 - IRQ Selection
1840 0 0 0 - IRQ 2/9
1841 0 0 1 - IRQ 5
1842 0 1 0 - IRQ 12
1843 0 1 1 - IRQ 15
1844 1 0 0 - Reserved
1845 1 0 1 - Reserved
1846 1 1 0 - Reserved
1847 1 1 1 - Reserved
1848
1849 Bits 2:1 - Reserved
1850 Bit 0 - Disable Boot ROM
1851 0 - memory accesses to 03FC30-03FFFFH utilize the internal Boot ROM
1852 1 - memory accesses to 03FC30-03FFFFH are directed to external
1853 storage.
1854
1855 */
1856
1857 /* configure hardware: IRQ, enable interrupts,
1858 plus external 9-pin MIDI interface selected
1859 */
1860
1861 outb (0x80 | 0x40 | bits, dev->data_port);
1862
1863 /* CONTROL REGISTER
1864
1865 0 Host Rx Interrupt Enable (1=Enabled) 0x1
1866 1 Unused 0x2
1867 2 Unused 0x4
1868 3 Unused 0x8
1869 4 Host Tx Interrupt Enable 0x10
1870 5 Mute (0=Mute; 1=Play) 0x20
1871 6 Master Interrupt Enable (1=Enabled) 0x40
1872 7 Master Reset (0=Reset; 1=Run) 0x80
1873
1874 Take us out of reset, mute output, master + TX + RX interrupts on.
1875
1876 We'll get an interrupt presumably to tell us that the TX
1877 register is clear.
1878 */
1879
1880 wavefront_should_cause_interrupt(dev, 0x80|0x40|0x10|0x1,
1881 dev->control_port,
1882 (reset_time*HZ)/100);
1883
1884 /* Note: data port is now the data port, not the h/w initialization
1885 port.
1886 */
1887
1888 if (!dev->irq_ok) {
8b4ac542 1889 dev_err(dev->card->dev, "intr not received after h/w un-reset.\n");
1da177e4
LT		 1890 goto gone_bad;
1891 }
1892
1893 /* Note: data port is now the data port, not the h/w initialization
1894 port.
1895
1896 At this point, only "HW VERSION" or "DOWNLOAD OS" commands
1897 will work. So, issue one of them, and wait for TX
1898 interrupt. This can take a *long* time after a cold boot,
1899 while the ISC ROM does its RAM test. The SDK says up to 4
1900 seconds - with 12MB of RAM on a Tropez+, it takes a lot
1901 longer than that (~16secs). Note that the card understands
1902 the difference between a warm and a cold boot, so
1903 subsequent ISC2115 reboots (say, caused by module
1904 reloading) will get through this much faster.
1905
1906 XXX Interesting question: why is no RX interrupt received first ?
1907 */
1908
1909 wavefront_should_cause_interrupt(dev, WFC_HARDWARE_VERSION,
1910 dev->data_port, ramcheck_time*HZ);
1911
1912 if (!dev->irq_ok) {
8b4ac542 1913 dev_err(dev->card->dev, "post-RAM-check interrupt not received.\n");
1da177e4
LT		 1914 goto gone_bad;
1915 }
1916
1917 if (!wavefront_wait (dev, STAT_CAN_READ)) {
8b4ac542 1918 dev_err(dev->card->dev, "no response to HW version cmd.\n");
1da177e4
LT		 1919 goto gone_bad;
1920 }
1921
520226e9
TI		 1922 hwv[0] = wavefront_read(dev);
1923 if (hwv[0] == -1) {
8b4ac542 1924 dev_err(dev->card->dev, "board not responding correctly.\n");
1da177e4
LT		 1925 goto gone_bad;
1926 }
1927
1928 if (hwv[0] == 0xFF) { /* NAK */
1929
1930 /* Board's RAM test failed. Try to read error code,
1931 and tell us about it either way.
1932 */
1933
520226e9
TI		 1934 hwv[0] = wavefront_read(dev);
1935 if (hwv[0] == -1) {
8b4ac542
TI		 1936 dev_err(dev->card->dev,
1937 "on-board RAM test failed (bad error code).\n");
1da177e4 1938 } else {
8b4ac542
TI		 1939 dev_err(dev->card->dev,
1940 "on-board RAM test failed (error code: 0x%x).\n",
1da177e4
LT		 1941 hwv[0]);
1942 }
1943 goto gone_bad;
1944 }
1945
1946 /* We're OK, just get the next byte of the HW version response */
1947
520226e9
TI		 1948 hwv[1] = wavefront_read(dev);
1949 if (hwv[1] == -1) {
8b4ac542 1950 dev_err(dev->card->dev, "incorrect h/w response.\n");
1da177e4
LT		 1951 goto gone_bad;
1952 }
1953
8b4ac542
TI		 1954 dev_info(dev->card->dev, "hardware version %d.%d\n",
1955 hwv[0], hwv[1]);
1da177e4
LT		 1956
1957 return 0;
1958
1959
1960 gone_bad:
1961 return (1);
1962}
1963
1bff292e 1964static int
1da177e4
LT		 1965wavefront_download_firmware (snd_wavefront_t *dev, char *path)
1966
1967{
af134528 1968 const unsigned char *buf;
c2b1239a 1969 int len, err;
1da177e4 1970 int section_cnt_downloaded = 0;
c2b1239a 1971 const struct firmware *firmware;
1da177e4 1972
c2b1239a
TI		 1973 err = request_firmware(&firmware, path, dev->card->dev);
1974 if (err < 0) {
8b4ac542 1975 dev_err(dev->card->dev, "firmware (%s) download failed!!!\n", path);
1da177e4
LT		 1976 return 1;
1977 }
1978
c2b1239a
TI		 1979 len = 0;
1980 buf = firmware->data;
1981 for (;;) {
1982 int section_length = *(signed char *)buf;
1983 if (section_length == 0)
1da177e4 1984 break;
1da177e4 1985 if (section_length < 0 || section_length > WF_SECTION_MAX) {
8b4ac542
TI		 1986 dev_err(dev->card->dev,
1987 "invalid firmware section length %d\n",
1988 section_length);
1da177e4
LT		 1989 goto failure;
1990 }
c2b1239a
TI		 1991 buf++;
1992 len++;
1da177e4 1993
c2b1239a 1994 if (firmware->size < len + section_length) {
8b4ac542 1995 dev_err(dev->card->dev, "firmware section read error.\n");
1da177e4
LT		 1996 goto failure;
1997 }
1998
1999 /* Send command */
c2b1239a 2000 if (wavefront_write(dev, WFC_DOWNLOAD_OS))
1da177e4 2001 goto failure;
1da177e4 2002
c2b1239a
TI		 2003 for (; section_length; section_length--) {
2004 if (wavefront_write(dev, *buf))
1da177e4 2005 goto failure;
c2b1239a
TI		 2006 buf++;
2007 len++;
1da177e4
LT		 2008 }
2009
2010 /* get ACK */
c2b1239a 2011 if (!wavefront_wait(dev, STAT_CAN_READ)) {
8b4ac542 2012 dev_err(dev->card->dev, "time out for firmware ACK.\n");
c2b1239a
TI		 2013 goto failure;
2014 }
2015 err = inb(dev->data_port);
2016 if (err != WF_ACK) {
8b4ac542
TI		 2017 dev_err(dev->card->dev,
2018 "download of section #%d not acknowledged, ack = 0x%x\n",
2019 section_cnt_downloaded + 1, err);
1da177e4
LT		 2020 goto failure;
2021 }
2022
c2b1239a 2023 section_cnt_downloaded++;
1da177e4
LT		 2024 }
2025
c2b1239a 2026 release_firmware(firmware);
1da177e4
LT		 2027 return 0;
2028
2029 failure:
c2b1239a 2030 release_firmware(firmware);
8b4ac542 2031 dev_err(dev->card->dev, "firmware download failed!!!\n");
1da177e4
LT		 2032 return 1;
2033}
2034
2035
1bff292e 2036static int
1da177e4
LT		 2037wavefront_do_reset (snd_wavefront_t *dev)
2038
2039{
2040 char voices[1];
2041
2042 if (wavefront_reset_to_cleanliness (dev)) {
8b4ac542 2043 dev_err(dev->card->dev, "hw reset failed.\n");
1da177e4
LT		 2044 goto gone_bad;
2045 }
2046
2047 if (dev->israw) {
2048 if (wavefront_download_firmware (dev, ospath)) {
2049 goto gone_bad;
2050 }
2051
2052 dev->israw = 0;
2053
2054 /* Wait for the OS to get running. The protocol for
2055 this is non-obvious, and was determined by
2056 using port-IO tracing in DOSemu and some
2057 experimentation here.
2058
2059 Rather than using timed waits, use interrupts creatively.
2060 */
2061
2062 wavefront_should_cause_interrupt (dev, WFC_NOOP,
2063 dev->data_port,
2064 (osrun_time*HZ));
2065
2066 if (!dev->irq_ok) {
8b4ac542 2067 dev_err(dev->card->dev, "no post-OS interrupt.\n");
1da177e4
LT		 2068 goto gone_bad;
2069 }
2070
2071 /* Now, do it again ! */
2072
2073 wavefront_should_cause_interrupt (dev, WFC_NOOP,
2074 dev->data_port, (10*HZ));
2075
2076 if (!dev->irq_ok) {
8b4ac542 2077 dev_err(dev->card->dev, "no post-OS interrupt(2).\n");
1da177e4
LT		 2078 goto gone_bad;
2079 }
2080
2081 /* OK, no (RX/TX) interrupts any more, but leave mute
2082 in effect.
2083 */
2084
2085 outb (0x80|0x40, dev->control_port);
2086 }
2087
2088 /* SETUPSND.EXE asks for sample memory config here, but since i
2089 have no idea how to interpret the result, we'll forget
2090 about it.
2091 */
2092
520226e9
TI		 2093 dev->freemem = wavefront_freemem(dev);
2094 if (dev->freemem < 0)
1da177e4 2095 goto gone_bad;
1da177e4 2096
8b4ac542 2097 dev_info(dev->card->dev, "available DRAM %dk\n", dev->freemem / 1024);
1da177e4
LT		 2098
2099 if (wavefront_write (dev, 0xf0) ||
2100 wavefront_write (dev, 1) ||
2101 (wavefront_read (dev) < 0)) {
2102 dev->debug = 0;
8b4ac542 2103 dev_err(dev->card->dev, "MPU emulation mode not set.\n");
1da177e4
LT		 2104 goto gone_bad;
2105 }
2106
2107 voices[0] = 32;
2108
2109 if (snd_wavefront_cmd (dev, WFC_SET_NVOICES, NULL, voices)) {
8b4ac542 2110 dev_err(dev->card->dev, "cannot set number of voices to 32.\n");
1da177e4
LT		 2111 goto gone_bad;
2112 }
2113
2114
2115 return 0;
2116
2117 gone_bad:
2118 /* reset that sucker so that it doesn't bother us. */
2119
2120 outb (0x0, dev->control_port);
2121 dev->interrupts_are_midi = 0;
2122 return 1;
2123}
2124
1bff292e 2125int
1da177e4
LT		 2126snd_wavefront_start (snd_wavefront_t *dev)
2127
2128{
2129 int samples_are_from_rom;
2130
2131 /* IMPORTANT: assumes that snd_wavefront_detect() and/or
2132 wavefront_reset_to_cleanliness() has already been called
2133 */
2134
2135 if (dev->israw) {
2136 samples_are_from_rom = 1;
2137 } else {
2138 /* XXX is this always true ? */
2139 samples_are_from_rom = 0;
2140 }
2141
2142 if (dev->israw || fx_raw) {
2143 if (wavefront_do_reset (dev)) {
2144 return -1;
2145 }
2146 }
2147 /* Check for FX device, present only on Tropez+ */
2148
2149 dev->has_fx = (snd_wavefront_fx_detect (dev) == 0);
2150
2151 if (dev->has_fx && fx_raw) {
2152 snd_wavefront_fx_start (dev);
2153 }
2154
2155 wavefront_get_sample_status (dev, samples_are_from_rom);
2156 wavefront_get_program_status (dev);
2157 wavefront_get_patch_status (dev);
2158
2159 /* Start normal operation: unreset, master interrupt enabled, no mute
2160 */
2161
2162 outb (0x80|0x40|0x20, dev->control_port);
2163
2164 return (0);
2165}
2166
1bff292e 2167int
1da177e4
LT		 2168snd_wavefront_detect (snd_wavefront_card_t *card)
2169
2170{
2171 unsigned char rbuf[4], wbuf[4];
2172 snd_wavefront_t *dev = &card->wavefront;
2173
2174 /* returns zero if a WaveFront card is successfully detected.
2175 negative otherwise.
2176 */
2177
2178 dev->israw = 0;
2179 dev->has_fx = 0;
2180 dev->debug = debug_default;
2181 dev->interrupts_are_midi = 0;
2182 dev->irq_cnt = 0;
2183 dev->rom_samples_rdonly = 1;
2184
2185 if (snd_wavefront_cmd (dev, WFC_FIRMWARE_VERSION, rbuf, wbuf) == 0) {
2186
2187 dev->fw_version[0] = rbuf[0];
2188 dev->fw_version[1] = rbuf[1];
2189
8b4ac542
TI		 2190 dev_info(dev->card->dev, "firmware %d.%d already loaded.\n",
2191 rbuf[0], rbuf[1]);
1da177e4
LT		 2192
2193 /* check that a command actually works */
2194
2195 if (snd_wavefront_cmd (dev, WFC_HARDWARE_VERSION,
2196 rbuf, wbuf) == 0) {
2197 dev->hw_version[0] = rbuf[0];
2198 dev->hw_version[1] = rbuf[1];
2199 } else {
8b4ac542
TI		 2200 dev_err(dev->card->dev,
2201 "not raw, but no hardware version!\n");
1da177e4
LT		 2202 return -1;
2203 }
2204
2205 if (!wf_raw) {
2206 return 0;
2207 } else {
8b4ac542
TI		 2208 dev_info(dev->card->dev,
2209 "reloading firmware as you requested.\n");
1da177e4
LT		 2210 dev->israw = 1;
2211 }
2212
2213 } else {
2214
2215 dev->israw = 1;
8b4ac542
TI		 2216 dev_info(dev->card->dev,
2217 "no response to firmware probe, assume raw.\n");
1da177e4
LT		 2218
2219 }
2220
2221 return 0;
2222}
c2b1239a
TI		 2223
2224MODULE_FIRMWARE(DEFAULT_OSPATH);
Linux 6.x block layer and io_uring tree(s)