X-Git-Url: http://git.eversberg.eu/gitweb.cgi?p=lcr.git;a=blobdiff_plain;f=main.c;h=59343aef1aed4a0556948ddfe68a9d70520e1a95;hp=3d905d08f7b4859c5ddf8103dbc99a04b2cedbe5;hb=b1ab2b9ac1cfc15d2a8f5850145dd69043cc3ef7;hpb=2746009aca7e00678ad6f5f64da8b208ab635d60 diff --git a/main.c b/main.c index 3d905d0..59343ae 100644 --- a/main.c +++ b/main.c @@ -9,26 +9,11 @@ ** ** \*****************************************************************************/ -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include #include "main.h" MESSAGES -double now_d; +double now_d, last_d; time_t now; struct tm *now_tm; struct timeval now_tv; @@ -40,14 +25,18 @@ struct timezone now_tz; now = now_tv.tv_sec; \ now_tm = localtime(&now); \ } -//#define DEBUG_DURATION -int global_debug = 0; +FILE *debug_fp = NULL; int quit=0; +#if 0 +struct lcr_fdset lcr_fdset[FD_SETSIZE]; +#endif + pthread_mutex_t mutexd; // debug output mutex -//pthread_mutex_t mutext; // trace output mutex +pthread_mutex_t mutext; // trace output mutex pthread_mutex_t mutexe; // error output mutex +//pthread_mutex_t mutex_lcr; // lcr process mutex int memuse = 0; int mmemuse = 0; @@ -66,6 +55,11 @@ int last_debug = 0; int debug_newline = 1; int nooutput = 0; +void debug_usleep(int msec, char *file, int line, int hour, int min, int sec) +{ + usleep(msec); +} + void debug(const char *function, int line, char *prefix, char *buffer) { /* if we have a new debug count, we add a mark */ @@ -74,8 +68,8 @@ void debug(const char *function, int line, char *prefix, char *buffer) last_debug = debug_count; if (!nooutput) printf("\033[34m--------------------- %04d.%02d.%02d %02d:%02d:%02d %06d\033[36m\n", now_tm->tm_year+1900, now_tm->tm_mon+1, now_tm->tm_mday, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec, debug_count%1000000); - if (options.deb&DEBUG_LOG && global_debug) - dprint(DBGM_MAN, 0, "--------------------- %04d.%02d.%02d %02d:%02d:%02d %06d\n", now_tm->tm_year+1900, now_tm->tm_mon+1, now_tm->tm_mday, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec, debug_count%1000000); + if (debug_fp) + fprintf(debug_fp, "--------------------- %04d.%02d.%02d %02d:%02d:%02d %06d\n", now_tm->tm_year+1900, now_tm->tm_mon+1, now_tm->tm_mday, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec, debug_count%1000000); } if (!nooutput) @@ -88,14 +82,14 @@ void debug(const char *function, int line, char *prefix, char *buffer) printf("%s", buffer); } - if (options.deb&DEBUG_LOG && global_debug) + if (debug_fp) { if (debug_newline) { if (function) - dprint(DBGM_MAN, 0, "%s%s(in %s() line %d): %s", prefix?prefix:"", prefix?" ":"", function, line, buffer); + fprintf(debug_fp, "%s%s(in %s() line %d): %s", prefix?prefix:"", prefix?" ":"", function, line, buffer); else - dprint(DBGM_MAN, 0, "%s%s: %s", prefix?prefix:"", prefix?" ":"", buffer); + fprintf(debug_fp, "%s%s: %s", prefix?prefix:"", prefix?" ":"", buffer); } } @@ -106,7 +100,7 @@ void debug(const char *function, int line, char *prefix, char *buffer) } -void _printdebug(const char *function, int line, unsigned long mask, const char *fmt, ...) +void _printdebug(const char *function, int line, unsigned int mask, const char *fmt, ...) { char buffer[4096]; va_list args; @@ -161,7 +155,7 @@ void sighandler(int sigset) return; if (!quit) { - quit=1; + quit = sigset; /* set scheduler & priority */ if (options.schedule > 1) { @@ -170,7 +164,7 @@ void sighandler(int sigset) sched_setscheduler(0, SCHED_OTHER, &schedp); } fprintf(stderr, "LCR: Signal received: %d\n", sigset); - PERROR("Signal received: %d\n", sigset); + PDEBUG(DEBUG_LOG, "Signal received: %d\n", sigset); } } @@ -182,25 +176,28 @@ int main(int argc, char *argv[]) { int ret = -1; int lockfd = -1; /* file lock */ - struct message *message; + struct lcr_msg *message; class Port *port; class Endpoint *epoint; - class Call *call; + class Join *join; int i; int all_idle; char prefix_string[64]; struct sched_param schedp; char *debug_prefix = "alloc"; int created_mutexd = 0,/* created_mutext = 0,*/ created_mutexe = 0, - created_lock = 0, created_signal = 0, created_debug = 0; -#ifdef DEBUG_DURATION - time_t durationupdate; - double idle_duration, isdn_duration, port_duration, epoint_duration, call_duration, message_duration, admin_duration; - double start_d; -#endif + created_lock = 0, created_signal = 0, created_debug = 0, + created_misdn = 0; int idletime = 0, idlecheck = 0; - char debug_log[128]; - char tracetext[256]; + char tracetext[256], lock[128]; + +#if 0 + /* init fdset */ + memset(lcr_fdset, 0, sizeof(lcr_fdset)); +#endif + + /* lock LCR process */ +// pthread_mutex_lock(&mutex_lcr); /* current time */ GET_NOW(); @@ -222,20 +219,13 @@ int main(int argc, char *argv[]) printf("rules [action] = Get individual help for given action.\n"); // printf("route = Show current routing as it is parsed.\n"); printf("\n"); - ret = 0; + ret = 999; goto free; } /* init crc */ crc_init(); - /* check for root (real or effective) */ - if (getuid() && geteuid()) - { - fprintf(stderr, "Please run %s as super-user.\n", NAME); - goto free; - } - /* the mutex init */ if (pthread_mutex_init(&mutexd, NULL)) { @@ -278,31 +268,25 @@ int main(int argc, char *argv[]) /* query available isdn ports */ if (!(strcasecmp(argv[1],"query"))) { - mISDN_port_info(); + fprintf(stderr, "-> Using 'isdninfo'\n"); + system("isdninfo"); ret = 0; goto free; } /* read options */ if (read_options() == 0) + { + PERROR("%s", options_error); goto free; + } - /* initialize stuff of the NT lib */ - if (options.deb & DEBUG_STACK) - { - global_debug = 0xffffffff & ~DBGM_MSG; -// global_debug = DBGM_L3DATA; - } else - global_debug = DBGM_MAN; - SPRINT(debug_log, "%s/debug.log", INSTALL_DATA); - if (options.deb & DEBUG_LOG) - debug_init(global_debug, debug_log, debug_log, debug_log); - else - debug_init(global_debug, NULL, NULL, NULL); + /* init mISDN */ + if (mISDN_initialize() < 0) + goto free; + created_misdn = 1; created_debug = 1; - msg_init(); - /* read ruleset(s) */ if (!(ruleset_first = ruleset_parse())) goto free; @@ -368,9 +352,11 @@ int main(int argc, char *argv[]) } /* create lock and lock! */ - if ((lockfd = open("/var/run/lcr.lock", O_CREAT, 0)) < 0) + SPRINT(lock, "%s/lcr.lock", options.lock); + if ((lockfd = open(lock, O_CREAT | O_WRONLY)) < 0) { - fprintf(stderr, "Cannot create lock file: /var/run/lcr.lock\n"); + fprintf(stderr, "Cannot create lock file: %s\n", lock); + fprintf(stderr, "Check options.conf to change to path with permissions for you.\n"); goto free; } if (flock(lockfd, LOCK_EX|LOCK_NB) < 0) @@ -424,18 +410,17 @@ int main(int argc, char *argv[]) switch(errno) { case ENOMEM: - fprintf(stderr, "Not enough memory to lock paging, exitting...\n"); + fprintf(stderr, "Warning: Not enough memory to lock paging, exitting...\n"); break; case EPERM: - fprintf(stderr, "No permission to lock paging, exitting...\n"); + fprintf(stderr, "Warning: No permission to lock paging, exitting...\n"); break; case EFAULT: - fprintf(stderr, "'Bad address' while locking paging, exitting...\n"); + fprintf(stderr, "Warning: 'Bad address' while locking paging, exitting...\n"); break; default: - fprintf(stderr, "Unknown error %d while locking paging, exitting...\n", errno); + fprintf(stderr, "Warning: Unknown error %d while locking paging, exitting...\n", errno); } - goto free; } /* set real time scheduler & priority */ @@ -464,26 +449,29 @@ int main(int argc, char *argv[]) printf("%s\n", tracetext); end_trace(); GET_NOW(); -#ifdef DEBUG_DURATION - start_d = now_d; - durationupdate = now; - idle_duration = isdn_duration = port_duration = epoint_duration = call_duration = message_duration = admin_duration = 0; -#endif quit = 0; while(!quit) { + + last_d = now_d; + GET_NOW(); + if (now_d-last_d > 1.0) + { + PERROR("LCR was stalling %d.%d seconds\n", ((int)((now_d-last_d)*10.0))/10, (int)((now_d-last_d)*10.0)); + } /* all loops must be counted from the beginning since nodes might get freed during handler */ all_idle = 1; +//#warning debugging usleep crash +// debug_usleep(1, __FILE__, __LINE__, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec); + /* handle mISDN messages from kernel */ debug_prefix = "ISDN"; if (mISDN_handler()) all_idle = 0; -#ifdef DEBUG_DURATION - GET_NOW(); - isdn_duration += (now_d - start_d); - start_d = now_d; -#endif +//#warning debugging usleep crash +// debug_usleep(1, __FILE__, __LINE__, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec); + BUDETECT /* loop through all port ports and call their handler */ @@ -500,11 +488,6 @@ BUDETECT goto port_again; port = port->next; } -#ifdef DEBUG_DURATION - GET_NOW(); - port_duration += (now_d - start_d); - start_d = now_d; -#endif /* loop through all epoint and call their handler */ epoint_again: @@ -521,31 +504,21 @@ BUDETECT goto epoint_again; epoint = epoint->next; } -#ifdef DEBUG_DURATION - GET_NOW(); - epoint_duration += (now_d - start_d); - start_d = now_d; -#endif - /* loop through all calls and call their handler */ - call_again: - call = call_first; - while(call) + /* loop through all joins and call their handler */ + join_again: + join = join_first; + while(join) { - debug_prefix = "call"; + debug_prefix = "join"; debug_count++; - ret = call->handler(); + ret = join->handler(); if (ret) all_idle = 0; - if (ret < 0) /* call has been destroyed */ - goto call_again; - call = call->next; + if (ret < 0) /* join has been destroyed */ + goto join_again; + join = join->next; } -#ifdef DEBUG_DURATION - GET_NOW(); - call_duration += (now_d - start_d); - start_d = now_d; -#endif debug_prefix = 0; @@ -575,33 +548,33 @@ BUDETECT } break; - case EPOINT_TO_CALL: - debug_prefix = "msg epoint->call"; - call = find_call_id(message->id_to); - if (call) + case EPOINT_TO_JOIN: + debug_prefix = "msg epoint->join"; + join = find_join_id(message->id_to); + if (join) { - call->message_epoint(message->id_from, message->type, &message->param); + join->message_epoint(message->id_from, message->type, &message->param); } else { - PDEBUG(DEBUG_MSG, "Warning: message %s from endpoint %d to call %d. call doesn't exist anymore\n", messages_txt[message->type], message->id_from, message->id_to); + PDEBUG(DEBUG_MSG, "Warning: message %s from endpoint %d to join %d. join doesn't exist anymore\n", messages_txt[message->type], message->id_from, message->id_to); } break; - case CALL_TO_EPOINT: - debug_prefix = "msg call->epoint"; + case JOIN_TO_EPOINT: + debug_prefix = "msg join->epoint"; epoint = find_epoint_id(message->id_to); if (epoint) { if (epoint->ep_app) { - epoint->ep_app->ea_message_call(message->id_from, message->type, &message->param); + epoint->ep_app->ea_message_join(message->id_from, message->type, &message->param); } else { - PDEBUG(DEBUG_MSG, "Warning: message %s from call %d to endpoint %d. endpoint doesn't have an application.\n", messages_txt[message->type], message->id_from, message->id_to); + PDEBUG(DEBUG_MSG, "Warning: message %s from join %d to endpoint %d. endpoint doesn't have an application.\n", messages_txt[message->type], message->id_from, message->id_to); } } else { - PDEBUG(DEBUG_MSG, "Warning: message %s from call %d to endpoint %d. endpoint doesn't exist anymore.\n", messages_txt[message->type], message->id_from, message->id_to); + PDEBUG(DEBUG_MSG, "Warning: message %s from join %d to endpoint %d. endpoint doesn't exist anymore.\n", messages_txt[message->type], message->id_from, message->id_to); } break; @@ -625,21 +598,11 @@ BUDETECT debug_count++; debug_prefix = "message"; } -#ifdef DEBUG_DURATION - GET_NOW(); - message_duration += (now_d - start_d); - start_d = now_d; -#endif BUDETECT /* handle socket */ if (admin_handle()) all_idle = 0; -#ifdef DEBUG_DURATION - GET_NOW(); - admin_duration += (now_d - start_d); - start_d = now_d; -#endif BUDETECT #if 0 @@ -650,6 +613,8 @@ BUDETECT all_idle = 0; } #endif +//#warning debugging usleep crash +// debug_usleep(1, __FILE__, __LINE__, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec); /* do idle checking */ if (idlecheck != now) @@ -658,35 +623,22 @@ BUDETECT idletime = 0; idlecheck = now; } -#ifdef DEBUG_DURATION - GET_NOW(); - idle_duration += (now_d - start_d); - start_d = now_d; - if (durationupdate != now) - { - durationupdate = now; - printf("Idle:%3d ISDN:%3d Port:%3d Epoint:%3d Call:%3d Message:%3d Admin:%3d\n", - (int)(idle_duration*100), - (int)(isdn_duration*100), - (int)(port_duration*100), - (int)(epoint_duration*100), - (int)(call_duration*100), - (int)(message_duration*100), - (int)(admin_duration*100)); - idle_duration = isdn_duration = port_duration = epoint_duration = call_duration = message_duration = admin_duration = 0; - } -#else - GET_NOW(); -#endif /* did we do nothing? so we wait to give time to other processes */ if (all_idle) { - usleep(4000); /* wait 32 samples */ +// pthread_mutex_unlock(&mutex_lcr); // unlock LCR + debug_usleep(4000, __FILE__, __LINE__, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec); +// pthread_mutex_lock(&mutex_lcr); // lock LCR idletime += 4000; } } - printf("LCR terminated\n"); + SPRINT(tracetext, "%s terminated", NAME); + printf("%s\n", tracetext); + start_trace(0, NULL, NULL, NULL, 0, 0, 0, tracetext); + if (quit) + add_trace("signal", NULL, "%d", quit); + end_trace(); ret=0; /* free all */ @@ -698,7 +650,7 @@ free: if (options.schedule > 1) { memset(&schedp, 0, sizeof(schedp)); - schedp.sched_priority = 0; + schedp.sched_priority = options.schedule; sched_setscheduler(0, SCHED_OTHER, &schedp); } /* reset signals */ @@ -725,7 +677,7 @@ free: } epoint_first = NULL; debug_count++; - call_free(); + join_free(); /* free interfaces */ if (interface_first) @@ -759,7 +711,11 @@ free: if (created_lock) flock(lockfd, LOCK_UN); if (lockfd >= 0) + { + chmod(lock, 0700); + unlink(lock); close(lockfd); + } /* free rulesets */ if (ruleset_first) @@ -777,10 +733,9 @@ free: if (pthread_mutex_destroy(&mutexd)) fprintf(stderr, "cannot destroy 'PDEBUG' mutex\n"); - /* close debug */ - if (created_debug) - debug_close(); - global_debug = 0; + /* deinitialize mISDN */ + if (created_misdn) + mISDN_deinitialize(); /* display memory leak */ #define MEMCHECK(a, b) \ @@ -796,9 +751,9 @@ free: ret = -1; \ } MEMCHECK("",memuse) - MEMCHECK("memory block(s) left (port.cpp)",pmemuse) - MEMCHECK("memory block(s) left (epoint.cpp)",ememuse) - MEMCHECK("memory block(s) left (call.cpp)",cmemuse) + MEMCHECK("memory block(s) left (port.cpp ...)",pmemuse) + MEMCHECK("memory block(s) left (epoint*.cpp ...)",ememuse) + MEMCHECK("memory block(s) left (join*.cpp)",cmemuse) MEMCHECK("memory block(s) left (message.c)",mmemuse) MEMCHECK("memory block(s) left (route.c)",rmemuse) MEMCHECK("memory block(s) left (args)",amemuse) @@ -806,13 +761,10 @@ free: MEMCHECK("file descriptor(s) left",fduse) MEMCHECK("file handler(s) left",fhuse) + /* unlock LCR process */ +// pthread_mutex_unlock(&mutex_lcr); + /* take me out */ - SPRINT(tracetext, "%s exit", NAME); - printf("%s\n", tracetext); - start_trace(0, NULL, NULL, NULL, 0, 0, 0, tracetext); - if (ret) - add_trace("error", NULL, "%d", ret); - end_trace(); return(ret); }