[linux.git] / drivers / char / tb0219.c

/*
 *  Driver for TANBAC TB0219 base board.
 *
 *  Copyright (C) 2005  Yoichi Yuasa <[email protected]>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */
#include <linux/platform_device.h>
#include <linux/fs.h>
#include <linux/init.h>
#include <linux/module.h>
#include <linux/uaccess.h>

#include <asm/io.h>
#include <asm/reboot.h>
#include <asm/vr41xx/giu.h>
#include <asm/vr41xx/tb0219.h>

MODULE_AUTHOR("Yoichi Yuasa <[email protected]>");
MODULE_DESCRIPTION("TANBAC TB0219 base board driver");
MODULE_LICENSE("GPL");

static int major;	/* default is dynamic major device number */
module_param(major, int, 0);
MODULE_PARM_DESC(major, "Major device number");

static void (*old_machine_restart)(char *command);
static void __iomem *tb0219_base;
static DEFINE_SPINLOCK(tb0219_lock);

#define tb0219_read(offset)		readw(tb0219_base + (offset))
#define tb0219_write(offset, value)	writew((value), tb0219_base + (offset))

#define TB0219_START	0x0a000000UL
#define TB0219_SIZE	0x20UL

#define TB0219_LED			0x00
#define TB0219_GPIO_INPUT		0x02
#define TB0219_GPIO_OUTPUT		0x04
#define TB0219_DIP_SWITCH		0x06
#define TB0219_MISC			0x08
#define TB0219_RESET			0x0e
#define TB0219_PCI_SLOT1_IRQ_STATUS	0x10
#define TB0219_PCI_SLOT2_IRQ_STATUS	0x12
#define TB0219_PCI_SLOT3_IRQ_STATUS	0x14

typedef enum {
	TYPE_LED,
	TYPE_GPIO_OUTPUT,
} tb0219_type_t;

/*
 * Minor device number
 *	 0 = 7 segment LED
 *
 *	16 = GPIO IN 0
 *	17 = GPIO IN 1
 *	18 = GPIO IN 2
 *	19 = GPIO IN 3
 *	20 = GPIO IN 4
 *	21 = GPIO IN 5
 *	22 = GPIO IN 6
 *	23 = GPIO IN 7
 *
 *	32 = GPIO OUT 0
 *	33 = GPIO OUT 1
 *	34 = GPIO OUT 2
 *	35 = GPIO OUT 3
 *	36 = GPIO OUT 4
 *	37 = GPIO OUT 5
 *	38 = GPIO OUT 6
 *	39 = GPIO OUT 7
 *
 *	48 = DIP switch 1
 *	49 = DIP switch 2
 *	50 = DIP switch 3
 *	51 = DIP switch 4
 *	52 = DIP switch 5
 *	53 = DIP switch 6
 *	54 = DIP switch 7
 *	55 = DIP switch 8
 */

static inline char get_led(void)
{
	return (char)tb0219_read(TB0219_LED);
}

static inline char get_gpio_input_pin(unsigned int pin)
{
	uint16_t values;

	values = tb0219_read(TB0219_GPIO_INPUT);
	if (values & (1 << pin))
		return '1';

	return '0';
}

static inline char get_gpio_output_pin(unsigned int pin)
{
	uint16_t values;

	values = tb0219_read(TB0219_GPIO_OUTPUT);
	if (values & (1 << pin))
		return '1';

	return '0';
}

static inline char get_dip_switch(unsigned int pin)
{
	uint16_t values;

	values = tb0219_read(TB0219_DIP_SWITCH);
	if (values & (1 << pin))
		return '1';

	return '0';
}

static inline int set_led(char command)
{
	tb0219_write(TB0219_LED, command);

	return 0;
}

static inline int set_gpio_output_pin(unsigned int pin, char command)
{
	unsigned long flags;
	uint16_t value;

	if (command != '0' && command != '1')
		return -EINVAL;

	spin_lock_irqsave(&tb0219_lock, flags);
	value = tb0219_read(TB0219_GPIO_OUTPUT);
	if (command == '0')
		value &= ~(1 << pin);
	else
		value |= 1 << pin;
	tb0219_write(TB0219_GPIO_OUTPUT, value);
	spin_unlock_irqrestore(&tb0219_lock, flags);

	return 0;

}

