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 <linux/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);