Logo Search packages:      
Sourcecode: linux version File versions  Download package

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/sleep
 * /proc/acpi/alarm
 * /proc/acpi/wakeup
 */

ACPI_MODULE_NAME("sleep")
#ifdef      CONFIG_ACPI_PROCFS
static int acpi_system_sleep_seq_show(struct seq_file *seq, void *offset)
{
      int i;

      ACPI_FUNCTION_TRACE("acpi_system_sleep_seq_show");

      for (i = 0; i <= ACPI_STATE_S5; i++) {
            if (sleep_states[i]) {
                  seq_printf(seq, "S%d ", i);
            }
      }

      seq_puts(seq, "\n");

      return 0;
}

static int acpi_system_sleep_open_fs(struct inode *inode, struct file *file)
{
      return single_open(file, acpi_system_sleep_seq_show, PDE(inode)->data);
}

static ssize_t
acpi_system_write_sleep(struct file *file,
                  const char __user * buffer, size_t count, loff_t * ppos)
{
      char str[12];
      u32 state = 0;
      int error = 0;

      if (count > sizeof(str) - 1)
            goto Done;
      memset(str, 0, sizeof(str));
      if (copy_from_user(str, buffer, count))
            return -EFAULT;

      /* Check for S4 bios request */
      if (!strcmp(str, "4b")) {
            error = acpi_suspend(4);
            goto Done;
      }
      state = simple_strtoul(str, NULL, 0);
#ifdef CONFIG_HIBERNATION
      if (state == 4) {
            error = hibernate();
            goto Done;
      }
#endif
      error = acpi_suspend(state);
      Done:
      return error ? error : count;
}
#endif                        /* CONFIG_ACPI_PROCFS */

#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 int acpi_system_alarm_seq_show(struct seq_file *seq, void *offset)
{
      u32 sec, min, hr;
      u32 day, mo, yr, cent = 0;
      unsigned char rtc_control = 0;
      unsigned long flags;

      ACPI_FUNCTION_TRACE("acpi_system_alarm_seq_show");

      spin_lock_irqsave(&rtc_lock, flags);

      sec = CMOS_READ(RTC_SECONDS_ALARM);
      min = CMOS_READ(RTC_MINUTES_ALARM);
      hr = CMOS_READ(RTC_HOURS_ALARM);
      rtc_control = CMOS_READ(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;
      else
            day = CMOS_READ(RTC_DAY_OF_MONTH);
      if (acpi_gbl_FADT.month_alarm)
            mo = CMOS_READ(acpi_gbl_FADT.month_alarm);
      else
            mo = CMOS_READ(RTC_MONTH);
      if (acpi_gbl_FADT.century)
            cent = CMOS_READ(acpi_gbl_FADT.century);

      yr = CMOS_READ(RTC_YEAR);

      spin_unlock_irqrestore(&rtc_lock, flags);

      if (!(rtc_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD) {
            BCD_TO_BIN(sec);
            BCD_TO_BIN(min);
            BCD_TO_BIN(hr);
            BCD_TO_BIN(day);
            BCD_TO_BIN(mo);
            BCD_TO_BIN(yr);
            BCD_TO_BIN(cent);
      }

      /* 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;

      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.
       */
      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;

      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)
            BCD_TO_BIN(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)
            BIN_TO_BCD(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;

      ACPI_FUNCTION_TRACE("acpi_system_write_alarm");

      if (count > sizeof(alarm_string) - 1)
            return_VALUE(-EINVAL);

      if (copy_from_user(alarm_string, buffer, count))
            return_VALUE(-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;

      if (sec > 59) {
            min += 1;
            sec -= 60;
      }
      if (min > 59) {
            hr += 1;
            min -= 60;
      }
      if (hr > 23) {
            day += 1;
            hr -= 24;
      }
      if (day > 31) {
            mo += 1;
            day -= 31;
      }
      if (mo > 12) {
            yr += 1;
            mo -= 12;
      }

      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;
      }
      if (min > 59) {
            hr++;
            min -= 60;
      }
      if (hr > 23) {
            day++;
            hr -= 24;
      }
      if (day > 31) {
            mo++;
            day -= 31;
      }
      if (mo > 12) {
            yr++;
            mo -= 12;
      }

      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)
            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_VALUE(result ? result : count);
}
#endif                        /* HAVE_ACPI_LEGACY_ALARM */

extern struct list_head acpi_wakeup_device_list;
extern spinlock_t acpi_device_lock;

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");

      spin_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;
            spin_unlock(&acpi_device_lock);

            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 ? '*' : ' ',
                     dev->wakeup.state.enabled ? "enabled" : "disabled");
            if (ldev)
                  seq_printf(seq, "%s:%s",
                           ldev->bus ? ldev->bus->name : "no-bus",
                           ldev->bus_id);
            seq_printf(seq, "\n");
            put_device(ldev);

            spin_lock(&acpi_device_lock);
      }
      spin_unlock(&acpi_device_lock);
      return 0;
}

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] = "";
      int len = count;
      struct acpi_device *found_dev = NULL;

      if (len > 4)
            len = 4;

      if (copy_from_user(strbuf, buffer, len))
            return -EFAULT;
      strbuf[len] = '\0';
      sscanf(strbuf, "%s", str);

      spin_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)) {
                  dev->wakeup.state.enabled =
                      dev->wakeup.state.enabled ? 0 : 1;
                  found_dev = dev;
                  break;
            }
      }
      if (found_dev) {
            list_for_each_safe(node, next, &acpi_wakeup_device_list) {
                  struct acpi_device *dev = container_of(node,
                                                 struct
                                                 acpi_device,
                                                 wakeup_list);

                  if ((dev != found_dev) &&
                      (dev->wakeup.gpe_number ==
                       found_dev->wakeup.gpe_number)
                      && (dev->wakeup.gpe_device ==
                        found_dev->wakeup.gpe_device)) {
                        printk(KERN_WARNING
                               "ACPI: '%s' and '%s' have the same GPE, "
                               "can't disable/enable one seperately\n",
                               dev->pnp.bus_id, found_dev->pnp.bus_id);
                        dev->wakeup.state.enabled =
                            found_dev->wakeup.state.enabled;
                  }
            }
      }
      spin_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 = {
      .open = acpi_system_wakeup_device_open_fs,
      .read = seq_read,
      .write = acpi_system_write_wakeup_device,
      .llseek = seq_lseek,
      .release = single_release,
};

