ans-lcd.c 3.99 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0
Linus Torvalds's avatar
Linus Torvalds committed
2 3 4 5 6 7 8 9 10
/*
 * /dev/lcd driver for Apple Network Servers.
 */

#include <linux/types.h>
#include <linux/errno.h>
#include <linux/kernel.h>
#include <linux/miscdevice.h>
#include <linux/fcntl.h>
11
#include <linux/module.h>
Linus Torvalds's avatar
Linus Torvalds committed
12 13 14
#include <linux/delay.h>
#include <linux/fs.h>

15
#include <linux/uaccess.h>
Linus Torvalds's avatar
Linus Torvalds committed
16 17 18 19
#include <asm/sections.h>
#include <asm/prom.h>
#include <asm/io.h>

20 21
#include "ans-lcd.h"

Linus Torvalds's avatar
Linus Torvalds committed
22 23 24 25 26 27 28
#define ANSLCD_ADDR		0xf301c000
#define ANSLCD_CTRL_IX 0x00
#define ANSLCD_DATA_IX 0x10

static unsigned long anslcd_short_delay = 80;
static unsigned long anslcd_long_delay = 3280;
static volatile unsigned char __iomem *anslcd_ptr;
29
static DEFINE_MUTEX(anslcd_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
30 31 32

#undef DEBUG

33
static void
Linus Torvalds's avatar
Linus Torvalds committed
34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
anslcd_write_byte_ctrl ( unsigned char c )
{
#ifdef DEBUG
	printk(KERN_DEBUG "LCD: CTRL byte: %02x\n",c);
#endif
	out_8(anslcd_ptr + ANSLCD_CTRL_IX, c);
	switch(c) {
		case 1:
		case 2:
		case 3:
			udelay(anslcd_long_delay); break;
		default: udelay(anslcd_short_delay);
	}
}

49
static void
Linus Torvalds's avatar
Linus Torvalds committed
50 51 52 53 54 55
anslcd_write_byte_data ( unsigned char c )
{
	out_8(anslcd_ptr + ANSLCD_DATA_IX, c);
	udelay(anslcd_short_delay);
}

56
static ssize_t
Linus Torvalds's avatar
Linus Torvalds committed
57 58 59 60 61 62 63 64 65 66 67 68
anslcd_write( struct file * file, const char __user * buf, 
				size_t count, loff_t *ppos )
{
	const char __user *p = buf;
	int i;

#ifdef DEBUG
	printk(KERN_DEBUG "LCD: write\n");
#endif

	if (!access_ok(VERIFY_READ, buf, count))
		return -EFAULT;
69 70

	mutex_lock(&anslcd_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
71 72 73 74 75 76
	for ( i = *ppos; count > 0; ++i, ++p, --count ) 
	{
		char c;
		__get_user(c, p);
		anslcd_write_byte_data( c );
	}
77
	mutex_unlock(&anslcd_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
78 79 80 81
	*ppos = i;
	return p - buf;
}

82 83
static long
anslcd_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
Linus Torvalds's avatar
Linus Torvalds committed
84 85
{
	char ch, __user *temp;
86
	long ret = 0;
Linus Torvalds's avatar
Linus Torvalds committed
87 88 89 90 91

#ifdef DEBUG
	printk(KERN_DEBUG "LCD: ioctl(%d,%d)\n",cmd,arg);
#endif

92 93
	mutex_lock(&anslcd_mutex);

Linus Torvalds's avatar
Linus Torvalds committed
94 95 96 97 98 99 100 101
	switch ( cmd )
	{
	case ANSLCD_CLEAR:
		anslcd_write_byte_ctrl ( 0x38 );
		anslcd_write_byte_ctrl ( 0x0f );
		anslcd_write_byte_ctrl ( 0x06 );
		anslcd_write_byte_ctrl ( 0x01 );
		anslcd_write_byte_ctrl ( 0x02 );
102
		break;
Linus Torvalds's avatar
Linus Torvalds committed
103 104 105 106 107 108 109
	case ANSLCD_SENDCTRL:
		temp = (char __user *) arg;
		__get_user(ch, temp);
		for (; ch; temp++) { /* FIXME: This is ugly, but should work, as a \0 byte is not a valid command code */
			anslcd_write_byte_ctrl ( ch );
			__get_user(ch, temp);
		}
110
		break;
Linus Torvalds's avatar
Linus Torvalds committed
111 112
	case ANSLCD_SETSHORTDELAY:
		if (!capable(CAP_SYS_ADMIN))
113 114 115 116
			ret =-EACCES;
		else
			anslcd_short_delay=arg;
		break;
Linus Torvalds's avatar
Linus Torvalds committed
117 118
	case ANSLCD_SETLONGDELAY:
		if (!capable(CAP_SYS_ADMIN))
119 120 121 122
			ret = -EACCES;
		else
			anslcd_long_delay=arg;
		break;
Linus Torvalds's avatar
Linus Torvalds committed
123
	default:
124
		ret = -EINVAL;
Linus Torvalds's avatar
Linus Torvalds committed
125
	}
126 127 128

	mutex_unlock(&anslcd_mutex);
	return ret;
Linus Torvalds's avatar
Linus Torvalds committed
129 130
}

131
static int
Linus Torvalds's avatar
Linus Torvalds committed
132 133 134 135 136
anslcd_open( struct inode * inode, struct file * file )
{
	return 0;
}

137
const struct file_operations anslcd_fops = {
138 139 140
	.write		= anslcd_write,
	.unlocked_ioctl	= anslcd_ioctl,
	.open		= anslcd_open,
141
	.llseek		= default_llseek,
Linus Torvalds's avatar
Linus Torvalds committed
142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161
};

static struct miscdevice anslcd_dev = {
	ANSLCD_MINOR,
	"anslcd",
	&anslcd_fops
};

const char anslcd_logo[] =	"********************"  /* Line #1 */
				"*      LINUX!      *"  /* Line #3 */
				"*    Welcome to    *"  /* Line #2 */
				"********************"; /* Line #4 */

static int __init
anslcd_init(void)
{
	int a;
	int retval;
	struct device_node* node;

162 163 164
	node = of_find_node_by_name(NULL, "lcd");
	if (!node || !node->parent || strcmp(node->parent->name, "gc")) {
		of_node_put(node);
Linus Torvalds's avatar
Linus Torvalds committed
165
		return -ENODEV;
166 167
	}
	of_node_put(node);
Linus Torvalds's avatar
Linus Torvalds committed
168 169 170 171 172 173 174 175 176 177 178 179 180 181

	anslcd_ptr = ioremap(ANSLCD_ADDR, 0x20);
	
	retval = misc_register(&anslcd_dev);
	if(retval < 0){
		printk(KERN_INFO "LCD: misc_register failed\n");
		iounmap(anslcd_ptr);
		return retval;
	}

#ifdef DEBUG
	printk(KERN_DEBUG "LCD: init\n");
#endif

182
	mutex_lock(&anslcd_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
183 184 185 186 187 188 189 190
	anslcd_write_byte_ctrl ( 0x38 );
	anslcd_write_byte_ctrl ( 0x0c );
	anslcd_write_byte_ctrl ( 0x06 );
	anslcd_write_byte_ctrl ( 0x01 );
	anslcd_write_byte_ctrl ( 0x02 );
	for(a=0;a<80;a++) {
		anslcd_write_byte_data(anslcd_logo[a]);
	}
191
	mutex_unlock(&anslcd_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
192 193 194 195 196 197 198 199 200 201 202 203
	return 0;
}

static void __exit
anslcd_exit(void)
{
	misc_deregister(&anslcd_dev);
	iounmap(anslcd_ptr);
}

module_init(anslcd_init);
module_exit(anslcd_exit);