thinkpad_acpi.c 113.4 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
2
 *  thinkpad_acpi.c - ThinkPad ACPI Extras
L
Linus Torvalds 已提交
3 4
 *
 *
5
 *  Copyright (C) 2004-2005 Borislav Deianov <borislav@users.sf.net>
6
 *  Copyright (C) 2006-2007 Henrique de Moraes Holschuh <hmh@hmh.eng.br>
L
Linus Torvalds 已提交
7 8 9 10 11 12 13 14 15 16 17 18 19
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
20 21
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 *  02110-1301, USA.
22 23
 */

24
#define IBM_VERSION "0.16"
25
#define TPACPI_SYSFS_VERSION 0x010000
26 27

/*
L
Linus Torvalds 已提交
28
 *  Changelog:
29 30
 *  2007-03-27  0.14	renamed to thinkpad_acpi and moved to
 *  			drivers/misc.
31 32 33 34
 *
 *  2006-11-22	0.13	new maintainer
 *  			changelog now lives in git commit history, and will
 *  			not be updated further in-file.
35
 *
36 37 38 39 40 41 42 43 44
 *  2005-08-17  0.12	fix compilation on 2.6.13-rc kernels
 *  2005-03-17	0.11	support for 600e, 770x
 *			    thanks to Jamie Lentin <lentinj@dial.pipex.com>
 *			support for 770e, G41
 *			G40 and G41 don't have a thinklight
 *			temperatures no longer experimental
 *			experimental brightness control
 *			experimental volume control
 *			experimental fan enable/disable
45
 *  2005-01-16	0.10	fix module loading on R30, R31
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62
 *  2005-01-16	0.9	support for 570, R30, R31
 *			ultrabay support on A22p, A3x
 *			limit arg for cmos, led, beep, drop experimental status
 *			more capable led control on A21e, A22p, T20-22, X20
 *			experimental temperatures and fan speed
 *			experimental embedded controller register dump
 *			mark more functions as __init, drop incorrect __exit
 *			use MODULE_VERSION
 *			    thanks to Henrik Brix Andersen <brix@gentoo.org>
 *			fix parameter passing on module loading
 *			    thanks to Rusty Russell <rusty@rustcorp.com.au>
 *			    thanks to Jim Radford <radford@blackbean.org>
 *  2004-11-08	0.8	fix init error case, don't return from a macro
 *			    thanks to Chris Wright <chrisw@osdl.org>
 *  2004-10-23	0.7	fix module loading on A21e, A22p, T20, T21, X20
 *			fix led control on A21e
 *  2004-10-19	0.6	use acpi_bus_register_driver() to claim HKEY device
L
Linus Torvalds 已提交
63 64 65 66 67 68
 *  2004-10-18	0.5	thinklight support on A21e, G40, R32, T20, T21, X20
 *			proc file format changed
 *			video_switch command
 *			experimental cmos control
 *			experimental led control
 *			experimental acpi sounds
69 70 71 72 73 74 75 76 77 78 79 80 81 82
 *  2004-09-16	0.4	support for module parameters
 *			hotkey mask can be prefixed by 0x
 *			video output switching
 *			video expansion control
 *			ultrabay eject support
 *			removed lcd brightness/on/off control, didn't work
 *  2004-08-17	0.3	support for R40
 *			lcd off, brightness control
 *			thinklight on/off
 *  2004-08-14	0.2	support for T series, X20
 *			bluetooth enable/disable
 *			hotkey events disabled by default
 *			removed fan control, currently useless
 *  2004-08-09	0.1	initial release, support for X series
L
Linus Torvalds 已提交
83 84
 */

85
#include "thinkpad_acpi.h"
L
Linus Torvalds 已提交
86

87
MODULE_AUTHOR("Borislav Deianov, Henrique de Moraes Holschuh");
88 89 90 91
MODULE_DESCRIPTION(IBM_DESC);
MODULE_VERSION(IBM_VERSION);
MODULE_LICENSE("GPL");

92 93 94
/* Please remove this in year 2009 */
MODULE_ALIAS("ibm_acpi");

95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117
/*
 * DMI matching for module autoloading
 *
 * See http://thinkwiki.org/wiki/List_of_DMI_IDs
 * See http://thinkwiki.org/wiki/BIOS_Upgrade_Downloads
 *
 * Only models listed in thinkwiki will be supported, so add yours
 * if it is not there yet.
 */
#define IBM_BIOS_MODULE_ALIAS(__type) \
	MODULE_ALIAS("dmi:bvnIBM:bvr" __type "ET??WW")

/* Non-ancient thinkpads */
MODULE_ALIAS("dmi:bvnIBM:*:svnIBM:*:pvrThinkPad*:rvnIBM:*");
MODULE_ALIAS("dmi:bvnLENOVO:*:svnLENOVO:*:pvrThinkPad*:rvnLENOVO:*");

/* Ancient thinkpad BIOSes have to be identified by
 * BIOS type or model number, and there are far less
 * BIOS types than model numbers... */
IBM_BIOS_MODULE_ALIAS("I[B,D,H,I,M,N,O,T,W,V,Y,Z]");
IBM_BIOS_MODULE_ALIAS("1[0,3,6,8,A-G,I,K,M-P,S,T]");
IBM_BIOS_MODULE_ALIAS("K[U,X-Z]");

L
Linus Torvalds 已提交
118 119
#define __unused __attribute__ ((unused))

120 121 122 123 124 125 126 127 128 129 130
/****************************************************************************
 ****************************************************************************
 *
 * ACPI Helpers and device model
 *
 ****************************************************************************
 ****************************************************************************/

/*************************************************************************
 * ACPI basic handles
 */
L
Linus Torvalds 已提交
131

132
static acpi_handle root_handle;
L
Linus Torvalds 已提交
133 134 135 136

#define IBM_HANDLE(object, parent, paths...)			\
	static acpi_handle  object##_handle;			\
	static acpi_handle *object##_parent = &parent##_handle;	\
137
	static char        *object##_path;			\
L
Linus Torvalds 已提交
138 139
	static char        *object##_paths[] = { paths }

140 141 142 143 144 145 146
IBM_HANDLE(ec, root, "\\_SB.PCI0.ISA.EC0",	/* 240, 240x */
	   "\\_SB.PCI.ISA.EC",	/* 570 */
	   "\\_SB.PCI0.ISA0.EC0",	/* 600e/x, 770e, 770x */
	   "\\_SB.PCI0.ISA.EC",	/* A21e, A2xm/p, T20-22, X20-21 */
	   "\\_SB.PCI0.AD4S.EC0",	/* i1400, R30 */
	   "\\_SB.PCI0.ICH3.EC0",	/* R31 */
	   "\\_SB.PCI0.LPC.EC",	/* all others */
147
	   );
148

149 150
IBM_HANDLE(ecrd, ec, "ECRD");	/* 570 */
IBM_HANDLE(ecwr, ec, "ECWR");	/* 570 */
151

152 153 154 155

/*************************************************************************
 * Misc ACPI handles
 */
156 157 158 159

IBM_HANDLE(cmos, root, "\\UCMS",	/* R50, R50e, R50p, R51, T4x, X31, X40 */
	   "\\CMOS",		/* A3x, G4x, R32, T23, T30, X22-24, X30 */
	   "\\CMS",		/* R40, R40e */
160
	   );			/* all others */
161 162 163 164

IBM_HANDLE(hkey, ec, "\\_SB.HKEY",	/* 600e/x, 770e, 770x */
	   "^HKEY",		/* R30, R31 */
	   "HKEY",		/* all others */
165
	   );			/* 570 */
166 167


168 169
/*************************************************************************
 * ACPI helpers
170 171
 */

L
Linus Torvalds 已提交
172 173 174 175
static int acpi_evalf(acpi_handle handle,
		      void *res, char *method, char *fmt, ...)
{
	char *fmt0 = fmt;
176 177 178 179 180 181 182 183 184
	struct acpi_object_list params;
	union acpi_object in_objs[IBM_MAX_ACPI_ARGS];
	struct acpi_buffer result, *resultp;
	union acpi_object out_obj;
	acpi_status status;
	va_list ap;
	char res_type;
	int success;
	int quiet;
L
Linus Torvalds 已提交
185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209

	if (!*fmt) {
		printk(IBM_ERR "acpi_evalf() called with empty format\n");
		return 0;
	}

	if (*fmt == 'q') {
		quiet = 1;
		fmt++;
	} else
		quiet = 0;

	res_type = *(fmt++);

	params.count = 0;
	params.pointer = &in_objs[0];

	va_start(ap, fmt);
	while (*fmt) {
		char c = *(fmt++);
		switch (c) {
		case 'd':	/* int */
			in_objs[params.count].integer.value = va_arg(ap, int);
			in_objs[params.count++].type = ACPI_TYPE_INTEGER;
			break;
210
			/* add more types as needed */
L
Linus Torvalds 已提交
211 212 213 214 215 216 217 218
		default:
			printk(IBM_ERR "acpi_evalf() called "
			       "with invalid format character '%c'\n", c);
			return 0;
		}
	}
	va_end(ap);

219 220 221 222 223 224
	if (res_type != 'v') {
		result.length = sizeof(out_obj);
		result.pointer = &out_obj;
		resultp = &result;
	} else
		resultp = NULL;
L
Linus Torvalds 已提交
225

226
	status = acpi_evaluate_object(handle, method, &params, resultp);
L
Linus Torvalds 已提交
227 228

	switch (res_type) {
229
	case 'd':		/* int */
L
Linus Torvalds 已提交
230 231 232 233
		if (res)
			*(int *)res = out_obj.integer.value;
		success = status == AE_OK && out_obj.type == ACPI_TYPE_INTEGER;
		break;
234
	case 'v':		/* void */
L
Linus Torvalds 已提交
235 236
		success = status == AE_OK;
		break;
237
		/* add more types as needed */
L
Linus Torvalds 已提交
238 239 240 241 242 243
	default:
		printk(IBM_ERR "acpi_evalf() called "
		       "with invalid format character '%c'\n", res_type);
		return 0;
	}

244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299
	if (!success && !quiet)
		printk(IBM_ERR "acpi_evalf(%s, %s, ...) failed: %d\n",
		       method, fmt0, status);

	return success;
}

static void __unused acpi_print_int(acpi_handle handle, char *method)
{
	int i;

	if (acpi_evalf(handle, &i, method, "d"))
		printk(IBM_INFO "%s = 0x%x\n", method, i);
	else
		printk(IBM_ERR "error calling %s\n", method);
}

static int acpi_ec_read(int i, u8 * p)
{
	int v;

	if (ecrd_handle) {
		if (!acpi_evalf(ecrd_handle, &v, NULL, "dd", i))
			return 0;
		*p = v;
	} else {
		if (ec_read(i, p) < 0)
			return 0;
	}

	return 1;
}

static int acpi_ec_write(int i, u8 v)
{
	if (ecwr_handle) {
		if (!acpi_evalf(ecwr_handle, NULL, NULL, "vdd", i, v))
			return 0;
	} else {
		if (ec_write(i, v) < 0)
			return 0;
	}

	return 1;
}

static int _sta(acpi_handle handle)
{
	int status;

	if (!handle || !acpi_evalf(handle, &status, "_STA", "d"))
		status = 0;

	return status;
}

300 301 302 303 304 305 306 307 308 309 310
static int issue_thinkpad_cmos_command(int cmos_cmd)
{
	if (!cmos_handle)
		return -ENXIO;

	if (!acpi_evalf(cmos_handle, NULL, NULL, "vd", cmos_cmd))
		return -EIO;

	return 0;
}

311 312 313 314
/*************************************************************************
 * ACPI device model
 */

315
static void drv_acpi_handle_init(char *name,
316 317
			   acpi_handle *handle, acpi_handle parent,
			   char **paths, int num_paths, char **path)
318 319 320 321
{
	int i;
	acpi_status status;

322 323 324
	vdbg_printk(TPACPI_DBG_INIT, "trying to locate ACPI handle for %s\n",
		name);

325 326 327 328
	for (i = 0; i < num_paths; i++) {
		status = acpi_get_handle(parent, paths[i], handle);
		if (ACPI_SUCCESS(status)) {
			*path = paths[i];
329 330 331
			dbg_printk(TPACPI_DBG_INIT,
				   "Found ACPI handle %s for %s\n",
				   *path, name);
332 333 334 335
			return;
		}
	}

336 337
	vdbg_printk(TPACPI_DBG_INIT, "ACPI handle for %s not found\n",
		    name);
338 339 340
	*handle = NULL;
}

341
static void dispatch_acpi_notify(acpi_handle handle, u32 event, void *data)
342 343 344
{
	struct ibm_struct *ibm = data;

345
	if (!ibm || !ibm->acpi || !ibm->acpi->notify)
346 347
		return;

348
	ibm->acpi->notify(ibm, event);
349 350
}

351
static int __init setup_acpi_notify(struct ibm_struct *ibm)
352 353
{
	acpi_status status;
354
	int rc;
355

356 357 358
	BUG_ON(!ibm->acpi);

	if (!*ibm->acpi->handle)
359 360
		return 0;

361
	vdbg_printk(TPACPI_DBG_INIT,
362 363
		"setting up ACPI notify for %s\n", ibm->name);

364 365 366 367
	rc = acpi_bus_get_device(*ibm->acpi->handle, &ibm->acpi->device);
	if (rc < 0) {
		printk(IBM_ERR "acpi_bus_get_device(%s) failed: %d\n",
			ibm->name, rc);
368 369 370
		return -ENODEV;
	}

371 372
	acpi_driver_data(ibm->acpi->device) = ibm;
	sprintf(acpi_device_class(ibm->acpi->device), "%s/%s",
373 374
		IBM_ACPI_EVENT_PREFIX,
		ibm->name);
375

376 377
	status = acpi_install_notify_handler(*ibm->acpi->handle,
			ibm->acpi->type, dispatch_acpi_notify, ibm);
378 379 380 381 382 383 384 385 386 387
	if (ACPI_FAILURE(status)) {
		if (status == AE_ALREADY_EXISTS) {
			printk(IBM_NOTICE "another device driver is already handling %s events\n",
				ibm->name);
		} else {
			printk(IBM_ERR "acpi_install_notify_handler(%s) failed: %d\n",
				ibm->name, status);
		}
		return -ENODEV;
	}
388
	ibm->flags.acpi_notify_installed = 1;
389 390 391
	return 0;
}

392
static int __init tpacpi_device_add(struct acpi_device *device)
393 394 395 396
{
	return 0;
}

397
static int __init register_tpacpi_subdriver(struct ibm_struct *ibm)
398
{
399
	int rc;
400

401 402 403
	dbg_printk(TPACPI_DBG_INIT,
		"registering %s as an ACPI driver\n", ibm->name);

404 405 406 407
	BUG_ON(!ibm->acpi);

	ibm->acpi->driver = kzalloc(sizeof(struct acpi_driver), GFP_KERNEL);
	if (!ibm->acpi->driver) {
408 409
		printk(IBM_ERR "kzalloc(ibm->driver) failed\n");
		return -ENOMEM;
410 411
	}

412 413
	sprintf(ibm->acpi->driver->name, "%s_%s", IBM_NAME, ibm->name);
	ibm->acpi->driver->ids = ibm->acpi->hid;
414

415
	ibm->acpi->driver->ops.add = &tpacpi_device_add;
416

417 418
	rc = acpi_bus_register_driver(ibm->acpi->driver);
	if (rc < 0) {
419
		printk(IBM_ERR "acpi_bus_register_driver(%s) failed: %d\n",
420
		       ibm->name, rc);
421 422
		kfree(ibm->acpi->driver);
		ibm->acpi->driver = NULL;
423
	} else if (!rc)
424
		ibm->flags.acpi_driver_registered = 1;
425

426
	return rc;
427 428 429 430 431 432 433 434 435 436 437
}


/****************************************************************************
 ****************************************************************************
 *
 * Procfs Helpers
 *
 ****************************************************************************
 ****************************************************************************/

438 439
static int dispatch_procfs_read(char *page, char **start, off_t off,
			int count, int *eof, void *data)
440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462
{
	struct ibm_struct *ibm = data;
	int len;

	if (!ibm || !ibm->read)
		return -EINVAL;

	len = ibm->read(page);
	if (len < 0)
		return len;

	if (len <= off + count)
		*eof = 1;
	*start = page + off;
	len -= off;
	if (len > count)
		len = count;
	if (len < 0)
		len = 0;

	return len;
}

463 464 465
static int dispatch_procfs_write(struct file *file,
			const char __user * userbuf,
			unsigned long count, void *data)
466 467 468 469 470 471 472 473 474 475 476
{
	struct ibm_struct *ibm = data;
	char *kernbuf;
	int ret;

	if (!ibm || !ibm->write)
		return -EINVAL;

	kernbuf = kmalloc(count + 2, GFP_KERNEL);
	if (!kernbuf)
		return -ENOMEM;
L
Linus Torvalds 已提交
477

478 479 480 481
	if (copy_from_user(kernbuf, userbuf, count)) {
		kfree(kernbuf);
		return -EFAULT;
	}
L
Linus Torvalds 已提交
482

483 484 485 486 487
	kernbuf[count] = 0;
	strcat(kernbuf, ",");
	ret = ibm->write(kernbuf);
	if (ret == 0)
		ret = count;
L
Linus Torvalds 已提交
488

489 490 491
	kfree(kernbuf);

	return ret;
L
Linus Torvalds 已提交
492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509
}

static char *next_cmd(char **cmds)
{
	char *start = *cmds;
	char *end;

	while ((end = strchr(start, ',')) && end == start)
		start = end + 1;

	if (!end)
		return NULL;

	*end = 0;
	*cmds = end + 1;
	return start;
}

510

511 512 513
/****************************************************************************
 ****************************************************************************
 *
514
 * Device model: input, hwmon and platform
515 516 517 518
 *
 ****************************************************************************
 ****************************************************************************/

519 520
static struct platform_device *tpacpi_pdev;
static struct class_device *tpacpi_hwmon;
521
static struct input_dev *tpacpi_inputdev;
522
static struct mutex tpacpi_inputdev_send_mutex;
523

524 525 526 527 528 529 530 531 532 533 534 535 536 537 538

static int tpacpi_resume_handler(struct platform_device *pdev)
{
	struct ibm_struct *ibm, *itmp;

	list_for_each_entry_safe(ibm, itmp,
				 &tpacpi_all_drivers,
				 all_drivers) {
		if (ibm->resume)
			(ibm->resume)();
	}

	return 0;
}

539 540 541 542 543
static struct platform_driver tpacpi_pdriver = {
	.driver = {
		.name = IBM_DRVR_NAME,
		.owner = THIS_MODULE,
	},
544
	.resume = tpacpi_resume_handler,
545 546 547
};


548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574
/*************************************************************************
 * thinkpad-acpi driver attributes
 */

/* interface_version --------------------------------------------------- */
static ssize_t tpacpi_driver_interface_version_show(
				struct device_driver *drv,
				char *buf)
{
	return snprintf(buf, PAGE_SIZE, "0x%08x\n", TPACPI_SYSFS_VERSION);
}

static DRIVER_ATTR(interface_version, S_IRUGO,
		tpacpi_driver_interface_version_show, NULL);

/* debug_level --------------------------------------------------------- */
static ssize_t tpacpi_driver_debug_show(struct device_driver *drv,
						char *buf)
{
	return snprintf(buf, PAGE_SIZE, "0x%04x\n", dbg_level);
}

static ssize_t tpacpi_driver_debug_store(struct device_driver *drv,
						const char *buf, size_t count)
{
	unsigned long t;

575
	if (parse_strtoul(buf, 0xffff, &t))
576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624
		return -EINVAL;

	dbg_level = t;

	return count;
}

static DRIVER_ATTR(debug_level, S_IWUSR | S_IRUGO,
		tpacpi_driver_debug_show, tpacpi_driver_debug_store);

/* version ------------------------------------------------------------- */
static ssize_t tpacpi_driver_version_show(struct device_driver *drv,
						char *buf)
{
	return snprintf(buf, PAGE_SIZE, "%s v%s\n", IBM_DESC, IBM_VERSION);
}

static DRIVER_ATTR(version, S_IRUGO,
		tpacpi_driver_version_show, NULL);

/* --------------------------------------------------------------------- */

static struct driver_attribute* tpacpi_driver_attributes[] = {
	&driver_attr_debug_level, &driver_attr_version,
	&driver_attr_interface_version,
};

static int __init tpacpi_create_driver_attributes(struct device_driver *drv)
{
	int i, res;

	i = 0;
	res = 0;
	while (!res && i < ARRAY_SIZE(tpacpi_driver_attributes)) {
		res = driver_create_file(drv, tpacpi_driver_attributes[i]);
		i++;
	}

	return res;
}

static void tpacpi_remove_driver_attributes(struct device_driver *drv)
{
	int i;

	for(i = 0; i < ARRAY_SIZE(tpacpi_driver_attributes); i++)
		driver_remove_file(drv, tpacpi_driver_attributes[i]);
}

625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704
/*************************************************************************
 * sysfs support helpers
 */

struct attribute_set_obj {
	struct attribute_set s;
	struct attribute *a;
} __attribute__((packed));

static struct attribute_set *create_attr_set(unsigned int max_members,
						const char* name)
{
	struct attribute_set_obj *sobj;

	if (max_members == 0)
		return NULL;

	/* Allocates space for implicit NULL at the end too */
	sobj = kzalloc(sizeof(struct attribute_set_obj) +
		    max_members * sizeof(struct attribute *),
		    GFP_KERNEL);
	if (!sobj)
		return NULL;
	sobj->s.max_members = max_members;
	sobj->s.group.attrs = &sobj->a;
	sobj->s.group.name = name;

	return &sobj->s;
}

/* not multi-threaded safe, use it in a single thread per set */
static int add_to_attr_set(struct attribute_set* s, struct attribute *attr)
{
	if (!s || !attr)
		return -EINVAL;

	if (s->members >= s->max_members)
		return -ENOMEM;

	s->group.attrs[s->members] = attr;
	s->members++;

	return 0;
}

static int add_many_to_attr_set(struct attribute_set* s,
			struct attribute **attr,
			unsigned int count)
{
	int i, res;

	for (i = 0; i < count; i++) {
		res = add_to_attr_set(s, attr[i]);
		if (res)
			return res;
	}

	return 0;
}

