[mirror_ubuntu-kernels.git] / arch / x86 / platform / olpc / olpc-xo1-sci.c

// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * Support for OLPC XO-1 System Control Interrupts (SCI)
 *
 * Copyright (C) 2010 One Laptop per Child
 * Copyright (C) 2006 Red Hat, Inc.
 * Copyright (C) 2006 Advanced Micro Devices, Inc.
 */

#include <linux/cs5535.h>
#include <linux/device.h>
#include <linux/gpio.h>
#include <linux/input.h>
#include <linux/interrupt.h>
#include <linux/platform_device.h>
#include <linux/pm.h>
#include <linux/pm_wakeup.h>
#include <linux/mfd/core.h>
#include <linux/power_supply.h>
#include <linux/suspend.h>
#include <linux/workqueue.h>
#include <linux/olpc-ec.h>

#include <asm/io.h>
#include <asm/msr.h>
#include <asm/olpc.h>

#define DRV_NAME	"olpc-xo1-sci"
#define PFX		DRV_NAME ": "

static unsigned long acpi_base;
static struct input_dev *power_button_idev;
static struct input_dev *ebook_switch_idev;
static struct input_dev *lid_switch_idev;

static int sci_irq;

static bool lid_open;
static bool lid_inverted;
static int lid_wake_mode;

enum lid_wake_modes {
	LID_WAKE_ALWAYS,
	LID_WAKE_OPEN,
	LID_WAKE_CLOSE,
};

static const char * const lid_wake_mode_names[] = {
	[LID_WAKE_ALWAYS] = "always",
	[LID_WAKE_OPEN] = "open",
	[LID_WAKE_CLOSE] = "close",
};

static void battery_status_changed(void)
{
	struct power_supply *psy = power_supply_get_by_name("olpc-battery");

	if (psy) {
		power_supply_changed(psy);
		power_supply_put(psy);
	}
}

static void ac_status_changed(void)
{
	struct power_supply *psy = power_supply_get_by_name("olpc-ac");

	if (psy) {
		power_supply_changed(psy);
		power_supply_put(psy);
	}
}

/* Report current ebook switch state through input layer */
static void send_ebook_state(void)
{
	unsigned char state;

	if (olpc_ec_cmd(EC_READ_EB_MODE, NULL, 0, &state, 1)) {
		pr_err(PFX "failed to get ebook state\n");
		return;
	}

	if (!!test_bit(SW_TABLET_MODE, ebook_switch_idev->sw) == state)
		return; /* Nothing new to report. */

	input_report_switch(ebook_switch_idev, SW_TABLET_MODE, state);
	input_sync(ebook_switch_idev);
	pm_wakeup_event(&ebook_switch_idev->dev, 0);
}

static void flip_lid_inverter(void)
{
	/* gpio is high; invert so we'll get l->h event interrupt */
	if (lid_inverted)
		cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_INPUT_INVERT);
	else
		cs5535_gpio_set(OLPC_GPIO_LID, GPIO_INPUT_INVERT);
	lid_inverted = !lid_inverted;
}

static void detect_lid_state(void)
{
	/*
	 * the edge detector hookup on the gpio inputs on the geode is
	 * odd, to say the least.  See http://dev.laptop.org/ticket/5703
	 * for details, but in a nutshell:  we don't use the edge
	 * detectors.  instead, we make use of an anomaly:  with the both
	 * edge detectors turned off, we still get an edge event on a
	 * positive edge transition.  to take advantage of this, we use the
	 * front-end inverter to ensure that that's the edge we're always
	 * going to see next.
	 */

	int state;

	state = cs5535_gpio_isset(OLPC_GPIO_LID, GPIO_READ_BACK);
	lid_open = !state ^ !lid_inverted; /* x ^^ y */
	if (!state)
		return;

	flip_lid_inverter();
}

/* Report current lid switch state through input layer */
static void send_lid_state(void)
{
	if (!!test_bit(SW_LID, lid_switch_idev->sw) == !lid_open)
		return; /* Nothing new to report. */

	input_report_switch(lid_switch_idev, SW_LID, !lid_open);
	input_sync(lid_switch_idev);
	pm_wakeup_event(&lid_switch_idev->dev, 0);
}

static ssize_t lid_wake_mode_show(struct device *dev,
				  struct device_attribute *attr, char *buf)
{
	const char *mode = lid_wake_mode_names[lid_wake_mode];
	return sprintf(buf, "%s\n", mode);
}
static ssize_t lid_wake_mode_set(struct device *dev,
				 struct device_attribute *attr,
				 const char *buf, size_t count)
{
	int i;
	for (i = 0; i < ARRAY_SIZE(lid_wake_mode_names); i++) {
		const char *mode = lid_wake_mode_names[i];
		if (strlen(mode) != count || strncasecmp(mode, buf, count))
			continue;

		lid_wake_mode = i;
		return count;
	}
	return -EINVAL;
}
static DEVICE_ATTR(lid_wake_mode, S_IWUSR | S_IRUGO, lid_wake_mode_show,
		   lid_wake_mode_set);

/*
 * Process all items in the EC's SCI queue.
 *
 * This is handled in a workqueue because olpc_ec_cmd can be slow (and
 * can even timeout).
 *
 * If propagate_events is false, the queue is drained without events being
 * generated for the interrupts.
 */
