src/event_neonserv_join.c

   1 /* event_neonserv_join.c - NeonServ v5.2
   2  * Copyright (C) 2011  Philipp Kreil (pk910)
   3  *
   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.
   8  *
   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.
  13  *
  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/>.
  16  */
  17
  18 struct neonserv_event_join_cache {
  19     struct ClientSocket *client;
  20     struct ChanUser *chanuser;
  21 };
  22
  23 static USERAUTH_CALLBACK(neonserv_event_join_nick_lookup);
  24 static void neonserv_event_join_async1(struct ClientSocket *client, struct ChanUser *chanuser);
  25 static TIMEQ_CALLBACK(neonserv_event_join_dynlimit);
  26
  27 static void neonserv_event_join(struct ChanUser *chanuser) {
  28     struct UserNode *user = chanuser->user;
  29     struct ClientSocket *client = getBotForChannel(chanuser->chan);
  30     if(!client) return; //we can't "see" this event
  31     if(user->flags & USERFLAG_ISBOT) {
  32         putsock(client, "MODE %s +o %s", chanuser->chan->name, chanuser->user->nick);
  33         return;
  34     }
  35     loadChannelSettings(chanuser->chan);
  36     if(!(chanuser->chan->flags & CHANFLAG_CHAN_REGISTERED)) return;
  37     char *ban;
  38     char usermask[NICKLEN+USERLEN+HOSTLEN+3];
  39     sprintf(usermask, "%s!%s@%s", user->nick, user->ident, user->host);
  40     if((ban = getBanAffectingMask(chanuser->chan, usermask)) != NULL && !(user->flags & (USERFLAG_ISBOT | USERFLAG_ISIRCOP))) {
  41         MYSQL_RES *res;
  42         MYSQL_ROW row;
  43         printf_mysql_query("SELECT `ban_reason`, `user_user` FROM `bans` LEFT JOIN `users` ON `ban_owner` = `user_id` WHERE `ban_channel` = '%d' AND `ban_mask` = '%s'", chanuser->chan->channel_id, escape_string(ban));
  44         res = mysql_use();
  45         if ((row = mysql_fetch_row(res)) != NULL) {
  46             putsock(client, "MODE %s +b %s", chanuser->chan->name, ban);
  47             putsock(client, "KICK %s %s :(%s) %s", chanuser->chan->name, chanuser->user->nick, (row[1] ? row[1] : client->user->nick), row[0]);
  48             return;
  49         }
  50     }
  51     if(!(user->flags & USERFLAG_ISAUTHED)) {
  52         struct neonserv_event_join_cache *cache = malloc(sizeof(*cache));
  53         if (!cache) {
  54             perror("malloc() failed");
  55             return;
  56         }
  57         cache->client = client;
  58         cache->chanuser = chanuser;
  59         get_userauth(user, neonserv_event_join_nick_lookup, cache);
  60     } else
  61         neonserv_event_join_async1(client, chanuser);
  62 }
  63
  64 static USERAUTH_CALLBACK(neonserv_event_join_nick_lookup) {
  65     struct neonserv_event_join_cache *cache = data;
  66     if(user) {
  67         neonserv_event_join_async1(cache->client, cache->chanuser);
  68     }
  69     free(cache);
  70 }
  71
  72 static void neonserv_event_join_async1(struct ClientSocket *client, struct ChanUser *chanuser) {
  73     struct ClientSocket *textclient = ((client->flags & SOCKET_FLAG_PREFERRED) ? client : get_prefered_bot(client->botid));
  74     struct ChanNode *chan = chanuser->chan;
  75     struct UserNode *user = chanuser->user;
  76     struct ModeBuffer *modeBuf;
  77     MYSQL_RES *res;
  78     MYSQL_ROW row, chanuserrow, defaultrow = NULL;
  79     printf_mysql_query("SELECT `channel_maxusers`, `channel_greeting`, `channel_usergreeting`, `channel_getop`, `channel_getvoice`, `channel_userinfo`, `channel_dynlimit` FROM `channels` WHERE `channel_id` = '%d'", chan->channel_id);
  80     res = mysql_use();
  81     if ((row = mysql_fetch_row(res)) == NULL) return;
  82     if(!row[3] || !row[4] || !row[5]) {
  83         printf_mysql_query("SELECT `channel_getop`, `channel_getvoice`, `channel_userinfo` FROM `channels` WHERE `channel_name` = 'defaults'");
  84         res = mysql_use();
  85         defaultrow = mysql_fetch_row(res);
  86     }
  87     if(chan->usercount > atoi(row[0])) {
  88         //update maxusers
  89         printf_mysql_query("UPDATE `channels` SET `channel_maxusers` = '%d' WHERE `channel_id` = '%d'", chan->usercount, chan->channel_id);
  90     }
  91     if((user->flags & USERFLAG_ISAUTHED)) {
  92         printf_mysql_query("SELECT `chanuser_access`, `chanuser_flags`, `chanuser_infoline`, `chanuser_seen`, `chanuser_id` FROM `chanusers` LEFT JOIN `users` ON `chanuser_uid` = `user_id` WHERE `chanuser_cid` = '%d' AND `user_user` = '%s'", chan->channel_id, escape_string(user->auth));
  93         res = mysql_use();
  94         chanuserrow = mysql_fetch_row(res);
  95     } else
  96         chanuserrow = NULL;
  97     if(!chanuserrow)
  98         printf_mysql_query("UPDATE `channels` SET `channel_lastvisit` = UNIX_TIMESTAMP() WHERE `channel_id` = '%d'", chan->channel_id);
  99     int userflags = (chanuserrow ? atoi(chanuserrow[1]) : 0);
 100     int uaccess = ((chanuserrow && !(userflags & DB_CHANUSER_SUSPENDED)) ? atoi(chanuserrow[0]) : 0);
 101     //GREETING
 102     char greeting[MAXLEN];
 103     int greetingPos = 0;
 104     char *a, *b = (chanuserrow && *row[2] ? row[2] : row[1]);
 105     do {
 106         if(!b) break;
 107         a = strstr(b, "$");
 108         if(a) *a = '\0';
 109         greetingPos += sprintf(greeting + greetingPos, "%s", b);
 110         if(!a) break;
 111         switch(a[1]) {
 112             case '\0':
 113                 a = NULL;
 114                 break;
 115             case 'A':
 116                 greetingPos += sprintf(greeting + greetingPos, "%d", uaccess);
 117                 break;
 118             case 'B':
 119                 greetingPos += sprintf(greeting + greetingPos, "%s", client->user->nick);
 120                 break;
 121             case 'N':
 122                 greetingPos += sprintf(greeting + greetingPos, "%s", user->nick);
 123                 break;
 124             case 'H':
 125                 greetingPos += sprintf(greeting + greetingPos, "%s@%s", user->ident, user->host);
 126                 break;
 127             case 'U':
 128                 greetingPos += sprintf(greeting + greetingPos, "%s", ((user->flags & USERFLAG_ISAUTHED) ? user->auth : "*"));
 129                 break;
 130             default:
 131                 greeting[greetingPos++] = '$';
 132                 greeting[greetingPos++] = a[1];
 133                 break;
 134         }
 135         if(a)
 136             b = a+2;
 137     } while(a);
 138     if(greetingPos)
 139         reply(textclient, user, "[%s] %s", chan->name, greeting);
 140     //USER RIGHTS
 141     if(!(userflags & DB_CHANUSER_NOAUTOOP)) {
 142         int getop = atoi((row[3] ? row[3] : defaultrow[0]));
 143         int getvoice = atoi((row[4] ? row[4] : defaultrow[1]));
 144         modeBuf = initModeBuffer(client, chan);
 145         if(uaccess >= getop && uaccess != 0) { //we disallow auto op for all users
 146             modeBufferOp(modeBuf, user->nick);
 147         } else if(uaccess >= getvoice) {
 148             modeBufferVoice(modeBuf, user->nick);
 149         }
 150         freeModeBuffer(modeBuf);
 151     }
 152     //INFOLINE
 153     int userinfoaccess = atoi((row[5] ? row[5] : defaultrow[2]));
 154     if(chanuserrow && strcmp(chanuserrow[2], "") && uaccess > userinfoaccess) {
 155         if(!strcmp(chanuserrow[3], "0") || time(0) - atol(chanuserrow[3]) >= 30) {
 156             putsock(client, "PRIVMSG %s :[%s] %s", chan->name, user->nick, chanuserrow[2]);
 157         }
 158     }
 159     //SEEN
 160     if(chanuserrow) {
 161         printf_mysql_query("UPDATE `chanusers` SET `chanuser_seen` = UNIX_TIMESTAMP() WHERE `chanuser_id` = '%s'", chanuserrow[4]);
 162     }
 163     //DYNLIMIT
 164     if(row[6] && strcmp(row[6], "0")) {
 165         char nameBuf[CHANNELLEN + 10];
 166         sprintf(nameBuf, "dynlimit_%s", chan->name);
 167         if(!timeq_name_exists(nameBuf)) {
 168             //neonserv_event_join_dynlimit
 169             timeq_add_name(nameBuf, 30, neonserv_event_join_dynlimit, strdup(chan->name));
 170         }
 171     }
 172     //AUTOINVITE
 173     if(chanuserrow && !strcmp(chanuserrow[3], "0") && time(0) - atol(chanuserrow[3]) >= 30) {
 174         //TODO: autoinvite
 175     }
 176 }
 177
 178 static TIMEQ_CALLBACK(neonserv_event_join_dynlimit) {
 179     char *chanName = data;
 180     struct ChanNode *chan = getChanByName(chanName);
 181     free(chanName);
 182     struct ClientSocket *client = getBotForChannel(chan);
 183     if(!client) return;
 184     loadChannelSettings(chan);
 185     if(!(chan->flags & CHANFLAG_CHAN_REGISTERED)) return;
 186     MYSQL_RES *res;
 187     MYSQL_ROW row;
 188     printf_mysql_query("SELECT `channel_dynlimit` FROM `channels` WHERE `channel_id` = '%d'", chan->channel_id);
 189     res = mysql_use();
 190     if ((row = mysql_fetch_row(res)) == NULL) return;
 191     if(row[0] && strcmp(row[0], "0")) {
 192         putsock(client, "MODE %s +l %d", chan->name, chan->usercount + atoi(row[0]));
 193     }
 194 }