[net-next-2.6.git] / drivers / char / briq_panel.c

/*
 * Drivers for the Total Impact PPC based computer "BRIQ"
 * by Dr. Karsten Jeppesen
 *
 */

#include <linux/module.h>

#include <linux/smp_lock.h>
#include <linux/types.h>
#include <linux/errno.h>
#include <linux/tty.h>
#include <linux/timer.h>
#include <linux/kernel.h>
#include <linux/wait.h>
#include <linux/string.h>
#include <linux/ioport.h>
#include <linux/delay.h>
#include <linux/miscdevice.h>
#include <linux/fs.h>
#include <linux/mm.h>
#include <linux/init.h>

#include <asm/uaccess.h>
#include <asm/io.h>
#include <asm/prom.h>

#define		BRIQ_PANEL_MINOR	156
#define		BRIQ_PANEL_VFD_IOPORT	0x0390
#define		BRIQ_PANEL_LED_IOPORT	0x0398
#define		BRIQ_PANEL_VER		"1.1 (04/20/2002)"
#define		BRIQ_PANEL_MSG0		"Loading Linux"

static int		vfd_is_open;
static unsigned char	vfd[40];
static int		vfd_cursor;
static unsigned char	ledpb, led;

static void update_vfd(void)
{
	int	i;

	/* cursor home */
	outb(0x02, BRIQ_PANEL_VFD_IOPORT);
	for (i=0; i<20; i++)
		outb(vfd[i], BRIQ_PANEL_VFD_IOPORT + 1);

	/* cursor to next line */
	outb(0xc0, BRIQ_PANEL_VFD_IOPORT);
	for (i=20; i<40; i++)
		outb(vfd[i], BRIQ_PANEL_VFD_IOPORT + 1);

}

static void set_led(char state)
{
	if (state == 'R')
		led = 0x01;
	else if (state == 'G')
		led = 0x02;
	else if (state == 'Y')
		led = 0x03;
	else if (state == 'X')
		led = 0x00;
	outb(led, BRIQ_PANEL_LED_IOPORT);
}

static int briq_panel_open(struct inode *ino, struct file *filep)
{
	tty_lock();
	/* enforce single access, vfd_is_open is protected by BKL */
	if (vfd_is_open) {
		tty_unlock();
		return -EBUSY;
	}
	vfd_is_open = 1;

	tty_unlock();
	return 0;
}

static int briq_panel_release(struct inode *ino, struct file *filep)
{
	if (!vfd_is_open)
		return -ENODEV;

	vfd_is_open = 0;

	return 0;
}

static ssize_t briq_panel_read(struct file *file, char __user *buf, size_t count,
			 loff_t *ppos)
{
	unsigned short c;
	unsigned char cp;

	if (!vfd_is_open)
		return -ENODEV;

	c = (inb(BRIQ_PANEL_LED_IOPORT) & 0x000c) | (ledpb & 0x0003);
	set_led(' ');
	/* upper button released */
	if ((!(ledpb & 0x0004)) && (c & 0x0004)) {
		cp = ' ';
		ledpb = c;
		if (copy_to_user(buf, &cp, 1))
			return -EFAULT;
		return 1;
	}
	/* lower button released */
	else if ((!(ledpb & 0x0008)) && (c & 0x0008)) {
		cp = '\r';
		ledpb = c;
		if (copy_to_user(buf, &cp, 1))
			return -EFAULT;
		return 1;
	} else {
		ledpb = c;
		return 0;
	}
}

static void scroll_vfd( void )
{
	int	i;

	for (i=0; i<20; i++) {
		vfd[i] = vfd[i+20];
		vfd[i+20] = ' ';
	}
	vfd_cursor = 20;
}

static ssize_t briq_panel_write(struct file *file, const char __user *buf, size_t len,
			  loff_t *ppos)
{
	size_t indx = len;
	int i, esc = 0;

	if (!vfd_is_open)
		return -EBUSY;

	for (;;) {
		char c;
		if (!indx)
			break;
		if (get_user(c, buf))
			return -EFAULT;
		if (esc) {
			set_led(c);
			esc = 0;
		} else if (c == 27) {
			esc = 1;
		} else if (c == 12) {
			/* do a form feed */
			for (i=0; i<40; i++)
				vfd[i] = ' ';
			vfd_cursor = 0;
		} else if (c == 10) {
			if (vfd_cursor < 20)
				vfd_cursor = 20;
			else if (vfd_cursor < 40)
				vfd_cursor = 40;
			else if (vfd_cursor < 60)
				vfd_cursor = 60;
			if (vfd_cursor > 59)
				scroll_vfd();
		} else {
			/* just a character */
			if (vfd_cursor > 39)
				scroll_vfd();
			vfd[vfd_cursor++] = c;
		}
		indx--;
		buf++;
	}
	update_vfd();

	return len;
}