static void process_sci_queue(bool propagate_events)
{
	int r;
	u16 data;

	do {
		r = olpc_ec_sci_query(&data);
		if (r || !data)
			break;

		pr_debug(PFX "SCI 0x%x received\n", data);

		switch (data) {
		case EC_SCI_SRC_BATERR:
		case EC_SCI_SRC_BATSOC:
		case EC_SCI_SRC_BATTERY:
		case EC_SCI_SRC_BATCRIT:
			battery_status_changed();
			break;
		case EC_SCI_SRC_ACPWR:
			ac_status_changed();
			break;
		}

		if (data == EC_SCI_SRC_EBOOK && propagate_events)
			send_ebook_state();
	} while (data);

	if (r)
		pr_err(PFX "Failed to clear SCI queue");
}

static void process_sci_queue_work(struct work_struct *work)
{
	process_sci_queue(true);
}

static DECLARE_WORK(sci_work, process_sci_queue_work);

static irqreturn_t xo1_sci_intr(int irq, void *dev_id)
{
	struct platform_device *pdev = dev_id;
	u32 sts;
	u32 gpe;

	sts = inl(acpi_base + CS5536_PM1_STS);
	outl(sts | 0xffff, acpi_base + CS5536_PM1_STS);

	gpe = inl(acpi_base + CS5536_PM_GPE0_STS);
	outl(0xffffffff, acpi_base + CS5536_PM_GPE0_STS);

	dev_dbg(&pdev->dev, "sts %x gpe %x\n", sts, gpe);

	if (sts & CS5536_PWRBTN_FLAG) {
		if (!(sts & CS5536_WAK_FLAG)) {
			/* Only report power button input when it was pressed
			 * during regular operation (as opposed to when it
			 * was used to wake the system). */
			input_report_key(power_button_idev, KEY_POWER, 1);
			input_sync(power_button_idev);
			input_report_key(power_button_idev, KEY_POWER, 0);
			input_sync(power_button_idev);
		}
		/* Report the wakeup event in all cases. */
		pm_wakeup_event(&power_button_idev->dev, 0);
	}

	if ((sts & (CS5536_RTC_FLAG | CS5536_WAK_FLAG)) ==
			(CS5536_RTC_FLAG | CS5536_WAK_FLAG)) {
		/* When the system is woken by the RTC alarm, report the
		 * event on the rtc device. */
		struct device *rtc = bus_find_device_by_name(
			&platform_bus_type, NULL, "rtc_cmos");
		if (rtc) {
			pm_wakeup_event(rtc, 0);
			put_device(rtc);
		}
	}

	if (gpe & CS5536_GPIOM7_PME_FLAG) { /* EC GPIO */
		cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_NEGATIVE_EDGE_STS);
		schedule_work(&sci_work);
	}

	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_STS);
	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_STS);
	detect_lid_state();
	send_lid_state();

	return IRQ_HANDLED;
}

static int xo1_sci_suspend(struct platform_device *pdev, pm_message_t state)
{
	if (device_may_wakeup(&power_button_idev->dev))
		olpc_xo1_pm_wakeup_set(CS5536_PM_PWRBTN);
	else
		olpc_xo1_pm_wakeup_clear(CS5536_PM_PWRBTN);

	if (device_may_wakeup(&ebook_switch_idev->dev))
		olpc_ec_wakeup_set(EC_SCI_SRC_EBOOK);
	else
		olpc_ec_wakeup_clear(EC_SCI_SRC_EBOOK);

	if (!device_may_wakeup(&lid_switch_idev->dev)) {
		cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	} else if ((lid_open && lid_wake_mode == LID_WAKE_OPEN) ||
		   (!lid_open && lid_wake_mode == LID_WAKE_CLOSE)) {
		flip_lid_inverter();

		/* we may have just caused an event */
		cs5535_gpio_set(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_STS);
		cs5535_gpio_set(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_STS);

		cs5535_gpio_set(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	}

	return 0;
}

static int xo1_sci_resume(struct platform_device *pdev)
{
	/*
	 * We don't know what may have happened while we were asleep.
	 * Reestablish our lid setup so we're sure to catch all transitions.
	 */
	detect_lid_state();
	send_lid_state();
	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);

	/* Enable all EC events */
	olpc_ec_mask_write(EC_SCI_SRC_ALL);

	/* Power/battery status might have changed too */
	battery_status_changed();
	ac_status_changed();
	return 0;
}

static int setup_sci_interrupt(struct platform_device *pdev)
{
	u32 lo, hi;
	u32 sts;
	int r;

	rdmsr(0x51400020, lo, hi);
	sci_irq = (lo >> 20) & 15;

	if (sci_irq) {
		dev_info(&pdev->dev, "SCI is mapped to IRQ %d\n", sci_irq);
	} else {
		/* Zero means masked */
		dev_info(&pdev->dev, "SCI unmapped. Mapping to IRQ 3\n");
		sci_irq = 3;
		lo |= 0x00300000;
		wrmsrl(0x51400020, lo);
	}

	/* Select level triggered in PIC */
	if (sci_irq < 8) {
		lo = inb(CS5536_PIC_INT_SEL1);
		lo |= 1 << sci_irq;
		outb(lo, CS5536_PIC_INT_SEL1);
	} else {
		lo = inb(CS5536_PIC_INT_SEL2);
		lo |= 1 << (sci_irq - 8);
		outb(lo, CS5536_PIC_INT_SEL2);
	}

	/* Enable interesting SCI events, and clear pending interrupts */
	sts = inl(acpi_base + CS5536_PM1_STS);
	outl(((CS5536_PM_PWRBTN | CS5536_PM_RTC) << 16) | 0xffff,
	     acpi_base + CS5536_PM1_STS);

	r = request_irq(sci_irq, xo1_sci_intr, 0, DRV_NAME, pdev);
	if (r)
		dev_err(&pdev->dev, "can't request interrupt\n");

	return r;
}