static void delete_attr_set(struct attribute_set* s, struct kobject *kobj)
{
	sysfs_remove_group(kobj, &s->group);
	destroy_attr_set(s);
}

static int parse_strtoul(const char *buf,
		unsigned long max, unsigned long *value)
{
	char *endp;

	*value = simple_strtoul(buf, &endp, 0);
	while (*endp && isspace(*endp))
		endp++;
	if (*endp || *value > max)
		return -EINVAL;

	return 0;
}

705 706 707 708 709 710 711 712 713
/****************************************************************************
 ****************************************************************************
 *
 * Subdrivers
 *
 ****************************************************************************
 ****************************************************************************/

/*************************************************************************
714
 * thinkpad-acpi init subdriver
715 716
 */

717
static int __init thinkpad_acpi_driver_init(struct ibm_init_struct *iibm)
L
Linus Torvalds 已提交
718 719 720 721
{
	printk(IBM_INFO "%s v%s\n", IBM_DESC, IBM_VERSION);
	printk(IBM_INFO "%s\n", IBM_URL);

722 723 724 725 726 727 728 729 730 731 732 733 734
	printk(IBM_INFO "ThinkPad BIOS %s, EC %s\n",
		(thinkpad_id.bios_version_str) ?
			thinkpad_id.bios_version_str : "unknown",
		(thinkpad_id.ec_version_str) ?
			thinkpad_id.ec_version_str : "unknown");

	if (thinkpad_id.vendor && thinkpad_id.model_str)
		printk(IBM_INFO "%s %s\n",
			(thinkpad_id.vendor == PCI_VENDOR_ID_IBM) ?
				"IBM" : ((thinkpad_id.vendor ==
						PCI_VENDOR_ID_LENOVO) ?
					"Lenovo" : "Unknown vendor"),
			thinkpad_id.model_str);
735

L
Linus Torvalds 已提交
736 737 738
	return 0;
}

739
static int thinkpad_acpi_driver_read(char *p)
L
Linus Torvalds 已提交
740 741 742 743 744 745 746 747 748
{
	int len = 0;

	len += sprintf(p + len, "driver:\t\t%s\n", IBM_DESC);
	len += sprintf(p + len, "version:\t%s\n", IBM_VERSION);

	return len;
}

749 750 751 752 753
static struct ibm_struct thinkpad_acpi_driver_data = {
	.name = "driver",
	.read = thinkpad_acpi_driver_read,
};

754 755 756 757
/*************************************************************************
 * Hotkey subdriver
 */

758
static int hotkey_orig_status;
759
static u32 hotkey_orig_mask;
760
static u32 hotkey_all_mask;
761 762
static u32 hotkey_reserved_mask;

763
static u16 *hotkey_keycode_map;
764

765
static struct attribute_set *hotkey_dev_attributes;
766

767 768 769 770 771 772 773
static int hotkey_get_wlsw(int *status)
{
	if (!acpi_evalf(hkey_handle, status, "WLSW", "d"))
		return -EIO;
	return 0;
}

774 775 776 777 778
/* sysfs hotkey enable ------------------------------------------------- */
static ssize_t hotkey_enable_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
779 780
	int res, status;
	u32 mask;
781 782 783 784 785 786 787 788 789 790 791 792 793

	res = hotkey_get(&status, &mask);
	if (res)
		return res;

	return snprintf(buf, PAGE_SIZE, "%d\n", status);
}

static ssize_t hotkey_enable_store(struct device *dev,
			    struct device_attribute *attr,
			    const char *buf, size_t count)
{
	unsigned long t;
794 795
	int res, status;
	u32 mask;
796 797 798 799 800 801 802 803 804 805 806 807

	if (parse_strtoul(buf, 1, &t))
		return -EINVAL;

	res = hotkey_get(&status, &mask);
	if (!res)
		res = hotkey_set(t, mask);

	return (res) ? res : count;
}

static struct device_attribute dev_attr_hotkey_enable =
808
	__ATTR(hotkey_enable, S_IWUSR | S_IRUGO,
809 810 811 812 813 814 815
		hotkey_enable_show, hotkey_enable_store);

/* sysfs hotkey mask --------------------------------------------------- */
static ssize_t hotkey_mask_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
816 817
	int res, status;
	u32 mask;
818 819 820 821 822

	res = hotkey_get(&status, &mask);
	if (res)
		return res;

823
	return snprintf(buf, PAGE_SIZE, "0x%08x\n", mask);
824 825 826 827 828 829 830
}

static ssize_t hotkey_mask_store(struct device *dev,
			    struct device_attribute *attr,
			    const char *buf, size_t count)
{
	unsigned long t;
831 832
	int res, status;
	u32 mask;
833

834
	if (parse_strtoul(buf, 0xffffffffUL, &t))
835 836 837 838 839 840 841 842 843 844
		return -EINVAL;

	res = hotkey_get(&status, &mask);
	if (!res)
		hotkey_set(status, t);

	return (res) ? res : count;
}

static struct device_attribute dev_attr_hotkey_mask =
845
	__ATTR(hotkey_mask, S_IWUSR | S_IRUGO,
846 847 848 849 850 851 852 853 854 855 856
		hotkey_mask_show, hotkey_mask_store);

/* sysfs hotkey bios_enabled ------------------------------------------- */
static ssize_t hotkey_bios_enabled_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	return snprintf(buf, PAGE_SIZE, "%d\n", hotkey_orig_status);
}

static struct device_attribute dev_attr_hotkey_bios_enabled =
857
	__ATTR(hotkey_bios_enabled, S_IRUGO, hotkey_bios_enabled_show, NULL);
858 859 860 861 862 863

/* sysfs hotkey bios_mask ---------------------------------------------- */
static ssize_t hotkey_bios_mask_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
864
	return snprintf(buf, PAGE_SIZE, "0x%08x\n", hotkey_orig_mask);
865 866 867
}

static struct device_attribute dev_attr_hotkey_bios_mask =
868
	__ATTR(hotkey_bios_mask, S_IRUGO, hotkey_bios_mask_show, NULL);
869

870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893
/* sysfs hotkey all_mask ----------------------------------------------- */
static ssize_t hotkey_all_mask_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	return snprintf(buf, PAGE_SIZE, "0x%08x\n", hotkey_all_mask);
}

static struct device_attribute dev_attr_hotkey_all_mask =
	__ATTR(hotkey_all_mask, S_IRUGO, hotkey_all_mask_show, NULL);

/* sysfs hotkey recommended_mask --------------------------------------- */
static ssize_t hotkey_recommended_mask_show(struct device *dev,
					    struct device_attribute *attr,
					    char *buf)
{
	return snprintf(buf, PAGE_SIZE, "0x%08x\n",
			hotkey_all_mask & ~hotkey_reserved_mask);
}

static struct device_attribute dev_attr_hotkey_recommended_mask =
	__ATTR(hotkey_recommended_mask, S_IRUGO,
		hotkey_recommended_mask_show, NULL);

894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909
/* sysfs hotkey radio_sw ----------------------------------------------- */
static ssize_t hotkey_radio_sw_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	int res, s;
	res = hotkey_get_wlsw(&s);
	if (res < 0)
		return res;

	return snprintf(buf, PAGE_SIZE, "%d\n", !!s);
}

static struct device_attribute dev_attr_hotkey_radio_sw =
	__ATTR(hotkey_radio_sw, S_IRUGO, hotkey_radio_sw_show, NULL);

910 911 912 913 914 915 916 917 918 919 920 921
/* sysfs hotkey report_mode -------------------------------------------- */
static ssize_t hotkey_report_mode_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	return snprintf(buf, PAGE_SIZE, "%d\n",
		(hotkey_report_mode != 0) ? hotkey_report_mode : 1);
}

static struct device_attribute dev_attr_hotkey_report_mode =
	__ATTR(hotkey_report_mode, S_IRUGO, hotkey_report_mode_show, NULL);

922 923
/* --------------------------------------------------------------------- */

924 925 926 927 928 929
static struct attribute *hotkey_attributes[] __initdata = {
	&dev_attr_hotkey_enable.attr,
	&dev_attr_hotkey_report_mode.attr,
};

static struct attribute *hotkey_mask_attributes[] __initdata = {
930 931 932
	&dev_attr_hotkey_mask.attr,
	&dev_attr_hotkey_bios_enabled.attr,
	&dev_attr_hotkey_bios_mask.attr,
933 934
	&dev_attr_hotkey_all_mask.attr,
	&dev_attr_hotkey_recommended_mask.attr,
935 936
};

937
static int __init hotkey_init(struct ibm_init_struct *iibm)
938
{
939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990

	static u16 ibm_keycode_map[] __initdata = {
		/* Scan Codes 0x00 to 0x0B: ACPI HKEY FN+F1..F12 */
		KEY_FN_F1,	KEY_FN_F2,	KEY_COFFEE,	KEY_SLEEP,
		KEY_WLAN,	KEY_FN_F6, KEY_SWITCHVIDEOMODE, KEY_FN_F8,
		KEY_FN_F9,	KEY_FN_F10,	KEY_FN_F11,	KEY_SUSPEND,
		/* Scan codes 0x0C to 0x0F: Other ACPI HKEY hot keys */
		KEY_UNKNOWN,	/* 0x0C: FN+BACKSPACE */
		KEY_UNKNOWN,	/* 0x0D: FN+INSERT */
		KEY_UNKNOWN,	/* 0x0E: FN+DELETE */
		KEY_RESERVED,	/* 0x0F: FN+HOME (brightness up) */
		/* Scan codes 0x10 to 0x1F: Extended ACPI HKEY hot keys */
		KEY_RESERVED,	/* 0x10: FN+END (brightness down) */
		KEY_RESERVED,	/* 0x11: FN+PGUP (thinklight toggle) */
		KEY_UNKNOWN,	/* 0x12: FN+PGDOWN */
		KEY_ZOOM,	/* 0x13: FN+SPACE (zoom) */
		KEY_RESERVED,	/* 0x14: VOLUME UP */
		KEY_RESERVED,	/* 0x15: VOLUME DOWN */
		KEY_RESERVED,	/* 0x16: MUTE */
		KEY_VENDOR,	/* 0x17: Thinkpad/AccessIBM/Lenovo */
		/* (assignments unknown, please report if found) */
		KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN,
		KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN,
	};
	static u16 lenovo_keycode_map[] __initdata = {
		/* Scan Codes 0x00 to 0x0B: ACPI HKEY FN+F1..F12 */
		KEY_FN_F1,	KEY_COFFEE,	KEY_BATTERY,	KEY_SLEEP,
		KEY_WLAN,	KEY_FN_F6, KEY_SWITCHVIDEOMODE, KEY_FN_F8,
		KEY_FN_F9,	KEY_FN_F10,	KEY_FN_F11,	KEY_SUSPEND,
		/* Scan codes 0x0C to 0x0F: Other ACPI HKEY hot keys */
		KEY_UNKNOWN,	/* 0x0C: FN+BACKSPACE */
		KEY_UNKNOWN,	/* 0x0D: FN+INSERT */
		KEY_UNKNOWN,	/* 0x0E: FN+DELETE */
		KEY_BRIGHTNESSUP,	/* 0x0F: FN+HOME (brightness up) */
		/* Scan codes 0x10 to 0x1F: Extended ACPI HKEY hot keys */
		KEY_BRIGHTNESSDOWN,	/* 0x10: FN+END (brightness down) */
		KEY_RESERVED,	/* 0x11: FN+PGUP (thinklight toggle) */
		KEY_UNKNOWN,	/* 0x12: FN+PGDOWN */
		KEY_ZOOM,	/* 0x13: FN+SPACE (zoom) */
		KEY_RESERVED,	/* 0x14: VOLUME UP */
		KEY_RESERVED,	/* 0x15: VOLUME DOWN */
		KEY_RESERVED,	/* 0x16: MUTE */
		KEY_VENDOR,	/* 0x17: Thinkpad/AccessIBM/Lenovo */
		/* (assignments unknown, please report if found) */
		KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN,
		KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN, KEY_UNKNOWN,
	};

#define TPACPI_HOTKEY_MAP_LEN		ARRAY_SIZE(ibm_keycode_map)
#define TPACPI_HOTKEY_MAP_SIZE		sizeof(ibm_keycode_map)
#define TPACPI_HOTKEY_MAP_TYPESIZE	sizeof(ibm_keycode_map[0])

991
	int res, i;
992
	int status;
993

994 995
	vdbg_printk(TPACPI_DBG_INIT, "initializing hotkey subdriver\n");

996 997
	BUG_ON(!tpacpi_inputdev);

998
	IBM_ACPIHANDLE_INIT(hkey);
999
	mutex_init(&hotkey_mutex);
1000

1001
	/* hotkey not supported on 570 */
1002
	tp_features.hotkey = hkey_handle != NULL;
1003

1004
	vdbg_printk(TPACPI_DBG_INIT, "hotkeys are %s\n",
1005
		str_supported(tp_features.hotkey));
1006

1007
	if (tp_features.hotkey) {
1008
		hotkey_dev_attributes = create_attr_set(8, NULL);
1009 1010
		if (!hotkey_dev_attributes)
			return -ENOMEM;
1011 1012 1013
		res = add_many_to_attr_set(hotkey_dev_attributes,
				hotkey_attributes,
				ARRAY_SIZE(hotkey_attributes));
1014 1015 1016
		if (res)
			return res;

1017 1018
		/* mask not supported on 570, 600e/x, 770e, 770x, A21e, A2xm/p,
		   A30, R30, R31, T20-22, X20-21, X22-24 */
1019 1020
		tp_features.hotkey_mask =
			acpi_evalf(hkey_handle, NULL, "DHKN", "qv");
1021

1022
		vdbg_printk(TPACPI_DBG_INIT, "hotkey masks are %s\n",
1023
			str_supported(tp_features.hotkey_mask));
1024

1025 1026 1027 1028 1029 1030 1031
		if (tp_features.hotkey_mask) {
			/* MHKA available in A31, R40, R40e, T4x, X31, and later */
			if (!acpi_evalf(hkey_handle, &hotkey_all_mask,
					"MHKA", "qd"))
				hotkey_all_mask = 0x080cU; /* FN+F12, FN+F4, FN+F3 */
		}

1032
		res = hotkey_get(&hotkey_orig_status, &hotkey_orig_mask);
1033 1034 1035 1036 1037
		if (!res && tp_features.hotkey_mask) {
			res = add_many_to_attr_set(hotkey_dev_attributes,
				hotkey_mask_attributes,
				ARRAY_SIZE(hotkey_mask_attributes));
		}
1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048

		/* Not all thinkpads have a hardware radio switch */
		if (!res && acpi_evalf(hkey_handle, &status, "WLSW", "qd")) {
			tp_features.hotkey_wlsw = 1;
			printk(IBM_INFO
				"radio switch found; radios are %s\n",
				enabled(status, 0));
			res = add_to_attr_set(hotkey_dev_attributes,
					&dev_attr_hotkey_radio_sw.attr);
		}

1049 1050 1051 1052
		if (!res)
			res = register_attr_set_with_sysfs(
					hotkey_dev_attributes,
					&tpacpi_pdev->dev.kobj);
1053 1054
		if (res)
			return res;
1055

1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076
		/* Set up key map */

		hotkey_keycode_map = kmalloc(TPACPI_HOTKEY_MAP_SIZE,
						GFP_KERNEL);
		if (!hotkey_keycode_map) {
			printk(IBM_ERR "failed to allocate memory for key map\n");
			return -ENOMEM;
		}

		if (thinkpad_id.vendor == PCI_VENDOR_ID_LENOVO) {
			dbg_printk(TPACPI_DBG_INIT,
				   "using Lenovo default hot key map\n");
			memcpy(hotkey_keycode_map, &lenovo_keycode_map,
				TPACPI_HOTKEY_MAP_SIZE);
		} else {
			dbg_printk(TPACPI_DBG_INIT,
				   "using IBM default hot key map\n");
			memcpy(hotkey_keycode_map, &ibm_keycode_map,
				TPACPI_HOTKEY_MAP_SIZE);
		}

1077 1078 1079
		set_bit(EV_KEY, tpacpi_inputdev->evbit);
		set_bit(EV_MSC, tpacpi_inputdev->evbit);
		set_bit(MSC_SCAN, tpacpi_inputdev->mscbit);
1080 1081 1082 1083
		tpacpi_inputdev->keycodesize = TPACPI_HOTKEY_MAP_TYPESIZE;
		tpacpi_inputdev->keycodemax = TPACPI_HOTKEY_MAP_LEN;
		tpacpi_inputdev->keycode = hotkey_keycode_map;
		for (i = 0; i < TPACPI_HOTKEY_MAP_LEN; i++) {
1084 1085 1086 1087 1088 1089 1090 1091 1092
			if (hotkey_keycode_map[i] != KEY_RESERVED) {
				set_bit(hotkey_keycode_map[i],
					tpacpi_inputdev->keybit);
			} else {
				if (i < sizeof(hotkey_reserved_mask)*8)
					hotkey_reserved_mask |= 1 << i;
			}
		}

1093 1094 1095 1096 1097
		if (tp_features.hotkey_wlsw) {
			set_bit(EV_SW, tpacpi_inputdev->evbit);
			set_bit(SW_RADIO, tpacpi_inputdev->swbit);
		}

1098 1099 1100 1101 1102 1103
		dbg_printk(TPACPI_DBG_INIT,
				"enabling hot key handling\n");
		res = hotkey_set(1, (hotkey_all_mask & ~hotkey_reserved_mask)
					| hotkey_orig_mask);
		if (res)
			return res;
1104 1105 1106 1107 1108

		dbg_printk(TPACPI_DBG_INIT,
				"legacy hot key reporting over procfs %s\n",
				(hotkey_report_mode < 2) ?
					"enabled" : "disabled");
1109 1110
	}

1111
	return (tp_features.hotkey)? 0 : 1;
1112 1113 1114 1115
}

static void hotkey_exit(void)
{
1116 1117
	int res;

1118
	if (tp_features.hotkey) {
1119
		dbg_printk(TPACPI_DBG_EXIT, "restoring original hotkey mask\n");
1120 1121 1122
		res = hotkey_set(hotkey_orig_status, hotkey_orig_mask);
		if (res)
			printk(IBM_ERR "failed to restore hotkey to BIOS defaults\n");
1123
	}
1124 1125 1126 1127 1128

	if (hotkey_dev_attributes) {
		delete_attr_set(hotkey_dev_attributes, &tpacpi_pdev->dev.kobj);
		hotkey_dev_attributes = NULL;
	}
1129 1130
}

1131 1132 1133 1134
static void tpacpi_input_send_key(unsigned int scancode,
				  unsigned int keycode)
{
	if (keycode != KEY_RESERVED) {
1135 1136
		mutex_lock(&tpacpi_inputdev_send_mutex);

1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147
		input_report_key(tpacpi_inputdev, keycode, 1);
		if (keycode == KEY_UNKNOWN)
			input_event(tpacpi_inputdev, EV_MSC, MSC_SCAN,
				    scancode);
		input_sync(tpacpi_inputdev);

		input_report_key(tpacpi_inputdev, keycode, 0);
		if (keycode == KEY_UNKNOWN)
			input_event(tpacpi_inputdev, EV_MSC, MSC_SCAN,
				    scancode);
		input_sync(tpacpi_inputdev);
1148 1149

		mutex_unlock(&tpacpi_inputdev_send_mutex);
1150 1151 1152
	}
}

1153 1154 1155 1156
static void tpacpi_input_send_radiosw(void)
{
	int wlsw;

1157 1158
	mutex_lock(&tpacpi_inputdev_send_mutex);

1159
	if (tp_features.hotkey_wlsw && !hotkey_get_wlsw(&wlsw)) {
1160 1161
		input_report_switch(tpacpi_inputdev,
				    SW_RADIO, !!wlsw);
1162 1163
		input_sync(tpacpi_inputdev);
	}
1164 1165

	mutex_unlock(&tpacpi_inputdev_send_mutex);
1166 1167
}

1168 1169
static void hotkey_notify(struct ibm_struct *ibm, u32 event)
{
1170 1171
	u32 hkey;
	unsigned int keycode, scancode;
1172
	int send_acpi_ev = 0;
1173

1174
	if (event == 0x80 && acpi_evalf(hkey_handle, &hkey, "MHKP", "d")) {
1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204
		switch (hkey >> 12) {
		case 1:
			/* 0x1000-0x1FFF: key presses */
			scancode = hkey & 0xfff;
			if (scancode > 0 && scancode < 0x21) {
				scancode--;
				keycode = hotkey_keycode_map[scancode];
				tpacpi_input_send_key(scancode, keycode);
			} else {
				printk(IBM_ERR
				       "hotkey 0x%04x out of range for keyboard map\n",
				       hkey);
				send_acpi_ev = 1;
			}
			break;
		case 5:
			/* 0x5000-0x5FFF: LID */
			/* we don't handle it through this path, just
			 * eat up known LID events */
			if (hkey != 0x5001 && hkey != 0x5002) {
				printk(IBM_ERR
					"unknown LID-related hotkey event: 0x%04x\n",
					hkey);
				send_acpi_ev = 1;
			}
			break;
		case 7:
			/* 0x7000-0x7FFF: misc */
			if (tp_features.hotkey_wlsw && hkey == 0x7000) {
				tpacpi_input_send_radiosw();
1205 1206
				break;
			}
1207 1208 1209 1210 1211 1212 1213 1214
			/* fallthrough to default */
		default:
			/* case 2: dock-related */
			/*	0x2305 - T43 waking up due to bay lever eject while aslept */
			/* case 3: ultra-bay related. maybe bay in dock? */
			/*	0x3003 - T43 after wake up by bay lever eject (0x2305) */
			printk(IBM_NOTICE "unhandled HKEY event 0x%04x\n", hkey);
			send_acpi_ev = 1;
1215
		}
1216 1217
	} else {
		printk(IBM_ERR "unknown hotkey notification event %d\n", event);
1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230
		hkey = 0;
		send_acpi_ev = 1;
	}

	/* Legacy events */
	if (send_acpi_ev || hotkey_report_mode < 2)
		acpi_bus_generate_proc_event(ibm->acpi->device, event, hkey);

	/* netlink events */
	if (send_acpi_ev) {
		acpi_bus_generate_netlink_event(ibm->acpi->device->pnp.device_class,
						ibm->acpi->device->dev.bus_id,
						event, hkey);
1231 1232 1233
	}
}

