-rw-r--r-- | core/opiealarm/opiealarm.c | 73 |
1 files changed, 42 insertions, 31 deletions
diff --git a/core/opiealarm/opiealarm.c b/core/opiealarm/opiealarm.c index bb2e684..5ea24b7 100644 --- a/core/opiealarm/opiealarm.c +++ b/core/opiealarm/opiealarm.c | |||
@@ -199,122 +199,133 @@ int main ( int argc, char **argv ) | |||
199 | } | 199 | } |
200 | 200 | ||
201 | parent_pid = 0; | 201 | parent_pid = 0; |
202 | return opt; | 202 | return opt; |
203 | } | 203 | } |
204 | 204 | ||
205 | 205 | ||
206 | int suspend ( int fix_rtc ) | 206 | int suspend ( int fix_rtc ) |
207 | { | 207 | { |
208 | FILE *fp; | 208 | FILE *fp; |
209 | char buf [64]; | 209 | char buf [64]; |
210 | time_t alrt, syst, rtct; | 210 | time_t alrt, syst, rtct; |
211 | struct tm alr, sys, rtc; | 211 | struct tm alr, sys, rtc; |
212 | int fd; | 212 | int fd; |
213 | int rtc_sys_diff; | 213 | int rtc_sys_diff; |
214 | 214 | ||
215 | 215 | ||
216 | if ( !fork_with_pidfile ( )) | 216 | if ( !fork_with_pidfile ( )) |
217 | return 3; | 217 | return 3; |
218 | 218 | ||
219 | // we are the child process from here on ... | 219 | // we are the child process from here on ... |
220 | 220 | ||
221 | tzset ( ); // not sure if it is really needed -- it probably doesn't hurt ... | 221 | tzset ( ); // not sure if it is really needed -- it probably doesn't hurt ... |
222 | 222 | ||
223 | do { // try/catch simulation | 223 | time ( &syst );// get the UNIX system time |
224 | sys = *localtime ( &syst ); | ||
224 | 225 | ||
225 | // read the wakeup time from /etc/resumeat | 226 | do { |
226 | if (!( fp = fopen ( "/etc/resumeat", "r" ))) | ||
227 | break; // ( 1, "/etc/resumeat" ); | ||
228 | |||
229 | if ( !fgets ( buf, sizeof( buf ) - 1, fp )) | ||
230 | break; // ( 1, "/etc/resumeat" ); | ||
231 | |||
232 | fclose ( fp ); | ||
233 | |||
234 | alrt = atoi ( buf ); // get the alarm time | ||
235 | if ( alrt == 0 ) | ||
236 | break; // ( 0, "/etc/resumeat contains an invalid time description" ); | ||
237 | alrt -= 5; // wake up 5 sec before the specified time | ||
238 | alr = *gmtime ( &alrt ); | ||
239 | |||
240 | time ( &syst );// get the UNIX system time | ||
241 | sys = *localtime ( &syst ); | ||
242 | 227 | ||
243 | if (( fd = open ( "/dev/misc/rtc", O_RDWR )) < 0 ) | 228 | if (( fd = open ( "/dev/misc/rtc", O_RDWR )) < 0 ) |
244 | if (( fd = open ( "/dev/rtc", O_RDWR )) < 0 ) | 229 | if (( fd = open ( "/dev/rtc", O_RDWR )) < 0 ) |
245 | break; // ( 1, "rtc" ); | 230 | break; // ( 1, "rtc" ); |
246 | 231 | ||
247 | memset ( &rtc, 0, sizeof ( struct tm )); // get the RTC time | 232 | memset ( &rtc, 0, sizeof ( struct tm )); // get the RTC time |
233 | |||
248 | if ( ioctl ( fd, RTC_RD_TIME, &rtc ) < 0 ) | 234 | if ( ioctl ( fd, RTC_RD_TIME, &rtc ) < 0 ) |
249 | break; // ( 1, "ioctl RTC_RD_TIME" ); | 235 | break; // ( 1, "ioctl RTC_RD_TIME" ); |
236 | |||
250 | rtct = mktime ( &rtc ); | 237 | rtct = mktime ( &rtc ); |
251 | 238 | ||
252 | rtc_sys_diff = ( syst - rtct ) - sys. tm_gmtoff; // calculate the difference between system and hardware time | 239 | rtc_sys_diff = ( syst - rtct ) - sys. tm_gmtoff; // calculate the difference between system and hardware time |
253 | 240 | ||
254 | if ( fix_rtc && (( rtc_sys_diff < -3 ) || ( rtc_sys_diff > 3 ))) { | 241 | if ( fix_rtc && (( rtc_sys_diff < -3 ) || ( rtc_sys_diff > 3 ))) { |
255 | struct tm set; | 242 | struct tm set; |
256 | set = *gmtime ( &syst ); | 243 | set = *gmtime ( &syst ); |
257 | 244 | ||
258 | // if the difference between system and hardware time is more than 3 seconds, | 245 | // if the difference between system and hardware time is more than 3 seconds, |
259 | // we have to set the RTC (hwclock --systohc), or alarms won't work reliably. | 246 | // we have to set the RTC (hwclock --systohc), or alarms won't work reliably. |
260 | 247 | ||
261 | if ( ioctl ( fd, RTC_SET_TIME, &set ) < 0 ) | 248 | if ( ioctl ( fd, RTC_SET_TIME, &set ) < 0 ) |
262 | break; // ( 1, "ioctl RTC_SET_TIME" ); | 249 | break; // ( 1, "ioctl RTC_SET_TIME" ); |
263 | } | 250 | } |
264 | 251 | ||
252 | // read the wakeup time from /etc/resumeat | ||
253 | if (!( fp = fopen ( "/etc/resumeat", "r" ))) | ||
254 | break; // ( 1, "/etc/resumeat" ); | ||
255 | |||
256 | if ( !fgets ( buf, sizeof( buf ) - 1, fp )) | ||
257 | break; // ( 1, "/etc/resumeat" ); | ||
258 | |||
259 | fclose ( fp ); | ||
260 | |||
261 | alrt = atoi ( buf ); // get the alarm time | ||
262 | |||
263 | if ( alrt == 0 ) | ||
264 | break; // ( 0, "/etc/resumeat contains an invalid time description" ); | ||
265 | alrt -= 5; // wake up 5 sec before the specified time | ||
266 | |||
267 | alr = *gmtime ( &alrt ); | ||
268 | |||
265 | if ( ioctl ( fd, RTC_ALM_SET, &alr ) < 0 ) // set RTC alarm time | 269 | if ( ioctl ( fd, RTC_ALM_SET, &alr ) < 0 ) // set RTC alarm time |
266 | break; // ( 1, "ioctl RTC_ALM_SET" ); | 270 | break; // ( 1, "ioctl RTC_ALM_SET" ); |
267 | if ( ioctl ( fd, RTC_AIE_ON, 0 ) < 0 ) | 271 | |
272 | if ( ioctl ( fd, RTC_AIE_ON, 0 ) < 0 ) | ||
268 | break; // ( 1, "ioctl RTC_AIE_ON" ); // enable RTC alarm irq | 273 | break; // ( 1, "ioctl RTC_AIE_ON" ); // enable RTC alarm irq |
269 | 274 | ||
270 | // tell the parent it is safe to exit now .. we have set the RTC alarm | 275 | // tell the parent it is safe to exit now .. we have set the RTC alarm |
271 | kill ( parent_pid, SIGUSR1 ); | 276 | kill ( parent_pid, SIGUSR1 ); |
272 | 277 | ||
273 | if ( read ( fd, buf, sizeof( unsigned long )) < 0 ) // wait for the RTC alarm irq | 278 | if ( read ( fd, buf, sizeof( unsigned long )) < 0 ) // wait for the RTC alarm irq |
274 | break; // ( 1, "read rtc alarm" ); | 279 | break; // ( 1, "read rtc alarm" ); |
275 | 280 | ||
276 | // iPAQ woke up via RTC irq -- otherwise we would have received a SIGUSR2 | 281 | // iPAQ woke up via RTC irq -- otherwise we would have received a SIGUSR2 |
277 | // from the "resume instance" of opiealarm. | 282 | // from the "resume instance" of opiealarm. |
278 | 283 | ||
279 | if ( ioctl ( fd, RTC_AIE_OFF, 0 ) < 0 ) // disable RTC alarm irq | 284 | if ( ioctl ( fd, RTC_AIE_OFF, 0 ) < 0 ) // disable RTC alarm irq |
280 | break; // ( 1, "ioctl RTC_AIE_OFF" ); | 285 | break; // ( 1, "ioctl RTC_AIE_OFF" ); |
281 | 286 | ||
282 | close ( fd ); | 287 | close ( fd ); |
283 | |||
284 | remove_pidfile ( ); // normal exit | ||
285 | return 0; | ||
286 | 288 | ||
287 | } while ( 0 ); | 289 | remove_pidfile ( ); |
290 | |||
291 | return 0; | ||
292 | |||
293 | } while ( 0 ) | ||
294 | |||
295 | if ( fp != NULL ) | ||
296 | fclose ( fp ); | ||
288 | 297 | ||
289 | kill ( parent_pid, SIGUSR1 ); // parent is still running - it can exit now | 298 | if ( fd != -1 ) |
299 | close ( fd ); | ||
300 | |||
301 | kill ( parent_pid, SIGUSR1 ); | ||
290 | 302 | ||
291 | while ( 1 ) // pretend that we are waiting on RTC, so opiealarm -r can kill us | 303 | while ( 1 ) // pretend that we are waiting on RTC, so opiealarm -r can kill us |
292 | sleep ( 1000 ); // if we don't do this, the "resuspend on AC" would be triggerd | 304 | sleep ( 1000 ); // if we don't do this, the "resuspend on AC" would be triggerd |
293 | return 0; | 305 | return 0; |
294 | } | 306 | } |
295 | 307 | ||
296 | |||
297 | int onac ( void ) | 308 | int onac ( void ) |
298 | { | 309 | { |
299 | FILE *fp; | 310 | FILE *fp; |
300 | int on = 0; | 311 | int on = 0; |
301 | 312 | ||
302 | // check the apm proc interface for AC status | 313 | // check the apm proc interface for AC status |
303 | 314 | ||
304 | if (( fp = fopen ( APMFILE, "r" ))) { | 315 | if (( fp = fopen ( APMFILE, "r" ))) { |
305 | int ac = 0; | 316 | int ac = 0; |
306 | 317 | ||
307 | if ( fscanf ( fp, "%*[^ ] %*d.%*d 0x%*x 0x%x 0x%*x 0x%*x %*d%% %*i %*c", &ac ) == 1 ) | 318 | if ( fscanf ( fp, "%*[^ ] %*d.%*d 0x%*x 0x%x 0x%*x 0x%*x %*d%% %*i %*c", &ac ) == 1 ) |
308 | on = ( ac == 0x01 ) ? 1 : 0; | 319 | on = ( ac == 0x01 ) ? 1 : 0; |
309 | 320 | ||
310 | fclose ( fp ); | 321 | fclose ( fp ); |
311 | } | 322 | } |
312 | return on; | 323 | return on; |
313 | } | 324 | } |
314 | 325 | ||
315 | int resume ( int resuspend ) | 326 | int resume ( int resuspend ) |
316 | { | 327 | { |
317 | FILE *fp; | 328 | FILE *fp; |
318 | 329 | ||
319 | // re-suspend when on AC (optional) when woken up via RTC | 330 | // re-suspend when on AC (optional) when woken up via RTC |
320 | 331 | ||