static int setup_ec_sci(void)
{
	int r;

	r = gpio_request(OLPC_GPIO_ECSCI, "OLPC-ECSCI");
	if (r)
		return r;

	gpio_direction_input(OLPC_GPIO_ECSCI);

	/* Clear pending EC SCI events */
	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_NEGATIVE_EDGE_STS);
	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_POSITIVE_EDGE_STS);

	/*
	 * Enable EC SCI events, and map them to both a PME and the SCI
	 * interrupt.
	 *
	 * Ordinarily, in addition to functioning as GPIOs, Geode GPIOs can
	 * be mapped to regular interrupts *or* Geode-specific Power
	 * Management Events (PMEs) - events that bring the system out of
	 * suspend. In this case, we want both of those things - the system
	 * wakeup, *and* the ability to get an interrupt when an event occurs.
	 *
	 * To achieve this, we map the GPIO to a PME, and then we use one
	 * of the many generic knobs on the CS5535 PIC to additionally map the
	 * PME to the regular SCI interrupt line.
	 */
	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_EVENTS_ENABLE);

	/* Set the SCI to cause a PME event on group 7 */
	cs5535_gpio_setup_event(OLPC_GPIO_ECSCI, 7, 1);

	/* And have group 7 also fire the SCI interrupt */
	cs5535_pic_unreqz_select_high(7, sci_irq);

	return 0;
}

static void free_ec_sci(void)
{
	gpio_free(OLPC_GPIO_ECSCI);
}

static int setup_lid_events(void)
{
	int r;

	r = gpio_request(OLPC_GPIO_LID, "OLPC-LID");
	if (r)
		return r;

	gpio_direction_input(OLPC_GPIO_LID);

	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_INPUT_INVERT);
	lid_inverted = 0;

	/* Clear edge detection and event enable for now */
	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_EN);
	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_EN);
	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_STS);
	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_STS);

	/* Set the LID to cause an PME event on group 6 */
	cs5535_gpio_setup_event(OLPC_GPIO_LID, 6, 1);

	/* Set PME group 6 to fire the SCI interrupt */
	cs5535_gpio_set_irq(6, sci_irq);

	/* Enable the event */
	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);

	return 0;
}

static void free_lid_events(void)
{
	gpio_free(OLPC_GPIO_LID);
}

static int setup_power_button(struct platform_device *pdev)
{
	int r;

	power_button_idev = input_allocate_device();
	if (!power_button_idev)
		return -ENOMEM;

	power_button_idev->name = "Power Button";
	power_button_idev->phys = DRV_NAME "/input0";
	set_bit(EV_KEY, power_button_idev->evbit);
	set_bit(KEY_POWER, power_button_idev->keybit);

	power_button_idev->dev.parent = &pdev->dev;
	device_init_wakeup(&power_button_idev->dev, 1);

	r = input_register_device(power_button_idev);
	if (r) {
		dev_err(&pdev->dev, "failed to register power button: %d\n", r);
		input_free_device(power_button_idev);
	}

	return r;
}

static void free_power_button(void)
{
	input_unregister_device(power_button_idev);
}

static int setup_ebook_switch(struct platform_device *pdev)
{
	int r;

	ebook_switch_idev = input_allocate_device();
	if (!ebook_switch_idev)
		return -ENOMEM;

	ebook_switch_idev->name = "EBook Switch";
	ebook_switch_idev->phys = DRV_NAME "/input1";
	set_bit(EV_SW, ebook_switch_idev->evbit);
	set_bit(SW_TABLET_MODE, ebook_switch_idev->swbit);

	ebook_switch_idev->dev.parent = &pdev->dev;
	device_set_wakeup_capable(&ebook_switch_idev->dev, true);

	r = input_register_device(ebook_switch_idev);
	if (r) {
		dev_err(&pdev->dev, "failed to register ebook switch: %d\n", r);
		input_free_device(ebook_switch_idev);
	}

	return r;
}

static void free_ebook_switch(void)
{
	input_unregister_device(ebook_switch_idev);
}

static int setup_lid_switch(struct platform_device *pdev)
{
	int r;

	lid_switch_idev = input_allocate_device();
	if (!lid_switch_idev)
		return -ENOMEM;

	lid_switch_idev->name = "Lid Switch";
	lid_switch_idev->phys = DRV_NAME "/input2";
	set_bit(EV_SW, lid_switch_idev->evbit);
	set_bit(SW_LID, lid_switch_idev->swbit);

	lid_switch_idev->dev.parent = &pdev->dev;
	device_set_wakeup_capable(&lid_switch_idev->dev, true);

	r = input_register_device(lid_switch_idev);
	if (r) {
		dev_err(&pdev->dev, "failed to register lid switch: %d\n", r);
		goto err_register;
	}

	r = device_create_file(&lid_switch_idev->dev, &dev_attr_lid_wake_mode);
	if (r) {
		dev_err(&pdev->dev, "failed to create wake mode attr: %d\n", r);
		goto err_create_attr;
	}

	return 0;

err_create_attr:
	input_unregister_device(lid_switch_idev);
	lid_switch_idev = NULL;
err_register:
	input_free_device(lid_switch_idev);
	return r;
}

static void free_lid_switch(void)
{
	device_remove_file(&lid_switch_idev->dev, &dev_attr_lid_wake_mode);
	input_unregister_device(lid_switch_idev);
}

