src/modules/NeonServ.mod/cmd_neonserv_access.c

   1 /* cmd_neonserv_access.c - NeonServ v5.6
   2  * Copyright (C) 2011-2012  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 #include "cmd_neonserv.h"
  19
  20 /*
  21 * argv[0] - nick / *auth
  22 */
  23 static USERAUTH_CALLBACK(neonserv_cmd_access_nick_lookup);
  24 static void neonserv_cmd_access_async1(struct ClientSocket *client, struct ClientSocket *textclient, struct UserNode *user, struct ChanNode *chan, char *nick, char *auth, struct UserNode *target);
  25 static void neonserv_cmd_access_filter_ranking_info(char *info, char *buffer, char *nick, char *auth, char *rank_name);
  26
  27 struct neonserv_cmd_access_cache {
  28     struct ClientSocket *client, *textclient;
  29     struct UserNode *user;
  30     struct ChanNode *chan;
  31     char *nick;
  32 };
  33
  34 CMD_BIND(neonserv_cmd_access) {
  35     if(argc == 0) {
  36         if(!(user->flags & USERFLAG_ISAUTHED)) {
  37             struct neonserv_cmd_access_cache *cache = malloc(sizeof(*cache));
  38             if (!cache) {
  39                 printf_log("neonserv", LOG_ERROR, "%s:%d malloc() failed", __FILE__, __LINE__);
  40                 return;
  41             }
  42             cache->client = client;
  43             cache->textclient = textclient;
  44             cache->user = user;
  45             cache->chan = chan;
  46             cache->nick = strdup(user->nick);
  47             get_userauth(user, module_id, neonserv_cmd_access_nick_lookup, cache);
  48         } else
  49             neonserv_cmd_access_async1(client, textclient, user, chan, user->nick, user->auth, user);
  50     }
  51     else if(argv[0][0] == '*') {
  52         //we've got an auth
  53         argv[0]++;
  54         neonserv_cmd_access_async1(client, textclient, user, chan, NULL, argv[0], NULL);
  55     } else {
  56         struct UserNode *cuser = getUserByNick(argv[0]);
  57         if(!cuser) {
  58             cuser = createTempUser(argv[0]);
  59             if(!cuser) {
  60                 reply(textclient, user, "NS_USER_UNKNOWN", argv[0]);
  61                 return;
  62             }
  63             cuser->flags |= USERFLAG_ISTMPUSER;
  64         }
  65         if(cuser->flags & USERFLAG_ISAUTHED) {
  66             neonserv_cmd_access_async1(client, textclient, user, chan, argv[0], cuser->auth, cuser);
  67         } else {
  68             struct neonserv_cmd_access_cache *cache = malloc(sizeof(*cache));
  69             if (!cache) {
  70                 printf_log("neonserv", LOG_ERROR, "%s:%d malloc() failed", __FILE__, __LINE__);
  71                 return;
  72             }
  73             cache->client = client;
  74             cache->textclient = textclient;
  75             cache->user = user;
  76             cache->chan = chan;
  77             cache->nick = strdup(argv[0]);
  78             get_userauth(cuser, module_id, neonserv_cmd_access_nick_lookup, cache);
  79         }
  80     }
  81 }
  82
  83 static USERAUTH_CALLBACK(neonserv_cmd_access_nick_lookup) {
  84     struct neonserv_cmd_access_cache *cache = data;
  85     if(!user) {
  86         //USER_DOES_NOT_EXIST
  87         reply(cache->textclient, cache->user, "NS_USER_UNKNOWN", cache->nick);
  88     }
  89     else if(!(user->flags & USERFLAG_ISAUTHED)) {
  90         //USER_NOT_AUTHED
  91         if(!strcmp(cache->nick, cache->user->nick))
  92             reply(cache->textclient, cache->user, "NS_YOU_NEED_AUTH");
  93         else
  94             reply(cache->textclient, cache->user, "NS_USER_NEED_AUTH", cache->nick);
  95     }
  96     else
  97         neonserv_cmd_access_async1(cache->client, cache->textclient, cache->user, cache->chan, user->nick, user->auth, user);
  98     free(cache->nick);
  99     free(cache);
 100 }
 101
 102 static void neonserv_cmd_access_async1(struct ClientSocket *client, struct ClientSocket *textclient, struct UserNode *user, struct ChanNode *chan, char *nick, char *auth, struct UserNode *target) {
 103     //we've got a valid auth now...
 104     MYSQL_RES *res;
 105     MYSQL_ROW user_row, chanuser_row;
 106     int userid;
 107     printf_mysql_query("SELECT `user_id`, `user_access`, `user_god`, `user_rank`, `rank_info`, `rank_name` FROM `users` LEFT JOIN `support_ranks` ON `rank_id` = `user_rank` WHERE `user_user` = '%s'", escape_string(auth));
 108     res = mysql_use();
 109     if ((user_row = mysql_fetch_row(res)) != NULL) {
 110         userid = atoi(user_row[0]);
 111         //check if the user is already added
 112         printf_mysql_query("SELECT `chanuser_access`, `chanuser_flags`, `chanuser_infoline` FROM `chanusers` WHERE `chanuser_cid` = '%d' AND `chanuser_uid` = '%d'", chan->channel_id, userid);
 113         res = mysql_use();
 114         if(strcmp(user_row[3], "0") && strcmp(user_row[4], "")) {
 115             char rank_info[MAXLEN];
 116             neonserv_cmd_access_filter_ranking_info(user_row[4], rank_info, nick, auth, user_row[5]);
 117             reply(textclient, user, "%s", rank_info);
 118         }
 119         if ((chanuser_row = mysql_fetch_row(res)) != NULL) {
 120             //access output
 121             if(nick)
 122                 reply(textclient, user, (strcmp(user_row[2], "1") ? "NS_A_ACCESS_AUTH" : "NS_A_ACCESS_AUTH_GOD"), nick, auth, atoi(chanuser_row[0]), chan->name);
 123             else
 124                 reply(textclient, user, (strcmp(user_row[2], "1") ? "NS_A_ACCESS_NICK" : "NS_A_ACCESS_NICK_GOD"), auth, atoi(chanuser_row[0]), chan->name);
 125             int cflags = atoi(chanuser_row[1]);
 126             if(cflags & DB_CHANUSER_SUSPENDED)
 127                 reply(textclient, user, "NS_A_SUSPENDED", (nick ? nick : auth), chan->name);
 128             if(chanuser_row[2] && strcmp(chanuser_row[2], ""))
 129                 reply(textclient, user, "[%s] %s", (nick ? nick : auth), chanuser_row[2]);
 130         } else if(!strcmp(user_row[2], "1")) {
 131             if(nick)
 132                 reply(textclient, user, "NS_A_LACKS_ACCESS_BUT_GOD_AUTH", nick, auth, chan->name);
 133             else
 134                 reply(textclient, user, "NS_A_LACKS_ACCESS_BUT_GOD_NICK", auth, chan->name);
 135         } else
 136             reply(textclient, user, "NS_NOT_ON_USERLIST", (nick ? nick : auth), chan->name);
 137     } else
 138         reply(textclient, user, "NS_NOT_ON_USERLIST", (nick ? nick : auth), chan->name);
 139     if(target && (target->flags & USERFLAG_ISIRCOP))
 140         reply(textclient, user, "NS_A_IS_IRCOP", nick);
 141 }
 142
 143 static void neonserv_cmd_access_filter_ranking_info(char *info, char *buffer, char *nick, char *auth, char *rank_name) {
 144     int bufferPos = 0;
 145     char *a, *b = info;
 146     do {
 147         if(!b) break;
 148         a = strstr(b, "$");
 149         if(a) *a = '\0';
 150         bufferPos += sprintf(buffer + bufferPos, "%s", b);
 151         if(!a) break;
 152         switch(a[1]) {
 153             case '\0':
 154                 a = NULL;
 155                 break;
 156             case 'U':
 157                 bufferPos += sprintf(buffer + bufferPos, "%s", auth);
 158                 break;
 159             case 'N':
 160                 bufferPos += sprintf(buffer + bufferPos, "%s", (nick ? nick : auth));
 161                 break;
 162             case 'R':
 163                 bufferPos += sprintf(buffer + bufferPos, "%s", rank_name);
 164                 break;
 165             default:
 166                 buffer[bufferPos++] = '$';
 167                 buffer[bufferPos++] = a[1];
 168                 break;
 169         }
 170         if(a)
 171             b = a+2;
 172     } while(a);
 173 }