src/linux/apm.c

   1 /*
   2  * The olsr.org Optimized Link-State Routing daemon(olsrd)
   3  * Copyright (c) 2004, Andreas Tønnesen(andreto@olsr.org)
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  *
  10  * * Redistributions of source code must retain the above copyright
  11  *   notice, this list of conditions and the following disclaimer.
  12  * * Redistributions in binary form must reproduce the above copyright
  13  *   notice, this list of conditions and the following disclaimer in
  14  *   the documentation and/or other materials provided with the
  15  *   distribution.
  16  * * Neither the name of olsr.org, olsrd nor the names of its
  17  *   contributors may be used to endorse or promote products derived
  18  *   from this software without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  21  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
  23  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
  24  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
  25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
  26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  28  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
  30  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  31  * POSSIBILITY OF SUCH DAMAGE.
  32  *
  33  * Visit http://www.olsr.org for more information.
  34  *
  35  * If you find this software useful feel free to make a donation
  36  * to the project. For more information see the website or contact
  37  * the copyright holders.
  38  *
  39  * $Id: apm.c,v 1.18 2007/04/25 22:08:17 bernd67 Exp $
  40  */
  41
  42 /*
  43  * Much of the ACPI code is taken from Florian Schaefers
  44  * Acpi-Power Enlightenment epplet
  45  */
  46
  47 #include "apm.h"
  48 #include "defs.h"
  49 #include <stdio.h>
  50 #include <string.h>
  51 #include <stdlib.h>
  52
  53 /* APM related stuff */
  54
  55 #define APM_PROC "/proc/apm"
  56
  57 struct linux_apm_info
  58 {
  59   char driver_version[10];
  60   int apm_version_major;
  61   int apm_version_minor;
  62   int apm_flags;
  63   int ac_line_status;
  64   int battery_status;
  65   int battery_flags;
  66   int battery_percentage;
  67   int battery_time;
  68   int using_minutes;
  69 };
  70
  71
  72 /* ACPI related stuff */
  73
  74 #define ACPI_PROC "/proc/acpi/info"
  75
  76 static const char * acpi_info[] =
  77   {
  78     "/proc/acpi/battery/0/info",
  79     "/proc/acpi/battery/1/info",
  80     "/proc/acpi/battery/BATA/info",
  81     "/proc/acpi/battery/BAT0/info",
  82     "/proc/acpi/battery/BAT1/info"
  83   };
  84
  85 static const char * acpi_state[] =
  86   {
  87     "/proc/acpi/battery/0/status",
  88     "/proc/acpi/battery/1/status",
  89     "/proc/acpi/battery/BATA/state",
  90     "/proc/acpi/battery/BAT0/state",
  91     "/proc/acpi/battery/BAT1/state"
  92   };
  93
  94
  95 #define ACPI_BT_CNT  (sizeof(acpi_state) / sizeof(char *))
  96
  97
  98 static const char * acpi_ac[] =
  99   {
 100     "/proc/acpi/ac_adapter/0/status",
 101     "/proc/acpi/ac_adapter/AC/state",
 102     "/proc/acpi/ac_adapter/ACAD/state"
 103   };
 104
 105 #define ACPI_AC_CNT  (sizeof(acpi_ac) / sizeof(char *))
 106
 107
 108 #define USE_APM    1
 109 #define USE_ACPI   2
 110
 111 static int method, fd_index;
 112
 113 /* Prototypes */
 114
 115 static int
 116 apm_read_apm(struct olsr_apm_info *);
 117
 118 static int
 119 apm_read_acpi(struct olsr_apm_info *);
 120
 121 static int
 122 acpi_probe(void);
 123
 124
 125 int
 126 apm_init(void)
 127 {
 128   struct olsr_apm_info ainfo;
 129
 130   method = -1;
 131   OLSR_PRINTF(3, "Initializing APM\n");
 132
 133   if(((fd_index = acpi_probe()) >= 0) && apm_read_acpi(&ainfo))
 134     method = USE_ACPI;
 135   else if(apm_read_apm(&ainfo))
 136     method = USE_APM;
 137
 138   if(method != -1)
 139     apm_printinfo(&ainfo);
 140
 141   return method;
 142 }
 143
 144
 145 void
 146 apm_printinfo(struct olsr_apm_info *ainfo)
 147 {
 148   OLSR_PRINTF(5, "APM info:\n\tAC status %d\n\tBattery percentage %d%%\n\tBattery time left %d mins\n\n",
 149               ainfo->ac_line_status,
 150               ainfo->battery_percentage,
 151               ainfo->battery_time_left);
 152 }
 153
 154
 155 int
 156 apm_read(struct olsr_apm_info *ainfo)
 157 {
 158   switch(method)
 159     {
 160     case(USE_APM):
 161       return apm_read_apm(ainfo);
 162     case(USE_ACPI):
 163       return apm_read_acpi(ainfo);
 164     default:
 165       break;
 166     }
 167   return 0;
 168 }
 169
 170
 171 static int
 172 apm_read_apm(struct olsr_apm_info *ainfo)
 173 {
 174   char buffer[100];
 175   char units[10];
 176   FILE *apm_procfile;
 177   struct linux_apm_info lainfo;
 178
 179   /* Open procfile */
 180   if((apm_procfile = fopen(APM_PROC, "r")) == NULL)
 181     return 0;
 182
 183   if(fgets(buffer, sizeof(buffer), apm_procfile) == NULL)
 184     {
 185       fclose(apm_procfile);
 186       /* Try re-opening the file */
 187       if((apm_procfile = fopen(APM_PROC, "r")) != NULL)
 188         return 0;
 189
 190       if(fgets(buffer, sizeof(buffer), apm_procfile) == NULL)
 191         {
 192           /* Giving up */
 193           fprintf(stderr, "OLSRD: Could not read APM info - setting willingness to default");
 194           fclose(apm_procfile);
 195           return 0;
 196         }
 197     }
 198   fclose(apm_procfile);
 199
 200
 201   //printf("READ: %s\n", buffer);
 202
 203   /* Get the info */
 204   sscanf(buffer, "%s %d.%d %x %x %x %x %d%% %d %s\n",
 205          lainfo.driver_version,
 206          &lainfo.apm_version_major,
 207          &lainfo.apm_version_minor,
 208          &lainfo.apm_flags,
 209          &lainfo.ac_line_status,
 210          &lainfo.battery_status,
 211          &lainfo.battery_flags,
 212          &lainfo.battery_percentage,
 213          &lainfo.battery_time,
 214          units);
 215
 216   lainfo.using_minutes = !strncmp(units, "min", 3) ? 1 : 0;
 217
 218   /*
 219    * Should take care of old APM type info here
 220    */
 221
 222   /*
 223    * Fix possible percentage error
 224    */
 225   if(lainfo.battery_percentage > 100)
 226     lainfo.battery_percentage = -1;
 227
 228   /* Fill the provided struct */
 229
 230   if(lainfo.ac_line_status)
 231     ainfo->ac_line_status = OLSR_AC_POWERED;
 232   else
 233     ainfo->ac_line_status = OLSR_BATTERY_POWERED;
 234
 235   ainfo->battery_percentage = lainfo.battery_percentage;
 236   ainfo->battery_time_left = lainfo.battery_time;
 237
 238   return 1;
 239 }
 240
 241
 242 static int
 243 apm_read_acpi(struct olsr_apm_info *ainfo)
 244 {
 245   FILE *fd;
 246   int bat_max = 5000; /* Find some sane value */
 247   int bat_val = 0;
 248
 249   printf("READING ACPI\n");
 250
 251
 252   if(fd_index < 0)
 253     {
 254       /* No battery was found or AC power was detected */
 255       ainfo->ac_line_status = OLSR_AC_POWERED;
 256       ainfo->battery_percentage = 100;
 257       return 1;
 258     }
 259
 260   /* Get maxvalue */
 261   if((fd = fopen(acpi_info[fd_index], "r")) == NULL)
 262     return 0;
 263
 264   for(;;)
 265     {
 266       char s1[32], s2[32], s3[32], s4[32], inbuff[127];
 267       if (fgets(inbuff, sizeof(inbuff), fd) == NULL)
 268         break;
 269
 270       sscanf(inbuff, "%s %s %s %s", s1, s2, s3, s4);
 271       if (!strcasecmp(s2, "full"))
 272           bat_max = atoi(s4);
 273     }
 274   fclose(fd);
 275
 276
 277   if((fd = fopen(acpi_state[fd_index], "r")) == NULL)
 278     return 0;
 279
 280   /* Extract battery status */
 281   for(;;)
 282     {
 283       char s1[32], s2[32], s3[32], s4[32], inbuff[127];
 284       if (fgets(inbuff, sizeof(inbuff), fd) == NULL)
 285         break;
 286       sscanf(inbuff, "%s %s %s %s", s1, s2, s3, s4);
 287
 288       /* find remaining juice */
 289       if(!strcasecmp(s1, "Remaining"))
 290           bat_val = atoi(s3);
 291     }
 292   fclose(fd);
 293
 294   ainfo->ac_line_status = OLSR_BATTERY_POWERED;
 295   ainfo->battery_percentage = bat_val * 100 / bat_max;
 296
 297   return 1;
 298 }
 299
 300
 301 static int
 302 acpi_probe(void)
 303 {
 304   unsigned int i;
 305
 306   /* First check for AC power */
 307
 308   for(i = 0; i < ACPI_AC_CNT; i++)
 309     {
 310       char s1[32], s2[32];
 311       int rc;
 312       FILE *fd = fopen(acpi_ac[i], "r");
 313
 314       /* Try opening the info file */
 315       if(fd == NULL)
 316         continue;
 317
 318       /* Extract info */
 319       rc = fscanf(fd, "%s %s", s1, s2);
 320
 321       /* Close info entry */
 322       fclose(fd);
 323
 324       if(rc < 2)
 325           continue;
 326
 327       /* Running on AC power */
 328       if(!strcasecmp(s2, "on-line"))
 329         return -1;
 330     }
 331
 332   /* Only checking the first found battery entry... */
 333   for(i = 0; i < ACPI_BT_CNT; i ++)
 334     {
 335       char s1[32], s2[32];
 336       int rc;
 337       FILE *fd = fopen(acpi_info[i], "r");
 338
 339       /* Try opening the info file */
 340       if(fd == NULL)
 341         continue;
 342
 343       /* Extract info */
 344       rc = fscanf(fd, "%s %s", s1, s2);
 345       /* Close info entry */
 346       fclose(fd);
 347
 348       if(rc < 2)
 349           continue;
 350
 351       /* Check if battery is present */
 352       if((!strcasecmp(s1, "present:")) && (!strcasecmp(s2, "no")))
 353         continue;
 354
 355       /* Open the corresponding state file */
 356       if((fd = fopen(acpi_state[i], "r")) == NULL)
 357         continue;
 358
 359       fclose(fd);
 360       return i;
 361     }
 362
 363   /* No battery found */
 364   return -1;
 365 }