static int xo1_sci_probe(struct platform_device *pdev)
{
	struct resource *res;
	int r;

	/* don't run on non-XOs */
	if (!machine_is_olpc())
		return -ENODEV;

	r = mfd_cell_enable(pdev);
	if (r)
		return r;

	res = platform_get_resource(pdev, IORESOURCE_IO, 0);
	if (!res) {
		dev_err(&pdev->dev, "can't fetch device resource info\n");
		return -EIO;
	}
	acpi_base = res->start;

	r = setup_power_button(pdev);
	if (r)
		return r;

	r = setup_ebook_switch(pdev);
	if (r)
		goto err_ebook;

	r = setup_lid_switch(pdev);
	if (r)
		goto err_lid;

	r = setup_lid_events();
	if (r)
		goto err_lidevt;

	r = setup_ec_sci();
	if (r)
		goto err_ecsci;

	/* Enable PME generation for EC-generated events */
	outl(CS5536_GPIOM6_PME_EN | CS5536_GPIOM7_PME_EN,
		acpi_base + CS5536_PM_GPE0_EN);

	/* Clear pending events */
	outl(0xffffffff, acpi_base + CS5536_PM_GPE0_STS);
	process_sci_queue(false);

	/* Initial sync */
	send_ebook_state();
	detect_lid_state();
	send_lid_state();

	r = setup_sci_interrupt(pdev);
	if (r)
		goto err_sci;

	/* Enable all EC events */
	olpc_ec_mask_write(EC_SCI_SRC_ALL);

	return r;

err_sci:
	free_ec_sci();
err_ecsci:
	free_lid_events();
err_lidevt:
	free_lid_switch();
err_lid:
	free_ebook_switch();
err_ebook:
	free_power_button();
	return r;
}

static int xo1_sci_remove(struct platform_device *pdev)
{
	mfd_cell_disable(pdev);
	free_irq(sci_irq, pdev);
	cancel_work_sync(&sci_work);
	free_ec_sci();
	free_lid_events();
	free_lid_switch();
	free_ebook_switch();
	free_power_button();
	acpi_base = 0;
	return 0;
}

static struct platform_driver xo1_sci_driver = {
	.driver = {
		.name = "olpc-xo1-sci-acpi",
	},
	.probe = xo1_sci_probe,
	.remove = xo1_sci_remove,
	.suspend = xo1_sci_suspend,
	.resume = xo1_sci_resume,
};

static int __init xo1_sci_init(void)
{
	return platform_driver_register(&xo1_sci_driver);
}
arch_initcall(xo1_sci_init);
Commit	Line	Data
2874c5fd	1	// SPDX-License-Identifier: GPL-2.0-or-later
7feda8e9 DD	2	/*
	3	* Support for OLPC XO-1 System Control Interrupts (SCI)
	4	*
	5	* Copyright (C) 2010 One Laptop per Child
	6	* Copyright (C) 2006 Red Hat, Inc.
	7	* Copyright (C) 2006 Advanced Micro Devices, Inc.
7feda8e9 DD	8	*/
	9
	10	#include <linux/cs5535.h>
7bc74b3d DD	11	#include <linux/device.h>
7bc74b3d DD	12	#include <linux/gpio.h>
7feda8e9 DD	13	#include <linux/input.h>
	14	#include <linux/interrupt.h>
	15	#include <linux/platform_device.h>
	16	#include <linux/pm.h>
d2aa3741	17	#include <linux/pm_wakeup.h>
7feda8e9	18	#include <linux/mfd/core.h>
e1040ac6	19	#include <linux/power_supply.h>
7feda8e9	20	#include <linux/suspend.h>
7bc74b3d	21	#include <linux/workqueue.h>
3bf9428f	22	#include <linux/olpc-ec.h>
7feda8e9 DD	23
	24	#include <asm/io.h>
	25	#include <asm/msr.h>
	26	#include <asm/olpc.h>
	27
	28	#define DRV_NAME "olpc-xo1-sci"
	29	#define PFX DRV_NAME ": "
	30
	31	static unsigned long acpi_base;
	32	static struct input_dev *power_button_idev;
7bc74b3d	33	static struct input_dev *ebook_switch_idev;
2cf2baea	34	static struct input_dev *lid_switch_idev;
7bc74b3d	35
7feda8e9 DD	36	static int sci_irq;
7feda8e9 DD	37
2cf2baea DD	38	static bool lid_open;
	39	static bool lid_inverted;
	40	static int lid_wake_mode;
	41
	42	enum lid_wake_modes {
	43	LID_WAKE_ALWAYS,
	44	LID_WAKE_OPEN,
	45	LID_WAKE_CLOSE,
	46	};
	47
	48	static const char * const lid_wake_mode_names[] = {
	49	[LID_WAKE_ALWAYS] = "always",
	50	[LID_WAKE_OPEN] = "open",
	51	[LID_WAKE_CLOSE] = "close",
	52	};
	53
e1040ac6 DD	54	static void battery_status_changed(void)
	55	{
	56	struct power_supply *psy = power_supply_get_by_name("olpc-battery");
	57
	58	if (psy) {
	59	power_supply_changed(psy);
ed6dad52	60	power_supply_put(psy);
e1040ac6 DD	61	}
	62	}
	63
	64	static void ac_status_changed(void)
	65	{
	66	struct power_supply *psy = power_supply_get_by_name("olpc-ac");
	67
	68	if (psy) {
	69	power_supply_changed(psy);
ed6dad52	70	power_supply_put(psy);
e1040ac6 DD	71	}
	72	}
	73
