1 // SPDX-License-Identifier: GPL-2.0-only
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
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 
20 #include <linux/io.h>
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>
26 #include <linux/sched/signal.h>
27 #include <linux/firmware.h>
28 #include <linux/moduleparam.h>
29 #include <linux/slab.h>
30 #include <linux/module.h>
31 #include <sound/core.h>
32 #include <sound/snd_wavefront.h>
33 #include <sound/initval.h>
34 
35 static 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 
41 static 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 
48 static 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 
56 #define DEFAULT_OSPATH	"wavefront.os"
57 static char *ospath = DEFAULT_OSPATH; /* the firmware file name */
58 
59 static 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 
72 static int sleep_interval = 100;   /* HZ/sleep_interval seconds per sleep */
73 static int sleep_tries = 50;       /* number of times we'll try to sleep */
74 
75 static int reset_time = 2;        /* hundreths of a second we wait after a HW
76 				     reset for the expected interrupt.
77 				  */
78 
79 static int ramcheck_time = 20;    /* time in seconds to wait while ROM code
80 				     checks on-board RAM.
81 				  */
82 
83 static int osrun_time = 10;       /* time in seconds we wait for the OS to
84 				     start running.
85 				  */
86 module_param(wf_raw, int, 0444);
87 MODULE_PARM_DESC(wf_raw, "if non-zero, assume that we need to boot the OS");
88 module_param(fx_raw, int, 0444);
89 MODULE_PARM_DESC(fx_raw, "if non-zero, assume that the FX process needs help");
90 module_param(debug_default, int, 0444);
91 MODULE_PARM_DESC(debug_default, "debug parameters for card initialization");
92 module_param(wait_usecs, int, 0444);
93 MODULE_PARM_DESC(wait_usecs, "how long to wait without sleeping, usecs");
94 module_param(sleep_interval, int, 0444);
95 MODULE_PARM_DESC(sleep_interval, "how long to sleep when waiting for reply");
96 module_param(sleep_tries, int, 0444);
97 MODULE_PARM_DESC(sleep_tries, "how many times to try sleeping during a wait");
98 module_param(ospath, charp, 0444);
99 MODULE_PARM_DESC(ospath, "pathname to processed ICS2115 OS firmware");
100 module_param(reset_time, int, 0444);
101 MODULE_PARM_DESC(reset_time, "how long to wait for a reset to take effect");
102 module_param(ramcheck_time, int, 0444);
103 MODULE_PARM_DESC(ramcheck_time, "how many seconds to wait for the RAM test");
104 module_param(osrun_time, int, 0444);
105 MODULE_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 
117 #define DPRINT(cond, ...) \
118        if ((dev->debug & (cond)) == (cond)) { \
119 	     snd_printk (__VA_ARGS__); \
120        }
121 #else
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 
136 static int wavefront_delete_sample (snd_wavefront_t *, int sampnum);
137 static int wavefront_find_free_sample (snd_wavefront_t *);
138 
139 struct wavefront_command {
140 	int cmd;
141 	char *action;
142 	unsigned int read_cnt;
143 	unsigned int write_cnt;
144 	int need_ack;
145 };
146 
147 static 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 
165 static struct wavefront_command wavefront_commands[] = {
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 
229 static const char *
wavefront_errorstr(int errnum)230 wavefront_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 
244 static struct wavefront_command *
wavefront_get_command(int cmd)245 wavefront_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 
256 	return NULL;
257 }
258 
259 static inline int
wavefront_status(snd_wavefront_t * dev)260 wavefront_status (snd_wavefront_t *dev)
261 
262 {
263 	return inb (dev->status_port);
264 }
265 
266 static int
wavefront_sleep(int limit)267 wavefront_sleep (int limit)
268 
269 {
270 	schedule_timeout_interruptible(limit);
271 
272 	return signal_pending(current);
273 }
274 
275 static int
wavefront_wait(snd_wavefront_t * dev,int mask)276 wavefront_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 
306 static int
wavefront_read(snd_wavefront_t * dev)307 wavefront_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 
318 static int
wavefront_write(snd_wavefront_t * dev,unsigned char data)319 wavefront_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 
332 int
snd_wavefront_cmd(snd_wavefront_t * dev,int cmd,unsigned char * rbuf,unsigned char * wbuf)333 snd_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;
340 	struct wavefront_command *wfcmd;
341 
342 	wfcmd = wavefront_get_command(cmd);
343 	if (!wfcmd) {
344 		snd_printk ("command 0x%x not supported.\n",
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 
395 			c = wavefront_read(dev);
396 			if (c == -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;
401 			}
402 
403 			/* Now handle errors. Lots of special cases here */
404 
405 			if (c == 0xff) {
406 				c = wavefront_read(dev);
407 				if (c == -1) {
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 
465 		ack = wavefront_read(dev);
466 		if (ack == 0)
467 			ack = WF_ACK;
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 
481 					err = wavefront_read(dev);
482 					if (err == -1) {
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 
514 /***********************************************************************
515 WaveFront data munging
516 
517 Things here are weird. All data written to the board cannot
518 have its most significant bit set. Any data item with values
519 potentially > 0x7F (127) must be split across multiple bytes.
520 
521 Sometimes, we need to munge numeric values that are represented on
522 the x86 side as 8-32 bit values. Sometimes, we need to munge data
523 that is represented on the x86 side as an array of bytes. The most
524 efficient approach to handling both cases seems to be to use 2
525 different functions for munging and 2 for de-munging. This avoids
526 weird casting and worrying about bit-level offsets.
527 
528 **********************************************************************/
529 
530 static unsigned char *
munge_int32(unsigned int src,unsigned char * dst,unsigned int dst_size)531 munge_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++;
543 	}
544 	return dst;
545 };
546 
547 static int
demunge_int32(unsigned char * src,int src_size)548 demunge_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 
561 static
562 unsigned char *
munge_buf(unsigned char * src,unsigned char * dst,unsigned int dst_size)563 munge_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 
576 static
577 unsigned char *
demunge_buf(unsigned char * src,unsigned char * dst,unsigned int src_bytes)578 demunge_buf (unsigned char *src, unsigned char *dst, unsigned int src_bytes)
579 
580 {
581 	int i;
582 	unsigned char *end = src + src_bytes;
583 
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 
594 /***********************************************************************
595 WaveFront: sample, patch and program management.
596 ***********************************************************************/
597 
598 static int
wavefront_delete_sample(snd_wavefront_t * dev,int sample_num)599 wavefront_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 
608 	x = snd_wavefront_cmd(dev, WFC_DELETE_SAMPLE, NULL, wbuf);
609 	if (!x)
610 		dev->sample_status[sample_num] = WF_ST_EMPTY;
611 
612 	return x;
613 }
614 
615 static int
wavefront_get_sample_status(snd_wavefront_t * dev,int assume_rom)616 wavefront_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)) {
626 		snd_printk ("cannot request sample count.\n");
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)) {
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;
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:
664 			snd_printk ("unknown sample type for "
665 				    "slot %d (0x%x)\n",
666 				    i, rbuf[0]);
667 		}
668 
669 		if (rbuf[0] != WF_ST_EMPTY) {
670 			dev->samples_used++;
671 		}
672 	}
673 
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);
677 
678 
679 	return (0);
680 
681 }
682 
683 static int
wavefront_get_patch_status(snd_wavefront_t * dev)684 wavefront_get_patch_status (snd_wavefront_t *dev)
685 
686 {
687 	unsigned char patchbuf[WF_PATCH_BYTES];
688 	unsigned char patchnum[2];
689 	wavefront_patch *p;
690 	int i, x, cnt, cnt2;
691 
692 	for (i = 0; i < WF_MAX_PATCH; i++) {
693 		patchnum[0] = i & 0x7f;
694 		patchnum[1] = i >> 7;
695 
696 		x = snd_wavefront_cmd(dev, WFC_UPLOAD_PATCH, patchbuf,
697 				      patchnum);
698 		if (x == 0) {
699 
700 			dev->patch_status[i] |= WF_SLOT_FILLED;
701 			p = (wavefront_patch *) patchbuf;
702 			dev->sample_status
703 				[p->sample_number|(p->sample_msb<<7)] |=
704 				WF_SLOT_USED;
705 
706 		} else if (x == 3) { /* Bad patch number */
707 			dev->patch_status[i] = 0;
708 		} else {
709 			snd_printk ("upload patch "
710 				    "error 0x%x\n", x);
711 			dev->patch_status[i] = 0;
712 			return 1;
713 		}
714 	}
715 
716 	/* program status has already filled in slot_used bits */
717 
718 	for (i = 0, cnt = 0, cnt2 = 0; i < WF_MAX_PATCH; i++) {
719 		if (dev->patch_status[i] & WF_SLOT_FILLED) {
720 			cnt++;
721 		}
722 		if (dev->patch_status[i] & WF_SLOT_USED) {
723 			cnt2++;
724 		}
725 
726 	}
727 	snd_printk ("%d patch slots filled, %d in use\n", cnt, cnt2);
728 
729 	return (0);
730 }
731 
732 static int
wavefront_get_program_status(snd_wavefront_t * dev)733 wavefront_get_program_status (snd_wavefront_t *dev)
734 
735 {
736 	unsigned char progbuf[WF_PROGRAM_BYTES];
737 	wavefront_program prog;
738 	unsigned char prognum;
739 	int i, x, l, cnt;
740 
741 	for (i = 0; i < WF_MAX_PROGRAM; i++) {
742 		prognum = i;
743 
744 		x = snd_wavefront_cmd(dev, WFC_UPLOAD_PROGRAM, progbuf,
745 				      &prognum);
746 		if (x == 0) {
747 
748 			dev->prog_status[i] |= WF_SLOT_USED;
749 
750 			demunge_buf (progbuf, (unsigned char *) &prog,
751 				     WF_PROGRAM_BYTES);
752 
753 			for (l = 0; l < WF_NUM_LAYERS; l++) {
754 				if (prog.layer[l].mute) {
755 					dev->patch_status
756 						[prog.layer[l].patch_number] |=
757 						WF_SLOT_USED;
758 				}
759 			}
760 		} else if (x == 1) { /* Bad program number */
761 			dev->prog_status[i] = 0;
762 		} else {
763 			snd_printk ("upload program "
764 				    "error 0x%x\n", x);
765 			dev->prog_status[i] = 0;
766 		}
767 	}
768 
769 	for (i = 0, cnt = 0; i < WF_MAX_PROGRAM; i++) {
770 		if (dev->prog_status[i]) {
771 			cnt++;
772 		}
773 	}
774 
775 	snd_printk ("%d programs slots in use\n", cnt);
776 
777 	return (0);
778 }
779 
780 static int
wavefront_send_patch(snd_wavefront_t * dev,wavefront_patch_info * header)781 wavefront_send_patch (snd_wavefront_t *dev, wavefront_patch_info *header)
782 
783 {
784 	unsigned char buf[WF_PATCH_BYTES+2];
785 	unsigned char *bptr;
786 
787 	DPRINT (WF_DEBUG_LOAD_PATCH, "downloading patch %d\n",
788 				      header->number);
789 
790 	if (header->number >= ARRAY_SIZE(dev->patch_status))
791 		return -EINVAL;
792 
793 	dev->patch_status[header->number] |= WF_SLOT_FILLED;
794 
795 	bptr = munge_int32 (header->number, buf, 2);
796 	munge_buf ((unsigned char *)&header->hdr.p, bptr, WF_PATCH_BYTES);
797 
798 	if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_PATCH, NULL, buf)) {
799 		snd_printk ("download patch failed\n");
800 		return -EIO;
801 	}
802 
803 	return (0);
804 }
805 
806 static int
wavefront_send_program(snd_wavefront_t * dev,wavefront_patch_info * header)807 wavefront_send_program (snd_wavefront_t *dev, wavefront_patch_info *header)
808 
809 {
810 	unsigned char buf[WF_PROGRAM_BYTES+1];
811 	int i;
812 
813 	DPRINT (WF_DEBUG_LOAD_PATCH, "downloading program %d\n",
814 		header->number);
815 
816 	if (header->number >= ARRAY_SIZE(dev->prog_status))
817 		return -EINVAL;
818 
819 	dev->prog_status[header->number] = WF_SLOT_USED;
820 
821 	/* XXX need to zero existing SLOT_USED bit for program_status[i]
822 	   where `i' is the program that's being (potentially) overwritten.
823 	*/
824 
825 	for (i = 0; i < WF_NUM_LAYERS; i++) {
826 		if (header->hdr.pr.layer[i].mute) {
827 			dev->patch_status[header->hdr.pr.layer[i].patch_number] |=
828 				WF_SLOT_USED;
829 
830 			/* XXX need to mark SLOT_USED for sample used by
831 			   patch_number, but this means we have to load it. Ick.
832 			*/
833 		}
834 	}
835 
836 	buf[0] = header->number;
837 	munge_buf ((unsigned char *)&header->hdr.pr, &buf[1], WF_PROGRAM_BYTES);
838 
839 	if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_PROGRAM, NULL, buf)) {
840 		snd_printk ("download patch failed\n");
841 		return -EIO;
842 	}
843 
844 	return (0);
845 }
846 
847 static int
wavefront_freemem(snd_wavefront_t * dev)848 wavefront_freemem (snd_wavefront_t *dev)
849 
850 {
851 	char rbuf[8];
852 
853 	if (snd_wavefront_cmd (dev, WFC_REPORT_FREE_MEMORY, rbuf, NULL)) {
854 		snd_printk ("can't get memory stats.\n");
855 		return -1;
856 	} else {
857 		return demunge_int32 (rbuf, 4);
858 	}
859 }
860 
861 static int
wavefront_send_sample(snd_wavefront_t * dev,wavefront_patch_info * header,u16 __user * dataptr,int data_is_unsigned)862 wavefront_send_sample (snd_wavefront_t *dev,
863 		       wavefront_patch_info *header,
864 		       u16 __user *dataptr,
865 		       int data_is_unsigned)
866 
867 {
868 	/* samples are downloaded via a 16-bit wide i/o port
869 	   (you could think of it as 2 adjacent 8-bit wide ports
870 	   but its less efficient that way). therefore, all
871 	   the blocksizes and so forth listed in the documentation,
872 	   and used conventionally to refer to sample sizes,
873 	   which are given in 8-bit units (bytes), need to be
874 	   divided by 2.
875         */
876 
877 	u16 sample_short = 0;
878 	u32 length;
879 	u16 __user *data_end = NULL;
880 	unsigned int i;
881 	const unsigned int max_blksize = 4096/2;
882 	unsigned int written;
883 	unsigned int blocksize;
884 	int dma_ack;
885 	int blocknum;
886 	unsigned char sample_hdr[WF_SAMPLE_HDR_BYTES];
887 	unsigned char *shptr;
888 	int skip = 0;
889 	int initial_skip = 0;
890 
891 	DPRINT (WF_DEBUG_LOAD_PATCH, "sample %sdownload for slot %d, "
892 				      "type %d, %d bytes from 0x%lx\n",
893 				      header->size ? "" : "header ",
894 				      header->number, header->subkey,
895 				      header->size,
896 				      (unsigned long) header->dataptr);
897 
898 	if (header->number == WAVEFRONT_FIND_FREE_SAMPLE_SLOT) {
899 		int x;
900 
901 		x = wavefront_find_free_sample(dev);
902 		if (x < 0)
903 			return -ENOMEM;
904 		snd_printk ("unspecified sample => %d\n", x);
905 		header->number = x;
906 	}
907 
908 	if (header->number >= WF_MAX_SAMPLE)
909 		return -EINVAL;
910 
911 	if (header->size) {
912 
913 		/* XXX it's a debatable point whether or not RDONLY semantics
914 		   on the ROM samples should cover just the sample data or
915 		   the sample header. For now, it only covers the sample data,
916 		   so anyone is free at all times to rewrite sample headers.
917 
918 		   My reason for this is that we have the sample headers
919 		   available in the WFB file for General MIDI, and so these
920 		   can always be reset if needed. The sample data, however,
921 		   cannot be recovered without a complete reset and firmware
922 		   reload of the ICS2115, which is a very expensive operation.
923 
924 		   So, doing things this way allows us to honor the notion of
925 		   "RESETSAMPLES" reasonably cheaply. Note however, that this
926 		   is done purely at user level: there is no WFB parser in
927 		   this driver, and so a complete reset (back to General MIDI,
928 		   or theoretically some other configuration) is the
929 		   responsibility of the user level library.
930 
931 		   To try to do this in the kernel would be a little
932 		   crazy: we'd need 158K of kernel space just to hold
933 		   a copy of the patch/program/sample header data.
934 		*/
935 
936 		if (dev->rom_samples_rdonly) {
937 			if (dev->sample_status[header->number] & WF_SLOT_ROM) {
938 				snd_printk ("sample slot %d "
939 					    "write protected\n",
940 					    header->number);
941 				return -EACCES;
942 			}
943 		}
944 
945 		wavefront_delete_sample (dev, header->number);
946 	}
947 
948 	if (header->size) {
949 		dev->freemem = wavefront_freemem (dev);
950 
951 		if (dev->freemem < (int)header->size) {
952 			snd_printk ("insufficient memory to "
953 				    "load %d byte sample.\n",
954 				    header->size);
955 			return -ENOMEM;
956 		}
957 
958 	}
959 
960 	skip = WF_GET_CHANNEL(&header->hdr.s);
961 
962 	if (skip > 0 && header->hdr.s.SampleResolution != LINEAR_16BIT) {
963 		snd_printk ("channel selection only "
964 			    "possible on 16-bit samples");
965 		return -EINVAL;
966 	}
967 
968 	switch (skip) {
969 	case 0:
970 		initial_skip = 0;
971 		skip = 1;
972 		break;
973 	case 1:
974 		initial_skip = 0;
975 		skip = 2;
976 		break;
977 	case 2:
978 		initial_skip = 1;
979 		skip = 2;
980 		break;
981 	case 3:
982 		initial_skip = 2;
983 		skip = 3;
984 		break;
985 	case 4:
986 		initial_skip = 3;
987 		skip = 4;
988 		break;
989 	case 5:
990 		initial_skip = 4;
991 		skip = 5;
992 		break;
993 	case 6:
994 		initial_skip = 5;
995 		skip = 6;
996 		break;
997 	}
998 
999 	DPRINT (WF_DEBUG_LOAD_PATCH, "channel selection: %d => "
1000 				      "initial skip = %d, skip = %d\n",
1001 				      WF_GET_CHANNEL (&header->hdr.s),
1002 				      initial_skip, skip);
1003 
1004 	/* Be safe, and zero the "Unused" bits ... */
1005 
1006 	WF_SET_CHANNEL(&header->hdr.s, 0);
1007 
1008 	/* adjust size for 16 bit samples by dividing by two.  We always
1009 	   send 16 bits per write, even for 8 bit samples, so the length
1010 	   is always half the size of the sample data in bytes.
1011 	*/
1012 
1013 	length = header->size / 2;
1014 
1015 	/* the data we're sent has not been munged, and in fact, the
1016 	   header we have to send isn't just a munged copy either.
1017 	   so, build the sample header right here.
1018 	*/
1019 
1020 	shptr = &sample_hdr[0];
1021 
1022 	shptr = munge_int32 (header->number, shptr, 2);
1023 
1024 	if (header->size) {
1025 		shptr = munge_int32 (length, shptr, 4);
1026 	}
1027 
1028 	/* Yes, a 4 byte result doesn't contain all of the offset bits,
1029 	   but the offset only uses 24 bits.
1030 	*/
1031 
1032 	shptr = munge_int32 (*((u32 *) &header->hdr.s.sampleStartOffset),
1033 			     shptr, 4);
1034 	shptr = munge_int32 (*((u32 *) &header->hdr.s.loopStartOffset),
1035 			     shptr, 4);
1036 	shptr = munge_int32 (*((u32 *) &header->hdr.s.loopEndOffset),
1037 			     shptr, 4);
1038 	shptr = munge_int32 (*((u32 *) &header->hdr.s.sampleEndOffset),
1039 			     shptr, 4);
1040 
1041 	/* This one is truly weird. What kind of weirdo decided that in
1042 	   a system dominated by 16 and 32 bit integers, they would use
1043 	   a just 12 bits ?
1044 	*/
1045 
1046 	shptr = munge_int32 (header->hdr.s.FrequencyBias, shptr, 3);
1047 
1048 	/* Why is this nybblified, when the MSB is *always* zero ?
1049 	   Anyway, we can't take address of bitfield, so make a
1050 	   good-faith guess at where it starts.
1051 	*/
1052 
1053 	shptr = munge_int32 (*(&header->hdr.s.FrequencyBias+1),
1054 			     shptr, 2);
1055 
1056 	if (snd_wavefront_cmd (dev,
1057 			   header->size ?
1058 			   WFC_DOWNLOAD_SAMPLE : WFC_DOWNLOAD_SAMPLE_HEADER,
1059 			   NULL, sample_hdr)) {
1060 		snd_printk ("sample %sdownload refused.\n",
1061 			    header->size ? "" : "header ");
1062 		return -EIO;
1063 	}
1064 
1065 	if (header->size == 0) {
1066 		goto sent; /* Sorry. Just had to have one somewhere */
1067 	}
1068 
1069 	data_end = dataptr + length;
1070 
1071 	/* Do any initial skip over an unused channel's data */
1072 
1073 	dataptr += initial_skip;
1074 
1075 	for (written = 0, blocknum = 0;
1076 	     written < length; written += max_blksize, blocknum++) {
1077 
1078 		if ((length - written) > max_blksize) {
1079 			blocksize = max_blksize;
1080 		} else {
1081 			/* round to nearest 16-byte value */
1082 			blocksize = ALIGN(length - written, 8);
1083 		}
1084 
1085 		if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_BLOCK, NULL, NULL)) {
1086 			snd_printk ("download block "
1087 				    "request refused.\n");
1088 			return -EIO;
1089 		}
1090 
1091 		for (i = 0; i < blocksize; i++) {
1092 
1093 			if (dataptr < data_end) {
1094 
1095 				if (get_user(sample_short, dataptr))
1096 					return -EFAULT;
1097 				dataptr += skip;
1098 
1099 				if (data_is_unsigned) { /* GUS ? */
1100 
1101 					if (WF_SAMPLE_IS_8BIT(&header->hdr.s)) {
1102 
1103 						/* 8 bit sample
1104 						 resolution, sign
1105 						 extend both bytes.
1106 						*/
1107 
1108 						((unsigned char*)
1109 						 &sample_short)[0] += 0x7f;
1110 						((unsigned char*)
1111 						 &sample_short)[1] += 0x7f;
1112 
1113 					} else {
1114 
1115 						/* 16 bit sample
1116 						 resolution, sign
1117 						 extend the MSB.
1118 						*/
1119 
1120 						sample_short += 0x7fff;
1121 					}
1122 				}
1123 
1124 			} else {
1125 
1126 				/* In padding section of final block:
1127 
1128 				   Don't fetch unsupplied data from
1129 				   user space, just continue with
1130 				   whatever the final value was.
1131 				*/
1132 			}
1133 
1134 			if (i < blocksize - 1) {
1135 				outw (sample_short, dev->block_port);
1136 			} else {
1137 				outw (sample_short, dev->last_block_port);
1138 			}
1139 		}
1140 
1141 		/* Get "DMA page acknowledge", even though its really
1142 		   nothing to do with DMA at all.
1143 		*/
1144 
1145 		dma_ack = wavefront_read(dev);
1146 		if (dma_ack != WF_DMA_ACK) {
1147 			if (dma_ack == -1) {
1148 				snd_printk ("upload sample "
1149 					    "DMA ack timeout\n");
1150 				return -EIO;
1151 			} else {
1152 				snd_printk ("upload sample "
1153 					    "DMA ack error 0x%x\n",
1154 					    dma_ack);
1155 				return -EIO;
1156 			}
1157 		}
1158 	}
1159 
1160 	dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_SAMPLE);
1161 
1162 	/* Note, label is here because sending the sample header shouldn't
1163 	   alter the sample_status info at all.
1164 	*/
1165 
1166  sent:
1167 	return (0);
1168 }
1169 
1170 static int
wavefront_send_alias(snd_wavefront_t * dev,wavefront_patch_info * header)1171 wavefront_send_alias (snd_wavefront_t *dev, wavefront_patch_info *header)
1172 
1173 {
1174 	unsigned char alias_hdr[WF_ALIAS_BYTES];
1175 
1176 	DPRINT (WF_DEBUG_LOAD_PATCH, "download alias, %d is "
1177 				      "alias for %d\n",
1178 				      header->number,
1179 				      header->hdr.a.OriginalSample);
1180 
1181 	if (header->number >= WF_MAX_SAMPLE)
1182 		return -EINVAL;
1183 
1184 	munge_int32 (header->number, &alias_hdr[0], 2);
1185 	munge_int32 (header->hdr.a.OriginalSample, &alias_hdr[2], 2);
1186 	munge_int32 (*((unsigned int *)&header->hdr.a.sampleStartOffset),
1187 		     &alias_hdr[4], 4);
1188 	munge_int32 (*((unsigned int *)&header->hdr.a.loopStartOffset),
1189 		     &alias_hdr[8], 4);
1190 	munge_int32 (*((unsigned int *)&header->hdr.a.loopEndOffset),
1191 		     &alias_hdr[12], 4);
1192 	munge_int32 (*((unsigned int *)&header->hdr.a.sampleEndOffset),
1193 		     &alias_hdr[16], 4);
1194 	munge_int32 (header->hdr.a.FrequencyBias, &alias_hdr[20], 3);
1195 	munge_int32 (*(&header->hdr.a.FrequencyBias+1), &alias_hdr[23], 2);
1196 
1197 	if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_SAMPLE_ALIAS, NULL, alias_hdr)) {
1198 		snd_printk ("download alias failed.\n");
1199 		return -EIO;
1200 	}
1201 
1202 	dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_ALIAS);
1203 
1204 	return (0);
1205 }
1206 
1207 static int
wavefront_send_multisample(snd_wavefront_t * dev,wavefront_patch_info * header)1208 wavefront_send_multisample (snd_wavefront_t *dev, wavefront_patch_info *header)
1209 {
1210 	int i;
1211 	int num_samples;
1212 	unsigned char *msample_hdr;
1213 
1214 	if (header->number >= WF_MAX_SAMPLE)
1215 		return -EINVAL;
1216 
1217 	msample_hdr = kmalloc(WF_MSAMPLE_BYTES, GFP_KERNEL);
1218 	if (! msample_hdr)
1219 		return -ENOMEM;
1220 
1221 	munge_int32 (header->number, &msample_hdr[0], 2);
1222 
1223 	/* You'll recall at this point that the "number of samples" value
1224 	   in a wavefront_multisample struct is actually the log2 of the
1225 	   real number of samples.
1226 	*/
1227 
1228 	num_samples = (1<<(header->hdr.ms.NumberOfSamples&7));
1229 	msample_hdr[2] = (unsigned char) header->hdr.ms.NumberOfSamples;
1230 
1231 	DPRINT (WF_DEBUG_LOAD_PATCH, "multi %d with %d=%d samples\n",
1232 				      header->number,
1233 				      header->hdr.ms.NumberOfSamples,
1234 				      num_samples);
1235 
1236 	for (i = 0; i < num_samples; i++) {
1237 		DPRINT(WF_DEBUG_LOAD_PATCH|WF_DEBUG_DATA, "sample[%d] = %d\n",
1238 		       i, header->hdr.ms.SampleNumber[i]);
1239 		munge_int32 (header->hdr.ms.SampleNumber[i],
1240 		     &msample_hdr[3+(i*2)], 2);
1241 	}
1242 
1243 	/* Need a hack here to pass in the number of bytes
1244 	   to be written to the synth. This is ugly, and perhaps
1245 	   one day, I'll fix it.
1246 	*/
1247 
1248 	if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_MULTISAMPLE,
1249 			   (unsigned char *) (long) ((num_samples*2)+3),
1250 			   msample_hdr)) {
1251 		snd_printk ("download of multisample failed.\n");
1252 		kfree(msample_hdr);
1253 		return -EIO;
1254 	}
1255 
1256 	dev->sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_MULTISAMPLE);
1257 
1258 	kfree(msample_hdr);
1259 	return (0);
1260 }
1261 
1262 static int
wavefront_fetch_multisample(snd_wavefront_t * dev,wavefront_patch_info * header)1263 wavefront_fetch_multisample (snd_wavefront_t *dev,
1264 			     wavefront_patch_info *header)
1265 {
1266 	int i;
1267 	unsigned char log_ns[1];
1268 	unsigned char number[2];
1269 	int num_samples;
1270 
1271 	munge_int32 (header->number, number, 2);
1272 
1273 	if (snd_wavefront_cmd (dev, WFC_UPLOAD_MULTISAMPLE, log_ns, number)) {
1274 		snd_printk ("upload multisample failed.\n");
1275 		return -EIO;
1276 	}
1277 
1278 	DPRINT (WF_DEBUG_DATA, "msample %d has %d samples\n",
1279 				header->number, log_ns[0]);
1280 
1281 	header->hdr.ms.NumberOfSamples = log_ns[0];
1282 
1283 	/* get the number of samples ... */
1284 
1285 	num_samples = (1 << log_ns[0]);
1286 
1287 	for (i = 0; i < num_samples; i++) {
1288 		char d[2];
1289 		int val;
1290 
1291 		val = wavefront_read(dev);
1292 		if (val == -1) {
1293 			snd_printk ("upload multisample failed "
1294 				    "during sample loop.\n");
1295 			return -EIO;
1296 		}
1297 		d[0] = val;
1298 
1299 		val = wavefront_read(dev);
1300 		if (val == -1) {
1301 			snd_printk ("upload multisample failed "
1302 				    "during sample loop.\n");
1303 			return -EIO;
1304 		}
1305 		d[1] = val;
1306 
1307 		header->hdr.ms.SampleNumber[i] =
1308 			demunge_int32 ((unsigned char *) d, 2);
1309 
1310 		DPRINT (WF_DEBUG_DATA, "msample sample[%d] = %d\n",
1311 					i, header->hdr.ms.SampleNumber[i]);
1312 	}
1313 
1314 	return (0);
1315 }
1316 
1317 
1318 static int
wavefront_send_drum(snd_wavefront_t * dev,wavefront_patch_info * header)1319 wavefront_send_drum (snd_wavefront_t *dev, wavefront_patch_info *header)
1320 
1321 {
1322 	unsigned char drumbuf[WF_DRUM_BYTES];
1323 	wavefront_drum *drum = &header->hdr.d;
1324 	int i;
1325 
1326 	DPRINT (WF_DEBUG_LOAD_PATCH, "downloading edrum for MIDI "
1327 		"note %d, patch = %d\n",
1328 		header->number, drum->PatchNumber);
1329 
1330 	drumbuf[0] = header->number & 0x7f;
1331 
1332 	for (i = 0; i < 4; i++) {
1333 		munge_int32 (((unsigned char *)drum)[i], &drumbuf[1+(i*2)], 2);
1334 	}
1335 
1336 	if (snd_wavefront_cmd (dev, WFC_DOWNLOAD_EDRUM_PROGRAM, NULL, drumbuf)) {
1337 		snd_printk ("download drum failed.\n");
1338 		return -EIO;
1339 	}
1340 
1341 	return (0);
1342 }
1343 
1344 static int
wavefront_find_free_sample(snd_wavefront_t * dev)1345 wavefront_find_free_sample (snd_wavefront_t *dev)
1346 
1347 {
1348 	int i;
1349 
1350 	for (i = 0; i < WF_MAX_SAMPLE; i++) {
1351 		if (!(dev->sample_status[i] & WF_SLOT_FILLED)) {
1352 			return i;
1353 		}
1354 	}
1355 	snd_printk ("no free sample slots!\n");
1356 	return -1;
1357 }
1358 
1359 #if 0
1360 static int
1361 wavefront_find_free_patch (snd_wavefront_t *dev)
1362 
1363 {
1364 	int i;
1365 
1366 	for (i = 0; i < WF_MAX_PATCH; i++) {
1367 		if (!(dev->patch_status[i] & WF_SLOT_FILLED)) {
1368 			return i;
1369 		}
1370 	}
1371 	snd_printk ("no free patch slots!\n");
1372 	return -1;
1373 }
1374 #endif
1375 
1376 static int
wavefront_load_patch(snd_wavefront_t * dev,const char __user * addr)1377 wavefront_load_patch (snd_wavefront_t *dev, const char __user *addr)
1378 {
1379 	wavefront_patch_info *header;
1380 	int err;
1381 
1382 	header = kmalloc(sizeof(*header), GFP_KERNEL);
1383 	if (! header)
1384 		return -ENOMEM;
1385 
1386 	if (copy_from_user (header, addr, sizeof(wavefront_patch_info) -
1387 			    sizeof(wavefront_any))) {
1388 		snd_printk ("bad address for load patch.\n");
1389 		err = -EFAULT;
1390 		goto __error;
1391 	}
1392 
1393 	DPRINT (WF_DEBUG_LOAD_PATCH, "download "
1394 				      "Sample type: %d "
1395 				      "Sample number: %d "
1396 				      "Sample size: %d\n",
1397 				      header->subkey,
1398 				      header->number,
1399 				      header->size);
1400 
1401 	switch (header->subkey) {
1402 	case WF_ST_SAMPLE:  /* sample or sample_header, based on patch->size */
1403 
1404 		if (copy_from_user (&header->hdr.s, header->hdrptr,
1405 				    sizeof (wavefront_sample))) {
1406 			err = -EFAULT;
1407 			break;
1408 		}
1409 
1410 		err = wavefront_send_sample (dev, header, header->dataptr, 0);
1411 		break;
1412 
1413 	case WF_ST_MULTISAMPLE:
1414 
1415 		if (copy_from_user (&header->hdr.s, header->hdrptr,
1416 				    sizeof (wavefront_multisample))) {
1417 			err = -EFAULT;
1418 			break;
1419 		}
1420 
1421 		err = wavefront_send_multisample (dev, header);
1422 		break;
1423 
1424 	case WF_ST_ALIAS:
1425 
1426 		if (copy_from_user (&header->hdr.a, header->hdrptr,
1427 				    sizeof (wavefront_alias))) {
1428 			err = -EFAULT;
1429 			break;
1430 		}
1431 
1432 		err = wavefront_send_alias (dev, header);
1433 		break;
1434 
1435 	case WF_ST_DRUM:
1436 		if (copy_from_user (&header->hdr.d, header->hdrptr,
1437 				    sizeof (wavefront_drum))) {
1438 			err = -EFAULT;
1439 			break;
1440 		}
1441 
1442 		err = wavefront_send_drum (dev, header);
1443 		break;
1444 
1445 	case WF_ST_PATCH:
1446 		if (copy_from_user (&header->hdr.p, header->hdrptr,
1447 				    sizeof (wavefront_patch))) {
1448 			err = -EFAULT;
1449 			break;
1450 		}
1451 
1452 		err = wavefront_send_patch (dev, header);
1453 		break;
1454 
1455 	case WF_ST_PROGRAM:
1456 		if (copy_from_user (&header->hdr.pr, header->hdrptr,
1457 				    sizeof (wavefront_program))) {
1458 			err = -EFAULT;
1459 			break;
1460 		}
1461 
1462 		err = wavefront_send_program (dev, header);
1463 		break;
1464 
1465 	default:
1466 		snd_printk ("unknown patch type %d.\n",
1467 			    header->subkey);
1468 		err = -EINVAL;
1469 		break;
1470 	}
1471 
1472  __error:
1473 	kfree(header);
1474 	return err;
1475 }
1476 
1477 /***********************************************************************
1478 WaveFront: hardware-dependent interface
1479 ***********************************************************************/
1480 
1481 static void
process_sample_hdr(u8 * buf)1482 process_sample_hdr (u8 *buf)
1483 
1484 {
1485 	wavefront_sample s;
1486 	u8 *ptr;
1487 
1488 	ptr = buf;
1489 
1490 	/* The board doesn't send us an exact copy of a "wavefront_sample"
1491 	   in response to an Upload Sample Header command. Instead, we
1492 	   have to convert the data format back into our data structure,
1493 	   just as in the Download Sample command, where we have to do
1494 	   something very similar in the reverse direction.
1495 	*/
1496 
1497 	*((u32 *) &s.sampleStartOffset) = demunge_int32 (ptr, 4); ptr += 4;
1498 	*((u32 *) &s.loopStartOffset) = demunge_int32 (ptr, 4); ptr += 4;
1499 	*((u32 *) &s.loopEndOffset) = demunge_int32 (ptr, 4); ptr += 4;
1500 	*((u32 *) &s.sampleEndOffset) = demunge_int32 (ptr, 4); ptr += 4;
1501 	*((u32 *) &s.FrequencyBias) = demunge_int32 (ptr, 3); ptr += 3;
1502 
1503 	s.SampleResolution = *ptr & 0x3;
1504 	s.Loop = *ptr & 0x8;
1505 	s.Bidirectional = *ptr & 0x10;
1506 	s.Reverse = *ptr & 0x40;
1507 
1508 	/* Now copy it back to where it came from */
1509 
1510 	memcpy (buf, (unsigned char *) &s, sizeof (wavefront_sample));
1511 }
1512 
1513 static int
wavefront_synth_control(snd_wavefront_card_t * acard,wavefront_control * wc)1514 wavefront_synth_control (snd_wavefront_card_t *acard,
1515 			 wavefront_control *wc)
1516 
1517 {
1518 	snd_wavefront_t *dev = &acard->wavefront;
1519 	unsigned char patchnumbuf[2];
1520 	int i;
1521 
1522 	DPRINT (WF_DEBUG_CMD, "synth control with "
1523 		"cmd 0x%x\n", wc->cmd);
1524 
1525 	/* Pre-handling of or for various commands */
1526 
1527 	switch (wc->cmd) {
1528 
1529 	case WFC_DISABLE_INTERRUPTS:
1530 		snd_printk ("interrupts disabled.\n");
1531 		outb (0x80|0x20, dev->control_port);
1532 		dev->interrupts_are_midi = 1;
1533 		return 0;
1534 
1535 	case WFC_ENABLE_INTERRUPTS:
1536 		snd_printk ("interrupts enabled.\n");
1537 		outb (0x80|0x40|0x20, dev->control_port);
1538 		dev->interrupts_are_midi = 1;
1539 		return 0;
1540 
1541 	case WFC_INTERRUPT_STATUS:
1542 		wc->rbuf[0] = dev->interrupts_are_midi;
1543 		return 0;
1544 
1545 	case WFC_ROMSAMPLES_RDONLY:
1546 		dev->rom_samples_rdonly = wc->wbuf[0];
1547 		wc->status = 0;
1548 		return 0;
1549 
1550 	case WFC_IDENTIFY_SLOT_TYPE:
1551 		i = wc->wbuf[0] | (wc->wbuf[1] << 7);
1552 		if (i <0 || i >= WF_MAX_SAMPLE) {
1553 			snd_printk ("invalid slot ID %d\n",
1554 				i);
1555 			wc->status = EINVAL;
1556 			return -EINVAL;
1557 		}
1558 		wc->rbuf[0] = dev->sample_status[i];
1559 		wc->status = 0;
1560 		return 0;
1561 
1562 	case WFC_DEBUG_DRIVER:
1563 		dev->debug = wc->wbuf[0];
1564 		snd_printk ("debug = 0x%x\n", dev->debug);
1565 		return 0;
1566 
1567 	case WFC_UPLOAD_PATCH:
1568 		munge_int32 (*((u32 *) wc->wbuf), patchnumbuf, 2);
1569 		memcpy (wc->wbuf, patchnumbuf, 2);
1570 		break;
1571 
1572 	case WFC_UPLOAD_MULTISAMPLE:
1573 		/* multisamples have to be handled differently, and
1574 		   cannot be dealt with properly by snd_wavefront_cmd() alone.
1575 		*/
1576 		wc->status = wavefront_fetch_multisample
1577 			(dev, (wavefront_patch_info *) wc->rbuf);
1578 		return 0;
1579 
1580 	case WFC_UPLOAD_SAMPLE_ALIAS:
1581 		snd_printk ("support for sample alias upload "
1582 			"being considered.\n");
1583 		wc->status = EINVAL;
1584 		return -EINVAL;
1585 	}
1586 
1587 	wc->status = snd_wavefront_cmd (dev, wc->cmd, wc->rbuf, wc->wbuf);
1588 
1589 	/* Post-handling of certain commands.
1590 
1591 	   In particular, if the command was an upload, demunge the data
1592 	   so that the user-level doesn't have to think about it.
1593 	*/
1594 
1595 	if (wc->status == 0) {
1596 		switch (wc->cmd) {
1597 			/* intercept any freemem requests so that we know
1598 			   we are always current with the user-level view
1599 			   of things.
1600 			*/
1601 
1602 		case WFC_REPORT_FREE_MEMORY:
1603 			dev->freemem = demunge_int32 (wc->rbuf, 4);
1604 			break;
1605 
1606 		case WFC_UPLOAD_PATCH:
1607 			demunge_buf (wc->rbuf, wc->rbuf, WF_PATCH_BYTES);
1608 			break;
1609 
1610 		case WFC_UPLOAD_PROGRAM:
1611 			demunge_buf (wc->rbuf, wc->rbuf, WF_PROGRAM_BYTES);
1612 			break;
1613 
1614 		case WFC_UPLOAD_EDRUM_PROGRAM:
1615 			demunge_buf (wc->rbuf, wc->rbuf, WF_DRUM_BYTES - 1);
1616 			break;
1617 
1618 		case WFC_UPLOAD_SAMPLE_HEADER:
1619 			process_sample_hdr (wc->rbuf);
1620 			break;
1621 
1622 		case WFC_UPLOAD_SAMPLE_ALIAS:
1623 			snd_printk ("support for "
1624 				    "sample aliases still "
1625 				    "being considered.\n");
1626 			break;
1627 
1628 		case WFC_VMIDI_OFF:
1629 			snd_wavefront_midi_disable_virtual (acard);
1630 			break;
1631 
1632 		case WFC_VMIDI_ON:
1633 			snd_wavefront_midi_enable_virtual (acard);
1634 			break;
1635 		}
1636 	}
1637 
1638 	return 0;
1639 }
1640 
1641 int
snd_wavefront_synth_open(struct snd_hwdep * hw,struct file * file)1642 snd_wavefront_synth_open (struct snd_hwdep *hw, struct file *file)
1643 
1644 {
1645 	if (!try_module_get(hw->card->module))
1646 		return -EFAULT;
1647 	file->private_data = hw;
1648 	return 0;
1649 }
1650 
1651 int
snd_wavefront_synth_release(struct snd_hwdep * hw,struct file * file)1652 snd_wavefront_synth_release (struct snd_hwdep *hw, struct file *file)
1653 
1654 {
1655 	module_put(hw->card->module);
1656 	return 0;
1657 }
1658 
1659 int
snd_wavefront_synth_ioctl(struct snd_hwdep * hw,struct file * file,unsigned int cmd,unsigned long arg)1660 snd_wavefront_synth_ioctl (struct snd_hwdep *hw, struct file *file,
1661 			   unsigned int cmd, unsigned long arg)
1662 
1663 {
1664 	struct snd_card *card;
1665 	snd_wavefront_t *dev;
1666 	snd_wavefront_card_t *acard;
1667 	wavefront_control *wc;
1668 	void __user *argp = (void __user *)arg;
1669 	int err;
1670 
1671 	card = (struct snd_card *) hw->card;
1672 
1673 	if (snd_BUG_ON(!card))
1674 		return -ENODEV;
1675 	if (snd_BUG_ON(!card->private_data))
1676 		return -ENODEV;
1677 
1678 	acard = card->private_data;
1679 	dev = &acard->wavefront;
1680 
1681 	switch (cmd) {
1682 	case WFCTL_LOAD_SPP:
1683 		if (wavefront_load_patch (dev, argp) != 0) {
1684 			return -EIO;
1685 		}
1686 		break;
1687 
1688 	case WFCTL_WFCMD:
1689 		wc = memdup_user(argp, sizeof(*wc));
1690 		if (IS_ERR(wc))
1691 			return PTR_ERR(wc);
1692 
1693 		if (wavefront_synth_control (acard, wc) < 0)
1694 			err = -EIO;
1695 		else if (copy_to_user (argp, wc, sizeof (*wc)))
1696 			err = -EFAULT;
1697 		else
1698 			err = 0;
1699 		kfree(wc);
1700 		return err;
1701 
1702 	default:
1703 		return -EINVAL;
1704 	}
1705 
1706 	return 0;
1707 }
1708 
1709 
1710 /***********************************************************************/
1711 /*  WaveFront: interface for card-level wavefront module               */
1712 /***********************************************************************/
1713 
1714 void
snd_wavefront_internal_interrupt(snd_wavefront_card_t * card)1715 snd_wavefront_internal_interrupt (snd_wavefront_card_t *card)
1716 {
1717 	snd_wavefront_t *dev = &card->wavefront;
1718 
1719 	/*
1720 	   Some comments on interrupts. I attempted a version of this
1721 	   driver that used interrupts throughout the code instead of
1722 	   doing busy and/or sleep-waiting. Alas, it appears that once
1723 	   the Motorola firmware is downloaded, the card *never*
1724 	   generates an RX interrupt. These are successfully generated
1725 	   during firmware loading, and after that wavefront_status()
1726 	   reports that an interrupt is pending on the card from time
1727 	   to time, but it never seems to be delivered to this
1728 	   driver. Note also that wavefront_status() continues to
1729 	   report that RX interrupts are enabled, suggesting that I
1730 	   didn't goof up and disable them by mistake.
1731 
1732 	   Thus, I stepped back to a prior version of
1733 	   wavefront_wait(), the only place where this really
1734 	   matters. Its sad, but I've looked through the code to check
1735 	   on things, and I really feel certain that the Motorola
1736 	   firmware prevents RX-ready interrupts.
1737 	*/
1738 
1739 	if ((wavefront_status(dev) & (STAT_INTR_READ|STAT_INTR_WRITE)) == 0) {
1740 		return;
1741 	}
1742 
1743 	spin_lock(&dev->irq_lock);
1744 	dev->irq_ok = 1;
1745 	dev->irq_cnt++;
1746 	spin_unlock(&dev->irq_lock);
1747 	wake_up(&dev->interrupt_sleeper);
1748 }
1749 
1750 /* STATUS REGISTER
1751 
1752 0 Host Rx Interrupt Enable (1=Enabled)
1753 1 Host Rx Register Full (1=Full)
1754 2 Host Rx Interrupt Pending (1=Interrupt)
1755 3 Unused
1756 4 Host Tx Interrupt (1=Enabled)
1757 5 Host Tx Register empty (1=Empty)
1758 6 Host Tx Interrupt Pending (1=Interrupt)
1759 7 Unused
1760 */
1761 
1762 static int
snd_wavefront_interrupt_bits(int irq)1763 snd_wavefront_interrupt_bits (int irq)
1764 
1765 {
1766 	int bits;
1767 
1768 	switch (irq) {
1769 	case 9:
1770 		bits = 0x00;
1771 		break;
1772 	case 5:
1773 		bits = 0x08;
1774 		break;
1775 	case 12:
1776 		bits = 0x10;
1777 		break;
1778 	case 15:
1779 		bits = 0x18;
1780 		break;
1781 
1782 	default:
1783 		snd_printk ("invalid IRQ %d\n", irq);
1784 		bits = -1;
1785 	}
1786 
1787 	return bits;
1788 }
1789 
1790 static void
wavefront_should_cause_interrupt(snd_wavefront_t * dev,int val,int port,unsigned long timeout)1791 wavefront_should_cause_interrupt (snd_wavefront_t *dev,
1792 				  int val, int port, unsigned long timeout)
1793 
1794 {
1795 	wait_queue_entry_t wait;
1796 
1797 	init_waitqueue_entry(&wait, current);
1798 	spin_lock_irq(&dev->irq_lock);
1799 	add_wait_queue(&dev->interrupt_sleeper, &wait);
1800 	dev->irq_ok = 0;
1801 	outb (val,port);
1802 	spin_unlock_irq(&dev->irq_lock);
1803 	while (!dev->irq_ok && time_before(jiffies, timeout)) {
1804 		schedule_timeout_uninterruptible(1);
1805 		barrier();
1806 	}
1807 }
1808 
1809 static int
wavefront_reset_to_cleanliness(snd_wavefront_t * dev)1810 wavefront_reset_to_cleanliness (snd_wavefront_t *dev)
1811 
1812 {
1813 	int bits;
1814 	int hwv[2];
1815 
1816 	/* IRQ already checked */
1817 
1818 	bits = snd_wavefront_interrupt_bits (dev->irq);
1819 
1820 	/* try reset of port */
1821 
1822 	outb (0x0, dev->control_port);
1823 
1824 	/* At this point, the board is in reset, and the H/W initialization
1825 	   register is accessed at the same address as the data port.
1826 
1827 	   Bit 7 - Enable IRQ Driver
1828 	   0 - Tri-state the Wave-Board drivers for the PC Bus IRQs
1829 	   1 - Enable IRQ selected by bits 5:3 to be driven onto the PC Bus.
1830 
1831 	   Bit 6 - MIDI Interface Select
1832 
1833 	   0 - Use the MIDI Input from the 26-pin WaveBlaster
1834 	   compatible header as the serial MIDI source
1835 	   1 - Use the MIDI Input from the 9-pin D connector as the
1836 	   serial MIDI source.
1837 
1838 	   Bits 5:3 - IRQ Selection
1839 	   0 0 0 - IRQ 2/9
1840 	   0 0 1 - IRQ 5
1841 	   0 1 0 - IRQ 12
1842 	   0 1 1 - IRQ 15
1843 	   1 0 0 - Reserved
1844 	   1 0 1 - Reserved
1845 	   1 1 0 - Reserved
1846 	   1 1 1 - Reserved
1847 
1848 	   Bits 2:1 - Reserved
1849 	   Bit 0 - Disable Boot ROM
1850 	   0 - memory accesses to 03FC30-03FFFFH utilize the internal Boot ROM
1851 	   1 - memory accesses to 03FC30-03FFFFH are directed to external
1852 	   storage.
1853 
1854 	*/
1855 
1856 	/* configure hardware: IRQ, enable interrupts,
1857 	   plus external 9-pin MIDI interface selected
1858 	*/
1859 
1860 	outb (0x80 | 0x40 | bits, dev->data_port);
1861 
1862 	/* CONTROL REGISTER
1863 
1864 	   0 Host Rx Interrupt Enable (1=Enabled)      0x1
1865 	   1 Unused                                    0x2
1866 	   2 Unused                                    0x4
1867 	   3 Unused                                    0x8
1868 	   4 Host Tx Interrupt Enable                 0x10
1869 	   5 Mute (0=Mute; 1=Play)                    0x20
1870 	   6 Master Interrupt Enable (1=Enabled)      0x40
1871 	   7 Master Reset (0=Reset; 1=Run)            0x80
1872 
1873 	   Take us out of reset, mute output, master + TX + RX interrupts on.
1874 
1875 	   We'll get an interrupt presumably to tell us that the TX
1876 	   register is clear.
1877 	*/
1878 
1879 	wavefront_should_cause_interrupt(dev, 0x80|0x40|0x10|0x1,
1880 					 dev->control_port,
1881 					 (reset_time*HZ)/100);
1882 
1883 	/* Note: data port is now the data port, not the h/w initialization
1884 	   port.
1885 	 */
1886 
1887 	if (!dev->irq_ok) {
1888 		snd_printk ("intr not received after h/w un-reset.\n");
1889 		goto gone_bad;
1890 	}
1891 
1892 	/* Note: data port is now the data port, not the h/w initialization
1893 	   port.
1894 
1895 	   At this point, only "HW VERSION" or "DOWNLOAD OS" commands
1896 	   will work. So, issue one of them, and wait for TX
1897 	   interrupt. This can take a *long* time after a cold boot,
1898 	   while the ISC ROM does its RAM test. The SDK says up to 4
1899 	   seconds - with 12MB of RAM on a Tropez+, it takes a lot
1900 	   longer than that (~16secs). Note that the card understands
1901 	   the difference between a warm and a cold boot, so
1902 	   subsequent ISC2115 reboots (say, caused by module
1903 	   reloading) will get through this much faster.
1904 
1905 	   XXX Interesting question: why is no RX interrupt received first ?
1906 	*/
1907 
1908 	wavefront_should_cause_interrupt(dev, WFC_HARDWARE_VERSION,
1909 					 dev->data_port, ramcheck_time*HZ);
1910 
1911 	if (!dev->irq_ok) {
1912 		snd_printk ("post-RAM-check interrupt not received.\n");
1913 		goto gone_bad;
1914 	}
1915 
1916 	if (!wavefront_wait (dev, STAT_CAN_READ)) {
1917 		snd_printk ("no response to HW version cmd.\n");
1918 		goto gone_bad;
1919 	}
1920 
1921 	hwv[0] = wavefront_read(dev);
1922 	if (hwv[0] == -1) {
1923 		snd_printk ("board not responding correctly.\n");
1924 		goto gone_bad;
1925 	}
1926 
1927 	if (hwv[0] == 0xFF) { /* NAK */
1928 
1929 		/* Board's RAM test failed. Try to read error code,
1930 		   and tell us about it either way.
1931 		*/
1932 
1933 		hwv[0] = wavefront_read(dev);
1934 		if (hwv[0] == -1) {
1935 			snd_printk ("on-board RAM test failed "
1936 				    "(bad error code).\n");
1937 		} else {
1938 			snd_printk ("on-board RAM test failed "
1939 				    "(error code: 0x%x).\n",
1940 				hwv[0]);
1941 		}
1942 		goto gone_bad;
1943 	}
1944 
1945 	/* We're OK, just get the next byte of the HW version response */
1946 
1947 	hwv[1] = wavefront_read(dev);
1948 	if (hwv[1] == -1) {
1949 		snd_printk ("incorrect h/w response.\n");
1950 		goto gone_bad;
1951 	}
1952 
1953 	snd_printk ("hardware version %d.%d\n",
1954 		    hwv[0], hwv[1]);
1955 
1956 	return 0;
1957 
1958 
1959      gone_bad:
1960 	return (1);
1961 }
1962 
1963 static int
wavefront_download_firmware(snd_wavefront_t * dev,char * path)1964 wavefront_download_firmware (snd_wavefront_t *dev, char *path)
1965 
1966 {
1967 	const unsigned char *buf;
1968 	int len, err;
1969 	int section_cnt_downloaded = 0;
1970 	const struct firmware *firmware;
1971 
1972 	err = request_firmware(&firmware, path, dev->card->dev);
1973 	if (err < 0) {
1974 		snd_printk(KERN_ERR "firmware (%s) download failed!!!\n", path);
1975 		return 1;
1976 	}
1977 
1978 	len = 0;
1979 	buf = firmware->data;
1980 	for (;;) {
1981 		int section_length = *(signed char *)buf;
1982 		if (section_length == 0)
1983 			break;
1984 		if (section_length < 0 || section_length > WF_SECTION_MAX) {
1985 			snd_printk(KERN_ERR
1986 				   "invalid firmware section length %d\n",
1987 				   section_length);
1988 			goto failure;
1989 		}
1990 		buf++;
1991 		len++;
1992 
1993 		if (firmware->size < len + section_length) {
1994 			snd_printk(KERN_ERR "firmware section read error.\n");
1995 			goto failure;
1996 		}
1997 
1998 		/* Send command */
1999 		if (wavefront_write(dev, WFC_DOWNLOAD_OS))
2000 			goto failure;
2001 
2002 		for (; section_length; section_length--) {
2003 			if (wavefront_write(dev, *buf))
2004 				goto failure;
2005 			buf++;
2006 			len++;
2007 		}
2008 
2009 		/* get ACK */
2010 		if (!wavefront_wait(dev, STAT_CAN_READ)) {
2011 			snd_printk(KERN_ERR "time out for firmware ACK.\n");
2012 			goto failure;
2013 		}
2014 		err = inb(dev->data_port);
2015 		if (err != WF_ACK) {
2016 			snd_printk(KERN_ERR
2017 				   "download of section #%d not "
2018 				   "acknowledged, ack = 0x%x\n",
2019 				   section_cnt_downloaded + 1, err);
2020 			goto failure;
2021 		}
2022 
2023 		section_cnt_downloaded++;
2024 	}
2025 
2026 	release_firmware(firmware);
2027 	return 0;
2028 
2029  failure:
2030 	release_firmware(firmware);
2031 	snd_printk(KERN_ERR "firmware download failed!!!\n");
2032 	return 1;
2033 }
2034 
2035 
2036 static int
wavefront_do_reset(snd_wavefront_t * dev)2037 wavefront_do_reset (snd_wavefront_t *dev)
2038 
2039 {
2040 	char voices[1];
2041 
2042 	if (wavefront_reset_to_cleanliness (dev)) {
2043 		snd_printk ("hw reset failed.\n");
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) {
2067 			snd_printk ("no post-OS interrupt.\n");
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) {
2077 			snd_printk ("no post-OS interrupt(2).\n");
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 
2093 	dev->freemem = wavefront_freemem(dev);
2094 	if (dev->freemem < 0)
2095 		goto gone_bad;
2096 
2097 	snd_printk ("available DRAM %dk\n", dev->freemem / 1024);
2098 
2099 	if (wavefront_write (dev, 0xf0) ||
2100 	    wavefront_write (dev, 1) ||
2101 	    (wavefront_read (dev) < 0)) {
2102 		dev->debug = 0;
2103 		snd_printk ("MPU emulation mode not set.\n");
2104 		goto gone_bad;
2105 	}
2106 
2107 	voices[0] = 32;
2108 
2109 	if (snd_wavefront_cmd (dev, WFC_SET_NVOICES, NULL, voices)) {
2110 		snd_printk ("cannot set number of voices to 32.\n");
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 
2125 int
snd_wavefront_start(snd_wavefront_t * dev)2126 snd_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 
2167 int
snd_wavefront_detect(snd_wavefront_card_t * card)2168 snd_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 
2190 		snd_printk ("firmware %d.%d already loaded.\n",
2191 			    rbuf[0], rbuf[1]);
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 {
2200 			snd_printk ("not raw, but no "
2201 				    "hardware version!\n");
2202 			return -1;
2203 		}
2204 
2205 		if (!wf_raw) {
2206 			return 0;
2207 		} else {
2208 			snd_printk ("reloading firmware as you requested.\n");
2209 			dev->israw = 1;
2210 		}
2211 
2212 	} else {
2213 
2214 		dev->israw = 1;
2215 		snd_printk ("no response to firmware probe, assume raw.\n");
2216 
2217 	}
2218 
2219 	return 0;
2220 }
2221 
2222 MODULE_FIRMWARE(DEFAULT_OSPATH);
2223