Linux Audio

Check our new training course

Loading...
v3.1
 
  1/*
  2 *  Copyright (c) 1998-2002 by Paul Davis <pbd@op.net>
  3 *
  4 *  This program is free software; you can redistribute it and/or modify
  5 *  it under the terms of the GNU General Public License as published by
  6 *  the Free Software Foundation; either version 2 of the License, or
  7 *  (at your option) any later version.
  8 *
  9 *  This program is distributed in the hope that it will be useful,
 10 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 11 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 12 *  GNU General Public License for more details.
 13 *
 14 *  You should have received a copy of the GNU General Public License
 15 *  along with this program; if not, write to the Free Software
 16 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 17 */
 18
 19#include <asm/io.h>
 20#include <linux/init.h>
 21#include <linux/time.h>
 22#include <linux/wait.h>
 23#include <linux/slab.h>
 
 24#include <linux/firmware.h>
 25#include <sound/core.h>
 26#include <sound/snd_wavefront.h>
 27#include <sound/initval.h>
 28
 29/* Control bits for the Load Control Register
 30 */
 31
 32#define FX_LSB_TRANSFER 0x01    /* transfer after DSP LSB byte written */
 33#define FX_MSB_TRANSFER 0x02    /* transfer after DSP MSB byte written */
 34#define FX_AUTO_INCR    0x04    /* auto-increment DSP address after transfer */
 35
 36#define WAIT_IDLE	0xff
 37
 38static int
 39wavefront_fx_idle (snd_wavefront_t *dev)
 40
 41{
 42	int i;
 43	unsigned int x = 0x80;
 44
 45	for (i = 0; i < 1000; i++) {
 46		x = inb (dev->fx_status);
 47		if ((x & 0x80) == 0) {
 48			break;
 49		}
 50	}
 51
 52	if (x & 0x80) {
 53		snd_printk ("FX device never idle.\n");
 54		return 0;
 55	}
 56
 57	return (1);
 58}
 59
 60static void
 61wavefront_fx_mute (snd_wavefront_t *dev, int onoff)
 62
 63{
 64	if (!wavefront_fx_idle(dev)) {
 65		return;
 66	}
 67
 68	outb (onoff ? 0x02 : 0x00, dev->fx_op);
 69}
 70
 71static int
 72wavefront_fx_memset (snd_wavefront_t *dev,
 73		     int page,
 74		     int addr,
 75		     int cnt,
 76		     unsigned short *data)
 77{
 78	if (page < 0 || page > 7) {
 79		snd_printk ("FX memset: "
 80			"page must be >= 0 and <= 7\n");
 81		return -(EINVAL);
 82	}
 83
 84	if (addr < 0 || addr > 0x7f) {
 85		snd_printk ("FX memset: "
 86			"addr must be >= 0 and <= 7f\n");
 87		return -(EINVAL);
 88	}
 89
 90	if (cnt == 1) {
 91
 92		outb (FX_LSB_TRANSFER, dev->fx_lcr);
 93		outb (page, dev->fx_dsp_page);
 94		outb (addr, dev->fx_dsp_addr);
 95		outb ((data[0] >> 8), dev->fx_dsp_msb);
 96		outb ((data[0] & 0xff), dev->fx_dsp_lsb);
 97
 98		snd_printk ("FX: addr %d:%x set to 0x%x\n",
 99			page, addr, data[0]);
100
101	} else {
102		int i;
103
104		outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev->fx_lcr);
105		outb (page, dev->fx_dsp_page);
106		outb (addr, dev->fx_dsp_addr);
107
108		for (i = 0; i < cnt; i++) {
109			outb ((data[i] >> 8), dev->fx_dsp_msb);
110			outb ((data[i] & 0xff), dev->fx_dsp_lsb);
111			if (!wavefront_fx_idle (dev)) {
112				break;
113			}
114		}
115
116		if (i != cnt) {
117			snd_printk ("FX memset "
118				    "(0x%x, 0x%x, 0x%lx, %d) incomplete\n",
119				    page, addr, (unsigned long) data, cnt);
120			return -(EIO);
121		}
122	}
123
124	return 0;
125}
126
127int
128snd_wavefront_fx_detect (snd_wavefront_t *dev)
129
130{
131	/* This is a crude check, but its the best one I have for now.
132	   Certainly on the Maui and the Tropez, wavefront_fx_idle() will
133	   report "never idle", which suggests that this test should
134	   work OK.
135	*/
136
137	if (inb (dev->fx_status) & 0x80) {
138		snd_printk ("Hmm, probably a Maui or Tropez.\n");
139		return -1;
140	}
141
142	return 0;
143}
144
145int
146snd_wavefront_fx_open (struct snd_hwdep *hw, struct file *file)
147
148{
149	if (!try_module_get(hw->card->module))
150		return -EFAULT;
151	file->private_data = hw;
152	return 0;
153}
154
155int 
156snd_wavefront_fx_release (struct snd_hwdep *hw, struct file *file)
157
158{
159	module_put(hw->card->module);
160	return 0;
161}
162
163int
164snd_wavefront_fx_ioctl (struct snd_hwdep *sdev, struct file *file,
165			unsigned int cmd, unsigned long arg)
166
167{
168	struct snd_card *card;
169	snd_wavefront_card_t *acard;
170	snd_wavefront_t *dev;
171	wavefront_fx_info r;
172	unsigned short *page_data = NULL;
173	unsigned short *pd;
174	int err = 0;
175
176	card = sdev->card;
177	if (snd_BUG_ON(!card))
178		return -ENODEV;
179	if (snd_BUG_ON(!card->private_data))
180		return -ENODEV;
181
182	acard = card->private_data;
183	dev = &acard->wavefront;
184
185	if (copy_from_user (&r, (void __user *)arg, sizeof (wavefront_fx_info)))
186		return -EFAULT;
187
188	switch (r.request) {
189	case WFFX_MUTE:
190		wavefront_fx_mute (dev, r.data[0]);
191		return -EIO;
192
193	case WFFX_MEMSET:
194		if (r.data[2] <= 0) {
195			snd_printk ("cannot write "
196				"<= 0 bytes to FX\n");
197			return -EIO;
198		} else if (r.data[2] == 1) {
199			pd = (unsigned short *) &r.data[3];
200		} else {
201			if (r.data[2] > 256) {
202				snd_printk ("cannot write "
203					    "> 512 bytes to FX\n");
204				return -EIO;
205			}
206			page_data = memdup_user((unsigned char __user *)
207						r.data[3],
208						r.data[2] * sizeof(short));
209			if (IS_ERR(page_data))
210				return PTR_ERR(page_data);
211			pd = page_data;
212		}
213
214		err = wavefront_fx_memset (dev,
215			     r.data[0], /* page */
216			     r.data[1], /* addr */
217			     r.data[2], /* cnt */
218			     pd);
219		kfree(page_data);
220		break;
221
222	default:
223		snd_printk ("FX: ioctl %d not yet supported\n",
224			    r.request);
225		return -ENOTTY;
226	}
227	return err;
228}
229
230/* YSS225 initialization.
231
232   This code was developed using DOSEMU. The Turtle Beach SETUPSND
233   utility was run with I/O tracing in DOSEMU enabled, and a reconstruction
234   of the port I/O done, using the Yamaha faxback document as a guide
235   to add more logic to the code. Its really pretty weird.
236
237   This is the approach of just dumping the whole I/O
238   sequence as a series of port/value pairs and a simple loop
239   that outputs it.
240*/
241
242int __devinit
243snd_wavefront_fx_start (snd_wavefront_t *dev)
244{
245	unsigned int i;
246	int err;
247	const struct firmware *firmware = NULL;
248
249	if (dev->fx_initialized)
250		return 0;
251
252	err = request_firmware(&firmware, "yamaha/yss225_registers.bin",
253			       dev->card->dev);
254	if (err < 0) {
255		err = -1;
256		goto out;
257	}
258
259	for (i = 0; i + 1 < firmware->size; i += 2) {
260		if (firmware->data[i] >= 8 && firmware->data[i] < 16) {
261			outb(firmware->data[i + 1],
262			     dev->base + firmware->data[i]);
263		} else if (firmware->data[i] == WAIT_IDLE) {
264			if (!wavefront_fx_idle(dev)) {
265				err = -1;
266				goto out;
267			}
268		} else {
269			snd_printk(KERN_ERR "invalid address"
270				   " in register data\n");
271			err = -1;
272			goto out;
273		}
274	}
275
276	dev->fx_initialized = 1;
277	err = 0;
278
279out:
280	release_firmware(firmware);
281	return err;
282}
283
284MODULE_FIRMWARE("yamaha/yss225_registers.bin");
v5.9
  1// SPDX-License-Identifier: GPL-2.0-or-later
  2/*
  3 *  Copyright (c) 1998-2002 by Paul Davis <pbd@op.net>
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  4 */
  5
  6#include <linux/io.h>
  7#include <linux/init.h>
  8#include <linux/time.h>
  9#include <linux/wait.h>
 10#include <linux/slab.h>
 11#include <linux/module.h>
 12#include <linux/firmware.h>
 13#include <sound/core.h>
 14#include <sound/snd_wavefront.h>
 15#include <sound/initval.h>
 16
 17/* Control bits for the Load Control Register
 18 */
 19
 20#define FX_LSB_TRANSFER 0x01    /* transfer after DSP LSB byte written */
 21#define FX_MSB_TRANSFER 0x02    /* transfer after DSP MSB byte written */
 22#define FX_AUTO_INCR    0x04    /* auto-increment DSP address after transfer */
 23
 24#define WAIT_IDLE	0xff
 25
 26static int
 27wavefront_fx_idle (snd_wavefront_t *dev)
 28
 29{
 30	int i;
 31	unsigned int x = 0x80;
 32
 33	for (i = 0; i < 1000; i++) {
 34		x = inb (dev->fx_status);
 35		if ((x & 0x80) == 0) {
 36			break;
 37		}
 38	}
 39
 40	if (x & 0x80) {
 41		snd_printk ("FX device never idle.\n");
 42		return 0;
 43	}
 44
 45	return (1);
 46}
 47
 48static void
 49wavefront_fx_mute (snd_wavefront_t *dev, int onoff)
 50
 51{
 52	if (!wavefront_fx_idle(dev)) {
 53		return;
 54	}
 55
 56	outb (onoff ? 0x02 : 0x00, dev->fx_op);
 57}
 58
 59static int
 60wavefront_fx_memset (snd_wavefront_t *dev,
 61		     int page,
 62		     int addr,
 63		     int cnt,
 64		     unsigned short *data)
 65{
 66	if (page < 0 || page > 7) {
 67		snd_printk ("FX memset: "
 68			"page must be >= 0 and <= 7\n");
 69		return -EINVAL;
 70	}
 71
 72	if (addr < 0 || addr > 0x7f) {
 73		snd_printk ("FX memset: "
 74			"addr must be >= 0 and <= 7f\n");
 75		return -EINVAL;
 76	}
 77
 78	if (cnt == 1) {
 79
 80		outb (FX_LSB_TRANSFER, dev->fx_lcr);
 81		outb (page, dev->fx_dsp_page);
 82		outb (addr, dev->fx_dsp_addr);
 83		outb ((data[0] >> 8), dev->fx_dsp_msb);
 84		outb ((data[0] & 0xff), dev->fx_dsp_lsb);
 85
 86		snd_printk ("FX: addr %d:%x set to 0x%x\n",
 87			page, addr, data[0]);
 88
 89	} else {
 90		int i;
 91
 92		outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev->fx_lcr);
 93		outb (page, dev->fx_dsp_page);
 94		outb (addr, dev->fx_dsp_addr);
 95
 96		for (i = 0; i < cnt; i++) {
 97			outb ((data[i] >> 8), dev->fx_dsp_msb);
 98			outb ((data[i] & 0xff), dev->fx_dsp_lsb);
 99			if (!wavefront_fx_idle (dev)) {
100				break;
101			}
102		}
103
104		if (i != cnt) {
105			snd_printk ("FX memset "
106				    "(0x%x, 0x%x, 0x%lx, %d) incomplete\n",
107				    page, addr, (unsigned long) data, cnt);
108			return -EIO;
109		}
110	}
111
112	return 0;
113}
114
115int
116snd_wavefront_fx_detect (snd_wavefront_t *dev)
117
118{
119	/* This is a crude check, but its the best one I have for now.
120	   Certainly on the Maui and the Tropez, wavefront_fx_idle() will
121	   report "never idle", which suggests that this test should
122	   work OK.
123	*/
124
125	if (inb (dev->fx_status) & 0x80) {
126		snd_printk ("Hmm, probably a Maui or Tropez.\n");
127		return -1;
128	}
129
130	return 0;
131}
132
133int
134snd_wavefront_fx_open (struct snd_hwdep *hw, struct file *file)
135
136{
137	if (!try_module_get(hw->card->module))
138		return -EFAULT;
139	file->private_data = hw;
140	return 0;
141}
142
143int 
144snd_wavefront_fx_release (struct snd_hwdep *hw, struct file *file)
145
146{
147	module_put(hw->card->module);
148	return 0;
149}
150
151int
152snd_wavefront_fx_ioctl (struct snd_hwdep *sdev, struct file *file,
153			unsigned int cmd, unsigned long arg)
154
155{
156	struct snd_card *card;
157	snd_wavefront_card_t *acard;
158	snd_wavefront_t *dev;
159	wavefront_fx_info r;
160	unsigned short *page_data = NULL;
161	unsigned short *pd;
162	int err = 0;
163
164	card = sdev->card;
165	if (snd_BUG_ON(!card))
166		return -ENODEV;
167	if (snd_BUG_ON(!card->private_data))
168		return -ENODEV;
169
170	acard = card->private_data;
171	dev = &acard->wavefront;
172
173	if (copy_from_user (&r, (void __user *)arg, sizeof (wavefront_fx_info)))
174		return -EFAULT;
175
176	switch (r.request) {
177	case WFFX_MUTE:
178		wavefront_fx_mute (dev, r.data[0]);
179		return -EIO;
180
181	case WFFX_MEMSET:
182		if (r.data[2] <= 0) {
183			snd_printk ("cannot write "
184				"<= 0 bytes to FX\n");
185			return -EIO;
186		} else if (r.data[2] == 1) {
187			pd = (unsigned short *) &r.data[3];
188		} else {
189			if (r.data[2] > 256) {
190				snd_printk ("cannot write "
191					    "> 512 bytes to FX\n");
192				return -EIO;
193			}
194			page_data = memdup_user((unsigned char __user *)
195						r.data[3],
196						r.data[2] * sizeof(short));
197			if (IS_ERR(page_data))
198				return PTR_ERR(page_data);
199			pd = page_data;
200		}
201
202		err = wavefront_fx_memset (dev,
203			     r.data[0], /* page */
204			     r.data[1], /* addr */
205			     r.data[2], /* cnt */
206			     pd);
207		kfree(page_data);
208		break;
209
210	default:
211		snd_printk ("FX: ioctl %d not yet supported\n",
212			    r.request);
213		return -ENOTTY;
214	}
215	return err;
216}
217
218/* YSS225 initialization.
219
220   This code was developed using DOSEMU. The Turtle Beach SETUPSND
221   utility was run with I/O tracing in DOSEMU enabled, and a reconstruction
222   of the port I/O done, using the Yamaha faxback document as a guide
223   to add more logic to the code. Its really pretty weird.
224
225   This is the approach of just dumping the whole I/O
226   sequence as a series of port/value pairs and a simple loop
227   that outputs it.
228*/
229
230int
231snd_wavefront_fx_start (snd_wavefront_t *dev)
232{
233	unsigned int i;
234	int err;
235	const struct firmware *firmware = NULL;
236
237	if (dev->fx_initialized)
238		return 0;
239
240	err = request_firmware(&firmware, "yamaha/yss225_registers.bin",
241			       dev->card->dev);
242	if (err < 0) {
243		err = -1;
244		goto out;
245	}
246
247	for (i = 0; i + 1 < firmware->size; i += 2) {
248		if (firmware->data[i] >= 8 && firmware->data[i] < 16) {
249			outb(firmware->data[i + 1],
250			     dev->base + firmware->data[i]);
251		} else if (firmware->data[i] == WAIT_IDLE) {
252			if (!wavefront_fx_idle(dev)) {
253				err = -1;
254				goto out;
255			}
256		} else {
257			snd_printk(KERN_ERR "invalid address"
258				   " in register data\n");
259			err = -1;
260			goto out;
261		}
262	}
263
264	dev->fx_initialized = 1;
265	err = 0;
266
267out:
268	release_firmware(firmware);
269	return err;
270}
271
272MODULE_FIRMWARE("yamaha/yss225_registers.bin");