7bc74b3d DD	74	/* Report current ebook switch state through input layer */
	75	static void send_ebook_state(void)
	76	{
	77	unsigned char state;
	78
	79	if (olpc_ec_cmd(EC_READ_EB_MODE, NULL, 0, &state, 1)) {
	80	pr_err(PFX "failed to get ebook state\n");
	81	return;
	82	}
	83
d2aa3741 DD	84	if (!!test_bit(SW_TABLET_MODE, ebook_switch_idev->sw) == state)
	85	return; /* Nothing new to report. */
	86
7bc74b3d DD	87	input_report_switch(ebook_switch_idev, SW_TABLET_MODE, state);
7bc74b3d DD	88	input_sync(ebook_switch_idev);
d2aa3741	89	pm_wakeup_event(&ebook_switch_idev->dev, 0);
7bc74b3d DD	90	}
7bc74b3d DD	91
2cf2baea DD	92	static void flip_lid_inverter(void)
	93	{
	94	/* gpio is high; invert so we'll get l->h event interrupt */
	95	if (lid_inverted)
	96	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_INPUT_INVERT);
	97	else
	98	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_INPUT_INVERT);
	99	lid_inverted = !lid_inverted;
	100	}
	101
	102	static void detect_lid_state(void)
	103	{
	104	/*
	105	* the edge detector hookup on the gpio inputs on the geode is
	106	* odd, to say the least. See http://dev.laptop.org/ticket/5703
	107	* for details, but in a nutshell: we don't use the edge
a97673a1	108	* detectors. instead, we make use of an anomaly: with the both
2cf2baea DD	109	* edge detectors turned off, we still get an edge event on a
	110	* positive edge transition. to take advantage of this, we use the
	111	* front-end inverter to ensure that that's the edge we're always
	112	* going to see next.
	113	*/
	114
	115	int state;
	116
	117	state = cs5535_gpio_isset(OLPC_GPIO_LID, GPIO_READ_BACK);
	118	lid_open = !state ^ !lid_inverted; /* x ^^ y */
	119	if (!state)
	120	return;
	121
	122	flip_lid_inverter();
	123	}
	124
	125	/* Report current lid switch state through input layer */
	126	static void send_lid_state(void)
	127	{
d2aa3741 DD	128	if (!!test_bit(SW_LID, lid_switch_idev->sw) == !lid_open)
	129	return; /* Nothing new to report. */
	130
2cf2baea DD	131	input_report_switch(lid_switch_idev, SW_LID, !lid_open);
2cf2baea DD	132	input_sync(lid_switch_idev);
d2aa3741	133	pm_wakeup_event(&lid_switch_idev->dev, 0);
2cf2baea DD	134	}
	135
	136	static ssize_t lid_wake_mode_show(struct device *dev,
	137	struct device_attribute attr, char buf)
	138	{
	139	const char *mode = lid_wake_mode_names[lid_wake_mode];
	140	return sprintf(buf, "%s\n", mode);
	141	}
	142	static ssize_t lid_wake_mode_set(struct device *dev,
	143	struct device_attribute *attr,
	144	const char *buf, size_t count)
	145	{
	146	int i;
	147	for (i = 0; i < ARRAY_SIZE(lid_wake_mode_names); i++) {
	148	const char *mode = lid_wake_mode_names[i];
	149	if (strlen(mode) != count \|\| strncasecmp(mode, buf, count))
	150	continue;
	151
	152	lid_wake_mode = i;
	153	return count;
	154	}
	155	return -EINVAL;
	156	}
	157	static DEVICE_ATTR(lid_wake_mode, S_IWUSR \| S_IRUGO, lid_wake_mode_show,
	158	lid_wake_mode_set);
	159
7bc74b3d DD	160	/*
	161	* Process all items in the EC's SCI queue.
	162	*
	163	* This is handled in a workqueue because olpc_ec_cmd can be slow (and
	164	* can even timeout).
	165	*
	166	* If propagate_events is false, the queue is drained without events being
	167	* generated for the interrupts.
	168	*/
	169	static void process_sci_queue(bool propagate_events)
	170	{
	171	int r;
	172	u16 data;
	173
	174	do {
	175	r = olpc_ec_sci_query(&data);
	176	if (r \|\| !data)
	177	break;
	178
	179	pr_debug(PFX "SCI 0x%x received\n", data);
	180
e1040ac6 DD	181	switch (data) {
	182	case EC_SCI_SRC_BATERR:
	183	case EC_SCI_SRC_BATSOC:
	184	case EC_SCI_SRC_BATTERY:
	185	case EC_SCI_SRC_BATCRIT:
	186	battery_status_changed();
	187	break;
	188	case EC_SCI_SRC_ACPWR:
	189	ac_status_changed();
	190	break;
	191	}
	192
7bc74b3d DD	193	if (data == EC_SCI_SRC_EBOOK && propagate_events)
	194	send_ebook_state();
	195	} while (data);
	196
	197	if (r)
	198	pr_err(PFX "Failed to clear SCI queue");
	199	}
	200
	201	static void process_sci_queue_work(struct work_struct *work)
	202	{
	203	process_sci_queue(true);
	204	}
	205
	206	static DECLARE_WORK(sci_work, process_sci_queue_work);
	207