static const struct file_operations briq_panel_fops = {
	.owner		= THIS_MODULE,
	.read		= briq_panel_read,
	.write		= briq_panel_write,
	.open		= briq_panel_open,
	.release	= briq_panel_release,
	.llseek		= noop_llseek,
};

static struct miscdevice briq_panel_miscdev = {
	BRIQ_PANEL_MINOR,
	"briq_panel",
	&briq_panel_fops
};

static int __init briq_panel_init(void)
{
	struct device_node *root = of_find_node_by_path("/");
	const char *machine;
	int i;

	machine = of_get_property(root, "model", NULL);
	if (!machine || strncmp(machine, "TotalImpact,BRIQ-1", 18) != 0) {
		of_node_put(root);
		return -ENODEV;
	}
	of_node_put(root);

	printk(KERN_INFO
		"briq_panel: v%s Dr. Karsten Jeppesen (kj@totalimpact.com)\n",
		BRIQ_PANEL_VER);

	if (!request_region(BRIQ_PANEL_VFD_IOPORT, 4, "BRIQ Front Panel"))
		return -EBUSY;

	if (!request_region(BRIQ_PANEL_LED_IOPORT, 2, "BRIQ Front Panel")) {
		release_region(BRIQ_PANEL_VFD_IOPORT, 4);
		return -EBUSY;
	}
	ledpb = inb(BRIQ_PANEL_LED_IOPORT) & 0x000c;

	if (misc_register(&briq_panel_miscdev) < 0) {
		release_region(BRIQ_PANEL_VFD_IOPORT, 4);
		release_region(BRIQ_PANEL_LED_IOPORT, 2);
		return -EBUSY;
	}

	outb(0x38, BRIQ_PANEL_VFD_IOPORT);	/* Function set */
	outb(0x01, BRIQ_PANEL_VFD_IOPORT);	/* Clear display */
	outb(0x0c, BRIQ_PANEL_VFD_IOPORT);	/* Display on */
	outb(0x06, BRIQ_PANEL_VFD_IOPORT);	/* Entry normal */
	for (i=0; i<40; i++)
		vfd[i]=' ';
#ifndef MODULE
	vfd[0] = 'L';
	vfd[1] = 'o';
	vfd[2] = 'a';
	vfd[3] = 'd';
	vfd[4] = 'i';
	vfd[5] = 'n';
	vfd[6] = 'g';
	vfd[7] = ' ';
	vfd[8] = '.';
	vfd[9] = '.';
	vfd[10] = '.';
#endif /* !MODULE */

	update_vfd();

	return 0;
}

static void __exit briq_panel_exit(void)
{
	misc_deregister(&briq_panel_miscdev);
	release_region(BRIQ_PANEL_VFD_IOPORT, 4);
	release_region(BRIQ_PANEL_LED_IOPORT, 2);
}

module_init(briq_panel_init);
module_exit(briq_panel_exit);

MODULE_LICENSE("GPL");
MODULE_AUTHOR("Karsten Jeppesen <karsten@jeppesens.com>");
MODULE_DESCRIPTION("Driver for the Total Impact briQ front panel");
Commit	Line	Data
a45b8395 BH	1	/*
	2	* Drivers for the Total Impact PPC based computer "BRIQ"
	3	* by Dr. Karsten Jeppesen
	4	*
	5	*/
	6
	7	#include <linux/module.h>
	8
556889a4	9	#include <linux/smp_lock.h>
a45b8395 BH	10	#include <linux/types.h>
a45b8395 BH	11	#include <linux/errno.h>
a45b8395 BH	12	#include <linux/tty.h>
a45b8395 BH	13	#include <linux/timer.h>
a45b8395 BH	14	#include <linux/kernel.h>
	15	#include <linux/wait.h>
	16	#include <linux/string.h>
