[linux-block.git] / drivers / char / dsp56k.c

/*
 * The DSP56001 Device Driver, saviour of the Free World(tm)
 *
 * Authors: Fredrik Noring   <noring@nocrew.org>
 *          lars brinkhoff   <lars@nocrew.org>
 *          Tomas Berndtsson <tomas@nocrew.org>
 *
 * First version May 1996
 *
 * History:
 *  97-01-29   Tomas Berndtsson,
 *               Integrated with Linux 2.1.21 kernel sources.
 *  97-02-15   Tomas Berndtsson,
 *               Fixed for kernel 2.1.26
 *
 * BUGS:
 *  Hmm... there must be something here :)
 *
 * Copyright (C) 1996,1997 Fredrik Noring, lars brinkhoff & Tomas Berndtsson
 *
 * This file is subject to the terms and conditions of the GNU General Public
 * License.  See the file COPYING in the main directory of this archive
 * for more details.
 */

#include <linux/module.h>
#include <linux/major.h>
#include <linux/types.h>
#include <linux/errno.h>
#include <linux/delay.h>	/* guess what */
#include <linux/fs.h>
#include <linux/mm.h>
#include <linux/init.h>
#include <linux/device.h>
#include <linux/smp_lock.h>
#include <linux/firmware.h>
#include <linux/platform_device.h>
#include <linux/uaccess.h>	/* For put_user and get_user */

#include <asm/atarihw.h>
#include <asm/traps.h>

#include <asm/dsp56k.h>

/* minor devices */
#define DSP56K_DEV_56001        0    /* The only device so far */

#define TIMEOUT    10   /* Host port timeout in number of tries */
#define MAXIO    2048   /* Maximum number of words before sleep */
#define DSP56K_MAX_BINARY_LENGTH (3*64*1024)

#define DSP56K_TX_INT_ON	dsp56k_host_interface.icr |=  DSP56K_ICR_TREQ
#define DSP56K_RX_INT_ON	dsp56k_host_interface.icr |=  DSP56K_ICR_RREQ
#define DSP56K_TX_INT_OFF	dsp56k_host_interface.icr &= ~DSP56K_ICR_TREQ
#define DSP56K_RX_INT_OFF	dsp56k_host_interface.icr &= ~DSP56K_ICR_RREQ

#define DSP56K_TRANSMIT		(dsp56k_host_interface.isr & DSP56K_ISR_TXDE)
#define DSP56K_RECEIVE		(dsp56k_host_interface.isr & DSP56K_ISR_RXDF)

#define handshake(count, maxio, timeout, ENABLE, f) \
{ \
	long i, t, m; \
	while (count > 0) { \
		m = min_t(unsigned long, count, maxio); \
		for (i = 0; i < m; i++) { \
			for (t = 0; t < timeout && !ENABLE; t++) \
				msleep(20); \
			if(!ENABLE) \
				return -EIO; \
			f; \
		} \
		count -= m; \
		if (m == maxio) msleep(20); \
	} \
}

#define tx_wait(n) \
{ \
	int t; \
	for(t = 0; t < n && !DSP56K_TRANSMIT; t++) \
		msleep(10); \
	if(!DSP56K_TRANSMIT) { \
		return -EIO; \
	} \
}

#define rx_wait(n) \
{ \
	int t; \
	for(t = 0; t < n && !DSP56K_RECEIVE; t++) \
		msleep(10); \
	if(!DSP56K_RECEIVE) { \
		return -EIO; \
	} \
}

static struct dsp56k_device {
	unsigned long in_use;
	long maxio, timeout;
	int tx_wsize, rx_wsize;
} dsp56k;

static struct class *dsp56k_class;

static int dsp56k_reset(void)
{
	u_char status;
	
	/* Power down the DSP */
	sound_ym.rd_data_reg_sel = 14;
	status = sound_ym.rd_data_reg_sel & 0xef;
	sound_ym.wd_data = status;
	sound_ym.wd_data = status | 0x10;
  
	udelay(10);
  
	/* Power up the DSP */
	sound_ym.rd_data_reg_sel = 14;
	sound_ym.wd_data = sound_ym.rd_data_reg_sel & 0xef;

	return 0;
}