7feda8e9 DD	208	static irqreturn_t xo1_sci_intr(int irq, void *dev_id)
	209	{
	210	struct platform_device *pdev = dev_id;
	211	u32 sts;
	212	u32 gpe;
	213
	214	sts = inl(acpi_base + CS5536_PM1_STS);
	215	outl(sts \| 0xffff, acpi_base + CS5536_PM1_STS);
	216
	217	gpe = inl(acpi_base + CS5536_PM_GPE0_STS);
	218	outl(0xffffffff, acpi_base + CS5536_PM_GPE0_STS);
	219
	220	dev_dbg(&pdev->dev, "sts %x gpe %x\n", sts, gpe);
	221
d2aa3741 DD	222	if (sts & CS5536_PWRBTN_FLAG) {
	223	if (!(sts & CS5536_WAK_FLAG)) {
	224	/* Only report power button input when it was pressed
	225	* during regular operation (as opposed to when it
	226	* was used to wake the system). */
	227	input_report_key(power_button_idev, KEY_POWER, 1);
	228	input_sync(power_button_idev);
	229	input_report_key(power_button_idev, KEY_POWER, 0);
	230	input_sync(power_button_idev);
	231	}
	232	/* Report the wakeup event in all cases. */
	233	pm_wakeup_event(&power_button_idev->dev, 0);
7feda8e9 DD	234	}
7feda8e9 DD	235
c2c21e9b DD	236	if ((sts & (CS5536_RTC_FLAG \| CS5536_WAK_FLAG)) ==
	237	(CS5536_RTC_FLAG \| CS5536_WAK_FLAG)) {
	238	/* When the system is woken by the RTC alarm, report the
	239	* event on the rtc device. */
	240	struct device *rtc = bus_find_device_by_name(
	241	&platform_bus_type, NULL, "rtc_cmos");
	242	if (rtc) {
	243	pm_wakeup_event(rtc, 0);
	244	put_device(rtc);
	245	}
	246	}
	247
7bc74b3d DD	248	if (gpe & CS5536_GPIOM7_PME_FLAG) { /* EC GPIO */
	249	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_NEGATIVE_EDGE_STS);
	250	schedule_work(&sci_work);
	251	}
	252
2cf2baea DD	253	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_STS);
	254	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_STS);
	255	detect_lid_state();
	256	send_lid_state();
	257
7feda8e9 DD	258	return IRQ_HANDLED;
	259	}
	260
	261	static int xo1_sci_suspend(struct platform_device *pdev, pm_message_t state)
	262	{
	263	if (device_may_wakeup(&power_button_idev->dev))
	264	olpc_xo1_pm_wakeup_set(CS5536_PM_PWRBTN);
	265	else
	266	olpc_xo1_pm_wakeup_clear(CS5536_PM_PWRBTN);
7bc74b3d DD	267
	268	if (device_may_wakeup(&ebook_switch_idev->dev))
	269	olpc_ec_wakeup_set(EC_SCI_SRC_EBOOK);
	270	else
	271	olpc_ec_wakeup_clear(EC_SCI_SRC_EBOOK);
	272
2cf2baea DD	273	if (!device_may_wakeup(&lid_switch_idev->dev)) {
	274	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	275	} else if ((lid_open && lid_wake_mode == LID_WAKE_OPEN) \|\|
	276	(!lid_open && lid_wake_mode == LID_WAKE_CLOSE)) {
	277	flip_lid_inverter();
	278
	279	/* we may have just caused an event */
	280	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_STS);
	281	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_STS);
	282
	283	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	284	}
	285
7bc74b3d DD	286	return 0;
	287	}
	288
	289	static int xo1_sci_resume(struct platform_device *pdev)
	290	{
2cf2baea DD	291	/*
	292	* We don't know what may have happened while we were asleep.
	293	* Reestablish our lid setup so we're sure to catch all transitions.
	294	*/
	295	detect_lid_state();
	296	send_lid_state();
	297	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	298
7bc74b3d DD	299	/* Enable all EC events */
7bc74b3d DD	300	olpc_ec_mask_write(EC_SCI_SRC_ALL);
e1040ac6 DD	301
	302	/* Power/battery status might have changed too */
	303	battery_status_changed();
	304	ac_status_changed();
7feda8e9 DD	305	return 0;
	306	}
	307
a18e3690	308	static int setup_sci_interrupt(struct platform_device *pdev)
7feda8e9 DD	309	{
	310	u32 lo, hi;
	311	u32 sts;
	312	int r;
	313
	314	rdmsr(0x51400020, lo, hi);
	315	sci_irq = (lo >> 20) & 15;
	316
	317	if (sci_irq) {
	318	dev_info(&pdev->dev, "SCI is mapped to IRQ %d\n", sci_irq);
	319	} else {
	320	/* Zero means masked */
	321	dev_info(&pdev->dev, "SCI unmapped. Mapping to IRQ 3\n");
	322	sci_irq = 3;
	323	lo \|= 0x00300000;
	324	wrmsrl(0x51400020, lo);
	325	}
	326
	327	/* Select level triggered in PIC */
	328	if (sci_irq < 8) {
	329	lo = inb(CS5536_PIC_INT_SEL1);
	330	lo \|= 1 << sci_irq;
	331	outb(lo, CS5536_PIC_INT_SEL1);
	332	} else {
	333	lo = inb(CS5536_PIC_INT_SEL2);
	334	lo \|= 1 << (sci_irq - 8);
	335	outb(lo, CS5536_PIC_INT_SEL2);
	336	}
	337
c2c21e9b	338	/* Enable interesting SCI events, and clear pending interrupts */
7feda8e9	339	sts = inl(acpi_base + CS5536_PM1_STS);
c2c21e9b DD	340	outl(((CS5536_PM_PWRBTN \| CS5536_PM_RTC) << 16) \| 0xffff,
c2c21e9b DD	341	acpi_base + CS5536_PM1_STS);
7feda8e9 DD	342
	343	r = request_irq(sci_irq, xo1_sci_intr, 0, DRV_NAME, pdev);
	344	if (r)
	345	dev_err(&pdev->dev, "can't request interrupt\n");
	346
	347	return r;
	348	}
	349
