/* figure out when in the future to send our next ping broadcast message.
* we do this based on a uniform[PING_INTERVAL_MIN .. PING_INTERVAL_MAX]
* probability distribution, where the high end of the range is shorter
* than the stp timeout window. so, we have a fighting chance to have
* other cloud boxes hear something from us before they time us out and
* assume we are dead.
*/
void set_next_ping_alarm(void)
{
int msec;
if (times[6].tv_sec != -1) {
if (db[28].d) { ddprintf("already set; returning.\n"); }
return;
}
while (!checked_gettimeofday(×[6]));
msec = discrete_unif(PING_INTERVAL_MAX - PING_INTERVAL_MIN);
msec += PING_INTERVAL_MIN;
if (db[40].d) { msec *= 20; }
if (db[7].d) {
ddprintf("next time: %d\n", msec);
}
usec_add_msecs(×[6].tv_sec, ×[6].tv_usec, msec);
if (db[7].d) {
ptime("\nping_neighbor timer now", now);
ptime("ping_neighbor interrupt", times[6]);
ddprintf("\n");
}
block_timer_interrupts(SIG_BLOCK);
set_next_alarm();
block_timer_interrupts(SIG_UNBLOCK);
}
/* note next time that a lockable resource will time out, and make sure
* we get an interrupt for it.
*/
void reset_lock_timer()
{
int i;
long earliest_sec = -1, earliest_usec;
for (i = 0; i < pending_request_count; i++) {
lockable_resource_t *l = &pending_requests[i];
update_time(&earliest_sec, &earliest_usec, l->sec, l->usec);
}
for (i = 0; i < locks_owned_count; i++) {
lockable_resource_t *l = &locks_owned[i];
update_time(&earliest_sec, &earliest_usec, l->sec, l->usec);
}
for (i = 0; i < locks_granted_count; i++) {
lockable_resource_t *l = &locks_granted[i];
update_time(&earliest_sec, &earliest_usec, l->sec, l->usec);
}
times[4].tv_sec = earliest_sec;
times[4].tv_usec = earliest_usec;
block_timer_interrupts(SIG_BLOCK);
set_next_alarm();
block_timer_interrupts(SIG_UNBLOCK);
} /* reset_lock_timer */
/* Unix only provides a single ALRM signal, so we use the same handler for
* frequent updates (every 5 seconds) and differential updates (every 30
* seconds). We trigger an ALRM every 5 seconds and only write differential
* updates every 6th ALRM. */
static void handle_signals(int sig) {
if (sig == SIGINT || sig == SIGTERM) {
write_update();
#ifdef ENABLE_FREQUENT_UPDATES
write_frequent_update();
#endif
exit(0);
} else if (sig == SIGALRM) {
alarm_count += 1;
if (alarm_count % ALARMS_PER_UPDATE == 0) {
#ifndef DISABLE_FLOW_THRESHOLDING
write_flow_log();
#endif
write_update();
}
#ifdef ENABLE_FREQUENT_UPDATES
write_frequent_update();
#endif
if (alarm_count % ALARMS_PER_UPDATE == 0
&& upload_failures_check(&upload_failures) > 0) {
exit(0);
}
set_next_alarm();
}
}
INT32S cal_set_alarm(INT8U alarm_idx, TIME_T at, INT8U rpt_mode, void (*alarm_handler)())
{
if (alarm_idx>ALARM_MAX_NUM) {
return STATUS_FAIL;
}
#if _OPERATING_SYSTEM == 1 // Soft Protect for critical section
// OSSchedLock();
#endif
alarm_event[alarm_idx].usage = TRUE;
alarm_event[alarm_idx].alarm_time.tm_sec = at.tm_sec;
alarm_event[alarm_idx].alarm_time.tm_min = at.tm_min;
alarm_event[alarm_idx].alarm_time.tm_hour = at.tm_hour;
alarm_event[alarm_idx].alarm_time.tm_mday = at.tm_mday;
alarm_event[alarm_idx].alarm_time.tm_mon = at.tm_mon;
alarm_event[alarm_idx].alarm_time.tm_year = at.tm_year;
alarm_event[alarm_idx].repeat_mode = rpt_mode;
alarm_event[alarm_idx].alarm_handler = alarm_handler;
#if _OPERATING_SYSTEM == 1
// OSSchedUnlock();
#endif
set_next_alarm();
return STATUS_OK;
}
/* turn off ack timer */
void turn_off_ack_timer()
{
if (awaiting_ack()) { return; }
times[3].tv_sec = -1;
block_timer_interrupts(SIG_BLOCK);
set_next_alarm();
block_timer_interrupts(SIG_UNBLOCK);
}
int main(int argc, char *argv[]) {
if (argc < 2) {
fprintf(stderr, "Usage: %s <interface> [whitelist]\n", argv[0]);
return 1;
}
struct timeval start_timeval;
gettimeofday(&start_timeval, NULL);
start_timestamp_microseconds
= start_timeval.tv_sec * NUM_MICROS_PER_SECOND + start_timeval.tv_usec;
initialize_bismark_id();
if (argc < 3 || initialize_domain_whitelist(argv[2])) {
fprintf(stderr, "Error loading domain whitelist; whitelisting disabled.\n");
}
#ifndef DISABLE_ANONYMIZATION
if (anonymization_init()) {
fprintf(stderr, "Error initializing anonymizer\n");
return 1;
}
#endif
#ifdef ENABLE_FREQUENT_UPDATES
if (anonymize_mac(bismark_mac, bismark_mac)) {
fprintf(stderr, "Error anonymizing router MAC address\n");
}
#endif
packet_series_init(&packet_data);
flow_table_init(&flow_table);
dns_table_init(&dns_table, &domain_whitelist);
#ifdef ENABLE_HTTP_URL
http_table_init(&http_table);
#endif
address_table_init(&address_table);
drop_statistics_init(&drop_statistics);
#ifdef ENABLE_FREQUENT_UPDATES
device_throughput_table_init(&device_throughput_table);
#endif
upload_failures_init(&upload_failures, UPLOAD_FAILURES_FILENAME);
initialize_signal_handler();
set_next_alarm();
/* By default, pcap uses an internal buffer of 500 KB. Any packets that
* overflow this buffer will be dropped. pcap_stats tells the number of
* dropped packets.
*
* Because pcap does its own buffering, we don't need to run packet
* processing in a separate thread. (It would be easier to just increase
* the buffer size if we experience performance problems.) */
pcap_handle = initialize_pcap(argv[1]);
if (!pcap_handle) {
return 1;
}
return pcap_loop(pcap_handle, -1, process_packet, NULL);
}
/* set timer to generate alarm if we haven't heard an ack back to our
* sequence message.
*/
void update_ack_timer()
{
if (!db[22].d) { return; }
if (times[3].tv_sec != -1) { return; }
while (!checked_gettimeofday(×[3]));
usec_add_msecs(×[3].tv_sec, ×[3].tv_usec, ACK_TIMEOUT_MSEC);
block_timer_interrupts(SIG_BLOCK);
set_next_alarm();
block_timer_interrupts(SIG_UNBLOCK);
}
/* if the 'display the cloud' option has been set for this box,
* every CLOUD_PRINT_INTERVAL seconds (usually 5 seconds), we re-build an
* ascii version of our model of the current cloud, viewable from our web
* page.
*
* (if that option is set for at least one box in the cloud, all cloud boxes
* are instructed to include their local cloud topology connectivity with
* every stp beacon they send out, somewhat increasing protocol overhead.
* but not too badly, since these messages only go out on average every
* second or so.)
*/
void set_next_cloud_print_alarm(void)
{
struct timeval tv;
if (!db[38].d && !db[30].d) {
times[5].tv_sec = -1;
times[7].tv_sec = -1;
return;
}
if (times[5].tv_sec != -1 && times[7].tv_sec != -1) {
if (db[28].d) { ddprintf("already set; returning.\n"); }
return;
}
while (!checked_gettimeofday(&tv));
if (times[5].tv_sec == -1) {
times[5] = tv;
usec_add_msecs(×[5].tv_sec, ×[5].tv_usec,
CLOUD_PRINT_INTERVAL);
if (db[28].d) {
ptime("\nprint_cloud timer now", now);
ptime("print_cloud interrupt", times[5]);
ddprintf("\n");
}
}
if (times[7].tv_sec == -1) {
int disable_time;
times[7] = tv;
disable_time = CLOUD_PRINT_DISABLE;
if (stp_recv_beacon_count > 1) {
disable_time *= stp_recv_beacon_count;
}
usec_add_msecs(×[7].tv_sec, ×[7].tv_usec, disable_time);
if (db[28].d) {
ptime("\ndisable_print_cloud timer now", now);
ptime("disable_print_cloud interrupt", times[7]);
ddprintf("\n");
}
}
block_timer_interrupts(SIG_BLOCK);
set_next_alarm();
block_timer_interrupts(SIG_UNBLOCK);
}
extern "C" void RTC_IRQHandler(void){
// RTC_ClearIntPending(LPC_RTC, RTC_INT_COUNTER_INCREASE);
// secondlyCheck();
// return;
uint32_t secval;
// This is increment counter interrupt
if (RTC_GetIntPending(LPC_RTC, RTC_INT_COUNTER_INCREASE)){
// Clear pending interrupt
RTC_ClearIntPending(LPC_RTC, RTC_INT_COUNTER_INCREASE);
_60th_SEC_COUNT=0;
time2.second_inc=1;
//run checks at xx:xx:00
if(!GetSS()){
//run checks at xx:00:00
if(!GetMM()){
//run daily checks at 00:00:00
if(!GetHH()){
//run weekly checks at Mon 00:00:00
if(1 == GetDOW()){
//run weekly checks at 1st Mon 00:00:00
if(1 == GetDOM()){
//run weekly checks at Jan 1st Mon 00:00:00
if(1 == GetM()){
yearlyCheck();
}
monthlyCheck();
}
weeklyCheck();
}
dailyCheck();
}
hourlyCheck();
}
minutelyCheck();
}
secondlyCheck();
}
// Continue to check the Alarm match
if (RTC_GetIntPending(LPC_RTC, RTC_INT_ALARM)){
// Clear pending interrupt
RTC_ClearIntPending(LPC_RTC, RTC_INT_ALARM);
set_next_alarm();
sort_alarms();
/* Send debug information */
// _DBG_ ("ALARM 10s matched!");
}
}
/* figure out when in the future to send our next ping broadcast message.
* we do this based on a uniform[PING_INTERVAL_MIN .. PING_INTERVAL_MAX]
* probability distribution, where the high end of the range is shorter
* than the stp timeout window. so, we have a fighting chance to have
* other cloud boxes hear something from us before they time us out and
* assume we are dead.
*/
void set_next_scan_alarm(void)
{
int msec;
if (times[8].tv_sec != -1) {
if (db[28].d) { ddprintf("already set; returning.\n"); }
return;
}
while (!checked_gettimeofday(×[8]));
msec = discrete_unif(SCAN_INTERVAL_MAX - SCAN_INTERVAL_MIN);
msec += PING_INTERVAL_MIN;
if (db[7].d) {
ddprintf("next time: %d\n", msec);
}
usec_add_msecs(×[8].tv_sec, ×[8].tv_usec, msec);
block_timer_interrupts(SIG_BLOCK);
set_next_alarm();
block_timer_interrupts(SIG_UNBLOCK);
}
static void alarm_callback(void)
{
INT32S i;
t_rtc alm_time;
rtc_alarm_get(&alm_time);
for (i=0;i<ALARM_MAX_NUM;i++) {
if (!alarm_event[i].usage) {
continue;
}
if ((alarm_event[i].alarm_time.tm_sec != alm_time.rtc_sec) ||
(alarm_event[i].alarm_time.tm_min != alm_time.rtc_min) ||
(alarm_event[i].alarm_time.tm_hour != alm_time.rtc_hour)) {
continue;
}
if (alarm_event[i].en_flag && (alarm_event[i].repeat_mode==ALARM_DAY)) {
if (alarm_event[i].alarm_handler) {
(*alarm_event[i].alarm_handler)();
}
}/*
else if (alarm_event[i].en_flag && (alarm_event[i].repeat_mode==ALARM_ANNUAL)) {
if ((alarm_event[i].alarm_time.tm_mday != tm.tm_mday) ||
(alarm_event[i].alarm_time.tm_mon != tm.tm_mon) ||
(alarm_event[i].alarm_time.tm_year != tm.tm_year)) {
continue;
}
if (alarm_event[i].alarm_handler) {
(*alarm_event[i].alarm_handler)();
}
}*/
}
set_next_alarm();
}
/* this is the routine that gets called when a timer interrupt takes place.
* to avoid the complications of having to worry about messing with data
* structures at the interrupt level when the mainline code might be
* manipulating them, we simply notify that mainline code that a timer
* interrupt took place, and let it handle it. we do this by putting a
* character into a pipe that is one of the things the mainline routine
* selects on when it is looking for input.
*
* also, set the next timer alarm.
*/
void repeated(int arg)
{
send_interrupt_pipe_char();
set_next_alarm();
}
void sigalrm_handler ( int n ) {
pnd_log ( pndn_debug, "---[ SIGALRM ]---\n" );
static time_t last_charge_check, last_charge_worka;
int batlevel = pnd_device_get_battery_gauge_perc();
int uamps = 0;
time_t now;
pnd_device_get_charge_current ( &uamps );
if ( batlevel < 0 ) {
#if 0
// couldn't read the battery level, so just assume low and make blinks?
batlevel = 4; // low, but not cause a shutdown
#else
// couldn't read the battery level, so just assume ok!
batlevel = 50;
#endif
}
// first -- are we critical yet? if so, shut down!
if ( batlevel <= b_shutdown && b_shutdown_script) {
if ( uamps > 100 ) {
// critical battery, but charging, so relax.
b_warned = 0;
} else {
if (b_warned == 0) {
// Avoid warning again till re-powered
b_warned = 1;
int x;
pnd_log ( pndn_error, "Battery Current: %d\n", uamps );
pnd_log ( pndn_error, "CRITICAL BATTERY LEVEL -- shutdown the system down! Invoke: %s\n",
b_shutdown_script );
if ( ( x = fork() ) < 0 ) {
pnd_log ( pndn_error, "ERROR: Couldn't fork()\n" );
exit ( -3 );
}
if ( x == 0 ) {
char value [ 100 ];
sprintf ( value, "%d", b_shutdelay );
execl ( b_shutdown_script, b_shutdown_script, value, (char*)NULL );
pnd_log ( pndn_error, "ERROR: Couldn't exec(%s)\n", b_shutdown_script );
exit ( -4 );
}
}
} // charging
}
// charge monitoring
now = time(NULL);
if ( bc_enable && bc_charge_device != NULL && (unsigned int)(now - last_charge_check) > 60 ) {
int charge_enabled = pnd_device_get_charger_enable ( bc_charge_device );
if ( charge_enabled < 0 )
pnd_log ( pndn_error, "ERROR: Couldn't read charger enable control\n" );
else {
if ( charge_enabled && batlevel >= bc_stopcap && 0 < uamps && uamps < bc_stopcur ) {
pnd_log ( pndn_debug, "Charge stop conditions reached, disabling charging\n" );
pnd_device_set_charger_enable ( bc_charge_device, 0 );
}
else if ( !charge_enabled && batlevel <= bc_startcap ) {
pnd_log ( pndn_debug, "Charge start conditions reached, enabling charging\n" );
pnd_device_set_charger_enable ( bc_charge_device, 1 );
}
// for some unknown reason it just stops charging randomly (happens once per week or so),
// and does not restart, resulting in a flat battery if machine is unattended.
// What seems to help here is writing to chip registers, we can do it here indirectly
// by writing to enable. Doing it occasionally should do no harm even with missing charger.
if ( batlevel <= bc_startcap && (unsigned int)(now - last_charge_worka) > 20*60 ) {
pnd_log ( pndn_debug, "Charge workaround trigger\n" );
pnd_device_set_charger_enable ( bc_charge_device, 1 );
last_charge_worka = now;
}
}
last_charge_check = now;
}
// is battery warning already active?
if ( b_active ) {
// warning is on!
// is user charging up? if so, stop blinking.
// perhaps we shoudl check if charger is connected, and not blink at all in that case..
if ( uamps > 0 ) {
//Re-arm warning
b_warned = 0;
pnd_log ( pndn_debug, "Battery is high again, flipping to non-blinker mode\n" );
b_active = 0;
set_next_alarm ( b_frequency, 0 );
pnd_device_set_led_charger_brightness ( 250 );
return;
}
if ( b_active == 1 ) {
// turn LED on
pnd_log ( pndn_debug, "Blink on\n" );
pnd_device_set_led_charger_brightness ( 200 );
// set timer to short duration
b_active = 2;
set_next_alarm ( 0, b_blinkdur );
} else if ( b_active == 2 ) {
// turn LED off
pnd_log ( pndn_debug, "Blink off\n" );
pnd_device_set_led_charger_brightness ( 10 );
// back to longer duration
b_active = 1;
set_next_alarm ( b_blinkfreq, 0 );
}
return;
}
// warning is off..
if ( batlevel <= b_threshold && uamps < 0 ) {
// battery seems low, go to active mode
pnd_log ( pndn_debug, "Battery is low, flipping to blinker mode\n" );
b_active = 1;
set_next_alarm ( b_blinkfreq, 0 );
} // battery level
return;
}
int main ( int argc, char *argv[] ) {
int i;
int logall = -1; // -1 means normal logging rules; >=0 means log all!
for ( i = 1; i < argc; i++ ) {
if ( argv [ i ][ 0 ] == '-' && argv [ i ][ 1 ] == 'd' ) {
//printf ( "Going daemon mode. Silent running.\n" );
g_daemon_mode = 1;
} else if ( argv [ i ][ 0 ] == '-' && argv [ i ][ 1 ] == 'l' ) {
if ( isdigit ( argv [ i ][ 2 ] ) ) {
unsigned char x = atoi ( argv [ i ] + 2 );
if ( x >= 0 &&
x < pndn_none )
{
logall = x;
}
} else {
logall = 0;
}
} else {
usage ( argv );
exit ( 0 );
}
} // for
/* enable logging?
*/
pnd_log_set_pretext ( "pndevmapperd" );
pnd_log_set_flush ( 1 );
if ( logall == -1 ) {
// standard logging; non-daemon versus daemon
if ( g_daemon_mode ) {
// nada
} else {
pnd_log_set_filter ( pndn_rem );
pnd_log_to_stdout();
}
} else {
FILE *f;
f = fopen ( "/tmp/pndevmapperd.log", "w" );
if ( f ) {
pnd_log_set_filter ( logall );
pnd_log_to_stream ( f );
pnd_log ( pndn_rem, "logall mode - logging to /tmp/pndevmapperd.log\n" );
}
if ( logall == pndn_debug ) {
pnd_log_set_buried_logging ( 1 ); // log the shit out of it
pnd_log ( pndn_rem, "logall mode 0 - turned on buried logging\n" );
}
} // logall
pnd_log ( pndn_rem, "%s built %s %s", argv [ 0 ], __DATE__, __TIME__ );
pnd_log ( pndn_rem, "log level starting as %u", pnd_log_get_filter() );
// basic daemon set up
if ( g_daemon_mode ) {
// set a CWD somewhere else
chdir ( "/tmp" );
// detach from terminal
if ( ( i = fork() ) < 0 ) {
pnd_log ( pndn_error, "ERROR: Couldn't fork()\n" );
exit ( i );
}
if ( i ) {
exit ( 0 ); // exit parent
}
setsid();
// umask
umask ( 022 ); // emitted files can be rwxr-xr-x
} // set up daemon
/* hmm, seems to not like working right after boot.. do we depend on another daemon or
* on giving kernel time to init something, or ... wtf?
* -- lets give the system some time to wake up
*/
{ // delay
// this one works for pndnotifyd, which actually needs INOTIFYH..
//
// check if inotify is awake yet; if not, try waiting for awhile to see if it does
pnd_log ( pndn_rem, "Starting INOTIFY test; should be instant, but may take awhile...\n" );
if ( ! pnd_notify_wait_until_ready ( 120 /* seconds */ ) ) {
pnd_log ( pndn_error, "ERROR: INOTIFY refuses to be useful and quite awhile has passed. Bailing out.\n" );
return ( -1 );
}
pnd_log ( pndn_rem, "INOTIFY seems to be useful, whew.\n" );
// pndnotifyd also waits for user to log in .. pretty excessive, especially since
// what if user wants to close the lid while at the log in screen? for now play the
// odds as thats pretty unliekly usage scenariom but is clearly not acceptible :/
//
// wait for a user to be logged in - we should probably get hupped when a user logs in, so we can handle
// log-out and back in again, with SDs popping in and out between..
pnd_log ( pndn_rem, "Checking to see if a user is logged in\n" );
char tmp_username [ 128 ];
while ( 1 ) {
if ( pnd_check_login ( tmp_username, 127 ) ) {
break;
}
pnd_log ( pndn_debug, " No one logged in yet .. spinning.\n" );
sleep ( 2 );
} // spin
pnd_log ( pndn_rem, "Looks like user '%s' is in, continue.\n", tmp_username );
} // delay
/* inhale config or die trying
*/
char *configpath;
// attempt to fetch a sensible default searchpath for configs
configpath = pnd_conf_query_searchpath();
// attempt to fetch the apps config. since it finds us the runscript
pnd_conf_handle evmaph;
evmaph = pnd_conf_fetch_by_id ( pnd_conf_evmap, configpath );
if ( ! evmaph ) {
// couldn't locate conf, just bail
pnd_log ( pndn_error, "ERROR: Couldn't locate conf file\n" );
exit ( -1 );
}
/* iterate across conf, stocking the event map
*/
void *n = pnd_box_get_head ( evmaph );
while ( n ) {
char *k = pnd_box_get_key ( n );
//printf ( "key %s\n", k );
if ( strncmp ( k, "keys.", 5 ) == 0 ) {
k += 5;
// keys should really push push generic-events onto the table, since they;'re just a special case of them
// to make things easier to read
// figure out which keycode we're talking about
keycode_t *p = keycodes;
while ( p -> keycode != -1 ) {
if ( strcasecmp ( p -> keyname, k ) == 0 ) {
break;
}
p++;
}
if ( p -> keycode != -1 ) {
g_evmap [ g_evmap_max ].key_p = 1; // its a key, not an event
g_evmap [ g_evmap_max ].reqs = p; // note the keycode
// note the script to activate in response
if ( strchr ( n, ' ' ) ) {
char *foo = strdup ( n );
char *t = strchr ( foo, ' ' );
*t = '\0';
g_evmap [ g_evmap_max ].script = foo;
g_evmap [ g_evmap_max ].maxhold = atoi ( t + 1 );
} else {
g_evmap [ g_evmap_max ].script = n;
g_evmap [ g_evmap_max ].maxhold = 0;
}
pnd_log ( pndn_rem, "Registered key %s [%d] to script %s with maxhold %d\n",
p -> keyname, p -> keycode, (char*) n, g_evmap [ g_evmap_max ].maxhold );
g_evmap_max++;
} else {
pnd_log ( pndn_warning, "WARNING! Key '%s' is not handled by pndevmapperd yet! Skipping.", k );
}
} else if ( strncmp ( k, "events.", 7 ) == 0 ) {
k += 7;
// yes, key events could really be defined in this generic sense, and really we could just let people
// put the code and so on right in the conf, but trying to keep it easy on people; maybe should
// add a 'generic' section to conf file and just let folks redefine random events that way
// Really, it'd be nice if the /dev/input/events could spit out useful text, and just use scripts
// to respond without a daemon per se; for that matter, pnd-ls and pnd-map pnd-dotdesktopemitter
// should just exist as scripts rather than daemons, but whose counting?
// figure out which keycode we're talking about
generic_event_t *p = generics;
while ( p -> code != -1 ) {
if ( strcasecmp ( p -> name, k ) == 0 ) {
break;
}
p++;
}
if ( p -> code != -1 ) {
g_evmap [ g_evmap_max ].key_p = 0; // its an event, not a key
g_evmap [ g_evmap_max ].reqs = p; // note the keycode
g_evmap [ g_evmap_max ].script = n; // note the script to activate in response
pnd_log ( pndn_rem, "Registered generic event %s [%d] to script %s\n", p -> name, p -> code, (char*) n );
g_evmap_max++;
} else {
pnd_log ( pndn_warning, "WARNING! Generic event '%s' is not handled by pndevmapperd yet! Skipping.", k );
}
} else if ( strncmp ( k, "pndevmapperd.", 7 ) == 0 ) {
// not consumed here, skip silently
} else if ( strncmp ( k, "battery.", 8 ) == 0 ) {
// not consumed here, skip silently
} else if ( strncmp ( k, "battery_charge.", 15 ) == 0 ) {
// not consumed here, skip silently
} else {
// uhhh
pnd_log ( pndn_warning, "Unknown config key '%s'; skipping.\n", k );
}
n = pnd_box_get_next ( n );
} // while
if ( pnd_conf_get_as_int ( evmaph, "pndevmapperd.loglevel" ) != PND_CONF_BADNUM ) {
pnd_log_set_filter ( pnd_conf_get_as_int ( evmaph, "pndevmapperd.loglevel" ) );
pnd_log ( pndn_rem, "config file causes loglevel to change to %u", pnd_log_get_filter() );
}
if ( pnd_conf_get_as_int ( evmaph, "pndevmapperd.minimum_separation" ) != PND_CONF_BADNUM ) {
g_minimum_separation = pnd_conf_get_as_int ( evmaph, "pndevmapperd.minimum_separation" );
pnd_log ( pndn_rem, "config file causes minimum_separation to change to %u", g_minimum_separation );
}
// battery conf
if ( pnd_conf_get_as_int ( evmaph, "battery.threshold" ) != PND_CONF_BADNUM ) {
b_threshold = pnd_conf_get_as_int ( evmaph, "battery.threshold" );
pnd_log ( pndn_rem, "Battery threshold set to %u", b_threshold );
}
if ( pnd_conf_get_as_int ( evmaph, "battery.check_interval" ) != PND_CONF_BADNUM ) {
b_frequency = pnd_conf_get_as_int ( evmaph, "battery.check_interval" );
pnd_log ( pndn_rem, "Battery check interval set to %u", b_frequency );
}
if ( pnd_conf_get_as_int ( evmaph, "battery.blink_interval" ) != PND_CONF_BADNUM ) {
b_blinkfreq = pnd_conf_get_as_int ( evmaph, "battery.blink_interval" );
pnd_log ( pndn_rem, "Battery blink interval set to %u", b_blinkfreq );
}
if ( pnd_conf_get_as_int ( evmaph, "battery.blink_duration" ) != PND_CONF_BADNUM ) {
b_blinkdur = pnd_conf_get_as_int ( evmaph, "battery.blink_duration" );
pnd_log ( pndn_rem, "Battery blink duration set to %u", b_blinkdur );
}
b_active = 0;
if ( pnd_conf_get_as_int ( evmaph, "battery.shutdown_threshold" ) != PND_CONF_BADNUM ) {
b_shutdown = pnd_conf_get_as_int ( evmaph, "battery.shutdown_threshold" );
pnd_log ( pndn_rem, "Battery shutdown threshold set to %u", b_shutdown );
}
if ( pnd_conf_get_as_int ( evmaph, "battery.shutdown_delay" ) != PND_CONF_BADNUM ) {
b_shutdelay = pnd_conf_get_as_int ( evmaph, "battery.shutdown_delay" );
pnd_log ( pndn_rem, "Battery shutdown delay set to %u", b_shutdelay );
}
if ( pnd_conf_get_as_char ( evmaph, "battery.shutdown_script" ) != NULL ) {
b_shutdown_script = strdup ( pnd_conf_get_as_char ( evmaph, "battery.shutdown_script" ) );
pnd_log ( pndn_rem, "Battery shutdown script set to %s", b_shutdown_script );
}
if ( pnd_conf_get_as_int ( evmaph, "battery_charge.enable" ) != PND_CONF_BADNUM ) {
bc_enable = pnd_conf_get_as_int ( evmaph, "battery_charge.enable" );
pnd_log ( pndn_rem, "Battery charge enable set to %u", bc_enable );
}
if ( pnd_conf_get_as_int ( evmaph, "battery_charge.stop_capacity" ) != PND_CONF_BADNUM ) {
bc_stopcap = pnd_conf_get_as_int ( evmaph, "battery_charge.stop_capacity" );
pnd_log ( pndn_rem, "Battery charge stop capacity set to %u", bc_stopcap );
}
if ( pnd_conf_get_as_int ( evmaph, "battery_charge.stop_current" ) != PND_CONF_BADNUM ) {
bc_stopcur = pnd_conf_get_as_int ( evmaph, "battery_charge.stop_current" );
pnd_log ( pndn_rem, "Battery charge stop current set to %u", bc_stopcur );
}
if ( pnd_conf_get_as_int ( evmaph, "battery_charge.start_capacity" ) != PND_CONF_BADNUM ) {
bc_startcap = pnd_conf_get_as_int ( evmaph, "battery_charge.start_capacity" );
pnd_log ( pndn_rem, "Battery charge start capacity set to %u", bc_startcap );
}
if ( pnd_conf_get_as_char ( evmaph, "battery_charge.device" ) != NULL ) {
bc_charge_device = strdup ( pnd_conf_get_as_char ( evmaph, "battery_charge.device" ) );
pnd_log ( pndn_rem, "Battery charge device set to %s", bc_charge_device );
}
/* do we have anything to do?
*/
if ( ! g_evmap_max ) {
// uuuh, nothing to do?
pnd_log ( pndn_warning, "WARNING! No events configured to watch, so just spinning wheels...\n" );
exit ( -1 );
} // spin
/* set up sigchld -- don't want zombies all over; well, we do, but not process zombies
*/
sigset_t ss;
sigemptyset ( &ss );
struct sigaction siggy;
siggy.sa_handler = sigchld_handler;
siggy.sa_mask = ss; /* implicitly blocks the origin signal */
siggy.sa_flags = SA_RESTART; /* don't need anything */
sigaction ( SIGCHLD, &siggy, NULL );
/* set up the battery level warning timers
*/
siggy.sa_handler = sigalrm_handler;
siggy.sa_mask = ss; /* implicitly blocks the origin signal */
siggy.sa_flags = SA_RESTART; /* don't need anything */
sigaction ( SIGALRM, &siggy, NULL );
if ( set_next_alarm ( b_frequency, 0 ) ) { // check every 'frequency' seconds
pnd_log ( pndn_rem, "Checking for low battery every %u seconds\n", b_frequency );
} else {
pnd_log ( pndn_error, "ERROR: Couldn't set up timer for every %u seconds\n", b_frequency );
}
/* actually try to do something useful
*/
// stolen in part from notaz :)
// try to locate the appropriate devices
int id;
int fds [ 8 ] = { -1, -1, -1, -1, -1, -1, -1, -1 }; // 0 = keypad, 1 = gpio keys
int imaxfd = 0;
for ( id = 0; ; id++ ) {
char fname[64];
char name[256] = { 0, };
int fd;
snprintf ( fname, sizeof ( fname ), "/dev/input/event%i", id );
fd = open ( fname, O_RDONLY );
if ( fd == -1 ) {
break;
}
if ( ioctl (fd, EVIOCGNAME(sizeof(name)), name ) < 0 ) {
name [ 0 ] = '\0';
}
pnd_log ( pndn_rem, "%s maps to %s\n", fname, name );
if ( strcmp ( name, PND_EVDEV_KEYPAD/*"omap_twl4030keypad"*/ ) == 0 ) {
fds [ 0 ] = fd;
} else if ( strcmp ( name, "gpio-keys" ) == 0) {
fds [ 1 ] = fd;
} else if ( strcmp ( name, "AT Translated Set 2 keyboard" ) == 0) { // for vmware, my dev environment
fds [ 0 ] = fd;
} else if ( strcmp ( name, PND_EVDEV_POWER/*"triton2-pwrbutton"*/ ) == 0) {
fds [ 2 ] = fd;
} else if ( strcmp ( name, PND_EVDEV_TS/*"ADS784x Touchscreen"*/ ) == 0) {
fds [ 3 ] = fd;
} else if ( strcmp ( name, PND_EVDEV_NUB1/*"vsense66"*/ ) == 0) {
fds [ 4 ] = fd;
} else if ( strcmp ( name, PND_EVDEV_NUB1/*"vsense67"*/ ) == 0) {
fds [ 5 ] = fd;
} else {
pnd_log ( pndn_rem, "Ignoring unknown device '%s'\n", name );
//fds [ 6 ] = fd;
close ( fd );
fd = -1;
continue;
}
if (imaxfd < fd) imaxfd = fd;
} // for
if ( fds [ 0 ] == -1 ) {
pnd_log ( pndn_warning, "WARNING! Couldn't find keypad device\n" );
}
if ( fds [ 1 ] == -1 ) {
pnd_log ( pndn_warning, "WARNING! couldn't find button device\n" );
}
if ( fds [ 0 ] == -1 && fds [ 1 ] == -1 ) {
pnd_log ( pndn_error, "ERROR! Couldn't find either device!\n" );
//exit ( -2 );
}
/* loop forever, watching for events
*/
while ( 1 ) {
struct input_event ev[64];
unsigned int max_fd = 3; /* imaxfd */
int fd = -1, rd, ret;
fd_set fdset;
// set up fd list
FD_ZERO ( &fdset );
imaxfd = 0;
for (i = 0; i < max_fd /*imaxfd*/; i++) {
if ( fds [ i ] != -1 ) {
FD_SET( fds [ i ], &fdset );
if ( fds [ i ] > imaxfd ) {
imaxfd = fds [ i ];
}
}
}
// figure out if we can block forever, or not
unsigned char do_block = 1;
struct timeval tv;
tv.tv_usec = 0;
tv.tv_sec = 1;
for ( i = i; i < g_evmap_max; i++ ) {
if ( g_evmap [ i ].keydown_time && g_evmap [ i ].maxhold ) {
do_block = 0;
break;
}
}
// wait for fd's or timeout
ret = select ( imaxfd + 1, &fdset, NULL, NULL, do_block ? NULL /* no timeout */ : &tv );
if ( ret == -1 ) {
pnd_log ( pndn_error, "ERROR! select(2) failed with: %s\n", strerror ( errno ) );
continue; // retry!
} else if ( ret == 0 ) { // select returned with timeout (no fd)
// timeout occurred; should only happen when 1 or more keys are being held down and
// they're "maxhold" keys, so we have to see if their timer has passed
unsigned int now = time ( NULL );
for ( i = i; i < g_evmap_max; i++ ) {
if ( g_evmap [ i ].keydown_time &&
g_evmap [ i ].maxhold &&
now - g_evmap [ i ].keydown_time >= g_evmap [ i ].maxhold )
{
keycode_t *k = (keycode_t*) g_evmap [ i ].reqs;
dispatch_key ( k -> keycode, 0 /* key up */ );
}
} // for
} else { // an fd was fiddled with
for ( i = 0; i < max_fd; i++ ) {
if ( fds [ i ] != -1 && FD_ISSET ( fds [ i ], &fdset ) ) {
fd = fds [ i ];
} // fd is set?
} // for
/* buttons or keypad */
rd = read ( fd, ev, sizeof(struct input_event) * 64 );
if ( rd < (int) sizeof(struct input_event) ) {
pnd_log ( pndn_error, "ERROR! read(2) input_event failed with: %s\n", strerror ( errno ) );
break;
}
for (i = 0; i < rd / sizeof(struct input_event); i++ ) {
if ( ev[i].type == EV_SYN ) {
continue;
} else if ( ev[i].type == EV_KEY ) {
// do we even know about this key at all?
keycode_t *p = keycodes;
while ( p -> keycode != -1 ) {
if ( p -> keycode == ev [ i ].code ) {
break;
}
p++;
}
// if we do, hand it off to dispatcher to look up if we actually do something with it
if ( p -> keycode != -1 ) {
if ( logall >= 0 ) {
pnd_log ( pndn_debug, "Key Event: key %s [%d] value %d\n", p -> keyname, p -> keycode, ev [ i ].value );
}
dispatch_key ( p -> keycode, ev [ i ].value );
} else {
if ( logall >= 0 ) {
pnd_log ( pndn_warning, "Unknown Key Event: keycode %d value %d\n", ev [ i ].code, ev [ i ].value );
}
}
} else if ( ev[i].type == EV_SW ) {
// do we even know about this event at all?
generic_event_t *p = generics;
while ( p -> code != -1 ) {
if ( p -> code == ev [ i ].code ) {
break;
}
p++;
}
// if we do, hand it off to dispatcher to look up if we actually do something with it
if ( p -> code != -1 ) {
if ( logall >= 0 ) {
pnd_log ( pndn_debug, "Generic Event: event %s [%d] value %d\n", p -> name, p -> code, ev [ i ].value );
}
dispatch_event ( p -> code, ev [ i ].value );
} else {
if ( logall >= 0 ) {
pnd_log ( pndn_warning, "Unknown Generic Event: code %d value %d\n", ev [ i ].code, ev [ i ].value );
}
}
} else {
pnd_log ( pndn_debug, "DEBUG: Unexpected event type %i received\n", ev[i].type );
continue;
} // type?
} // for
} // an fd was touched
} // while
for (i = 0; i < 2; i++) {
if ( i != 2 && fds [ i ] != -1 ) {
close (fds [ i ] );
}
}
return ( 0 );
} // main