1234 1235 1236 1237 1238
static void hotkey_resume(void)
{
	tpacpi_input_send_radiosw();
}

1239 1240 1241
/*
 * Call with hotkey_mutex held
 */
1242
static int hotkey_get(int *status, u32 *mask)
L
Linus Torvalds 已提交
1243 1244
{
	if (!acpi_evalf(hkey_handle, status, "DHKC", "d"))
1245
		return -EIO;
1246

1247
	if (tp_features.hotkey_mask)
1248
		if (!acpi_evalf(hkey_handle, mask, "DHKN", "d"))
1249
			return -EIO;
1250

1251
	return 0;
L
Linus Torvalds 已提交
1252 1253
}

1254 1255 1256
/*
 * Call with hotkey_mutex held
 */
1257
static int hotkey_set(int status, u32 mask)
L
Linus Torvalds 已提交
1258 1259 1260 1261
{
	int i;

	if (!acpi_evalf(hkey_handle, NULL, "MHKC", "vd", status))
1262
		return -EIO;
L
Linus Torvalds 已提交
1263

1264
	if (tp_features.hotkey_mask)
1265 1266 1267 1268
		for (i = 0; i < 32; i++) {
			int bit = ((1 << i) & mask) != 0;
			if (!acpi_evalf(hkey_handle,
					NULL, "MHKM", "vdd", i + 1, bit))
1269
				return -EIO;
1270
		}
L
Linus Torvalds 已提交
1271

1272
	return 0;
L
Linus Torvalds 已提交
1273 1274
}

1275
/* procfs -------------------------------------------------------------- */
1276
static int hotkey_read(char *p)
L
Linus Torvalds 已提交
1277
{
1278 1279
	int res, status;
	u32 mask;
L
Linus Torvalds 已提交
1280 1281
	int len = 0;

1282
	if (!tp_features.hotkey) {
1283 1284 1285 1286
		len += sprintf(p + len, "status:\t\tnot supported\n");
		return len;
	}

1287 1288 1289
	res = mutex_lock_interruptible(&hotkey_mutex);
	if (res < 0)
		return res;
1290
	res = hotkey_get(&status, &mask);
1291
	mutex_unlock(&hotkey_mutex);
1292 1293
	if (res)
		return res;
L
Linus Torvalds 已提交
1294 1295

	len += sprintf(p + len, "status:\t\t%s\n", enabled(status, 0));
1296
	if (tp_features.hotkey_mask) {
1297
		len += sprintf(p + len, "mask:\t\t0x%08x\n", mask);
L
Linus Torvalds 已提交
1298 1299 1300 1301 1302 1303 1304 1305 1306 1307
		len += sprintf(p + len,
			       "commands:\tenable, disable, reset, <mask>\n");
	} else {
		len += sprintf(p + len, "mask:\t\tnot supported\n");
		len += sprintf(p + len, "commands:\tenable, disable, reset\n");
	}

	return len;
}

1308
static int hotkey_write(char *buf)
L
Linus Torvalds 已提交
1309
{
1310 1311
	int res, status;
	u32 mask;
L
Linus Torvalds 已提交
1312 1313 1314
	char *cmd;
	int do_cmd = 0;

1315
	if (!tp_features.hotkey)
L
Linus Torvalds 已提交
1316 1317
		return -ENODEV;

1318 1319 1320 1321
	res = mutex_lock_interruptible(&hotkey_mutex);
	if (res < 0)
		return res;

1322 1323
	res = hotkey_get(&status, &mask);
	if (res)
1324
		goto errexit;
1325

1326
	res = 0;
L
Linus Torvalds 已提交
1327 1328 1329 1330 1331 1332
	while ((cmd = next_cmd(&buf))) {
		if (strlencmp(cmd, "enable") == 0) {
			status = 1;
		} else if (strlencmp(cmd, "disable") == 0) {
			status = 0;
		} else if (strlencmp(cmd, "reset") == 0) {
1333 1334
			status = hotkey_orig_status;
			mask = hotkey_orig_mask;
L
Linus Torvalds 已提交
1335 1336 1337 1338
		} else if (sscanf(cmd, "0x%x", &mask) == 1) {
			/* mask set */
		} else if (sscanf(cmd, "%x", &mask) == 1) {
			/* mask set */
1339 1340 1341 1342
		} else {
			res = -EINVAL;
			goto errexit;
		}
L
Linus Torvalds 已提交
1343 1344 1345
		do_cmd = 1;
	}

1346
	if (do_cmd)
1347
		res = hotkey_set(status, mask);
L
Linus Torvalds 已提交
1348

1349 1350 1351
errexit:
	mutex_unlock(&hotkey_mutex);
	return res;
1352
}
L
Linus Torvalds 已提交
1353

1354 1355 1356 1357 1358
static const struct acpi_device_id ibm_htk_device_ids[] = {
	{IBM_HKEY_HID, 0},
	{"", 0},
};

1359
static struct tp_acpi_drv_struct ibm_hotkey_acpidriver = {
1360
	.hid = ibm_htk_device_ids,
1361 1362 1363 1364 1365
	.notify = hotkey_notify,
	.handle = &hkey_handle,
	.type = ACPI_DEVICE_NOTIFY,
};

1366 1367 1368 1369 1370
static struct ibm_struct hotkey_driver_data = {
	.name = "hotkey",
	.read = hotkey_read,
	.write = hotkey_write,
	.exit = hotkey_exit,
1371
	.resume = hotkey_resume,
1372
	.acpi = &ibm_hotkey_acpidriver,
1373 1374
};

1375 1376 1377
/*************************************************************************
 * Bluetooth subdriver
 */
L
Linus Torvalds 已提交
1378

1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408
/* sysfs bluetooth enable ---------------------------------------------- */
static ssize_t bluetooth_enable_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	int status;

	status = bluetooth_get_radiosw();
	if (status < 0)
		return status;

	return snprintf(buf, PAGE_SIZE, "%d\n", status ? 1 : 0);
}

static ssize_t bluetooth_enable_store(struct device *dev,
			    struct device_attribute *attr,
			    const char *buf, size_t count)
{
	unsigned long t;
	int res;

	if (parse_strtoul(buf, 1, &t))
		return -EINVAL;

	res = bluetooth_set_radiosw(t);

	return (res) ? res : count;
}

static struct device_attribute dev_attr_bluetooth_enable =
1409
	__ATTR(bluetooth_enable, S_IWUSR | S_IRUGO,
1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422
		bluetooth_enable_show, bluetooth_enable_store);

/* --------------------------------------------------------------------- */

static struct attribute *bluetooth_attributes[] = {
	&dev_attr_bluetooth_enable.attr,
	NULL
};

static const struct attribute_group bluetooth_attr_group = {
	.attrs = bluetooth_attributes,
};

1423
static int __init bluetooth_init(struct ibm_init_struct *iibm)
L
Linus Torvalds 已提交
1424
{
1425
	int res;
1426 1427
	int status = 0;

1428 1429
	vdbg_printk(TPACPI_DBG_INIT, "initializing bluetooth subdriver\n");

1430
	IBM_ACPIHANDLE_INIT(hkey);
1431

1432 1433
	/* bluetooth not supported on 570, 600e/x, 770e, 770x, A21e, A2xm/p,
	   G4x, R30, R31, R40e, R50e, T20-22, X20-21 */
1434
	tp_features.bluetooth = hkey_handle &&
1435 1436 1437 1438 1439 1440
	    acpi_evalf(hkey_handle, &status, "GBDC", "qd");

	vdbg_printk(TPACPI_DBG_INIT, "bluetooth is %s, status 0x%02x\n",
		str_supported(tp_features.bluetooth),
		status);

1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452
	if (tp_features.bluetooth) {
		if (!(status & TP_ACPI_BLUETOOTH_HWPRESENT)) {
			/* no bluetooth hardware present in system */
			tp_features.bluetooth = 0;
			dbg_printk(TPACPI_DBG_INIT,
				   "bluetooth hardware not installed\n");
		} else {
			res = sysfs_create_group(&tpacpi_pdev->dev.kobj,
					&bluetooth_attr_group);
			if (res)
				return res;
		}
1453
	}
1454

1455
	return (tp_features.bluetooth)? 0 : 1;
L
Linus Torvalds 已提交
1456 1457
}

1458 1459 1460 1461 1462 1463
static void bluetooth_exit(void)
{
	sysfs_remove_group(&tpacpi_pdev->dev.kobj,
			&bluetooth_attr_group);
}

1464
static int bluetooth_get_radiosw(void)
L
Linus Torvalds 已提交
1465 1466 1467
{
	int status;

1468 1469
	if (!tp_features.bluetooth)
		return -ENODEV;
L
Linus Torvalds 已提交
1470

1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493
	if (!acpi_evalf(hkey_handle, &status, "GBDC", "d"))
		return -EIO;

	return ((status & TP_ACPI_BLUETOOTH_RADIOSSW) != 0);
}

static int bluetooth_set_radiosw(int radio_on)
{
	int status;

	if (!tp_features.bluetooth)
		return -ENODEV;

	if (!acpi_evalf(hkey_handle, &status, "GBDC", "d"))
		return -EIO;
	if (radio_on)
		status |= TP_ACPI_BLUETOOTH_RADIOSSW;
	else
		status &= ~TP_ACPI_BLUETOOTH_RADIOSSW;
	if (!acpi_evalf(hkey_handle, NULL, "SBDC", "vd", status))
		return -EIO;

	return 0;
L
Linus Torvalds 已提交
1494 1495
}

1496
/* procfs -------------------------------------------------------------- */
1497
static int bluetooth_read(char *p)
L
Linus Torvalds 已提交
1498 1499
{
	int len = 0;
1500
	int status = bluetooth_get_radiosw();
L
Linus Torvalds 已提交
1501

1502
	if (!tp_features.bluetooth)
L
Linus Torvalds 已提交
1503 1504
		len += sprintf(p + len, "status:\t\tnot supported\n");
	else {
1505 1506
		len += sprintf(p + len, "status:\t\t%s\n",
				(status)? "enabled" : "disabled");
L
Linus Torvalds 已提交
1507 1508 1509 1510 1511 1512
		len += sprintf(p + len, "commands:\tenable, disable\n");
	}

	return len;
}

1513
static int bluetooth_write(char *buf)
L
Linus Torvalds 已提交
1514 1515 1516
{
	char *cmd;

1517
	if (!tp_features.bluetooth)
1518
		return -ENODEV;
L
Linus Torvalds 已提交
1519 1520 1521

	while ((cmd = next_cmd(&buf))) {
		if (strlencmp(cmd, "enable") == 0) {
1522
			bluetooth_set_radiosw(1);
L
Linus Torvalds 已提交
1523
		} else if (strlencmp(cmd, "disable") == 0) {
1524
			bluetooth_set_radiosw(0);
L
Linus Torvalds 已提交
1525 1526 1527 1528 1529 1530 1531
		} else
			return -EINVAL;
	}

	return 0;
}

1532 1533 1534 1535
static struct ibm_struct bluetooth_driver_data = {
	.name = "bluetooth",
	.read = bluetooth_read,
	.write = bluetooth_write,
1536
	.exit = bluetooth_exit,
1537 1538
};

1539 1540 1541 1542
/*************************************************************************
 * Wan subdriver
 */

1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572
/* sysfs wan enable ---------------------------------------------------- */
static ssize_t wan_enable_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	int status;

	status = wan_get_radiosw();
	if (status < 0)
		return status;

	return snprintf(buf, PAGE_SIZE, "%d\n", status ? 1 : 0);
}

static ssize_t wan_enable_store(struct device *dev,
			    struct device_attribute *attr,
			    const char *buf, size_t count)
{
	unsigned long t;
	int res;

	if (parse_strtoul(buf, 1, &t))
		return -EINVAL;

	res = wan_set_radiosw(t);

	return (res) ? res : count;
}

static struct device_attribute dev_attr_wan_enable =
1573
	__ATTR(wwan_enable, S_IWUSR | S_IRUGO,
1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586
		wan_enable_show, wan_enable_store);

/* --------------------------------------------------------------------- */

static struct attribute *wan_attributes[] = {
	&dev_attr_wan_enable.attr,
	NULL
};

static const struct attribute_group wan_attr_group = {
	.attrs = wan_attributes,
};

1587
static int __init wan_init(struct ibm_init_struct *iibm)
1588
{
1589
	int res;
1590 1591
	int status = 0;

1592 1593
	vdbg_printk(TPACPI_DBG_INIT, "initializing wan subdriver\n");

1594
	IBM_ACPIHANDLE_INIT(hkey);
1595

1596
	tp_features.wan = hkey_handle &&
1597 1598 1599 1600 1601 1602
	    acpi_evalf(hkey_handle, &status, "GWAN", "qd");

	vdbg_printk(TPACPI_DBG_INIT, "wan is %s, status 0x%02x\n",
		str_supported(tp_features.wan),
		status);

1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614
	if (tp_features.wan) {
		if (!(status & TP_ACPI_WANCARD_HWPRESENT)) {
			/* no wan hardware present in system */
			tp_features.wan = 0;
			dbg_printk(TPACPI_DBG_INIT,
				   "wan hardware not installed\n");
		} else {
			res = sysfs_create_group(&tpacpi_pdev->dev.kobj,
					&wan_attr_group);
			if (res)
				return res;
		}
1615
	}
1616

1617
	return (tp_features.wan)? 0 : 1;
1618 1619
}

1620 1621 1622 1623 1624 1625
static void wan_exit(void)
{
	sysfs_remove_group(&tpacpi_pdev->dev.kobj,
		&wan_attr_group);
}

1626
static int wan_get_radiosw(void)
1627 1628 1629
{
	int status;

1630 1631
	if (!tp_features.wan)
		return -ENODEV;
1632

1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655
	if (!acpi_evalf(hkey_handle, &status, "GWAN", "d"))
		return -EIO;

	return ((status & TP_ACPI_WANCARD_RADIOSSW) != 0);
}

static int wan_set_radiosw(int radio_on)
{
	int status;

	if (!tp_features.wan)
		return -ENODEV;

	if (!acpi_evalf(hkey_handle, &status, "GWAN", "d"))
		return -EIO;
	if (radio_on)
		status |= TP_ACPI_WANCARD_RADIOSSW;
	else
		status &= ~TP_ACPI_WANCARD_RADIOSSW;
	if (!acpi_evalf(hkey_handle, NULL, "SWAN", "vd", status))
		return -EIO;

	return 0;
1656 1657
}

1658
/* procfs -------------------------------------------------------------- */
1659 1660 1661
static int wan_read(char *p)
{
	int len = 0;
1662
	int status = wan_get_radiosw();
1663

1664
	if (!tp_features.wan)
1665 1666
		len += sprintf(p + len, "status:\t\tnot supported\n");
	else {
1667 1668
		len += sprintf(p + len, "status:\t\t%s\n",
				(status)? "enabled" : "disabled");
1669 1670 1671 1672 1673 1674 1675 1676 1677 1678
		len += sprintf(p + len, "commands:\tenable, disable\n");
	}

	return len;
}

static int wan_write(char *buf)
{
	char *cmd;

1679
	if (!tp_features.wan)
1680 1681 1682 1683
		return -ENODEV;

	while ((cmd = next_cmd(&buf))) {
		if (strlencmp(cmd, "enable") == 0) {
1684
			wan_set_radiosw(1);
1685
		} else if (strlencmp(cmd, "disable") == 0) {
1686
			wan_set_radiosw(0);
1687 1688 1689 1690 1691 1692 1693
		} else
			return -EINVAL;
	}

	return 0;
}

1694 1695 1696 1697
static struct ibm_struct wan_driver_data = {
	.name = "wan",
	.read = wan_read,
	.write = wan_write,
1698
	.exit = wan_exit,
1699
	.flags.experimental = 1,
1700 1701
};

1702 1703 1704 1705
/*************************************************************************
 * Video subdriver
 */

1706 1707
static enum video_access_mode video_supported;
static int video_orig_autosw;
1708

1709 1710 1711 1712 1713 1714 1715 1716 1717
IBM_HANDLE(vid, root, "\\_SB.PCI.AGP.VGA",	/* 570 */
	   "\\_SB.PCI0.AGP0.VID0",	/* 600e/x, 770x */
	   "\\_SB.PCI0.VID0",	/* 770e */
	   "\\_SB.PCI0.VID",	/* A21e, G4x, R50e, X30, X40 */
	   "\\_SB.PCI0.AGP.VID",	/* all others */
	   );				/* R30, R31 */

IBM_HANDLE(vid2, root, "\\_SB.PCI0.AGPB.VID");	/* G41 */

1718
static int __init video_init(struct ibm_init_struct *iibm)
L
Linus Torvalds 已提交
1719
{
1720 1721
	int ivga;

1722 1723
	vdbg_printk(TPACPI_DBG_INIT, "initializing video subdriver\n");

1724 1725
	IBM_ACPIHANDLE_INIT(vid);
	IBM_ACPIHANDLE_INIT(vid2);
1726

1727 1728 1729 1730 1731 1732
	if (vid2_handle && acpi_evalf(NULL, &ivga, "\\IVGA", "d") && ivga)
		/* G41, assume IVGA doesn't change */
		vid_handle = vid2_handle;

	if (!vid_handle)
		/* video switching not supported on R30, R31 */
1733
		video_supported = TPACPI_VIDEO_NONE;
1734 1735
	else if (acpi_evalf(vid_handle, &video_orig_autosw, "SWIT", "qd"))
		/* 570 */
1736
		video_supported = TPACPI_VIDEO_570;
1737 1738
	else if (acpi_evalf(vid_handle, &video_orig_autosw, "^VADL", "qd"))
		/* 600e/x, 770e, 770x */
1739
		video_supported = TPACPI_VIDEO_770;
1740 1741
	else
		/* all others */
1742
		video_supported = TPACPI_VIDEO_NEW;
L
Linus Torvalds 已提交
1743

1744 1745 1746 1747
	vdbg_printk(TPACPI_DBG_INIT, "video is %s, mode %d\n",
		str_supported(video_supported != TPACPI_VIDEO_NONE),
		video_supported);

1748
	return (video_supported != TPACPI_VIDEO_NONE)? 0 : 1;
L
Linus Torvalds 已提交
1749 1750
}

1751 1752
static void video_exit(void)
{
1753 1754 1755 1756 1757
	dbg_printk(TPACPI_DBG_EXIT,
		   "restoring original video autoswitch mode\n");
	if (video_autosw_set(video_orig_autosw))
		printk(IBM_ERR "error while trying to restore original "
			"video autoswitch mode\n");
1758 1759
}

1760
static int video_outputsw_get(void)
L
Linus Torvalds 已提交
1761 1762 1763 1764
{
	int status = 0;
	int i;

1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800
	switch (video_supported) {
	case TPACPI_VIDEO_570:
		if (!acpi_evalf(NULL, &i, "\\_SB.PHS", "dd",
				 TP_ACPI_VIDEO_570_PHSCMD))
			return -EIO;
		status = i & TP_ACPI_VIDEO_570_PHSMASK;
		break;
	case TPACPI_VIDEO_770:
		if (!acpi_evalf(NULL, &i, "\\VCDL", "d"))
			return -EIO;
		if (i)
			status |= TP_ACPI_VIDEO_S_LCD;
		if (!acpi_evalf(NULL, &i, "\\VCDC", "d"))
			return -EIO;
		if (i)
			status |= TP_ACPI_VIDEO_S_CRT;
		break;
	case TPACPI_VIDEO_NEW:
		if (!acpi_evalf(NULL, NULL, "\\VUPS", "vd", 1) ||
		    !acpi_evalf(NULL, &i, "\\VCDC", "d"))
			return -EIO;
		if (i)
			status |= TP_ACPI_VIDEO_S_CRT;

		if (!acpi_evalf(NULL, NULL, "\\VUPS", "vd", 0) ||
		    !acpi_evalf(NULL, &i, "\\VCDL", "d"))
			return -EIO;
		if (i)
			status |= TP_ACPI_VIDEO_S_LCD;
		if (!acpi_evalf(NULL, &i, "\\VCDD", "d"))
			return -EIO;
		if (i)
			status |= TP_ACPI_VIDEO_S_DVI;
		break;
	default:
		return -ENOSYS;
1801 1802 1803 1804
	}

	return status;
}
L
Linus Torvalds 已提交
1805

1806
static int video_outputsw_set(int status)
1807
{
1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821
	int autosw;
	int res = 0;

	switch (video_supported) {
	case TPACPI_VIDEO_570:
		res = acpi_evalf(NULL, NULL,
				 "\\_SB.PHS2", "vdd",
				 TP_ACPI_VIDEO_570_PHS2CMD,
				 status | TP_ACPI_VIDEO_570_PHS2SET);
		break;
	case TPACPI_VIDEO_770:
		autosw = video_autosw_get();
		if (autosw < 0)
			return autosw;
L
Linus Torvalds 已提交
1822

1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839
		res = video_autosw_set(1);
		if (res)
			return res;
		res = acpi_evalf(vid_handle, NULL,
				 "ASWT", "vdd", status * 0x100, 0);
		if (!autosw && video_autosw_set(autosw)) {
			printk(IBM_ERR "video auto-switch left enabled due to error\n");
			return -EIO;
		}
		break;
	case TPACPI_VIDEO_NEW:
		res = acpi_evalf(NULL, NULL, "\\VUPS", "vd", 0x80) &&
			acpi_evalf(NULL, NULL, "\\VSDS", "vdd", status, 1);
		break;
	default:
		return -ENOSYS;
	}
L
Linus Torvalds 已提交
1840

1841
	return (res)? 0 : -EIO;
L
Linus Torvalds 已提交
1842 1843
}