a45b8395 BH	17	#include <linux/ioport.h>
	18	#include <linux/delay.h>
	19	#include <linux/miscdevice.h>
	20	#include <linux/fs.h>
	21	#include <linux/mm.h>
	22	#include <linux/init.h>
	23
	24	#include <asm/uaccess.h>
	25	#include <asm/io.h>
	26	#include <asm/prom.h>
	27
	28	#define BRIQ_PANEL_MINOR 156
	29	#define BRIQ_PANEL_VFD_IOPORT 0x0390
	30	#define BRIQ_PANEL_LED_IOPORT 0x0398
	31	#define BRIQ_PANEL_VER "1.1 (04/20/2002)"
	32	#define BRIQ_PANEL_MSG0 "Loading Linux"
	33
	34	static int vfd_is_open;
	35	static unsigned char vfd[40];
	36	static int vfd_cursor;
	37	static unsigned char ledpb, led;
	38
	39	static void update_vfd(void)
	40	{
	41	int i;
	42
	43	/* cursor home */
	44	outb(0x02, BRIQ_PANEL_VFD_IOPORT);
	45	for (i=0; i<20; i++)
	46	outb(vfd[i], BRIQ_PANEL_VFD_IOPORT + 1);
	47
	48	/* cursor to next line */
	49	outb(0xc0, BRIQ_PANEL_VFD_IOPORT);
	50	for (i=20; i<40; i++)
	51	outb(vfd[i], BRIQ_PANEL_VFD_IOPORT + 1);
	52
	53	}
	54
	55	static void set_led(char state)
	56	{
	57	if (state == 'R')
	58	led = 0x01;
	59	else if (state == 'G')
	60	led = 0x02;
	61	else if (state == 'Y')
	62	led = 0x03;
	63	else if (state == 'X')
	64	led = 0x00;
	65	outb(led, BRIQ_PANEL_LED_IOPORT);
	66	}
	67
	68	static int briq_panel_open(struct inode ino, struct file filep)
	69	{
ec79d605	70	tty_lock();
556889a4 AB	71	/* enforce single access, vfd_is_open is protected by BKL */
556889a4 AB	72	if (vfd_is_open) {
ec79d605	73	tty_unlock();
a45b8395	74	return -EBUSY;
556889a4	75	}
a45b8395 BH	76	vfd_is_open = 1;
a45b8395 BH	77
ec79d605	78	tty_unlock();
a45b8395 BH	79	return 0;
	80	}
	81
	82	static int briq_panel_release(struct inode ino, struct file filep)
	83	{
	84	if (!vfd_is_open)
	85	return -ENODEV;
	86
	87	vfd_is_open = 0;
	88
	89	return 0;
	90	}
	91
4ac493b1	92	static ssize_t briq_panel_read(struct file file, char __user buf, size_t count,
a45b8395 BH	93	loff_t *ppos)
	94	{
	95	unsigned short c;
	96	unsigned char cp;
	97
a45b8395 BH	98	if (!vfd_is_open)
	99	return -ENODEV;
	100
	101	c = (inb(BRIQ_PANEL_LED_IOPORT) & 0x000c) \| (ledpb & 0x0003);
	102	set_led(' ');
	103	/* upper button released */
	104	if ((!(ledpb & 0x0004)) && (c & 0x0004)) {
	105	cp = ' ';
	106	ledpb = c;
	107	if (copy_to_user(buf, &cp, 1))
	108	return -EFAULT;
	109	return 1;
	110	}
	111	/* lower button released */
	112	else if ((!(ledpb & 0x0008)) && (c & 0x0008)) {
	113	cp = '\r';
	114	ledpb = c;
	115	if (copy_to_user(buf, &cp, 1))
	116	return -EFAULT;
	117	return 1;
	118	} else {
	119	ledpb = c;
	120	return 0;
	121	}
	122	}
	123
	124	static void scroll_vfd( void )
	125	{
	126	int i;
	127
	128	for (i=0; i<20; i++) {
	129	vfd[i] = vfd[i+20];
	130	vfd[i+20] = ' ';
	131	}
	132	vfd_cursor = 20;
	133	}
	134
4ac493b1	135	static ssize_t briq_panel_write(struct file file, const char __user buf, size_t len,
a45b8395 BH	136	loff_t *ppos)
	137	{
	138	size_t indx = len;
	139	int i, esc = 0;
	140
a45b8395 BH	141	if (!vfd_is_open)
	142	return -EBUSY;
	143
	144	for (;;) {
4ac493b1	145	char c;
a45b8395 BH	146	if (!indx)
a45b8395 BH	147	break;
4ac493b1 AV	148	if (get_user(c, buf))
4ac493b1 AV	149	return -EFAULT;
a45b8395	150	if (esc) {
4ac493b1	151	set_led(c);
a45b8395	152	esc = 0;
4ac493b1	153	} else if (c == 27) {
a45b8395	154	esc = 1;
4ac493b1	155	} else if (c == 12) {
a45b8395 BH	156	/* do a form feed */
	157	for (i=0; i<40; i++)
	158	vfd[i] = ' ';
	159	vfd_cursor = 0;
4ac493b1	160	} else if (c == 10) {
a45b8395 BH	161	if (vfd_cursor < 20)
	162	vfd_cursor = 20;
	163	else if (vfd_cursor < 40)
	164	vfd_cursor = 40;
	165	else if (vfd_cursor < 60)
	166	vfd_cursor = 60;
	167	if (vfd_cursor > 59)
	168	scroll_vfd();
	169	} else {
	170	/* just a character */
	171	if (vfd_cursor > 39)
	172	scroll_vfd();
4ac493b1	173	vfd[vfd_cursor++] = c;
a45b8395 BH	174	}
	175	indx--;
	176	buf++;
	177	}
	178	update_vfd();
	179
	180	return len;
	181	}
	182
