// TODO : Rewrite this f***g ugly function
unsigned int setlevel(USERS *user_actif, USERS *user_passif, CHANNEL *chan, unsigned int lvl, acetables *g_ape)
{
RAW *newraw;
userslist *user_passif_chan, *user_actif_chan;
json_item *jlist;
user_passif_chan = getuchan(user_passif, chan);
if (user_actif != NULL) {
user_actif_chan = getuchan(user_actif, chan);
if (user_passif_chan == NULL || user_actif_chan == NULL || ((user_actif_chan->level < lvl || user_actif_chan->level < user_passif_chan->level) && !(user_actif->flags & FLG_AUTOOP)) || lvl < 1 || lvl > 32) {
send_error(user_actif, "SETLEVEL_ERROR", "110", g_ape);
return 0;
}
user_passif_chan->level = lvl;
if (chan->interactive) {
jlist = json_new_object();
json_set_property_objN(jlist, "ope", 3, get_json_object_user(user_passif));
json_set_property_objN(jlist, "oper", 4, get_json_object_user(user_actif));
json_set_property_objN(jlist, "pipe", 4, get_json_object_channel(chan));
json_set_property_intN(jlist, "level", 5, lvl);
newraw = forge_raw(RAW_SETLEVEL, jlist);
post_raw_channel(newraw, chan, g_ape);
}
return 1;
} else if (user_passif_chan != NULL && lvl > 0 && lvl < 32) {
user_passif_chan->level = lvl;
if (chan->interactive) {
jlist = json_new_object();
json_set_property_objN(jlist, "ope", 3, get_json_object_user(user_passif));
json_set_property_objN(jlist, "oper", 4, get_json_object_user(NULL));
json_set_property_objN(jlist, "pipe", 4, get_json_object_channel(chan));
json_set_property_intN(jlist, "level", 5, lvl);
newraw = forge_raw(RAW_SETLEVEL, jlist);
post_raw_channel(newraw, chan, g_ape);
}
return 1;
}
return 0;
}
void subuser_restor(subuser *sub, acetables *g_ape)
{
CHANLIST *chanl;
CHANNEL *chan;
json_item *jlist;
RAW *newraw;
USERS *user = sub->user;
userslist *ulist;
chanl = user->chan_foot;
while (chanl != NULL) {
chan = chanl->chaninfo;
/*
* quiet channel won't be posted on subuser_restor
*/
if (!(chan->flags & CHANNEL_QUIET)) {
jlist = json_new_object();
if ( !(chan->flags & CHANNEL_NONINTERACTIVE) && chan->head != NULL ) {
json_item *user_list = json_new_array();
ulist = chan->head;
while (ulist != NULL) {
json_item *juser = get_json_object_user(ulist->userinfo);
if (ulist->userinfo != user) {
//make_link(user, ulist->userinfo);
}
json_set_property_intN(juser, "level", 5, ulist->level);
json_set_element_obj(user_list, juser);
ulist = ulist->next;
}
json_set_property_objN(jlist, "users", 5, user_list);
}
json_set_property_objN(jlist, "pipe", 4, get_json_object_channel(chan));
newraw = forge_raw(RAW_CHANNEL, jlist);
newraw->priority = RAW_PRI_HI;
post_raw_sub(newraw, sub, g_ape);
POSTRAW_DONE(newraw);
}
chanl = chanl->next;
}
jlist = json_new_object();
json_set_property_objN(jlist, "user", 4, get_json_object_user(user));
newraw = forge_raw("IDENT", jlist);
newraw->priority = RAW_PRI_HI;
post_raw_sub(newraw, sub, g_ape);
POSTRAW_DONE(newraw);
}
unsigned int settopic(USERS *user, CHANNEL *chan, const char *topic, acetables *g_ape)
{
RAW *newraw;
userslist *list;
json *jlist;
list = getuchan(user, chan);
if (list == NULL || list->level < 3 || strlen(topic)+1 > MAX_TOPIC_LEN) {
send_error(user, "SETTOPIC_ERROR", "111", g_ape);
} else {
memcpy(chan->topic, topic, strlen(topic)+1);
jlist = NULL;
set_json("user", NULL, &jlist);
json_attach(jlist, get_json_object_user(user), JSON_OBJECT);
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_SETTOPIC, jlist);
post_raw_channel(newraw, chan, g_ape);
return 1;
}
return 0;
}
void ban(CHANNEL *chan, USERS *banner, const char *ip, char *reason, unsigned int expire, acetables *g_ape) // Ban IP
{
userslist *uTmp, *tUtmp;
RAW *newraw;
json *jlist;
BANNED *blist, *bTmp;
unsigned int isban = 0;
long int nextime = (expire * 60)+time(NULL); // NOW !
if (chan == NULL) {
return;
}
uTmp = chan->head;
bTmp = chan->banned;
while (uTmp != NULL) {
if (strcmp(ip, uTmp->userinfo->ip) == 0) { // We find somebody with the same IP
jlist = NULL;
set_json("reason", reason, &jlist);
if (banner != NULL) {
set_json("banner", NULL, &jlist);
json_attach(jlist, get_json_object_user(banner), JSON_OBJECT);
} else {
set_json("banner", NULL, &jlist);
json_attach(jlist, get_json_object_user(NULL), JSON_OBJECT);
}
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_BAN, jlist);
post_raw(newraw, uTmp->userinfo, g_ape);
if (isban == 0) {
blist = xmalloc(sizeof(*blist));
strncpy(blist->ip, ip, 16);
strncpy(blist->reason, reason, 256);
blist->expire = nextime;
blist->next = bTmp;
chan->banned = blist;
isban = 1;
}
tUtmp = uTmp->next;
left(uTmp->userinfo, chan, g_ape); // if the user is the last : "chan" is free (rmchan())
uTmp = tUtmp;
continue;
}
uTmp = uTmp->next;
}
}
unsigned int cmd_ban(callbackp *callbacki)
{
CHANNEL *chan;
RAW *newraw;
json *jlist;
USERS *victim;
if ((chan = getchan(callbacki->param[2], callbacki->g_ape)) == NULL) {
send_error(callbacki->call_user, "UNKNOWN_CHANNEL", "103", callbacki->g_ape);
} else if (!isonchannel(callbacki->call_user, chan)) {
send_error(callbacki->call_user, "NOT_IN_CHANNEL", "104", callbacki->g_ape);
} else if (getuchan(callbacki->call_user, chan)->level < 3) {
send_error(callbacki->call_user, "CANT_BAN", "107", callbacki->g_ape);
} else {
victim = seek_user(callbacki->param[3], chan->name, callbacki->g_ape);
if (victim == NULL) {
send_error(callbacki->call_user, "UNKNOWN_USER", "102", callbacki->g_ape);
} else if (victim->flags & FLG_NOKICK) {
send_error(callbacki->call_user, "USER_PROTECTED", "106", callbacki->g_ape);
// Bad boy :-)
jlist = NULL;
set_json("banner", NULL, &jlist);
json_attach(jlist, get_json_object_user(callbacki->call_user), JSON_OBJECT);
set_json("channel", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw("TRY_BAN", jlist);
post_raw(newraw, victim, callbacki->g_ape);
} else if (strlen(callbacki->param[4]) > 255 || atoi(callbacki->param[5]) > 44640) { // 31 days max
send_error(callbacki->call_user, "REASON_OR_TIME_TOO_LONG", "107", callbacki->g_ape);
} else {
ban(chan, callbacki->call_user, victim->ip, callbacki->param[4], atoi(callbacki->param[5]), callbacki->g_ape);
}
}
return (FOR_NOTHING);
}
int post_to_pipe(json_item *jlist, const char *rawname, const char *pipe, subuser *from, acetables *g_ape)
{
USERS *sender = from->user;
transpipe *recver = get_pipe_strict(pipe, sender, g_ape);
json_item *jlist_copy = NULL;
RAW *newraw;
if (sender != NULL) {
if (recver == NULL) {
send_error(sender, "UNKNOWN_PIPE", "109", g_ape);
return 0;
}
json_set_property_objN(jlist, "from", 4, get_json_object_user(sender));
}
if (sender != NULL && sender->nsub > 1) {
jlist_copy = json_item_copy(jlist, NULL);
json_set_property_objN(jlist_copy, "pipe", 4, get_json_object_pipe(recver));
newraw = forge_raw(rawname, jlist_copy);
post_raw_restricted(newraw, sender, from, g_ape);
}
switch(recver->type) {
case USER_PIPE:
json_set_property_objN(jlist, "pipe", 4, get_json_object_user(sender));
newraw = forge_raw(rawname, jlist);
post_raw(newraw, recver->pipe, g_ape);
break;
case CHANNEL_PIPE:
if (((CHANNEL*)recver->pipe)->head != NULL && ((CHANNEL*)recver->pipe)->head->next != NULL) {
json_set_property_objN(jlist, "pipe", 4, get_json_object_channel(recver->pipe));
newraw = forge_raw(rawname, jlist);
post_raw_channel_restricted(newraw, recver->pipe, sender, g_ape);
}
break;
case CUSTOM_PIPE:
json_set_property_objN(jlist, "pipe", 4, get_json_object_user(sender));
post_json_custom(jlist, sender, recver, g_ape);
break;
default:
break;
}
return 1;
}
unsigned int cmd_kick(callbackp *callbacki)
{
CHANNEL *chan;
RAW *newraw;
json *jlist;
USERS *victim;
if ((chan = getchan(callbacki->param[2], callbacki->g_ape)) == NULL) {
send_error(callbacki->call_user, "UNKNOWN_CHANNEL", "103", callbacki->g_ape);
} else if (!isonchannel(callbacki->call_user, chan)) {
send_error(callbacki->call_user, "NOT_IN_CHANNEL", "104", callbacki->g_ape);
} else if (getuchan(callbacki->call_user, chan)->level < 3) {
send_error(callbacki->call_user, "CANT_KICK", "105", callbacki->g_ape);
} else {
victim = seek_user(callbacki->param[3], chan->name, callbacki->g_ape);
if (victim == NULL) {
send_error(callbacki->call_user, "UNKNOWN_USER", "102", callbacki->g_ape);
} else if (victim->flags & FLG_NOKICK) {
send_error(callbacki->call_user, "USER_PROTECTED", "106", callbacki->g_ape);
// haha ;-)
jlist = NULL;
set_json("kicker", NULL, &jlist);
json_attach(jlist, get_json_object_user(callbacki->call_user), JSON_OBJECT);
set_json("channel", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw("TRY_KICK", jlist);
post_raw(newraw, victim, callbacki->g_ape);
} else {
jlist = NULL;
set_json("kicker", NULL, &jlist);
json_attach(jlist, get_json_object_user(callbacki->call_user), JSON_OBJECT);
set_json("channel", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_KICK, jlist);
post_raw(newraw, victim, callbacki->g_ape);
left(victim, chan, callbacki->g_ape); // chan may be removed
}
}
return (FOR_NOTHING);
}
void subuser_restor(subuser *sub, acetables *g_ape)
{
CHANLIST *chanl;
CHANNEL *chan;
json *jlist = NULL;
RAW *newraw;
USERS *user = sub->user;
userslist *ulist;
char level[8];
chanl = user->chan_foot;
while (chanl != NULL) {
jlist = NULL;
chan = chanl->chaninfo;
if (chan->interactive) {
ulist = chan->head;
set_json("users", NULL, &jlist);
while (ulist != NULL) {
struct json *juser = NULL;
if (ulist->userinfo != user) {
//make_link(user, ulist->userinfo);
}
sprintf(level, "%i", ulist->level);
set_json("level", level, &juser);
json_concat(juser, get_json_object_user(ulist->userinfo));
json_attach(jlist, juser, JSON_ARRAY);
ulist = ulist->next;
}
}
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_CHANNEL, jlist);
newraw->priority = 1;
post_raw_sub(newraw, sub, g_ape);
chanl = chanl->next;
}
jlist = NULL;
set_json("user", NULL, &jlist);
json_attach(jlist, get_json_object_user(user), JSON_OBJECT);
newraw = forge_raw("IDENT", jlist);
newraw->priority = 1;
post_raw_sub(newraw, sub, g_ape);
}
void left(USERS *user, CHANNEL *chan, acetables *g_ape) // Vider la liste chainée de l'user
{
userslist *list, *prev;
CHANLIST *clist, *ctmp;
RAW *newraw;
json_item *jlist;
FIRE_EVENT_NULL(left, user, chan, g_ape);
if (!isonchannel(user, chan)) {
return;
}
list = chan->head;
prev = NULL;
clist = user->chan_foot;
ctmp = NULL;
while (clist != NULL) {
if (clist->chaninfo == chan) {
if (ctmp != NULL) {
ctmp->next = clist->next;
} else {
user->chan_foot = clist->next;
}
free(clist);
break;
}
ctmp = clist;
clist = clist->next;
}
while (list != NULL && list->userinfo != NULL) {
if (list->userinfo == user) {
if (prev != NULL) {
prev->next = list->next;
} else {
chan->head = list->next;
}
free(list);
list = NULL;
if (chan->head != NULL && chan->interactive) {
jlist = json_new_object();
json_set_property_objN(jlist, "user", 4, get_json_object_user(user));
json_set_property_objN(jlist, "pipe", 4, get_json_object_channel(chan));
newraw = forge_raw(RAW_LEFT, jlist);
post_raw_channel(newraw, chan, g_ape);
} else if (chan->head == NULL) {
rmchan(chan, g_ape);
}
break;
}
prev = list;
list = list->next;
}
}
void join(USERS *user, CHANNEL *chan, acetables *g_ape)
{
userslist *list, *ulist;
CHANLIST *chanl;
FIRE_EVENT_NULL(join, user, chan, g_ape);
RAW *newraw;
json_item *jlist = json_new_object();
if (isonchannel(user, chan)) {
return;
}
list = xmalloc(sizeof(*list)); // TODO is it free ?
list->userinfo = user;
list->level = 1;
list->next = chan->head;
chan->head = list;
chanl = xmalloc(sizeof(*chanl)); // TODO is it free ?
chanl->chaninfo = chan;
chanl->next = user->chan_foot;
user->chan_foot = chanl;
if (chan->interactive) {
json_item *user_list = json_new_array();
json_item *uinfo = json_new_object();
json_set_property_objN(uinfo, "user", 4, get_json_object_user(user));
json_set_property_objN(uinfo, "pipe", 4, get_json_object_channel(chan));
newraw = forge_raw(RAW_JOIN, uinfo);
post_raw_channel_restricted(newraw, chan, user, g_ape);
ulist = chan->head;
while (ulist != NULL) {
json_item *juser = get_json_object_user(ulist->userinfo);
if (ulist->userinfo != user) {
//make_link(user, ulist->userinfo);
}
json_set_property_intN(juser, "level", 5, ulist->level);
json_set_element_obj(user_list, juser);
ulist = ulist->next;
}
json_set_property_objN(jlist, "users", 5, user_list);
}
json_set_property_objN(jlist, "pipe", 4, get_json_object_channel(chan));
newraw = forge_raw(RAW_CHANNEL, jlist);
post_raw(newraw, user, g_ape);
#if 0
if (user->flags & FLG_AUTOOP) {
setlevel(NULL, user, chan, 3);
}
#endif
}
// TODO : Rewrite this f***g ugly function
unsigned int setlevel(USERS *user_actif, USERS *user_passif, CHANNEL *chan, unsigned int lvl, acetables *g_ape)
{
RAW *newraw;
userslist *user_passif_chan, *user_actif_chan;
json *jlist;
char level[8];
user_passif_chan = getuchan(user_passif, chan);
if (user_actif != NULL) {
user_actif_chan = getuchan(user_actif, chan);
if (user_passif_chan == NULL || user_actif_chan == NULL || ((user_actif_chan->level < lvl || user_actif_chan->level < user_passif_chan->level) && !(user_actif->flags & FLG_AUTOOP)) || lvl < 1 || lvl > 32) {
send_error(user_actif, "SETLEVEL_ERROR", "110", g_ape);
return 0;
}
user_passif_chan->level = lvl;
if (chan->interactive) {
jlist = NULL;
set_json("ope", NULL, &jlist);
json_attach(jlist, get_json_object_user(user_passif), JSON_OBJECT);
set_json("opeur", NULL, &jlist);
json_attach(jlist, get_json_object_user(user_actif), JSON_OBJECT);
set_json("level", itos(lvl, level), &jlist);
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_SETLEVEL, jlist);
post_raw_channel(newraw, chan, g_ape);
}
return 1;
} else if (user_passif_chan != NULL && lvl > 0 && lvl < 32) {
user_passif_chan->level = lvl;
if (chan->interactive) {
jlist = NULL;
set_json("ope", NULL, &jlist);
json_attach(jlist, get_json_object_user(user_passif), JSON_OBJECT);
set_json("opeur", NULL, &jlist);
json_attach(jlist, get_json_object_user(NULL), JSON_OBJECT);
set_json("level", itos(lvl, level), &jlist);
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_SETLEVEL, jlist);
post_raw_channel(newraw, chan, g_ape);
}
return 1;
}
return 0;
}
void join(USERS *user, CHANNEL *chan, acetables *g_ape)
{
userslist *list, *ulist;
CHANLIST *chanl;
FIRE_EVENT_NULL(join, user, chan, g_ape);
RAW *newraw;
json *jlist = NULL;
char level[8];
if (isonchannel(user, chan)) {
return;
}
list = (userslist *)xmalloc(sizeof(*list)); // is it free ?
list->userinfo = user;
list->level = 1;
list->next = chan->head;
chan->head = list;
chanl = (CHANLIST *)xmalloc(sizeof(*chanl)); // is it free ?
chanl->chaninfo = chan;
chanl->next = user->chan_foot;
user->chan_foot = chanl;
if (chan->interactive) {
jlist = NULL;
set_json("user", NULL, &jlist);
json_attach(jlist, get_json_object_user(user), JSON_OBJECT);
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_JOIN, jlist);
post_raw_channel_restricted(newraw, chan, user, g_ape);
jlist = NULL;
set_json("users", NULL, &jlist);
ulist = chan->head;
while (ulist != NULL) {
struct json *juser = NULL;
if (ulist->userinfo != user) {
//make_link(user, ulist->userinfo);
}
sprintf(level, "%i", ulist->level);
set_json("level", level, &juser);
json_concat(juser, get_json_object_user(ulist->userinfo));
json_attach(jlist, juser, JSON_ARRAY);
ulist = ulist->next;
}
}
set_json("pipe", NULL, &jlist);
json_attach(jlist, get_json_object_channel(chan), JSON_OBJECT);
newraw = forge_raw(RAW_CHANNEL, jlist);
post_raw(newraw, user, g_ape);
#if 0
if (user->flags & FLG_AUTOOP) {
setlevel(NULL, user, chan, 3);
}
#endif
}