1844
static int video_autosw_get(void)
1845
{
1846
	int autosw = 0;
1847

1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860
	switch (video_supported) {
	case TPACPI_VIDEO_570:
		if (!acpi_evalf(vid_handle, &autosw, "SWIT", "d"))
			return -EIO;
		break;
	case TPACPI_VIDEO_770:
	case TPACPI_VIDEO_NEW:
		if (!acpi_evalf(vid_handle, &autosw, "^VDEE", "d"))
			return -EIO;
		break;
	default:
		return -ENOSYS;
	}
1861

1862
	return autosw & 1;
1863 1864
}

1865
static int video_autosw_set(int enable)
1866
{
1867 1868 1869
	if (!acpi_evalf(vid_handle, NULL, "_DOS", "vd", (enable)? 1 : 0))
		return -EIO;
	return 0;
1870 1871
}

1872
static int video_outputsw_cycle(void)
1873
{
1874 1875
	int autosw = video_autosw_get();
	int res;
1876

1877 1878
	if (autosw < 0)
		return autosw;
1879

1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899
	switch (video_supported) {
	case TPACPI_VIDEO_570:
		res = video_autosw_set(1);
		if (res)
			return res;
		res = acpi_evalf(ec_handle, NULL, "_Q16", "v");
		break;
	case TPACPI_VIDEO_770:
	case TPACPI_VIDEO_NEW:
		res = video_autosw_set(1);
		if (res)
			return res;
		res = acpi_evalf(vid_handle, NULL, "VSWT", "v");
		break;
	default:
		return -ENOSYS;
	}
	if (!autosw && video_autosw_set(autosw)) {
		printk(IBM_ERR "video auto-switch left enabled due to error\n");
		return -EIO;
1900 1901
	}

1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920
	return (res)? 0 : -EIO;
}

static int video_expand_toggle(void)
{
	switch (video_supported) {
	case TPACPI_VIDEO_570:
		return acpi_evalf(ec_handle, NULL, "_Q17", "v")?
			0 : -EIO;
	case TPACPI_VIDEO_770:
		return acpi_evalf(vid_handle, NULL, "VEXP", "v")?
			0 : -EIO;
	case TPACPI_VIDEO_NEW:
		return acpi_evalf(NULL, NULL, "\\VEXP", "v")?
			0 : -EIO;
	default:
		return -ENOSYS;
	}
	/* not reached */
1921 1922
}

1923 1924
static int video_read(char *p)
{
1925
	int status, autosw;
1926 1927
	int len = 0;

1928
	if (video_supported == TPACPI_VIDEO_NONE) {
1929 1930 1931 1932
		len += sprintf(p + len, "status:\t\tnot supported\n");
		return len;
	}

1933 1934 1935 1936 1937 1938 1939 1940
	status = video_outputsw_get();
	if (status < 0)
		return status;

	autosw = video_autosw_get();
	if (autosw < 0)
		return autosw;

1941 1942 1943
	len += sprintf(p + len, "status:\t\tsupported\n");
	len += sprintf(p + len, "lcd:\t\t%s\n", enabled(status, 0));
	len += sprintf(p + len, "crt:\t\t%s\n", enabled(status, 1));
1944
	if (video_supported == TPACPI_VIDEO_NEW)
1945 1946 1947 1948
		len += sprintf(p + len, "dvi:\t\t%s\n", enabled(status, 3));
	len += sprintf(p + len, "auto:\t\t%s\n", enabled(autosw, 0));
	len += sprintf(p + len, "commands:\tlcd_enable, lcd_disable\n");
	len += sprintf(p + len, "commands:\tcrt_enable, crt_disable\n");
1949
	if (video_supported == TPACPI_VIDEO_NEW)
1950 1951 1952 1953 1954 1955 1956
		len += sprintf(p + len, "commands:\tdvi_enable, dvi_disable\n");
	len += sprintf(p + len, "commands:\tauto_enable, auto_disable\n");
	len += sprintf(p + len, "commands:\tvideo_switch, expand_toggle\n");

	return len;
}

1957
static int video_write(char *buf)
L
Linus Torvalds 已提交
1958 1959 1960
{
	char *cmd;
	int enable, disable, status;
1961
	int res;
L
Linus Torvalds 已提交
1962

1963
	if (video_supported == TPACPI_VIDEO_NONE)
1964 1965
		return -ENODEV;

1966 1967
	enable = 0;
	disable = 0;
L
Linus Torvalds 已提交
1968 1969 1970

	while ((cmd = next_cmd(&buf))) {
		if (strlencmp(cmd, "lcd_enable") == 0) {
1971
			enable |= TP_ACPI_VIDEO_S_LCD;
L
Linus Torvalds 已提交
1972
		} else if (strlencmp(cmd, "lcd_disable") == 0) {
1973
			disable |= TP_ACPI_VIDEO_S_LCD;
L
Linus Torvalds 已提交
1974
		} else if (strlencmp(cmd, "crt_enable") == 0) {
1975
			enable |= TP_ACPI_VIDEO_S_CRT;
L
Linus Torvalds 已提交
1976
		} else if (strlencmp(cmd, "crt_disable") == 0) {
1977
			disable |= TP_ACPI_VIDEO_S_CRT;
1978
		} else if (video_supported == TPACPI_VIDEO_NEW &&
1979
			   strlencmp(cmd, "dvi_enable") == 0) {
1980
			enable |= TP_ACPI_VIDEO_S_DVI;
1981
		} else if (video_supported == TPACPI_VIDEO_NEW &&
1982
			   strlencmp(cmd, "dvi_disable") == 0) {
1983
			disable |= TP_ACPI_VIDEO_S_DVI;
L
Linus Torvalds 已提交
1984
		} else if (strlencmp(cmd, "auto_enable") == 0) {
1985 1986 1987
			res = video_autosw_set(1);
			if (res)
				return res;
L
Linus Torvalds 已提交
1988
		} else if (strlencmp(cmd, "auto_disable") == 0) {
1989 1990 1991
			res = video_autosw_set(0);
			if (res)
				return res;
L
Linus Torvalds 已提交
1992
		} else if (strlencmp(cmd, "video_switch") == 0) {
1993 1994 1995
			res = video_outputsw_cycle();
			if (res)
				return res;
L
Linus Torvalds 已提交
1996
		} else if (strlencmp(cmd, "expand_toggle") == 0) {
1997 1998 1999
			res = video_expand_toggle();
			if (res)
				return res;
L
Linus Torvalds 已提交
2000 2001 2002 2003 2004
		} else
			return -EINVAL;
	}

	if (enable || disable) {
2005 2006 2007 2008 2009 2010
		status = video_outputsw_get();
		if (status < 0)
			return status;
		res = video_outputsw_set((status & ~disable) | enable);
		if (res)
			return res;
L
Linus Torvalds 已提交
2011 2012 2013 2014 2015
	}

	return 0;
}

2016 2017 2018 2019 2020 2021 2022
static struct ibm_struct video_driver_data = {
	.name = "video",
	.read = video_read,
	.write = video_write,
	.exit = video_exit,
};

2023 2024 2025
/*************************************************************************
 * Light (thinklight) subdriver
 */
L
Linus Torvalds 已提交
2026

2027 2028 2029
IBM_HANDLE(lght, root, "\\LGHT");	/* A21e, A2xm/p, T20-22, X20-21 */
IBM_HANDLE(ledb, ec, "LEDB");		/* G4x */

2030
static int __init light_init(struct ibm_init_struct *iibm)
L
Linus Torvalds 已提交
2031
{
2032 2033
	vdbg_printk(TPACPI_DBG_INIT, "initializing light subdriver\n");

2034 2035 2036
	IBM_ACPIHANDLE_INIT(ledb);
	IBM_ACPIHANDLE_INIT(lght);
	IBM_ACPIHANDLE_INIT(cmos);
2037

2038
	/* light not supported on 570, 600e/x, 770e, 770x, G4x, R30, R31 */
2039
	tp_features.light = (cmos_handle || lght_handle) && !ledb_handle;
2040

2041
	if (tp_features.light)
2042 2043
		/* light status not supported on
		   570, 600e/x, 770e, 770x, G4x, R30, R31, R32, X20 */
2044 2045
		tp_features.light_status =
			acpi_evalf(ec_handle, NULL, "KBLT", "qv");
L
Linus Torvalds 已提交
2046

2047
	vdbg_printk(TPACPI_DBG_INIT, "light is %s\n",
2048
		str_supported(tp_features.light));
2049

2050
	return (tp_features.light)? 0 : 1;
L
Linus Torvalds 已提交
2051 2052
}

2053
static int light_read(char *p)
L
Linus Torvalds 已提交
2054 2055 2056 2057
{
	int len = 0;
	int status = 0;

2058
	if (!tp_features.light) {
2059
		len += sprintf(p + len, "status:\t\tnot supported\n");
2060
	} else if (!tp_features.light_status) {
2061 2062 2063
		len += sprintf(p + len, "status:\t\tunknown\n");
		len += sprintf(p + len, "commands:\ton, off\n");
	} else {
L
Linus Torvalds 已提交
2064 2065 2066
		if (!acpi_evalf(ec_handle, &status, "KBLT", "d"))
			return -EIO;
		len += sprintf(p + len, "status:\t\t%s\n", onoff(status, 0));
2067 2068
		len += sprintf(p + len, "commands:\ton, off\n");
	}
L
Linus Torvalds 已提交
2069 2070 2071 2072

	return len;
}

2073
static int light_write(char *buf)
L
Linus Torvalds 已提交
2074 2075 2076 2077
{
	int cmos_cmd, lght_cmd;
	char *cmd;
	int success;
2078

2079
	if (!tp_features.light)
2080 2081
		return -ENODEV;

L
Linus Torvalds 已提交
2082 2083 2084 2085 2086 2087 2088 2089 2090
	while ((cmd = next_cmd(&buf))) {
		if (strlencmp(cmd, "on") == 0) {
			cmos_cmd = 0x0c;
			lght_cmd = 1;
		} else if (strlencmp(cmd, "off") == 0) {
			cmos_cmd = 0x0d;
			lght_cmd = 0;
		} else
			return -EINVAL;
2091

L
Linus Torvalds 已提交
2092
		success = cmos_handle ?
2093 2094
		    acpi_evalf(cmos_handle, NULL, NULL, "vd", cmos_cmd) :
		    acpi_evalf(lght_handle, NULL, NULL, "vd", lght_cmd);
L
Linus Torvalds 已提交
2095 2096 2097 2098 2099 2100 2101
		if (!success)
			return -EIO;
	}

	return 0;
}

2102 2103 2104 2105 2106 2107
static struct ibm_struct light_driver_data = {
	.name = "light",
	.read = light_read,
	.write = light_write,
};

2108 2109 2110
/*************************************************************************
 * Dock subdriver
 */
L
Linus Torvalds 已提交
2111

2112
#ifdef CONFIG_THINKPAD_ACPI_DOCK
2113 2114 2115 2116 2117 2118 2119

IBM_HANDLE(dock, root, "\\_SB.GDCK",	/* X30, X31, X40 */
	   "\\_SB.PCI0.DOCK",	/* 600e/x,770e,770x,A2xm/p,T20-22,X20-21 */
	   "\\_SB.PCI0.PCI1.DOCK",	/* all others */
	   "\\_SB.PCI.ISA.SLCE",	/* 570 */
    );				/* A21e,G4x,R30,R31,R32,R40,R40e,R50e */

2120 2121 2122
/* don't list other alternatives as we install a notify handler on the 570 */
IBM_HANDLE(pci, root, "\\_SB.PCI");	/* 570 */

2123 2124 2125 2126 2127
static const struct acpi_device_id ibm_pci_device_ids[] = {
	{PCI_ROOT_HID_STRING, 0},
	{"", 0},
};

2128 2129 2130 2131 2132 2133 2134
static struct tp_acpi_drv_struct ibm_dock_acpidriver[2] = {
	{
	 .notify = dock_notify,
	 .handle = &dock_handle,
	 .type = ACPI_SYSTEM_NOTIFY,
	},
	{
2135 2136 2137
	/* THIS ONE MUST NEVER BE USED FOR DRIVER AUTOLOADING.
	 * We just use it to get notifications of dock hotplug
	 * in very old thinkpads */
2138
	 .hid = ibm_pci_device_ids,
2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157
	 .notify = dock_notify,
	 .handle = &pci_handle,
	 .type = ACPI_SYSTEM_NOTIFY,
	},
};

static struct ibm_struct dock_driver_data[2] = {
	{
	 .name = "dock",
	 .read = dock_read,
	 .write = dock_write,
	 .acpi = &ibm_dock_acpidriver[0],
	},
	{
	 .name = "dock",
	 .acpi = &ibm_dock_acpidriver[1],
	},
};

L
Linus Torvalds 已提交
2158 2159
#define dock_docked() (_sta(dock_handle) & 1)

2160
static int __init dock_init(struct ibm_init_struct *iibm)
2161
{
2162 2163
	vdbg_printk(TPACPI_DBG_INIT, "initializing dock subdriver\n");

2164
	IBM_ACPIHANDLE_INIT(dock);
2165

2166 2167 2168
	vdbg_printk(TPACPI_DBG_INIT, "dock is %s\n",
		str_supported(dock_handle != NULL));

2169 2170 2171
	return (dock_handle)? 0 : 1;
}

2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193
static int __init dock_init2(struct ibm_init_struct *iibm)
{
	int dock2_needed;

	vdbg_printk(TPACPI_DBG_INIT, "initializing dock subdriver part 2\n");

	if (dock_driver_data[0].flags.acpi_driver_registered &&
	    dock_driver_data[0].flags.acpi_notify_installed) {
		IBM_ACPIHANDLE_INIT(pci);
		dock2_needed = (pci_handle != NULL);
		vdbg_printk(TPACPI_DBG_INIT,
			    "dock PCI handler for the TP 570 is %s\n",
			    str_supported(dock2_needed));
	} else {
		vdbg_printk(TPACPI_DBG_INIT,
		"dock subdriver part 2 not required\n");
		dock2_needed = 0;
	}

	return (dock2_needed)? 0 : 1;
}

2194 2195 2196
static void dock_notify(struct ibm_struct *ibm, u32 event)
{
	int docked = dock_docked();
2197 2198
	int pci = ibm->acpi->hid && ibm->acpi->device &&
		acpi_match_device_ids(ibm->acpi->device, ibm_pci_device_ids);
2199
	int data;
2200 2201

	if (event == 1 && !pci)	/* 570 */
2202
		data = 1;	/* button */
2203
	else if (event == 1 && pci)	/* 570 */
2204
		data = 3;	/* dock */
2205
	else if (event == 3 && docked)
2206
		data = 1;	/* button */
2207
	else if (event == 3 && !docked)
2208
		data = 2;	/* undock */
2209
	else if (event == 0 && docked)
2210
		data = 3;	/* dock */
2211 2212 2213
	else {
		printk(IBM_ERR "unknown dock event %d, status %d\n",
		       event, _sta(dock_handle));
2214
		data = 0;	/* unknown */
2215
	}
2216
	acpi_bus_generate_proc_event(ibm->acpi->device, event, data);
2217 2218 2219
	acpi_bus_generate_netlink_event(ibm->acpi->device->pnp.device_class,
					  ibm->acpi->device->dev.bus_id,
					  event, data);
2220 2221
}

2222
static int dock_read(char *p)
L
Linus Torvalds 已提交
2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238
{
	int len = 0;
	int docked = dock_docked();

	if (!dock_handle)
		len += sprintf(p + len, "status:\t\tnot supported\n");
	else if (!docked)
		len += sprintf(p + len, "status:\t\tundocked\n");
	else {
		len += sprintf(p + len, "status:\t\tdocked\n");
		len += sprintf(p + len, "commands:\tdock, undock\n");
	}

	return len;
}

2239
static int dock_write(char *buf)
L
Linus Torvalds 已提交
2240 2241 2242 2243
{
	char *cmd;

	if (!dock_docked())
2244
		return -ENODEV;
L
Linus Torvalds 已提交
2245 2246 2247

	while ((cmd = next_cmd(&buf))) {
		if (strlencmp(cmd, "undock") == 0) {
2248 2249
			if (!acpi_evalf(dock_handle, NULL, "_DCK", "vd", 0) ||
			    !acpi_evalf(dock_handle, NULL, "_EJ0", "vd", 1))
2250 2251 2252 2253 2254 2255
				return -EIO;
		} else if (strlencmp(cmd, "dock") == 0) {
			if (!acpi_evalf(dock_handle, NULL, "_DCK", "vd", 1))
				return -EIO;
		} else
			return -EINVAL;
L
Linus Torvalds 已提交
2256
	}
2257 2258

	return 0;
L
Linus Torvalds 已提交
2259
}
2260

2261
#endif /* CONFIG_THINKPAD_ACPI_DOCK */
2262 2263 2264 2265

/*************************************************************************
 * Bay subdriver
 */
L
Linus Torvalds 已提交
2266

2267
#ifdef CONFIG_THINKPAD_ACPI_BAY
2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282
IBM_HANDLE(bay, root, "\\_SB.PCI.IDE.SECN.MAST",	/* 570 */
	   "\\_SB.PCI0.IDE0.IDES.IDSM",	/* 600e/x, 770e, 770x */
	   "\\_SB.PCI0.SATA.SCND.MSTR",	/* T60, X60, Z60 */
	   "\\_SB.PCI0.IDE0.SCND.MSTR",	/* all others */
	   );				/* A21e, R30, R31 */
IBM_HANDLE(bay_ej, bay, "_EJ3",	/* 600e/x, A2xm/p, A3x */
	   "_EJ0",		/* all others */
	   );			/* 570,A21e,G4x,R30,R31,R32,R40e,R50e */
IBM_HANDLE(bay2, root, "\\_SB.PCI0.IDE0.PRIM.SLAV",	/* A3x, R32 */
	   "\\_SB.PCI0.IDE0.IDEP.IDPS",	/* 600e/x, 770e, 770x */
	   );				/* all others */
IBM_HANDLE(bay2_ej, bay2, "_EJ3",	/* 600e/x, 770e, A3x */
	   "_EJ0",			/* 770x */
	   );				/* all others */

2283
static int __init bay_init(struct ibm_init_struct *iibm)
L
Linus Torvalds 已提交
2284
{
2285 2286
	vdbg_printk(TPACPI_DBG_INIT, "initializing bay subdriver\n");

2287
	IBM_ACPIHANDLE_INIT(bay);
2288
	if (bay_handle)
2289 2290
		IBM_ACPIHANDLE_INIT(bay_ej);
	IBM_ACPIHANDLE_INIT(bay2);
2291
	if (bay2_handle)
2292
		IBM_ACPIHANDLE_INIT(bay2_ej);
2293

2294 2295 2296 2297
	tp_features.bay_status = bay_handle &&
		acpi_evalf(bay_handle, NULL, "_STA", "qv");
	tp_features.bay_status2 = bay2_handle &&
		acpi_evalf(bay2_handle, NULL, "_STA", "qv");
2298

2299 2300 2301 2302
	tp_features.bay_eject = bay_handle && bay_ej_handle &&
		(strlencmp(bay_ej_path, "_EJ0") == 0 || experimental);
	tp_features.bay_eject2 = bay2_handle && bay2_ej_handle &&
		(strlencmp(bay2_ej_path, "_EJ0") == 0 || experimental);
L
Linus Torvalds 已提交
2303

2304 2305
	vdbg_printk(TPACPI_DBG_INIT,
		"bay 1: status %s, eject %s; bay 2: status %s, eject %s\n",
2306 2307 2308 2309
		str_supported(tp_features.bay_status),
		str_supported(tp_features.bay_eject),
		str_supported(tp_features.bay_status2),
		str_supported(tp_features.bay_eject2));
2310

2311 2312
	return (tp_features.bay_status || tp_features.bay_eject ||
		tp_features.bay_status2 || tp_features.bay_eject2)? 0 : 1;
L
Linus Torvalds 已提交
2313 2314
}

2315 2316
static void bay_notify(struct ibm_struct *ibm, u32 event)
{
2317
	acpi_bus_generate_proc_event(ibm->acpi->device, event, 0);
2318 2319 2320
	acpi_bus_generate_netlink_event(ibm->acpi->device->pnp.device_class,
					  ibm->acpi->device->dev.bus_id,
					  event, 0);
2321 2322
}

2323 2324 2325
#define bay_occupied(b) (_sta(b##_handle) & 1)

static int bay_read(char *p)
L
Linus Torvalds 已提交
2326 2327
{
	int len = 0;
2328 2329 2330 2331
	int occupied = bay_occupied(bay);
	int occupied2 = bay_occupied(bay2);
	int eject, eject2;

2332 2333 2334 2335 2336
	len += sprintf(p + len, "status:\t\t%s\n",
		tp_features.bay_status ?
			(occupied ? "occupied" : "unoccupied") :
				"not supported");
	if (tp_features.bay_status2)
2337 2338 2339
		len += sprintf(p + len, "status2:\t%s\n", occupied2 ?
			       "occupied" : "unoccupied");

2340 2341
	eject = tp_features.bay_eject && occupied;
	eject2 = tp_features.bay_eject2 && occupied2;
2342 2343 2344 2345

	if (eject && eject2)
		len += sprintf(p + len, "commands:\teject, eject2\n");
	else if (eject)
L
Linus Torvalds 已提交
2346
		len += sprintf(p + len, "commands:\teject\n");
2347 2348
	else if (eject2)
		len += sprintf(p + len, "commands:\teject2\n");
L
Linus Torvalds 已提交
2349 2350 2351 2352

	return len;
}

2353
static int bay_write(char *buf)
L
Linus Torvalds 已提交
2354 2355 2356
{
	char *cmd;

2357
	if (!tp_features.bay_eject && !tp_features.bay_eject2)
2358 2359
		return -ENODEV;

L
Linus Torvalds 已提交
2360
	while ((cmd = next_cmd(&buf))) {
2361
		if (tp_features.bay_eject && strlencmp(cmd, "eject") == 0) {
2362 2363
			if (!acpi_evalf(bay_ej_handle, NULL, NULL, "vd", 1))
				return -EIO;
2364
		} else if (tp_features.bay_eject2 &&
2365 2366
			   strlencmp(cmd, "eject2") == 0) {
			if (!acpi_evalf(bay2_ej_handle, NULL, NULL, "vd", 1))
L
Linus Torvalds 已提交
2367 2368 2369 2370 2371 2372
				return -EIO;
		} else
			return -EINVAL;
	}

	return 0;
2373
}
2374

