/********************************************************************\ * BitlBee -- An IRC to other IM-networks gateway * * * * Copyright 2002-2004 Wilmer van der Gaast and others * \********************************************************************/ /* Main file (Windows specific part) */ /* This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License with the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #define BITLBEE_CORE #include "bitlbee.h" #include "commands.h" #include "crypting.h" #include "protocols/nogaim.h" #include "help.h" #include #include global_t global; /* Against global namespace pollution */ static void WINAPI service_ctrl (DWORD dwControl) { switch (dwControl) { case SERVICE_CONTROL_STOP: /* FIXME */ break; case SERVICE_CONTROL_INTERROGATE: break; default: break; } } static void bitlbee_init(int argc, char **argv) { int i = -1; memset( &global, 0, sizeof( global_t ) ); b_main_init(); global.conf = conf_load( argc, argv ); if( global.conf == NULL ) return; if( global.conf->runmode == RUNMODE_INETD ) { i = bitlbee_inetd_init(); log_message( LOGLVL_INFO, "Bitlbee %s starting in inetd mode.", BITLBEE_VERSION ); } else if( global.conf->runmode == RUNMODE_DAEMON ) { i = bitlbee_daemon_init(); log_message( LOGLVL_INFO, "Bitlbee %s starting in daemon mode.", BITLBEE_VERSION ); } else { log_message( LOGLVL_INFO, "No bitlbee mode specified..."); } if( i != 0 ) return; if( access( global.conf->configdir, F_OK ) != 0 ) log_message( LOGLVL_WARNING, "The configuration directory %s does not exist. Configuration won't be saved.", global.conf->configdir ); else if( access( global.conf->configdir, 06 ) != 0 ) log_message( LOGLVL_WARNING, "Permission problem: Can't read/write from/to %s.", global.conf->configdir ); if( help_init( &(global.help), HELP_FILE ) == NULL ) log_message( LOGLVL_WARNING, "Error opening helpfile %s.", global.helpfile ); } void service_main (DWORD argc, LPTSTR *argv) { SERVICE_STATUS_HANDLE handle; SERVICE_STATUS status; handle = RegisterServiceCtrlHandler("bitlbee", service_ctrl); if (!handle) return; status.dwServiceType = SERVICE_WIN32_OWN_PROCESS; status.dwServiceSpecificExitCode = 0; bitlbee_init(argc, argv); SetServiceStatus(handle, &status); b_main_run( ); } SERVICE_TABLE_ENTRY dispatch_table[] = { { TEXT("bitlbee"), (LPSERVICE_MAIN_FUNCTION)service_main }, { NULL, NULL } }; static int debug = 0; static void usage() { printf("Options:\n"); printf("-h Show this help message\n"); printf("-d Debug mode (simple console program)\n"); } int main( int argc, char **argv) { int i; WSADATA WSAData; nogaim_init( ); for (i = 1; i < argc; i++) { if (!strcmp(argv[i], "-d")) debug = 1; if (!strcmp(argv[i], "-h")) { usage(); return 0; } } WSAStartup(MAKEWORD(1,1), &WSAData); if (!debug) { if (!StartServiceCtrlDispatcher(dispatch_table)) log_message( LOGLVL_ERROR, "StartServiceCtrlDispatcher failed."); } else { bitlbee_init(argc, argv); b_main_run(); } return 0; } double gettime() { return (GetTickCount() / 1000); } void conf_get_string(HKEY section, const char *name, const char *def, char **dest) { char buf[4096]; long x; if (RegQueryValue(section, name, buf, &x) == ERROR_SUCCESS) { *dest = g_strdup(buf); } else if (!def) { *dest = NULL; } else { *dest = g_strdup(def); } } void conf_get_int(HKEY section, const char *name, int def, int *dest) { char buf[20]; long x; DWORD y; if (RegQueryValue(section, name, buf, &x) == ERROR_SUCCESS) { memcpy(&y, buf, sizeof(DWORD)); *dest = y; } else { *dest = def; } } conf_t *conf_load( int argc, char *argv[] ) { conf_t *conf; HKEY key, key_main, key_proxy; char *tmp; RegOpenKey(HKEY_CURRENT_USER, "SOFTWARE\\Bitlbee", &key); RegOpenKey(key, "main", &key_main); RegOpenKey(key, "proxy", &key_proxy); memset( &global, 0, sizeof( global_t ) ); b_main_init(); conf = g_new0( conf_t,1 ); global.conf = conf; conf_get_string(key_main, "interface_in", "0.0.0.0", &global.conf->iface_in); conf_get_string(key_main, "interface_out", "0.0.0.0", &global.conf->iface_out); conf_get_string(key_main, "port", "6667", &global.conf->port); conf_get_int(key_main, "verbose", 0, &global.conf->verbose); conf_get_string(key_main, "auth_pass", "", &global.conf->auth_pass); conf_get_string(key_main, "oper_pass", "", &global.conf->oper_pass); conf_get_int(key_main, "ping_interval_timeout", 60, &global.conf->ping_interval); conf_get_string(key_main, "hostname", "localhost", &global.conf->hostname); conf_get_string(key_main, "configdir", NULL, &global.conf->configdir); conf_get_string(key_main, "motdfile", NULL, &global.conf->motdfile); conf_get_string(key_main, "helpfile", NULL, &global.helpfile); global.conf->runmode = RUNMODE_DAEMON; conf_get_int(key_main, "AuthMode", AUTHMODE_OPEN, (int *)&global.conf->authmode); conf_get_string(key_proxy, "host", "", &tmp); strcpy(proxyhost, tmp); conf_get_string(key_proxy, "user", "", &tmp); strcpy(proxyuser, tmp); conf_get_string(key_proxy, "password", "", &tmp); strcpy(proxypass, tmp); conf_get_int(key_proxy, "type", PROXY_NONE, &proxytype); conf_get_int(key_proxy, "port", 3128, &proxyport); RegCloseKey(key); RegCloseKey(key_main); RegCloseKey(key_proxy); return conf; } void conf_loaddefaults( irc_t *irc ) { HKEY key_defaults; int i; char name[4096], data[4096]; DWORD namelen = sizeof(name), datalen = sizeof(data); DWORD type; if (RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\\Bitlbee\\defaults", &key_defaults) != ERROR_SUCCESS) { return; } for (i = 0; RegEnumValue(key_defaults, i, name, &namelen, NULL, &type, data, &datalen) == ERROR_SUCCESS; i++) { set_t *s = set_find( &irc->set, name ); if( s ) { if( s->def ) g_free( s->def ); s->def = g_strdup( data ); } namelen = sizeof(name); datalen = sizeof(data); } RegCloseKey(key_defaults); } #ifndef INADDR_NONE #define INADDR_NONE 0xffffffff #endif int inet_aton(const char *cp, struct in_addr *addr) { addr->s_addr = inet_addr(cp); return (addr->s_addr == INADDR_NONE) ? 0 : 1; } void log_error(char *msg) { log_message(LOGLVL_ERROR, "%s", msg); } void log_message(int level, char *message, ...) { HANDLE hEventSource; LPTSTR lpszStrings[2]; WORD elevel; va_list ap; va_start(ap, message); if (debug) { vprintf(message, ap); putchar('\n'); va_end(ap); return; } hEventSource = RegisterEventSource(NULL, TEXT("bitlbee")); lpszStrings[0] = TEXT("bitlbee"); lpszStrings[1] = g_strdup_vprintf(message, ap); va_end(ap); switch (level) { case LOGLVL_ERROR: elevel = EVENTLOG_ERROR_TYPE; break; case LOGLVL_WARNING: elevel = EVENTLOG_WARNING_TYPE; break; case LOGLVL_INFO: elevel = EVENTLOG_INFORMATION_TYPE; break; #ifdef DEBUG case LOGLVL_DEBUG: elevel = EVENTLOG_AUDIT_SUCCESS; break; #endif } if (hEventSource != NULL) { ReportEvent(hEventSource, elevel, 0, 0, NULL, 2, 0, lpszStrings, NULL); DeregisterEventSource(hEventSource); } g_free(lpszStrings[1]); } void log_link(int level, int output) { /* FIXME */ } struct tm * gmtime_r (const time_t *timer, struct tm *result) { struct tm *local_result; local_result = gmtime (timer); if (local_result == NULL || result == NULL) return NULL; memcpy (result, local_result, sizeof (result)); return result; }