static int dsp56k_upload(u_char __user *bin, int len)
{
	struct platform_device *pdev;
	const struct firmware *fw;
	const char fw_name[] = "dsp56k/bootstrap.bin";
	int err;
	int i;

	dsp56k_reset();

	pdev = platform_device_register_simple("dsp56k", 0, NULL, 0);
	if (IS_ERR(pdev)) {
		printk(KERN_ERR "Failed to register device for \"%s\"\n",
		       fw_name);
		return -EINVAL;
	}
	err = request_firmware(&fw, fw_name, &pdev->dev);
	platform_device_unregister(pdev);
	if (err) {
		printk(KERN_ERR "Failed to load image \"%s\" err %d\n",
		       fw_name, err);
		return err;
	}
	if (fw->size % 3) {
		printk(KERN_ERR "Bogus length %d in image \"%s\"\n",
		       fw->size, fw_name);
		release_firmware(fw);
		return -EINVAL;
	}
	for (i = 0; i < fw->size; i = i + 3) {
		/* tx_wait(10); */
		dsp56k_host_interface.data.b[1] = fw->data[i];
		dsp56k_host_interface.data.b[2] = fw->data[i + 1];
		dsp56k_host_interface.data.b[3] = fw->data[i + 2];
	}
	release_firmware(fw);
	for (; i < 512; i++) {
		/* tx_wait(10); */
		dsp56k_host_interface.data.b[1] = 0;
		dsp56k_host_interface.data.b[2] = 0;
		dsp56k_host_interface.data.b[3] = 0;
	}
  
	for (i = 0; i < len; i++) {
		tx_wait(10);
		get_user(dsp56k_host_interface.data.b[1], bin++);
		get_user(dsp56k_host_interface.data.b[2], bin++);
		get_user(dsp56k_host_interface.data.b[3], bin++);
	}

	tx_wait(10);
	dsp56k_host_interface.data.l = 3;    /* Magic execute */

	return 0;
}

static ssize_t dsp56k_read(struct file *file, char __user *buf, size_t count,
			   loff_t *ppos)
{
	struct inode *inode = file->f_path.dentry->d_inode;
	int dev = iminor(inode) & 0x0f;

	switch(dev)
	{
	case DSP56K_DEV_56001:
	{

		long n;

		/* Don't do anything if nothing is to be done */
		if (!count) return 0;

		n = 0;
		switch (dsp56k.rx_wsize) {
		case 1:  /* 8 bit */
		{
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
				  put_user(dsp56k_host_interface.data.b[3], buf+n++));
			return n;
		}
		case 2:  /* 16 bit */
		{
			short __user *data;

			count /= 2;
			data = (short __user *) buf;
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
				  put_user(dsp56k_host_interface.data.w[1], data+n++));
			return 2*n;
		}
		case 3:  /* 24 bit */
		{
			count /= 3;
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
				  put_user(dsp56k_host_interface.data.b[1], buf+n++);
				  put_user(dsp56k_host_interface.data.b[2], buf+n++);
				  put_user(dsp56k_host_interface.data.b[3], buf+n++));
			return 3*n;
		}
		case 4:  /* 32 bit */
		{
			long __user *data;

			count /= 4;
			data = (long __user *) buf;
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
				  put_user(dsp56k_host_interface.data.l, data+n++));
			return 4*n;
		}
		}
		return -EFAULT;
	}

	default:
		printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
		return -ENXIO;
	}
}

static ssize_t dsp56k_write(struct file *file, const char __user *buf, size_t count,
			    loff_t *ppos)
{
	struct inode *inode = file->f_path.dentry->d_inode;
	int dev = iminor(inode) & 0x0f;

	switch(dev)
	{
	case DSP56K_DEV_56001:
	{
		long n;

		/* Don't do anything if nothing is to be done */
		if (!count) return 0;

		n = 0;
		switch (dsp56k.tx_wsize) {
		case 1:  /* 8 bit */
		{
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
				  get_user(dsp56k_host_interface.data.b[3], buf+n++));
			return n;
		}
		case 2:  /* 16 bit */
		{
			const short __user *data;

			count /= 2;
			data = (const short __user *)buf;
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
				  get_user(dsp56k_host_interface.data.w[1], data+n++));
			return 2*n;
		}
		case 3:  /* 24 bit */
		{
			count /= 3;
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
				  get_user(dsp56k_host_interface.data.b[1], buf+n++);
				  get_user(dsp56k_host_interface.data.b[2], buf+n++);
				  get_user(dsp56k_host_interface.data.b[3], buf+n++));
			return 3*n;
		}
		case 4:  /* 32 bit */
		{
			const long __user *data;

			count /= 4;
			data = (const long __user *)buf;
			handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
				  get_user(dsp56k_host_interface.data.l, data+n++));
			return 4*n;
		}
		}

		return -EFAULT;
	}
	default:
		printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
		return -ENXIO;
	}
}

