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