drivers/macintosh/ans-lcd.c

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