static long dsp56k_ioctl(struct file *file, unsigned int cmd,
			 unsigned long arg)
{
	int dev = iminor(file->f_path.dentry->d_inode) & 0x0f;
	void __user *argp = (void __user *)arg;

	switch(dev)
	{
	case DSP56K_DEV_56001:

		switch(cmd) {
		case DSP56K_UPLOAD:
		{
			char __user *bin;
			int r, len;
			struct dsp56k_upload __user *binary = argp;
    
			if(get_user(len, &binary->len) < 0)
				return -EFAULT;
			if(get_user(bin, &binary->bin) < 0)
				return -EFAULT;
		
			if (len == 0) {
				return -EINVAL;      /* nothing to upload?!? */
			}
			if (len > DSP56K_MAX_BINARY_LENGTH) {
				return -EINVAL;
			}
			lock_kernel();
			r = dsp56k_upload(bin, len);
			unlock_kernel();
			if (r < 0) {
				return r;
			}
    
			break;
		}
		case DSP56K_SET_TX_WSIZE:
			if (arg > 4 || arg < 1)
				return -EINVAL;
			lock_kernel();
			dsp56k.tx_wsize = (int) arg;
			unlock_kernel();
			break;
		case DSP56K_SET_RX_WSIZE:
			if (arg > 4 || arg < 1)
				return -EINVAL;
			lock_kernel();
			dsp56k.rx_wsize = (int) arg;
			unlock_kernel();
			break;
		case DSP56K_HOST_FLAGS:
		{
			int dir, out, status;
			struct dsp56k_host_flags __user *hf = argp;
    
			if(get_user(dir, &hf->dir) < 0)
				return -EFAULT;
			if(get_user(out, &hf->out) < 0)
				return -EFAULT;

			lock_kernel();
			if ((dir & 0x1) && (out & 0x1))
				dsp56k_host_interface.icr |= DSP56K_ICR_HF0;
			else if (dir & 0x1)
				dsp56k_host_interface.icr &= ~DSP56K_ICR_HF0;
			if ((dir & 0x2) && (out & 0x2))
				dsp56k_host_interface.icr |= DSP56K_ICR_HF1;
			else if (dir & 0x2)
				dsp56k_host_interface.icr &= ~DSP56K_ICR_HF1;

			status = 0;
			if (dsp56k_host_interface.icr & DSP56K_ICR_HF0) status |= 0x1;
			if (dsp56k_host_interface.icr & DSP56K_ICR_HF1) status |= 0x2;
			if (dsp56k_host_interface.isr & DSP56K_ISR_HF2) status |= 0x4;
			if (dsp56k_host_interface.isr & DSP56K_ISR_HF3) status |= 0x8;
			unlock_kernel();
			return put_user(status, &hf->status);
		}
		case DSP56K_HOST_CMD:
			if (arg > 31 || arg < 0)
				return -EINVAL;
			lock_kernel();
			dsp56k_host_interface.cvr = (u_char)((arg & DSP56K_CVR_HV_MASK) |
							     DSP56K_CVR_HC);
			unlock_kernel();
			break;
		default:
			return -EINVAL;
		}
		return 0;

	default:
		printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
		return -ENXIO;
	}
}

/* As of 2.1.26 this should be dsp56k_poll,
 * but how do I then check device minor number?
 * Do I need this function at all???
 */
#if 0
static unsigned int dsp56k_poll(struct file *file, poll_table *wait)
{
	int dev = iminor(file->f_path.dentry->d_inode) & 0x0f;

	switch(dev)
	{
	case DSP56K_DEV_56001:
		/* poll_wait(file, ???, wait); */
		return POLLIN | POLLRDNORM | POLLOUT;

	default:
		printk("DSP56k driver: Unknown minor device: %d\n", dev);
		return 0;
	}
}
#endif

static int dsp56k_open(struct inode *inode, struct file *file)
{
	int dev = iminor(inode) & 0x0f;
	int ret = 0;

	lock_kernel();
	switch(dev)
	{
	case DSP56K_DEV_56001:

		if (test_and_set_bit(0, &dsp56k.in_use)) {
			ret = -EBUSY;
			goto out;
		}

		dsp56k.timeout = TIMEOUT;
		dsp56k.maxio = MAXIO;
		dsp56k.rx_wsize = dsp56k.tx_wsize = 4; 

		DSP56K_TX_INT_OFF;
		DSP56K_RX_INT_OFF;

		/* Zero host flags */
		dsp56k_host_interface.icr &= ~DSP56K_ICR_HF0;
		dsp56k_host_interface.icr &= ~DSP56K_ICR_HF1;

		break;

	default:
		ret = -ENODEV;
	}
out:
	unlock_kernel();
	return ret;
}

