apps/pndevmapperd.c

   1
   2 /* pndevmapperd exists to watch for a few interesting events and to launch scripts when they occur
   3  * ie: when the lid closes, should invoke power-mode toggle sh-script
   4  */
   5
   6 // woot for writing code while sick.
   7
   8 // this code begs a rewrite, but should work fine; its just arranged goofily
   9 // -> I mean, why the racial divide between keys and other events?
  10 // -> now that I've put together pnd_io_evdev, should leverage that; be much cleaner.
  11
  12 #include <stdio.h> /* for printf, NULL */
  13 #include <stdlib.h> /* for free */
  14 #include <string.h> /* for strdup */
  15 #include <unistd.h>    // for exit()
  16 #include <sys/types.h> // for umask
  17 #include <sys/stat.h>  // for umask
  18 #include <fcntl.h> // for open(2)
  19 #include <errno.h> // for errno
  20 #include <time.h> // for time(2)
  21 #include <ctype.h> // for isdigit
  22 #include <signal.h> // for sigaction
  23 #include <sys/wait.h> // for wait
  24 #include <sys/time.h> // setitimer
  25
  26 #include <linux/input.h> // for keys
  27 //#include "../../kernel-rip/input.h" // for keys
  28
  29 #include "pnd_conf.h"
  30 #include "pnd_container.h"
  31 #include "pnd_apps.h"
  32 #include "pnd_discovery.h"
  33 #include "pnd_locate.h"
  34 #include "pnd_pndfiles.h"
  35 #include "pnd_pxml.h"
  36 #include "pnd_logger.h"
  37 #include "pnd_utility.h"
  38 #include "pnd_notify.h"
  39 #include "pnd_device.h"
  40
  41 // daemon and logging
  42 //
  43 unsigned char g_daemon_mode = 0;
  44 unsigned int g_minimum_separation = 1;
  45
  46 typedef enum {
  47   pndn_debug = 0,
  48   pndn_rem,          // will set default log level to here, so 'debug' is omitted
  49   pndn_warning,
  50   pndn_error,
  51   pndn_none
  52 } pndnotify_loglevels_e;
  53
  54 // key/event definition
  55 //
  56 typedef struct {
  57   int keycode;
  58   char *keyname;
  59 } keycode_t;
  60
  61 keycode_t keycodes[] = {
  62   { KEY_A, "a" },
  63   { KEY_B, "b" },
  64   { KEY_MENU, "pandora" },
  65   { KEY_POWER, "power" },
  66   { KEY_DELETE, "del" },
  67   { KEY_COMMA, "comma" },
  68   { KEY_1, "1" },
  69   { KEY_2, "2" },
  70   { KEY_3, "3" },
  71   { KEY_4, "4" },
  72   { KEY_5, "5" },
  73   { KEY_6, "6" },
  74   { KEY_7, "7" },
  75   { KEY_8, "8" },
  76   { KEY_9, "9" },
  77   { KEY_0, "0" },
  78   { KEY_BRIGHTNESSDOWN, "lcdbrightdown" },
  79   { KEY_BRIGHTNESSUP, "lcdbrightup" },
  80   { -1, NULL }
  81 };
  82
  83 typedef struct {
  84   int type;
  85   int code;
  86   char *name;
  87 } generic_event_t;
  88
  89 generic_event_t generics[] = {
  90   { EV_SW, 0, "lid-toggle" }, // expecting value 1 (lid close) or 0 (lid open)
  91   { -1, -1, NULL }
  92 };
  93
  94 // event-to-sh mapping
  95 //
  96 typedef struct {
  97
  98   unsigned char key_p; // 1 if its a key, otherwise an event
  99
 100   /* template information
 101    */
 102   void *reqs;          // scancode/etc for the event in question
 103
 104   char *script;        // script to invoke
 105   unsigned int maxhold;   // maximum hold-time before forcing script invocation
 106
 107   /* state
 108    */
 109   time_t last_trigger_time;
 110   time_t keydown_time;
 111
 112 } evmap_t;
 113
 114 #define MAXEVENTS 255
 115 evmap_t g_evmap [ MAXEVENTS ];
 116 unsigned int g_evmap_max = 0;
 117 unsigned int g_queued_keyups = 0;
 118
 119 // battery
 120 unsigned char b_threshold = 5;    // %battery
 121 unsigned int b_frequency = 300;   // frequency to check
 122 unsigned int b_blinkfreq = 2;     // blink every 2sec
 123 unsigned int b_blinkdur = 1000;   // blink duration (uSec), 0sec + uSec is assumed
 124 unsigned char b_active = 0;       // 0=inactive, 1=active and waiting to blink, 2=blink is on, waiting to turn off
 125 unsigned char b_shutdown = 1;     // %age battery to force a shutdown!
 126 char *b_shutdown_script = NULL;
 127
 128 /* get to it
 129  */
 130 void dispatch_key ( int keycode, int val );
 131 void dispatch_event ( int code, int val );
 132 void sigchld_handler ( int n );
 133 unsigned char set_next_alarm ( unsigned int secs, unsigned int usecs );
 134 void sigalrm_handler ( int n );
 135
 136 static void usage ( char *argv[] ) {
 137   printf ( "%s [-d]\n", argv [ 0 ] );
 138   printf ( "-d\tDaemon mode; detach from terminal, chdir to /tmp, suppress output. Optional.\n" );
 139   printf ( "-l#\tLog-it; -l is 0-and-up (or all), and -l2 means 2-and-up (not all); l[0-3] for now. Log goes to /tmp/pndevmapperd.log\n" );
 140   return;
 141 }
 142
 143 int main ( int argc, char *argv[] ) {
 144   int i;
 145   int logall = -1; // -1 means normal logging rules; >=0 means log all!
 146
 147   for ( i = 1; i < argc; i++ ) {
 148
 149     if ( argv [ i ][ 0 ] == '-' && argv [ i ][ 1 ] == 'd' ) {
 150       //printf ( "Going daemon mode. Silent running.\n" );
 151       g_daemon_mode = 1;
 152     } else if ( argv [ i ][ 0 ] == '-' && argv [ i ][ 1 ] == 'l' ) {
 153
 154       if ( isdigit ( argv [ i ][ 2 ] ) ) {
 155         unsigned char x = atoi ( argv [ i ] + 2 );
 156         if ( x >= 0 &&
 157              x < pndn_none )
 158         {
 159           logall = x;
 160         }
 161       } else {
 162         logall = 0;
 163       }
 164     } else {
 165       usage ( argv );
 166       exit ( 0 );
 167     }
 168
 169   } // for
 170
 171   /* enable logging?
 172    */
 173   pnd_log_set_pretext ( "pndevmapperd" );
 174   pnd_log_set_flush ( 1 );
 175
 176   if ( logall == -1 ) {
 177     // standard logging; non-daemon versus daemon
 178
 179     if ( g_daemon_mode ) {
 180       // nada
 181     } else {
 182       pnd_log_set_filter ( pndn_rem );
 183       pnd_log_to_stdout();
 184     }
 185
 186   } else {
 187     FILE *f;
 188
 189     f = fopen ( "/tmp/pndevmapperd.log", "w" );
 190
 191     if ( f ) {
 192       pnd_log_set_filter ( logall );
 193       pnd_log_to_stream ( f );
 194       pnd_log ( pndn_rem, "logall mode - logging to /tmp/pndevmapperd.log\n" );
 195     }
 196
 197     if ( logall == pndn_debug ) {
 198       pnd_log_set_buried_logging ( 1 ); // log the shit out of it
 199       pnd_log ( pndn_rem, "logall mode 0 - turned on buried logging\n" );
 200     }
 201
 202   } // logall
 203
 204   pnd_log ( pndn_rem, "%s built %s %s", argv [ 0 ], __DATE__, __TIME__ );
 205
 206   pnd_log ( pndn_rem, "log level starting as %u", pnd_log_get_filter() );
 207
 208   // basic daemon set up
 209   if ( g_daemon_mode ) {
 210
 211     // set a CWD somewhere else
 212     chdir ( "/tmp" );
 213
 214     // detach from terminal
 215     if ( ( i = fork() ) < 0 ) {
 216       pnd_log ( pndn_error, "ERROR: Couldn't fork()\n" );
 217       exit ( i );
 218     }
 219     if ( i ) {
 220       exit ( 0 ); // exit parent
 221     }
 222     setsid();
 223
 224     // umask
 225     umask ( 022 ); // emitted files can be rwxr-xr-x
 226
 227   } // set up daemon
 228
 229   /* hmm, seems to not like working right after boot.. do we depend on another daemon or
 230    * on giving kernel time to init something, or ... wtf?
 231    * -- lets give the system some time to wake up
 232    */
 233   { // delay
 234
 235     // this one works for pndnotifyd, which actually needs INOTIFYH..
 236     //
 237
 238     // check if inotify is awake yet; if not, try waiting for awhile to see if it does
 239     pnd_log ( pndn_rem, "Starting INOTIFY test; should be instant, but may take awhile...\n" );
 240
 241     if ( ! pnd_notify_wait_until_ready ( 120 /* seconds */ ) ) {
 242       pnd_log ( pndn_error, "ERROR: INOTIFY refuses to be useful and quite awhile has passed. Bailing out.\n" );
 243       return ( -1 );
 244     }
 245
 246     pnd_log ( pndn_rem, "INOTIFY seems to be useful, whew.\n" );
 247
 248     // pndnotifyd also waits for user to log in .. pretty excessive, especially since
 249     // what if user wants to close the lid while at the log in screen? for now play the
 250     // odds as thats pretty unliekly usage scenariom but is clearly not acceptible :/
 251     //
 252
 253     // wait for a user to be logged in - we should probably get hupped when a user logs in, so we can handle
 254     // log-out and back in again, with SDs popping in and out between..
 255     pnd_log ( pndn_rem, "Checking to see if a user is logged in\n" );
 256     char tmp_username [ 128 ];
 257     while ( 1 ) {
 258       if ( pnd_check_login ( tmp_username, 127 ) ) {
 259         break;
 260       }
 261       pnd_log ( pndn_debug, "  No one logged in yet .. spinning.\n" );
 262       sleep ( 2 );
 263     } // spin
 264     pnd_log ( pndn_rem, "Looks like user '%s' is in, continue.\n", tmp_username );
 265
 266   } // delay
 267
 268   /* inhale config or die trying
 269    */
 270   char *configpath;
 271
 272   // attempt to fetch a sensible default searchpath for configs
 273   configpath = pnd_conf_query_searchpath();
 274
 275   // attempt to fetch the apps config. since it finds us the runscript
 276   pnd_conf_handle evmaph;
 277
 278   evmaph = pnd_conf_fetch_by_id ( pnd_conf_evmap, configpath );
 279
 280   if ( ! evmaph ) {
 281     // couldn't locate conf, just bail
 282     pnd_log ( pndn_error, "ERROR: Couldn't locate conf file\n" );
 283     exit ( -1 );
 284   }
 285
 286   /* iterate across conf, stocking the event map
 287    */
 288   void *n = pnd_box_get_head ( evmaph );
 289
 290   while ( n ) {
 291     char *k = pnd_box_get_key ( n );
 292     //printf ( "key %s\n", k );
 293
 294     if ( strncmp ( k, "keys.", 5 ) == 0 ) {
 295       k += 5;
 296
 297       // keys should really push push generic-events onto the table, since they;'re just a special case of them
 298       // to make things easier to read
 299
 300       // figure out which keycode we're talking about
 301       keycode_t *p = keycodes;
 302       while ( p -> keycode != -1 ) {
 303         if ( strcasecmp ( p -> keyname, k ) == 0 ) {
 304           break;
 305         }
 306         p++;
 307       }
 308
 309       if ( p -> keycode != -1 ) {
 310         g_evmap [ g_evmap_max ].key_p = 1;    // its a key, not an event
 311         g_evmap [ g_evmap_max ].reqs = p;     // note the keycode
 312
 313         // note the script to activate in response
 314         if ( strchr ( n, ' ' ) ) {
 315           char *foo = strdup ( n );
 316           char *t = strchr ( foo, ' ' );
 317           *t = '\0';
 318           g_evmap [ g_evmap_max ].script = foo;
 319           g_evmap [ g_evmap_max ].maxhold = atoi ( t + 1 );
 320         } else {
 321           g_evmap [ g_evmap_max ].script = n;
 322           g_evmap [ g_evmap_max ].maxhold = 0;
 323         }
 324
 325         pnd_log ( pndn_rem, "Registered key %s [%d] to script %s with maxhold %d\n",
 326                   p -> keyname, p -> keycode, (char*) n, g_evmap [ g_evmap_max ].maxhold );
 327
 328         g_evmap_max++;
 329       } else {
 330         pnd_log ( pndn_warning, "WARNING! Key '%s' is not handled by pndevmapperd yet! Skipping.", k );
 331       }
 332
 333     } else if ( strncmp ( k, "events.", 7 ) == 0 ) {
 334       k += 7;
 335
 336       // yes, key events could really be defined in this generic sense, and really we could just let people
 337       // put the code and so on right in the conf, but trying to keep it easy on people; maybe should
 338       // add a 'generic' section to conf file and just let folks redefine random events that way
 339       // Really, it'd be nice if the /dev/input/events could spit out useful text, and just use scripts
 340       // to respond without a daemon per se; for that matter, pnd-ls and pnd-map pnd-dotdesktopemitter
 341       // should just exist as scripts rather than daemons, but whose counting?
 342
 343       // figure out which keycode we're talking about
 344       generic_event_t *p = generics;
 345       while ( p -> code != -1 ) {
 346         if ( strcasecmp ( p -> name, k ) == 0 ) {
 347           break;
 348         }
 349         p++;
 350       }
 351
 352       if ( p -> code != -1 ) {
 353         g_evmap [ g_evmap_max ].key_p = 0;    // its an event, not a key
 354         g_evmap [ g_evmap_max ].reqs = p;     // note the keycode
 355         g_evmap [ g_evmap_max ].script = n;   // note the script to activate in response
 356         pnd_log ( pndn_rem, "Registered generic event %s [%d] to script %s\n", p -> name, p -> code, (char*) n );
 357         g_evmap_max++;
 358       } else {
 359         pnd_log ( pndn_warning, "WARNING! Generic event '%s' is not handled by pndevmapperd yet! Skipping.", k );
 360       }
 361
 362     } else if ( strncmp ( k, "pndevmapperd.", 7 ) == 0 ) {
 363       // not consumed here, skip silently
 364
 365     } else if ( strncmp ( k, "battery.", 8 ) == 0 ) {
 366       // not consumed here, skip silently
 367
 368     } else {
 369       // uhhh
 370       pnd_log ( pndn_warning, "Unknown config key '%s'; skipping.\n", k );
 371     }
 372
 373     n = pnd_box_get_next ( n );
 374   } // while
 375
 376   if ( pnd_conf_get_as_int ( evmaph, "pndevmapperd.loglevel" ) != PND_CONF_BADNUM ) {
 377     pnd_log_set_filter ( pnd_conf_get_as_int ( evmaph, "pndevmapperd.loglevel" ) );
 378     pnd_log ( pndn_rem, "config file causes loglevel to change to %u", pnd_log_get_filter() );
 379   }
 380
 381   if ( pnd_conf_get_as_int ( evmaph, "pndevmapperd.minimum_separation" ) != PND_CONF_BADNUM ) {
 382     g_minimum_separation = pnd_conf_get_as_int ( evmaph, "pndevmapperd.minimum_separation" );
 383     pnd_log ( pndn_rem, "config file causes minimum_separation to change to %u", g_minimum_separation );
 384   }
 385
 386   // battery conf
 387   if ( pnd_conf_get_as_int ( evmaph, "battery.threshold" ) != PND_CONF_BADNUM ) {
 388     b_threshold = pnd_conf_get_as_int ( evmaph, "battery.threshold" );
 389     pnd_log ( pndn_rem, "Battery threshold set to %u", b_threshold );
 390   }
 391   if ( pnd_conf_get_as_int ( evmaph, "battery.check_interval" ) != PND_CONF_BADNUM ) {
 392     b_frequency = pnd_conf_get_as_int ( evmaph, "battery.check_interval" );
 393     pnd_log ( pndn_rem, "Battery check interval set to %u", b_frequency );
 394   }
 395   if ( pnd_conf_get_as_int ( evmaph, "battery.blink_interval" ) != PND_CONF_BADNUM ) {
 396     b_blinkfreq = pnd_conf_get_as_int ( evmaph, "battery.blink_interval" );
 397     pnd_log ( pndn_rem, "Battery blink interval set to %u", b_blinkfreq );
 398   }
 399   if ( pnd_conf_get_as_int ( evmaph, "battery.blink_duration" ) != PND_CONF_BADNUM ) {
 400     b_blinkdur = pnd_conf_get_as_int ( evmaph, "battery.blink_duration" );
 401     pnd_log ( pndn_rem, "Battery blink duration set to %u", b_blinkdur );
 402   }
 403   b_active = 0;
 404   if ( pnd_conf_get_as_int ( evmaph, "battery.shutdown_threshold" ) != PND_CONF_BADNUM ) {
 405     b_shutdown = pnd_conf_get_as_int ( evmaph, "battery.shutdown_threshold" );
 406     pnd_log ( pndn_rem, "Battery shutdown threshold set to %u", b_shutdown );
 407   }
 408   if ( pnd_conf_get_as_char ( evmaph, "battery.shutdown_script" ) != NULL ) {
 409     b_shutdown_script = strdup ( pnd_conf_get_as_char ( evmaph, "battery.shutdown_script" ) );
 410     pnd_log ( pndn_rem, "Battery shutdown script set to %s", b_shutdown_script );
 411   }
 412
 413   /* do we have anything to do?
 414    */
 415   if ( ! g_evmap_max ) {
 416     // uuuh, nothing to do?
 417     pnd_log ( pndn_warning, "WARNING! No events configured to watch, so just spinning wheels...\n" );
 418     exit ( -1 );
 419   } // spin
 420
 421   /* set up sigchld -- don't want zombies all over; well, we do, but not process zombies
 422    */
 423   sigset_t ss;
 424   sigemptyset ( &ss );
 425
 426   struct sigaction siggy;
 427   siggy.sa_handler = sigchld_handler;
 428   siggy.sa_mask = ss; /* implicitly blocks the origin signal */
 429   siggy.sa_flags = SA_RESTART; /* don't need anything */
 430   sigaction ( SIGCHLD, &siggy, NULL );
 431
 432   /* set up the battery level warning timers
 433    */
 434   siggy.sa_handler = sigalrm_handler;
 435   siggy.sa_mask = ss; /* implicitly blocks the origin signal */
 436   siggy.sa_flags = SA_RESTART; /* don't need anything */
 437   sigaction ( SIGALRM, &siggy, NULL );
 438
 439   if ( set_next_alarm ( b_frequency, 0 ) ) { // check every 'frequency' seconds
 440     pnd_log ( pndn_rem, "Checking for low battery every %u seconds\n", b_frequency );
 441   } else {
 442     pnd_log ( pndn_error, "ERROR: Couldn't set up timer for every %u seconds\n", b_frequency );
 443   }
 444
 445   /* actually try to do something useful
 446    */
 447
 448   // stolen in part from notaz :)
 449
 450   // try to locate the appropriate devices
 451   int id;
 452   int fds [ 8 ] = { -1, -1, -1, -1, -1, -1, -1, -1 }; // 0 = keypad, 1 = gpio keys
 453   int imaxfd = 0;
 454
 455   for ( id = 0; ; id++ ) {
 456     char fname[64];
 457     char name[256] = { 0, };
 458     int fd;
 459
 460     snprintf ( fname, sizeof ( fname ), "/dev/input/event%i", id );
 461     fd = open ( fname, O_RDONLY );
 462
 463     if ( fd == -1 ) {
 464       break;
 465     }
 466
 467     if ( ioctl (fd, EVIOCGNAME(sizeof(name)), name ) < 0 ) {
 468       name [ 0 ] = '\0';
 469     }
 470
 471     pnd_log ( pndn_rem, "%s maps to %s\n", fname, name );
 472
 473     if ( strcmp ( name, PND_EVDEV_KEYPAD/*"omap_twl4030keypad"*/ ) == 0 ) {
 474       fds [ 0 ] = fd;
 475     } else if ( strcmp ( name, "gpio-keys" ) == 0) {
 476       fds [ 1 ] = fd;
 477     } else if ( strcmp ( name, "AT Translated Set 2 keyboard" ) == 0) { // for vmware, my dev environment
 478       fds [ 0 ] = fd;
 479     } else if ( strcmp ( name, PND_EVDEV_POWER/*"triton2-pwrbutton"*/ ) == 0) {
 480       fds [ 2 ] = fd;
 481     } else if ( strcmp ( name, PND_EVDEV_TS/*"ADS784x Touchscreen"*/ ) == 0) {
 482       fds [ 3 ] = fd;
 483     } else if ( strcmp ( name, PND_EVDEV_NUB1/*"vsense66"*/ ) == 0) {
 484       fds [ 4 ] = fd;
 485     } else if ( strcmp ( name, PND_EVDEV_NUB1/*"vsense67"*/ ) == 0) {
 486       fds [ 5 ] = fd;
 487     } else {
 488       pnd_log ( pndn_rem, "Ignoring unknown device '%s'\n", name );
 489       //fds [ 6 ] = fd;
 490       close ( fd );
 491       fd = -1;
 492       continue;
 493     }
 494
 495     if (imaxfd < fd) imaxfd = fd;
 496
 497   } // for
 498
 499   if ( fds [ 0 ] == -1 ) {
 500     pnd_log ( pndn_warning, "WARNING! Couldn't find keypad device\n" );
 501   }
 502
 503   if ( fds [ 1 ] == -1 ) {
 504     pnd_log ( pndn_warning, "WARNING! couldn't find button device\n" );
 505   }
 506
 507   if ( fds [ 0 ] == -1 && fds [ 1 ] == -1 ) {
 508     pnd_log ( pndn_error, "ERROR! Couldn't find either device!\n" );
 509     //exit ( -2 );
 510   }
 511
 512   /* loop forever, watching for events
 513    */
 514
 515   while ( 1 ) {
 516     struct input_event ev[64];
 517
 518     unsigned int max_fd = 3; /* imaxfd */
 519     int fd = -1, rd, ret;
 520     fd_set fdset;
 521
 522     // set up fd list
 523     FD_ZERO ( &fdset );
 524
 525     imaxfd = 0;
 526     for (i = 0; i < max_fd /*imaxfd*/; i++) {
 527       if ( fds [ i ] != -1 ) {
 528         FD_SET( fds [ i ], &fdset );
 529
 530         if ( fds [ i ] > imaxfd ) {
 531           imaxfd = fds [ i ];
 532         }
 533
 534       }
 535     }
 536
 537     // figure out if we can block forever, or not
 538     unsigned char do_block = 1;
 539     struct timeval tv;
 540     tv.tv_usec = 0;
 541     tv.tv_sec = 1;
 542
 543     for ( i = i; i < g_evmap_max; i++ ) {
 544       if ( g_evmap [ i ].keydown_time && g_evmap [ i ].maxhold ) {
 545         do_block = 0;
 546         break;
 547       }
 548     }
 549
 550     // wait for fd's or timeout
 551     ret = select ( imaxfd + 1, &fdset, NULL, NULL, do_block ? NULL /* no timeout */ : &tv );
 552
 553     if ( ret == -1 ) {
 554       pnd_log ( pndn_error, "ERROR! select(2) failed with: %s\n", strerror ( errno ) );
 555       continue; // retry!
 556
 557     } else if ( ret == 0 ) { // select returned with timeout (no fd)
 558
 559       // timeout occurred; should only happen when 1 or more keys are being held down and
 560       // they're "maxhold" keys, so we have to see if their timer has passed
 561       unsigned int now = time ( NULL );
 562
 563       for ( i = i; i < g_evmap_max; i++ ) {
 564
 565         if ( g_evmap [ i ].keydown_time &&
 566              g_evmap [ i ].maxhold &&
 567              now - g_evmap [ i ].keydown_time >= g_evmap [ i ].maxhold )
 568         {
 569           keycode_t *k = (keycode_t*) g_evmap [ i ].reqs;
 570           dispatch_key ( k -> keycode, 0 /* key up */ );
 571         }
 572
 573       } // for
 574
 575     } else { // an fd was fiddled with
 576
 577       for ( i = 0; i < max_fd; i++ ) {
 578         if ( fds [ i ] != -1 && FD_ISSET ( fds [ i ], &fdset ) ) {
 579           fd = fds [ i ];
 580         } // fd is set?
 581       } // for
 582
 583       /* buttons or keypad */
 584       rd = read ( fd, ev, sizeof(struct input_event) * 64 );
 585       if ( rd < (int) sizeof(struct input_event) ) {
 586         pnd_log ( pndn_error, "ERROR! read(2) input_event failed with: %s\n", strerror ( errno ) );
 587         break;
 588       }
 589
 590       for (i = 0; i < rd / sizeof(struct input_event); i++ ) {
 591
 592         if ( ev[i].type == EV_SYN ) {
 593           continue;
 594         } else if ( ev[i].type == EV_KEY ) {
 595
 596           // do we even know about this key at all?
 597           keycode_t *p = keycodes;
 598           while ( p -> keycode != -1 ) {
 599             if ( p -> keycode == ev [ i ].code ) {
 600               break;
 601             }
 602             p++;
 603           }
 604
 605           // if we do, hand it off to dispatcher to look up if we actually do something with it
 606           if ( p -> keycode != -1 ) {
 607             if ( logall >= 0 ) {
 608               pnd_log ( pndn_debug, "Key Event: key %s [%d] value %d\n", p -> keyname, p -> keycode, ev [ i ].value );
 609             }
 610             dispatch_key ( p -> keycode, ev [ i ].value );
 611           } else {
 612             if ( logall >= 0 ) {
 613               pnd_log ( pndn_warning, "Unknown Key Event: keycode %d value %d\n",  ev [ i ].code, ev [ i ].value );
 614             }
 615           }
 616
 617         } else if ( ev[i].type == EV_SW ) {
 618
 619           // do we even know about this event at all?
 620           generic_event_t *p = generics;
 621           while ( p -> code != -1 ) {
 622             if ( p -> code == ev [ i ].code ) {
 623               break;
 624             }
 625             p++;
 626           }
 627
 628           // if we do, hand it off to dispatcher to look up if we actually do something with it
 629           if ( p -> code != -1 ) {
 630             if ( logall >= 0 ) {
 631               pnd_log ( pndn_debug, "Generic Event: event %s [%d] value %d\n", p -> name, p -> code, ev [ i ].value );
 632             }
 633             dispatch_event ( p -> code, ev [ i ].value );
 634           } else {
 635             if ( logall >= 0 ) {
 636               pnd_log ( pndn_warning, "Unknown Generic Event: code %d value %d\n",  ev [ i ].code, ev [ i ].value );
 637             }
 638           }
 639
 640         } else {
 641           pnd_log ( pndn_debug, "DEBUG: Unexpected event type %i received\n", ev[i].type );
 642           continue;
 643         } // type?
 644
 645       } // for
 646
 647     } // an fd was touched
 648
 649   } // while
 650
 651   for (i = 0; i < 2; i++) {
 652     if ( i != 2 && fds [ i ] != -1 ) {
 653       close (fds [ i ] );
 654     }
 655   }
 656
 657   return ( 0 );
 658 } // main
 659
 660 // this should really register the keystate and time, and then another func to monitor
 661 // time-passage and check the registered list and act on the event..
 662 void dispatch_key ( int keycode, int val ) {
 663   unsigned int i;
 664
 665   // val decodes as:
 666   // 1 - down (pressed)
 667   // 2 - down again (hold)
 668   // 0 - up (released)
 669
 670   for ( i = 0; i < g_evmap_max; i++ ) {
 671
 672     if ( ( g_evmap [ i ].key_p ) &&
 673          ( ((keycode_t*) (g_evmap [ i ].reqs)) -> keycode == keycode ) &&
 674          ( g_evmap [ i ].script ) )
 675     {
 676       unsigned char invoke_it = 0;
 677
 678       // is this a keydown or a keyup?
 679       if ( val == 1 ) {
 680         // keydown
 681         g_evmap [ i ].keydown_time = time ( NULL );
 682
 683       } else if ( val == 2 && g_evmap [ i ].keydown_time ) {
 684         // key is being held; we should check if max-hold is set
 685
 686         if ( g_evmap [ i ].maxhold &&
 687              time ( NULL ) - g_evmap [ i ].keydown_time >= g_evmap [ i ].maxhold )
 688         {
 689           invoke_it = 1;
 690         }
 691
 692       } else if ( val == 0 && g_evmap [ i ].keydown_time ) {
 693         // keyup (while key is down)
 694
 695         if ( time ( NULL ) - g_evmap [ i ].last_trigger_time >= g_minimum_separation ) {
 696           invoke_it = 1;
 697         } else {
 698           pnd_log ( pndn_rem, "Skipping invokation.. falls within minimum_separation threshold\n" );
 699         }
 700
 701       } // key up or down?
 702
 703       if ( invoke_it ) {
 704
 705         char holdtime [ 128 ];
 706         sprintf ( holdtime, "%d", (int)( time(NULL) - g_evmap [ i ].keydown_time ) );
 707         pnd_log ( pndn_rem, "Will attempt to invoke: %s %s\n", g_evmap [ i ].script, holdtime );
 708
 709         // state
 710         g_evmap [ i ].keydown_time = 0; // clear the keydown-ness
 711         g_evmap [ i ].last_trigger_time = time ( NULL );
 712
 713         // invocation
 714         int x;
 715
 716         if ( ( x = fork() ) < 0 ) {
 717           pnd_log ( pndn_error, "ERROR: Couldn't fork()\n" );
 718           exit ( -3 );
 719         }
 720
 721         if ( x == 0 ) {
 722           execl ( g_evmap [ i ].script, g_evmap [ i ].script, holdtime, (char*)NULL );
 723           pnd_log ( pndn_error, "ERROR: Couldn't exec(%s)\n", g_evmap [ i ].script );
 724           exit ( -4 );
 725         }
 726
 727       } // invoke the script!
 728
 729       return;
 730     } // found matching event for keycode
 731
 732   } // while
 733
 734   return;
 735 }
 736
 737 void dispatch_event ( int code, int val ) {
 738   unsigned int i;
 739
 740   // LID val decodes as:
 741   // 1 - closing
 742   // 0 - opening
 743
 744   pnd_log ( pndn_rem, "Dispatching Event..\n" );
 745
 746   for ( i = 0; i < g_evmap_max; i++ ) {
 747
 748     if ( ( g_evmap [ i ].key_p == 0 ) &&
 749          ( ((generic_event_t*) (g_evmap [ i ].reqs)) -> code == code ) &&
 750          ( g_evmap [ i ].script ) )
 751     {
 752
 753       // just hand the code to the script (ie: 0 or 1 to script)
 754       if ( time ( NULL ) - g_evmap [ i ].last_trigger_time >= g_minimum_separation ) {
 755         int x;
 756         char value [ 100 ];
 757
 758         sprintf ( value, "%d", val );
 759
 760         g_evmap [ i ].last_trigger_time = time ( NULL );
 761
 762         pnd_log ( pndn_rem, "Will attempt to invoke: %s %s\n", g_evmap [ i ].script, value );
 763
 764         if ( ( x = fork() ) < 0 ) {
 765           pnd_log ( pndn_error, "ERROR: Couldn't fork()\n" );
 766           exit ( -3 );
 767         }
 768
 769         if ( x == 0 ) {
 770           execl ( g_evmap [ i ].script, g_evmap [ i ].script, value, (char*)NULL );
 771           pnd_log ( pndn_error, "ERROR: Couldn't exec(%s)\n", g_evmap [ i ].script );
 772           exit ( -4 );
 773         }
 774
 775       } else {
 776         pnd_log ( pndn_rem, "Skipping invokation.. falls within minimum_separation threshold\n" );
 777       }
 778
 779       return;
 780     } // found matching event for keycode
 781
 782   } // while
 783
 784   return;
 785 }
 786
 787 void sigchld_handler ( int n ) {
 788
 789   pnd_log ( pndn_rem, "---[ SIGCHLD received ]---\n" );
 790
 791   int status;
 792   wait ( &status );
 793
 794   pnd_log ( pndn_rem, "     SIGCHLD done ]---\n" );
 795
 796   return;
 797 }
 798
 799 unsigned char set_next_alarm ( unsigned int secs, unsigned int usecs ) {
 800
 801   // assume that SIGALRM is already being caught, we just set the itimer here
 802
 803   struct itimerval itv;
 804
 805   // if no timer at all, set the 'current' one so it does something; otherwise
 806   // let it continue..
 807   getitimer ( ITIMER_REAL, &itv );
 808
 809   if ( itv.it_value.tv_sec == 0 && itv.it_value.tv_sec == 0 ) {
 810     itv.it_value.tv_sec = secs;
 811     itv.it_value.tv_usec = usecs;
 812   }
 813
 814   // set the next timer
 815   //bzero ( &itv, sizeof(struct itimerval) );
 816
 817   itv.it_interval.tv_sec = secs;
 818   itv.it_interval.tv_usec = usecs;
 819
 820   // if next-timer is less than current, set current too
 821   if ( itv.it_value.tv_sec > itv.it_interval.tv_sec ) {
 822     itv.it_value.tv_sec = secs;
 823     itv.it_value.tv_usec = usecs;
 824   }
 825
 826   if ( setitimer ( ITIMER_REAL, &itv, NULL /* old value returned here */ ) < 0 ) {
 827     // sucks
 828     return ( 0 );
 829   }
 830
 831   return ( 1 );
 832 }
 833
 834 void sigalrm_handler ( int n ) {
 835
 836   pnd_log ( pndn_debug, "---[ SIGALRM ]---\n" );
 837
 838   int batlevel = pnd_device_get_battery_gauge_perc();
 839
 840   if ( batlevel < 0 ) {
 841 #if 0
 842     // couldn't read the battery level, so just assume low and make blinks?
 843     batlevel = 4; // low, but not cause a shutdown
 844 #else
 845     // couldn't read the battery level, so just assume ok!
 846     batlevel = 50;
 847 #endif
 848   }
 849
 850   // first -- are we critical yet? if so, shut down!
 851   if ( batlevel <= b_shutdown && b_shutdown_script ) {
 852     int mamps = 0;
 853
 854     if ( pnd_device_get_charge_current ( &mamps ) && mamps > 100 ) {
 855       // critical battery, but charging, so relax.
 856     } else {
 857       int x;
 858
 859       pnd_log ( pndn_error, "CRITICAL BATTERY LEVEL -- shutdown the system down! Invoke: %s\n",
 860                 b_shutdown_script );
 861
 862       if ( ( x = fork() ) < 0 ) {
 863         pnd_log ( pndn_error, "ERROR: Couldn't fork()\n" );
 864         exit ( -3 );
 865       }
 866
 867       if ( x == 0 ) {
 868         execl ( b_shutdown_script, b_shutdown_script, (char*)NULL );
 869         pnd_log ( pndn_error, "ERROR: Couldn't exec(%s)\n", b_shutdown_script );
 870         exit ( -4 );
 871       }
 872
 873     } // charging
 874
 875   }
 876
 877   // is battery warning already active?
 878   if ( b_active ) {
 879     // warning is on!
 880
 881     // is user charging up? if so, stop blinking.
 882     // perhaps we shoudl check if charger is connected, and not blink at all in that case..
 883     if ( batlevel > b_threshold + 1 /* allow for error in read */ ) {
 884       pnd_log ( pndn_debug, "Battery is high again, flipping to non-blinker mode\n" );
 885       b_active = 0;
 886       set_next_alarm ( b_frequency, 0 );
 887       pnd_device_set_led_charger_brightness ( 250 );
 888       return;
 889     }
 890
 891     if ( b_active == 1 ) {
 892       // turn LED on
 893       pnd_log ( pndn_debug, "Blink on\n" );
 894       pnd_device_set_led_charger_brightness ( 200 );
 895       // set timer to short duration
 896       b_active = 2;
 897       set_next_alarm ( 0, b_blinkdur );
 898     } else if ( b_active == 2 ) {
 899       // turn LED off
 900       pnd_log ( pndn_debug, "Blink off\n" );
 901       pnd_device_set_led_charger_brightness ( 10 );
 902       // back to longer duration
 903       b_active = 1;
 904       set_next_alarm ( b_blinkfreq, 0 );
 905     }
 906
 907     return;
 908   }
 909
 910   // warning is off..
 911   if ( batlevel <= b_threshold ) {
 912     // battery seems low, go to active mode
 913     pnd_log ( pndn_debug, "Battery is low, flipping to blinker mode\n" );
 914     b_active = 1;
 915     set_next_alarm ( b_blinkfreq, 0 );
 916   } // battery level
 917
 918   return;
 919 }