7 static struct ChanNode **chanList;
8 static int modes_with_strarg, modes_with_intarg;
10 //Types: http://www.irc.org/tech_docs/draft-brocklesby-irc-isupport-03.txt
11 #define CHANNEL_MODE_TYPE_A 0x01 /* ... special (addresses or users) ... */
12 #define CHANNEL_MODE_TYPE_B 0x02 /* These modes always take a parameter. */
13 #define CHANNEL_MODE_TYPE_C 0x03 /* These modes take a parameter only when set. */
14 #define CHANNEL_MODE_TYPE_D 0x04 /* These modes never take a parameter. */
15 #define CHANNEL_MODE_TYPE 0x07 /* bit mask to get the type */
17 #define CHANNEL_MODE_VALUE_STRING 0x10
18 #define CHANNEL_MODE_VALUE_INTEGER 0x20
19 #define CHANNEL_MODE_VALUE 0x30 /* bit mask to get the value */
21 #define CHANNEL_MODE_VALUE_INDEX_SHIFT 8
22 #define CHANNEL_MODE_VALUE_INDEX_MASK (0xff << CHANNEL_MODE_VALUE_INDEX_SHIFT) /* this "bitrange" is reserved for storing the array indexes of the mode values */
24 static unsigned int valid_modes[] = { /* Thats our mode list :P */
25 1, 'b', CHANNEL_MODE_TYPE_A,
26 2, 'o', CHANNEL_MODE_TYPE_A,
27 3, 'v', CHANNEL_MODE_TYPE_A,
28 4, 'k', CHANNEL_MODE_TYPE_B | CHANNEL_MODE_VALUE_STRING,
29 5, 'a', CHANNEL_MODE_TYPE_C | CHANNEL_MODE_VALUE_INTEGER,
30 6, 'l', CHANNEL_MODE_TYPE_C | CHANNEL_MODE_VALUE_INTEGER,
31 7, 'f', CHANNEL_MODE_TYPE_C | CHANNEL_MODE_VALUE_STRING,
32 8, 'F', CHANNEL_MODE_TYPE_C | CHANNEL_MODE_VALUE_STRING,
33 9, 'c', CHANNEL_MODE_TYPE_D,
34 10, 'C', CHANNEL_MODE_TYPE_D,
35 11, 'i', CHANNEL_MODE_TYPE_D,
36 12, 'm', CHANNEL_MODE_TYPE_D,
37 13, 'M', CHANNEL_MODE_TYPE_D,
38 14, 'n', CHANNEL_MODE_TYPE_D,
39 15, 'N', CHANNEL_MODE_TYPE_D,
40 16, 'p', CHANNEL_MODE_TYPE_D,
41 17, 'r', CHANNEL_MODE_TYPE_D,
42 18, 's', CHANNEL_MODE_TYPE_D,
43 19, 't', CHANNEL_MODE_TYPE_D,
44 20, 'u', CHANNEL_MODE_TYPE_D,
45 21, 'D', CHANNEL_MODE_TYPE_D,
46 22, 'd', CHANNEL_MODE_TYPE_D,
47 23, 'R', CHANNEL_MODE_TYPE_D,
48 24, 'z', CHANNEL_MODE_TYPE_D,
53 void init_ChanNode() {
59 1 46 *everything else*
60 ---------------------------
63 chanList = calloc(47, sizeof(*chanList));
64 unsigned int *mode, flag = 1;
65 modes_with_strarg = 0;
66 modes_with_intarg = 0;
67 for (mode = valid_modes; mode[1]; mode += 3) {
68 if((mode[2] & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING) {
69 mode[2] |= modes_with_strarg << CHANNEL_MODE_VALUE_INDEX_SHIFT;
72 if((mode[2] & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_INTEGER) {
73 mode[2] |= modes_with_intarg << CHANNEL_MODE_VALUE_INDEX_SHIFT;
81 void free_ChanNode() {
82 //kamikaze free all channels and chanusers
84 struct ChanNode *chan, *next;
85 struct ChanUser *chanuser, *next_chanuser;
86 for(i = 0; i < 47; i++) {
87 for(chan = chanList[i]; chan; chan = next) {
89 for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = next_chanuser) {
90 next_chanuser = getChannelUsers(chan, chanuser);
99 int is_valid_chan(const char *name) {
103 for (ii=1; name[ii]; ++ii) {
104 if ((name[ii] > 0) && (name[ii] <= 32))
108 if (name[ii] == '\xa0')
114 static int get_chanlist_entry(int name) {
115 if((name > 0 && name <= 32) || name == ',' || name == '\xa0') return -1; //invalid name
116 if(tolower(name) >= 97 && tolower(name) <= 122) {
117 return (tolower(name) - 97);
119 if(tolower(name) >= 48 && tolower(name) <= 57) {
120 return (tolower(name) - 48 + 26);
123 if(name == '{') return 36;
124 if(name == '|') return 37;
125 if(name == '}') return 38;
126 if(name == '~') return 39;
127 if(name == '[') return 40;
128 if(name == '\\') return 41;
129 if(name == ']') return 42;
130 if(name == '^') return 43;
131 if(name == '_') return 44;
132 if(name == '`') return 45;
136 struct ChanNode* getChanByName(const char *name) { //case insensitive
137 int chanListIndex = get_chanlist_entry(name[1]);
138 if(chanListIndex == -1 || chanList[chanListIndex] == NULL)
140 struct ChanNode *chan;
141 for(chan = chanList[chanListIndex]; chan; chan = chan->next) {
142 if(!stricmp(name, chan->name))
148 struct ChanNode* addChannel(const char *name) {
149 int chanListIndex = get_chanlist_entry(name[1]);
150 if(chanListIndex == -1 || !is_valid_chan(name))
152 struct ChanNode *chan = malloc(sizeof(*chan));
155 perror("malloc() failed");
158 strcpy(chan->name, name);
162 chan->chanbot = NULL;
167 chan->trigger = NULL;
168 chan->mode_str_args = calloc(modes_with_strarg, sizeof(char*));
169 chan->mode_int_args = calloc(modes_with_intarg, sizeof(int));
171 chan->next = chanList[chanListIndex];
172 chanList[chanListIndex] = chan;
176 void delChannel(struct ChanNode* chan, int freeChan) {
177 int chanListIndex = get_chanlist_entry(chan->name[1]);
178 if(chanListIndex == -1) return;
179 struct ChanNode *cchan, *last_chan = NULL;
180 for(cchan = chanList[chanListIndex]; cchan; cchan = cchan->next) {
183 last_chan->next = chan->next;
185 chanList[chanListIndex] = chan->next;
192 struct ChanUser *chanuser, *next;
193 for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = next) {
194 next = getChannelUsers(chan, chanuser);
195 removeChanUserFromLists(chanuser, 0, 1, 1);
204 void freeChanNode(struct ChanNode* chan) {
206 for(i = 0; i < modes_with_strarg; i++) {
207 if(chan->mode_str_args[i])
208 free(chan->mode_str_args[i]);
211 struct trigger_cache *trigger, *next_trigger;
212 for(trigger = chan->trigger; trigger; trigger = next_trigger) {
213 next_trigger = trigger;
214 free(trigger->trigger);
218 free(chan->mode_str_args);
219 free(chan->mode_int_args);
221 removeChannelBans(chan);
225 void checkChannelVisibility(struct ChanNode* chan) {
226 struct ChanUser *chanuser, *next;
227 for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = getChannelUsers(chan, chanuser)) {
228 if(chanuser->user->flags & USERFLAG_ISBOT) {
229 chan->chanbot = chanuser->user;
233 //free the channel...
234 for(chanuser = getChannelUsers(chan, NULL); chanuser; chanuser = next) {
235 next = getChannelUsers(chan, chanuser);
236 //remove the channel from the user's channel-list
237 removeChanUserFromLists(chanuser, 0, 1, 0);
238 if(!chanuser->user->channel) {
239 //free the user (no more channels)
240 delUser(chanuser->user, 1);
248 static unsigned int* getModeOptions(char mode) {
250 for (cmode = valid_modes; cmode[1]; cmode += 3) {
257 int isModeSet(struct ChanNode* chan, char modeChar) {
258 unsigned int *modeOpt = getModeOptions(modeChar);
259 return (chan->modes & modeOpt[0]);
262 void* getModeValue(struct ChanNode* chan, char modeChar) {
263 #define MODE_VALUE_INDEX (modeOpt[2] & CHANNEL_MODE_VALUE_INDEX_MASK) >> CHANNEL_MODE_VALUE_INDEX_SHIFT
264 unsigned int *modeOpt = getModeOptions(modeChar);
265 if((modeOpt[2] & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_STRING)
266 return chan->mode_str_args[MODE_VALUE_INDEX];
267 if((modeOpt[2] & CHANNEL_MODE_VALUE) == CHANNEL_MODE_VALUE_INTEGER)
268 return &chan->mode_int_args[MODE_VALUE_INDEX];
270 #undef MODE_VALUE_INDEX
273 static void parseModesUserPriv(struct ChanNode* chan, unsigned char flag, int add, char *nick) {
274 struct UserNode *user = getUserByNick(nick);
275 if(user == NULL) return;
276 struct ChanUser *chanuser = getChanUser(user, chan);
277 if(chanuser == NULL) return;
279 chanuser->flags |= flag;
281 chanuser->flags &= ~flag;
284 static void parseModesBan(struct ChanNode* chan, int add, char *mask) {
286 addChannelBan(chan, mask);
288 removeChannelBanMask(chan, mask);
291 void parseModes(struct ChanNode* chan, char *modeStr, char **argv, int argc) {
292 int i, argpos = 0, add = 1;
293 #define MODE_TYPE (modeOpt[2] & CHANNEL_MODE_TYPE)
294 #define MODE_VALUE (modeOpt[2] & CHANNEL_MODE_VALUE)
295 #define MODE_VALUE_INDEX (modeOpt[2] & CHANNEL_MODE_VALUE_INDEX_MASK) >> CHANNEL_MODE_VALUE_INDEX_SHIFT
296 unsigned int *modeOpt;
297 for(i = 0; i < strlen(modeStr); i++) {
298 if(modeStr[i] == '+') {
302 if(modeStr[i] == '-') {
306 modeOpt = getModeOptions(modeStr[i]);
307 if(!modeOpt) continue; // unknown mode?
308 if(MODE_TYPE == CHANNEL_MODE_TYPE_A) {
309 if(argpos == argc) continue;
313 parseModesUserPriv(chan, CHANUSERFLAG_OPPED, add, argv[argpos]);
316 parseModesUserPriv(chan, CHANUSERFLAG_VOICED, add, argv[argpos]);
319 parseModesBan(chan, add, argv[argpos]);
322 //we have an unknown TYPE_A mode???
329 if(MODE_TYPE != CHANNEL_MODE_TYPE_D) { //all other types take parameters when set
330 if(argpos == argc) continue;
331 if(MODE_VALUE == CHANNEL_MODE_VALUE_STRING) {
332 if(chan->mode_str_args[MODE_VALUE_INDEX])
333 free(chan->mode_str_args[MODE_VALUE_INDEX]);
334 chan->mode_str_args[MODE_VALUE_INDEX] = strdup(argv[argpos++]);
335 } else if(MODE_VALUE == CHANNEL_MODE_VALUE_INTEGER)
336 chan->mode_int_args[MODE_VALUE_INDEX] = atoi(argv[argpos++]);
338 argpos++; //we simply don't know what to do with the argument...
340 chan->modes |= modeOpt[0];
342 chan->modes &= ~modeOpt[0];
343 if(MODE_TYPE == CHANNEL_MODE_TYPE_B) {
344 if(argpos == argc) continue;
345 if(MODE_VALUE == CHANNEL_MODE_VALUE_STRING) {
346 free(chan->mode_str_args[MODE_VALUE_INDEX]);
347 chan->mode_str_args[MODE_VALUE_INDEX] = NULL;
348 } else if(MODE_VALUE == CHANNEL_MODE_VALUE_INTEGER)
349 chan->mode_int_args[MODE_VALUE_INDEX] = 0;
350 argpos++; //we don't need the argument when unsetting a mode...
356 #undef MODE_VALUE_INDEX
359 void getModeString(struct ChanNode* chan, char *modesStr) {
360 #define MODE_TYPE (mode[2] & CHANNEL_MODE_TYPE)
361 #define MODE_VALUE (mode[2] & CHANNEL_MODE_VALUE)
362 #define MODE_VALUE_INDEX (mode[2] & CHANNEL_MODE_VALUE_INDEX_MASK) >> CHANNEL_MODE_VALUE_INDEX_SHIFT
363 char paramStr[MAXLEN];
368 for (mode = valid_modes; mode[1]; mode += 3) {
369 if(chan->modes & mode[0]) {
370 modesStr[modePos++] = (char) mode[1];
371 if(MODE_TYPE != CHANNEL_MODE_TYPE_D) {
372 if(MODE_VALUE == CHANNEL_MODE_VALUE_STRING)
373 paramPos += sprintf(paramStr + paramPos, " %s", chan->mode_str_args[MODE_VALUE_INDEX]);
374 else if(MODE_VALUE == CHANNEL_MODE_VALUE_INTEGER)
375 paramPos += sprintf(paramStr + paramPos, " %d", chan->mode_int_args[MODE_VALUE_INDEX]);
379 paramStr[paramPos] = '\0';
380 strcpy(modesStr + modePos, paramStr);
383 #undef MODE_VALUE_INDEX