[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / acpi / sleep / proc.c

#include <linux/proc_fs.h>
#include <linux/seq_file.h>
#include <linux/suspend.h>
#include <linux/bcd.h>
#include <asm/uaccess.h>

#include <acpi/acpi_bus.h>
#include <acpi/acpi_drivers.h>

#ifdef CONFIG_X86
#include <linux/mc146818rtc.h>
#endif

#include "sleep.h"

#define _COMPONENT		ACPI_SYSTEM_COMPONENT

/*
 * this file provides support for:
 * /proc/acpi/sleep
 * /proc/acpi/alarm
 * /proc/acpi/wakeup
 */

ACPI_MODULE_NAME("sleep")
#ifdef	CONFIG_ACPI_PROCFS
static int acpi_system_sleep_seq_show(struct seq_file *seq, void *offset)
{
	int i;

	ACPI_FUNCTION_TRACE("acpi_system_sleep_seq_show");

	for (i = 0; i <= ACPI_STATE_S5; i++) {
		if (sleep_states[i]) {
			seq_printf(seq, "S%d ", i);
		}
	}

	seq_puts(seq, "\n");

	return 0;
}

static int acpi_system_sleep_open_fs(struct inode *inode, struct file *file)
{
	return single_open(file, acpi_system_sleep_seq_show, PDE(inode)->data);
}

static ssize_t
acpi_system_write_sleep(struct file *file,
			const char __user * buffer, size_t count, loff_t * ppos)
{
	char str[12];
	u32 state = 0;
	int error = 0;

	if (count > sizeof(str) - 1)
		goto Done;
	memset(str, 0, sizeof(str));
	if (copy_from_user(str, buffer, count))
		return -EFAULT;

	/* Check for S4 bios request */
	if (!strcmp(str, "4b")) {
		error = acpi_suspend(4);
		goto Done;
	}
	state = simple_strtoul(str, NULL, 0);
#ifdef CONFIG_HIBERNATION
	if (state == 4) {
		error = hibernate();
		goto Done;
	}
#endif
	error = acpi_suspend(state);
      Done:
	return error ? error : count;
}
#endif				/* CONFIG_ACPI_PROCFS */

#if defined(CONFIG_RTC_DRV_CMOS) || defined(CONFIG_RTC_DRV_CMOS_MODULE) || !defined(CONFIG_X86)
/* use /sys/class/rtc/rtcX/wakealarm instead; it's not ACPI-specific */
#else
#define	HAVE_ACPI_LEGACY_ALARM
#endif

#ifdef	HAVE_ACPI_LEGACY_ALARM

static int acpi_system_alarm_seq_show(struct seq_file *seq, void *offset)
{
	u32 sec, min, hr;
	u32 day, mo, yr, cent = 0;
	unsigned char rtc_control = 0;
	unsigned long flags;

	ACPI_FUNCTION_TRACE("acpi_system_alarm_seq_show");

	spin_lock_irqsave(&rtc_lock, flags);

	sec = CMOS_READ(RTC_SECONDS_ALARM);
	min = CMOS_READ(RTC_MINUTES_ALARM);
	hr = CMOS_READ(RTC_HOURS_ALARM);
	rtc_control = CMOS_READ(RTC_CONTROL);

	/* If we ever get an FACP with proper values... */
	if (acpi_gbl_FADT.day_alarm)
		/* ACPI spec: only low 6 its should be cared */
		day = CMOS_READ(acpi_gbl_FADT.day_alarm) & 0x3F;
	else
		day = CMOS_READ(RTC_DAY_OF_MONTH);
	if (acpi_gbl_FADT.month_alarm)
		mo = CMOS_READ(acpi_gbl_FADT.month_alarm);
	else
		mo = CMOS_READ(RTC_MONTH);
	if (acpi_gbl_FADT.century)
		cent = CMOS_READ(acpi_gbl_FADT.century);

	yr = CMOS_READ(RTC_YEAR);

	spin_unlock_irqrestore(&rtc_lock, flags);

	if (!(rtc_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD) {
		BCD_TO_BIN(sec);
		BCD_TO_BIN(min);
		BCD_TO_BIN(hr);
		BCD_TO_BIN(day);
		BCD_TO_BIN(mo);
		BCD_TO_BIN(yr);
		BCD_TO_BIN(cent);
	}

	/* we're trusting the FADT (see above) */
	if (!acpi_gbl_FADT.century)
		/* If we're not trusting the FADT, we should at least make it
		 * right for _this_ century... ehm, what is _this_ century?
		 *
		 * TBD:
		 *  ASAP: find piece of code in the kernel, e.g. star tracker driver,
		 *        which we can trust to determine the century correctly. Atom
		 *        watch driver would be nice, too...
		 *
		 *  if that has not happened, change for first release in 2050:
		 *        if (yr<50)
		 *                yr += 2100;
		 *        else
		 *                yr += 2000;   // current line of code
		 *
		 *  if that has not happened either, please do on 2099/12/31:23:59:59
		 *        s/2000/2100
		 *
		 */
		yr += 2000;
	else
		yr += cent * 100;

	seq_printf(seq, "%4.4u-", yr);
	(mo > 12) ? seq_puts(seq, "**-") : seq_printf(seq, "%2.2u-", mo);
	(day > 31) ? seq_puts(seq, "** ") : seq_printf(seq, "%2.2u ", day);
	(hr > 23) ? seq_puts(seq, "**:") : seq_printf(seq, "%2.2u:", hr);
	(min > 59) ? seq_puts(seq, "**:") : seq_printf(seq, "%2.2u:", min);
	(sec > 59) ? seq_puts(seq, "**\n") : seq_printf(seq, "%2.2u\n", sec);

	return 0;
}

static int acpi_system_alarm_open_fs(struct inode *inode, struct file *file)
{
	return single_open(file, acpi_system_alarm_seq_show, PDE(inode)->data);
}

static int get_date_field(char **p, u32 * value)
{
	char *next = NULL;
	char *string_end = NULL;
	int result = -EINVAL;

	/*
	 * Try to find delimeter, only to insert null.  The end of the
	 * string won't have one, but is still valid.
	 */
	next = strpbrk(*p, "- :");
	if (next)
		*next++ = '\0';

	*value = simple_strtoul(*p, &string_end, 10);

	/* Signal success if we got a good digit */
	if (string_end != *p)
		result = 0;

	if (next)
		*p = next;

	return result;
}

/* Read a possibly BCD register, always return binary */
static u32 cmos_bcd_read(int offset, int rtc_control)
{
	u32 val = CMOS_READ(offset);
	if (!(rtc_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD)
		BCD_TO_BIN(val);
	return val;
}

/* Write binary value into possibly BCD register */
static void cmos_bcd_write(u32 val, int offset, int rtc_control)
{
	if (!(rtc_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD)
		BIN_TO_BCD(val);
	CMOS_WRITE(val, offset);
}

static ssize_t
acpi_system_write_alarm(struct file *file,
			const char __user * buffer, size_t count, loff_t * ppos)
{
	int result = 0;
	char alarm_string[30] = { '\0' };
	char *p = alarm_string;
	u32 sec, min, hr, day, mo, yr;
	int adjust = 0;
	unsigned char rtc_control = 0;

	ACPI_FUNCTION_TRACE("acpi_system_write_alarm");

	if (count > sizeof(alarm_string) - 1)
		return_VALUE(-EINVAL);

	if (copy_from_user(alarm_string, buffer, count))
		return_VALUE(-EFAULT);

	alarm_string[count] = '\0';

	/* check for time adjustment */
	if (alarm_string[0] == '+') {
		p++;
		adjust = 1;
	}

	if ((result = get_date_field(&p, &yr)))
		goto end;
	if ((result = get_date_field(&p, &mo)))
		goto end;
	if ((result = get_date_field(&p, &day)))
		goto end;
	if ((result = get_date_field(&p, &hr)))
		goto end;
	if ((result = get_date_field(&p, &min)))
		goto end;
	if ((result = get_date_field(&p, &sec)))
		goto end;

	if (sec > 59) {
		min += 1;
		sec -= 60;
	}
	if (min > 59) {
		hr += 1;
		min -= 60;
	}
	if (hr > 23) {
		day += 1;
		hr -= 24;
	}
	if (day > 31) {
		mo += 1;
		day -= 31;
	}
	if (mo > 12) {
		yr += 1;
		mo -= 12;
	}

	spin_lock_irq(&rtc_lock);

	rtc_control = CMOS_READ(RTC_CONTROL);

	if (adjust) {
		yr += cmos_bcd_read(RTC_YEAR, rtc_control);
		mo += cmos_bcd_read(RTC_MONTH, rtc_control);
		day += cmos_bcd_read(RTC_DAY_OF_MONTH, rtc_control);
		hr += cmos_bcd_read(RTC_HOURS, rtc_control);
		min += cmos_bcd_read(RTC_MINUTES, rtc_control);
		sec += cmos_bcd_read(RTC_SECONDS, rtc_control);
	}

	spin_unlock_irq(&rtc_lock);

	if (sec > 59) {
		min++;
		sec -= 60;
	}
	if (min > 59) {
		hr++;
		min -= 60;
	}
	if (hr > 23) {
		day++;
		hr -= 24;
	}
	if (day > 31) {
		mo++;
		day -= 31;
	}
	if (mo > 12) {
		yr++;
		mo -= 12;
	}

	spin_lock_irq(&rtc_lock);
	/*
	 * Disable alarm interrupt before setting alarm timer or else
	 * when ACPI_EVENT_RTC is enabled, a spurious ACPI interrupt occurs
	 */
	rtc_control &= ~RTC_AIE;
	CMOS_WRITE(rtc_control, RTC_CONTROL);
	CMOS_READ(RTC_INTR_FLAGS);

	/* write the fields the rtc knows about */
	cmos_bcd_write(hr, RTC_HOURS_ALARM, rtc_control);
	cmos_bcd_write(min, RTC_MINUTES_ALARM, rtc_control);
	cmos_bcd_write(sec, RTC_SECONDS_ALARM, rtc_control);

	/*
	 * If the system supports an enhanced alarm it will have non-zero
	 * offsets into the CMOS RAM here -- which for some reason are pointing
	 * to the RTC area of memory.
	 */
	if (acpi_gbl_FADT.day_alarm)
		cmos_bcd_write(day, acpi_gbl_FADT.day_alarm, rtc_control);
	if (acpi_gbl_FADT.month_alarm)
		cmos_bcd_write(mo, acpi_gbl_FADT.month_alarm, rtc_control);
	if (acpi_gbl_FADT.century)
		cmos_bcd_write(yr / 100, acpi_gbl_FADT.century, rtc_control);
	/* enable the rtc alarm interrupt */
	rtc_control |= RTC_AIE;
	CMOS_WRITE(rtc_control, RTC_CONTROL);
	CMOS_READ(RTC_INTR_FLAGS);

	spin_unlock_irq(&rtc_lock);

	acpi_clear_event(ACPI_EVENT_RTC);
	acpi_enable_event(ACPI_EVENT_RTC, 0);

	*ppos += count;

	result = 0;
      end:
	return_VALUE(result ? result : count);
}
#endif				/* HAVE_ACPI_LEGACY_ALARM */

extern struct list_head acpi_wakeup_device_list;
extern spinlock_t acpi_device_lock;

static int
acpi_system_wakeup_device_seq_show(struct seq_file *seq, void *offset)
{
	struct list_head *node, *next;

	seq_printf(seq, "Device\tS-state\t  Status   Sysfs node\n");

	spin_lock(&acpi_device_lock);
	list_for_each_safe(node, next, &acpi_wakeup_device_list) {
		struct acpi_device *dev =
		    container_of(node, struct acpi_device, wakeup_list);
		struct device *ldev;

		if (!dev->wakeup.flags.valid)
			continue;
		spin_unlock(&acpi_device_lock);

		ldev = acpi_get_physical_device(dev->handle);
		seq_printf(seq, "%s\t  S%d\t%c%-8s  ",
			   dev->pnp.bus_id,
			   (u32) dev->wakeup.sleep_state,
			   dev->wakeup.flags.run_wake ? '*' : ' ',
			   dev->wakeup.state.enabled ? "enabled" : "disabled");
		if (ldev)
			seq_printf(seq, "%s:%s",
				   ldev->bus ? ldev->bus->name : "no-bus",
				   ldev->bus_id);
		seq_printf(seq, "\n");
		put_device(ldev);

		spin_lock(&acpi_device_lock);
	}
	spin_unlock(&acpi_device_lock);
	return 0;
}

static ssize_t
acpi_system_write_wakeup_device(struct file *file,
				const char __user * buffer,
				size_t count, loff_t * ppos)
{
	struct list_head *node, *next;
	char strbuf[5];
	char str[5] = "";
	int len = count;
	struct acpi_device *found_dev = NULL;

	if (len > 4)
		len = 4;

	if (copy_from_user(strbuf, buffer, len))
		return -EFAULT;
	strbuf[len] = '\0';
	sscanf(strbuf, "%s", str);

	spin_lock(&acpi_device_lock);
	list_for_each_safe(node, next, &acpi_wakeup_device_list) {
		struct acpi_device *dev =
		    container_of(node, struct acpi_device, wakeup_list);
		if (!dev->wakeup.flags.valid)
			continue;

		if (!strncmp(dev->pnp.bus_id, str, 4)) {
			dev->wakeup.state.enabled =
			    dev->wakeup.state.enabled ? 0 : 1;
			found_dev = dev;
			break;
		}
	}
	if (found_dev) {
		list_for_each_safe(node, next, &acpi_wakeup_device_list) {
			struct acpi_device *dev = container_of(node,
							       struct
							       acpi_device,
							       wakeup_list);

			if ((dev != found_dev) &&
			    (dev->wakeup.gpe_number ==
			     found_dev->wakeup.gpe_number)
			    && (dev->wakeup.gpe_device ==
				found_dev->wakeup.gpe_device)) {
				printk(KERN_WARNING
				       "ACPI: '%s' and '%s' have the same GPE, "
				       "can't disable/enable one seperately\n",
				       dev->pnp.bus_id, found_dev->pnp.bus_id);
				dev->wakeup.state.enabled =
				    found_dev->wakeup.state.enabled;
			}
		}
	}
	spin_unlock(&acpi_device_lock);
	return count;
}

static int
acpi_system_wakeup_device_open_fs(struct inode *inode, struct file *file)
{
	return single_open(file, acpi_system_wakeup_device_seq_show,
			   PDE(inode)->data);
}

static const struct file_operations acpi_system_wakeup_device_fops = {
	.open = acpi_system_wakeup_device_open_fs,
	.read = seq_read,
	.write = acpi_system_write_wakeup_device,
	.llseek = seq_lseek,
	.release = single_release,
};

#ifdef	CONFIG_ACPI_PROCFS
static const struct file_operations acpi_system_sleep_fops = {
	.open = acpi_system_sleep_open_fs,
	.read = seq_read,
	.write = acpi_system_write_sleep,
	.llseek = seq_lseek,
	.release = single_release,
};
#endif				/* CONFIG_ACPI_PROCFS */

#ifdef	HAVE_ACPI_LEGACY_ALARM
static const struct file_operations acpi_system_alarm_fops = {
	.open = acpi_system_alarm_open_fs,
	.read = seq_read,
	.write = acpi_system_write_alarm,
	.llseek = seq_lseek,
	.release = single_release,
};

static u32 rtc_handler(void *context)
{
	acpi_clear_event(ACPI_EVENT_RTC);
	acpi_disable_event(ACPI_EVENT_RTC, 0);

	return ACPI_INTERRUPT_HANDLED;
}
#endif				/* HAVE_ACPI_LEGACY_ALARM */

static int __init acpi_sleep_proc_init(void)
{
	struct proc_dir_entry *entry = NULL;

	if (acpi_disabled)
		return 0;

#ifdef	CONFIG_ACPI_PROCFS
	/* 'sleep' [R/W] */
	entry =
	    create_proc_entry("sleep", S_IFREG | S_IRUGO | S_IWUSR,
			      acpi_root_dir);
	if (entry)
		entry->proc_fops = &acpi_system_sleep_fops;
#endif				/* CONFIG_ACPI_PROCFS */

#ifdef	HAVE_ACPI_LEGACY_ALARM
	/* 'alarm' [R/W] */
	entry =
	    create_proc_entry("alarm", S_IFREG | S_IRUGO | S_IWUSR,
			      acpi_root_dir);
	if (entry)
		entry->proc_fops = &acpi_system_alarm_fops;

	acpi_install_fixed_event_handler(ACPI_EVENT_RTC, rtc_handler, NULL);
#endif				/* HAVE_ACPI_LEGACY_ALARM */

	/* 'wakeup device' [R/W] */
	entry =
	    create_proc_entry("wakeup", S_IFREG | S_IRUGO | S_IWUSR,
			      acpi_root_dir);
	if (entry)
		entry->proc_fops = &acpi_system_wakeup_device_fops;

	return 0;
}

late_initcall(acpi_sleep_proc_init);
Commit	Line	Data
1da177e4 LT	1	#include <linux/proc_fs.h>
	2	#include <linux/seq_file.h>
	3	#include <linux/suspend.h>
	4	#include <linux/bcd.h>
	5	#include <asm/uaccess.h>
	6
	7	#include <acpi/acpi_bus.h>
	8	#include <acpi/acpi_drivers.h>
	9
	10	#ifdef CONFIG_X86
	11	#include <linux/mc146818rtc.h>
	12	#endif
	13
	14	#include "sleep.h"
	15
1da177e4	16	#define _COMPONENT ACPI_SYSTEM_COMPONENT
43532c8a LB	17
	18	/*
	19	* this file provides support for:
	20	* /proc/acpi/sleep
	21	* /proc/acpi/alarm
	22	* /proc/acpi/wakeup
	23	*/
	24
4be44fcd	25	ACPI_MODULE_NAME("sleep")
134c2171	26	#ifdef CONFIG_ACPI_PROCFS
1da177e4 LT	27	static int acpi_system_sleep_seq_show(struct seq_file seq, void offset)
1da177e4 LT	28	{
4be44fcd	29	int i;
1da177e4 LT	30
	31	ACPI_FUNCTION_TRACE("acpi_system_sleep_seq_show");
	32
	33	for (i = 0; i <= ACPI_STATE_S5; i++) {
	34	if (sleep_states[i]) {
4be44fcd	35	seq_printf(seq, "S%d ", i);
1da177e4 LT	36	}
	37	}
	38
	39	seq_puts(seq, "\n");
	40
	41	return 0;
	42	}
	43
	44	static int acpi_system_sleep_open_fs(struct inode inode, struct file file)
	45	{
	46	return single_open(file, acpi_system_sleep_seq_show, PDE(inode)->data);
	47	}
	48
	49	static ssize_t
4be44fcd LB	50	acpi_system_write_sleep(struct file *file,
4be44fcd LB	51	const char __user * buffer, size_t count, loff_t * ppos)
1da177e4	52	{
4be44fcd LB	53	char str[12];
	54	u32 state = 0;
	55	int error = 0;
1da177e4 LT	56
	57	if (count > sizeof(str) - 1)
	58	goto Done;
4be44fcd	59	memset(str, 0, sizeof(str));
1da177e4 LT	60	if (copy_from_user(str, buffer, count))
	61	return -EFAULT;
	62
	63	/* Check for S4 bios request */
4be44fcd	64	if (!strcmp(str, "4b")) {
1da177e4 LT	65	error = acpi_suspend(4);
	66	goto Done;
	67	}
	68	state = simple_strtoul(str, NULL, 0);
b0cb1a19	69	#ifdef CONFIG_HIBERNATION
1da177e4	70	if (state == 4) {
a3d25c27	71	error = hibernate();
1da177e4 LT	72	goto Done;
	73	}
	74	#endif
	75	error = acpi_suspend(state);
4be44fcd	76	Done:
1da177e4 LT	77	return error ? error : count;
1da177e4 LT	78	}
134c2171	79	#endif /* CONFIG_ACPI_PROCFS */
1da177e4	80
673d5b43	81	#if defined(CONFIG_RTC_DRV_CMOS) \|\| defined(CONFIG_RTC_DRV_CMOS_MODULE) \|\| !defined(CONFIG_X86)
f5f72b46 DB	82	/* use /sys/class/rtc/rtcX/wakealarm instead; it's not ACPI-specific */
	83	#else
	84	#define HAVE_ACPI_LEGACY_ALARM
	85	#endif
	86
	87	#ifdef HAVE_ACPI_LEGACY_ALARM
	88
1da177e4 LT	89	static int acpi_system_alarm_seq_show(struct seq_file seq, void offset)
1da177e4 LT	90	{
4be44fcd	91	u32 sec, min, hr;
ad71860a	92	u32 day, mo, yr, cent = 0;
4be44fcd LB	93	unsigned char rtc_control = 0;
4be44fcd LB	94	unsigned long flags;
1da177e4 LT	95
	96	ACPI_FUNCTION_TRACE("acpi_system_alarm_seq_show");
	97
	98	spin_lock_irqsave(&rtc_lock, flags);
	99
	100	sec = CMOS_READ(RTC_SECONDS_ALARM);
	101	min = CMOS_READ(RTC_MINUTES_ALARM);
	102	hr = CMOS_READ(RTC_HOURS_ALARM);
	103	rtc_control = CMOS_READ(RTC_CONTROL);
	104
	105	/* If we ever get an FACP with proper values... */
ad71860a	106	if (acpi_gbl_FADT.day_alarm)
1da177e4	107	/* ACPI spec: only low 6 its should be cared */
ad71860a	108	day = CMOS_READ(acpi_gbl_FADT.day_alarm) & 0x3F;
1da177e4	109	else
4be44fcd	110	day = CMOS_READ(RTC_DAY_OF_MONTH);
ad71860a AS	111	if (acpi_gbl_FADT.month_alarm)
ad71860a AS	112	mo = CMOS_READ(acpi_gbl_FADT.month_alarm);
1da177e4 LT	113	else
1da177e4 LT	114	mo = CMOS_READ(RTC_MONTH);
ad71860a AS	115	if (acpi_gbl_FADT.century)
	116	cent = CMOS_READ(acpi_gbl_FADT.century);
	117
	118	yr = CMOS_READ(RTC_YEAR);
1da177e4 LT	119
	120	spin_unlock_irqrestore(&rtc_lock, flags);
	121
	122	if (!(rtc_control & RTC_DM_BINARY) \|\| RTC_ALWAYS_BCD) {
	123	BCD_TO_BIN(sec);
	124	BCD_TO_BIN(min);
	125	BCD_TO_BIN(hr);
	126	BCD_TO_BIN(day);
	127	BCD_TO_BIN(mo);
	128	BCD_TO_BIN(yr);
ad71860a	129	BCD_TO_BIN(cent);
1da177e4 LT	130	}
1da177e4 LT	131
4be44fcd	132	/* we're trusting the FADT (see above) */
ad71860a	133	if (!acpi_gbl_FADT.century)
4be44fcd LB	134	/* If we're not trusting the FADT, we should at least make it
	135	* right for _this_ century... ehm, what is _this_ century?
	136	*
	137	* TBD:
	138	* ASAP: find piece of code in the kernel, e.g. star tracker driver,
	139	* which we can trust to determine the century correctly. Atom
	140	* watch driver would be nice, too...
	141	*
	142	* if that has not happened, change for first release in 2050:
	143	* if (yr<50)
	144	* yr += 2100;
	145	* else
	146	* yr += 2000; // current line of code
	147	*
	148	* if that has not happened either, please do on 2099/12/31:23:59:59
	149	* s/2000/2100
	150	*
	151	*/
1da177e4	152	yr += 2000;
ad71860a AS	153	else
ad71860a AS	154	yr += cent * 100;
1da177e4	155
4be44fcd LB	156	seq_printf(seq, "%4.4u-", yr);
	157	(mo > 12) ? seq_puts(seq, "**-") : seq_printf(seq, "%2.2u-", mo);
	158	(day > 31) ? seq_puts(seq, "** ") : seq_printf(seq, "%2.2u ", day);
	159	(hr > 23) ? seq_puts(seq, "**:") : seq_printf(seq, "%2.2u:", hr);
	160	(min > 59) ? seq_puts(seq, "**:") : seq_printf(seq, "%2.2u:", min);
1da177e4 LT	161	(sec > 59) ? seq_puts(seq, "**\n") : seq_printf(seq, "%2.2u\n", sec);
	162
	163	return 0;
	164	}
	165
	166	static int acpi_system_alarm_open_fs(struct inode inode, struct file file)
	167	{
	168	return single_open(file, acpi_system_alarm_seq_show, PDE(inode)->data);
	169	}
	170
4be44fcd	171	static int get_date_field(char *p, u32 value)
1da177e4	172	{
4be44fcd LB	173	char *next = NULL;
	174	char *string_end = NULL;
	175	int result = -EINVAL;
1da177e4 LT	176
	177	/*
	178	* Try to find delimeter, only to insert null. The end of the
	179	* string won't have one, but is still valid.
	180	*/
	181	next = strpbrk(*p, "- :");
	182	if (next)
	183	*next++ = '\0';
	184
	185	value = simple_strtoul(p, &string_end, 10);
	186
	187	/* Signal success if we got a good digit */
	188	if (string_end != *p)
	189	result = 0;
	190
	191	if (next)
	192	*p = next;
	193
	194	return result;
	195	}
	196
c67c36e4 LT	197	/* Read a possibly BCD register, always return binary */
	198	static u32 cmos_bcd_read(int offset, int rtc_control)
	199	{
	200	u32 val = CMOS_READ(offset);
	201	if (!(rtc_control & RTC_DM_BINARY) \|\| RTC_ALWAYS_BCD)
	202	BCD_TO_BIN(val);
	203	return val;
	204	}
	205
	206	/* Write binary value into possibly BCD register */
	207	static void cmos_bcd_write(u32 val, int offset, int rtc_control)
	208	{
	209	if (!(rtc_control & RTC_DM_BINARY) \|\| RTC_ALWAYS_BCD)
	210	BIN_TO_BCD(val);
	211	CMOS_WRITE(val, offset);
	212	}
	213
1da177e4	214	static ssize_t
4be44fcd LB	215	acpi_system_write_alarm(struct file *file,
4be44fcd LB	216	const char __user * buffer, size_t count, loff_t * ppos)
1da177e4	217	{
4be44fcd LB	218	int result = 0;
	219	char alarm_string[30] = { '\0' };
	220	char *p = alarm_string;
	221	u32 sec, min, hr, day, mo, yr;
	222	int adjust = 0;
	223	unsigned char rtc_control = 0;
1da177e4 LT	224
	225	ACPI_FUNCTION_TRACE("acpi_system_write_alarm");
	226
	227	if (count > sizeof(alarm_string) - 1)
	228	return_VALUE(-EINVAL);
4be44fcd	229
1da177e4 LT	230	if (copy_from_user(alarm_string, buffer, count))
	231	return_VALUE(-EFAULT);
	232
	233	alarm_string[count] = '\0';
	234
	235	/* check for time adjustment */
	236	if (alarm_string[0] == '+') {
	237	p++;
	238	adjust = 1;
	239	}
	240
	241	if ((result = get_date_field(&p, &yr)))
	242	goto end;
	243	if ((result = get_date_field(&p, &mo)))
	244	goto end;
	245	if ((result = get_date_field(&p, &day)))
	246	goto end;
	247	if ((result = get_date_field(&p, &hr)))
	248	goto end;
	249	if ((result = get_date_field(&p, &min)))
	250	goto end;
	251	if ((result = get_date_field(&p, &sec)))
	252	goto end;
	253
	254	if (sec > 59) {
	255	min += 1;
	256	sec -= 60;
	257	}
	258	if (min > 59) {
	259	hr += 1;
	260	min -= 60;
	261	}
	262	if (hr > 23) {
	263	day += 1;
	264	hr -= 24;
	265	}
	266	if (day > 31) {
	267	mo += 1;
	268	day -= 31;
	269	}
	270	if (mo > 12) {
	271	yr += 1;
	272	mo -= 12;
	273	}
	274
	275	spin_lock_irq(&rtc_lock);
	276
	277	rtc_control = CMOS_READ(RTC_CONTROL);
1da177e4 LT	278
1da177e4 LT	279	if (adjust) {
c67c36e4 LT	280	yr += cmos_bcd_read(RTC_YEAR, rtc_control);
	281	mo += cmos_bcd_read(RTC_MONTH, rtc_control);
	282	day += cmos_bcd_read(RTC_DAY_OF_MONTH, rtc_control);
	283	hr += cmos_bcd_read(RTC_HOURS, rtc_control);
	284	min += cmos_bcd_read(RTC_MINUTES, rtc_control);
	285	sec += cmos_bcd_read(RTC_SECONDS, rtc_control);
1da177e4 LT	286	}
	287
	288	spin_unlock_irq(&rtc_lock);
	289
1da177e4 LT	290	if (sec > 59) {
	291	min++;
	292	sec -= 60;
	293	}
	294	if (min > 59) {
	295	hr++;
	296	min -= 60;
	297	}
	298	if (hr > 23) {
	299	day++;
	300	hr -= 24;
	301	}
	302	if (day > 31) {
	303	mo++;
	304	day -= 31;
	305	}
	306	if (mo > 12) {
	307	yr++;
	308	mo -= 12;
	309	}
1da177e4 LT	310
	311	spin_lock_irq(&rtc_lock);
	312	/*
	313	* Disable alarm interrupt before setting alarm timer or else
	314	* when ACPI_EVENT_RTC is enabled, a spurious ACPI interrupt occurs
	315	*/
	316	rtc_control &= ~RTC_AIE;
	317	CMOS_WRITE(rtc_control, RTC_CONTROL);
	318	CMOS_READ(RTC_INTR_FLAGS);
	319
	320	/* write the fields the rtc knows about */
c67c36e4 LT	321	cmos_bcd_write(hr, RTC_HOURS_ALARM, rtc_control);
	322	cmos_bcd_write(min, RTC_MINUTES_ALARM, rtc_control);
	323	cmos_bcd_write(sec, RTC_SECONDS_ALARM, rtc_control);
1da177e4 LT	324
	325	/*
	326	* If the system supports an enhanced alarm it will have non-zero
	327	* offsets into the CMOS RAM here -- which for some reason are pointing
	328	* to the RTC area of memory.
	329	*/
ad71860a	330	if (acpi_gbl_FADT.day_alarm)
c67c36e4	331	cmos_bcd_write(day, acpi_gbl_FADT.day_alarm, rtc_control);
ad71860a	332	if (acpi_gbl_FADT.month_alarm)
c67c36e4	333	cmos_bcd_write(mo, acpi_gbl_FADT.month_alarm, rtc_control);
ad71860a	334	if (acpi_gbl_FADT.century)
c67c36e4	335	cmos_bcd_write(yr / 100, acpi_gbl_FADT.century, rtc_control);
1da177e4 LT	336	/* enable the rtc alarm interrupt */
	337	rtc_control \|= RTC_AIE;
	338	CMOS_WRITE(rtc_control, RTC_CONTROL);
	339	CMOS_READ(RTC_INTR_FLAGS);
	340
	341	spin_unlock_irq(&rtc_lock);
	342
	343	acpi_clear_event(ACPI_EVENT_RTC);
	344	acpi_enable_event(ACPI_EVENT_RTC, 0);
	345
	346	*ppos += count;
	347
	348	result = 0;
4be44fcd	349	end:
1da177e4 LT	350	return_VALUE(result ? result : count);
1da177e4 LT	351	}
fd350943	352	#endif /* HAVE_ACPI_LEGACY_ALARM */
1da177e4	353
4be44fcd	354	extern struct list_head acpi_wakeup_device_list;
1da177e4 LT	355	extern spinlock_t acpi_device_lock;
	356
	357	static int
	358	acpi_system_wakeup_device_seq_show(struct seq_file seq, void offset)
	359	{
4be44fcd	360	struct list_head node, next;
1da177e4	361
8aa55591	362	seq_printf(seq, "Device\tS-state\t Status Sysfs node\n");
1da177e4 LT	363
	364	spin_lock(&acpi_device_lock);
	365	list_for_each_safe(node, next, &acpi_wakeup_device_list) {
4be44fcd LB	366	struct acpi_device *dev =
4be44fcd LB	367	container_of(node, struct acpi_device, wakeup_list);
8aa55591	368	struct device *ldev;
1da177e4 LT	369
	370	if (!dev->wakeup.flags.valid)
	371	continue;
	372	spin_unlock(&acpi_device_lock);
8aa55591 DB	373
	374	ldev = acpi_get_physical_device(dev->handle);
	375	seq_printf(seq, "%s\t S%d\t%c%-8s ",
4be44fcd LB	376	dev->pnp.bus_id,
4be44fcd LB	377	(u32) dev->wakeup.sleep_state,
8aa55591	378	dev->wakeup.flags.run_wake ? '*' : ' ',
c65ade4d	379	dev->wakeup.state.enabled ? "enabled" : "disabled");
8aa55591 DB	380	if (ldev)
8aa55591 DB	381	seq_printf(seq, "%s:%s",
fd350943 LB	382	ldev->bus ? ldev->bus->name : "no-bus",
fd350943 LB	383	ldev->bus_id);
8aa55591 DB	384	seq_printf(seq, "\n");
	385	put_device(ldev);
	386
1da177e4 LT	387	spin_lock(&acpi_device_lock);
	388	}
	389	spin_unlock(&acpi_device_lock);
	390	return 0;
	391	}
	392
	393	static ssize_t
4be44fcd LB	394	acpi_system_write_wakeup_device(struct file *file,
	395	const char __user * buffer,
	396	size_t count, loff_t * ppos)
1da177e4	397	{
4be44fcd LB	398	struct list_head node, next;
	399	char strbuf[5];
	400	char str[5] = "";
	401	int len = count;
1da177e4 LT	402	struct acpi_device *found_dev = NULL;
1da177e4 LT	403
4be44fcd LB	404	if (len > 4)
4be44fcd LB	405	len = 4;
1da177e4 LT	406
	407	if (copy_from_user(strbuf, buffer, len))
	408	return -EFAULT;
	409	strbuf[len] = '\0';
	410	sscanf(strbuf, "%s", str);
	411
	412	spin_lock(&acpi_device_lock);
	413	list_for_each_safe(node, next, &acpi_wakeup_device_list) {
4be44fcd LB	414	struct acpi_device *dev =
4be44fcd LB	415	container_of(node, struct acpi_device, wakeup_list);
1da177e4 LT	416	if (!dev->wakeup.flags.valid)
	417	continue;
	418
	419	if (!strncmp(dev->pnp.bus_id, str, 4)) {
4be44fcd LB	420	dev->wakeup.state.enabled =
4be44fcd LB	421	dev->wakeup.state.enabled ? 0 : 1;
1da177e4 LT	422	found_dev = dev;
	423	break;
	424	}
	425	}
	426	if (found_dev) {
	427	list_for_each_safe(node, next, &acpi_wakeup_device_list) {
4be44fcd LB	428	struct acpi_device *dev = container_of(node,
	429	struct
	430	acpi_device,
	431	wakeup_list);
1da177e4 LT	432
1da177e4 LT	433	if ((dev != found_dev) &&
4be44fcd LB	434	(dev->wakeup.gpe_number ==
	435	found_dev->wakeup.gpe_number)
	436	&& (dev->wakeup.gpe_device ==
	437	found_dev->wakeup.gpe_device)) {
	438	printk(KERN_WARNING
	439	"ACPI: '%s' and '%s' have the same GPE, "
	440	"can't disable/enable one seperately\n",
	441	dev->pnp.bus_id, found_dev->pnp.bus_id);
	442	dev->wakeup.state.enabled =
	443	found_dev->wakeup.state.enabled;
1da177e4 LT	444	}
	445	}
	446	}
	447	spin_unlock(&acpi_device_lock);
	448	return count;
	449	}
	450
	451	static int
	452	acpi_system_wakeup_device_open_fs(struct inode inode, struct file file)
	453	{
4be44fcd LB	454	return single_open(file, acpi_system_wakeup_device_seq_show,
4be44fcd LB	455	PDE(inode)->data);
1da177e4 LT	456	}
1da177e4 LT	457
d7508032	458	static const struct file_operations acpi_system_wakeup_device_fops = {
4be44fcd LB	459	.open = acpi_system_wakeup_device_open_fs,
	460	.read = seq_read,
	461	.write = acpi_system_write_wakeup_device,
	462	.llseek = seq_lseek,
	463	.release = single_release,
1da177e4 LT	464	};
1da177e4 LT	465
134c2171	466	#ifdef CONFIG_ACPI_PROCFS
d7508032	467	static const struct file_operations acpi_system_sleep_fops = {
4be44fcd LB	468	.open = acpi_system_sleep_open_fs,
	469	.read = seq_read,
	470	.write = acpi_system_write_sleep,
	471	.llseek = seq_lseek,
	472	.release = single_release,
1da177e4	473	};
134c2171	474	#endif /* CONFIG_ACPI_PROCFS */
1da177e4	475
f5f72b46	476	#ifdef HAVE_ACPI_LEGACY_ALARM
d7508032	477	static const struct file_operations acpi_system_alarm_fops = {
4be44fcd LB	478	.open = acpi_system_alarm_open_fs,
	479	.read = seq_read,
	480	.write = acpi_system_write_alarm,
	481	.llseek = seq_lseek,
	482	.release = single_release,
1da177e4 LT	483	};
1da177e4 LT	484
4be44fcd	485	static u32 rtc_handler(void *context)
1da177e4 LT	486	{
	487	acpi_clear_event(ACPI_EVENT_RTC);
	488	acpi_disable_event(ACPI_EVENT_RTC, 0);
	489
	490	return ACPI_INTERRUPT_HANDLED;
	491	}
fd350943	492	#endif /* HAVE_ACPI_LEGACY_ALARM */
1da177e4	493
f5f72b46	494	static int __init acpi_sleep_proc_init(void)
1da177e4	495	{
c65ade4d	496	struct proc_dir_entry *entry = NULL;
1da177e4 LT	497
	498	if (acpi_disabled)
	499	return 0;
4be44fcd	500
134c2171	501	#ifdef CONFIG_ACPI_PROCFS
c65ade4d	502	/* 'sleep' [R/W] */
4be44fcd LB	503	entry =
	504	create_proc_entry("sleep", S_IFREG \| S_IRUGO \| S_IWUSR,
	505	acpi_root_dir);
1da177e4 LT	506	if (entry)
1da177e4 LT	507	entry->proc_fops = &acpi_system_sleep_fops;
43532c8a	508	#endif /* CONFIG_ACPI_PROCFS */
1da177e4	509
f5f72b46	510	#ifdef HAVE_ACPI_LEGACY_ALARM
1da177e4	511	/* 'alarm' [R/W] */
4be44fcd LB	512	entry =
	513	create_proc_entry("alarm", S_IFREG \| S_IRUGO \| S_IWUSR,
	514	acpi_root_dir);
1da177e4 LT	515	if (entry)
	516	entry->proc_fops = &acpi_system_alarm_fops;
	517
f5f72b46	518	acpi_install_fixed_event_handler(ACPI_EVENT_RTC, rtc_handler, NULL);
fd350943	519	#endif /* HAVE_ACPI_LEGACY_ALARM */
f5f72b46	520
c65ade4d	521	/* 'wakeup device' [R/W] */
4be44fcd LB	522	entry =
	523	create_proc_entry("wakeup", S_IFREG \| S_IRUGO \| S_IWUSR,
	524	acpi_root_dir);
1da177e4 LT	525	if (entry)
	526	entry->proc_fops = &acpi_system_wakeup_device_fops;
	527
1da177e4 LT	528	return 0;
	529	}
	530
	531	late_initcall(acpi_sleep_proc_init);