static ssize_t tanbac_tb0219_read(struct file *file, char __user *buf, size_t len,
                                  loff_t *ppos)
{
	unsigned int minor;
	char value;

	minor = iminor(file_inode(file));
	switch (minor) {
	case 0:
		value = get_led();
		break;
	case 16 ... 23:
		value = get_gpio_input_pin(minor - 16);
		break;
	case 32 ... 39:
		value = get_gpio_output_pin(minor - 32);
		break;
	case 48 ... 55:
		value = get_dip_switch(minor - 48);
		break;
	default:
		return -EBADF;
	}

	if (len <= 0)
		return -EFAULT;

	if (put_user(value, buf))
		return -EFAULT;

	return 1;
}

static ssize_t tanbac_tb0219_write(struct file *file, const char __user *data,
                                   size_t len, loff_t *ppos)
{
	unsigned int minor;
	tb0219_type_t type;
	size_t i;
	int retval = 0;
	char c;

	minor = iminor(file_inode(file));
	switch (minor) {
	case 0:
		type = TYPE_LED;
		break;
	case 32 ... 39:
		type = TYPE_GPIO_OUTPUT;
		break;
	default:
		return -EBADF;
	}

	for (i = 0; i < len; i++) {
		if (get_user(c, data + i))
			return -EFAULT;

		switch (type) {
		case TYPE_LED:
			retval = set_led(c);
			break;
		case TYPE_GPIO_OUTPUT:
			retval = set_gpio_output_pin(minor - 32, c);
			break;
		}

		if (retval < 0)
			break;
	}

	return i;
}

static int tanbac_tb0219_open(struct inode *inode, struct file *file)
{
	unsigned int minor;

	minor = iminor(inode);
	switch (minor) {
	case 0:
	case 16 ... 23:
	case 32 ... 39:
	case 48 ... 55:
		return nonseekable_open(inode, file);
	default:
		break;
	}

	return -EBADF;
}

static int tanbac_tb0219_release(struct inode *inode, struct file *file)
{
	return 0;
}

static const struct file_operations tb0219_fops = {
	.owner		= THIS_MODULE,
	.read		= tanbac_tb0219_read,
	.write		= tanbac_tb0219_write,
	.open		= tanbac_tb0219_open,
	.release	= tanbac_tb0219_release,
	.llseek		= no_llseek,
};

static void tb0219_restart(char *command)
{
	tb0219_write(TB0219_RESET, 0);
}