2b8693c0	183	static const struct file_operations briq_panel_fops = {
a45b8395 BH	184	.owner = THIS_MODULE,
	185	.read = briq_panel_read,
	186	.write = briq_panel_write,
	187	.open = briq_panel_open,
	188	.release = briq_panel_release,
6038f373	189	.llseek = noop_llseek,
a45b8395 BH	190	};
	191
	192	static struct miscdevice briq_panel_miscdev = {
	193	BRIQ_PANEL_MINOR,
	194	"briq_panel",
	195	&briq_panel_fops
	196	};
	197
	198	static int __init briq_panel_init(void)
	199	{
8c8dc322	200	struct device_node *root = of_find_node_by_path("/");
13b5aecc	201	const char *machine;
a45b8395 BH	202	int i;
a45b8395 BH	203
40cd3a45	204	machine = of_get_property(root, "model", NULL);
8c8dc322 SR	205	if (!machine \|\| strncmp(machine, "TotalImpact,BRIQ-1", 18) != 0) {
8c8dc322 SR	206	of_node_put(root);
a45b8395	207	return -ENODEV;
8c8dc322 SR	208	}
8c8dc322 SR	209	of_node_put(root);
a45b8395 BH	210
	211	printk(KERN_INFO
	212	"briq_panel: v%s Dr. Karsten Jeppesen (kj@totalimpact.com)\n",
	213	BRIQ_PANEL_VER);
	214
	215	if (!request_region(BRIQ_PANEL_VFD_IOPORT, 4, "BRIQ Front Panel"))
	216	return -EBUSY;
	217
	218	if (!request_region(BRIQ_PANEL_LED_IOPORT, 2, "BRIQ Front Panel")) {
	219	release_region(BRIQ_PANEL_VFD_IOPORT, 4);
	220	return -EBUSY;
	221	}
	222	ledpb = inb(BRIQ_PANEL_LED_IOPORT) & 0x000c;
	223
	224	if (misc_register(&briq_panel_miscdev) < 0) {
	225	release_region(BRIQ_PANEL_VFD_IOPORT, 4);
	226	release_region(BRIQ_PANEL_LED_IOPORT, 2);
	227	return -EBUSY;
	228	}
	229
	230	outb(0x38, BRIQ_PANEL_VFD_IOPORT); /* Function set */
	231	outb(0x01, BRIQ_PANEL_VFD_IOPORT); /* Clear display */
	232	outb(0x0c, BRIQ_PANEL_VFD_IOPORT); /* Display on */
	233	outb(0x06, BRIQ_PANEL_VFD_IOPORT); /* Entry normal */
	234	for (i=0; i<40; i++)
	235	vfd[i]=' ';
	236	#ifndef MODULE
	237	vfd[0] = 'L';
	238	vfd[1] = 'o';
	239	vfd[2] = 'a';
	240	vfd[3] = 'd';
	241	vfd[4] = 'i';
	242	vfd[5] = 'n';
	243	vfd[6] = 'g';
	244	vfd[7] = ' ';
	245	vfd[8] = '.';
	246	vfd[9] = '.';
	247	vfd[10] = '.';
	248	#endif /* !MODULE */
	249
	250	update_vfd();
	251
	252	return 0;
	253	}
	254
	255	static void __exit briq_panel_exit(void)
	256	{
	257	misc_deregister(&briq_panel_miscdev);
	258	release_region(BRIQ_PANEL_VFD_IOPORT, 4);
	259	release_region(BRIQ_PANEL_LED_IOPORT, 2);
	260	}
	261
	262	module_init(briq_panel_init);
	263	module_exit(briq_panel_exit);
	264
	265	MODULE_LICENSE("GPL");
	266	MODULE_AUTHOR("Karsten Jeppesen <karsten@jeppesens.com>");
	267	MODULE_DESCRIPTION("Driver for the Total Impact briQ front panel");