Linux Kernel  3.7.1
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
ans-lcd.c
Go to the documentation of this file.
1 /*
2  * /dev/lcd driver for Apple Network Servers.
3  */
4 
5 #include <linux/types.h>
6 #include <linux/errno.h>
7 #include <linux/kernel.h>
8 #include <linux/miscdevice.h>
9 #include <linux/fcntl.h>
10 #include <linux/init.h>
11 #include <linux/delay.h>
12 #include <linux/fs.h>
13 
14 #include <asm/uaccess.h>
15 #include <asm/sections.h>
16 #include <asm/prom.h>
17 #include <asm/io.h>
18 
19 #include "ans-lcd.h"
20 
21 #define ANSLCD_ADDR 0xf301c000
22 #define ANSLCD_CTRL_IX 0x00
23 #define ANSLCD_DATA_IX 0x10
24 
25 static unsigned long anslcd_short_delay = 80;
26 static unsigned long anslcd_long_delay = 3280;
27 static volatile unsigned char __iomem *anslcd_ptr;
28 static DEFINE_MUTEX(anslcd_mutex);
29 
30 #undef DEBUG
31 
32 static void
33 anslcd_write_byte_ctrl ( unsigned char c )
34 {
35 #ifdef DEBUG
36  printk(KERN_DEBUG "LCD: CTRL byte: %02x\n",c);
37 #endif
38  out_8(anslcd_ptr + ANSLCD_CTRL_IX, c);
39  switch(c) {
40  case 1:
41  case 2:
42  case 3:
43  udelay(anslcd_long_delay); break;
44  default: udelay(anslcd_short_delay);
45  }
46 }
47 
48 static void
49 anslcd_write_byte_data ( unsigned char c )
50 {
51  out_8(anslcd_ptr + ANSLCD_DATA_IX, c);
52  udelay(anslcd_short_delay);
53 }
54 
55 static ssize_t
56 anslcd_write( struct file * file, const char __user * buf,
57  size_t count, loff_t *ppos )
58 {
59  const char __user *p = buf;
60  int i;
61 
62 #ifdef DEBUG
63  printk(KERN_DEBUG "LCD: write\n");
64 #endif
65 
66  if (!access_ok(VERIFY_READ, buf, count))
67  return -EFAULT;
68 
69  mutex_lock(&anslcd_mutex);
70  for ( i = *ppos; count > 0; ++i, ++p, --count )
71  {
72  char c;
73  __get_user(c, p);
74  anslcd_write_byte_data( c );
75  }
76  mutex_unlock(&anslcd_mutex);
77  *ppos = i;
78  return p - buf;
79 }
80 
81 static long
82 anslcd_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
83 {
84  char ch, __user *temp;
85  long ret = 0;
86 
87 #ifdef DEBUG
88  printk(KERN_DEBUG "LCD: ioctl(%d,%d)\n",cmd,arg);
89 #endif
90 
91  mutex_lock(&anslcd_mutex);
92 
93  switch ( cmd )
94  {
95  case ANSLCD_CLEAR:
96  anslcd_write_byte_ctrl ( 0x38 );
97  anslcd_write_byte_ctrl ( 0x0f );
98  anslcd_write_byte_ctrl ( 0x06 );
99  anslcd_write_byte_ctrl ( 0x01 );
100  anslcd_write_byte_ctrl ( 0x02 );
101  break;
102  case ANSLCD_SENDCTRL:
103  temp = (char __user *) arg;
104  __get_user(ch, temp);
105  for (; ch; temp++) { /* FIXME: This is ugly, but should work, as a \0 byte is not a valid command code */
106  anslcd_write_byte_ctrl ( ch );
107  __get_user(ch, temp);
108  }
109  break;
111  if (!capable(CAP_SYS_ADMIN))
112  ret =-EACCES;
113  else
114  anslcd_short_delay=arg;
115  break;
116  case ANSLCD_SETLONGDELAY:
117  if (!capable(CAP_SYS_ADMIN))
118  ret = -EACCES;
119  else
120  anslcd_long_delay=arg;
121  break;
122  default:
123  ret = -EINVAL;
124  }
125 
126  mutex_unlock(&anslcd_mutex);
127  return ret;
128 }
129 
130 static int
131 anslcd_open( struct inode * inode, struct file * file )
132 {
133  return 0;
134 }
135 
136 const struct file_operations anslcd_fops = {
137  .write = anslcd_write,
138  .unlocked_ioctl = anslcd_ioctl,
139  .open = anslcd_open,
140  .llseek = default_llseek,
141 };
142 
143 static struct miscdevice anslcd_dev = {
144  ANSLCD_MINOR,
145  "anslcd",
146  &anslcd_fops
147 };
148 
149 const char anslcd_logo[] = "********************" /* Line #1 */
150  "* LINUX! *" /* Line #3 */
151  "* Welcome to *" /* Line #2 */
152  "********************"; /* Line #4 */
153 
154 static int __init
155 anslcd_init(void)
156 {
157  int a;
158  int retval;
159  struct device_node* node;
160 
161  node = of_find_node_by_name(NULL, "lcd");
162  if (!node || !node->parent || strcmp(node->parent->name, "gc")) {
163  of_node_put(node);
164  return -ENODEV;
165  }
166  of_node_put(node);
167 
168  anslcd_ptr = ioremap(ANSLCD_ADDR, 0x20);
169 
170  retval = misc_register(&anslcd_dev);
171  if(retval < 0){
172  printk(KERN_INFO "LCD: misc_register failed\n");
173  iounmap(anslcd_ptr);
174  return retval;
175  }
176 
177 #ifdef DEBUG
178  printk(KERN_DEBUG "LCD: init\n");
179 #endif
180 
181  mutex_lock(&anslcd_mutex);
182  anslcd_write_byte_ctrl ( 0x38 );
183  anslcd_write_byte_ctrl ( 0x0c );
184  anslcd_write_byte_ctrl ( 0x06 );
185  anslcd_write_byte_ctrl ( 0x01 );
186  anslcd_write_byte_ctrl ( 0x02 );
187  for(a=0;a<80;a++) {
188  anslcd_write_byte_data(anslcd_logo[a]);
189  }
190  mutex_unlock(&anslcd_mutex);
191  return 0;
192 }
193 
194 static void __exit
195 anslcd_exit(void)
196 {
197  misc_deregister(&anslcd_dev);
198  iounmap(anslcd_ptr);
199 }
200 
201 module_init(anslcd_init);
202 module_exit(anslcd_exit);