5bf74b4e39fe05c05ea6f0b8d441d275a1d12e02
[olsrd.git] / 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 }