a18e3690	350	static int setup_ec_sci(void)
7bc74b3d DD	351	{
	352	int r;
	353
	354	r = gpio_request(OLPC_GPIO_ECSCI, "OLPC-ECSCI");
	355	if (r)
	356	return r;
	357
	358	gpio_direction_input(OLPC_GPIO_ECSCI);
	359
	360	/* Clear pending EC SCI events */
	361	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_NEGATIVE_EDGE_STS);
	362	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_POSITIVE_EDGE_STS);
	363
	364	/*
	365	* Enable EC SCI events, and map them to both a PME and the SCI
	366	* interrupt.
	367	*
	368	* Ordinarily, in addition to functioning as GPIOs, Geode GPIOs can
	369	* be mapped to regular interrupts or Geode-specific Power
	370	* Management Events (PMEs) - events that bring the system out of
	371	* suspend. In this case, we want both of those things - the system
	372	* wakeup, and the ability to get an interrupt when an event occurs.
	373	*
	374	* To achieve this, we map the GPIO to a PME, and then we use one
	375	* of the many generic knobs on the CS5535 PIC to additionally map the
	376	* PME to the regular SCI interrupt line.
	377	*/
	378	cs5535_gpio_set(OLPC_GPIO_ECSCI, GPIO_EVENTS_ENABLE);
	379
	380	/* Set the SCI to cause a PME event on group 7 */
	381	cs5535_gpio_setup_event(OLPC_GPIO_ECSCI, 7, 1);
	382
	383	/* And have group 7 also fire the SCI interrupt */
	384	cs5535_pic_unreqz_select_high(7, sci_irq);
	385
	386	return 0;
	387	}
	388
	389	static void free_ec_sci(void)
	390	{
	391	gpio_free(OLPC_GPIO_ECSCI);
	392	}
	393
a18e3690	394	static int setup_lid_events(void)
2cf2baea DD	395	{
	396	int r;
	397
	398	r = gpio_request(OLPC_GPIO_LID, "OLPC-LID");
	399	if (r)
	400	return r;
	401
	402	gpio_direction_input(OLPC_GPIO_LID);
	403
	404	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_INPUT_INVERT);
	405	lid_inverted = 0;
	406
	407	/* Clear edge detection and event enable for now */
	408	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	409	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_EN);
	410	cs5535_gpio_clear(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_EN);
	411	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_NEGATIVE_EDGE_STS);
	412	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_POSITIVE_EDGE_STS);
	413
	414	/* Set the LID to cause an PME event on group 6 */
	415	cs5535_gpio_setup_event(OLPC_GPIO_LID, 6, 1);
	416
	417	/* Set PME group 6 to fire the SCI interrupt */
	418	cs5535_gpio_set_irq(6, sci_irq);
	419
	420	/* Enable the event */
	421	cs5535_gpio_set(OLPC_GPIO_LID, GPIO_EVENTS_ENABLE);
	422
	423	return 0;
	424	}
	425
	426	static void free_lid_events(void)
	427	{
	428	gpio_free(OLPC_GPIO_LID);
	429	}
	430
