added some code & compiler information to cmd_netinfo
[NeonServV5.git] / cmd_neonserv_myaccess.c
1
2 /*
3 * argv[0] - nick / *auth
4 */
5 static USERAUTH_CALLBACK(neonserv_cmd_myaccess_nick_lookup);
6 static void neonserv_cmd_myaccess_async1(struct ClientSocket *client, struct ClientSocket *textclient, struct UserNode *user, struct ChanNode *chan, char *nick, char *auth, char *chanmatch);
7
8 struct neonserv_cmd_myaccess_cache {
9     struct ClientSocket *client, *textclient;
10     struct UserNode *user;
11     struct ChanNode *chan;
12     char *nick;
13     char *chanmatch;
14 };
15
16 static CMD_BIND(neonserv_cmd_myaccess) {
17     char *chanmatch = NULL;
18     if(argc == 0 || argv[0][0] == '#') {
19         if(argc != 0) {
20             chanmatch = argv[0];
21         }
22         if(!(user->flags & USERFLAG_ISAUTHED)) {
23             struct neonserv_cmd_myaccess_cache *cache = malloc(sizeof(*cache));
24             if (!cache) {
25                 perror("malloc() failed");
26                 return;
27             }
28             cache->client = client;
29             cache->textclient = getTextBot();
30             cache->user = user;
31             cache->chan = chan;
32             cache->nick = strdup(argv[0]);
33             cache->chanmatch = (chanmatch ? strdup(chanmatch) : NULL);
34             get_userauth(user, neonserv_cmd_myaccess_nick_lookup, cache);
35         } else
36             neonserv_cmd_myaccess_async1(client, getTextBot(), user, chan, user->nick, user->auth, chanmatch);
37     }
38     else if(argv[0][0] == '*') {
39         //we've got an auth
40         if(argc > 1 && argv[1][0] == '#') {
41             chanmatch = argv[1];
42         }
43         argv[0]++;
44         neonserv_cmd_myaccess_async1(client, getTextBot(), user, chan, NULL, argv[0], chanmatch);
45     } else {
46         if(argc > 1 && argv[1][0] == '#') {
47             chanmatch = argv[1];
48         }
49         struct UserNode *cuser = getUserByNick(argv[0]);
50         if(!cuser) {
51             cuser = createTempUser(argv[0]);
52             cuser->flags |= USERFLAG_ISTMPUSER;
53         }
54         if(cuser->flags & USERFLAG_ISAUTHED) {
55             neonserv_cmd_myaccess_async1(client, getTextBot(), user, chan, argv[0], cuser->auth, chanmatch);
56         } else {
57             struct neonserv_cmd_myaccess_cache *cache = malloc(sizeof(*cache));
58             if (!cache) {
59                 perror("malloc() failed");
60                 return;
61             }
62             cache->client = client;
63             cache->textclient = getTextBot();
64             cache->user = user;
65             cache->chan = chan;
66             cache->nick = strdup(argv[0]);
67             cache->chanmatch = (chanmatch ? strdup(chanmatch) : NULL);
68             get_userauth(cuser, neonserv_cmd_myaccess_nick_lookup, cache);
69         }
70     }
71 }
72
73 static USERAUTH_CALLBACK(neonserv_cmd_myaccess_nick_lookup) {
74     struct neonserv_cmd_myaccess_cache *cache = data;
75     if(!user) {
76         //USER_DOES_NOT_EXIST
77         reply(cache->textclient, cache->user, "NS_USER_UNKNOWN", cache->nick);
78     }
79     else if(!(user->flags & USERFLAG_ISAUTHED)) {
80         //USER_NOT_AUTHED
81         if(!strcmp(cache->nick, cache->user->nick))
82             reply(cache->textclient, cache->user, "NS_YOU_NEED_AUTH");
83         else
84             reply(cache->textclient, cache->user, "NS_USER_NEED_AUTH", cache->nick);
85     }
86     else
87         neonserv_cmd_myaccess_async1(cache->client, cache->textclient, cache->user, cache->chan, user->nick, user->auth, cache->chanmatch);
88     if(cache->chanmatch)
89         free(cache->chanmatch);
90     free(cache->nick);
91     free(cache);
92 }
93
94 static void neonserv_cmd_myaccess_async1(struct ClientSocket *client, struct ClientSocket *textclient, struct UserNode *user, struct ChanNode *chan, char *nick, char *auth, char *chanmatch) {
95     //we've got a valid auth now...
96     MYSQL_RES *res, *default_res;
97     MYSQL_ROW user_row, chanuser_row, default_chan = NULL;
98     char flagBuf[5];
99     int userid, cflags, caccess, flagPos;
100     int i, total_count, match_count = 0, owner_count = 0;
101     struct Table *table;
102     printf_mysql_query("SELECT `user_id`, `user_access`, `user_god` FROM `users` WHERE `user_user` = '%s'", escape_string(auth));
103     res = mysql_use();
104     total_count = mysql_num_rows(res);
105     table = table_init(4, total_count + 1, 0);
106     char *content[4];
107     content[0] = get_language_string(user, "NS_MYACCESS_HEADER_NAME");
108     content[1] = get_language_string(user, "NS_MYACCESS_HEADER_ACCESS");
109     content[2] = get_language_string(user, "NS_MYACCESS_HEADER_FLAGS");
110     content[3] = get_language_string(user, "NS_MYACCESS_HEADER_INFO");
111     table_add(table, content);
112     if(chanmatch)
113         reply(textclient, user, "NS_MYACCESS_HEADER_MATCH", auth, chanmatch);
114     else
115         reply(textclient, user, "NS_MYACCESS_HEADER", auth);
116     if ((user_row = mysql_fetch_row(res)) != NULL) {
117         userid = atoi(user_row[0]);
118         //check if the user is already added
119         printf_mysql_query("SELECT `chanuser_access`, `chanuser_flags`, `chanuser_infoline`, `channel_name`, `channel_getop`, `channel_getvoice` FROM `chanusers` LEFT JOIN `channels` ON `chanuser_cid` = `channel_id` WHERE `chanuser_uid` = '%d' ORDER BY `chanuser_access` DESC, `channel_name` ASC", userid);
120         res = mysql_use();
121         while ((chanuser_row = mysql_fetch_row(res)) != NULL) {
122             if(!strcmp(chanuser_row[0], "500")) owner_count++;
123             if(chanmatch && match(chanmatch, chanuser_row[0])) continue;
124             match_count++;
125             if((!chanuser_row[4] || !chanuser_row[5]) && !default_chan) {
126                 printf_mysql_query("SELECT `channel_getop`, `channel_getvoice` FROM `channels` WHERE `channel_name` = 'defaults'");
127                 default_res = mysql_use();
128                 default_chan = mysql_fetch_row(default_res);
129             }
130             flagPos = 0;
131             content[0] = chanuser_row[3];
132             content[1] = chanuser_row[0];
133             cflags = atoi(chanuser_row[1]);
134             caccess = atoi(chanuser_row[0]);
135             if((cflags & DB_CHANUSER_SUSPENDED))
136                 flagPos += sprintf(flagBuf + flagPos, "s");
137             if(caccess >= (chanuser_row[4] ? atoi(chanuser_row[4]) : atoi(default_chan[0])))
138                 flagPos += sprintf(flagBuf + flagPos, "o");
139             if(caccess >= (chanuser_row[5] ? atoi(chanuser_row[5]) : atoi(default_chan[1])))
140                 flagPos += sprintf(flagBuf + flagPos, "v");
141             if((cflags & DB_CHANUSER_AUTOINVITE))
142                 flagPos += sprintf(flagBuf + flagPos, "i");
143             content[2] = flagBuf;
144             content[3] = chanuser_row[2];
145             table_add(table, content);
146         }
147     }
148     //send the table
149     char **table_lines = table_end(table);
150     for(i = 0; i < table->entrys; i++) {
151         reply(textclient, user, table_lines[i]);
152     }
153     if(!match_count)
154         reply(textclient, user, "NS_TABLE_NONE");
155     if(chanmatch) {
156         reply(textclient, user, "NS_MYACCESS_COUNT_MATCH", auth, total_count, owner_count, match_count, chanmatch);
157     } else {
158         reply(textclient, user, "NS_MYACCESS_COUNT", auth, total_count, owner_count);
159     }
160 }