src/cmd_neonserv_access.c

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