[linux.git] / drivers / acpi / proc.c

#include <linux/proc_fs.h>
#include <linux/seq_file.h>
#include <linux/export.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 acpi_device_physical_node *entry;

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

		seq_printf(seq, "%s\t  S%d\t",
			   dev->pnp.bus_id,
			   (u32) dev->wakeup.sleep_state);

		if (!dev->physical_node_count) {
			seq_printf(seq, "%c%-8s\n",
				dev->wakeup.flags.run_wake ? '*' : ' ',
				device_may_wakeup(&dev->dev) ?
					"enabled" : "disabled");
		} else {
			struct device *ldev;
			list_for_each_entry(entry, &dev->physical_node_list,
					node) {
				ldev = get_device(entry->dev);
				if (!ldev)
					continue;

				if (&entry->node !=
						dev->physical_node_list.next)
					seq_printf(seq, "\t\t");

				seq_printf(seq, "%c%-8s  %s:%s\n",
					dev->wakeup.flags.run_wake ? '*' : ' ',
					(device_may_wakeup(&dev->dev) ||
					(ldev && device_may_wakeup(ldev))) ?
					"enabled" : "disabled",
					ldev->bus ? ldev->bus->name :
					"no-bus", dev_name(ldev));
				put_device(ldev);
			}
		}
	}
	mutex_unlock(&acpi_device_lock);
	return 0;
}

static void physical_device_enable_wakeup(struct acpi_device *adev)
{
	struct acpi_device_physical_node *entry;

	list_for_each_entry(entry,
		&adev->physical_node_list, node)
		if (entry->dev && device_can_wakeup(entry->dev)) {
			bool enable = !device_may_wakeup(entry->dev);
			device_set_wakeup_enable(entry->dev, enable);
		}
}

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] = "";

	if (count > 4)
		count = 4;

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