[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/alarm
 * /proc/acpi/wakeup
 */

ACPI_MODULE_NAME("sleep")

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