static int dsp56k_release(struct inode *inode, struct file *file)
{
	int dev = iminor(inode) & 0x0f;

	switch(dev)
	{
	case DSP56K_DEV_56001:
		clear_bit(0, &dsp56k.in_use);
		break;
	default:
		printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
		return -ENXIO;
	}

	return 0;
}

static const struct file_operations dsp56k_fops = {
	.owner		= THIS_MODULE,
	.read		= dsp56k_read,
	.write		= dsp56k_write,
	.unlocked_ioctl	= dsp56k_ioctl,
	.open		= dsp56k_open,
	.release	= dsp56k_release,
};


/****** Init and module functions ******/

static char banner[] __initdata = KERN_INFO "DSP56k driver installed\n";

static int __init dsp56k_init_driver(void)
{
	int err = 0;

	if(!MACH_IS_ATARI || !ATARIHW_PRESENT(DSP56K)) {
		printk("DSP56k driver: Hardware not present\n");
		return -ENODEV;
	}

	if(register_chrdev(DSP56K_MAJOR, "dsp56k", &dsp56k_fops)) {
		printk("DSP56k driver: Unable to register driver\n");
		return -ENODEV;
	}
	dsp56k_class = class_create(THIS_MODULE, "dsp56k");
	if (IS_ERR(dsp56k_class)) {
		err = PTR_ERR(dsp56k_class);
		goto out_chrdev;
	}
	device_create(dsp56k_class, NULL, MKDEV(DSP56K_MAJOR, 0), NULL,
		      "dsp56k");

	printk(banner);
	goto out;

out_chrdev:
	unregister_chrdev(DSP56K_MAJOR, "dsp56k");
out:
	return err;
}
module_init(dsp56k_init_driver);

static void __exit dsp56k_cleanup_driver(void)
{
	device_destroy(dsp56k_class, MKDEV(DSP56K_MAJOR, 0));
	class_destroy(dsp56k_class);
	unregister_chrdev(DSP56K_MAJOR, "dsp56k");
}
module_exit(dsp56k_cleanup_driver);

MODULE_LICENSE("GPL");
MODULE_FIRMWARE("dsp56k/bootstrap.bin");
Commit	Line	Data
1da177e4 LT	1	/*
	2	* The DSP56001 Device Driver, saviour of the Free World(tm)
	3	*
	4	* Authors: Fredrik Noring <noring@nocrew.org>
	5	* lars brinkhoff <lars@nocrew.org>
	6	* Tomas Berndtsson <tomas@nocrew.org>
	7	*
	8	* First version May 1996
	9	*
	10	* History:
	11	* 97-01-29 Tomas Berndtsson,
	12	* Integrated with Linux 2.1.21 kernel sources.
	13	* 97-02-15 Tomas Berndtsson,
	14	* Fixed for kernel 2.1.26
	15	*
	16	* BUGS:
	17	* Hmm... there must be something here :)
	18	*
	19	* Copyright (C) 1996,1997 Fredrik Noring, lars brinkhoff & Tomas Berndtsson
	20	*
	21	* This file is subject to the terms and conditions of the GNU General Public
	22	* License. See the file COPYING in the main directory of this archive
	23	* for more details.
	24	*/
	25
	26	#include <linux/module.h>
1da177e4 LT	27	#include <linux/major.h>
	28	#include <linux/types.h>
	29	#include <linux/errno.h>
	30	#include <linux/delay.h> /* guess what */
	31	#include <linux/fs.h>
	32	#include <linux/mm.h>
	33	#include <linux/init.h>
1da177e4	34	#include <linux/device.h>
65f37b79	35	#include <linux/smp_lock.h>
7f127d5e JS	36	#include <linux/firmware.h>
7f127d5e JS	37	#include <linux/platform_device.h>
236b8756	38	#include <linux/uaccess.h> /* For put_user and get_user */
1da177e4 LT	39
	40	#include <asm/atarihw.h>
	41	#include <asm/traps.h>
