[mirror_ubuntu-bionic-kernel.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 ? '*' : ' ',
			   (device_may_wakeup(&dev->dev)
			     || (ldev && device_may_wakeup(ldev))) ?
			       "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)) {
		bool enable = !device_may_wakeup(dev);
		device_set_wakeup_enable(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] = "";
	unsigned int len = count;

	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)) {
			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>
	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 ? '*' : ' ',
f2b56bc8 RW	314	(device_may_wakeup(&dev->dev)
	315	\|\| (ldev && device_may_wakeup(ldev))) ?
	316	"enabled" : "disabled");
8aa55591 DB	317	if (ldev)
8aa55591 DB	318	seq_printf(seq, "%s:%s",
77fb61a0	319	ldev->bus ? ldev->bus->name : "no-bus",
0794469d	320	dev_name(ldev));
8aa55591 DB	321	seq_printf(seq, "\n");
	322	put_device(ldev);
	323
1da177e4	324	}
9090589d	325	mutex_unlock(&acpi_device_lock);
1da177e4 LT	326	return 0;
	327	}
	328
76acae04 RW	329	static void physical_device_enable_wakeup(struct acpi_device *adev)
	330	{
	331	struct device *dev = acpi_get_physical_device(adev->handle);
	332
f2b56bc8 RW	333	if (dev && device_can_wakeup(dev)) {
	334	bool enable = !device_may_wakeup(dev);
	335	device_set_wakeup_enable(dev, enable);
	336	}
76acae04 RW	337	}
76acae04 RW	338
1da177e4	339	static ssize_t
4be44fcd LB	340	acpi_system_write_wakeup_device(struct file *file,
	341	const char __user * buffer,
	342	size_t count, loff_t * ppos)
1da177e4	343	{
4be44fcd LB	344	struct list_head node, next;
	345	char strbuf[5];
	346	char str[5] = "";
52a2b11c	347	unsigned int len = count;
1da177e4	348
4be44fcd LB	349	if (len > 4)
4be44fcd LB	350	len = 4;
d9f65018 AV	351	if (len < 0)
d9f65018 AV	352	return -EFAULT;
1da177e4 LT	353
	354	if (copy_from_user(strbuf, buffer, len))
	355	return -EFAULT;
	356	strbuf[len] = '\0';
	357	sscanf(strbuf, "%s", str);
	358
9090589d	359	mutex_lock(&acpi_device_lock);
1da177e4	360	list_for_each_safe(node, next, &acpi_wakeup_device_list) {
4be44fcd LB	361	struct acpi_device *dev =
4be44fcd LB	362	container_of(node, struct acpi_device, wakeup_list);
1da177e4 LT	363	if (!dev->wakeup.flags.valid)
	364	continue;
	365
	366	if (!strncmp(dev->pnp.bus_id, str, 4)) {
f2b56bc8 RW	367	if (device_can_wakeup(&dev->dev)) {
	368	bool enable = !device_may_wakeup(&dev->dev);
	369	device_set_wakeup_enable(&dev->dev, enable);
	370	} else {
	371	physical_device_enable_wakeup(dev);
	372	}
1da177e4 LT	373	break;
	374	}
	375	}
9090589d	376	mutex_unlock(&acpi_device_lock);
1da177e4 LT	377	return count;
	378	}
	379
	380	static int
	381	acpi_system_wakeup_device_open_fs(struct inode inode, struct file file)
	382	{
4be44fcd LB	383	return single_open(file, acpi_system_wakeup_device_seq_show,
4be44fcd LB	384	PDE(inode)->data);
1da177e4 LT	385	}
1da177e4 LT	386
d7508032	387	static const struct file_operations acpi_system_wakeup_device_fops = {
cf7acfab	388	.owner = THIS_MODULE,
4be44fcd LB	389	.open = acpi_system_wakeup_device_open_fs,
	390	.read = seq_read,
	391	.write = acpi_system_write_wakeup_device,
	392	.llseek = seq_lseek,
	393	.release = single_release,
1da177e4 LT	394	};
1da177e4 LT	395
f5f72b46	396	#ifdef HAVE_ACPI_LEGACY_ALARM
d7508032	397	static const struct file_operations acpi_system_alarm_fops = {
cf7acfab	398	.owner = THIS_MODULE,
4be44fcd LB	399	.open = acpi_system_alarm_open_fs,
	400	.read = seq_read,
	401	.write = acpi_system_write_alarm,
	402	.llseek = seq_lseek,
	403	.release = single_release,
1da177e4 LT	404	};
1da177e4 LT	405
4be44fcd	406	static u32 rtc_handler(void *context)
1da177e4 LT	407	{
	408	acpi_clear_event(ACPI_EVENT_RTC);
	409	acpi_disable_event(ACPI_EVENT_RTC, 0);
	410
	411	return ACPI_INTERRUPT_HANDLED;
	412	}
fd350943	413	#endif /* HAVE_ACPI_LEGACY_ALARM */
1da177e4	414
9cee43e0	415	int __init acpi_sleep_proc_init(void)
1da177e4	416	{
f5f72b46	417	#ifdef HAVE_ACPI_LEGACY_ALARM
1da177e4	418	/* 'alarm' [R/W] */
cf7acfab DL	419	proc_create("alarm", S_IFREG \| S_IRUGO \| S_IWUSR,
cf7acfab DL	420	acpi_root_dir, &acpi_system_alarm_fops);
1da177e4	421
f5f72b46	422	acpi_install_fixed_event_handler(ACPI_EVENT_RTC, rtc_handler, NULL);
e1094bfa ZY	423	/*
	424	* Disable the RTC event after installing RTC handler.
	425	* Only when RTC alarm is set will it be enabled.
	426	*/
	427	acpi_clear_event(ACPI_EVENT_RTC);
	428	acpi_disable_event(ACPI_EVENT_RTC, 0);
fd350943	429	#endif /* HAVE_ACPI_LEGACY_ALARM */
f5f72b46	430
c65ade4d	431	/* 'wakeup device' [R/W] */
cf7acfab DL	432	proc_create("wakeup", S_IFREG \| S_IRUGO \| S_IWUSR,
cf7acfab DL	433	acpi_root_dir, &acpi_system_wakeup_device_fops);
1da177e4	434
1da177e4 LT	435	return 0;
1da177e4 LT	436	}