#ifdef      CONFIG_ACPI_PROCFS
static const struct file_operations acpi_system_sleep_fops = {
      .open = acpi_system_sleep_open_fs,
      .read = seq_read,
      .write = acpi_system_write_sleep,
      .llseek = seq_lseek,
      .release = single_release,
};
#endif                        /* CONFIG_ACPI_PROCFS */

#ifdef      HAVE_ACPI_LEGACY_ALARM
static const struct file_operations acpi_system_alarm_fops = {
      .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 */

static int __init acpi_sleep_proc_init(void)
{
      struct proc_dir_entry *entry = NULL;

      if (acpi_disabled)
            return 0;

#ifdef      CONFIG_ACPI_PROCFS
      /* 'sleep' [R/W] */
      entry =
          create_proc_entry("sleep", S_IFREG | S_IRUGO | S_IWUSR,
                        acpi_root_dir);
      if (entry)
            entry->proc_fops = &acpi_system_sleep_fops;
#endif                        /* CONFIG_ACPI_PROCFS */

#ifdef      HAVE_ACPI_LEGACY_ALARM
      /* 'alarm' [R/W] */
      entry =
          create_proc_entry("alarm", S_IFREG | S_IRUGO | S_IWUSR,
                        acpi_root_dir);
      if (entry)
            entry->proc_fops = &acpi_system_alarm_fops;

      acpi_install_fixed_event_handler(ACPI_EVENT_RTC, rtc_handler, NULL);
#endif                        /* HAVE_ACPI_LEGACY_ALARM */

      /* 'wakeup device' [R/W] */
      entry =
          create_proc_entry("wakeup", S_IFREG | S_IRUGO | S_IWUSR,
                        acpi_root_dir);
      if (entry)
            entry->proc_fops = &acpi_system_wakeup_device_fops;

      return 0;
}

late_initcall(acpi_sleep_proc_init);

Generated by  Doxygen 1.6.0   Back to index