ACPI / video: Quirk initial backlight level 0
[linux-3.10.git] / drivers / acpi / proc.c
1 #include <linux/proc_fs.h>
2 #include <linux/seq_file.h>
3 #include <linux/export.h>
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
17 #define _COMPONENT              ACPI_SYSTEM_COMPONENT
18
19 /*
20  * this file provides support for:
21  * /proc/acpi/alarm
22  * /proc/acpi/wakeup
23  */
24
25 ACPI_MODULE_NAME("sleep")
26
27 #if defined(CONFIG_RTC_DRV_CMOS) || defined(CONFIG_RTC_DRV_CMOS_MODULE) || !defined(CONFIG_X86)
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
35 static u32 cmos_bcd_read(int offset, int rtc_control);
36
37 static int acpi_system_alarm_seq_show(struct seq_file *seq, void *offset)
38 {
39         u32 sec, min, hr;
40         u32 day, mo, yr, cent = 0;
41         u32 today = 0;
42         unsigned char rtc_control = 0;
43         unsigned long flags;
44
45         spin_lock_irqsave(&rtc_lock, flags);
46
47         rtc_control = CMOS_READ(RTC_CONTROL);
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);
51
52         /* If we ever get an FACP with proper values... */
53         if (acpi_gbl_FADT.day_alarm) {
54                 /* ACPI spec: only low 6 its should be cared */
55                 day = CMOS_READ(acpi_gbl_FADT.day_alarm) & 0x3F;
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);
60         if (acpi_gbl_FADT.month_alarm)
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         }
66         if (acpi_gbl_FADT.century)
67                 cent = cmos_bcd_read(acpi_gbl_FADT.century, rtc_control);
68
69         yr = cmos_bcd_read(RTC_YEAR, rtc_control);
70
71         spin_unlock_irqrestore(&rtc_lock, flags);
72
73         /* we're trusting the FADT (see above) */
74         if (!acpi_gbl_FADT.century)
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                  */
93                 yr += 2000;
94         else
95                 yr += cent * 100;
96
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
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);
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_DATA(inode));
124 }
125
126 static int get_date_field(char **p, u32 * value)
127 {
128         char *next = NULL;
129         char *string_end = NULL;
130         int result = -EINVAL;
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          */
136         if (*p == NULL)
137                 return result;
138
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;
151         else
152                 *p = NULL;
153
154         return result;
155 }
156
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)
162                 val = bcd2bin(val);
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)
170                 val = bin2bcd(val);
171         CMOS_WRITE(val, offset);
172 }
173
174 static ssize_t
175 acpi_system_write_alarm(struct file *file,
176                         const char __user * buffer, size_t count, loff_t * ppos)
177 {
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;
184
185         if (count > sizeof(alarm_string) - 1)
186                 return -EINVAL;
187
188         if (copy_from_user(alarm_string, buffer, count))
189                 return -EFAULT;
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
212         spin_lock_irq(&rtc_lock);
213
214         rtc_control = CMOS_READ(RTC_CONTROL);
215
216         if (adjust) {
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);
223         }
224
225         spin_unlock_irq(&rtc_lock);
226
227         if (sec > 59) {
228                 min += sec/60;
229                 sec = sec%60;
230         }
231         if (min > 59) {
232                 hr += min/60;
233                 min = min%60;
234         }
235         if (hr > 23) {
236                 day += hr/24;
237                 hr = hr%24;
238         }
239         if (day > 31) {
240                 mo += day/32;
241                 day = day%32;
242         }
243         if (mo > 12) {
244                 yr += mo/13;
245                 mo = mo%13;
246         }
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 */
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);
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          */
267         if (acpi_gbl_FADT.day_alarm)
268                 cmos_bcd_write(day, acpi_gbl_FADT.day_alarm, rtc_control);
269         if (acpi_gbl_FADT.month_alarm)
270                 cmos_bcd_write(mo, acpi_gbl_FADT.month_alarm, rtc_control);
271         if (acpi_gbl_FADT.century) {
272                 if (adjust)
273                         yr += cmos_bcd_read(acpi_gbl_FADT.century, rtc_control) * 100;
274                 cmos_bcd_write(yr / 100, acpi_gbl_FADT.century, rtc_control);
275         }
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;
289       end:
290         return result ? result : count;
291 }
292 #endif                          /* HAVE_ACPI_LEGACY_ALARM */
293
294 static int
295 acpi_system_wakeup_device_seq_show(struct seq_file *seq, void *offset)
296 {
297         struct list_head *node, *next;
298
299         seq_printf(seq, "Device\tS-state\t  Status   Sysfs node\n");
300
301         mutex_lock(&acpi_device_lock);
302         list_for_each_safe(node, next, &acpi_wakeup_device_list) {
303                 struct acpi_device *dev =
304                     container_of(node, struct acpi_device, wakeup_list);
305                 struct acpi_device_physical_node *entry;
306
307                 if (!dev->wakeup.flags.valid)
308                         continue;
309
310                 seq_printf(seq, "%s\t  S%d\t",
311                            dev->pnp.bus_id,
312                            (u32) dev->wakeup.sleep_state);
313
314                 mutex_lock(&dev->physical_node_lock);
315
316                 if (!dev->physical_node_count) {
317                         seq_printf(seq, "%c%-8s\n",
318                                 dev->wakeup.flags.run_wake ? '*' : ' ',
319                                 device_may_wakeup(&dev->dev) ?
320                                         "enabled" : "disabled");
321                 } else {
322                         struct device *ldev;
323                         list_for_each_entry(entry, &dev->physical_node_list,
324                                         node) {
325                                 ldev = get_device(entry->dev);
326                                 if (!ldev)
327                                         continue;
328
329                                 if (&entry->node !=
330                                                 dev->physical_node_list.next)
331                                         seq_printf(seq, "\t\t");
332
333                                 seq_printf(seq, "%c%-8s  %s:%s\n",
334                                         dev->wakeup.flags.run_wake ? '*' : ' ',
335                                         (device_may_wakeup(&dev->dev) ||
336                                         (ldev && device_may_wakeup(ldev))) ?
337                                         "enabled" : "disabled",
338                                         ldev->bus ? ldev->bus->name :
339                                         "no-bus", dev_name(ldev));
340                                 put_device(ldev);
341                         }
342                 }
343
344                 mutex_unlock(&dev->physical_node_lock);
345         }
346         mutex_unlock(&acpi_device_lock);
347         return 0;
348 }
349
350 static void physical_device_enable_wakeup(struct acpi_device *adev)
351 {
352         struct acpi_device_physical_node *entry;
353
354         mutex_lock(&adev->physical_node_lock);
355
356         list_for_each_entry(entry,
357                 &adev->physical_node_list, node)
358                 if (entry->dev && device_can_wakeup(entry->dev)) {
359                         bool enable = !device_may_wakeup(entry->dev);
360                         device_set_wakeup_enable(entry->dev, enable);
361                 }
362
363         mutex_unlock(&adev->physical_node_lock);
364 }
365
366 static ssize_t
367 acpi_system_write_wakeup_device(struct file *file,
368                                 const char __user * buffer,
369                                 size_t count, loff_t * ppos)
370 {
371         struct list_head *node, *next;
372         char strbuf[5];
373         char str[5] = "";
374
375         if (count > 4)
376                 count = 4;
377
378         if (copy_from_user(strbuf, buffer, count))
379                 return -EFAULT;
380         strbuf[count] = '\0';
381         sscanf(strbuf, "%s", str);
382
383         mutex_lock(&acpi_device_lock);
384         list_for_each_safe(node, next, &acpi_wakeup_device_list) {
385                 struct acpi_device *dev =
386                     container_of(node, struct acpi_device, wakeup_list);
387                 if (!dev->wakeup.flags.valid)
388                         continue;
389
390                 if (!strncmp(dev->pnp.bus_id, str, 4)) {
391                         if (device_can_wakeup(&dev->dev)) {
392                                 bool enable = !device_may_wakeup(&dev->dev);
393                                 device_set_wakeup_enable(&dev->dev, enable);
394                         } else {
395                                 physical_device_enable_wakeup(dev);
396                         }
397                         break;
398                 }
399         }
400         mutex_unlock(&acpi_device_lock);
401         return count;
402 }
403
404 static int
405 acpi_system_wakeup_device_open_fs(struct inode *inode, struct file *file)
406 {
407         return single_open(file, acpi_system_wakeup_device_seq_show,
408                            PDE_DATA(inode));
409 }
410
411 static const struct file_operations acpi_system_wakeup_device_fops = {
412         .owner = THIS_MODULE,
413         .open = acpi_system_wakeup_device_open_fs,
414         .read = seq_read,
415         .write = acpi_system_write_wakeup_device,
416         .llseek = seq_lseek,
417         .release = single_release,
418 };
419
420 #ifdef  HAVE_ACPI_LEGACY_ALARM
421 static const struct file_operations acpi_system_alarm_fops = {
422         .owner = THIS_MODULE,
423         .open = acpi_system_alarm_open_fs,
424         .read = seq_read,
425         .write = acpi_system_write_alarm,
426         .llseek = seq_lseek,
427         .release = single_release,
428 };
429
430 static u32 rtc_handler(void *context)
431 {
432         acpi_clear_event(ACPI_EVENT_RTC);
433         acpi_disable_event(ACPI_EVENT_RTC, 0);
434
435         return ACPI_INTERRUPT_HANDLED;
436 }
437 #endif                          /* HAVE_ACPI_LEGACY_ALARM */
438
439 int __init acpi_sleep_proc_init(void)
440 {
441 #ifdef  HAVE_ACPI_LEGACY_ALARM
442         /* 'alarm' [R/W] */
443         proc_create("alarm", S_IFREG | S_IRUGO | S_IWUSR,
444                     acpi_root_dir, &acpi_system_alarm_fops);
445
446         acpi_install_fixed_event_handler(ACPI_EVENT_RTC, rtc_handler, NULL);
447         /*
448          * Disable the RTC event after installing RTC handler.
449          * Only when RTC alarm is set will it be enabled.
450          */
451         acpi_clear_event(ACPI_EVENT_RTC);
452         acpi_disable_event(ACPI_EVENT_RTC, 0);
453 #endif                          /* HAVE_ACPI_LEGACY_ALARM */
454
455         /* 'wakeup device' [R/W] */
456         proc_create("wakeup", S_IFREG | S_IRUGO | S_IWUSR,
457                     acpi_root_dir, &acpi_system_wakeup_device_fops);
458
459         return 0;
460 }