2375 2376 2377 2378 2379 2380
static struct tp_acpi_drv_struct ibm_bay_acpidriver = {
	.notify = bay_notify,
	.handle = &bay_handle,
	.type = ACPI_SYSTEM_NOTIFY,
};

2381 2382 2383 2384
static struct ibm_struct bay_driver_data = {
	.name = "bay",
	.read = bay_read,
	.write = bay_write,
2385
	.acpi = &ibm_bay_acpidriver,
2386 2387
};

2388
#endif /* CONFIG_THINKPAD_ACPI_BAY */
L
Linus Torvalds 已提交
2389

2390 2391 2392 2393
/*************************************************************************
 * CMOS subdriver
 */

2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413
/* sysfs cmos_command -------------------------------------------------- */
static ssize_t cmos_command_store(struct device *dev,
			    struct device_attribute *attr,
			    const char *buf, size_t count)
{
	unsigned long cmos_cmd;
	int res;

	if (parse_strtoul(buf, 21, &cmos_cmd))
		return -EINVAL;

	res = issue_thinkpad_cmos_command(cmos_cmd);
	return (res)? res : count;
}

static struct device_attribute dev_attr_cmos_command =
	__ATTR(cmos_command, S_IWUSR, NULL, cmos_command_store);

/* --------------------------------------------------------------------- */

2414
static int __init cmos_init(struct ibm_init_struct *iibm)
2415
{
2416 2417
	int res;

2418 2419 2420
	vdbg_printk(TPACPI_DBG_INIT,
		"initializing cmos commands subdriver\n");

2421
	IBM_ACPIHANDLE_INIT(cmos);
2422

2423 2424
	vdbg_printk(TPACPI_DBG_INIT, "cmos commands are %s\n",
		str_supported(cmos_handle != NULL));
2425 2426 2427 2428 2429

	res = device_create_file(&tpacpi_pdev->dev, &dev_attr_cmos_command);
	if (res)
		return res;

2430 2431 2432
	return (cmos_handle)? 0 : 1;
}

2433 2434 2435 2436 2437
static void cmos_exit(void)
{
	device_remove_file(&tpacpi_pdev->dev, &dev_attr_cmos_command);
}

2438
static int cmos_read(char *p)
L
Linus Torvalds 已提交
2439 2440 2441
{
	int len = 0;

2442 2443
	/* cmos not supported on 570, 600e/x, 770e, 770x, A21e, A2xm/p,
	   R30, R31, T20-22, X20-21 */
L
Linus Torvalds 已提交
2444 2445 2446 2447
	if (!cmos_handle)
		len += sprintf(p + len, "status:\t\tnot supported\n");
	else {
		len += sprintf(p + len, "status:\t\tsupported\n");
2448
		len += sprintf(p + len, "commands:\t<cmd> (<cmd> is 0-21)\n");
L
Linus Torvalds 已提交
2449 2450 2451 2452 2453
	}

	return len;
}

2454
static int cmos_write(char *buf)
L
Linus Torvalds 已提交
2455 2456
{
	char *cmd;
2457
	int cmos_cmd, res;
L
Linus Torvalds 已提交
2458 2459

	while ((cmd = next_cmd(&buf))) {
2460 2461
		if (sscanf(cmd, "%u", &cmos_cmd) == 1 &&
		    cmos_cmd >= 0 && cmos_cmd <= 21) {
L
Linus Torvalds 已提交
2462 2463 2464 2465
			/* cmos_cmd set */
		} else
			return -EINVAL;

2466 2467 2468
		res = issue_thinkpad_cmos_command(cmos_cmd);
		if (res)
			return res;
L
Linus Torvalds 已提交
2469 2470 2471
	}

	return 0;
2472 2473
}

2474 2475 2476 2477
static struct ibm_struct cmos_driver_data = {
	.name = "cmos",
	.read = cmos_read,
	.write = cmos_write,
2478
	.exit = cmos_exit,
2479
};
2480 2481 2482 2483 2484

/*************************************************************************
 * LED subdriver
 */

2485
static enum led_access_mode led_supported;
2486

2487 2488 2489 2490 2491
IBM_HANDLE(led, ec, "SLED",	/* 570 */
	   "SYSL",		/* 600e/x, 770e, 770x, A21e, A2xm/p, T20-22, X20-21 */
	   "LED",		/* all others */
	   );			/* R30, R31 */

2492
static int __init led_init(struct ibm_init_struct *iibm)
2493
{
2494 2495
	vdbg_printk(TPACPI_DBG_INIT, "initializing LED subdriver\n");

2496
	IBM_ACPIHANDLE_INIT(led);
2497

2498 2499
	if (!led_handle)
		/* led not supported on R30, R31 */
2500
		led_supported = TPACPI_LED_NONE;
2501 2502
	else if (strlencmp(led_path, "SLED") == 0)
		/* 570 */
2503
		led_supported = TPACPI_LED_570;
2504 2505
	else if (strlencmp(led_path, "SYSL") == 0)
		/* 600e/x, 770e, 770x, A21e, A2xm/p, T20-22, X20-21 */
2506
		led_supported = TPACPI_LED_OLD;
2507 2508
	else
		/* all others */
2509
		led_supported = TPACPI_LED_NEW;
2510

2511 2512 2513
	vdbg_printk(TPACPI_DBG_INIT, "LED commands are %s, mode %d\n",
		str_supported(led_supported), led_supported);

2514
	return (led_supported != TPACPI_LED_NONE)? 0 : 1;
2515 2516 2517 2518 2519
}

#define led_status(s) ((s) == 0 ? "off" : ((s) == 1 ? "on" : "blinking"))

static int led_read(char *p)
L
Linus Torvalds 已提交
2520 2521 2522
{
	int len = 0;

2523 2524 2525 2526 2527 2528
	if (!led_supported) {
		len += sprintf(p + len, "status:\t\tnot supported\n");
		return len;
	}
	len += sprintf(p + len, "status:\t\tsupported\n");

2529
	if (led_supported == TPACPI_LED_570) {
2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540
		/* 570 */
		int i, status;
		for (i = 0; i < 8; i++) {
			if (!acpi_evalf(ec_handle,
					&status, "GLED", "dd", 1 << i))
				return -EIO;
			len += sprintf(p + len, "%d:\t\t%s\n",
				       i, led_status(status));
		}
	}

L
Linus Torvalds 已提交
2541
	len += sprintf(p + len, "commands:\t"
2542
		       "<led> on, <led> off, <led> blink (<led> is 0-7)\n");
L
Linus Torvalds 已提交
2543 2544 2545 2546

	return len;
}

2547 2548 2549 2550 2551 2552 2553
/* off, on, blink */
static const int led_sled_arg1[] = { 0, 1, 3 };
static const int led_exp_hlbl[] = { 0, 0, 1 };	/* led# * */
static const int led_exp_hlcl[] = { 0, 1, 1 };	/* led# * */
static const int led_led_arg1[] = { 0, 0x80, 0xc0 };

static int led_write(char *buf)
L
Linus Torvalds 已提交
2554 2555
{
	char *cmd;
2556 2557 2558 2559
	int led, ind, ret;

	if (!led_supported)
		return -ENODEV;
L
Linus Torvalds 已提交
2560 2561

	while ((cmd = next_cmd(&buf))) {
2562
		if (sscanf(cmd, "%d", &led) != 1 || led < 0 || led > 7)
L
Linus Torvalds 已提交
2563 2564
			return -EINVAL;

2565 2566
		if (strstr(cmd, "off")) {
			ind = 0;
L
Linus Torvalds 已提交
2567
		} else if (strstr(cmd, "on")) {
2568 2569 2570
			ind = 1;
		} else if (strstr(cmd, "blink")) {
			ind = 2;
L
Linus Torvalds 已提交
2571 2572
		} else
			return -EINVAL;
2573

2574
		if (led_supported == TPACPI_LED_570) {
2575 2576
			/* 570 */
			led = 1 << led;
L
Linus Torvalds 已提交
2577
			if (!acpi_evalf(led_handle, NULL, NULL, "vdd",
2578
					led, led_sled_arg1[ind]))
L
Linus Torvalds 已提交
2579
				return -EIO;
2580
		} else if (led_supported == TPACPI_LED_OLD) {
2581 2582
			/* 600e/x, 770e, 770x, A21e, A2xm/p, T20-22, X20 */
			led = 1 << led;
2583
			ret = ec_write(TPACPI_LED_EC_HLMS, led);
2584 2585
			if (ret >= 0)
				ret =
2586
				    ec_write(TPACPI_LED_EC_HLBL,
2587
				    	     led * led_exp_hlbl[ind]);
2588 2589
			if (ret >= 0)
				ret =
2590
				    ec_write(TPACPI_LED_EC_HLCL,
2591
				    	     led * led_exp_hlcl[ind]);
2592 2593 2594 2595 2596 2597
			if (ret < 0)
				return ret;
		} else {
			/* all others */
			if (!acpi_evalf(led_handle, NULL, NULL, "vdd",
					led, led_led_arg1[ind]))
L
Linus Torvalds 已提交
2598
				return -EIO;
2599 2600 2601 2602 2603 2604
		}
	}

	return 0;
}

2605 2606 2607 2608 2609 2610
static struct ibm_struct led_driver_data = {
	.name = "led",
	.read = led_read,
	.write = led_write,
};

2611 2612 2613 2614 2615 2616
/*************************************************************************
 * Beep subdriver
 */

IBM_HANDLE(beep, ec, "BEEP");	/* all except R30, R31 */

2617
static int __init beep_init(struct ibm_init_struct *iibm)
2618
{
2619 2620
	vdbg_printk(TPACPI_DBG_INIT, "initializing beep subdriver\n");

2621
	IBM_ACPIHANDLE_INIT(beep);
2622

2623 2624 2625
	vdbg_printk(TPACPI_DBG_INIT, "beep is %s\n",
		str_supported(beep_handle != NULL));

2626 2627 2628
	return (beep_handle)? 0 : 1;
}

2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663
static int beep_read(char *p)
{
	int len = 0;

	if (!beep_handle)
		len += sprintf(p + len, "status:\t\tnot supported\n");
	else {
		len += sprintf(p + len, "status:\t\tsupported\n");
		len += sprintf(p + len, "commands:\t<cmd> (<cmd> is 0-17)\n");
	}

	return len;
}

static int beep_write(char *buf)
{
	char *cmd;
	int beep_cmd;

	if (!beep_handle)
		return -ENODEV;

	while ((cmd = next_cmd(&buf))) {
		if (sscanf(cmd, "%u", &beep_cmd) == 1 &&
		    beep_cmd >= 0 && beep_cmd <= 17) {
			/* beep_cmd set */
		} else
			return -EINVAL;
		if (!acpi_evalf(beep_handle, NULL, NULL, "vdd", beep_cmd, 0))
			return -EIO;
	}

	return 0;
}

2664 2665 2666 2667 2668 2669
static struct ibm_struct beep_driver_data = {
	.name = "beep",
	.read = beep_read,
	.write = beep_write,
};

2670 2671 2672
/*************************************************************************
 * Thermal subdriver
 */
2673

2674
static enum thermal_access_mode thermal_read_mode;
2675

2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 2752 2753 2754
/* sysfs temp##_input -------------------------------------------------- */

static ssize_t thermal_temp_input_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	struct sensor_device_attribute *sensor_attr =
					to_sensor_dev_attr(attr);
	int idx = sensor_attr->index;
	s32 value;
	int res;

	res = thermal_get_sensor(idx, &value);
	if (res)
		return res;
	if (value == TP_EC_THERMAL_TMP_NA * 1000)
		return -ENXIO;

	return snprintf(buf, PAGE_SIZE, "%d\n", value);
}