static void tb0219_pci_irq_init(void)
{
	/* PCI Slot 1 */
	vr41xx_set_irq_trigger(TB0219_PCI_SLOT1_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
	vr41xx_set_irq_level(TB0219_PCI_SLOT1_PIN, IRQ_LEVEL_LOW);

	/* PCI Slot 2 */
	vr41xx_set_irq_trigger(TB0219_PCI_SLOT2_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
	vr41xx_set_irq_level(TB0219_PCI_SLOT2_PIN, IRQ_LEVEL_LOW);

	/* PCI Slot 3 */
	vr41xx_set_irq_trigger(TB0219_PCI_SLOT3_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
	vr41xx_set_irq_level(TB0219_PCI_SLOT3_PIN, IRQ_LEVEL_LOW);
}

static int tb0219_probe(struct platform_device *dev)
{
	int retval;

	if (request_mem_region(TB0219_START, TB0219_SIZE, "TB0219") == NULL)
		return -EBUSY;

	tb0219_base = ioremap(TB0219_START, TB0219_SIZE);
	if (tb0219_base == NULL) {
		release_mem_region(TB0219_START, TB0219_SIZE);
		return -ENOMEM;
	}

	retval = register_chrdev(major, "TB0219", &tb0219_fops);
	if (retval < 0) {
		iounmap(tb0219_base);
		tb0219_base = NULL;
		release_mem_region(TB0219_START, TB0219_SIZE);
		return retval;
	}

	old_machine_restart = _machine_restart;
	_machine_restart = tb0219_restart;

	tb0219_pci_irq_init();

	if (major == 0) {
		major = retval;
		printk(KERN_INFO "TB0219: major number %d\n", major);
	}

	return 0;
}

static int tb0219_remove(struct platform_device *dev)
{
	_machine_restart = old_machine_restart;

	iounmap(tb0219_base);
	tb0219_base = NULL;

	release_mem_region(TB0219_START, TB0219_SIZE);

	return 0;
}

static struct platform_device *tb0219_platform_device;

static struct platform_driver tb0219_device_driver = {
	.probe		= tb0219_probe,
	.remove		= tb0219_remove,
	.driver		= {
		.name	= "TB0219",
	},
};

static int __init tanbac_tb0219_init(void)
{
	int retval;

	tb0219_platform_device = platform_device_alloc("TB0219", -1);
	if (!tb0219_platform_device)
		return -ENOMEM;

	retval = platform_device_add(tb0219_platform_device);
	if (retval < 0) {
		platform_device_put(tb0219_platform_device);
		return retval;
	}

	retval = platform_driver_register(&tb0219_device_driver);
	if (retval < 0)
		platform_device_unregister(tb0219_platform_device);

	return retval;
}

static void __exit tanbac_tb0219_exit(void)
{
	platform_driver_unregister(&tb0219_device_driver);
	platform_device_unregister(tb0219_platform_device);
}

module_init(tanbac_tb0219_init);
module_exit(tanbac_tb0219_exit);
Commit	Line	Data
1da177e4 LT	1	/*
	2	* Driver for TANBAC TB0219 base board.
	3	*
ada8e951	4	* Copyright (C) 2005 Yoichi Yuasa <[email protected]>
1da177e4 LT	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License as published by
	8	* the Free Software Foundation; either version 2 of the License, or
	9	* (at your option) any later version.
	10	*
	11	* This program is distributed in the hope that it will be useful,
	12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	* GNU General Public License for more details.
	15	*
	16	* You should have received a copy of the GNU General Public License
	17	* along with this program; if not, write to the Free Software
	18	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	19	*/
d052d1be	20	#include <linux/platform_device.h>
1da177e4 LT	21	#include <linux/fs.h>
	22	#include <linux/init.h>
	23	#include <linux/module.h>
29abfbd9	24	#include <linux/uaccess.h>
1da177e4 LT	25
	26	#include <asm/io.h>
	27	#include <asm/reboot.h>
6e498c10 YY	28	#include <asm/vr41xx/giu.h>
6e498c10 YY	29	#include <asm/vr41xx/tb0219.h>
1da177e4	30
ada8e951	31	MODULE_AUTHOR("Yoichi Yuasa <[email protected]>");
1da177e4 LT	32	MODULE_DESCRIPTION("TANBAC TB0219 base board driver");
	33	MODULE_LICENSE("GPL");
	34
	35	static int major; /* default is dynamic major device number */
	36	module_param(major, int, 0);
	37	MODULE_PARM_DESC(major, "Major device number");
	38
	39	static void (old_machine_restart)(char command);
	40	static void __iomem *tb0219_base;
d2a7be0b	41	static DEFINE_SPINLOCK(tb0219_lock);
1da177e4 LT	42
	43	#define tb0219_read(offset) readw(tb0219_base + (offset))
	44	#define tb0219_write(offset, value) writew((value), tb0219_base + (offset))
	45
	46	#define TB0219_START 0x0a000000UL
	47	#define TB0219_SIZE 0x20UL
	48
	49	#define TB0219_LED 0x00
	50	#define TB0219_GPIO_INPUT 0x02
	51	#define TB0219_GPIO_OUTPUT 0x04
	52	#define TB0219_DIP_SWITCH 0x06
	53	#define TB0219_MISC 0x08
	54	#define TB0219_RESET 0x0e
	55	#define TB0219_PCI_SLOT1_IRQ_STATUS 0x10
	56	#define TB0219_PCI_SLOT2_IRQ_STATUS 0x12
	57	#define TB0219_PCI_SLOT3_IRQ_STATUS 0x14
	58
	59	typedef enum {
	60	TYPE_LED,
	61	TYPE_GPIO_OUTPUT,
	62	} tb0219_type_t;
	63
	64	/*
	65	* Minor device number
	66	* 0 = 7 segment LED
	67	*
	68	* 16 = GPIO IN 0
	69	* 17 = GPIO IN 1
	70	* 18 = GPIO IN 2
	71	* 19 = GPIO IN 3
	72	* 20 = GPIO IN 4
	73	* 21 = GPIO IN 5
	74	* 22 = GPIO IN 6
	75	* 23 = GPIO IN 7
	76	*
	77	* 32 = GPIO OUT 0
	78	* 33 = GPIO OUT 1
	79	* 34 = GPIO OUT 2
	80	* 35 = GPIO OUT 3
	81	* 36 = GPIO OUT 4
	82	* 37 = GPIO OUT 5
	83	* 38 = GPIO OUT 6
	84	* 39 = GPIO OUT 7
	85	*
	86	* 48 = DIP switch 1
	87	* 49 = DIP switch 2
	88	* 50 = DIP switch 3
	89	* 51 = DIP switch 4
	90	* 52 = DIP switch 5
	91	* 53 = DIP switch 6
	92	* 54 = DIP switch 7
	93	* 55 = DIP switch 8
	94	*/
	95
	96	static inline char get_led(void)
	97	{
	98	return (char)tb0219_read(TB0219_LED);
	99	}
	100
	101	static inline char get_gpio_input_pin(unsigned int pin)
	102	{
	103	uint16_t values;
	104
	105	values = tb0219_read(TB0219_GPIO_INPUT);
106	if (values & (1 << pin))
107	return '1';
108
109	return '0';
110	}
111
112	static inline char get_gpio_output_pin(unsigned int pin)
113	{
114	uint16_t values;
115
116	values = tb0219_read(TB0219_GPIO_OUTPUT);
117	if (values & (1 << pin))
118	return '1';
119
120	return '0';
121	}
122
123	static inline char get_dip_switch(unsigned int pin)
124	{
125	uint16_t values;
126
127	values = tb0219_read(TB0219_DIP_SWITCH);
128	if (values & (1 << pin))
129	return '1';
130
131	return '0';
132	}
133
134	static inline int set_led(char command)
135	{
136	tb0219_write(TB0219_LED, command);
137
138	return 0;
139	}
140
141	static inline int set_gpio_output_pin(unsigned int pin, char command)
142	{
143	unsigned long flags;
144	uint16_t value;
145
146	if (command != '0' && command != '1')
147	return -EINVAL;
148
149	spin_lock_irqsave(&tb0219_lock, flags);
150	value = tb0219_read(TB0219_GPIO_OUTPUT);
151	if (command == '0')
152	value &= ~(1 << pin);
153	else
154	value \|= 1 << pin;
155	tb0219_write(TB0219_GPIO_OUTPUT, value);
156	spin_unlock_irqrestore(&tb0219_lock, flags);
157
158	return 0;
159
160	}
161
162	static ssize_t tanbac_tb0219_read(struct file file, char __user buf, size_t len,
163	loff_t *ppos)
164	{
165	unsigned int minor;
166	char value;
167
496ad9aa	168	minor = iminor(file_inode(file));
1da177e4 LT	169	switch (minor) {
	170	case 0:
	171	value = get_led();
	172	break;
	173	case 16 ... 23:
	174	value = get_gpio_input_pin(minor - 16);
	175	break;
	176	case 32 ... 39:
	177	value = get_gpio_output_pin(minor - 32);
	178	break;
	179	case 48 ... 55:
	180	value = get_dip_switch(minor - 48);
	181	break;
	182	default:
	183	return -EBADF;
	184	}
	185
	186	if (len <= 0)
	187	return -EFAULT;
	188
	189	if (put_user(value, buf))
	190	return -EFAULT;
	191
	192	return 1;
	193	}
	194
	195	static ssize_t tanbac_tb0219_write(struct file file, const char __user data,
	196	size_t len, loff_t *ppos)
	197	{
	198	unsigned int minor;
	199	tb0219_type_t type;
	200	size_t i;
	201	int retval = 0;
	202	char c;
	203
496ad9aa	204	minor = iminor(file_inode(file));
1da177e4 LT	205	switch (minor) {
	206	case 0:
	207	type = TYPE_LED;
	208	break;
	209	case 32 ... 39:
	210	type = TYPE_GPIO_OUTPUT;
	211	break;
	212	default:
	213	return -EBADF;
	214	}
	215
	216	for (i = 0; i < len; i++) {
	217	if (get_user(c, data + i))
	218	return -EFAULT;
	219
	220	switch (type) {
	221	case TYPE_LED:
	222	retval = set_led(c);
	223	break;
	224	case TYPE_GPIO_OUTPUT:
	225	retval = set_gpio_output_pin(minor - 32, c);
	226	break;
	227	}
	228
	229	if (retval < 0)
	230	break;
	231	}
	232
	233	return i;
	234	}
	235
	236	static int tanbac_tb0219_open(struct inode inode, struct file file)
	237	{
	238	unsigned int minor;
	239
	240	minor = iminor(inode);
	241	switch (minor) {
	242	case 0:
	243	case 16 ... 23:
	244	case 32 ... 39:
	245	case 48 ... 55:
	246	return nonseekable_open(inode, file);
	247	default:
	248	break;
	249	}
	250
	251	return -EBADF;
	252	}
	253
	254	static int tanbac_tb0219_release(struct inode inode, struct file file)
	255	{
	256	return 0;
	257	}
	258
62322d25	259	static const struct file_operations tb0219_fops = {
1da177e4 LT	260	.owner = THIS_MODULE,
	261	.read = tanbac_tb0219_read,
	262	.write = tanbac_tb0219_write,
	263	.open = tanbac_tb0219_open,
	264	.release = tanbac_tb0219_release,
6038f373	265	.llseek = no_llseek,
1da177e4 LT	266	};
	267
	268	static void tb0219_restart(char *command)
	269	{
	270	tb0219_write(TB0219_RESET, 0);
	271	}
	272
6e498c10 YY	273	static void tb0219_pci_irq_init(void)
	274	{
	275	/* PCI Slot 1 */
	276	vr41xx_set_irq_trigger(TB0219_PCI_SLOT1_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
	277	vr41xx_set_irq_level(TB0219_PCI_SLOT1_PIN, IRQ_LEVEL_LOW);
	278
	279	/* PCI Slot 2 */
	280	vr41xx_set_irq_trigger(TB0219_PCI_SLOT2_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
	281	vr41xx_set_irq_level(TB0219_PCI_SLOT2_PIN, IRQ_LEVEL_LOW);
	282
	283	/* PCI Slot 3 */
	284	vr41xx_set_irq_trigger(TB0219_PCI_SLOT3_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
	285	vr41xx_set_irq_level(TB0219_PCI_SLOT3_PIN, IRQ_LEVEL_LOW);
	286	}
	287
2223cbec	288	static int tb0219_probe(struct platform_device *dev)
1da177e4 LT	289	{
	290	int retval;
	291
	292	if (request_mem_region(TB0219_START, TB0219_SIZE, "TB0219") == NULL)
	293	return -EBUSY;
	294
	295	tb0219_base = ioremap(TB0219_START, TB0219_SIZE);
	296	if (tb0219_base == NULL) {
	297	release_mem_region(TB0219_START, TB0219_SIZE);
	298	return -ENOMEM;
	299	}
	300
	301	retval = register_chrdev(major, "TB0219", &tb0219_fops);
	302	if (retval < 0) {
	303	iounmap(tb0219_base);
	304	tb0219_base = NULL;
	305	release_mem_region(TB0219_START, TB0219_SIZE);
	306	return retval;
	307	}
	308
1da177e4 LT	309	old_machine_restart = _machine_restart;
	310	_machine_restart = tb0219_restart;
	311
6e498c10 YY	312	tb0219_pci_irq_init();
6e498c10 YY	313
1da177e4 LT	314	if (major == 0) {
	315	major = retval;
	316	printk(KERN_INFO "TB0219: major number %d\n", major);
	317	}
	318
	319	return 0;
	320	}
	321
39af33fc	322	static int tb0219_remove(struct platform_device *dev)
1da177e4 LT	323	{
	324	_machine_restart = old_machine_restart;
	325
	326	iounmap(tb0219_base);
	327	tb0219_base = NULL;
	328
	329	release_mem_region(TB0219_START, TB0219_SIZE);
	330
	331	return 0;
	332	}
	333
	334	static struct platform_device *tb0219_platform_device;
	335
3ae5eaec	336	static struct platform_driver tb0219_device_driver = {
1da177e4	337	.probe = tb0219_probe,
4dde2d2f	338	.remove = tb0219_remove,
3ae5eaec RK	339	.driver = {
	340	.name = "TB0219",
	341	},
1da177e4 LT	342	};
1da177e4 LT	343
d0497614	344	static int __init tanbac_tb0219_init(void)
1da177e4 LT	345	{
	346	int retval;
	347
d0497614 DT	348	tb0219_platform_device = platform_device_alloc("TB0219", -1);
	349	if (!tb0219_platform_device)
	350	return -ENOMEM;
	351
	352	retval = platform_device_add(tb0219_platform_device);
	353	if (retval < 0) {
	354	platform_device_put(tb0219_platform_device);
	355	return retval;
	356	}
1da177e4	357
3ae5eaec	358	retval = platform_driver_register(&tb0219_device_driver);
1da177e4 LT	359	if (retval < 0)
	360	platform_device_unregister(tb0219_platform_device);
	361
	362	return retval;
	363	}
	364
d0497614	365	static void __exit tanbac_tb0219_exit(void)
1da177e4	366	{
3ae5eaec	367	platform_driver_unregister(&tb0219_device_driver);
1da177e4 LT	368	platform_device_unregister(tb0219_platform_device);
	369	}
	370
	371	module_init(tanbac_tb0219_init);
	372	module_exit(tanbac_tb0219_exit);