1da177e4 LT	42
	43	#include <asm/dsp56k.h>
	44
	45	/* minor devices */
	46	#define DSP56K_DEV_56001 0 /* The only device so far */
	47
	48	#define TIMEOUT 10 /* Host port timeout in number of tries */
	49	#define MAXIO 2048 /* Maximum number of words before sleep */
	50	#define DSP56K_MAX_BINARY_LENGTH (3641024)
	51
	52	#define DSP56K_TX_INT_ON dsp56k_host_interface.icr \|= DSP56K_ICR_TREQ
	53	#define DSP56K_RX_INT_ON dsp56k_host_interface.icr \|= DSP56K_ICR_RREQ
	54	#define DSP56K_TX_INT_OFF dsp56k_host_interface.icr &= ~DSP56K_ICR_TREQ
	55	#define DSP56K_RX_INT_OFF dsp56k_host_interface.icr &= ~DSP56K_ICR_RREQ
	56
	57	#define DSP56K_TRANSMIT (dsp56k_host_interface.isr & DSP56K_ISR_TXDE)
	58	#define DSP56K_RECEIVE (dsp56k_host_interface.isr & DSP56K_ISR_RXDF)
	59
	60	#define handshake(count, maxio, timeout, ENABLE, f) \
	61	{ \
	62	long i, t, m; \
	63	while (count > 0) { \
	64	m = min_t(unsigned long, count, maxio); \
	65	for (i = 0; i < m; i++) { \
	66	for (t = 0; t < timeout && !ENABLE; t++) \
	67	msleep(20); \
	68	if(!ENABLE) \
	69	return -EIO; \
	70	f; \
	71	} \
	72	count -= m; \
	73	if (m == maxio) msleep(20); \
	74	} \
	75	}
	76
	77	#define tx_wait(n) \
	78	{ \
	79	int t; \
	80	for(t = 0; t < n && !DSP56K_TRANSMIT; t++) \
	81	msleep(10); \
	82	if(!DSP56K_TRANSMIT) { \
	83	return -EIO; \
	84	} \
	85	}
	86
	87	#define rx_wait(n) \
	88	{ \
	89	int t; \
	90	for(t = 0; t < n && !DSP56K_RECEIVE; t++) \
	91	msleep(10); \
	92	if(!DSP56K_RECEIVE) { \
	93	return -EIO; \
	94	} \
	95	}
	96
1da177e4	97	static struct dsp56k_device {
64b33619	98	unsigned long in_use;
1da177e4 LT	99	long maxio, timeout;
	100	int tx_wsize, rx_wsize;
	101	} dsp56k;
	102
ca8eca68	103	static struct class *dsp56k_class;
1da177e4 LT	104
	105	static int dsp56k_reset(void)
	106	{
	107	u_char status;
	108
	109	/* Power down the DSP */
	110	sound_ym.rd_data_reg_sel = 14;
	111	status = sound_ym.rd_data_reg_sel & 0xef;
	112	sound_ym.wd_data = status;
	113	sound_ym.wd_data = status \| 0x10;
	114
	115	udelay(10);
	116
	117	/* Power up the DSP */
	118	sound_ym.rd_data_reg_sel = 14;
	119	sound_ym.wd_data = sound_ym.rd_data_reg_sel & 0xef;
	120
	121	return 0;
	122	}
	123
d85f6891	124	static int dsp56k_upload(u_char __user *bin, int len)
1da177e4	125	{
7f127d5e JS	126	struct platform_device *pdev;
	127	const struct firmware *fw;
	128	const char fw_name[] = "dsp56k/bootstrap.bin";
	129	int err;
1da177e4	130	int i;
7f127d5e	131
1da177e4	132	dsp56k_reset();
7f127d5e JS	133
	134	pdev = platform_device_register_simple("dsp56k", 0, NULL, 0);
	135	if (IS_ERR(pdev)) {
	136	printk(KERN_ERR "Failed to register device for \"%s\"\n",
	137	fw_name);
	138	return -EINVAL;
	139	}
	140	err = request_firmware(&fw, fw_name, &pdev->dev);
	141	platform_device_unregister(pdev);
	142	if (err) {
	143	printk(KERN_ERR "Failed to load image \"%s\" err %d\n",
	144	fw_name, err);
	145	return err;
	146	}
	147	if (fw->size % 3) {
	148	printk(KERN_ERR "Bogus length %d in image \"%s\"\n",
	149	fw->size, fw_name);
	150	release_firmware(fw);
	151	return -EINVAL;
	152	}
	153	for (i = 0; i < fw->size; i = i + 3) {
1da177e4	154	/* tx_wait(10); */
7f127d5e JS	155	dsp56k_host_interface.data.b[1] = fw->data[i];
	156	dsp56k_host_interface.data.b[2] = fw->data[i + 1];
	157	dsp56k_host_interface.data.b[3] = fw->data[i + 2];
1da177e4	158	}
7f127d5e	159	release_firmware(fw);
1da177e4 LT	160	for (; i < 512; i++) {
	161	/* tx_wait(10); */
	162	dsp56k_host_interface.data.b[1] = 0;
	163	dsp56k_host_interface.data.b[2] = 0;
	164	dsp56k_host_interface.data.b[3] = 0;
	165	}
	166
	167	for (i = 0; i < len; i++) {
	168	tx_wait(10);
	169	get_user(dsp56k_host_interface.data.b[1], bin++);
	170	get_user(dsp56k_host_interface.data.b[2], bin++);
	171	get_user(dsp56k_host_interface.data.b[3], bin++);
	172	}
	173
	174	tx_wait(10);
	175	dsp56k_host_interface.data.l = 3; /* Magic execute */
	176
	177	return 0;
	178	}
	179
