1 /* main.c - NeonServ v5.3
2 * Copyright (C) 2011-2012 Philipp Kreil (pk910)
4 * This program is free software: you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation, either version 3 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <http://www.gnu.org/licenses/>.
19 #include "ClientSocket.h"
22 #include "IRCEvents.h"
23 #include "IRCParser.h"
25 #include "WHOHandler.h"
27 #include "mysqlConn.h"
28 #include "HandleInfoHandler.h"
32 #include "EventLogger.h"
37 #include "ConfigParser.h"
42 static int running, hard_restart;
43 static int statistics_requested_lusers = 0;
44 int statistics_enabled;
45 TIMEQ_CALLBACK(main_statistics);
46 TIMEQ_CALLBACK(main_checkauths);
49 pthread_mutex_t cache_sync;
50 pthread_mutex_t whohandler_sync, whohandler_mass_sync;
64 free_handleinfohandler();
68 static int load_mysql_config() {
69 char *mysql_host, *mysql_user, *mysql_pass, *mysql_base;
71 if(loadConfig("neonserv.conf")) {
72 mysql_host = get_string_field("MySQL.host");
74 perror("invalid neonserv.conf: missing MySQL.host");
77 mysql_serverport = get_int_field("MySQL.port");
79 mysql_serverport = 3306;
80 mysql_user = get_string_field("MySQL.user");
82 perror("invalid neonserv.conf: missing MySQL.user");
85 mysql_pass = get_string_field("MySQL.pass");
87 perror("invalid neonserv.conf: missing MySQL.pass");
90 mysql_base = get_string_field("MySQL.base");
92 perror("invalid neonserv.conf: missing MySQL base");
96 perror("Unable to load neonserv.conf");
99 init_mysql(mysql_host, mysql_serverport, mysql_user, mysql_pass, mysql_base);
104 void * thread_main(void *arg) {
107 socket_wait = time(0) + SOCKET_SELECT_TIME;
109 socket_loop(SOCKET_SELECT_TIME);
110 } while(time(0) < socket_wait);
119 int main(int argc, char *argv[]) {
122 start_time = time(0);
127 // Start Windows Sockets.
128 res = WSAStartup(MAKEWORD(2, 0), &wsadata);
131 perror("Unable to start Windows Sockets");
136 if(!load_mysql_config()) return 0;
138 statistics_enabled = get_int_field("statistics.enable");
141 THREAD_MUTEX_INIT(cache_sync);
142 THREAD_MUTEX_INIT(whohandler_sync);
143 THREAD_MUTEX_INIT(whohandler_mass_sync);
157 init_handleinfohandler();
165 int update_minutes = get_int_field("statistics.frequency");
166 if(!update_minutes) update_minutes = 2;
167 timeq_add(update_minutes * 60 + 10, main_statistics, NULL);
169 timeq_add(90, main_checkauths, NULL);
171 int worker_threads = get_int_field("General.worker_threads");
172 if(!worker_threads) worker_threads = 1;
176 pthread_t tid[worker_threads];
178 for(tid_id = 0; tid_id < worker_threads; tid_id++) {
180 pthread_create(&tid[tid_id], NULL, thread_main, NULL);
182 int usleep_delay = 1000000 / TICKS_PER_SECOND;
188 usleep(usleep_delay);
190 for(tid_id = 0; tid_id < worker_threads; tid_id++) {
191 pthread_join(tid[tid_id], NULL);
197 socket_wait = time(0) + SOCKET_SELECT_TIME;
199 socket_loop(SOCKET_SELECT_TIME);
200 } while(time(0) < socket_wait);
211 /* Append a NULL to the end of argv[]. */
212 char **restart_argv = (char **)alloca((argc + 1) * sizeof(char *));
213 memcpy(restart_argv, argv, argc * sizeof(char *));
214 restart_argv[argc] = NULL;
217 execv(argv[0], (const char * const*)restart_argv);
219 execv(argv[0], restart_argv);
225 int stricmp (const char *s1, const char *s2)
227 if (s1 == NULL) return s2 == NULL ? 0 : -(*s2);
228 if (s2 == NULL) return *s1;
230 while ((c1 = tolower (*s1)) == (c2 = tolower (*s2)))
232 if (*s1 == '\0') break;
238 int stricmplen (const char *s1, const char *s2, int len)
240 if (s1 == NULL) return s2 == NULL ? 0 : -(*s2);
241 if (s2 == NULL) return *s1;
244 while ((c1 = tolower (*s1)) == (c2 = tolower (*s2)))
247 if (*s1 == '\0') break;
254 void restart_bot(int do_hard_restart) {
255 hard_restart = do_hard_restart;
264 void reload_config() {
265 loadConfig("neonserv.conf");
268 static int getCurrentSecondsOfDay() {
269 time_t now = time(0);
270 struct tm *timeofday = localtime(&now);
272 seconds += timeofday->tm_hour * 3600;
273 seconds += timeofday->tm_min * 60;
274 seconds += timeofday->tm_sec;
278 static AUTHLOOKUP_CALLBACK(main_checkauths_callback) {
279 //check if registered is still valid
282 printf_mysql_query("SELECT `user_id`, `user_registered` FROM `users` WHERE `user_user` = '%s'", escape_string(auth));
284 if ((row = mysql_fetch_row(res)) != NULL) {
285 if(!exists || (strcmp(row[1], "0") && registered != atoi(row[1]))) {
286 //User is no longer valid! Delete it...
287 deleteUser(atoi(row[0]));
288 char *alertchan = get_string_field("General.CheckAuths.alertchan");
290 struct ChanNode *alertchan_chan = getChanByName(alertchan);
291 struct ClientSocket *alertclient;
292 if(alertchan_chan && (alertclient = getChannelBot(alertchan_chan, 0)) != NULL) {
293 putsock(alertclient, "PRIVMSG %s :Deleted User %s", alertchan_chan->name, auth);
296 } else if(exists && !strcmp(row[1], "0")) {
297 printf_mysql_query("UPDATE `users` SET `user_registered` = '%lu', `user_lastcheck` = UNIX_TIMESTAMP() WHERE `user_id` = '%s'", (unsigned long) registered, row[0]);
299 printf_mysql_query("UPDATE `users` SET `user_lastcheck` = UNIX_TIMESTAMP() WHERE `user_id` = '%s'", row[0]);
304 TIMEQ_CALLBACK(main_checkauths) {
306 if(get_int_field("General.CheckAuths.enabled")) {
307 int check_start_time = get_int_field("General.CheckAuths.start_time") * 3600;
308 int duration = get_int_field("General.CheckAuths.duration") * 60;
309 int now = getCurrentSecondsOfDay();
310 if(now < check_start_time && check_start_time+duration >= 86400) {
311 check_start_time -= 86400;
313 if(now >= check_start_time && now < (check_start_time + duration)) {
314 next_call = get_int_field("General.CheckAuths.interval");
315 //get the "longest-unchecked-user"
319 time_t unixtime = time(0);
320 int min_unckecked = get_int_field("General.CheckAuths.min_unckecked");
321 printf_mysql_query("SELECT `user_user`, `user_lastcheck` FROM `users` ORDER BY `user_lastcheck` ASC LIMIT 1");
323 if ((row = mysql_fetch_row(res)) != NULL) {
324 lastcheck = atoi(row[1]);
325 if(!lastcheck || unixtime - lastcheck >= min_unckecked) {
326 lookup_authname(row[0], main_checkauths_callback, NULL);
332 if(now > check_start_time)
333 pending = 86400 - now + check_start_time;
335 pending = check_start_time - now;
341 timeq_add(next_call, main_checkauths, NULL);
344 TIMEQ_CALLBACK(main_statistics) {
345 int update_minutes = get_int_field("statistics.frequency");
346 if(!update_minutes) update_minutes = 2;
347 timeq_add(update_minutes * 60, main_statistics, NULL);
348 if(get_int_field("statistics.enable")) {
349 statistics_enabled = 1;
350 statistics_requested_lusers = 1;
351 if(get_int_field("statistics.include_lusers")) {
352 struct ClientSocket *bot, *lusersbot = NULL;
353 for(bot = getBots(SOCKET_FLAG_READY, NULL); bot; bot = getBots(SOCKET_FLAG_READY, bot)) {
354 if(bot->flags & SOCKET_FLAG_PREFERRED)
358 if(bot == NULL) bot = getBots(SOCKET_FLAG_READY, NULL);
359 putsock(bot, "LUSERS");
364 statistics_enabled = 0;
367 void statistics_update() {
368 if(get_int_field("statistics.enable") && statistics_requested_lusers && get_string_field("statistics.execute")) {
369 statistics_requested_lusers = 0;
370 char command[MAXLEN];
376 - commands per minute
380 sprintf(command, "%s %d %d %d %d %d %d %d", get_string_field("statistics.execute"), getUserCount(), getChanUserCount(), getChannelCount(), statistics_privmsg, statistics_commands, statistics_network_users, statistics_network_channels);
381 statistics_privmsg = 0;
382 statistics_commands = 0;