drivers/input/keyboard/sunkbd.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  *  Copyright (c) 1999-2001 Vojtech Pavlik
   4  */
   5
   6 /*
   7  * Sun keyboard driver for Linux
   8  */
   9
  10 #include <linux/delay.h>
  11 #include <linux/sched.h>
  12 #include <linux/slab.h>
  13 #include <linux/module.h>
  14 #include <linux/interrupt.h>
  15 #include <linux/input.h>
  16 #include <linux/serio.h>
  17 #include <linux/workqueue.h>
  18
  19 #define DRIVER_DESC     "Sun keyboard driver"
  20
  21 MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
  22 MODULE_DESCRIPTION(DRIVER_DESC);
  23 MODULE_LICENSE("GPL");
  24
  25 static unsigned char sunkbd_keycode[128] = {
  26           0,128,114,129,115, 59, 60, 68, 61, 87, 62, 88, 63,100, 64,112,
  27          65, 66, 67, 56,103,119, 99, 70,105,130,131,108,106,  1,  2,  3,
  28           4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 41, 14,110,113, 98, 55,
  29         116,132, 83,133,102, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25,
  30          26, 27,111,127, 71, 72, 73, 74,134,135,107,  0, 29, 30, 31, 32,
  31          33, 34, 35, 36, 37, 38, 39, 40, 43, 28, 96, 75, 76, 77, 82,136,
  32         104,137, 69, 42, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54,101,
  33          79, 80, 81,  0,  0,  0,138, 58,125, 57,126,109, 86, 78
  34 };
  35
  36 #define SUNKBD_CMD_RESET        0x1
  37 #define SUNKBD_CMD_BELLON       0x2
  38 #define SUNKBD_CMD_BELLOFF      0x3
  39 #define SUNKBD_CMD_CLICK        0xa
  40 #define SUNKBD_CMD_NOCLICK      0xb
  41 #define SUNKBD_CMD_SETLED       0xe
  42 #define SUNKBD_CMD_LAYOUT       0xf
  43
  44 #define SUNKBD_RET_RESET        0xff
  45 #define SUNKBD_RET_ALLUP        0x7f
  46 #define SUNKBD_RET_LAYOUT       0xfe
  47
  48 #define SUNKBD_LAYOUT_5_MASK    0x20
  49 #define SUNKBD_RELEASE          0x80
  50 #define SUNKBD_KEY              0x7f
  51
  52 /*
  53  * Per-keyboard data.
  54  */
  55
  56 struct sunkbd {
  57         unsigned char keycode[ARRAY_SIZE(sunkbd_keycode)];
  58         struct input_dev *dev;
  59         struct serio *serio;
  60         struct work_struct tq;
  61         wait_queue_head_t wait;
  62         char name[64];
  63         char phys[32];
  64         char type;
  65         bool enabled;
  66         volatile s8 reset;
  67         volatile s8 layout;
  68 };
  69
  70 /*
  71  * sunkbd_interrupt() is called by the low level driver when a character
  72  * is received.
  73  */
  74
  75 static irqreturn_t sunkbd_interrupt(struct serio *serio,
  76                 unsigned char data, unsigned int flags)
  77 {
  78         struct sunkbd *sunkbd = serio_get_drvdata(serio);
  79
  80         if (sunkbd->reset <= -1) {
  81                 /*
  82                  * If cp[i] is 0xff, sunkbd->reset will stay -1.
  83                  * The keyboard sends 0xff 0xff 0xID on powerup.
  84                  */
  85                 sunkbd->reset = data;
  86                 wake_up_interruptible(&sunkbd->wait);
  87                 goto out;
  88         }
  89
  90         if (sunkbd->layout == -1) {
  91                 sunkbd->layout = data;
  92                 wake_up_interruptible(&sunkbd->wait);
  93                 goto out;
  94         }
  95
  96         switch (data) {
  97
  98         case SUNKBD_RET_RESET:
  99                 if (sunkbd->enabled)
 100                         schedule_work(&sunkbd->tq);
 101                 sunkbd->reset = -1;
 102                 break;
 103
 104         case SUNKBD_RET_LAYOUT:
 105                 sunkbd->layout = -1;
 106                 break;
 107
 108         case SUNKBD_RET_ALLUP: /* All keys released */
 109                 break;
 110
 111         default:
 112                 if (!sunkbd->enabled)
 113                         break;
 114
 115                 if (sunkbd->keycode[data & SUNKBD_KEY]) {
 116                         input_report_key(sunkbd->dev,
 117                                          sunkbd->keycode[data & SUNKBD_KEY],
 118                                          !(data & SUNKBD_RELEASE));
 119                         input_sync(sunkbd->dev);
 120                 } else {
 121                         printk(KERN_WARNING
 122                                 "sunkbd.c: Unknown key (scancode %#x) %s.\n",
 123                                 data & SUNKBD_KEY,
 124                                 data & SUNKBD_RELEASE ? "released" : "pressed");
 125                 }
 126         }
 127 out:
 128         return IRQ_HANDLED;
 129 }
 130
 131 /*
 132  * sunkbd_event() handles events from the input module.
 133  */
 134
 135 static int sunkbd_event(struct input_dev *dev,
 136                         unsigned int type, unsigned int code, int value)
 137 {
 138         struct sunkbd *sunkbd = input_get_drvdata(dev);
 139
 140         switch (type) {
 141
 142         case EV_LED:
 143
 144                 serio_write(sunkbd->serio, SUNKBD_CMD_SETLED);
 145                 serio_write(sunkbd->serio,
 146                         (!!test_bit(LED_CAPSL,   dev->led) << 3) |
 147                         (!!test_bit(LED_SCROLLL, dev->led) << 2) |
 148                         (!!test_bit(LED_COMPOSE, dev->led) << 1) |
 149                          !!test_bit(LED_NUML,    dev->led));
 150                 return 0;
 151
 152         case EV_SND:
 153
 154                 switch (code) {
 155
 156                 case SND_CLICK:
 157                         serio_write(sunkbd->serio, SUNKBD_CMD_NOCLICK - value);
 158                         return 0;
 159
 160                 case SND_BELL:
 161                         serio_write(sunkbd->serio, SUNKBD_CMD_BELLOFF - value);
 162                         return 0;
 163                 }
 164
 165                 break;
 166         }
 167
 168         return -1;
 169 }
 170
 171 /*
 172  * sunkbd_initialize() checks for a Sun keyboard attached, and determines
 173  * its type.
 174  */
 175
 176 static int sunkbd_initialize(struct sunkbd *sunkbd)
 177 {
 178         sunkbd->reset = -2;
 179         serio_write(sunkbd->serio, SUNKBD_CMD_RESET);
 180         wait_event_interruptible_timeout(sunkbd->wait, sunkbd->reset >= 0, HZ);
 181         if (sunkbd->reset < 0)
 182                 return -1;
 183
 184         sunkbd->type = sunkbd->reset;
 185
 186         if (sunkbd->type == 4) {        /* Type 4 keyboard */
 187                 sunkbd->layout = -2;
 188                 serio_write(sunkbd->serio, SUNKBD_CMD_LAYOUT);
 189                 wait_event_interruptible_timeout(sunkbd->wait,
 190                                                  sunkbd->layout >= 0, HZ / 4);
 191                 if (sunkbd->layout < 0)
 192                         return -1;
 193                 if (sunkbd->layout & SUNKBD_LAYOUT_5_MASK)
 194                         sunkbd->type = 5;
 195         }
 196
 197         return 0;
 198 }
 199
 200 /*
 201  * sunkbd_set_leds_beeps() sets leds and beeps to a state the computer remembers
 202  * they were in.
 203  */
 204
 205 static void sunkbd_set_leds_beeps(struct sunkbd *sunkbd)
 206 {
 207         serio_write(sunkbd->serio, SUNKBD_CMD_SETLED);
 208         serio_write(sunkbd->serio,
 209                 (!!test_bit(LED_CAPSL,   sunkbd->dev->led) << 3) |
 210                 (!!test_bit(LED_SCROLLL, sunkbd->dev->led) << 2) |
 211                 (!!test_bit(LED_COMPOSE, sunkbd->dev->led) << 1) |
 212                  !!test_bit(LED_NUML,    sunkbd->dev->led));
 213         serio_write(sunkbd->serio,
 214                 SUNKBD_CMD_NOCLICK - !!test_bit(SND_CLICK, sunkbd->dev->snd));
 215         serio_write(sunkbd->serio,
 216                 SUNKBD_CMD_BELLOFF - !!test_bit(SND_BELL, sunkbd->dev->snd));
 217 }
 218
 219
 220 /*
 221  * sunkbd_reinit() wait for the keyboard reset to complete and restores state
 222  * of leds and beeps.
 223  */
 224
 225 static void sunkbd_reinit(struct work_struct *work)
 226 {
 227         struct sunkbd *sunkbd = container_of(work, struct sunkbd, tq);
 228
 229         /*
 230          * It is OK that we check sunkbd->enabled without pausing serio,
 231          * as we only want to catch true->false transition that will
 232          * happen once and we will be woken up for it.
 233          */
 234         wait_event_interruptible_timeout(sunkbd->wait,
 235                                          sunkbd->reset >= 0 || !sunkbd->enabled,
 236                                          HZ);
 237
 238         if (sunkbd->reset >= 0 && sunkbd->enabled)
 239                 sunkbd_set_leds_beeps(sunkbd);
 240 }
 241
 242 static void sunkbd_enable(struct sunkbd *sunkbd, bool enable)
 243 {
 244         serio_pause_rx(sunkbd->serio);
 245         sunkbd->enabled = enable;
 246         serio_continue_rx(sunkbd->serio);
 247
 248         if (!enable) {
 249                 wake_up_interruptible(&sunkbd->wait);
 250                 cancel_work_sync(&sunkbd->tq);
 251         }
 252 }
 253
 254 /*
 255  * sunkbd_connect() probes for a Sun keyboard and fills the necessary
 256  * structures.
 257  */
 258
 259 static int sunkbd_connect(struct serio *serio, struct serio_driver *drv)
 260 {
 261         struct sunkbd *sunkbd;
 262         struct input_dev *input_dev;
 263         int err = -ENOMEM;
 264         int i;
 265
 266         sunkbd = kzalloc(sizeof(*sunkbd), GFP_KERNEL);
 267         input_dev = input_allocate_device();
 268         if (!sunkbd || !input_dev)
 269                 goto fail1;
 270
 271         sunkbd->serio = serio;
 272         sunkbd->dev = input_dev;
 273         init_waitqueue_head(&sunkbd->wait);
 274         INIT_WORK(&sunkbd->tq, sunkbd_reinit);
 275         snprintf(sunkbd->phys, sizeof(sunkbd->phys), "%s/input0", serio->phys);
 276
 277         serio_set_drvdata(serio, sunkbd);
 278
 279         err = serio_open(serio, drv);
 280         if (err)
 281                 goto fail2;
 282
 283         if (sunkbd_initialize(sunkbd) < 0) {
 284                 err = -ENODEV;
 285                 goto fail3;
 286         }
 287
 288         snprintf(sunkbd->name, sizeof(sunkbd->name),
 289                  "Sun Type %d keyboard", sunkbd->type);
 290         memcpy(sunkbd->keycode, sunkbd_keycode, sizeof(sunkbd->keycode));
 291
 292         input_dev->name = sunkbd->name;
 293         input_dev->phys = sunkbd->phys;
 294         input_dev->id.bustype = BUS_RS232;
 295         input_dev->id.vendor  = SERIO_SUNKBD;
 296         input_dev->id.product = sunkbd->type;
 297         input_dev->id.version = 0x0100;
 298         input_dev->dev.parent = &serio->dev;
 299
 300         input_set_drvdata(input_dev, sunkbd);
 301
 302         input_dev->event = sunkbd_event;
 303
 304         input_dev->evbit[0] = BIT_MASK(EV_KEY) | BIT_MASK(EV_LED) |
 305                 BIT_MASK(EV_SND) | BIT_MASK(EV_REP);
 306         input_dev->ledbit[0] = BIT_MASK(LED_CAPSL) | BIT_MASK(LED_COMPOSE) |
 307                 BIT_MASK(LED_SCROLLL) | BIT_MASK(LED_NUML);
 308         input_dev->sndbit[0] = BIT_MASK(SND_CLICK) | BIT_MASK(SND_BELL);
 309
 310         input_dev->keycode = sunkbd->keycode;
 311         input_dev->keycodesize = sizeof(unsigned char);
 312         input_dev->keycodemax = ARRAY_SIZE(sunkbd_keycode);
 313         for (i = 0; i < ARRAY_SIZE(sunkbd_keycode); i++)
 314                 __set_bit(sunkbd->keycode[i], input_dev->keybit);
 315         __clear_bit(KEY_RESERVED, input_dev->keybit);
 316
 317         sunkbd_enable(sunkbd, true);
 318
 319         err = input_register_device(sunkbd->dev);
 320         if (err)
 321                 goto fail4;
 322
 323         return 0;
 324
 325  fail4: sunkbd_enable(sunkbd, false);
 326  fail3: serio_close(serio);
 327  fail2: serio_set_drvdata(serio, NULL);
 328  fail1: input_free_device(input_dev);
 329         kfree(sunkbd);
 330         return err;
 331 }
 332
 333 /*
 334  * sunkbd_disconnect() unregisters and closes behind us.
 335  */
 336
 337 static void sunkbd_disconnect(struct serio *serio)
 338 {
 339         struct sunkbd *sunkbd = serio_get_drvdata(serio);
 340
 341         sunkbd_enable(sunkbd, false);
 342         input_unregister_device(sunkbd->dev);
 343         serio_close(serio);
 344         serio_set_drvdata(serio, NULL);
 345         kfree(sunkbd);
 346 }
 347
 348 static const struct serio_device_id sunkbd_serio_ids[] = {
 349         {
 350                 .type   = SERIO_RS232,
 351                 .proto  = SERIO_SUNKBD,
 352                 .id     = SERIO_ANY,
 353                 .extra  = SERIO_ANY,
 354         },
 355         {
 356                 .type   = SERIO_RS232,
 357                 .proto  = SERIO_UNKNOWN, /* sunkbd does probe */
 358                 .id     = SERIO_ANY,
 359                 .extra  = SERIO_ANY,
 360         },
 361         { 0 }
 362 };
 363
 364 MODULE_DEVICE_TABLE(serio, sunkbd_serio_ids);
 365
 366 static struct serio_driver sunkbd_drv = {
 367         .driver         = {
 368                 .name   = "sunkbd",
 369         },
 370         .description    = DRIVER_DESC,
 371         .id_table       = sunkbd_serio_ids,
 372         .interrupt      = sunkbd_interrupt,
 373         .connect        = sunkbd_connect,
 374         .disconnect     = sunkbd_disconnect,
 375 };
 376
 377 module_serio_driver(sunkbd_drv);