Merge remote-tracking branch 'asoc/topic/core' into asoc-next
[linux-2.6-block.git] / drivers / macintosh / ans-lcd.c
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/module.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;
110         case ANSLCD_SETSHORTDELAY:
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);