xref: /openbmc/linux/drivers/input/serio/i8042.c (revision 9ac8d3fb)
1 /*
2  *  i8042 keyboard and mouse controller driver for Linux
3  *
4  *  Copyright (c) 1999-2004 Vojtech Pavlik
5  */
6 
7 /*
8  * This program is free software; you can redistribute it and/or modify it
9  * under the terms of the GNU General Public License version 2 as published by
10  * the Free Software Foundation.
11  */
12 
13 #include <linux/delay.h>
14 #include <linux/module.h>
15 #include <linux/interrupt.h>
16 #include <linux/ioport.h>
17 #include <linux/init.h>
18 #include <linux/serio.h>
19 #include <linux/err.h>
20 #include <linux/rcupdate.h>
21 #include <linux/platform_device.h>
22 #include <linux/i8042.h>
23 
24 #include <asm/io.h>
25 
26 MODULE_AUTHOR("Vojtech Pavlik <vojtech@suse.cz>");
27 MODULE_DESCRIPTION("i8042 keyboard and mouse controller driver");
28 MODULE_LICENSE("GPL");
29 
30 static unsigned int i8042_nokbd;
31 module_param_named(nokbd, i8042_nokbd, bool, 0);
32 MODULE_PARM_DESC(nokbd, "Do not probe or use KBD port.");
33 
34 static unsigned int i8042_noaux;
35 module_param_named(noaux, i8042_noaux, bool, 0);
36 MODULE_PARM_DESC(noaux, "Do not probe or use AUX (mouse) port.");
37 
38 static unsigned int i8042_nomux;
39 module_param_named(nomux, i8042_nomux, bool, 0);
40 MODULE_PARM_DESC(nomux, "Do not check whether an active multiplexing conrtoller is present.");
41 
42 static unsigned int i8042_unlock;
43 module_param_named(unlock, i8042_unlock, bool, 0);
44 MODULE_PARM_DESC(unlock, "Ignore keyboard lock.");
45 
46 static unsigned int i8042_reset;
47 module_param_named(reset, i8042_reset, bool, 0);
48 MODULE_PARM_DESC(reset, "Reset controller during init and cleanup.");
49 
50 static unsigned int i8042_direct;
51 module_param_named(direct, i8042_direct, bool, 0);
52 MODULE_PARM_DESC(direct, "Put keyboard port into non-translated mode.");
53 
54 static unsigned int i8042_dumbkbd;
55 module_param_named(dumbkbd, i8042_dumbkbd, bool, 0);
56 MODULE_PARM_DESC(dumbkbd, "Pretend that controller can only read data from keyboard");
57 
58 static unsigned int i8042_noloop;
59 module_param_named(noloop, i8042_noloop, bool, 0);
60 MODULE_PARM_DESC(noloop, "Disable the AUX Loopback command while probing for the AUX port");
61 
62 static unsigned int i8042_blink_frequency = 500;
63 module_param_named(panicblink, i8042_blink_frequency, uint, 0600);
64 MODULE_PARM_DESC(panicblink, "Frequency with which keyboard LEDs should blink when kernel panics");
65 
66 #ifdef CONFIG_X86
67 static unsigned int i8042_dritek;
68 module_param_named(dritek, i8042_dritek, bool, 0);
69 MODULE_PARM_DESC(dritek, "Force enable the Dritek keyboard extension");
70 #endif
71 
72 #ifdef CONFIG_PNP
73 static int i8042_nopnp;
74 module_param_named(nopnp, i8042_nopnp, bool, 0);
75 MODULE_PARM_DESC(nopnp, "Do not use PNP to detect controller settings");
76 #endif
77 
78 #define DEBUG
79 #ifdef DEBUG
80 static int i8042_debug;
81 module_param_named(debug, i8042_debug, bool, 0600);
82 MODULE_PARM_DESC(debug, "Turn i8042 debugging mode on and off");
83 #endif
84 
85 #include "i8042.h"
86 
87 static DEFINE_SPINLOCK(i8042_lock);
88 
89 struct i8042_port {
90 	struct serio *serio;
91 	int irq;
92 	unsigned char exists;
93 	signed char mux;
94 };
95 
96 #define I8042_KBD_PORT_NO	0
97 #define I8042_AUX_PORT_NO	1
98 #define I8042_MUX_PORT_NO	2
99 #define I8042_NUM_PORTS		(I8042_NUM_MUX_PORTS + 2)
100 
101 static struct i8042_port i8042_ports[I8042_NUM_PORTS];
102 
103 static unsigned char i8042_initial_ctr;
104 static unsigned char i8042_ctr;
105 static unsigned char i8042_mux_present;
106 static unsigned char i8042_kbd_irq_registered;
107 static unsigned char i8042_aux_irq_registered;
108 static unsigned char i8042_suppress_kbd_ack;
109 static struct platform_device *i8042_platform_device;
110 
111 static irqreturn_t i8042_interrupt(int irq, void *dev_id);
112 
113 /*
114  * The i8042_wait_read() and i8042_wait_write functions wait for the i8042 to
115  * be ready for reading values from it / writing values to it.
116  * Called always with i8042_lock held.
117  */
118 
119 static int i8042_wait_read(void)
120 {
121 	int i = 0;
122 
123 	while ((~i8042_read_status() & I8042_STR_OBF) && (i < I8042_CTL_TIMEOUT)) {
124 		udelay(50);
125 		i++;
126 	}
127 	return -(i == I8042_CTL_TIMEOUT);
128 }
129 
130 static int i8042_wait_write(void)
131 {
132 	int i = 0;
133 
134 	while ((i8042_read_status() & I8042_STR_IBF) && (i < I8042_CTL_TIMEOUT)) {
135 		udelay(50);
136 		i++;
137 	}
138 	return -(i == I8042_CTL_TIMEOUT);
139 }
140 
141 /*
142  * i8042_flush() flushes all data that may be in the keyboard and mouse buffers
143  * of the i8042 down the toilet.
144  */
145 
146 static int i8042_flush(void)
147 {
148 	unsigned long flags;
149 	unsigned char data, str;
150 	int i = 0;
151 
152 	spin_lock_irqsave(&i8042_lock, flags);
153 
154 	while (((str = i8042_read_status()) & I8042_STR_OBF) && (i < I8042_BUFFER_SIZE)) {
155 		udelay(50);
156 		data = i8042_read_data();
157 		i++;
158 		dbg("%02x <- i8042 (flush, %s)", data,
159 			str & I8042_STR_AUXDATA ? "aux" : "kbd");
160 	}
161 
162 	spin_unlock_irqrestore(&i8042_lock, flags);
163 
164 	return i;
165 }
166 
167 /*
168  * i8042_command() executes a command on the i8042. It also sends the input
169  * parameter(s) of the commands to it, and receives the output value(s). The
170  * parameters are to be stored in the param array, and the output is placed
171  * into the same array. The number of the parameters and output values is
172  * encoded in bits 8-11 of the command number.
173  */
174 
175 static int __i8042_command(unsigned char *param, int command)
176 {
177 	int i, error;
178 
179 	if (i8042_noloop && command == I8042_CMD_AUX_LOOP)
180 		return -1;
181 
182 	error = i8042_wait_write();
183 	if (error)
184 		return error;
185 
186 	dbg("%02x -> i8042 (command)", command & 0xff);
187 	i8042_write_command(command & 0xff);
188 
189 	for (i = 0; i < ((command >> 12) & 0xf); i++) {
190 		error = i8042_wait_write();
191 		if (error)
192 			return error;
193 		dbg("%02x -> i8042 (parameter)", param[i]);
194 		i8042_write_data(param[i]);
195 	}
196 
197 	for (i = 0; i < ((command >> 8) & 0xf); i++) {
198 		error = i8042_wait_read();
199 		if (error) {
200 			dbg("     -- i8042 (timeout)");
201 			return error;
202 		}
203 
204 		if (command == I8042_CMD_AUX_LOOP &&
205 		    !(i8042_read_status() & I8042_STR_AUXDATA)) {
206 			dbg("     -- i8042 (auxerr)");
207 			return -1;
208 		}
209 
210 		param[i] = i8042_read_data();
211 		dbg("%02x <- i8042 (return)", param[i]);
212 	}
213 
214 	return 0;
215 }
216 
217 int i8042_command(unsigned char *param, int command)
218 {
219 	unsigned long flags;
220 	int retval;
221 
222 	spin_lock_irqsave(&i8042_lock, flags);
223 	retval = __i8042_command(param, command);
224 	spin_unlock_irqrestore(&i8042_lock, flags);
225 
226 	return retval;
227 }
228 EXPORT_SYMBOL(i8042_command);
229 
230 /*
231  * i8042_kbd_write() sends a byte out through the keyboard interface.
232  */
233 
234 static int i8042_kbd_write(struct serio *port, unsigned char c)
235 {
236 	unsigned long flags;
237 	int retval = 0;
238 
239 	spin_lock_irqsave(&i8042_lock, flags);
240 
241 	if (!(retval = i8042_wait_write())) {
242 		dbg("%02x -> i8042 (kbd-data)", c);
243 		i8042_write_data(c);
244 	}
245 
246 	spin_unlock_irqrestore(&i8042_lock, flags);
247 
248 	return retval;
249 }
250 
251 /*
252  * i8042_aux_write() sends a byte out through the aux interface.
253  */
254 
255 static int i8042_aux_write(struct serio *serio, unsigned char c)
256 {
257 	struct i8042_port *port = serio->port_data;
258 
259 	return i8042_command(&c, port->mux == -1 ?
260 					I8042_CMD_AUX_SEND :
261 					I8042_CMD_MUX_SEND + port->mux);
262 }
263 
264 /*
265  * i8042_start() is called by serio core when port is about to finish
266  * registering. It will mark port as existing so i8042_interrupt can
267  * start sending data through it.
268  */
269 static int i8042_start(struct serio *serio)
270 {
271 	struct i8042_port *port = serio->port_data;
272 
273 	port->exists = 1;
274 	mb();
275 	return 0;
276 }
277 
278 /*
279  * i8042_stop() marks serio port as non-existing so i8042_interrupt
280  * will not try to send data to the port that is about to go away.
281  * The function is called by serio core as part of unregister procedure.
282  */
283 static void i8042_stop(struct serio *serio)
284 {
285 	struct i8042_port *port = serio->port_data;
286 
287 	port->exists = 0;
288 
289 	/*
290 	 * We synchronize with both AUX and KBD IRQs because there is
291 	 * a (very unlikely) chance that AUX IRQ is raised for KBD port
292 	 * and vice versa.
293 	 */
294 	synchronize_irq(I8042_AUX_IRQ);
295 	synchronize_irq(I8042_KBD_IRQ);
296 	port->serio = NULL;
297 }
298 
299 /*
300  * i8042_interrupt() is the most important function in this driver -
301  * it handles the interrupts from the i8042, and sends incoming bytes
302  * to the upper layers.
303  */
304 
305 static irqreturn_t i8042_interrupt(int irq, void *dev_id)
306 {
307 	struct i8042_port *port;
308 	unsigned long flags;
309 	unsigned char str, data;
310 	unsigned int dfl;
311 	unsigned int port_no;
312 	int ret = 1;
313 
314 	spin_lock_irqsave(&i8042_lock, flags);
315 	str = i8042_read_status();
316 	if (unlikely(~str & I8042_STR_OBF)) {
317 		spin_unlock_irqrestore(&i8042_lock, flags);
318 		if (irq) dbg("Interrupt %d, without any data", irq);
319 		ret = 0;
320 		goto out;
321 	}
322 	data = i8042_read_data();
323 	spin_unlock_irqrestore(&i8042_lock, flags);
324 
325 	if (i8042_mux_present && (str & I8042_STR_AUXDATA)) {
326 		static unsigned long last_transmit;
327 		static unsigned char last_str;
328 
329 		dfl = 0;
330 		if (str & I8042_STR_MUXERR) {
331 			dbg("MUX error, status is %02x, data is %02x", str, data);
332 /*
333  * When MUXERR condition is signalled the data register can only contain
334  * 0xfd, 0xfe or 0xff if implementation follows the spec. Unfortunately
335  * it is not always the case. Some KBCs also report 0xfc when there is
336  * nothing connected to the port while others sometimes get confused which
337  * port the data came from and signal error leaving the data intact. They
338  * _do not_ revert to legacy mode (actually I've never seen KBC reverting
339  * to legacy mode yet, when we see one we'll add proper handling).
340  * Anyway, we process 0xfc, 0xfd, 0xfe and 0xff as timeouts, and for the
341  * rest assume that the data came from the same serio last byte
342  * was transmitted (if transmission happened not too long ago).
343  */
344 
345 			switch (data) {
346 				default:
347 					if (time_before(jiffies, last_transmit + HZ/10)) {
348 						str = last_str;
349 						break;
350 					}
351 					/* fall through - report timeout */
352 				case 0xfc:
353 				case 0xfd:
354 				case 0xfe: dfl = SERIO_TIMEOUT; data = 0xfe; break;
355 				case 0xff: dfl = SERIO_PARITY;  data = 0xfe; break;
356 			}
357 		}
358 
359 		port_no = I8042_MUX_PORT_NO + ((str >> 6) & 3);
360 		last_str = str;
361 		last_transmit = jiffies;
362 	} else {
363 
364 		dfl = ((str & I8042_STR_PARITY) ? SERIO_PARITY : 0) |
365 		      ((str & I8042_STR_TIMEOUT) ? SERIO_TIMEOUT : 0);
366 
367 		port_no = (str & I8042_STR_AUXDATA) ?
368 				I8042_AUX_PORT_NO : I8042_KBD_PORT_NO;
369 	}
370 
371 	port = &i8042_ports[port_no];
372 
373 	dbg("%02x <- i8042 (interrupt, %d, %d%s%s)",
374 	    data, port_no, irq,
375 	    dfl & SERIO_PARITY ? ", bad parity" : "",
376 	    dfl & SERIO_TIMEOUT ? ", timeout" : "");
377 
378 	if (unlikely(i8042_suppress_kbd_ack))
379 		if (port_no == I8042_KBD_PORT_NO &&
380 		    (data == 0xfa || data == 0xfe)) {
381 			i8042_suppress_kbd_ack--;
382 			goto out;
383 		}
384 
385 	if (likely(port->exists))
386 		serio_interrupt(port->serio, data, dfl);
387 
388  out:
389 	return IRQ_RETVAL(ret);
390 }
391 
392 /*
393  * i8042_enable_kbd_port enables keybaord port on chip
394  */
395 
396 static int i8042_enable_kbd_port(void)
397 {
398 	i8042_ctr &= ~I8042_CTR_KBDDIS;
399 	i8042_ctr |= I8042_CTR_KBDINT;
400 
401 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR)) {
402 		i8042_ctr &= ~I8042_CTR_KBDINT;
403 		i8042_ctr |= I8042_CTR_KBDDIS;
404 		printk(KERN_ERR "i8042.c: Failed to enable KBD port.\n");
405 		return -EIO;
406 	}
407 
408 	return 0;
409 }
410 
411 /*
412  * i8042_enable_aux_port enables AUX (mouse) port on chip
413  */
414 
415 static int i8042_enable_aux_port(void)
416 {
417 	i8042_ctr &= ~I8042_CTR_AUXDIS;
418 	i8042_ctr |= I8042_CTR_AUXINT;
419 
420 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR)) {
421 		i8042_ctr &= ~I8042_CTR_AUXINT;
422 		i8042_ctr |= I8042_CTR_AUXDIS;
423 		printk(KERN_ERR "i8042.c: Failed to enable AUX port.\n");
424 		return -EIO;
425 	}
426 
427 	return 0;
428 }
429 
430 /*
431  * i8042_enable_mux_ports enables 4 individual AUX ports after
432  * the controller has been switched into Multiplexed mode
433  */
434 
435 static int i8042_enable_mux_ports(void)
436 {
437 	unsigned char param;
438 	int i;
439 
440 	for (i = 0; i < I8042_NUM_MUX_PORTS; i++) {
441 		i8042_command(&param, I8042_CMD_MUX_PFX + i);
442 		i8042_command(&param, I8042_CMD_AUX_ENABLE);
443 	}
444 
445 	return i8042_enable_aux_port();
446 }
447 
448 /*
449  * i8042_set_mux_mode checks whether the controller has an active
450  * multiplexor and puts the chip into Multiplexed (1) or Legacy (0) mode.
451  */
452 
453 static int i8042_set_mux_mode(unsigned int mode, unsigned char *mux_version)
454 {
455 
456 	unsigned char param;
457 /*
458  * Get rid of bytes in the queue.
459  */
460 
461 	i8042_flush();
462 
463 /*
464  * Internal loopback test - send three bytes, they should come back from the
465  * mouse interface, the last should be version.
466  */
467 
468 	param = 0xf0;
469 	if (i8042_command(&param, I8042_CMD_AUX_LOOP) || param != 0xf0)
470 		return -1;
471 	param = mode ? 0x56 : 0xf6;
472 	if (i8042_command(&param, I8042_CMD_AUX_LOOP) || param != (mode ? 0x56 : 0xf6))
473 		return -1;
474 	param = mode ? 0xa4 : 0xa5;
475 	if (i8042_command(&param, I8042_CMD_AUX_LOOP) || param == (mode ? 0xa4 : 0xa5))
476 		return -1;
477 
478 	if (mux_version)
479 		*mux_version = param;
480 
481 	return 0;
482 }
483 
484 /*
485  * i8042_check_mux() checks whether the controller supports the PS/2 Active
486  * Multiplexing specification by Synaptics, Phoenix, Insyde and
487  * LCS/Telegraphics.
488  */
489 
490 static int __devinit i8042_check_mux(void)
491 {
492 	unsigned char mux_version;
493 
494 	if (i8042_set_mux_mode(1, &mux_version))
495 		return -1;
496 
497 /*
498  * Workaround for interference with USB Legacy emulation
499  * that causes a v10.12 MUX to be found.
500  */
501 	if (mux_version == 0xAC)
502 		return -1;
503 
504 	printk(KERN_INFO "i8042.c: Detected active multiplexing controller, rev %d.%d.\n",
505 		(mux_version >> 4) & 0xf, mux_version & 0xf);
506 
507 /*
508  * Disable all muxed ports by disabling AUX.
509  */
510 	i8042_ctr |= I8042_CTR_AUXDIS;
511 	i8042_ctr &= ~I8042_CTR_AUXINT;
512 
513 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR)) {
514 		printk(KERN_ERR "i8042.c: Failed to disable AUX port, can't use MUX.\n");
515 		return -EIO;
516 	}
517 
518 	i8042_mux_present = 1;
519 
520 	return 0;
521 }
522 
523 /*
524  * The following is used to test AUX IRQ delivery.
525  */
526 static struct completion i8042_aux_irq_delivered __devinitdata;
527 static int i8042_irq_being_tested __devinitdata;
528 
529 static irqreturn_t __devinit i8042_aux_test_irq(int irq, void *dev_id)
530 {
531 	unsigned long flags;
532 	unsigned char str, data;
533 	int ret = 0;
534 
535 	spin_lock_irqsave(&i8042_lock, flags);
536 	str = i8042_read_status();
537 	if (str & I8042_STR_OBF) {
538 		data = i8042_read_data();
539 		if (i8042_irq_being_tested &&
540 		    data == 0xa5 && (str & I8042_STR_AUXDATA))
541 			complete(&i8042_aux_irq_delivered);
542 		ret = 1;
543 	}
544 	spin_unlock_irqrestore(&i8042_lock, flags);
545 
546 	return IRQ_RETVAL(ret);
547 }
548 
549 /*
550  * i8042_toggle_aux - enables or disables AUX port on i8042 via command and
551  * verifies success by readinng CTR. Used when testing for presence of AUX
552  * port.
553  */
554 static int __devinit i8042_toggle_aux(int on)
555 {
556 	unsigned char param;
557 	int i;
558 
559 	if (i8042_command(&param,
560 			on ? I8042_CMD_AUX_ENABLE : I8042_CMD_AUX_DISABLE))
561 		return -1;
562 
563 	/* some chips need some time to set the I8042_CTR_AUXDIS bit */
564 	for (i = 0; i < 100; i++) {
565 		udelay(50);
566 
567 		if (i8042_command(&param, I8042_CMD_CTL_RCTR))
568 			return -1;
569 
570 		if (!(param & I8042_CTR_AUXDIS) == on)
571 			return 0;
572 	}
573 
574 	return -1;
575 }
576 
577 /*
578  * i8042_check_aux() applies as much paranoia as it can at detecting
579  * the presence of an AUX interface.
580  */
581 
582 static int __devinit i8042_check_aux(void)
583 {
584 	int retval = -1;
585 	int irq_registered = 0;
586 	int aux_loop_broken = 0;
587 	unsigned long flags;
588 	unsigned char param;
589 
590 /*
591  * Get rid of bytes in the queue.
592  */
593 
594 	i8042_flush();
595 
596 /*
597  * Internal loopback test - filters out AT-type i8042's. Unfortunately
598  * SiS screwed up and their 5597 doesn't support the LOOP command even
599  * though it has an AUX port.
600  */
601 
602 	param = 0x5a;
603 	retval = i8042_command(&param, I8042_CMD_AUX_LOOP);
604 	if (retval || param != 0x5a) {
605 
606 /*
607  * External connection test - filters out AT-soldered PS/2 i8042's
608  * 0x00 - no error, 0x01-0x03 - clock/data stuck, 0xff - general error
609  * 0xfa - no error on some notebooks which ignore the spec
610  * Because it's common for chipsets to return error on perfectly functioning
611  * AUX ports, we test for this only when the LOOP command failed.
612  */
613 
614 		if (i8042_command(&param, I8042_CMD_AUX_TEST) ||
615 		    (param && param != 0xfa && param != 0xff))
616 			return -1;
617 
618 /*
619  * If AUX_LOOP completed without error but returned unexpected data
620  * mark it as broken
621  */
622 		if (!retval)
623 			aux_loop_broken = 1;
624 	}
625 
626 /*
627  * Bit assignment test - filters out PS/2 i8042's in AT mode
628  */
629 
630 	if (i8042_toggle_aux(0)) {
631 		printk(KERN_WARNING "Failed to disable AUX port, but continuing anyway... Is this a SiS?\n");
632 		printk(KERN_WARNING "If AUX port is really absent please use the 'i8042.noaux' option.\n");
633 	}
634 
635 	if (i8042_toggle_aux(1))
636 		return -1;
637 
638 /*
639  * Test AUX IRQ delivery to make sure BIOS did not grab the IRQ and
640  * used it for a PCI card or somethig else.
641  */
642 
643 	if (i8042_noloop || aux_loop_broken) {
644 /*
645  * Without LOOP command we can't test AUX IRQ delivery. Assume the port
646  * is working and hope we are right.
647  */
648 		retval = 0;
649 		goto out;
650 	}
651 
652 	if (request_irq(I8042_AUX_IRQ, i8042_aux_test_irq, IRQF_SHARED,
653 			"i8042", i8042_platform_device))
654 		goto out;
655 
656 	irq_registered = 1;
657 
658 	if (i8042_enable_aux_port())
659 		goto out;
660 
661 	spin_lock_irqsave(&i8042_lock, flags);
662 
663 	init_completion(&i8042_aux_irq_delivered);
664 	i8042_irq_being_tested = 1;
665 
666 	param = 0xa5;
667 	retval = __i8042_command(&param, I8042_CMD_AUX_LOOP & 0xf0ff);
668 
669 	spin_unlock_irqrestore(&i8042_lock, flags);
670 
671 	if (retval)
672 		goto out;
673 
674 	if (wait_for_completion_timeout(&i8042_aux_irq_delivered,
675 					msecs_to_jiffies(250)) == 0) {
676 /*
677  * AUX IRQ was never delivered so we need to flush the controller to
678  * get rid of the byte we put there; otherwise keyboard may not work.
679  */
680 		i8042_flush();
681 		retval = -1;
682 	}
683 
684  out:
685 
686 /*
687  * Disable the interface.
688  */
689 
690 	i8042_ctr |= I8042_CTR_AUXDIS;
691 	i8042_ctr &= ~I8042_CTR_AUXINT;
692 
693 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR))
694 		retval = -1;
695 
696 	if (irq_registered)
697 		free_irq(I8042_AUX_IRQ, i8042_platform_device);
698 
699 	return retval;
700 }
701 
702 static int i8042_controller_check(void)
703 {
704 	if (i8042_flush() == I8042_BUFFER_SIZE) {
705 		printk(KERN_ERR "i8042.c: No controller found.\n");
706 		return -ENODEV;
707 	}
708 
709 	return 0;
710 }
711 
712 static int i8042_controller_selftest(void)
713 {
714 	unsigned char param;
715 
716 	if (!i8042_reset)
717 		return 0;
718 
719 	if (i8042_command(&param, I8042_CMD_CTL_TEST)) {
720 		printk(KERN_ERR "i8042.c: i8042 controller self test timeout.\n");
721 		return -ENODEV;
722 	}
723 
724 	if (param != I8042_RET_CTL_TEST) {
725 		printk(KERN_ERR "i8042.c: i8042 controller selftest failed. (%#x != %#x)\n",
726 			 param, I8042_RET_CTL_TEST);
727 		return -EIO;
728 	}
729 
730 	return 0;
731 }
732 
733 /*
734  * i8042_controller init initializes the i8042 controller, and,
735  * most importantly, sets it into non-xlated mode if that's
736  * desired.
737  */
738 
739 static int i8042_controller_init(void)
740 {
741 	unsigned long flags;
742 
743 /*
744  * Save the CTR for restoral on unload / reboot.
745  */
746 
747 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_RCTR)) {
748 		printk(KERN_ERR "i8042.c: Can't read CTR while initializing i8042.\n");
749 		return -EIO;
750 	}
751 
752 	i8042_initial_ctr = i8042_ctr;
753 
754 /*
755  * Disable the keyboard interface and interrupt.
756  */
757 
758 	i8042_ctr |= I8042_CTR_KBDDIS;
759 	i8042_ctr &= ~I8042_CTR_KBDINT;
760 
761 /*
762  * Handle keylock.
763  */
764 
765 	spin_lock_irqsave(&i8042_lock, flags);
766 	if (~i8042_read_status() & I8042_STR_KEYLOCK) {
767 		if (i8042_unlock)
768 			i8042_ctr |= I8042_CTR_IGNKEYLOCK;
769 		else
770 			printk(KERN_WARNING "i8042.c: Warning: Keylock active.\n");
771 	}
772 	spin_unlock_irqrestore(&i8042_lock, flags);
773 
774 /*
775  * If the chip is configured into nontranslated mode by the BIOS, don't
776  * bother enabling translating and be happy.
777  */
778 
779 	if (~i8042_ctr & I8042_CTR_XLATE)
780 		i8042_direct = 1;
781 
782 /*
783  * Set nontranslated mode for the kbd interface if requested by an option.
784  * After this the kbd interface becomes a simple serial in/out, like the aux
785  * interface is. We don't do this by default, since it can confuse notebook
786  * BIOSes.
787  */
788 
789 	if (i8042_direct)
790 		i8042_ctr &= ~I8042_CTR_XLATE;
791 
792 /*
793  * Write CTR back.
794  */
795 
796 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR)) {
797 		printk(KERN_ERR "i8042.c: Can't write CTR while initializing i8042.\n");
798 		return -EIO;
799 	}
800 
801 	return 0;
802 }
803 
804 
805 /*
806  * Reset the controller and reset CRT to the original value set by BIOS.
807  */
808 
809 static void i8042_controller_reset(void)
810 {
811 	i8042_flush();
812 
813 /*
814  * Disable both KBD and AUX interfaces so they don't get in the way
815  */
816 
817 	i8042_ctr |= I8042_CTR_KBDDIS | I8042_CTR_AUXDIS;
818 	i8042_ctr &= ~(I8042_CTR_KBDINT | I8042_CTR_AUXINT);
819 
820 /*
821  * Disable MUX mode if present.
822  */
823 
824 	if (i8042_mux_present)
825 		i8042_set_mux_mode(0, NULL);
826 
827 /*
828  * Reset the controller if requested.
829  */
830 
831 	i8042_controller_selftest();
832 
833 /*
834  * Restore the original control register setting.
835  */
836 
837 	if (i8042_command(&i8042_initial_ctr, I8042_CMD_CTL_WCTR))
838 		printk(KERN_WARNING "i8042.c: Can't restore CTR.\n");
839 }
840 
841 
842 /*
843  * i8042_panic_blink() will flash the keyboard LEDs and is called when
844  * kernel panics. Flashing LEDs is useful for users running X who may
845  * not see the console and will help distingushing panics from "real"
846  * lockups.
847  *
848  * Note that DELAY has a limit of 10ms so we will not get stuck here
849  * waiting for KBC to free up even if KBD interrupt is off
850  */
851 
852 #define DELAY do { mdelay(1); if (++delay > 10) return delay; } while(0)
853 
854 static long i8042_panic_blink(long count)
855 {
856 	long delay = 0;
857 	static long last_blink;
858 	static char led;
859 
860 	/*
861 	 * We expect frequency to be about 1/2s. KDB uses about 1s.
862 	 * Make sure they are different.
863 	 */
864 	if (!i8042_blink_frequency)
865 		return 0;
866 	if (count - last_blink < i8042_blink_frequency)
867 		return 0;
868 
869 	led ^= 0x01 | 0x04;
870 	while (i8042_read_status() & I8042_STR_IBF)
871 		DELAY;
872 	dbg("%02x -> i8042 (panic blink)", 0xed);
873 	i8042_suppress_kbd_ack = 2;
874 	i8042_write_data(0xed); /* set leds */
875 	DELAY;
876 	while (i8042_read_status() & I8042_STR_IBF)
877 		DELAY;
878 	DELAY;
879 	dbg("%02x -> i8042 (panic blink)", led);
880 	i8042_write_data(led);
881 	DELAY;
882 	last_blink = count;
883 	return delay;
884 }
885 
886 #undef DELAY
887 
888 #ifdef CONFIG_X86
889 static void i8042_dritek_enable(void)
890 {
891 	char param = 0x90;
892 	int error;
893 
894 	error = i8042_command(&param, 0x1059);
895 	if (error)
896 		printk(KERN_WARNING
897 			"Failed to enable DRITEK extension: %d\n",
898 			error);
899 }
900 #endif
901 
902 #ifdef CONFIG_PM
903 /*
904  * Here we try to restore the original BIOS settings. We only want to
905  * do that once, when we really suspend, not when we taking memory
906  * snapshot for swsusp (in this case we'll perform required cleanup
907  * as part of shutdown process).
908  */
909 
910 static int i8042_suspend(struct platform_device *dev, pm_message_t state)
911 {
912 	if (dev->dev.power.power_state.event != state.event) {
913 		if (state.event == PM_EVENT_SUSPEND)
914 			i8042_controller_reset();
915 
916 		dev->dev.power.power_state = state;
917 	}
918 
919 	return 0;
920 }
921 
922 
923 /*
924  * Here we try to reset everything back to a state in which suspended
925  */
926 
927 static int i8042_resume(struct platform_device *dev)
928 {
929 	int error;
930 
931 /*
932  * Do not bother with restoring state if we haven't suspened yet
933  */
934 	if (dev->dev.power.power_state.event == PM_EVENT_ON)
935 		return 0;
936 
937 	error = i8042_controller_check();
938 	if (error)
939 		return error;
940 
941 	error = i8042_controller_selftest();
942 	if (error)
943 		return error;
944 
945 /*
946  * Restore original CTR value and disable all ports
947  */
948 
949 	i8042_ctr = i8042_initial_ctr;
950 	if (i8042_direct)
951 		i8042_ctr &= ~I8042_CTR_XLATE;
952 	i8042_ctr |= I8042_CTR_AUXDIS | I8042_CTR_KBDDIS;
953 	i8042_ctr &= ~(I8042_CTR_AUXINT | I8042_CTR_KBDINT);
954 	if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR)) {
955 		printk(KERN_WARNING "i8042: Can't write CTR to resume, retrying...\n");
956 		msleep(50);
957 		if (i8042_command(&i8042_ctr, I8042_CMD_CTL_WCTR)) {
958 			printk(KERN_ERR "i8042: CTR write retry failed\n");
959 			return -EIO;
960 		}
961 	}
962 
963 
964 #ifdef CONFIG_X86
965 	if (i8042_dritek)
966 		i8042_dritek_enable();
967 #endif
968 
969 	if (i8042_mux_present) {
970 		if (i8042_set_mux_mode(1, NULL) || i8042_enable_mux_ports())
971 			printk(KERN_WARNING
972 				"i8042: failed to resume active multiplexor, "
973 				"mouse won't work.\n");
974 	} else if (i8042_ports[I8042_AUX_PORT_NO].serio)
975 		i8042_enable_aux_port();
976 
977 	if (i8042_ports[I8042_KBD_PORT_NO].serio)
978 		i8042_enable_kbd_port();
979 
980 	i8042_interrupt(0, NULL);
981 
982 	dev->dev.power.power_state = PMSG_ON;
983 
984 	return 0;
985 }
986 #endif /* CONFIG_PM */
987 
988 /*
989  * We need to reset the 8042 back to original mode on system shutdown,
990  * because otherwise BIOSes will be confused.
991  */
992 
993 static void i8042_shutdown(struct platform_device *dev)
994 {
995 	i8042_controller_reset();
996 }
997 
998 static int __devinit i8042_create_kbd_port(void)
999 {
1000 	struct serio *serio;
1001 	struct i8042_port *port = &i8042_ports[I8042_KBD_PORT_NO];
1002 
1003 	serio = kzalloc(sizeof(struct serio), GFP_KERNEL);
1004 	if (!serio)
1005 		return -ENOMEM;
1006 
1007 	serio->id.type		= i8042_direct ? SERIO_8042 : SERIO_8042_XL;
1008 	serio->write		= i8042_dumbkbd ? NULL : i8042_kbd_write;
1009 	serio->start		= i8042_start;
1010 	serio->stop		= i8042_stop;
1011 	serio->port_data	= port;
1012 	serio->dev.parent	= &i8042_platform_device->dev;
1013 	strlcpy(serio->name, "i8042 KBD port", sizeof(serio->name));
1014 	strlcpy(serio->phys, I8042_KBD_PHYS_DESC, sizeof(serio->phys));
1015 
1016 	port->serio = serio;
1017 	port->irq = I8042_KBD_IRQ;
1018 
1019 	return 0;
1020 }
1021 
1022 static int __devinit i8042_create_aux_port(int idx)
1023 {
1024 	struct serio *serio;
1025 	int port_no = idx < 0 ? I8042_AUX_PORT_NO : I8042_MUX_PORT_NO + idx;
1026 	struct i8042_port *port = &i8042_ports[port_no];
1027 
1028 	serio = kzalloc(sizeof(struct serio), GFP_KERNEL);
1029 	if (!serio)
1030 		return -ENOMEM;
1031 
1032 	serio->id.type		= SERIO_8042;
1033 	serio->write		= i8042_aux_write;
1034 	serio->start		= i8042_start;
1035 	serio->stop		= i8042_stop;
1036 	serio->port_data	= port;
1037 	serio->dev.parent	= &i8042_platform_device->dev;
1038 	if (idx < 0) {
1039 		strlcpy(serio->name, "i8042 AUX port", sizeof(serio->name));
1040 		strlcpy(serio->phys, I8042_AUX_PHYS_DESC, sizeof(serio->phys));
1041 	} else {
1042 		snprintf(serio->name, sizeof(serio->name), "i8042 AUX%d port", idx);
1043 		snprintf(serio->phys, sizeof(serio->phys), I8042_MUX_PHYS_DESC, idx + 1);
1044 	}
1045 
1046 	port->serio = serio;
1047 	port->mux = idx;
1048 	port->irq = I8042_AUX_IRQ;
1049 
1050 	return 0;
1051 }
1052 
1053 static void __devinit i8042_free_kbd_port(void)
1054 {
1055 	kfree(i8042_ports[I8042_KBD_PORT_NO].serio);
1056 	i8042_ports[I8042_KBD_PORT_NO].serio = NULL;
1057 }
1058 
1059 static void __devinit i8042_free_aux_ports(void)
1060 {
1061 	int i;
1062 
1063 	for (i = I8042_AUX_PORT_NO; i < I8042_NUM_PORTS; i++) {
1064 		kfree(i8042_ports[i].serio);
1065 		i8042_ports[i].serio = NULL;
1066 	}
1067 }
1068 
1069 static void __devinit i8042_register_ports(void)
1070 {
1071 	int i;
1072 
1073 	for (i = 0; i < I8042_NUM_PORTS; i++) {
1074 		if (i8042_ports[i].serio) {
1075 			printk(KERN_INFO "serio: %s at %#lx,%#lx irq %d\n",
1076 				i8042_ports[i].serio->name,
1077 				(unsigned long) I8042_DATA_REG,
1078 				(unsigned long) I8042_COMMAND_REG,
1079 				i8042_ports[i].irq);
1080 			serio_register_port(i8042_ports[i].serio);
1081 		}
1082 	}
1083 }
1084 
1085 static void __devexit i8042_unregister_ports(void)
1086 {
1087 	int i;
1088 
1089 	for (i = 0; i < I8042_NUM_PORTS; i++) {
1090 		if (i8042_ports[i].serio) {
1091 			serio_unregister_port(i8042_ports[i].serio);
1092 			i8042_ports[i].serio = NULL;
1093 		}
1094 	}
1095 }
1096 
1097 static void i8042_free_irqs(void)
1098 {
1099 	if (i8042_aux_irq_registered)
1100 		free_irq(I8042_AUX_IRQ, i8042_platform_device);
1101 	if (i8042_kbd_irq_registered)
1102 		free_irq(I8042_KBD_IRQ, i8042_platform_device);
1103 
1104 	i8042_aux_irq_registered = i8042_kbd_irq_registered = 0;
1105 }
1106 
1107 static int __devinit i8042_setup_aux(void)
1108 {
1109 	int (*aux_enable)(void);
1110 	int error;
1111 	int i;
1112 
1113 	if (i8042_check_aux())
1114 		return -ENODEV;
1115 
1116 	if (i8042_nomux || i8042_check_mux()) {
1117 		error = i8042_create_aux_port(-1);
1118 		if (error)
1119 			goto err_free_ports;
1120 		aux_enable = i8042_enable_aux_port;
1121 	} else {
1122 		for (i = 0; i < I8042_NUM_MUX_PORTS; i++) {
1123 			error = i8042_create_aux_port(i);
1124 			if (error)
1125 				goto err_free_ports;
1126 		}
1127 		aux_enable = i8042_enable_mux_ports;
1128 	}
1129 
1130 	error = request_irq(I8042_AUX_IRQ, i8042_interrupt, IRQF_SHARED,
1131 			    "i8042", i8042_platform_device);
1132 	if (error)
1133 		goto err_free_ports;
1134 
1135 	if (aux_enable())
1136 		goto err_free_irq;
1137 
1138 	i8042_aux_irq_registered = 1;
1139 	return 0;
1140 
1141  err_free_irq:
1142 	free_irq(I8042_AUX_IRQ, i8042_platform_device);
1143  err_free_ports:
1144 	i8042_free_aux_ports();
1145 	return error;
1146 }
1147 
1148 static int __devinit i8042_setup_kbd(void)
1149 {
1150 	int error;
1151 
1152 	error = i8042_create_kbd_port();
1153 	if (error)
1154 		return error;
1155 
1156 	error = request_irq(I8042_KBD_IRQ, i8042_interrupt, IRQF_SHARED,
1157 			    "i8042", i8042_platform_device);
1158 	if (error)
1159 		goto err_free_port;
1160 
1161 	error = i8042_enable_kbd_port();
1162 	if (error)
1163 		goto err_free_irq;
1164 
1165 	i8042_kbd_irq_registered = 1;
1166 	return 0;
1167 
1168  err_free_irq:
1169 	free_irq(I8042_KBD_IRQ, i8042_platform_device);
1170  err_free_port:
1171 	i8042_free_kbd_port();
1172 	return error;
1173 }
1174 
1175 static int __devinit i8042_probe(struct platform_device *dev)
1176 {
1177 	int error;
1178 
1179 	error = i8042_controller_selftest();
1180 	if (error)
1181 		return error;
1182 
1183 	error = i8042_controller_init();
1184 	if (error)
1185 		return error;
1186 
1187 #ifdef CONFIG_X86
1188 	if (i8042_dritek)
1189 		i8042_dritek_enable();
1190 #endif
1191 
1192 	if (!i8042_noaux) {
1193 		error = i8042_setup_aux();
1194 		if (error && error != -ENODEV && error != -EBUSY)
1195 			goto out_fail;
1196 	}
1197 
1198 	if (!i8042_nokbd) {
1199 		error = i8042_setup_kbd();
1200 		if (error)
1201 			goto out_fail;
1202 	}
1203 /*
1204  * Ok, everything is ready, let's register all serio ports
1205  */
1206 	i8042_register_ports();
1207 
1208 	return 0;
1209 
1210  out_fail:
1211 	i8042_free_aux_ports();	/* in case KBD failed but AUX not */
1212 	i8042_free_irqs();
1213 	i8042_controller_reset();
1214 
1215 	return error;
1216 }
1217 
1218 static int __devexit i8042_remove(struct platform_device *dev)
1219 {
1220 	i8042_unregister_ports();
1221 	i8042_free_irqs();
1222 	i8042_controller_reset();
1223 
1224 	return 0;
1225 }
1226 
1227 static struct platform_driver i8042_driver = {
1228 	.driver		= {
1229 		.name	= "i8042",
1230 		.owner	= THIS_MODULE,
1231 	},
1232 	.probe		= i8042_probe,
1233 	.remove		= __devexit_p(i8042_remove),
1234 	.shutdown	= i8042_shutdown,
1235 #ifdef CONFIG_PM
1236 	.suspend	= i8042_suspend,
1237 	.resume		= i8042_resume,
1238 #endif
1239 };
1240 
1241 static int __init i8042_init(void)
1242 {
1243 	int err;
1244 
1245 	dbg_init();
1246 
1247 	err = i8042_platform_init();
1248 	if (err)
1249 		return err;
1250 
1251 	err = i8042_controller_check();
1252 	if (err)
1253 		goto err_platform_exit;
1254 
1255 	err = platform_driver_register(&i8042_driver);
1256 	if (err)
1257 		goto err_platform_exit;
1258 
1259 	i8042_platform_device = platform_device_alloc("i8042", -1);
1260 	if (!i8042_platform_device) {
1261 		err = -ENOMEM;
1262 		goto err_unregister_driver;
1263 	}
1264 
1265 	err = platform_device_add(i8042_platform_device);
1266 	if (err)
1267 		goto err_free_device;
1268 
1269 	panic_blink = i8042_panic_blink;
1270 
1271 	return 0;
1272 
1273  err_free_device:
1274 	platform_device_put(i8042_platform_device);
1275  err_unregister_driver:
1276 	platform_driver_unregister(&i8042_driver);
1277  err_platform_exit:
1278 	i8042_platform_exit();
1279 
1280 	return err;
1281 }
1282 
1283 static void __exit i8042_exit(void)
1284 {
1285 	platform_device_unregister(i8042_platform_device);
1286 	platform_driver_unregister(&i8042_driver);
1287 	i8042_platform_exit();
1288 
1289 	panic_blink = NULL;
1290 }
1291 
1292 module_init(i8042_init);
1293 module_exit(i8042_exit);
1294