[net-next-2.6.git] / drivers / acpi / 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;

	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 u32 cmos_bcd_read(int offset, int rtc_control);

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

	spin_lock_irqsave(&rtc_lock, flags);

	rtc_control = CMOS_READ(RTC_CONTROL);
	sec = cmos_bcd_read(RTC_SECONDS_ALARM, rtc_control);
	min = cmos_bcd_read(RTC_MINUTES_ALARM, rtc_control);
	hr = cmos_bcd_read(RTC_HOURS_ALARM, 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;
		if (!(rtc_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD)
			day = bcd2bin(day);
	} else
		day = cmos_bcd_read(RTC_DAY_OF_MONTH, rtc_control);
	if (acpi_gbl_FADT.month_alarm)
		mo = cmos_bcd_read(acpi_gbl_FADT.month_alarm, rtc_control);
	else {
		mo = cmos_bcd_read(RTC_MONTH, rtc_control);
		today = cmos_bcd_read(RTC_DAY_OF_MONTH, rtc_control);
	}
	if (acpi_gbl_FADT.century)
		cent = cmos_bcd_read(acpi_gbl_FADT.century, rtc_control);

	yr = cmos_bcd_read(RTC_YEAR, rtc_control);

	spin_unlock_irqrestore(&rtc_lock, flags);

	/* 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;

	/*
	 * Show correct dates for alarms up to a month into the future.
	 * This solves issues for nearly all situations with the common
	 * 30-day alarm clocks in PC hardware.
	 */
	if (day < today) {
		if (mo < 12) {
			mo += 1;
		} else {
			mo = 1;
			yr += 1;
		}
	}

	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.
	 */
	if (*p == NULL)
		return result;

	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;
	else
		*p = NULL;

	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)
		val = bcd2bin(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)
		val = bin2bcd(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;

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

	if (copy_from_user(alarm_string, buffer, count))
		return -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;

	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;
		sec = sec%60;
	}
	if (min > 59) {
		hr += min/60;
		min = min%60;
	}
	if (hr > 23) {
		day += hr/24;
		hr = hr%24;
	}
	if (day > 31) {
		mo += day/32;
		day = day%32;
	}
	if (mo > 12) {
		yr += mo/13;
		mo = mo%13;
	}

	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) {
		if (adjust)
			yr += cmos_bcd_read(acpi_gbl_FADT.century, rtc_control) * 100;
		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 result ? result : count;
}
#endif				/* HAVE_ACPI_LEGACY_ALARM */

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");

	mutex_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;

		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",
				   dev_name(ldev));
		seq_printf(seq, "\n");
		put_device(ldev);

	}
	mutex_unlock(&acpi_device_lock);
	return 0;
}

static void physical_device_enable_wakeup(struct acpi_device *adev)
{
	struct device *dev = acpi_get_physical_device(adev->handle);

	if (dev && device_can_wakeup(dev))
		device_set_wakeup_enable(dev, adev->wakeup.state.enabled);
}

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] = "";
	unsigned int len = count;
	struct acpi_device *found_dev = NULL;

	if (len > 4)
		len = 4;
	if (len < 0)
		return -EFAULT;

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

	mutex_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) {
		physical_device_enable_wakeup(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;
				physical_device_enable_wakeup(dev);
			}
		}
	}
	mutex_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 = {
	.owner = THIS_MODULE,
	.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 = {
	.owner = THIS_MODULE,
	.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 = {
	.owner = THIS_MODULE,
	.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 */

int __init acpi_sleep_proc_init(void)
{
#ifdef	CONFIG_ACPI_PROCFS
	/* 'sleep' [R/W] */
	proc_create("sleep", S_IFREG | S_IRUGO | S_IWUSR,
		    acpi_root_dir, &acpi_system_sleep_fops);
#endif				/* CONFIG_ACPI_PROCFS */

#ifdef	HAVE_ACPI_LEGACY_ALARM
	/* 'alarm' [R/W] */
	proc_create("alarm", S_IFREG | S_IRUGO | S_IWUSR,
		    acpi_root_dir, &acpi_system_alarm_fops);

	acpi_install_fixed_event_handler(ACPI_EVENT_RTC, rtc_handler, NULL);
	/*
	 * Disable the RTC event after installing RTC handler.
	 * Only when RTC alarm is set will it be enabled.
	 */
	acpi_clear_event(ACPI_EVENT_RTC);
	acpi_disable_event(ACPI_EVENT_RTC, 0);
#endif				/* HAVE_ACPI_LEGACY_ALARM */

	/* 'wakeup device' [R/W] */
	proc_create("wakeup", S_IFREG | S_IRUGO | S_IWUSR,
		    acpi_root_dir, &acpi_system_wakeup_device_fops);

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