d85f6891	180	static ssize_t dsp56k_read(struct file file, char __user buf, size_t count,
1da177e4 LT	181	loff_t *ppos)
1da177e4 LT	182	{
a7113a96	183	struct inode *inode = file->f_path.dentry->d_inode;
1da177e4 LT	184	int dev = iminor(inode) & 0x0f;
	185
	186	switch(dev)
	187	{
	188	case DSP56K_DEV_56001:
	189	{
	190
	191	long n;
	192
	193	/* Don't do anything if nothing is to be done */
	194	if (!count) return 0;
	195
	196	n = 0;
	197	switch (dsp56k.rx_wsize) {
	198	case 1: /* 8 bit */
	199	{
	200	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
	201	put_user(dsp56k_host_interface.data.b[3], buf+n++));
	202	return n;
	203	}
	204	case 2: /* 16 bit */
	205	{
d85f6891	206	short __user *data;
1da177e4 LT	207
1da177e4 LT	208	count /= 2;
d85f6891	209	data = (short __user *) buf;
1da177e4 LT	210	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
	211	put_user(dsp56k_host_interface.data.w[1], data+n++));
	212	return 2*n;
	213	}
	214	case 3: /* 24 bit */
	215	{
	216	count /= 3;
	217	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
	218	put_user(dsp56k_host_interface.data.b[1], buf+n++);
	219	put_user(dsp56k_host_interface.data.b[2], buf+n++);
	220	put_user(dsp56k_host_interface.data.b[3], buf+n++));
	221	return 3*n;
	222	}
	223	case 4: /* 32 bit */
	224	{
d85f6891	225	long __user *data;
1da177e4 LT	226
1da177e4 LT	227	count /= 4;
d85f6891	228	data = (long __user *) buf;
1da177e4 LT	229	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_RECEIVE,
	230	put_user(dsp56k_host_interface.data.l, data+n++));
	231	return 4*n;
	232	}
	233	}
	234	return -EFAULT;
	235	}
	236
	237	default:
	238	printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
	239	return -ENXIO;
	240	}
	241	}
	242
d85f6891	243	static ssize_t dsp56k_write(struct file file, const char __user buf, size_t count,
1da177e4 LT	244	loff_t *ppos)
1da177e4 LT	245	{
a7113a96	246	struct inode *inode = file->f_path.dentry->d_inode;
1da177e4 LT	247	int dev = iminor(inode) & 0x0f;
	248
	249	switch(dev)
	250	{
	251	case DSP56K_DEV_56001:
	252	{
	253	long n;
	254
	255	/* Don't do anything if nothing is to be done */
	256	if (!count) return 0;
	257
	258	n = 0;
	259	switch (dsp56k.tx_wsize) {
	260	case 1: /* 8 bit */
	261	{
	262	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
	263	get_user(dsp56k_host_interface.data.b[3], buf+n++));
	264	return n;
	265	}
	266	case 2: /* 16 bit */
	267	{
d85f6891	268	const short __user *data;
1da177e4 LT	269
1da177e4 LT	270	count /= 2;
d85f6891	271	data = (const short __user *)buf;
1da177e4 LT	272	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
	273	get_user(dsp56k_host_interface.data.w[1], data+n++));
	274	return 2*n;
	275	}
	276	case 3: /* 24 bit */
	277	{
	278	count /= 3;
	279	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
	280	get_user(dsp56k_host_interface.data.b[1], buf+n++);
	281	get_user(dsp56k_host_interface.data.b[2], buf+n++);
	282	get_user(dsp56k_host_interface.data.b[3], buf+n++));
	283	return 3*n;
	284	}
	285	case 4: /* 32 bit */
	286	{
d85f6891	287	const long __user *data;
1da177e4 LT	288
1da177e4 LT	289	count /= 4;
d85f6891	290	data = (const long __user *)buf;
1da177e4 LT	291	handshake(count, dsp56k.maxio, dsp56k.timeout, DSP56K_TRANSMIT,
	292	get_user(dsp56k_host_interface.data.l, data+n++));
	293	return 4*n;
	294	}
	295	}
	296
	297	return -EFAULT;
	298	}
	299	default:
	300	printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
	301	return -ENXIO;
	302	}
	303	}
	304