#define THERMAL_SENSOR_ATTR_TEMP(_idxA, _idxB) \
	 SENSOR_ATTR(temp##_idxA##_input, S_IRUGO, thermal_temp_input_show, NULL, _idxB)

static struct sensor_device_attribute sensor_dev_attr_thermal_temp_input[] = {
	THERMAL_SENSOR_ATTR_TEMP(1, 0),
	THERMAL_SENSOR_ATTR_TEMP(2, 1),
	THERMAL_SENSOR_ATTR_TEMP(3, 2),
	THERMAL_SENSOR_ATTR_TEMP(4, 3),
	THERMAL_SENSOR_ATTR_TEMP(5, 4),
	THERMAL_SENSOR_ATTR_TEMP(6, 5),
	THERMAL_SENSOR_ATTR_TEMP(7, 6),
	THERMAL_SENSOR_ATTR_TEMP(8, 7),
	THERMAL_SENSOR_ATTR_TEMP(9, 8),
	THERMAL_SENSOR_ATTR_TEMP(10, 9),
	THERMAL_SENSOR_ATTR_TEMP(11, 10),
	THERMAL_SENSOR_ATTR_TEMP(12, 11),
	THERMAL_SENSOR_ATTR_TEMP(13, 12),
	THERMAL_SENSOR_ATTR_TEMP(14, 13),
	THERMAL_SENSOR_ATTR_TEMP(15, 14),
	THERMAL_SENSOR_ATTR_TEMP(16, 15),
};

#define THERMAL_ATTRS(X) \
	&sensor_dev_attr_thermal_temp_input[X].dev_attr.attr

static struct attribute *thermal_temp_input_attr[] = {
	THERMAL_ATTRS(8),
	THERMAL_ATTRS(9),
	THERMAL_ATTRS(10),
	THERMAL_ATTRS(11),
	THERMAL_ATTRS(12),
	THERMAL_ATTRS(13),
	THERMAL_ATTRS(14),
	THERMAL_ATTRS(15),
	THERMAL_ATTRS(0),
	THERMAL_ATTRS(1),
	THERMAL_ATTRS(2),
	THERMAL_ATTRS(3),
	THERMAL_ATTRS(4),
	THERMAL_ATTRS(5),
	THERMAL_ATTRS(6),
	THERMAL_ATTRS(7),
	NULL
};

static const struct attribute_group thermal_temp_input16_group = {
	.attrs = thermal_temp_input_attr
};

static const struct attribute_group thermal_temp_input8_group = {
	.attrs = &thermal_temp_input_attr[8]
};

#undef THERMAL_SENSOR_ATTR_TEMP
#undef THERMAL_ATTRS

/* --------------------------------------------------------------------- */

2755
static int __init thermal_init(struct ibm_init_struct *iibm)
2756
{
2757 2758
	u8 t, ta1, ta2;
	int i;
2759
	int acpi_tmp7;
2760
	int res;
2761

2762 2763
	vdbg_printk(TPACPI_DBG_INIT, "initializing thermal subdriver\n");

2764
	acpi_tmp7 = acpi_evalf(ec_handle, NULL, "TMP7", "qv");
2765

2766
	if (thinkpad_id.ec_model) {
2767 2768 2769 2770 2771 2772
		/*
		 * Direct EC access mode: sensors at registers
		 * 0x78-0x7F, 0xC0-0xC7.  Registers return 0x00 for
		 * non-implemented, thermal sensors return 0x80 when
		 * not available
		 */
2773

2774 2775
		ta1 = ta2 = 0;
		for (i = 0; i < 8; i++) {
2776
			if (acpi_ec_read(TP_EC_THERMAL_TMP0 + i, &t)) {
2777 2778 2779 2780 2781
				ta1 |= t;
			} else {
				ta1 = 0;
				break;
			}
2782
			if (acpi_ec_read(TP_EC_THERMAL_TMP8 + i, &t)) {
2783 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794
				ta2 |= t;
			} else {
				ta1 = 0;
				break;
			}
		}
		if (ta1 == 0) {
			/* This is sheer paranoia, but we handle it anyway */
			if (acpi_tmp7) {
				printk(IBM_ERR
				       "ThinkPad ACPI EC access misbehaving, "
				       "falling back to ACPI TMPx access mode\n");
2795
				thermal_read_mode = TPACPI_THERMAL_ACPI_TMP07;
2796 2797 2798 2799
			} else {
				printk(IBM_ERR
				       "ThinkPad ACPI EC access misbehaving, "
				       "disabling thermal sensors access\n");
2800
				thermal_read_mode = TPACPI_THERMAL_NONE;
2801 2802 2803 2804
			}
		} else {
			thermal_read_mode =
			    (ta2 != 0) ?
2805
			    TPACPI_THERMAL_TPEC_16 : TPACPI_THERMAL_TPEC_8;
2806 2807
		}
	} else if (acpi_tmp7) {
2808 2809
		if (acpi_evalf(ec_handle, NULL, "UPDT", "qv")) {
			/* 600e/x, 770e, 770x */
2810
			thermal_read_mode = TPACPI_THERMAL_ACPI_UPDT;
2811 2812
		} else {
			/* Standard ACPI TMPx access, max 8 sensors */
2813
			thermal_read_mode = TPACPI_THERMAL_ACPI_TMP07;
2814 2815 2816
		}
	} else {
		/* temperatures not supported on 570, G4x, R30, R31, R32 */
2817
		thermal_read_mode = TPACPI_THERMAL_NONE;
2818
	}
2819

2820 2821 2822 2823
	vdbg_printk(TPACPI_DBG_INIT, "thermal is %s, mode %d\n",
		str_supported(thermal_read_mode != TPACPI_THERMAL_NONE),
		thermal_read_mode);

2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863
	switch(thermal_read_mode) {
	case TPACPI_THERMAL_TPEC_16:
		res = sysfs_create_group(&tpacpi_pdev->dev.kobj,
				&thermal_temp_input16_group);
		if (res)
			return res;
		break;
	case TPACPI_THERMAL_TPEC_8:
	case TPACPI_THERMAL_ACPI_TMP07:
	case TPACPI_THERMAL_ACPI_UPDT:
		res = sysfs_create_group(&tpacpi_pdev->dev.kobj,
				&thermal_temp_input8_group);
		if (res)
			return res;
		break;
	case TPACPI_THERMAL_NONE:
	default:
		return 1;
	}

	return 0;
}

static void thermal_exit(void)
{
	switch(thermal_read_mode) {
	case TPACPI_THERMAL_TPEC_16:
		sysfs_remove_group(&tpacpi_pdev->dev.kobj,
				   &thermal_temp_input16_group);
		break;
	case TPACPI_THERMAL_TPEC_8:
	case TPACPI_THERMAL_ACPI_TMP07:
	case TPACPI_THERMAL_ACPI_UPDT:
		sysfs_remove_group(&tpacpi_pdev->dev.kobj,
				   &thermal_temp_input16_group);
		break;
	case TPACPI_THERMAL_NONE:
	default:
		break;
	}
2864 2865
}

2866 2867
/* idx is zero-based */
static int thermal_get_sensor(int idx, s32 *value)
2868
{
2869
	int t;
2870
	s8 tmp;
2871
	char tmpi[5];
2872

2873
	t = TP_EC_THERMAL_TMP0;
2874

2875
	switch (thermal_read_mode) {
2876 2877
#if TPACPI_MAX_THERMAL_SENSORS >= 16
	case TPACPI_THERMAL_TPEC_16:
2878 2879 2880
		if (idx >= 8 && idx <= 15) {
			t = TP_EC_THERMAL_TMP8;
			idx -= 8;
2881 2882 2883
		}
		/* fallthrough */
#endif
2884
	case TPACPI_THERMAL_TPEC_8:
2885 2886
		if (idx <= 7) {
			if (!acpi_ec_read(t + idx, &tmp))
2887
				return -EIO;
2888 2889
			*value = tmp * 1000;
			return 0;
2890
		}
2891
		break;
2892

2893
	case TPACPI_THERMAL_ACPI_UPDT:
2894 2895 2896 2897
		if (idx <= 7) {
			snprintf(tmpi, sizeof(tmpi), "TMP%c", '0' + idx);
			if (!acpi_evalf(ec_handle, NULL, "UPDT", "v"))
				return -EIO;
2898 2899
			if (!acpi_evalf(ec_handle, &t, tmpi, "d"))
				return -EIO;
2900 2901
			*value = (t - 2732) * 100;
			return 0;
2902
		}
2903
		break;
2904

2905
	case TPACPI_THERMAL_ACPI_TMP07:
2906 2907
		if (idx <= 7) {
			snprintf(tmpi, sizeof(tmpi), "TMP%c", '0' + idx);
2908 2909
			if (!acpi_evalf(ec_handle, &t, tmpi, "d"))
				return -EIO;
2910 2911
			if (t > 127 || t < -127)
				t = TP_EC_THERMAL_TMP_NA;
2912 2913
			*value = t * 1000;
			return 0;
2914
		}
2915
		break;
2916

2917
	case TPACPI_THERMAL_NONE:
2918
	default:
2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938 2939 2940 2941 2942
		return -ENOSYS;
	}

	return -EINVAL;
}

static int thermal_get_sensors(struct ibm_thermal_sensors_struct *s)
{
	int res, i;
	int n;

	n = 8;
	i = 0;

	if (!s)
		return -EINVAL;

	if (thermal_read_mode == TPACPI_THERMAL_TPEC_16)
		n = 16;

	for(i = 0 ; i < n; i++) {
		res = thermal_get_sensor(i, &s->temp[i]);
		if (res)
			return res;
2943
	}
2944 2945

	return n;
2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965
}

static int thermal_read(char *p)
{
	int len = 0;
	int n, i;
	struct ibm_thermal_sensors_struct t;

	n = thermal_get_sensors(&t);
	if (unlikely(n < 0))
		return n;

	len += sprintf(p + len, "temperatures:\t");

	if (n > 0) {
		for (i = 0; i < (n - 1); i++)
			len += sprintf(p + len, "%d ", t.temp[i] / 1000);
		len += sprintf(p + len, "%d\n", t.temp[i] / 1000);
	} else
		len += sprintf(p + len, "not supported\n");
2966 2967 2968 2969

	return len;
}

2970 2971 2972
static struct ibm_struct thermal_driver_data = {
	.name = "thermal",
	.read = thermal_read,
2973
	.exit = thermal_exit,
2974 2975
};

2976 2977 2978 2979
/*************************************************************************
 * EC Dump subdriver
 */

2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030
static u8 ecdump_regs[256];

static int ecdump_read(char *p)
{
	int len = 0;
	int i, j;
	u8 v;

	len += sprintf(p + len, "EC      "
		       " +00 +01 +02 +03 +04 +05 +06 +07"
		       " +08 +09 +0a +0b +0c +0d +0e +0f\n");
	for (i = 0; i < 256; i += 16) {
		len += sprintf(p + len, "EC 0x%02x:", i);
		for (j = 0; j < 16; j++) {
			if (!acpi_ec_read(i + j, &v))
				break;
			if (v != ecdump_regs[i + j])
				len += sprintf(p + len, " *%02x", v);
			else
				len += sprintf(p + len, "  %02x", v);
			ecdump_regs[i + j] = v;
		}
		len += sprintf(p + len, "\n");
		if (j != 16)
			break;
	}

	/* These are way too dangerous to advertise openly... */
#if 0
	len += sprintf(p + len, "commands:\t0x<offset> 0x<value>"
		       " (<offset> is 00-ff, <value> is 00-ff)\n");
	len += sprintf(p + len, "commands:\t0x<offset> <value>  "
		       " (<offset> is 00-ff, <value> is 0-255)\n");
#endif
	return len;
}

static int ecdump_write(char *buf)
{
	char *cmd;
	int i, v;

	while ((cmd = next_cmd(&buf))) {
		if (sscanf(cmd, "0x%x 0x%x", &i, &v) == 2) {
			/* i and v set */
		} else if (sscanf(cmd, "0x%x %u", &i, &v) == 2) {
			/* i and v set */
		} else
			return -EINVAL;
		if (i >= 0 && i < 256 && v >= 0 && v < 256) {
			if (!acpi_ec_write(i, v))
L
Linus Torvalds 已提交
3031 3032 3033 3034 3035 3036
				return -EIO;
		} else
			return -EINVAL;
	}

	return 0;
3037 3038
}

3039 3040 3041 3042
static struct ibm_struct ecdump_driver_data = {
	.name = "ecdump",
	.read = ecdump_read,
	.write = ecdump_write,
3043
	.flags.experimental = 1,
3044 3045
};

3046 3047 3048 3049
/*************************************************************************
 * Backlight/brightness subdriver
 */

3050
static struct backlight_device *ibm_backlight_device;
3051 3052 3053 3054 3055 3056

static struct backlight_ops ibm_backlight_data = {
        .get_brightness = brightness_get,
        .update_status  = brightness_update_status,
};

3057 3058
static struct mutex brightness_mutex;

3059
static int __init brightness_init(struct ibm_init_struct *iibm)
3060 3061 3062
{
	int b;

3063 3064
	vdbg_printk(TPACPI_DBG_INIT, "initializing brightness subdriver\n");

3065 3066
	mutex_init(&brightness_mutex);

3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079
	if (!brightness_mode) {
		if (thinkpad_id.vendor == PCI_VENDOR_ID_LENOVO)
			brightness_mode = 2;
		else
			brightness_mode = 3;

		dbg_printk(TPACPI_DBG_INIT, "selected brightness_mode=%d\n",
			brightness_mode);
	}

	if (brightness_mode > 3)
		return -EINVAL;

3080 3081
	b = brightness_get(NULL);
	if (b < 0)
3082
		return 1;
3083

3084 3085 3086
	ibm_backlight_device = backlight_device_register(
					TPACPI_BACKLIGHT_DEV_NAME, NULL, NULL,
					&ibm_backlight_data);
3087 3088 3089 3090
	if (IS_ERR(ibm_backlight_device)) {
		printk(IBM_ERR "Could not register backlight device\n");
		return PTR_ERR(ibm_backlight_device);
	}
3091
	vdbg_printk(TPACPI_DBG_INIT, "brightness is supported\n");
3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102

	ibm_backlight_device->props.max_brightness = 7;
	ibm_backlight_device->props.brightness = b;
	backlight_update_status(ibm_backlight_device);

	return 0;
}

static void brightness_exit(void)
{
	if (ibm_backlight_device) {
3103 3104
		vdbg_printk(TPACPI_DBG_EXIT,
			    "calling backlight_device_unregister()\n");
3105 3106 3107 3108 3109 3110 3111 3112 3113 3114 3115 3116 3117
		backlight_device_unregister(ibm_backlight_device);
		ibm_backlight_device = NULL;
	}
}

static int brightness_update_status(struct backlight_device *bd)
{
	return brightness_set(
		(bd->props.fb_blank == FB_BLANK_UNBLANK &&
		 bd->props.power == FB_BLANK_UNBLANK) ?
				bd->props.brightness : 0);
}

3118 3119 3120 3121
/*
 * ThinkPads can read brightness from two places: EC 0x31, or
 * CMOS NVRAM byte 0x5E, bits 0-3.
 */
3122 3123
static int brightness_get(struct backlight_device *bd)
{
3124
	u8 lec = 0, lcmos = 0, level = 0;
3125

3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137 3138 3139 3140 3141 3142 3143 3144 3145 3146
	if (brightness_mode & 1) {
		if (!acpi_ec_read(brightness_offset, &lec))
			return -EIO;
		lec &= 7;
		level = lec;
	};
	if (brightness_mode & 2) {
		lcmos = (nvram_read_byte(TP_NVRAM_ADDR_BRIGHTNESS)
			 & TP_NVRAM_MASK_LEVEL_BRIGHTNESS)
			>> TP_NVRAM_POS_LEVEL_BRIGHTNESS;
		level = lcmos;
	}

	if (brightness_mode == 3 && lec != lcmos) {
		printk(IBM_ERR
			"CMOS NVRAM (%u) and EC (%u) do not agree "
			"on display brightness level\n",
			(unsigned int) lcmos,
			(unsigned int) lec);
		return -EIO;
	}
3147

3148
	return level;
3149 3150 3151
}

static int brightness_set(int value)
L
Linus Torvalds 已提交
3152
{
3153 3154
	int cmos_cmd, inc, i, res;
	int current_value;
3155

3156 3157
	if (value > 7)
		return -EINVAL;
3158

3159 3160 3161 3162 3163 3164 3165 3166 3167 3168
	res = mutex_lock_interruptible(&brightness_mutex);
	if (res < 0)
		return res;

	current_value = brightness_get(NULL);
	if (current_value < 0) {
		res = current_value;
		goto errout;
	}

3169 3170 3171
	cmos_cmd = value > current_value ?
			TP_CMOS_BRIGHTNESS_UP :
			TP_CMOS_BRIGHTNESS_DOWN;
3172
	inc = value > current_value ? 1 : -1;
3173

3174
	res = 0;
3175
	for (i = current_value; i != value; i += inc) {
3176
		if ((brightness_mode & 2) &&
3177 3178 3179 3180
		    issue_thinkpad_cmos_command(cmos_cmd)) {
			res = -EIO;
			goto errout;
		}
3181
		if ((brightness_mode & 1) &&
3182 3183 3184 3185
		    !acpi_ec_write(brightness_offset, i + inc)) {
			res = -EIO;
			goto errout;;
		}
3186 3187
	}

3188 3189 3190
errout:
	mutex_unlock(&brightness_mutex);
	return res;
3191 3192
}

3193 3194 3195 3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209
static int brightness_read(char *p)
{
	int len = 0;
	int level;

	if ((level = brightness_get(NULL)) < 0) {
		len += sprintf(p + len, "level:\t\tunreadable\n");
	} else {
		len += sprintf(p + len, "level:\t\t%d\n", level & 0x7);
		len += sprintf(p + len, "commands:\tup, down\n");
		len += sprintf(p + len, "commands:\tlevel <level>"
			       " (<level> is 0-7)\n");
	}

	return len;
}

3210 3211 3212
static int brightness_write(char *buf)
{
	int level;
3213
	int new_level;
L
Linus Torvalds 已提交
3214 3215 3216
	char *cmd;

	while ((cmd = next_cmd(&buf))) {
3217 3218
		if ((level = brightness_get(NULL)) < 0)
			return level;
3219 3220 3221 3222 3223 3224 3225 3226 3227 3228 3229 3230
		level &= 7;

		if (strlencmp(cmd, "up") == 0) {
			new_level = level == 7 ? 7 : level + 1;
		} else if (strlencmp(cmd, "down") == 0) {
			new_level = level == 0 ? 0 : level - 1;
		} else if (sscanf(cmd, "level %d", &new_level) == 1 &&
			   new_level >= 0 && new_level <= 7) {
			/* new_level set */
		} else
			return -EINVAL;

3231
		brightness_set(new_level);
3232 3233 3234 3235 3236
	}

	return 0;
}

3237 3238 3239 3240 3241 3242 3243
static struct ibm_struct brightness_driver_data = {
	.name = "brightness",
	.read = brightness_read,
	.write = brightness_write,
	.exit = brightness_exit,
};

3244 3245 3246
/*************************************************************************
 * Volume subdriver
 */
3247

3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293
static int volume_read(char *p)
{
	int len = 0;
	u8 level;

	if (!acpi_ec_read(volume_offset, &level)) {
		len += sprintf(p + len, "level:\t\tunreadable\n");
	} else {
		len += sprintf(p + len, "level:\t\t%d\n", level & 0xf);
		len += sprintf(p + len, "mute:\t\t%s\n", onoff(level, 6));
		len += sprintf(p + len, "commands:\tup, down, mute\n");
		len += sprintf(p + len, "commands:\tlevel <level>"
			       " (<level> is 0-15)\n");
	}

	return len;
}

static int volume_write(char *buf)
{
	int cmos_cmd, inc, i;
	u8 level, mute;
	int new_level, new_mute;
	char *cmd;

	while ((cmd = next_cmd(&buf))) {
		if (!acpi_ec_read(volume_offset, &level))
			return -EIO;
		new_mute = mute = level & 0x40;
		new_level = level = level & 0xf;

		if (strlencmp(cmd, "up") == 0) {
			if (mute)
				new_mute = 0;
			else
				new_level = level == 15 ? 15 : level + 1;
		} else if (strlencmp(cmd, "down") == 0) {
			if (mute)
				new_mute = 0;
			else
				new_level = level == 0 ? 0 : level - 1;
		} else if (sscanf(cmd, "level %d", &new_level) == 1 &&
			   new_level >= 0 && new_level <= 15) {
			/* new_level set */
		} else if (strlencmp(cmd, "mute") == 0) {
			new_mute = 0x40;
L
Linus Torvalds 已提交
3294 3295 3296
		} else
			return -EINVAL;

3297
		if (new_level != level) {	/* mute doesn't change */
3298
			cmos_cmd = new_level > level ? TP_CMOS_VOLUME_UP : TP_CMOS_VOLUME_DOWN;
3299 3300
			inc = new_level > level ? 1 : -1;

3301
			if (mute && (issue_thinkpad_cmos_command(cmos_cmd) ||
3302 3303 3304 3305
				     !acpi_ec_write(volume_offset, level)))
				return -EIO;

			for (i = level; i != new_level; i += inc)
3306
				if (issue_thinkpad_cmos_command(cmos_cmd) ||
3307 3308 3309
				    !acpi_ec_write(volume_offset, i + inc))
					return -EIO;

3310
			if (mute && (issue_thinkpad_cmos_command(TP_CMOS_VOLUME_MUTE) ||
3311 3312 3313 3314 3315 3316
				     !acpi_ec_write(volume_offset,
						    new_level + mute)))
				return -EIO;
		}

		if (new_mute != mute) {	/* level doesn't change */
3317
			cmos_cmd = new_mute ? TP_CMOS_VOLUME_MUTE : TP_CMOS_VOLUME_UP;
3318

3319
			if (issue_thinkpad_cmos_command(cmos_cmd) ||
3320 3321 3322 3323 3324 3325 3326 3327
			    !acpi_ec_write(volume_offset, level + new_mute))
				return -EIO;
		}
	}

	return 0;
}

3328 3329 3330 3331 3332
static struct ibm_struct volume_driver_data = {
	.name = "volume",
	.read = volume_read,
	.write = volume_write,
};
3333 3334 3335 3336 3337 3338 3339 3340

/*************************************************************************
 * Fan subdriver
 */

/*
 * FAN ACCESS MODES
 *
3341
 * TPACPI_FAN_RD_ACPI_GFAN:
3342 3343
 * 	ACPI GFAN method: returns fan level
 *
3344
 * 	see TPACPI_FAN_WR_ACPI_SFAN
3345
 * 	EC 0x2f (HFSP) not available if GFAN exists
3346
 *
3347
 * TPACPI_FAN_WR_ACPI_SFAN:
3348 3349
 * 	ACPI SFAN method: sets fan level, 0 (stop) to 7 (max)
 *
3350 3351
 * 	EC 0x2f (HFSP) might be available *for reading*, but do not use
 * 	it for writing.
3352
 *
3353
 * TPACPI_FAN_WR_TPEC:
3354 3355
 * 	ThinkPad EC register 0x2f (HFSP): fan control loop mode
 * 	Supported on almost all ThinkPads
3356 3357 3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368
 *
 * 	Fan speed changes of any sort (including those caused by the
 * 	disengaged mode) are usually done slowly by the firmware as the
 * 	maximum ammount of fan duty cycle change per second seems to be
 * 	limited.
 *
 * 	Reading is not available if GFAN exists.
 * 	Writing is not available if SFAN exists.
 *
 * 	Bits
 *	 7	automatic mode engaged;
 *  		(default operation mode of the ThinkPad)
 * 		fan level is ignored in this mode.
3369
 *	 6	full speed mode (takes precedence over bit 7);
3370
 *		not available on all thinkpads.  May disable
3371 3372 3373 3374 3375
 *		the tachometer while the fan controller ramps up
 *		the speed (which can take up to a few *minutes*).
 *		Speeds up fan to 100% duty-cycle, which is far above
 *		the standard RPM levels.  It is not impossible that
 *		it could cause hardware damage.
3376 3377 3378 3379 3380 3381 3382
 *	5-3	unused in some models.  Extra bits for fan level
 *		in others, but still useless as all values above
 *		7 map to the same speed as level 7 in these models.
 *	2-0	fan level (0..7 usually)
 *			0x00 = stop
 * 			0x07 = max (set when temperatures critical)
 * 		Some ThinkPads may have other levels, see
3383
 * 		TPACPI_FAN_WR_ACPI_FANS (X31/X40/X41)
3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410
 *
 *	FIRMWARE BUG: on some models, EC 0x2f might not be initialized at
 *	boot. Apparently the EC does not intialize it, so unless ACPI DSDT
 *	does so, its initial value is meaningless (0x07).
 *
 *	For firmware bugs, refer to:
 *	http://thinkwiki.org/wiki/Embedded_Controller_Firmware#Firmware_Issues
 *
 * 	----
 *
 *	ThinkPad EC register 0x84 (LSB), 0x85 (MSB):
 *	Main fan tachometer reading (in RPM)
 *
 *	This register is present on all ThinkPads with a new-style EC, and
 *	it is known not to be present on the A21m/e, and T22, as there is
 *	something else in offset 0x84 according to the ACPI DSDT.  Other
 *	ThinkPads from this same time period (and earlier) probably lack the
 *	tachometer as well.
 *
 *	Unfortunately a lot of ThinkPads with new-style ECs but whose firwmare
 *	was never fixed by IBM to report the EC firmware version string
 *	probably support the tachometer (like the early X models), so
 *	detecting it is quite hard.  We need more data to know for sure.
 *
 *	FIRMWARE BUG: always read 0x84 first, otherwise incorrect readings
 *	might result.
 *
3411 3412
 *	FIRMWARE BUG: may go stale while the EC is switching to full speed
 *	mode.
3413 3414 3415 3416
 *
 *	For firmware bugs, refer to:
 *	http://thinkwiki.org/wiki/Embedded_Controller_Firmware#Firmware_Issues
 *
3417
 * TPACPI_FAN_WR_ACPI_FANS:
3418 3419 3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433
 *	ThinkPad X31, X40, X41.  Not available in the X60.
 *
 *	FANS ACPI handle: takes three arguments: low speed, medium speed,
 *	high speed.  ACPI DSDT seems to map these three speeds to levels
 *	as follows: STOP LOW LOW MED MED HIGH HIGH HIGH HIGH
 *	(this map is stored on FAN0..FAN8 as "0,1,1,2,2,3,3,3,3")
 *
 * 	The speeds are stored on handles
 * 	(FANA:FAN9), (FANC:FANB), (FANE:FAND).
 *
 * 	There are three default speed sets, acessible as handles:
 * 	FS1L,FS1M,FS1H; FS2L,FS2M,FS2H; FS3L,FS3M,FS3H
 *
 * 	ACPI DSDT switches which set is in use depending on various
 * 	factors.
 *
3434
 * 	TPACPI_FAN_WR_TPEC is also available and should be used to
3435 3436 3437 3438
 * 	command the fan.  The X31/X40/X41 seems to have 8 fan levels,
 * 	but the ACPI tables just mention level 7.
 */

3439 3440 3441
static enum fan_status_access_mode fan_status_access_mode;
static enum fan_control_access_mode fan_control_access_mode;
static enum fan_control_commands fan_control_commands;
3442

3443
static u8 fan_control_initial_status;
3444
static u8 fan_control_desired_level;
3445

3446
static void fan_watchdog_fire(struct work_struct *ignored);
3447
static int fan_watchdog_maxinterval;
3448
static DECLARE_DELAYED_WORK(fan_watchdog_task, fan_watchdog_fire);
3449

3450 3451 3452 3453 3454 3455 3456 3457
IBM_HANDLE(fans, ec, "FANS");	/* X31, X40, X41 */
IBM_HANDLE(gfan, ec, "GFAN",	/* 570 */
	   "\\FSPD",		/* 600e/x, 770e, 770x */
	   );			/* all others */
IBM_HANDLE(sfan, ec, "SFAN",	/* 570 */
	   "JFNS",		/* 770x-JL */
	   );			/* all others */

3458 3459 3460 3461 3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522 3523 3524 3525 3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538
/*
 * SYSFS fan layout: hwmon compatible (device)
 *
 * pwm*_enable:
 * 	0: "disengaged" mode
 * 	1: manual mode
 * 	2: native EC "auto" mode (recommended, hardware default)
 *
 * pwm*: set speed in manual mode, ignored otherwise.
 * 	0 is level 0; 255 is level 7. Intermediate points done with linear
 * 	interpolation.
 *
 * fan*_input: tachometer reading, RPM
 *
 *
 * SYSFS fan layout: extensions
 *
 * fan_watchdog (driver):
 * 	fan watchdog interval in seconds, 0 disables (default), max 120
 */

/* sysfs fan pwm1_enable ----------------------------------------------- */
static ssize_t fan_pwm1_enable_show(struct device *dev,
				    struct device_attribute *attr,
				    char *buf)
{
	int res, mode;
	u8 status;

	res = fan_get_status_safe(&status);
	if (res)
		return res;

	if (unlikely(tp_features.fan_ctrl_status_undef)) {
		if (status != fan_control_initial_status) {
			tp_features.fan_ctrl_status_undef = 0;
		} else {
			/* Return most likely status. In fact, it
			 * might be the only possible status */
			status = TP_EC_FAN_AUTO;
		}
	}

	if (status & TP_EC_FAN_FULLSPEED) {
		mode = 0;
	} else if (status & TP_EC_FAN_AUTO) {
		mode = 2;
	} else
		mode = 1;

	return snprintf(buf, PAGE_SIZE, "%d\n", mode);
}

static ssize_t fan_pwm1_enable_store(struct device *dev,
				     struct device_attribute *attr,
				     const char *buf, size_t count)
{
	unsigned long t;
	int res, level;

	if (parse_strtoul(buf, 2, &t))
		return -EINVAL;

	switch (t) {
	case 0:
		level = TP_EC_FAN_FULLSPEED;
		break;
	case 1:
		level = TPACPI_FAN_LAST_LEVEL;
		break;
	case 2:
		level = TP_EC_FAN_AUTO;
		break;
	case 3:
		/* reserved for software-controlled auto mode */
		return -ENOSYS;
	default:
		return -EINVAL;
	}

	res = fan_set_level_safe(level);
3539 3540 3541
	if (res == -ENXIO)
		return -EINVAL;
	else if (res < 0)
3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554 3555 3556 3557 3558 3559 3560 3561 3562 3563 3564 3565 3566 3567 3568 3569 3570 3571 3572 3573 3574 3575 3576 3577 3578 3579 3580 3581 3582 3583 3584 3585 3586 3587 3588 3589 3590 3591 3592 3593 3594 3595 3596 3597 3598 3599 3600 3601 3602 3603 3604
		return res;

	fan_watchdog_reset();

	return count;
}

static struct device_attribute dev_attr_fan_pwm1_enable =
	__ATTR(pwm1_enable, S_IWUSR | S_IRUGO,
		fan_pwm1_enable_show, fan_pwm1_enable_store);

/* sysfs fan pwm1 ------------------------------------------------------ */
static ssize_t fan_pwm1_show(struct device *dev,
			     struct device_attribute *attr,
			     char *buf)
{
	int res;
	u8 status;

	res = fan_get_status_safe(&status);
	if (res)
		return res;

	if (unlikely(tp_features.fan_ctrl_status_undef)) {
		if (status != fan_control_initial_status) {
			tp_features.fan_ctrl_status_undef = 0;
		} else {
			status = TP_EC_FAN_AUTO;
		}
	}

	if ((status &
	     (TP_EC_FAN_AUTO | TP_EC_FAN_FULLSPEED)) != 0)
		status = fan_control_desired_level;

	if (status > 7)
		status = 7;

	return snprintf(buf, PAGE_SIZE, "%u\n", (status * 255) / 7);
}

static ssize_t fan_pwm1_store(struct device *dev,
			      struct device_attribute *attr,
			      const char *buf, size_t count)
{
	unsigned long s;
	int rc;
	u8 status, newlevel;

	if (parse_strtoul(buf, 255, &s))
		return -EINVAL;

	/* scale down from 0-255 to 0-7 */
	newlevel = (s >> 5) & 0x07;

	rc = mutex_lock_interruptible(&fan_mutex);
	if (rc < 0)
		return rc;

	rc = fan_get_status(&status);
	if (!rc && (status &
		    (TP_EC_FAN_AUTO | TP_EC_FAN_FULLSPEED)) == 0) {
		rc = fan_set_level(newlevel);
3605 3606 3607
		if (rc == -ENXIO)
			rc = -EINVAL;
		else if (!rc) {
3608
			fan_update_desired_level(newlevel);
3609 3610
			fan_watchdog_reset();
		}
3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634 3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654
	}

	mutex_unlock(&fan_mutex);
	return (rc)? rc : count;
}

static struct device_attribute dev_attr_fan_pwm1 =
	__ATTR(pwm1, S_IWUSR | S_IRUGO,
		fan_pwm1_show, fan_pwm1_store);

/* sysfs fan fan1_input ------------------------------------------------ */
static ssize_t fan_fan1_input_show(struct device *dev,
			   struct device_attribute *attr,
			   char *buf)
{
	int res;
	unsigned int speed;

	res = fan_get_speed(&speed);
	if (res < 0)
		return res;

	return snprintf(buf, PAGE_SIZE, "%u\n", speed);
}

static struct device_attribute dev_attr_fan_fan1_input =
	__ATTR(fan1_input, S_IRUGO,
		fan_fan1_input_show, NULL);

/* sysfs fan fan_watchdog (driver) ------------------------------------- */
static ssize_t fan_fan_watchdog_show(struct device_driver *drv,
				     char *buf)
{
	return snprintf(buf, PAGE_SIZE, "%u\n", fan_watchdog_maxinterval);
}

static ssize_t fan_fan_watchdog_store(struct device_driver *drv,
				      const char *buf, size_t count)
{
	unsigned long t;

	if (parse_strtoul(buf, 120, &t))
		return -EINVAL;

3655 3656 3657
	if (!fan_control_allowed)
		return -EPERM;

3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673 3674 3675 3676 3677
	fan_watchdog_maxinterval = t;
	fan_watchdog_reset();

	return count;
}

static DRIVER_ATTR(fan_watchdog, S_IWUSR | S_IRUGO,
		fan_fan_watchdog_show, fan_fan_watchdog_store);

/* --------------------------------------------------------------------- */
static struct attribute *fan_attributes[] = {
	&dev_attr_fan_pwm1_enable.attr, &dev_attr_fan_pwm1.attr,
	&dev_attr_fan_fan1_input.attr,
	NULL
};

static const struct attribute_group fan_attr_group = {
	.attrs = fan_attributes,
};

3678
static int __init fan_init(struct ibm_init_struct *iibm)
3679
{
3680 3681
	int rc;

3682 3683
	vdbg_printk(TPACPI_DBG_INIT, "initializing fan subdriver\n");

3684
	mutex_init(&fan_mutex);
3685 3686
	fan_status_access_mode = TPACPI_FAN_NONE;
	fan_control_access_mode = TPACPI_FAN_WR_NONE;
3687
	fan_control_commands = 0;
3688
	fan_watchdog_maxinterval = 0;
3689
	tp_features.fan_ctrl_status_undef = 0;
3690
	fan_control_desired_level = 7;
3691

3692 3693 3694
	IBM_ACPIHANDLE_INIT(fans);
	IBM_ACPIHANDLE_INIT(gfan);
	IBM_ACPIHANDLE_INIT(sfan);
3695

3696 3697
	if (gfan_handle) {
		/* 570, 600e/x, 770e, 770x */
3698
		fan_status_access_mode = TPACPI_FAN_RD_ACPI_GFAN;
3699 3700 3701
	} else {
		/* all other ThinkPads: note that even old-style
		 * ThinkPad ECs supports the fan control register */
3702 3703
		if (likely(acpi_ec_read(fan_status_offset,
					&fan_control_initial_status))) {
3704
			fan_status_access_mode = TPACPI_FAN_RD_TPEC;
3705 3706 3707 3708 3709 3710 3711 3712 3713

			/* In some ThinkPads, neither the EC nor the ACPI
			 * DSDT initialize the fan status, and it ends up
			 * being set to 0x07 when it *could* be either
			 * 0x07 or 0x80.
			 *
			 * Enable for TP-1Y (T43), TP-78 (R51e),
			 * TP-76 (R52), TP-70 (T43, R52), which are known
			 * to be buggy. */
3714 3715 3716 3717 3718 3719 3720 3721 3722 3723 3724 3725 3726
			if (fan_control_initial_status == 0x07) {
				switch (thinkpad_id.ec_model) {
				case 0x5931: /* TP-1Y */
				case 0x3837: /* TP-78 */
				case 0x3637: /* TP-76 */
				case 0x3037: /* TP-70 */
					printk(IBM_NOTICE
					       "fan_init: initial fan status is "
					       "unknown, assuming it is in auto "
					       "mode\n");
					tp_features.fan_ctrl_status_undef = 1;
					;;
				}
3727
			}
3728 3729 3730 3731
		} else {
			printk(IBM_ERR
			       "ThinkPad ACPI EC access misbehaving, "
			       "fan status and control unavailable\n");
3732
			return 1;
3733 3734
		}
	}
3735

3736 3737
	if (sfan_handle) {
		/* 570, 770x-JL */
3738
		fan_control_access_mode = TPACPI_FAN_WR_ACPI_SFAN;
3739
		fan_control_commands |=
3740
		    TPACPI_FAN_CMD_LEVEL | TPACPI_FAN_CMD_ENABLE;
3741
	} else {
3742 3743 3744 3745 3746
		if (!gfan_handle) {
			/* gfan without sfan means no fan control */
			/* all other models implement TP EC 0x2f control */

			if (fans_handle) {
3747
				/* X31, X40, X41 */
3748
				fan_control_access_mode =
3749
				    TPACPI_FAN_WR_ACPI_FANS;
3750
				fan_control_commands |=
3751 3752 3753
				    TPACPI_FAN_CMD_SPEED |
				    TPACPI_FAN_CMD_LEVEL |
				    TPACPI_FAN_CMD_ENABLE;
3754
			} else {
3755
				fan_control_access_mode = TPACPI_FAN_WR_TPEC;
3756
				fan_control_commands |=
3757 3758
				    TPACPI_FAN_CMD_LEVEL |
				    TPACPI_FAN_CMD_ENABLE;
3759 3760 3761 3762
			}
		}
	}

3763 3764 3765 3766 3767
	vdbg_printk(TPACPI_DBG_INIT, "fan is %s, modes %d, %d\n",
		str_supported(fan_status_access_mode != TPACPI_FAN_NONE ||
		  fan_control_access_mode != TPACPI_FAN_WR_NONE),
		fan_status_access_mode, fan_control_access_mode);

3768 3769 3770 3771 3772 3773 3774 3775
	/* fan control master switch */
	if (!fan_control_allowed) {
		fan_control_access_mode = TPACPI_FAN_WR_NONE;
		fan_control_commands = 0;
		dbg_printk(TPACPI_DBG_INIT,
			   "fan control features disabled by parameter\n");
	}

3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805
	/* update fan_control_desired_level */
	if (fan_status_access_mode != TPACPI_FAN_NONE)
		fan_get_status_safe(NULL);

	if (fan_status_access_mode != TPACPI_FAN_NONE ||
	    fan_control_access_mode != TPACPI_FAN_WR_NONE) {
		rc = sysfs_create_group(&tpacpi_pdev->dev.kobj,
					 &fan_attr_group);
		if (!(rc < 0))
			rc = driver_create_file(&tpacpi_pdriver.driver,
					&driver_attr_fan_watchdog);
		if (rc < 0)
			return rc;
		return 0;
	} else
		return 1;
}

/*
 * Call with fan_mutex held
 */
static void fan_update_desired_level(u8 status)
{
	if ((status &
	     (TP_EC_FAN_AUTO | TP_EC_FAN_FULLSPEED)) == 0) {
		if (status > 7)
			fan_control_desired_level = 7;
		else
			fan_control_desired_level = status;
	}
3806
}
3807

3808
static int fan_get_status(u8 *status)
3809
{
3810
	u8 s;
3811

3812
	/* TODO:
3813
	 * Add TPACPI_FAN_RD_ACPI_FANS ? */
3814

3815
	switch (fan_status_access_mode) {
3816
	case TPACPI_FAN_RD_ACPI_GFAN:
3817
		/* 570, 600e/x, 770e, 770x */
3818 3819

		if (unlikely(!acpi_evalf(gfan_handle, &s, NULL, "d")))
L
Linus Torvalds 已提交
3820
			return -EIO;
3821

3822 3823
		if (likely(status))
			*status = s & 0x07;
3824 3825 3826

		break;

3827
	case TPACPI_FAN_RD_TPEC:
3828
		/* all except 570, 600e/x, 770e, 770x */
3829
		if (unlikely(!acpi_ec_read(fan_status_offset, &s)))
3830
			return -EIO;
3831

3832 3833 3834 3835 3836 3837 3838
		if (likely(status))
			*status = s;

		break;

	default:
		return -ENXIO;
3839 3840
	}

3841 3842 3843
	return 0;
}

3844 3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862
static int fan_get_status_safe(u8 *status)
{
	int rc;
	u8 s;

	rc = mutex_lock_interruptible(&fan_mutex);
	if (rc < 0)
		return rc;
	rc = fan_get_status(&s);
	if (!rc)
		fan_update_desired_level(s);
	mutex_unlock(&fan_mutex);

	if (status)
		*status = s;

	return rc;
}

3863 3864
static void fan_exit(void)
{
3865
	vdbg_printk(TPACPI_DBG_EXIT, "cancelling any pending fan watchdog tasks\n");
3866 3867 3868 3869 3870

	/* FIXME: can we really do this unconditionally? */
	sysfs_remove_group(&tpacpi_pdev->dev.kobj, &fan_attr_group);
	driver_remove_file(&tpacpi_pdriver.driver, &driver_attr_fan_watchdog);

3871 3872 3873 3874
	cancel_delayed_work(&fan_watchdog_task);
	flush_scheduled_work();
}

3875 3876 3877 3878 3879
static int fan_get_speed(unsigned int *speed)
{
	u8 hi, lo;

	switch (fan_status_access_mode) {
3880
	case TPACPI_FAN_RD_TPEC:
3881
		/* all except 570, 600e/x, 770e, 770x */
3882 3883 3884 3885
		if (unlikely(!acpi_ec_read(fan_rpm_offset, &lo) ||
			     !acpi_ec_read(fan_rpm_offset + 1, &hi)))
			return -EIO;

3886 3887 3888 3889 3890 3891 3892 3893 3894 3895 3896 3897
		if (likely(speed))
			*speed = (hi << 8) | lo;

		break;

	default:
		return -ENXIO;
	}

	return 0;
}

3898
static void fan_watchdog_fire(struct work_struct *ignored)
3899
{
3900 3901
	int rc;

3902
	printk(IBM_NOTICE "fan watchdog: enabling fan\n");
3903 3904 3905 3906
	rc = fan_set_enable();
	if (rc < 0) {
		printk(IBM_ERR "fan watchdog: error %d while enabling fan, "
			"will try again later...\n", -rc);
3907 3908 3909
		/* reschedule for later */
		fan_watchdog_reset();
	}
3910 3911 3912 3913
}

static void fan_watchdog_reset(void)
{
3914
	static int fan_watchdog_active;
3915

3916 3917 3918
	if (fan_control_access_mode == TPACPI_FAN_WR_NONE)
		return;

3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929 3930 3931 3932 3933
	if (fan_watchdog_active)
		cancel_delayed_work(&fan_watchdog_task);

	if (fan_watchdog_maxinterval > 0) {
		fan_watchdog_active = 1;
		if (!schedule_delayed_work(&fan_watchdog_task,
				msecs_to_jiffies(fan_watchdog_maxinterval
						 * 1000))) {
			printk(IBM_ERR "failed to schedule the fan watchdog, "
			       "watchdog will not trigger\n");
		}
	} else
		fan_watchdog_active = 0;
}

3934
static int fan_set_level(int level)
3935
{
3936 3937 3938
	if (!fan_control_allowed)
		return -EPERM;

3939
	switch (fan_control_access_mode) {
3940
	case TPACPI_FAN_WR_ACPI_SFAN:
3941
		if (level >= 0 && level <= 7) {
3942
			if (!acpi_evalf(sfan_handle, NULL, NULL, "vd", level))
3943
				return -EIO;
3944 3945 3946 3947
		} else
			return -EINVAL;
		break;

3948 3949 3950 3951
	case TPACPI_FAN_WR_ACPI_FANS:
	case TPACPI_FAN_WR_TPEC:
		if ((level != TP_EC_FAN_AUTO) &&
		    (level != TP_EC_FAN_FULLSPEED) &&
3952 3953 3954
		    ((level < 0) || (level > 7)))
			return -EINVAL;

3955 3956 3957 3958 3959 3960 3961
		/* safety net should the EC not support AUTO
		 * or FULLSPEED mode bits and just ignore them */
		if (level & TP_EC_FAN_FULLSPEED)
			level |= 7;	/* safety min speed 7 */
		else if (level & TP_EC_FAN_FULLSPEED)
			level |= 4;	/* safety min speed 4 */

3962
		if (!acpi_ec_write(fan_status_offset, level))
3963
			return -EIO;
3964
		else
3965
			tp_features.fan_ctrl_status_undef = 0;
3966 3967
		break;

3968 3969 3970 3971 3972 3973
	default:
		return -ENXIO;
	}
	return 0;
}

3974 3975 3976 3977
static int fan_set_level_safe(int level)
{
	int rc;

3978 3979 3980
	if (!fan_control_allowed)
		return -EPERM;

3981 3982 3983 3984 3985 3986 3987 3988 3989 3990 3991 3992 3993 3994 3995
	rc = mutex_lock_interruptible(&fan_mutex);
	if (rc < 0)
		return rc;

	if (level == TPACPI_FAN_LAST_LEVEL)
		level = fan_control_desired_level;

	rc = fan_set_level(level);
	if (!rc)
		fan_update_desired_level(level);

	mutex_unlock(&fan_mutex);
	return rc;
}

3996 3997
static int fan_set_enable(void)
{
3998 3999 4000
	u8 s;
	int rc;

4001 4002 4003
	if (!fan_control_allowed)
		return -EPERM;

4004 4005 4006 4007
	rc = mutex_lock_interruptible(&fan_mutex);
	if (rc < 0)
		return rc;

4008
	switch (fan_control_access_mode) {
4009 4010
	case TPACPI_FAN_WR_ACPI_FANS:
	case TPACPI_FAN_WR_TPEC:
4011 4012 4013
		rc = fan_get_status(&s);
		if (rc < 0)
			break;
4014 4015

		/* Don't go out of emergency fan mode */
4016 4017 4018 4019
		if (s != 7) {
			s &= 0x07;
			s |= TP_EC_FAN_AUTO | 4; /* min fan speed 4 */
		}
4020 4021

		if (!acpi_ec_write(fan_status_offset, s))
4022 4023
			rc = -EIO;
		else {
4024
			tp_features.fan_ctrl_status_undef = 0;
4025 4026
			rc = 0;
		}
4027 4028
		break;

4029
	case TPACPI_FAN_WR_ACPI_SFAN:
4030 4031 4032
		rc = fan_get_status(&s);
		if (rc < 0)
			break;
4033 4034 4035 4036

		s &= 0x07;

		/* Set fan to at least level 4 */
4037
		s |= 4;
4038 4039

		if (!acpi_evalf(sfan_handle, NULL, NULL, "vd", s))
4040 4041 4042
			rc= -EIO;
		else
			rc = 0;
4043 4044 4045
		break;

	default:
4046
		rc = -ENXIO;
4047
	}
4048 4049 4050

	mutex_unlock(&fan_mutex);
	return rc;
4051 4052 4053 4054
}

static int fan_set_disable(void)
{
4055 4056
	int rc;

4057 4058 4059
	if (!fan_control_allowed)
		return -EPERM;

4060 4061 4062 4063 4064
	rc = mutex_lock_interruptible(&fan_mutex);
	if (rc < 0)
		return rc;

	rc = 0;
4065
	switch (fan_control_access_mode) {
4066 4067
	case TPACPI_FAN_WR_ACPI_FANS:
	case TPACPI_FAN_WR_TPEC:
4068
		if (!acpi_ec_write(fan_status_offset, 0x00))
4069
			rc = -EIO;
4070 4071
		else {
			fan_control_desired_level = 0;
4072
			tp_features.fan_ctrl_status_undef = 0;
4073
		}
4074 4075
		break;

4076
	case TPACPI_FAN_WR_ACPI_SFAN:
4077
		if (!acpi_evalf(sfan_handle, NULL, NULL, "vd", 0x00))
4078
			rc = -EIO;
4079 4080
		else
			fan_control_desired_level = 0;
4081 4082
		break;

4083
	default:
4084
		rc = -ENXIO;
4085
	}
4086

4087

4088 4089
	mutex_unlock(&fan_mutex);
	return rc;
4090 4091 4092 4093
}

static int fan_set_speed(int speed)
{
4094 4095
	int rc;

4096 4097 4098
	if (!fan_control_allowed)
		return -EPERM;

4099 4100 4101 4102 4103
	rc = mutex_lock_interruptible(&fan_mutex);
	if (rc < 0)
		return rc;

	rc = 0;
4104
	switch (fan_control_access_mode) {
4105
	case TPACPI_FAN_WR_ACPI_FANS:
4106 4107 4108
		if (speed >= 0 && speed <= 65535) {
			if (!acpi_evalf(fans_handle, NULL, NULL, "vddd",
					speed, speed, speed))
4109
				rc = -EIO;
4110
		} else
4111
			rc = -EINVAL;
4112 4113 4114
		break;

	default:
4115
		rc = -ENXIO;
4116
	}
4117 4118 4119

	mutex_unlock(&fan_mutex);
	return rc;
4120 4121 4122 4123 4124 4125 4126 4127 4128 4129
}

static int fan_read(char *p)
{
	int len = 0;
	int rc;
	u8 status;
	unsigned int speed = 0;

	switch (fan_status_access_mode) {
4130
	case TPACPI_FAN_RD_ACPI_GFAN:
4131
		/* 570, 600e/x, 770e, 770x */
4132
		if ((rc = fan_get_status_safe(&status)) < 0)
4133 4134 4135 4136 4137 4138 4139
			return rc;

		len += sprintf(p + len, "status:\t\t%s\n"
			       "level:\t\t%d\n",
			       (status != 0) ? "enabled" : "disabled", status);
		break;

4140
	case TPACPI_FAN_RD_TPEC:
4141
		/* all except 570, 600e/x, 770e, 770x */
4142
		if ((rc = fan_get_status_safe(&status)) < 0)
4143 4144
			return rc;

4145
		if (unlikely(tp_features.fan_ctrl_status_undef)) {
4146
			if (status != fan_control_initial_status)
4147
				tp_features.fan_ctrl_status_undef = 0;
4148 4149 4150
			else
				/* Return most likely status. In fact, it
				 * might be the only possible status */
4151
				status = TP_EC_FAN_AUTO;
4152 4153 4154 4155 4156 4157 4158 4159 4160 4161
		}

		len += sprintf(p + len, "status:\t\t%s\n",
			       (status != 0) ? "enabled" : "disabled");

		if ((rc = fan_get_speed(&speed)) < 0)
			return rc;

		len += sprintf(p + len, "speed:\t\t%d\n", speed);

4162
		if (status & TP_EC_FAN_FULLSPEED)
4163 4164
			/* Disengaged mode takes precedence */
			len += sprintf(p + len, "level:\t\tdisengaged\n");
4165
		else if (status & TP_EC_FAN_AUTO)
4166 4167 4168 4169 4170
			len += sprintf(p + len, "level:\t\tauto\n");
		else
			len += sprintf(p + len, "level:\t\t%d\n", status);
		break;

4171
	case TPACPI_FAN_NONE:
4172 4173 4174 4175
	default:
		len += sprintf(p + len, "status:\t\tnot supported\n");
	}

4176
	if (fan_control_commands & TPACPI_FAN_CMD_LEVEL) {
4177 4178 4179
		len += sprintf(p + len, "commands:\tlevel <level>");

		switch (fan_control_access_mode) {
4180
		case TPACPI_FAN_WR_ACPI_SFAN:
4181 4182 4183 4184 4185
			len += sprintf(p + len, " (<level> is 0-7)\n");
			break;

		default:
			len += sprintf(p + len, " (<level> is 0-7, "
4186
				       "auto, disengaged, full-speed)\n");
4187 4188 4189
			break;
		}
	}
4190

4191
	if (fan_control_commands & TPACPI_FAN_CMD_ENABLE)
4192 4193 4194
		len += sprintf(p + len, "commands:\tenable, disable\n"
			       "commands:\twatchdog <timeout> (<timeout> is 0 (off), "
			       "1-120 (seconds))\n");
L
Linus Torvalds 已提交
4195

4196
	if (fan_control_commands & TPACPI_FAN_CMD_SPEED)
4197 4198 4199 4200
		len += sprintf(p + len, "commands:\tspeed <speed>"
			       " (<speed> is 0-65535)\n");

	return len;
4201 4202
}

4203 4204 4205 4206
static int fan_write_cmd_level(const char *cmd, int *rc)
{
	int level;

4207
	if (strlencmp(cmd, "level auto") == 0)
4208
		level = TP_EC_FAN_AUTO;
4209 4210
	else if ((strlencmp(cmd, "level disengaged") == 0) |
	         (strlencmp(cmd, "level full-speed") == 0))
4211
		level = TP_EC_FAN_FULLSPEED;
4212
	else if (sscanf(cmd, "level %d", &level) != 1)
4213 4214
		return 0;

4215
	if ((*rc = fan_set_level_safe(level)) == -ENXIO)
4216 4217 4218 4219 4220 4221 4222 4223 4224 4225 4226 4227 4228 4229 4230 4231 4232 4233 4234 4235 4236 4237 4238 4239 4240 4241 4242 4243 4244 4245 4246 4247 4248 4249
		printk(IBM_ERR "level command accepted for unsupported "
		       "access mode %d", fan_control_access_mode);

	return 1;
}

static int fan_write_cmd_enable(const char *cmd, int *rc)
{
	if (strlencmp(cmd, "enable") != 0)
		return 0;

	if ((*rc = fan_set_enable()) == -ENXIO)
		printk(IBM_ERR "enable command accepted for unsupported "
		       "access mode %d", fan_control_access_mode);

	return 1;
}

static int fan_write_cmd_disable(const char *cmd, int *rc)
{
	if (strlencmp(cmd, "disable") != 0)
		return 0;

	if ((*rc = fan_set_disable()) == -ENXIO)
		printk(IBM_ERR "disable command accepted for unsupported "
		       "access mode %d", fan_control_access_mode);

	return 1;
}

static int fan_write_cmd_speed(const char *cmd, int *rc)
{
	int speed;

4250 4251 4252
	/* TODO:
	 * Support speed <low> <medium> <high> ? */

4253 4254 4255 4256 4257 4258 4259 4260 4261 4262
	if (sscanf(cmd, "speed %d", &speed) != 1)
		return 0;

	if ((*rc = fan_set_speed(speed)) == -ENXIO)
		printk(IBM_ERR "speed command accepted for unsupported "
		       "access mode %d", fan_control_access_mode);

	return 1;
}

4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273 4274 4275 4276 4277
static int fan_write_cmd_watchdog(const char *cmd, int *rc)
{
	int interval;

	if (sscanf(cmd, "watchdog %d", &interval) != 1)
		return 0;

	if (interval < 0 || interval > 120)
		*rc = -EINVAL;
	else
		fan_watchdog_maxinterval = interval;

	return 1;
}

4278 4279 4280 4281 4282 4283
static int fan_write(char *buf)
{
	char *cmd;
	int rc = 0;

	while (!rc && (cmd = next_cmd(&buf))) {
4284
		if (!((fan_control_commands & TPACPI_FAN_CMD_LEVEL) &&
4285
		      fan_write_cmd_level(cmd, &rc)) &&
4286
		    !((fan_control_commands & TPACPI_FAN_CMD_ENABLE) &&
4287
		      (fan_write_cmd_enable(cmd, &rc) ||
4288 4289
		       fan_write_cmd_disable(cmd, &rc) ||
		       fan_write_cmd_watchdog(cmd, &rc))) &&
4290
		    !((fan_control_commands & TPACPI_FAN_CMD_SPEED) &&
4291 4292 4293
		      fan_write_cmd_speed(cmd, &rc))
		    )
			rc = -EINVAL;
4294 4295
		else if (!rc)
			fan_watchdog_reset();
4296 4297 4298 4299 4300
	}

	return rc;
}

4301 4302 4303 4304 4305 4306 4307
static struct ibm_struct fan_driver_data = {
	.name = "fan",
	.read = fan_read,
	.write = fan_write,
	.exit = fan_exit,
};

4308 4309 4310 4311 4312 4313 4314 4315 4316
/****************************************************************************
 ****************************************************************************
 *
 * Infrastructure
 *
 ****************************************************************************
 ****************************************************************************/

/* /proc support */
4317
static struct proc_dir_entry *proc_dir;
4318

4319
/* Subdriver registry */
4320 4321
static LIST_HEAD(tpacpi_all_drivers);

L
Linus Torvalds 已提交
4322

4323 4324 4325
/*
 * Module and infrastructure proble, init and exit handling
 */
L
Linus Torvalds 已提交
4326

4327
#ifdef CONFIG_THINKPAD_ACPI_DEBUG
4328
static const char * __init str_supported(int is_supported)
4329
{
4330
	static char text_unsupported[] __initdata = "not supported";
4331

4332
	return (is_supported)? &text_unsupported[4] : &text_unsupported[0];
4333 4334 4335
}
#endif /* CONFIG_THINKPAD_ACPI_DEBUG */

4336
static int __init ibm_init(struct ibm_init_struct *iibm)
L
Linus Torvalds 已提交
4337 4338
{
	int ret;
4339
	struct ibm_struct *ibm = iibm->data;
L
Linus Torvalds 已提交
4340 4341
	struct proc_dir_entry *entry;

4342 4343 4344 4345
	BUG_ON(ibm == NULL);

	INIT_LIST_HEAD(&ibm->all_drivers);

4346
	if (ibm->flags.experimental && !experimental)
L
Linus Torvalds 已提交
4347 4348
		return 0;

4349 4350 4351
	dbg_printk(TPACPI_DBG_INIT,
		"probing for %s\n", ibm->name);

4352 4353
	if (iibm->init) {
		ret = iibm->init(iibm);
4354 4355 4356
		if (ret > 0)
			return 0;	/* probe failed */
		if (ret)
L
Linus Torvalds 已提交
4357
			return ret;
4358

4359
		ibm->flags.init_called = 1;
L
Linus Torvalds 已提交
4360 4361
	}

4362 4363 4364 4365 4366 4367
	if (ibm->acpi) {
		if (ibm->acpi->hid) {
			ret = register_tpacpi_subdriver(ibm);
			if (ret)
				goto err_out;
		}
4368

4369 4370 4371 4372 4373 4374 4375 4376 4377 4378
		if (ibm->acpi->notify) {
			ret = setup_acpi_notify(ibm);
			if (ret == -ENODEV) {
				printk(IBM_NOTICE "disabling subdriver %s\n",
					ibm->name);
				ret = 0;
				goto err_out;
			}
			if (ret < 0)
				goto err_out;
4379 4380 4381
		}
	}

4382 4383 4384
	dbg_printk(TPACPI_DBG_INIT,
		"%s installed\n", ibm->name);

4385 4386 4387 4388 4389 4390 4391
	if (ibm->read) {
		entry = create_proc_entry(ibm->name,
					  S_IFREG | S_IRUGO | S_IWUSR,
					  proc_dir);
		if (!entry) {
			printk(IBM_ERR "unable to create proc entry %s\n",
			       ibm->name);
4392 4393
			ret = -ENODEV;
			goto err_out;
4394 4395 4396
		}
		entry->owner = THIS_MODULE;
		entry->data = ibm;
4397
		entry->read_proc = &dispatch_procfs_read;
4398
		if (ibm->write)
4399
			entry->write_proc = &dispatch_procfs_write;
4400
		ibm->flags.proc_created = 1;
4401
	}
L
Linus Torvalds 已提交
4402

4403 4404
	list_add_tail(&ibm->all_drivers, &tpacpi_all_drivers);

L
Linus Torvalds 已提交
4405
	return 0;
4406 4407

err_out:
4408 4409 4410 4411
	dbg_printk(TPACPI_DBG_INIT,
		"%s: at error exit path with result %d\n",
		ibm->name, ret);

4412 4413
	ibm_exit(ibm);
	return (ret < 0)? ret : 0;
L
Linus Torvalds 已提交
4414 4415 4416 4417
}

static void ibm_exit(struct ibm_struct *ibm)
{
4418
	dbg_printk(TPACPI_DBG_EXIT, "removing %s\n", ibm->name);
4419 4420 4421

	list_del_init(&ibm->all_drivers);

4422
	if (ibm->flags.acpi_notify_installed) {
4423 4424
		dbg_printk(TPACPI_DBG_EXIT,
			"%s: acpi_remove_notify_handler\n", ibm->name);
4425 4426 4427 4428 4429 4430
		BUG_ON(!ibm->acpi);
		acpi_remove_notify_handler(*ibm->acpi->handle,
					   ibm->acpi->type,
					   dispatch_acpi_notify);
		ibm->flags.acpi_notify_installed = 0;
		ibm->flags.acpi_notify_installed = 0;
4431
	}
L
Linus Torvalds 已提交
4432

4433
	if (ibm->flags.proc_created) {
4434 4435
		dbg_printk(TPACPI_DBG_EXIT,
			"%s: remove_proc_entry\n", ibm->name);
L
Linus Torvalds 已提交
4436
		remove_proc_entry(ibm->name, proc_dir);
4437
		ibm->flags.proc_created = 0;
4438
	}
L
Linus Torvalds 已提交
4439

4440
	if (ibm->flags.acpi_driver_registered) {
4441 4442
		dbg_printk(TPACPI_DBG_EXIT,
			"%s: acpi_bus_unregister_driver\n", ibm->name);
4443 4444 4445 4446 4447
		BUG_ON(!ibm->acpi);
		acpi_bus_unregister_driver(ibm->acpi->driver);
		kfree(ibm->acpi->driver);
		ibm->acpi->driver = NULL;
		ibm->flags.acpi_driver_registered = 0;
4448 4449
	}

4450
	if (ibm->flags.init_called && ibm->exit) {
4451
		ibm->exit();
4452
		ibm->flags.init_called = 0;
L
Linus Torvalds 已提交
4453
	}
4454 4455

	dbg_printk(TPACPI_DBG_INIT, "finished removing %s\n", ibm->name);
L
Linus Torvalds 已提交
4456 4457
}

4458 4459
/* Probing */

4460
static void __init get_thinkpad_model_data(struct thinkpad_id_data *tp)
L
Linus Torvalds 已提交
4461
{
4462 4463
	struct dmi_device *dev = NULL;
	char ec_fw_string[18];
L
Linus Torvalds 已提交
4464

4465 4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483
	if (!tp)
		return;

	memset(tp, 0, sizeof(*tp));

	if (dmi_name_in_vendors("IBM"))
		tp->vendor = PCI_VENDOR_ID_IBM;
	else if (dmi_name_in_vendors("LENOVO"))
		tp->vendor = PCI_VENDOR_ID_LENOVO;
	else
		return;

	tp->bios_version_str = kstrdup(dmi_get_system_info(DMI_BIOS_VERSION),
					GFP_KERNEL);
	if (!tp->bios_version_str)
		return;
	tp->bios_model = tp->bios_version_str[0]
			 | (tp->bios_version_str[1] << 8);

4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496
	/*
	 * ThinkPad T23 or newer, A31 or newer, R50e or newer,
	 * X32 or newer, all Z series;  Some models must have an
	 * up-to-date BIOS or they will not be detected.
	 *
	 * See http://thinkwiki.org/wiki/List_of_DMI_IDs
	 */
	while ((dev = dmi_find_device(DMI_DEV_TYPE_OEM_STRING, NULL, dev))) {
		if (sscanf(dev->name,
			   "IBM ThinkPad Embedded Controller -[%17c",
			   ec_fw_string) == 1) {
			ec_fw_string[sizeof(ec_fw_string) - 1] = 0;
			ec_fw_string[strcspn(ec_fw_string, " ]")] = 0;
4497 4498 4499 4500 4501

			tp->ec_version_str = kstrdup(ec_fw_string, GFP_KERNEL);
			tp->ec_model = ec_fw_string[0]
					| (ec_fw_string[1] << 8);
			break;
4502
		}
L
Linus Torvalds 已提交
4503
	}
4504 4505 4506 4507 4508 4509 4510

	tp->model_str = kstrdup(dmi_get_system_info(DMI_PRODUCT_VERSION),
					GFP_KERNEL);
	if (strnicmp(tp->model_str, "ThinkPad", 8) != 0) {
		kfree(tp->model_str);
		tp->model_str = NULL;
	}
L
Linus Torvalds 已提交
4511 4512
}

4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523
static int __init probe_for_thinkpad(void)
{
	int is_thinkpad;

	if (acpi_disabled)
		return -ENODEV;

	/*
	 * Non-ancient models have better DMI tagging, but very old models
	 * don't.
	 */
4524
	is_thinkpad = (thinkpad_id.model_str != NULL);
4525 4526

	/* ec is required because many other handles are relative to it */
4527
	IBM_ACPIHANDLE_INIT(ec);
4528 4529 4530 4531 4532 4533 4534
	if (!ec_handle) {
		if (is_thinkpad)
			printk(IBM_ERR
				"Not yet supported ThinkPad detected!\n");
		return -ENODEV;
	}

4535 4536 4537 4538 4539
	/*
	 * Risks a regression on very old machines, but reduces potential
	 * false positives a damn great deal
	 */
	if (!is_thinkpad)
4540
		is_thinkpad = (thinkpad_id.vendor == PCI_VENDOR_ID_IBM);
4541 4542 4543 4544

	if (!is_thinkpad && !force_load)
		return -ENODEV;

4545 4546 4547 4548
	return 0;
}


4549
/* Module init, exit, parameters */
L
Linus Torvalds 已提交
4550

4551 4552 4553 4554 4555 4556 4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581
static struct ibm_init_struct ibms_init[] __initdata = {
	{
		.init = thinkpad_acpi_driver_init,
		.data = &thinkpad_acpi_driver_data,
	},
	{
		.init = hotkey_init,
		.data = &hotkey_driver_data,
	},
	{
		.init = bluetooth_init,
		.data = &bluetooth_driver_data,
	},
	{
		.init = wan_init,
		.data = &wan_driver_data,
	},
	{
		.init = video_init,
		.data = &video_driver_data,
	},
	{
		.init = light_init,
		.data = &light_driver_data,
	},
#ifdef CONFIG_THINKPAD_ACPI_DOCK
	{
		.init = dock_init,
		.data = &dock_driver_data[0],
	},
	{
4582
		.init = dock_init2,
4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621 4622 4623
		.data = &dock_driver_data[1],
	},
#endif
#ifdef CONFIG_THINKPAD_ACPI_BAY
	{
		.init = bay_init,
		.data = &bay_driver_data,
	},
#endif
	{
		.init = cmos_init,
		.data = &cmos_driver_data,
	},
	{
		.init = led_init,
		.data = &led_driver_data,
	},
	{
		.init = beep_init,
		.data = &beep_driver_data,
	},
	{
		.init = thermal_init,
		.data = &thermal_driver_data,
	},
	{
		.data = &ecdump_driver_data,
	},
	{
		.init = brightness_init,
		.data = &brightness_driver_data,
	},
	{
		.data = &volume_driver_data,
	},
	{
		.init = fan_init,
		.data = &fan_driver_data,
	},
};

4624
static int __init set_ibm_param(const char *val, struct kernel_param *kp)
L
Linus Torvalds 已提交
4625 4626
{
	unsigned int i;
4627
	struct ibm_struct *ibm;
L
Linus Torvalds 已提交
4628

4629 4630 4631 4632 4633 4634
	for (i = 0; i < ARRAY_SIZE(ibms_init); i++) {
		ibm = ibms_init[i].data;
		BUG_ON(ibm == NULL);

		if (strcmp(ibm->name, kp->name) == 0 && ibm->write) {
			if (strlen(val) > sizeof(ibms_init[i].param) - 2)
4635
				return -ENOSPC;
4636 4637
			strcpy(ibms_init[i].param, val);
			strcat(ibms_init[i].param, ",");
4638 4639
			return 0;
		}
4640
	}
L
Linus Torvalds 已提交
4641 4642 4643 4644

	return -EINVAL;
}

4645 4646 4647
static int experimental;
module_param(experimental, int, 0);

4648 4649 4650
static u32 dbg_level;
module_param_named(debug, dbg_level, uint, 0);

4651
static int force_load;
4652
module_param(force_load, bool, 0);
4653

4654
static int fan_control_allowed;
4655
module_param_named(fan_control, fan_control_allowed, bool, 0);
4656

4657 4658 4659
static int brightness_mode;
module_param_named(brightness_mode, brightness_mode, int, 0);

4660 4661 4662
static unsigned int hotkey_report_mode;
module_param(hotkey_report_mode, uint, 0);

L
Linus Torvalds 已提交
4663 4664 4665
#define IBM_PARAM(feature) \
	module_param_call(feature, set_ibm_param, NULL, NULL, 0)

4666 4667 4668 4669
IBM_PARAM(hotkey);
IBM_PARAM(bluetooth);
IBM_PARAM(video);
IBM_PARAM(light);
4670
#ifdef CONFIG_THINKPAD_ACPI_DOCK
4671
IBM_PARAM(dock);
4672
#endif
4673
#ifdef CONFIG_THINKPAD_ACPI_BAY
4674
IBM_PARAM(bay);
4675
#endif /* CONFIG_THINKPAD_ACPI_BAY */
4676 4677 4678 4679 4680 4681 4682 4683
IBM_PARAM(cmos);
IBM_PARAM(led);
IBM_PARAM(beep);
IBM_PARAM(ecdump);
IBM_PARAM(brightness);
IBM_PARAM(volume);
IBM_PARAM(fan);

4684
static int __init thinkpad_acpi_module_init(void)
L
Linus Torvalds 已提交
4685 4686 4687
{
	int ret, i;

4688 4689 4690 4691
	/* Parameter checking */
	if (hotkey_report_mode > 2)
		return -EINVAL;

4692
	/* Driver-level probe */
4693 4694

	get_thinkpad_model_data(&thinkpad_id);
4695
	ret = probe_for_thinkpad();
4696 4697
	if (ret) {
		thinkpad_acpi_module_exit();
4698
		return ret;
4699
	}
L
Linus Torvalds 已提交
4700

4701
	/* Driver initialization */
4702

4703 4704
	IBM_ACPIHANDLE_INIT(ecrd);
	IBM_ACPIHANDLE_INIT(ecwr);
L
Linus Torvalds 已提交
4705

4706
	proc_dir = proc_mkdir(IBM_PROC_DIR, acpi_root_dir);
L
Linus Torvalds 已提交
4707
	if (!proc_dir) {
4708
		printk(IBM_ERR "unable to create proc dir " IBM_PROC_DIR);
4709
		thinkpad_acpi_module_exit();
L
Linus Torvalds 已提交
4710 4711 4712
		return -ENODEV;
	}
	proc_dir->owner = THIS_MODULE;
4713

4714 4715 4716 4717 4718 4719
	ret = platform_driver_register(&tpacpi_pdriver);
	if (ret) {
		printk(IBM_ERR "unable to register platform driver\n");
		thinkpad_acpi_module_exit();
		return ret;
	}
4720 4721
	tp_features.platform_drv_registered = 1;

4722 4723 4724 4725 4726 4727
	ret = tpacpi_create_driver_attributes(&tpacpi_pdriver.driver);
	if (ret) {
		printk(IBM_ERR "unable to create sysfs driver attributes\n");
		thinkpad_acpi_module_exit();
		return ret;
	}
4728
	tp_features.platform_drv_attrs_registered = 1;
4729

4730 4731 4732 4733 4734 4735 4736 4737 4738 4739 4740 4741 4742 4743 4744 4745 4746 4747 4748

	/* Device initialization */
	tpacpi_pdev = platform_device_register_simple(IBM_DRVR_NAME, -1,
							NULL, 0);
	if (IS_ERR(tpacpi_pdev)) {
		ret = PTR_ERR(tpacpi_pdev);
		tpacpi_pdev = NULL;
		printk(IBM_ERR "unable to register platform device\n");
		thinkpad_acpi_module_exit();
		return ret;
	}
	tpacpi_hwmon = hwmon_device_register(&tpacpi_pdev->dev);
	if (IS_ERR(tpacpi_hwmon)) {
		ret = PTR_ERR(tpacpi_hwmon);
		tpacpi_hwmon = NULL;
		printk(IBM_ERR "unable to register hwmon device\n");
		thinkpad_acpi_module_exit();
		return ret;
	}
4749
	mutex_init(&tpacpi_inputdev_send_mutex);
4750 4751 4752 4753 4754 4755 4756 4757 4758 4759
	tpacpi_inputdev = input_allocate_device();
	if (!tpacpi_inputdev) {
		printk(IBM_ERR "unable to allocate input device\n");
		thinkpad_acpi_module_exit();
		return -ENOMEM;
	} else {
		/* Prepare input device, but don't register */
		tpacpi_inputdev->name = "ThinkPad Extra Buttons";
		tpacpi_inputdev->phys = IBM_DRVR_NAME "/input0";
		tpacpi_inputdev->id.bustype = BUS_HOST;
4760 4761 4762
		tpacpi_inputdev->id.vendor = (thinkpad_id.vendor) ?
						thinkpad_id.vendor :
						PCI_VENDOR_ID_IBM;
4763 4764 4765
		tpacpi_inputdev->id.product = TPACPI_HKEY_INPUT_PRODUCT;
		tpacpi_inputdev->id.version = TPACPI_HKEY_INPUT_VERSION;
	}
4766 4767 4768 4769
	for (i = 0; i < ARRAY_SIZE(ibms_init); i++) {
		ret = ibm_init(&ibms_init[i]);
		if (ret >= 0 && *ibms_init[i].param)
			ret = ibms_init[i].data->write(ibms_init[i].param);
L
Linus Torvalds 已提交
4770
		if (ret < 0) {
4771
			thinkpad_acpi_module_exit();
L
Linus Torvalds 已提交
4772 4773 4774
			return ret;
		}
	}
4775 4776 4777 4778 4779 4780 4781 4782
	ret = input_register_device(tpacpi_inputdev);
	if (ret < 0) {
		printk(IBM_ERR "unable to register input device\n");
		thinkpad_acpi_module_exit();
		return ret;
	} else {
		tp_features.input_device_registered = 1;
	}
L
Linus Torvalds 已提交
4783 4784 4785 4786

	return 0;
}

4787
static void thinkpad_acpi_module_exit(void)
4788
{
4789 4790 4791 4792 4793 4794 4795
	struct ibm_struct *ibm, *itmp;

	list_for_each_entry_safe_reverse(ibm, itmp,
					 &tpacpi_all_drivers,
					 all_drivers) {
		ibm_exit(ibm);
	}
4796

4797
	dbg_printk(TPACPI_DBG_INIT, "finished subdriver exit path...\n");
4798

4799 4800 4801 4802 4803 4804 4805
	if (tpacpi_inputdev) {
		if (tp_features.input_device_registered)
			input_unregister_device(tpacpi_inputdev);
		else
			input_free_device(tpacpi_inputdev);
	}

4806 4807 4808 4809 4810 4811
	if (tpacpi_hwmon)
		hwmon_device_unregister(tpacpi_hwmon);

	if (tpacpi_pdev)
		platform_device_unregister(tpacpi_pdev);

4812 4813 4814 4815 4816
	if (tp_features.platform_drv_attrs_registered)
		tpacpi_remove_driver_attributes(&tpacpi_pdriver.driver);

	if (tp_features.platform_drv_registered)
		platform_driver_unregister(&tpacpi_pdriver);
4817

4818
	if (proc_dir)
4819
		remove_proc_entry(IBM_PROC_DIR, acpi_root_dir);
4820

4821 4822 4823
	kfree(thinkpad_id.bios_version_str);
	kfree(thinkpad_id.ec_version_str);
	kfree(thinkpad_id.model_str);
4824 4825
}

4826 4827
module_init(thinkpad_acpi_module_init);
module_exit(thinkpad_acpi_module_exit);