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