236b8756	305	static long dsp56k_ioctl(struct file *file, unsigned int cmd,
689796a1	306	unsigned long arg)
1da177e4	307	{
689796a1	308	int dev = iminor(file->f_path.dentry->d_inode) & 0x0f;
d85f6891	309	void __user argp = (void __user )arg;
1da177e4 LT	310
	311	switch(dev)
	312	{
	313	case DSP56K_DEV_56001:
	314
	315	switch(cmd) {
	316	case DSP56K_UPLOAD:
	317	{
d85f6891	318	char __user *bin;
1da177e4	319	int r, len;
d85f6891	320	struct dsp56k_upload __user *binary = argp;
1da177e4 LT	321
	322	if(get_user(len, &binary->len) < 0)
	323	return -EFAULT;
	324	if(get_user(bin, &binary->bin) < 0)
	325	return -EFAULT;
	326
	327	if (len == 0) {
	328	return -EINVAL; /* nothing to upload?!? */
	329	}
	330	if (len > DSP56K_MAX_BINARY_LENGTH) {
	331	return -EINVAL;
	332	}
236b8756	333	lock_kernel();
1da177e4	334	r = dsp56k_upload(bin, len);
236b8756	335	unlock_kernel();
1da177e4 LT	336	if (r < 0) {
	337	return r;
	338	}
	339
	340	break;
	341	}
	342	case DSP56K_SET_TX_WSIZE:
	343	if (arg > 4 \|\| arg < 1)
	344	return -EINVAL;
236b8756	345	lock_kernel();
1da177e4	346	dsp56k.tx_wsize = (int) arg;
236b8756	347	unlock_kernel();
1da177e4 LT	348	break;
	349	case DSP56K_SET_RX_WSIZE:
	350	if (arg > 4 \|\| arg < 1)
	351	return -EINVAL;
236b8756	352	lock_kernel();
1da177e4	353	dsp56k.rx_wsize = (int) arg;
236b8756	354	unlock_kernel();
1da177e4 LT	355	break;
	356	case DSP56K_HOST_FLAGS:
	357	{
	358	int dir, out, status;
d85f6891	359	struct dsp56k_host_flags __user *hf = argp;
1da177e4 LT	360
	361	if(get_user(dir, &hf->dir) < 0)
	362	return -EFAULT;
	363	if(get_user(out, &hf->out) < 0)
	364	return -EFAULT;
	365
236b8756	366	lock_kernel();
1da177e4 LT	367	if ((dir & 0x1) && (out & 0x1))
	368	dsp56k_host_interface.icr \|= DSP56K_ICR_HF0;
	369	else if (dir & 0x1)
	370	dsp56k_host_interface.icr &= ~DSP56K_ICR_HF0;
	371	if ((dir & 0x2) && (out & 0x2))
	372	dsp56k_host_interface.icr \|= DSP56K_ICR_HF1;
	373	else if (dir & 0x2)
	374	dsp56k_host_interface.icr &= ~DSP56K_ICR_HF1;
	375
	376	status = 0;
	377	if (dsp56k_host_interface.icr & DSP56K_ICR_HF0) status \|= 0x1;
	378	if (dsp56k_host_interface.icr & DSP56K_ICR_HF1) status \|= 0x2;
	379	if (dsp56k_host_interface.isr & DSP56K_ISR_HF2) status \|= 0x4;
	380	if (dsp56k_host_interface.isr & DSP56K_ISR_HF3) status \|= 0x8;
236b8756	381	unlock_kernel();
1da177e4 LT	382	return put_user(status, &hf->status);
	383	}
	384	case DSP56K_HOST_CMD:
	385	if (arg > 31 \|\| arg < 0)
	386	return -EINVAL;
236b8756	387	lock_kernel();
1da177e4 LT	388	dsp56k_host_interface.cvr = (u_char)((arg & DSP56K_CVR_HV_MASK) \|
1da177e4 LT	389	DSP56K_CVR_HC);
236b8756	390	unlock_kernel();
1da177e4 LT	391	break;
	392	default:
	393	return -EINVAL;
	394	}
	395	return 0;
	396
	397	default:
	398	printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
	399	return -ENXIO;
	400	}
	401	}
	402
	403	/* As of 2.1.26 this should be dsp56k_poll,
	404	* but how do I then check device minor number?
	405	* Do I need this function at all???
	406	*/
	407	#if 0
	408	static unsigned int dsp56k_poll(struct file file, poll_table wait)
	409	{
a7113a96	410	int dev = iminor(file->f_path.dentry->d_inode) & 0x0f;
1da177e4 LT	411
	412	switch(dev)
	413	{
	414	case DSP56K_DEV_56001:
	415	/* poll_wait(file, ???, wait); */
	416	return POLLIN \| POLLRDNORM \| POLLOUT;
	417
	418	default:
	419	printk("DSP56k driver: Unknown minor device: %d\n", dev);
	420	return 0;
	421	}
	422	}
	423	#endif
	424
	425	static int dsp56k_open(struct inode inode, struct file file)
	426	{
	427	int dev = iminor(inode) & 0x0f;
65f37b79	428	int ret = 0;
1da177e4	429
65f37b79	430	lock_kernel();
1da177e4 LT	431	switch(dev)
	432	{
	433	case DSP56K_DEV_56001:
	434
65f37b79 JC	435	if (test_and_set_bit(0, &dsp56k.in_use)) {
	436	ret = -EBUSY;
	437	goto out;
	438	}
1da177e4 LT	439
	440	dsp56k.timeout = TIMEOUT;
	441	dsp56k.maxio = MAXIO;
	442	dsp56k.rx_wsize = dsp56k.tx_wsize = 4;
	443
	444	DSP56K_TX_INT_OFF;
	445	DSP56K_RX_INT_OFF;
	446
	447	/* Zero host flags */
	448	dsp56k_host_interface.icr &= ~DSP56K_ICR_HF0;
	449	dsp56k_host_interface.icr &= ~DSP56K_ICR_HF1;
	450
	451	break;
	452
	453	default:
65f37b79	454	ret = -ENODEV;
1da177e4	455	}
65f37b79 JC	456	out:
	457	unlock_kernel();
	458	return ret;
1da177e4 LT	459	}
	460
	461	static int dsp56k_release(struct inode inode, struct file file)
	462	{
	463	int dev = iminor(inode) & 0x0f;
	464
	465	switch(dev)
	466	{
	467	case DSP56K_DEV_56001:
	468	clear_bit(0, &dsp56k.in_use);
	469	break;
	470	default:
	471	printk(KERN_ERR "DSP56k driver: Unknown minor device: %d\n", dev);
	472	return -ENXIO;
	473	}
	474
	475	return 0;
	476	}
	477
