src/modules/NeonServ.mod/cmd_neonserv_giveowner.c

   1 /* cmd_neonserv_giveowner.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 * argv[1] - key
  23 */
  24
  25 #define GIVEOWNER_TIMEOUT 86400 /* 60*60*24 = 86400 */
  26
  27 static USERAUTH_CALLBACK(neonserv_cmd_giveowner_nick_lookup);
  28 static void neonserv_cmd_giveowner_async1(struct ClientSocket *client, struct ClientSocket *textclient, struct UserNode *user, struct ChanNode *chan, struct Event *event, char *nick, char *auth, char *key);
  29
  30 struct neonserv_cmd_giveowner_cache {
  31     struct ClientSocket *client, *textclient;
  32     struct UserNode *user;
  33     struct ChanNode *chan;
  34     struct Event *event;
  35     char *nick;
  36     char *key;
  37 };
  38
  39 CMD_BIND(neonserv_cmd_giveowner) {
  40     MYSQL_RES *res;
  41     MYSQL_ROW row;
  42     printf_mysql_query("SELECT `channel_lastgiveowner` FROM `channels` WHERE `channel_id` = '%d'", chan->channel_id);
  43     res = mysql_use();
  44     if ((row = mysql_fetch_row(res)) == NULL) return;
  45     if(strcmp(row[0], "0") && (atoi(row[0]) + GIVEOWNER_TIMEOUT) > time(0)) {
  46         char timeBuf[MAXLEN];
  47         reply(textclient, user, "NS_GIVEOWNER_TIMEOUT", timeToStr(user, (GIVEOWNER_TIMEOUT - (time(0) - atoi(row[0]))), 2, timeBuf), chan->name);
  48         return;
  49     }
  50     if(argv[0][0] == '*') {
  51         //we've got an auth
  52         argv[0]++;
  53         neonserv_cmd_giveowner_async1(client, textclient, user, chan, event, argv[0], argv[0], (argc != 1 ? argv[1] : NULL));
  54     } else {
  55         struct UserNode *cuser = getUserByNick(argv[0]);
  56         if(!cuser) {
  57             cuser = createTempUser(argv[0]);
  58                         if(!cuser) {
  59                 reply(textclient, user, "NS_USER_UNKNOWN", argv[0]);
  60                 return;
  61             }
  62             cuser->flags |= USERFLAG_ISTMPUSER;
  63         }
  64         if(cuser->flags & USERFLAG_ISAUTHED) {
  65             neonserv_cmd_giveowner_async1(client, textclient, user, chan, event, argv[0], cuser->auth, (argc != 1 ? argv[1] : NULL));
  66         } else {
  67             struct neonserv_cmd_giveowner_cache *cache = malloc(sizeof(*cache));
  68             if (!cache) {
  69                 printf_log("neonserv", LOG_ERROR, "%s:%d malloc() failed", __FILE__, __LINE__);
  70                 return;
  71             }
  72             cache->client = client;
  73             cache->textclient = textclient;
  74             cache->user = user;
  75             cache->chan = chan;
  76             cache->event = event;
  77             cache->nick = strdup(argv[0]);
  78             cache->key = (argc != 1 ? strdup(argv[1]) : NULL);
  79             get_userauth(cuser, module_id, neonserv_cmd_giveowner_nick_lookup, cache);
  80         }
  81     }
  82 }
  83
  84 static USERAUTH_CALLBACK(neonserv_cmd_giveowner_nick_lookup) {
  85     struct neonserv_cmd_giveowner_cache *cache = data;
  86     if(!user) {
  87         //USER_DOES_NOT_EXIST
  88         reply(cache->textclient, cache->user, "NS_USER_UNKNOWN", cache->nick);
  89     }
  90     else if(!(user->flags & USERFLAG_ISAUTHED)) {
  91         //USER_NOT_AUTHED
  92         reply(cache->textclient, cache->user, "NS_USER_NEED_AUTH", cache->nick);
  93     }
  94     else
  95         neonserv_cmd_giveowner_async1(cache->client, cache->textclient, cache->user, cache->chan, cache->event, user->nick, user->auth, cache->key);
  96     free(cache->nick);
  97     if(cache->key)
  98         free(cache->key);
  99     free(cache);
 100 }
 101
 102 static void neonserv_cmd_giveowner_async1(struct ClientSocket *client, struct ClientSocket *textclient, struct UserNode *user, struct ChanNode *chan, struct Event *event, char *nick, char *auth, char *key) {
 103     //we've got a valid auth now...
 104     if(!stricmp(user->auth, auth)) {
 105         reply(textclient, user, "NS_GIVEOWNER_SELF");
 106         return;
 107     }
 108     MYSQL_RES *res;
 109     MYSQL_ROW row;
 110     printf_mysql_query("SELECT `user_user`, `dnr_timeout`, `dnr_reason`, `dnr_id` FROM `donotregister` LEFT JOIN `users` ON `dnr_user` = `user_id` WHERE `dnr_target` = '%s'", escape_string(auth));
 111     res = mysql_use();
 112     if((row = mysql_fetch_row(res)) != NULL) {
 113         int expire_time = atoi(row[1]);
 114         if(expire_time) {
 115             if(expire_time - time(0) <= 0) {
 116                 printf_mysql_query("DELETE FROM `donotregister` WHERE `dnr_id` = '%s'", row[3]);
 117             } else {
 118                 reply(textclient, user, "NS_DNR_SET_ANONYM", auth);
 119                 return;
 120             }
 121         } else {
 122             reply(textclient, user, "NS_DNR_SET_ANONYM", auth);
 123             return;
 124         }
 125     }
 126     int userid;
 127     printf_mysql_query("SELECT `user_id` FROM `users` WHERE `user_user` = '%s'", escape_string(auth));
 128     res = mysql_use();
 129     if ((row = mysql_fetch_row(res)) != NULL) {
 130         userid = atoi(row[0]);
 131         //check if the user is already added
 132         printf_mysql_query("SELECT `chanuser_access`, `chanuser_id` FROM `chanusers` WHERE `chanuser_cid` = '%d' AND `chanuser_uid` = '%d'", chan->channel_id, userid);
 133         res = mysql_use();
 134         if ((row = mysql_fetch_row(res)) != NULL) {
 135             int seed = 0;
 136             char *tmp;
 137             char giveownerkey[16];
 138             for(tmp = user->auth; *tmp; tmp++)
 139                 seed = (seed * 0xEECE66DL ^ ((*tmp << 24) | (*tmp << 16) | (*tmp << 8) | *tmp));
 140             for(tmp = chan->name; *tmp; tmp++)
 141                 seed = (seed * 0xEECE66DL ^ ((*tmp << 24) | (*tmp << 16) | (*tmp << 8) | *tmp));
 142             sprintf(giveownerkey, "%08x", seed);
 143             if(key && !stricmp(giveownerkey, key)) {
 144                 //give ownership
 145                 printf_mysql_query("UPDATE `chanusers` SET `chanuser_access` = '500' WHERE `chanuser_id` = '%s'", row[1]);
 146                 printf_mysql_query("UPDATE `chanusers` SET `chanuser_access` = '499' WHERE `chanuser_cid` = '%d' AND `chanuser_uid` = (SELECT `user_id` FROM `users` WHERE `user_user` = '%s')", chan->channel_id, escape_string(user->auth));
 147                 printf_mysql_query("INSERT INTO `owner_history` (`owner_history_cid`, `owner_history_from_uid`, `owner_history_to_uid`, `owner_history_time`) VALUE ('%d', (SELECT `user_id` FROM `users` WHERE `user_user` = '%s'), '%d', UNIX_TIMESTAMP())", chan->channel_id, escape_string(user->auth), userid);
 148                 reply(textclient, user, "NS_GIVEOWNER_DONE", chan->name, auth);
 149                 logEvent(event);
 150             } else {
 151                 reply(textclient, user, "NS_GIVEOWNER_CONFIRM", auth, giveownerkey);
 152             }
 153             return;
 154         }
 155     }
 156     reply(textclient, user, "NS_NOT_ON_USERLIST", nick, chan->name);
 157 }