a18e3690	431	static int setup_power_button(struct platform_device *pdev)
7feda8e9 DD	432	{
	433	int r;
	434
	435	power_button_idev = input_allocate_device();
	436	if (!power_button_idev)
	437	return -ENOMEM;
	438
	439	power_button_idev->name = "Power Button";
	440	power_button_idev->phys = DRV_NAME "/input0";
	441	set_bit(EV_KEY, power_button_idev->evbit);
	442	set_bit(KEY_POWER, power_button_idev->keybit);
	443
	444	power_button_idev->dev.parent = &pdev->dev;
	445	device_init_wakeup(&power_button_idev->dev, 1);
	446
	447	r = input_register_device(power_button_idev);
	448	if (r) {
	449	dev_err(&pdev->dev, "failed to register power button: %d\n", r);
	450	input_free_device(power_button_idev);
	451	}
	452
	453	return r;
	454	}
	455
	456	static void free_power_button(void)
	457	{
	458	input_unregister_device(power_button_idev);
7feda8e9 DD	459	}
7feda8e9 DD	460
a18e3690	461	static int setup_ebook_switch(struct platform_device *pdev)
7bc74b3d DD	462	{
	463	int r;
	464
	465	ebook_switch_idev = input_allocate_device();
	466	if (!ebook_switch_idev)
	467	return -ENOMEM;
	468
	469	ebook_switch_idev->name = "EBook Switch";
	470	ebook_switch_idev->phys = DRV_NAME "/input1";
	471	set_bit(EV_SW, ebook_switch_idev->evbit);
	472	set_bit(SW_TABLET_MODE, ebook_switch_idev->swbit);
	473
	474	ebook_switch_idev->dev.parent = &pdev->dev;
	475	device_set_wakeup_capable(&ebook_switch_idev->dev, true);
	476
	477	r = input_register_device(ebook_switch_idev);
	478	if (r) {
	479	dev_err(&pdev->dev, "failed to register ebook switch: %d\n", r);
	480	input_free_device(ebook_switch_idev);
	481	}
	482
	483	return r;
	484	}
	485
	486	static void free_ebook_switch(void)
	487	{
	488	input_unregister_device(ebook_switch_idev);
7bc74b3d DD	489	}
7bc74b3d DD	490
a18e3690	491	static int setup_lid_switch(struct platform_device *pdev)
2cf2baea DD	492	{
	493	int r;
	494
	495	lid_switch_idev = input_allocate_device();
	496	if (!lid_switch_idev)
	497	return -ENOMEM;
	498
	499	lid_switch_idev->name = "Lid Switch";
	500	lid_switch_idev->phys = DRV_NAME "/input2";
	501	set_bit(EV_SW, lid_switch_idev->evbit);
	502	set_bit(SW_LID, lid_switch_idev->swbit);
	503
	504	lid_switch_idev->dev.parent = &pdev->dev;
	505	device_set_wakeup_capable(&lid_switch_idev->dev, true);
	506
	507	r = input_register_device(lid_switch_idev);
	508	if (r) {
	509	dev_err(&pdev->dev, "failed to register lid switch: %d\n", r);
	510	goto err_register;
	511	}
	512
	513	r = device_create_file(&lid_switch_idev->dev, &dev_attr_lid_wake_mode);
	514	if (r) {
	515	dev_err(&pdev->dev, "failed to create wake mode attr: %d\n", r);
	516	goto err_create_attr;
	517	}
	518
	519	return 0;
	520
	521	err_create_attr:
	522	input_unregister_device(lid_switch_idev);
3482e664	523	lid_switch_idev = NULL;
2cf2baea DD	524	err_register:
	525	input_free_device(lid_switch_idev);
	526	return r;
	527	}
	528
	529	static void free_lid_switch(void)
	530	{
	531	device_remove_file(&lid_switch_idev->dev, &dev_attr_lid_wake_mode);
	532	input_unregister_device(lid_switch_idev);
2cf2baea DD	533	}
2cf2baea DD	534
a18e3690	535	static int xo1_sci_probe(struct platform_device *pdev)
7feda8e9 DD	536	{
	537	struct resource *res;
	538	int r;
	539
	540	/* don't run on non-XOs */
	541	if (!machine_is_olpc())
	542	return -ENODEV;
	543
	544	r = mfd_cell_enable(pdev);
	545	if (r)
	546	return r;
	547
	548	res = platform_get_resource(pdev, IORESOURCE_IO, 0);
	549	if (!res) {
	550	dev_err(&pdev->dev, "can't fetch device resource info\n");
	551	return -EIO;
	552	}
	553	acpi_base = res->start;
	554
	555	r = setup_power_button(pdev);
	556	if (r)
	557	return r;
	558
7bc74b3d DD	559	r = setup_ebook_switch(pdev);
	560	if (r)
	561	goto err_ebook;
	562
2cf2baea DD	563	r = setup_lid_switch(pdev);
	564	if (r)
	565	goto err_lid;
	566
	567	r = setup_lid_events();
	568	if (r)
	569	goto err_lidevt;
	570
7bc74b3d DD	571	r = setup_ec_sci();
	572	if (r)
	573	goto err_ecsci;
	574
	575	/* Enable PME generation for EC-generated events */
2cf2baea DD	576	outl(CS5536_GPIOM6_PME_EN \| CS5536_GPIOM7_PME_EN,
2cf2baea DD	577	acpi_base + CS5536_PM_GPE0_EN);
7bc74b3d DD	578
	579	/* Clear pending events */
	580	outl(0xffffffff, acpi_base + CS5536_PM_GPE0_STS);
	581	process_sci_queue(false);
	582
	583	/* Initial sync */
	584	send_ebook_state();
2cf2baea DD	585	detect_lid_state();
2cf2baea DD	586	send_lid_state();
7bc74b3d	587
7feda8e9 DD	588	r = setup_sci_interrupt(pdev);
7feda8e9 DD	589	if (r)
7bc74b3d	590	goto err_sci;
7feda8e9	591
7bc74b3d DD	592	/* Enable all EC events */
	593	olpc_ec_mask_write(EC_SCI_SRC_ALL);
	594
	595	return r;
	596
	597	err_sci:
	598	free_ec_sci();
	599	err_ecsci:
2cf2baea DD	600	free_lid_events();
	601	err_lidevt:
	602	free_lid_switch();
	603	err_lid:
7bc74b3d DD	604	free_ebook_switch();
	605	err_ebook:
	606	free_power_button();
7feda8e9 DD	607	return r;
	608	}
	609
a18e3690	610	static int xo1_sci_remove(struct platform_device *pdev)
7feda8e9 DD	611	{
	612	mfd_cell_disable(pdev);
	613	free_irq(sci_irq, pdev);
7bc74b3d DD	614	cancel_work_sync(&sci_work);
7bc74b3d DD	615	free_ec_sci();
2cf2baea DD	616	free_lid_events();
2cf2baea DD	617	free_lid_switch();
7bc74b3d	618	free_ebook_switch();
7feda8e9 DD	619	free_power_button();
	620	acpi_base = 0;
	621	return 0;
	622	}
	623
	624	static struct platform_driver xo1_sci_driver = {
	625	.driver = {
	626	.name = "olpc-xo1-sci-acpi",
	627	},
	628	.probe = xo1_sci_probe,
a18e3690	629	.remove = xo1_sci_remove,
7feda8e9	630	.suspend = xo1_sci_suspend,
7bc74b3d	631	.resume = xo1_sci_resume,
7feda8e9 DD	632	};
	633
	634	static int __init xo1_sci_init(void)
	635	{
	636	return platform_driver_register(&xo1_sci_driver);
	637	}
	638	arch_initcall(xo1_sci_init);