62322d25	478	static const struct file_operations dsp56k_fops = {
1da177e4 LT	479	.owner = THIS_MODULE,
	480	.read = dsp56k_read,
	481	.write = dsp56k_write,
236b8756	482	.unlocked_ioctl = dsp56k_ioctl,
1da177e4 LT	483	.open = dsp56k_open,
	484	.release = dsp56k_release,
	485	};
	486
	487
	488	/**** Init and module functions ****/
	489
	490	static char banner[] __initdata = KERN_INFO "DSP56k driver installed\n";
	491
	492	static int __init dsp56k_init_driver(void)
	493	{
	494	int err = 0;
	495
	496	if(!MACH_IS_ATARI \|\| !ATARIHW_PRESENT(DSP56K)) {
	497	printk("DSP56k driver: Hardware not present\n");
	498	return -ENODEV;
	499	}
	500
	501	if(register_chrdev(DSP56K_MAJOR, "dsp56k", &dsp56k_fops)) {
	502	printk("DSP56k driver: Unable to register driver\n");
	503	return -ENODEV;
	504	}
ca8eca68	505	dsp56k_class = class_create(THIS_MODULE, "dsp56k");
1da177e4 LT	506	if (IS_ERR(dsp56k_class)) {
	507	err = PTR_ERR(dsp56k_class);
	508	goto out_chrdev;
	509	}
03457cd4 GKH	510	device_create(dsp56k_class, NULL, MKDEV(DSP56K_MAJOR, 0), NULL,
03457cd4 GKH	511	"dsp56k");
1da177e4	512
1da177e4 LT	513	printk(banner);
	514	goto out;
	515
1da177e4 LT	516	out_chrdev:
	517	unregister_chrdev(DSP56K_MAJOR, "dsp56k");
	518	out:
	519	return err;
	520	}
	521	module_init(dsp56k_init_driver);
	522
	523	static void __exit dsp56k_cleanup_driver(void)
	524	{
07c015e7	525	device_destroy(dsp56k_class, MKDEV(DSP56K_MAJOR, 0));
ca8eca68	526	class_destroy(dsp56k_class);
1da177e4	527	unregister_chrdev(DSP56K_MAJOR, "dsp56k");
1da177e4 LT	528	}
	529	module_exit(dsp56k_cleanup_driver);
	530
	531	MODULE_LICENSE("GPL");
7f127d5e	532	MODULE_FIRMWARE("dsp56k/bootstrap.bin");