1 files changed, 3 insertions, 1 deletions

diff --git a/core/opiealarm/opiealarm.c b/core/opiealarm/opiealarm.c
index 072dca7..465e633 100644
--- a/core/opiealarm/opiealarm.c
+++ b/core/opiealarm/opiealarm.c
@@ -47,97 +47,97 @@ static pid_t parent_pid = 0;
 
 void sig_handler_child ( int sig )
 {
         // child got SIGUSR2 -> cleanup pidfile and exit
 
         remove_pidfile ( );
         exit ( 0 );
 }
 
 void sig_handler_parent ( int sig )
 {
         // parent got SIGUSR1 -> safe to exit now
 
                 parent_pid = 0;
         exit ( 0 );
 }
 
 void usage ( void )
 {
         fprintf ( stderr, "Usage: opiealarm -s [-f] | -r [-a]\n\n" );
         fprintf ( stderr, "\t-s\tSuspend mode: set RTC alarm\n" );
         fprintf ( stderr, "\t-f    \tFix RTC, if RTC and system have more than 5sec difference (suspend mode)\n" );
         fprintf ( stderr, "\t-r\tResume mode: kill running opiealarm\n" );
         fprintf ( stderr, "\t-a <x>\tResuspend in <x> seconds (resume mode)\n\n" );
         exit ( 1 );
 }
 
 int fork_with_pidfile ( void )
 {
         FILE *fp;
         pid_t pid;
         
         pid = fork ( );
         
         if ( pid > 0 ) {
                 // We can not just exit now, because the kernel could suspend 
                 // the iPAQ just before the child process sets the RTC.
                 // Solution: just wait for SIGUSR1 - the child process will 
                 // signal this when it thinks it is safe to exit.
                 
                 signal ( SIGUSR1, sig_handler_parent );
                 while ( 1 )
                         sleep ( 1000 );
                 exit ( 0 );
         }
         else if ( pid < 0 ) {
                 perror ( "forking failed" );
                 return 0;
-        }
+                }
 
         // child process needs to react to SIGUSR2. This is sent when
         // a new opiealarm process is started.
 
         signal ( SIGUSR2, sig_handler_child );
 
         // save pid
         if (( fp = fopen ( PIDFILE, "w" ))) {
                 fprintf ( fp, "%d", getpid ( ));
                 fclose ( fp );
 
                 // detach
                 close ( 0 );
                 close ( 1 );
                 close ( 2 );
 
                 setpgid ( 0, 0 );
 
                 return 1;
         }
         else {
                 perror ( PIDFILE );
                 return 0;
         }
 }
 
 int kill_with_pidfile ( void )
 {
         FILE *fp;
         pid_t pid;
         int res = 0;
 
         // terminate a running opiealarm child process
         // return 1 if we really killed one
 
         if (( fp = fopen ( PIDFILE, "r" ))) {
                 if ( fscanf ( fp, "%d", &pid ) == 1 )
                         res = ( kill ( pid, SIGUSR2 ) == 0 ) ? 1 : 0;
                 fclose ( fp );
         }
         return res;
 }
 
 void remove_pidfile ( void )
 {
         // child is about to exit - cleanup
 
                 unlink ( PIDFILE );
@@ -213,124 +213,126 @@ int suspend ( int fix_rtc )
         int fd;
         int rtc_sys_diff;
         
         
         if ( !fork_with_pidfile ( ))
                 return 3;
 
         // we are the child process from here on ...
 
         tzset ( );  // not sure if it is really needed -- it probably doesn't hurt ...
         
         time ( &syst );// get the UNIX system time
                 sys = *localtime ( &syst );     
         
         do {
                 
                 if (( fd = open ( "/dev/misc/rtc", O_RDWR )) < 0 )
                         if (( fd = open ( "/dev/rtc", O_RDWR )) < 0 )
                                         break; //  ( 1, "rtc" );
         
                 memset ( &rtc, 0, sizeof ( struct tm ));    // get the RTC time
         
                 if ( ioctl ( fd, RTC_RD_TIME, &rtc ) < 0 )
                                 break; //  ( 1, "ioctl RTC_RD_TIME" );  
         
                 rtct = mktime ( &rtc );
 
                 rtc_sys_diff = ( syst - rtct ) - sys. tm_gmtoff;  // calculate the difference between system and hardware time
         
                 if ( fix_rtc && (( rtc_sys_diff < -3 ) || ( rtc_sys_diff > 3 ))) {
                                 struct tm set;  
                         set = *gmtime ( &syst );
                 
                         // if the difference between system and hardware time is more than 3 seconds,
                         // we have to set the RTC (hwclock --systohc), or alarms won't work reliably.
 
                         if ( ioctl ( fd, RTC_SET_TIME, &set ) < 0 )
                                 break; //  ( 1, "ioctl RTC_SET_TIME" );
                 }
 
                 // read the wakeup time from TIMEFILE
                 if (!( fp = fopen ( TIMEFILE, "r" ))) 
                         break; //  ( 1, TIMEFILE );
         
                 if ( !fgets ( buf, sizeof( buf ) - 1, fp ))
                         break; //  ( 1, TIMEFILE );
 
                 fclose ( fp );
+                fp = 0;
         
                 alrt = atoi ( buf ); // get the alarm time
 
                 if ( alrt == 0 )
                                 break; //  ( 0, TIMEFILE " contains an invalid time description" );
                         alrt -= 5;      // wake up 5 sec before the specified time
         
                 alr = *gmtime ( &alrt );
         
                 if ( ioctl ( fd, RTC_ALM_SET, &alr ) < 0 )  // set RTC alarm time
                                 break; //  ( 1, "ioctl RTC_ALM_SET" );  
         
                  if ( ioctl ( fd, RTC_AIE_ON, 0 ) < 0 )
                         break; //  ( 1, "ioctl RTC_AIE_ON" );   // enable RTC alarm irq
 
                 // tell the parent it is safe to exit now .. we have set the RTC alarm
                 kill ( parent_pid, SIGUSR1 );
                         
                 if ( read ( fd, buf, sizeof( unsigned long )) < 0 ) // wait for the RTC alarm irq
                         break; //  ( 1, "read rtc alarm" );
         
                 // iPAQ woke up via RTC irq -- otherwise we would have received a SIGUSR2
                 // from the "resume instance" of opiealarm.
         
                 if ( ioctl ( fd, RTC_AIE_OFF, 0 ) < 0 )     // disable RTC alarm irq
                         break; //  ( 1, "ioctl RTC_AIE_OFF" );
 
                 close ( fd );
+                fd = -1;
                 
                 remove_pidfile ( );
                 
                         return 0;
 
         } while ( 0 );
 
         if ( fp != NULL )
                 fclose ( fp );
         
         if ( fd != -1 )
                 close ( fd );
 
         kill ( parent_pid, SIGUSR1 );
 
                 while ( 1 )         // pretend that we are waiting on RTC, so opiealarm -r can kill us
                 sleep ( 1000 ); // if we don't do this, the "resuspend on AC" would be triggerd
         return 0;
 }
 
 int onac ( void )
 {
         FILE *fp;
         int on = 0;
 
         // check the apm proc interface for AC status
 
         if (( fp = fopen ( APMFILE, "r" ))) { 
                 int ac = 0;
         
                 if ( fscanf ( fp, "%*[^ ] %*d.%*d 0x%*x 0x%x 0x%*x 0x%*x %*d%% %*i %*c", &ac ) == 1 )
                         on = ( ac == 0x01 ) ? 1 : 0;
 
                 fclose ( fp );
         }
         return on;
 }
 
 int resume ( int resuspend )
 {
         FILE *fp;
 
         // re-suspend when on AC (optional) when woken up via RTC
 
         if ( !opiealarm_was_running ) { 
                 // if opiealarm -s didn't wake up via RTC, the old process gets killed
                 // by kill_by_pidfile(), which is recorded in opiealarm_was_running