chanserv/chanservuser.c

   1 /*
   2  * chanservuser.c:
   3  *  This file maintains the functions associated with the
   4  * user on the network relating to the channel service
   5  */
   6
   7 #include "chanserv.h"
   8
   9 #include "../core/hooks.h"
  10 #include "../core/schedule.h"
  11 #include "../core/config.h"
  12 #include "../localuser/localuser.h"
  13 #include "../localuser/localuserchannel.h"
  14 #include "../irc/irc_config.h"
  15 #include "../lib/sstring.h"
  16 #include "../nick/nick.h"
  17 #include "../parser/parser.h"
  18 #include "../lib/splitline.h"
  19 #include "../lib/irc_string.h"
  20
  21 #include <string.h>
  22 #include <stdio.h>
  23 #include <stdarg.h>
  24 #include <stdlib.h>
  25
  26 nick *chanservnick;
  27 CommandTree *cscommands;
  28 CommandTree *csctcpcommands;
  29
  30 /* Local prototypes */
  31 void chanservuserhandler(nick *target, int message, void **params);
  32
  33 void chanservreguser(void *arg) {
  34   sstring *csnick,*csuser,*cshost,*csrealname,*csaccount;
  35   chanindex *cip;
  36   regchan   *rcp;
  37   int i;
  38
  39   csnick=getcopyconfigitem("chanserv","nick","Q",NICKLEN);
  40   csuser=getcopyconfigitem("chanserv","user","TheQBot",USERLEN);
  41   cshost=getcopyconfigitem("chanserv","host","some.host",HOSTLEN);
  42   csrealname=getcopyconfigitem("chanserv","realname","ChannelService",REALLEN);
  43   csaccount=getcopyconfigitem("chanserv","account",csnick&&csnick->content&&csnick->content[0]?csnick->content:"Q",ACCOUNTLEN);
  44
  45   Error("chanserv",ERR_INFO,"Connecting %s...",csnick->content);
  46
  47   chanservnick=registerlocaluser(csnick->content,csuser->content,cshost->content,
  48                                  csrealname->content,csaccount->content,
  49                                  UMODE_INV|UMODE_SERVICE|UMODE_DEAF|UMODE_OPER|UMODE_ACCOUNT,
  50                                  &chanservuserhandler);
  51
  52   freesstring(csnick);
  53   freesstring(csuser);
  54   freesstring(cshost);
  55   freesstring(csrealname);
  56   freesstring(csaccount);
  57
  58   /* Now join channels */
  59   for (i=0;i<CHANNELHASHSIZE;i++) {
  60     for (cip=chantable[i];cip;cip=cip->next) {
  61       if (cip->channel && (rcp=cip->exts[chanservext]) && !CIsSuspended(rcp)) {
  62         /* This will do timestamp faffing even if it won't actually join */
  63         chanservjoinchan(cip->channel);
  64         /* Do a check at some future time.. */
  65         cs_schedupdate(cip, 1, 5);
  66         rcp->status |= (QCSTAT_OPCHECK | QCSTAT_MODECHECK | QCSTAT_BANCHECK);
  67         if (CIsForceTopic(rcp) || CIsTopicSave(rcp))
  68           localsettopic(chanservnick, cip->channel, (rcp->topic) ? rcp->topic->content : "");
  69       }
  70     }
  71   }
  72
  73   Error("chanserv",ERR_INFO,"Loaded and joined channels.");
  74
  75   if (chanserv_init_status == CS_INIT_NOUSER) {
  76     /* If this is the first time, perform last init tasks */
  77     chanserv_finalinit();
  78   }
  79 }
  80
  81 void chanservuserhandler(nick *target, int message, void **params) {
  82   nick *sender;
  83   char *msg;
  84   Command *cmd;
  85   char *cargv[30];
  86   int cargc;
  87   reguser *rup;
  88   char *chp;
  89
  90   switch(message) {
  91   case LU_KILLED:
  92     scheduleoneshot(time(NULL),&chanservreguser,NULL);
  93     chanservnick=NULL;
  94     break;
  95
  96   case LU_PRIVMSG:
  97   case LU_SECUREMSG:
  98     sender=(nick *)params[0];
  99     msg=(char *)params[1];
 100
 101     if (!(cargc=splitline(msg,cargv,30,0)))
 102       return; /* Ignore blank lines */
 103
 104     if (cargv[0][0]==1) {
 105       /* CTCP */
 106       for (chp=cargv[0]+1;*chp;chp++) {
 107         if (*chp=='\001') {
 108           *chp='\0';
 109           break;
 110         }
 111       }
 112       cmd=findcommandintree(csctcpcommands, cargv[0]+1, 1);
 113       if (cmd) {
 114         rejoinline(cargv[1],cargc-1);
 115         cmd->handler((void *)sender, cargc-1, &(cargv[1]));
 116       }
 117     } else {
 118       cmd=findcommandintree(cscommands, cargv[0], 1);
 119
 120       if (!cmd) {
 121         chanservstdmessage(sender, QM_UNKNOWNCMD, cargv[0]);
 122         break;
 123       }
 124
 125       if ((cmd->level & QCMD_SECURE) && (message != LU_SECUREMSG)) {
 126         chanservstdmessage(sender, QM_SECUREONLY, cargv[0], chanservnick->nick, myserver->content);
 127         break;
 128       }
 129
 130       if ((cmd->level & QCMD_AUTHED)) {
 131         if (!(rup=getreguserfromnick(sender))) {
 132           chanservstdmessage(sender, QM_AUTHEDONLY, cargv[0]);
 133           break;
 134         }
 135         if (UIsSuspended(rup) || (rup->status & QUSTAT_DEAD)) {
 136           chanservstdmessage(sender, QM_BADAUTH, cargv[0]);
 137           break;
 138         }
 139       }
 140
 141       if ((cmd->level & QCMD_NOTAUTHED) && (getreguserfromnick(sender))) {
 142         chanservstdmessage(sender, QM_UNAUTHEDONLY, cargv[0]);
 143         break;
 144       }
 145
 146       if ((cmd->level & QCMD_HELPER) &&
 147           (!(rup=getreguserfromnick(sender)) || !UHasHelperPriv(rup))) {
 148         chanservstdmessage(sender, QM_NOACCESS, cargv[0]);
 149         break;
 150       }
 151
 152       if ((cmd->level & QCMD_OPER) &&
 153           (!IsOper(sender) || !(rup=getreguserfromnick(sender)) || !UHasOperPriv(rup))) {
 154         chanservstdmessage(sender, QM_NOACCESS, cargv[0]);
 155         break;
 156       }
 157
 158       if ((cmd->level & QCMD_ADMIN) &&
 159           (!IsOper(sender) || !(rup=getreguserfromnick(sender)) || !UHasAdminPriv(rup))) {
 160         chanservstdmessage(sender, QM_NOACCESS, cargv[0]);
 161         break;
 162       }
 163
 164       if ((cmd->level & QCMD_DEV) &&
 165           (!IsOper(sender) || !(rup=getreguserfromnick(sender)) || !UIsDev(rup))) {
 166         chanservstdmessage(sender, QM_NOACCESS, cargv[0]);
 167         break;
 168       }
 169
 170       if (cmd->maxparams < (cargc-1)) {
 171         rejoinline(cargv[cmd->maxparams],cargc-(cmd->maxparams));
 172         cargc=(cmd->maxparams)+1;
 173       }
 174
 175       cmd->handler((void *)sender, cargc-1, &(cargv[1]));
 176     }
 177     break;
 178
 179   default:
 180     break;
 181   }
 182 }
 183
 184 void chanservcommandinit() {
 185   cscommands=newcommandtree();
 186   csctcpcommands=newcommandtree();
 187 }
 188
 189 void chanservcommandclose() {
 190   destroycommandtree(cscommands);
 191   destroycommandtree(csctcpcommands);
 192 }
 193
 194 void chanservaddcommand(char *command, int flags, int maxparams, CommandHandler handler, char *description, const char *help) {
 195   Command *newcmd;
 196   cmdsummary *summary;
 197
 198   newcmd=addcommandtotree(cscommands, command, flags, maxparams, handler);
 199   /* Allocate a summary record to put the description in */
 200   summary=(cmdsummary *)malloc(sizeof(cmdsummary));
 201   memset((void *)summary,0,sizeof(cmdsummary));
 202
 203   summary->def=getsstring(description, 250);
 204   summary->defhelp=(char *)help; /* Assume that help is a constant */
 205
 206   newcmd->ext=(void *)summary;
 207   loadcommandsummary(newcmd);
 208 }
 209
 210 void chanservaddctcpcommand(char *command, CommandHandler handler) {
 211   addcommandtotree(csctcpcommands, command, 0, 1, handler);
 212 }
 213
 214 void chanservremovectcpcommand(char *command, CommandHandler handler) {
 215   deletecommandfromtree(csctcpcommands, command, handler);
 216 }
 217
 218 void chanservremovecommand(char *command, CommandHandler handler) {
 219   Command *cmd;
 220   cmdsummary *summary;
 221   int i;
 222
 223   if (!(cmd=findcommandintree(cscommands, command, 1))) {
 224     Error("chanserv",ERR_WARNING,"Tried to unregister unknown command %s",command);
 225     return;
 226   }
 227
 228   summary=(cmdsummary *)cmd->ext;
 229   freesstring(summary->def);
 230   for (i=0;i<MAXLANG;i++) {
 231     if (summary->bylang[i])
 232       freesstring(summary->bylang[i]);
 233   }
 234
 235   free(summary);
 236
 237   deletecommandfromtree(cscommands, command, handler);
 238 }
 239
 240 void chanservjoinchan(channel *cp) {
 241   regchan *rcp;
 242   unsigned int i;
 243   nick *np;
 244   reguser *rup;
 245   regchanuser *rcup;
 246   flag_t themodes = 0;
 247
 248   /* Skip unregistered channels */
 249   if (!(rcp=cp->index->exts[chanservext]))
 250     return;
 251
 252   /* Check for a new timestamp.  But don't do anything stupid if the incoming timestamp is 0 */
 253   if (cp->timestamp && ((!rcp->ltimestamp) || (cp->timestamp < rcp->ltimestamp))) {
 254     rcp->ltimestamp=cp->timestamp;
 255     csdb_updatechanneltimestamp(rcp);
 256   }
 257
 258   /* We won't be doing any joining or parting if we're not online */
 259   if (!chanservnick)
 260     return;
 261
 262   if ((CIsSuspended(rcp) || !CIsJoined(rcp)) && getnumerichandlefromchanhash(cp->users, chanservnick->numeric)) {
 263     if(rcp->suspendreason) {
 264       localpartchannel(chanservnick, cp, rcp->suspendreason->content);
 265     } else {
 266       localpartchannel(chanservnick, cp, NULL);
 267     }
 268   }
 269
 270   /* Right, we are definately going to either join the channel or at least
 271    * burst some modes onto it.
 272    *
 273    * We will try and burst our view of the world; if the timestamps are
 274    * actually equal this will be mostly ignored and we will have to fix it
 275    * up later.  For modes we use the forced modes, plus the default channel
 276    * modes (unless any of those are explicitly denied) */
 277
 278   /* By default, we set the forcemodes and the default modes, but never denymodes..
 279    * OK, actually we should only set the default modes if our timestamp is older.*/
 280   if (cp->timestamp > rcp->ltimestamp)
 281     themodes |= CHANMODE_DEFAULT;
 282   else
 283     themodes=0;
 284
 285   themodes = (themodes | rcp->forcemodes) & ~rcp->denymodes;
 286
 287   /* Now, if someone has just created a channel and we are going to set +i
 288    * or +k on it, this will kick them off.  This could be construed as a
 289    * bit rude if it's their channel, so if there is only one person on the
 290    * channel and they have a right to be there, burst with default modes
 291    * only to avoid them being netrider kicked.
 292    */
 293   if (cp->users->totalusers==1) {
 294     for (i=0;i<cp->users->hashsize;i++) {
 295       if (cp->users->content[i] != nouser) {
 296         if ((np=getnickbynumeric(cp->users->content[i]&CU_NUMERICMASK)) &&
 297             (rup=getreguserfromnick(np)) &&
 298             (rcup=findreguseronchannel(rcp,rup)) &&
 299             CUKnown(rcup)) {
 300           /* OK, there was one user, and they are known on this channel.
 301            * Don't burst with +i or +k */
 302           themodes &= ~(CHANMODE_INVITEONLY | CHANMODE_KEY);
 303         }
 304       }
 305     }
 306   }
 307
 308   /* We should be on the channel - join with our nick */
 309   if (!CIsSuspended(rcp) && CIsJoined(rcp) && !getnumerichandlefromchanhash(cp->users, chanservnick->numeric)) {
 310     /* If we pass the key parameter here but are not setting +k (see above)
 311      * then localburstontochannel() will ignore the key */
 312     localburstontochannel(cp, chanservnick, rcp->ltimestamp, themodes,
 313                          rcp->limit, (rcp->key)?rcp->key->content:NULL);
 314   }
 315
 316   /* We're not joining the channel - send the burst with no nick */
 317   if (!CIsSuspended(rcp) && !CIsJoined(rcp) && (cp->timestamp > rcp->ltimestamp)) {
 318     localburstontochannel(cp, NULL, rcp->ltimestamp, themodes,
 319                           rcp->limit, (rcp->key)?rcp->key->content:NULL);
 320   }
 321 }
 322
 323 void chanservstdmessage(nick *np, int messageid, ... ) {
 324   char buf[5010];
 325   char buf2[512];
 326   int notice;
 327   reguser *rup;
 328   int language;
 329   va_list va, va2;
 330   char *message, *messageargs;
 331   char *bp2,*bp;
 332   int len;
 333
 334   if (getreguserfromnick(np) == NULL) {
 335     notice=1;
 336     language=0;
 337   } else {
 338     rup=getreguserfromnick(np);
 339     if(UIsNotice(rup)) {
 340       notice=1;
 341     } else {
 342       notice=0;
 343     }
 344     language=rup->languageid;
 345   }
 346
 347   if (csmessages[language][messageid]) {
 348     message=csmessages[language][messageid]->content;
 349   } else if (csmessages[0][messageid]) {
 350     message=csmessages[0][messageid]->content;
 351   } else {
 352     message=defaultmessages[messageid*2];
 353   }
 354
 355   messageargs=defaultmessages[messageid*2+1];
 356
 357   va_start(va,messageid);
 358   va_copy(va2, va);
 359   q9vsnprintf(buf,5000,message,messageargs,va);
 360   va_end(va);
 361
 362   len=0;
 363   bp2=buf2;
 364   for (bp=buf; ;bp++) {
 365     /* We send something if we hit a \n, fill the buffer or run out of source */
 366     if (*bp=='\n' || len>490 || !*bp) {
 367       if (*bp && *bp!='\n') {
 368         bp--;
 369       }
 370
 371       *bp2='\0';
 372
 373       if (chanservnick && *buf2) {
 374         if (notice) {
 375           sendnoticetouser(chanservnick,np,"%s",buf2);
 376         } else {
 377           sendmessagetouser(chanservnick,np,"%s",buf2);
 378         }
 379       }
 380
 381       /* If we ran out of buffer, get out here */
 382       if (!*bp)
 383         break;
 384
 385       bp2=buf2;
 386       len=0;
 387     } else {
 388       len++;
 389       *bp2++=*bp;
 390     }
 391   }
 392
 393   /* Special case: If it's a "not enough parameters" message, show the first line of help */
 394   if (messageid==QM_NOTENOUGHPARAMS) {
 395     char *command=va_arg(va2, char *);
 396     cs_sendhelp(np, command, 1);
 397     chanservstdmessage(np, QM_TYPEHELPFORHELP, command);
 398   }
 399
 400   va_end(va2);
 401 }
 402
 403 void chanservsendmessage_real(nick *np, int oneline, char *message, ... ) {
 404   char buf[5010]; /* Very large buffer.. */
 405   char buf2[512], *bp, *bp2;
 406   int notice;
 407   int len;
 408   reguser *rup;
 409
 410   va_list va;
 411
 412   va_start(va,message);
 413   vsnprintf(buf,5000,message,va);
 414   va_end(va);
 415
 416   if (getreguserfromnick(np) == NULL) {
 417     notice=1;
 418   } else {
 419     rup=getreguserfromnick(np);
 420     if(UIsNotice(rup)) {
 421       notice=1;
 422     } else {
 423       notice=0;
 424     }
 425   }
 426
 427   len=0;
 428   bp2=buf2;
 429   for (bp=buf; ;bp++) {
 430     /* We send something if we hit a \n, fill the buffer or run out of source */
 431     if (*bp=='\n' || len>490 || !*bp) {
 432       if (*bp && *bp!='\n') {
 433         bp--;
 434       }
 435
 436       *bp2='\0';
 437
 438       if (chanservnick && *buf2) {
 439         if (notice) {
 440           sendnoticetouser(chanservnick,np,"%s",buf2);
 441         } else {
 442           sendmessagetouser(chanservnick,np,"%s",buf2);
 443         }
 444       }
 445
 446       /* If we ran out of buffer, get out here */
 447       if (!*bp || (*bp=='\n' && oneline))
 448         break;
 449
 450       bp2=buf2;
 451       len=0;
 452     } else {
 453       len++;
 454       *bp2++=*bp;
 455     }
 456   }
 457 }
 458
 459 void chanservwallmessage(char *message, ... ) {
 460   char buf[5010]; /* Very large buffer.. */
 461   va_list va;
 462   nick *np;
 463   unsigned int i=0;
 464
 465   va_start(va,message);
 466   vsnprintf(buf,5000,message,va);
 467   va_end(va);
 468
 469   /* Scan for users */
 470   for (i=0;i<NICKHASHSIZE;i++)
 471     for (np=nicktable[i];np;np=np->next)
 472       if (IsOper(np))
 473         chanservsendmessage(np, "%s", buf);
 474 }
 475
 476 void chanservkillstdmessage(nick *target, int messageid, ... ) {
 477   char buf[512];
 478   int language;
 479   char *message, *messageargs;
 480   va_list va;
 481   reguser *rup;
 482
 483   if (!(rup=getreguserfromnick(target)))
 484     language=0;
 485   else
 486     language=rup->languageid;
 487
 488   if (csmessages[language][messageid])
 489     message=csmessages[language][messageid]->content;
 490   else if (csmessages[0][messageid])
 491     message=csmessages[0][messageid]->content;
 492   else
 493     message=defaultmessages[messageid*2];
 494
 495   messageargs=defaultmessages[messageid*2+1];
 496   va_start(va, messageid);
 497   q9vsnprintf(buf, 511, message, messageargs, va);
 498   va_end(va);
 499   killuser(chanservnick, target, buf);
 500 }
 501
 502 int checkpassword(reguser *rup, const char *pass) {
 503   if (!strncmp(rup->password, pass, PASSLEN))
 504     return 1;
 505   return 0;
 506 }
 507
 508 int checkresponse(reguser *rup, const unsigned char *entropy, const char *response, CRAlgorithm algorithm) {
 509   char usernamel[NICKLEN+1], *dp, *up;
 510
 511   for(up=rup->username,dp=usernamel;*up;)
 512     *dp++ = ToLower(*up++);
 513   *dp = '\0';
 514
 515   return algorithm(usernamel, rup->password, cs_calcchallenge(entropy), response);
 516 }
 517
 518 int checkhashpass(reguser *rup, const char *junk, const char *hash) {
 519   char usernamel[NICKLEN+1], *dp, *up;
 520
 521   for(up=rup->username,dp=usernamel;*up;)
 522     *dp++ = ToLower(*up++);
 523   *dp = '\0';
 524
 525   return cs_checkhashpass(usernamel, rup->password, junk, hash);
 526 }
 527
 528 int setpassword(reguser *rup, const char *pass) {
 529   strncpy(rup->password, pass, PASSLEN);
 530   rup->password[PASSLEN]='\0';
 531   return 1;
 532 }
 533
 534 void cs_checknick(nick *np) {
 535   activeuser* aup;
 536   reguser *rup;
 537   char userhost[USERLEN+HOSTLEN+3];
 538
 539   if (!(aup=getactiveuserfromnick(np))) {
 540     aup=getactiveuser();
 541     np->exts[chanservnext]=aup;
 542   }
 543
 544   assert(getactiveuserfromnick(np));
 545
 546   if (IsAccount(np) && np->auth) {
 547     if (np->auth->exts[chanservaext]) {
 548       rup=getreguserfromnick(np);
 549
 550       /* safe? */
 551       if(rup) {
 552         if (UIsDelayedGline(rup)) {
 553           /* delayed-gline - schedule the user's squelching */
 554           deleteschedule(NULL, &chanservdgline, (void*)rup); /* icky, but necessary unless we stick more stuff in reguser structure */
 555           scheduleoneshot(time(NULL)+rand()%900, &chanservdgline, (void*)rup);
 556         } else if (UIsGline(rup)) {
 557           /* instant-gline - lets be lazy and set a schedule expiring now :) */
 558           deleteschedule(NULL, &chanservdgline, (void*)rup); /* icky, but necessary unless we stick more stuff in reguser structure */
 559           scheduleoneshot(time(NULL), &chanservdgline, (void*)rup);
 560         } else if(UHasSuspension(rup)) {
 561           chanservkillstdmessage(np, QM_SUSPENDKILL);
 562           return;
 563         }
 564       }
 565       cs_doallautomodes(np);
 566     } else {
 567       /* Auto create user.. */
 568       rup=getreguser();
 569       rup->status=0;
 570       rup->ID=np->auth->userid;
 571       if (rup->ID > lastuserID)
 572         lastuserID=rup->ID;
 573       strncpy(rup->username,np->authname,NICKLEN); rup->username[NICKLEN]='\0';
 574       rup->created=time(NULL);
 575       rup->lastauth=0;
 576       rup->lastemailchange=0;
 577       rup->flags=QUFLAG_NOTICE;
 578       rup->languageid=0;
 579       rup->suspendby=0;
 580       rup->suspendexp=0;
 581       rup->suspendtime=0;
 582       rup->lockuntil=0;
 583       rup->password[0]='\0';
 584       rup->email=NULL;
 585       rup->lastemail=NULL;
 586       rup->localpart=NULL;
 587       rup->domain=NULL;
 588       rup->info=NULL;
 589       sprintf(userhost,"%s@%s",np->ident,np->host->name->content);
 590       rup->lastuserhost=getsstring(userhost,USERLEN+HOSTLEN+1);
 591       rup->suspendreason=NULL;
 592       rup->comment=NULL;
 593       rup->knownon=NULL;
 594       rup->checkshd=NULL;
 595       rup->stealcount=0;
 596       rup->fakeuser=NULL;
 597       addregusertohash(rup);
 598
 599       csdb_createuser(rup);
 600     }
 601   }
 602
 603   cs_checknickbans(np);
 604 }
 605
 606 void cs_checkchanmodes(channel *cp) {
 607   modechanges changes;
 608
 609   localsetmodeinit (&changes, cp, chanservnick);
 610   cs_docheckchanmodes(cp, &changes);
 611   localsetmodeflush (&changes, 1);
 612 }
 613
 614 void cs_docheckchanmodes(channel *cp, modechanges *changes) {
 615   regchan *rcp;
 616
 617   if (!cp)
 618     return;
 619
 620   if ((rcp=cp->index->exts[chanservext])==NULL || CIsSuspended(rcp))
 621     return;
 622
 623   /* Take care of the simple modes */
 624   localdosetmode_simple(changes, rcp->forcemodes & ~(cp->flags), rcp->denymodes & cp->flags);
 625
 626   /* Check for forced key.  Note that we ALWAYS call localdosetmode_key
 627    * in case the wrong key is set atm */
 628   if (rcp->forcemodes & CHANMODE_KEY) {
 629     if (!rcp->key) {
 630       Error("chanserv",ERR_WARNING,"Key forced but no key specified for %s: cleared forcemode.",rcp->index->name->content);
 631       rcp->forcemodes &= ~CHANMODE_KEY;
 632       csdb_updatechannel(rcp);
 633     } else {
 634       localdosetmode_key(changes, rcp->key->content, MCB_ADD);
 635     }
 636   }
 637
 638   /* Check for denied key */
 639   if ((rcp->denymodes & CHANMODE_KEY) && IsKey(cp)) {
 640     localdosetmode_key(changes, NULL, MCB_DEL);
 641   }
 642
 643   /* Check for forced limit.  Always call in case of wrong limit */
 644   if (rcp->forcemodes & CHANMODE_LIMIT) {
 645     localdosetmode_limit(changes, rcp->limit, MCB_ADD);
 646   }
 647 }
 648
 649 /* Slightly misnamed function that checks each USER on the channel against channel
 650  * settings.  Possible actions are opping/deopping, voicing/devoicing, and banning
 651  * for chanflag +k or chanlev flag +b */
 652 void cs_docheckopvoice(channel *cp, modechanges *changes) {
 653   regchan *rcp;
 654   reguser *rup;
 655   regchanuser *rcup;
 656   nick *np;
 657   int i;
 658
 659   if (!cp)
 660     return;
 661
 662   if ((rcp=cp->index->exts[chanservext])==NULL || CIsSuspended(rcp))
 663     return;
 664
 665   for (i=0;i<cp->users->hashsize;i++) {
 666     if (cp->users->content[i]==nouser)
 667       continue;
 668
 669     if ((np=getnickbynumeric(cp->users->content[i]))==NULL) {
 670       Error("chanserv",ERR_ERROR,"Found non-existent numeric %d on channel %s",cp->users->content[i],
 671             cp->index->name->content);
 672       continue;
 673     }
 674
 675     if ((rup=getreguserfromnick(np)))
 676       rcup=findreguseronchannel(rcp,rup);
 677     else
 678       rcup=NULL;
 679
 680     if (rcup && CUIsBanned(rcup) && !IsService(np)) {
 681       cs_banuser(changes, cp->index, np, NULL);
 682       continue;
 683     }
 684
 685     /* chanflag +k checks; kick them if they "obviously" can't rejoin without a ban */
 686     if (!IsService(np) && CIsKnownOnly(rcp) && !(rcup && CUKnown(rcup))) {
 687       if (IsInviteOnly(cp) || (IsRegOnly(cp) && !IsAccount(np))) {
 688         localkickuser(chanservnick,cp,np,"Authorised users only.");
 689       } else {
 690         cs_banuser(NULL, cp->index, np, "Authorised users only.");
 691       }
 692       continue;
 693     }
 694
 695     if ((cp->users->content[i] & CUMODE_OP) && !IsService(np)) {
 696       if ((CIsBitch(rcp) && (!rcup || !CUHasOpPriv(rcup))) ||
 697            (rcup && CUIsDeny(rcup)))
 698         localdosetmode_nick(changes, np, MC_DEOP);
 699     } else {
 700       if (rcup && (CUIsProtect(rcup) || CIsProtect(rcp)) && CUIsOp(rcup) && !CUIsDeny(rcup)) {
 701         localdosetmode_nick(changes, np, MC_OP);
 702         cs_logchanop(rcp, np->nick, rcup->user);
 703       }
 704     }
 705
 706     if (cp->users->content[i] & CUMODE_VOICE) {
 707       if (rcup && CUIsQuiet(rcup))
 708         localdosetmode_nick(changes, np, MC_DEVOICE);
 709     } else {
 710       if (rcup && (CUIsProtect(rcup) || CIsProtect(rcp)) && CUIsVoice(rcup) && !CUIsQuiet(rcup) && !(cp->users->content[i] & CUMODE_OP))
 711         localdosetmode_nick(changes, np, MC_VOICE);
 712     }
 713   }
 714 }
 715
 716 void cs_doallautomodes(nick *np) {
 717   reguser *rup;
 718   regchanuser *rcup;
 719   unsigned long *lp;
 720   modechanges changes;
 721
 722   if (!(rup=getreguserfromnick(np)))
 723     return;
 724
 725   for (rcup=rup->knownon;rcup;rcup=rcup->nextbyuser) {
 726     if (rcup->chan->index->channel) {
 727       /* Channel exists */
 728       if ((lp=getnumerichandlefromchanhash(rcup->chan->index->channel->users, np->numeric))) {
 729         /* User is on channel.. */
 730
 731         /* Update last use time */
 732         rcup->usetime=getnettime();
 733
 734         localsetmodeinit(&changes, rcup->chan->index->channel, chanservnick);
 735         if (*lp & CUMODE_OP) {
 736           if (!IsService(np) && (CUIsDeny(rcup) || (CIsBitch(rcup->chan) && !CUHasOpPriv(rcup))))
 737             localdosetmode_nick(&changes, np, MC_DEOP);
 738         } else {
 739           if (!CUIsDeny(rcup) && CUIsOp(rcup) &&
 740               (CUIsProtect(rcup) || CIsProtect(rcup->chan) || CUIsAutoOp(rcup))) {
 741             localdosetmode_nick(&changes, np, MC_OP);
 742             cs_logchanop(rcup->chan, np->nick, rup);
 743           }
 744         }
 745
 746         if (*lp & CUMODE_VOICE) {
 747           if (CUIsQuiet(rcup))
 748             localdosetmode_nick(&changes, np, MC_DEVOICE);
 749         } else {
 750           if (!CUIsQuiet(rcup) && CUIsVoice(rcup) && !(*lp & CUMODE_OP) &&
 751               (CUIsProtect(rcup) || CIsProtect(rcup->chan) || CUIsAutoVoice(rcup)))
 752             localdosetmode_nick(&changes, np, MC_VOICE);
 753         }
 754         localsetmodeflush(&changes, 1);
 755       } else {
 756         /* Channel exists but user is not joined: invite if they are +j-b */
 757         if (CUIsAutoInvite(rcup) && CUKnown(rcup) && !CUIsBanned(rcup)) {
 758           localinvite(chanservnick, rcup->chan->index->channel, np);
 759         }
 760       }
 761     }
 762   }
 763 }
 764
 765 void cs_checknickbans(nick *np) {
 766   channel **ca;
 767   regchan *rcp;
 768   int i,j;
 769
 770   if (IsService(np))
 771     return;
 772
 773   /* Avoid races: memcpy the channel array */
 774   i=np->channels->cursi;
 775   ca=(channel **)malloc(i*sizeof(channel *));
 776   memcpy(ca, np->channels->content,i*sizeof(channel *));
 777
 778   for (j=0;j<i;j++) {
 779     if ((rcp=ca[j]->index->exts[chanservext]) && !CIsSuspended(rcp) &&
 780         CIsEnforce(rcp) && nickbanned_visible(np, ca[j]))
 781       localkickuser(chanservnick, ca[j], np, "Banned.");
 782   }
 783
 784   free(ca);
 785 }
 786
 787 void cs_checkbans(channel *cp) {
 788   regchan *rcp;
 789   int i;
 790   nick *np;
 791   chanban *cbp;
 792   regban *rbp;
 793   time_t now;
 794   modechanges changes;
 795
 796   if (!cp)
 797     return;
 798
 799   if ((rcp=cp->index->exts[chanservext])==NULL || CIsSuspended(rcp))
 800     return;
 801
 802   now=time(NULL);
 803
 804   localsetmodeinit(&changes, cp, chanservnick);
 805
 806   for (i=0;i<cp->users->hashsize;i++) {
 807     if (cp->users->content[i]==nouser)
 808       continue;
 809
 810     if ((np=getnickbynumeric(cp->users->content[i]))==NULL) {
 811       Error("chanserv",ERR_ERROR,"Found numeric %d on channel %s who doesn't exist.",
 812             cp->users->content[i], cp->index->name->content);
 813       continue;
 814     }
 815
 816     if (IsService(np))
 817       continue;
 818
 819     for (rbp=rcp->bans;rbp;rbp=rbp->next) {
 820       if (((!rbp->expiry) || (rbp->expiry <= now)) &&
 821           nickmatchban_visible(np, rbp->cbp)) {
 822         if (!nickbanned_visible(np, cp)) {
 823           localdosetmode_ban(&changes, bantostring(rbp->cbp), MCB_ADD);
 824         }
 825         localkickuser(chanservnick,cp,np,rbp->reason?rbp->reason->content:"Banned.");
 826         break;
 827       }
 828     }
 829
 830     if (rbp) /* If we broke out of above loop (due to kick) rbp will be set.. */
 831       continue;
 832
 833     if (CIsEnforce(rcp)) {
 834       for (cbp=cp->bans;cbp;cbp=cbp->next) {
 835         if ((cbp->timeset>=rcp->lastbancheck) && nickmatchban_visible(np, cbp))
 836           localkickuser(chanservnick,cp,np,"Banned.");
 837       }
 838       rcp->lastbancheck=time(NULL);
 839     }
 840   }
 841
 842   localsetmodeflush(&changes,1);
 843 }
 844
 845 /*
 846  * cs_schedupdate:
 847  *  This function schedules an update check on a channel
 848  */
 849 void cs_schedupdate(chanindex *cip, int mintime, int maxtime) {
 850   int delay=mintime+(rand()%(maxtime-mintime));
 851   regchan *rcp;
 852
 853   if (!(rcp=cip->exts[chanservext]) || CIsSuspended(rcp))
 854     return;
 855
 856   if (rcp->checksched) {
 857     deleteschedule(rcp->checksched, cs_timerfunc, cip);
 858   }
 859
 860   rcp->checksched=scheduleoneshot(time(NULL)+delay, cs_timerfunc, cip);
 861 }
 862
 863 /*
 864  * cs_timerfunc:
 865  *  This function does several things:
 866  *   * Updates auto-limit and/or removes bans as necessary
 867  *   * Schedules the next timed call
 868  *   * Does any pending op/ban/mode checks
 869  * It is safe to use either as a target for a schedule() call, or to call
 870  * directly when parameters change (e.g. autolimit settings or ban expire
 871  * timers).
 872  * To force a limit update, set rcp->limit to 0..
 873  */
 874
 875 void cs_timerfunc(void *arg) {
 876   chanindex *cip=arg;
 877   channel *cp=cip->channel;
 878   regchan *rcp;
 879   chanban *cbp, *ncbp;
 880   regban **rbh, *rbp;
 881   time_t nextsched=0;
 882   time_t now=time(NULL);
 883   modechanges changes;
 884
 885   if (!(rcp=cip->exts[chanservext]))
 886     return;
 887
 888   verifyregchan(rcp);
 889
 890   /* Always nullify the checksched even if the channel is suspended.. */
 891   if (rcp->checksched) {
 892     deleteschedule(rcp->checksched, cs_timerfunc, arg);
 893     rcp->checksched=NULL;
 894   }
 895
 896   if (!cp || CIsSuspended(rcp))
 897     return;
 898
 899   /* Check if we need to leave the channel first */
 900   if (chanservnick && CIsJoined(rcp) && cip->channel &&
 901       cip->channel->users->totalusers==1 &&
 902       getnumerichandlefromchanhash(cip->channel->users, chanservnick->numeric)) {
 903
 904     /* Only chanserv left in this channel */
 905     if (now >= (rcp->lastpart + LINGERTIME)) {
 906       /* Time to go */
 907       localpartchannel(chanservnick, cip->channel, "Empty Channel");
 908       return;
 909     } else {
 910       if (!nextsched || nextsched > (rcp->lastpart + LINGERTIME))
 911         nextsched=rcp->lastpart+LINGERTIME;
 912     }
 913   }
 914
 915   localsetmodeinit(&changes, cp, chanservnick);
 916
 917   if (CIsAutoLimit(rcp)) {
 918     if (!rcp->limit || rcp->autoupdate <= now) {
 919       /* Update limit.. */
 920       rcp->limit=cp->users->totalusers+rcp->autolimit;
 921       rcp->status |= QCSTAT_MODECHECK;
 922
 923       /* And set the schedule for the next update */
 924       rcp->autoupdate = now + AUTOLIMIT_INTERVAL;
 925     }
 926
 927     if (!nextsched || rcp->autoupdate <= nextsched)
 928       nextsched=rcp->autoupdate;
 929   }
 930
 931   if (rcp->status & QCSTAT_OPCHECK) {
 932     rcp->status &= ~QCSTAT_OPCHECK;
 933     cs_docheckopvoice(cp, &changes);
 934   }
 935
 936   if (rcp->status & QCSTAT_MODECHECK) {
 937     rcp->status &= ~QCSTAT_MODECHECK;
 938     cs_docheckchanmodes(cp, &changes);
 939   }
 940
 941   if (rcp->status & QCSTAT_BANCHECK) {
 942     rcp->status &= ~QCSTAT_BANCHECK;
 943     cs_checkbans(cp);
 944   }
 945
 946   /* This ban check is AFTER docheckopvoice in case checkopvoice set a
 947    * ban which we need to automatically remove later.. */
 948
 949   if (rcp->banduration) {
 950     for (cbp=cp->bans;cbp;cbp=ncbp) {
 951       ncbp=cbp->next;
 952       if (cbp->timeset+rcp->banduration<=now) {
 953         localdosetmode_ban(&changes, bantostring(cbp), MCB_DEL);
 954       } else {
 955         if (!nextsched || cbp->timeset+rcp->banduration <= nextsched) {
 956           nextsched=rcp->banduration+cbp->timeset;
 957         }
 958       }
 959     }
 960   }
 961
 962   /* Check for expiry of registered bans */
 963   if (rcp->bans) {
 964     for (rbh=&(rcp->bans);*rbh;) {
 965       rbp=*rbh;
 966       verifyregchanban(rbp);
 967       if (rbp->expiry && (rbp->expiry < now)) {
 968         /* Expired ban */
 969         /* Remove ban if it's on the channel (localdosetmode_ban will silently
 970          * skip bans that don't exist) */
 971         localdosetmode_ban(&changes, bantostring(rbp->cbp), MCB_DEL);
 972         /* Remove from database */
 973         csdb_deleteban(rbp);
 974         /* Remove from list */
 975         (*rbh)=rbp->next;
 976         /* Free ban/string and update setby refcount, and free actual regban */
 977         freesstring(rbp->reason);
 978         freechanban(rbp->cbp);
 979         freeregban(rbp);
 980       } else {
 981         if (rbp->expiry && (!nextsched || rbp->expiry <= nextsched)) {
 982           nextsched=rbp->expiry;
 983         }
 984         rbh=&(rbp->next);
 985       }
 986     }
 987   }
 988
 989   if (nextsched)
 990     rcp->checksched=scheduleoneshot(nextsched, cs_timerfunc, arg);
 991
 992   localsetmodeflush(&changes, 1);
 993 }
 994
 995 void cs_removechannel(regchan *rcp) {
 996   int i;
 997   chanindex *cip;
 998   regchanuser *rcup, *nrcup;
 999   regban *rbp, *nrbp;
1000
1001   cip=rcp->index;
1002
1003   for (i=0;i<REGCHANUSERHASHSIZE;i++) {
1004     for (rcup=rcp->regusers[i];rcup;rcup=nrcup) {
1005       nrcup=rcup->nextbychan;
1006       delreguserfromchannel(rcp, rcup->user);
1007       freeregchanuser(rcup);
1008     }
1009   }
1010
1011   for (rbp=rcp->bans;rbp;rbp=nrbp) {
1012     nrbp=rbp->next;
1013     freesstring(rbp->reason);
1014     freechanban(rbp->cbp);
1015     freeregban(rbp);
1016   }
1017
1018   rcp->bans=NULL;
1019
1020   if (rcp->checksched)
1021     deleteschedule(rcp->checksched, cs_timerfunc, rcp->index);
1022
1023   if (cip->channel) {
1024     rcp->flags=QCFLAG_SUSPENDED;
1025     chanservjoinchan(cip->channel); /* Force off the channel */
1026   }
1027
1028   csdb_deletechannel(rcp);
1029
1030   freesstring(rcp->welcome);
1031   freesstring(rcp->topic);
1032   freesstring(rcp->key);
1033   freesstring(rcp->suspendreason);
1034   freesstring(rcp->comment);
1035
1036   freeregchan(rcp);
1037
1038   cip->exts[chanservext]=NULL;
1039   releasechanindex(cip);
1040 }
1041
1042 /* Sender is who the DELCHAN is attributed to.. */
1043 int cs_removechannelifempty(nick *sender, regchan *rcp) {
1044   unsigned int i;
1045   regchanuser *rcup;
1046
1047   for (i=0;i<REGCHANUSERHASHSIZE;i++) {
1048     for (rcup=rcp->regusers[i];rcup;rcup=rcup->nextbychan) {
1049       if (rcup->flags & ~(QCUFLAGS_PUNISH))
1050         return 0;
1051     }
1052   }
1053
1054   cs_log(sender,"DELCHAN %s (Empty)",rcp->index->name->content);
1055   cs_removechannel(rcp);
1056
1057   return 1;
1058 }
1059
1060 void cs_removeuser(reguser *rup) {
1061   regchanuser *rcup, *nrcup;
1062   regchan *rcp;
1063   struct authname *anp;
1064
1065   /* Remove the user from all its channels */
1066   for (rcup=rup->knownon;rcup;rcup=nrcup) {
1067     nrcup=rcup->nextbyuser;
1068     rcp=rcup->chan;
1069
1070     delreguserfromchannel(rcp, rup);
1071     cs_removechannelifempty(NULL, rcp);
1072   }
1073
1074   if(rup->domain)
1075     delreguserfrommaildomain(rup,rup->domain);
1076   freesstring(rup->localpart);
1077   freesstring(rup->email);
1078   freesstring(rup->lastemail);
1079   freesstring(rup->lastuserhost);
1080   freesstring(rup->suspendreason);
1081   freesstring(rup->comment);
1082   freesstring(rup->info);
1083
1084   csdb_deleteuser(rup);
1085
1086   removereguserfromhash(rup);
1087
1088   if ((anp=findauthname(rup->ID)) && anp->nicks) {
1089     rup->status |= QUSTAT_DEAD;
1090   } else {
1091     freereguser(rup);
1092   }
1093 }
1094
1095 int cs_bancheck(nick *np, channel *cp) {
1096   time_t now=time(NULL);
1097   regban **rbh, *rbp;
1098   modechanges changes;
1099   regchan *rcp;
1100
1101   if (!(rcp=cp->index->exts[chanservext]))
1102     return 0;
1103
1104   for (rbh=&(rcp->bans);*rbh;) {
1105     if ((*rbh)->expiry && ((*rbh)->expiry < now)) {
1106       /* Expired ban */
1107       csdb_deleteban(*rbh);
1108       rbp=*rbh;
1109       (*rbh)=rbp->next;
1110
1111       freesstring(rbp->reason);
1112       freechanban(rbp->cbp);
1113       freeregban(rbp);
1114     } else if (nickmatchban_visible(np,(*rbh)->cbp)) {
1115       /* This user matches this ban.. */
1116       if (!nickbanned_visible(np,cp)) {
1117         /* Only bother putting the ban on the channel if they're not banned already */
1118         /* (might be covered by this ban or a different one.. doesn't really matter */
1119         localsetmodeinit(&changes, cp, chanservnick);
1120         localdosetmode_ban(&changes, bantostring((*rbh)->cbp), MCB_ADD);
1121         localsetmodeflush(&changes, 1);
1122         cs_timerfunc(cp->index);
1123       }
1124       localkickuser(chanservnick, cp, np, (*rbh)->reason ? (*rbh)->reason->content : "Banned.");
1125       return 1;
1126     } else {
1127       rbh=&((*rbh)->next);
1128     }
1129   }
1130
1131   return 0;
1132 }
1133
1134 void cs_setregban(chanindex *cip, regban *rbp) {
1135   modechanges changes;
1136   int i;
1137   nick *np;
1138
1139   if (!cip->channel)
1140     return;
1141
1142   localsetmodeinit(&changes, cip->channel, chanservnick);
1143   localdosetmode_ban(&changes, bantostring(rbp->cbp), MCB_ADD);
1144   localsetmodeflush(&changes, 1);
1145
1146   for (i=0;(cip->channel) && i<cip->channel->users->hashsize;i++) {
1147     if (cip->channel->users->content[i]!=nouser &&
1148         (np=getnickbynumeric(cip->channel->users->content[i])) &&
1149         !IsService(np) &&
1150         nickmatchban_visible(np, rbp->cbp))
1151       localkickuser(chanservnick, cip->channel, np, rbp->reason ? rbp->reason->content : "Banned.");
1152   }
1153
1154   cs_timerfunc(cip);
1155 }
1156
1157 void cs_banuser(modechanges *changes, chanindex *cip, nick *np, const char *reason) {
1158   modechanges lchanges;
1159   char banmask[NICKLEN+USERLEN+HOSTLEN+3];
1160
1161   if (!cip->channel)
1162     return;
1163
1164   if (nickbanned_visible(np, cip->channel)) {
1165     localkickuser(chanservnick, cip->channel, np, reason?reason:"Banned.");
1166     return;
1167   }
1168
1169   if (IsAccount(np)) {
1170     /* Ban their account.. */
1171     sprintf(banmask,"*!*@%s.%s",np->authname,HIS_HIDDENHOST);
1172   } else if (IsSetHost(np)) {
1173     /* sethosted: ban ident@host */
1174     sprintf(banmask,"*!%s@%s",np->shident->content,np->sethost->content);
1175   } else if (np->host->clonecount>3) {
1176       /* >3 clones, ban user@host */
1177     sprintf(banmask,"*!%s@%s",np->ident,np->host->name->content);
1178   } else {
1179     sprintf(banmask,"*!*@%s",np->host->name->content);
1180   }
1181
1182   if (!changes) {
1183     localsetmodeinit(&lchanges, cip->channel, chanservnick);
1184     localdosetmode_ban(&lchanges, banmask, MCB_ADD);
1185     localsetmodeflush(&lchanges, 1);
1186   } else {
1187     localdosetmode_ban(changes, banmask, MCB_ADD);
1188   }
1189
1190   localkickuser(chanservnick, cip->channel, np, reason?reason:"Banned.");
1191 }
1192
1193 /*
1194  * cs_sanitisechanlev: Removes impossible combinations from chanlev flags.
1195  * chanservuser.c is probably not the right file for this, but nowhere better
1196  * presented itself...
1197  */
1198 flag_t cs_sanitisechanlev(flag_t flags) {
1199   /* +m or +n cannot have any "punishment" flags */
1200   if (flags & (QCUFLAG_MASTER | QCUFLAG_OWNER))
1201     flags &= ~(QCUFLAGS_PUNISH);
1202
1203   /* +d can't be +o */
1204   if (flags & QCUFLAG_DENY)
1205     flags &= ~QCUFLAG_OP;
1206
1207   /* +q can't be +v */
1208   if (flags & QCUFLAG_QUIET)
1209     flags &= ~QCUFLAG_VOICE;
1210
1211   /* +p trumps +a and +g */
1212   if (flags & QCUFLAG_PROTECT)
1213     flags &= ~(QCUFLAG_AUTOOP | QCUFLAG_AUTOVOICE);
1214
1215   /* -o can't be +a */
1216   if (!(flags & QCUFLAG_OP))
1217     flags &= ~QCUFLAG_AUTOOP;
1218
1219   /* +a or -v can't be +g.  +a implies +o at this stage (see above) */
1220   if (!(flags & QCUFLAG_VOICE) || (flags & QCUFLAG_AUTOOP))
1221     flags &= ~QCUFLAG_AUTOVOICE;
1222
1223   /* +p requires +o or +v */
1224   if (!(flags & (QCUFLAG_VOICE | QCUFLAG_OP)))
1225     flags &= ~QCUFLAG_PROTECT;
1226
1227   /* The personal flags require one of +mnovk, as does +t */
1228   if (!(flags & (QCUFLAG_OWNER | QCUFLAG_MASTER | QCUFLAG_OP | QCUFLAG_VOICE | QCUFLAG_KNOWN)))
1229     flags &= ~(QCUFLAGS_PERSONAL | QCUFLAG_TOPIC);
1230
1231   return flags;
1232 }
1233
1234 /*
1235  * findreguser:
1236  *  This function does the standard "nick or #user" lookup.
1237  *  If "sender" is not NULL, a suitable error message will
1238  *  be sent if the lookup fails.
1239  *  "sender" MUST be sent when a user is requesting a lookup
1240  *  as there is some policy code here.
1241  */
1242
1243 reguser *findreguser(nick *sender, const char *str) {
1244   reguser *rup, *vrup = getreguserfromnick(sender);;
1245   nick *np;
1246
1247   if (!str || !*str)
1248     return NULL;
1249
1250   if (*str=='#') {
1251     if (str[1]=='\0') {
1252       if (sender)
1253         chanservstdmessage(sender, QM_UNKNOWNUSER, str);
1254       return NULL;
1255     }
1256     if (!(rup=findreguserbynick(str+1)) && sender)
1257       chanservstdmessage(sender, QM_UNKNOWNUSER, str);
1258   } else if (*str=='&' && vrup && UHasHelperPriv(vrup)) {
1259     if (str[1]=='\0') {
1260       if (sender)
1261         chanservstdmessage(sender, QM_UNKNOWNUSER, str);
1262       return NULL;
1263     }
1264     if (!(rup=findreguserbyID(atoi(str+1))) && sender)
1265       chanservstdmessage(sender, QM_UNKNOWNUSER, str);
1266   } else {
1267     if (!(np=getnickbynick(str))) {
1268       if (sender)
1269         chanservstdmessage(sender, QM_UNKNOWNUSER, str);
1270       return NULL;
1271     }
1272     if (!(rup=getreguserfromnick(np)) && sender)
1273       chanservstdmessage(sender, QM_USERNOTAUTHED, str);
1274   }
1275
1276   /* removed the suspended check from here, I don't see the point... */
1277   if (rup && (rup->status & QUSTAT_DEAD)) {
1278     chanservstdmessage(sender, QM_USERHASBADAUTH, rup->username);
1279     return NULL;
1280   }
1281
1282   return rup;
1283 }
1284
1285 /*
1286  * Unbans a mask from a channel, including permbans if user has correct privs.
1287  *
1288  * Return 0 if it works, 1 if it don't.
1289  */
1290 int cs_unbanfn(nick *sender, chanindex *cip, UnbanFN fn, void *arg, int removepermbans, int abortonfailure) {
1291   regban **rbh, *rbp;
1292   chanban **cbh, *cbp;
1293   regchan *rcp;
1294   modechanges changes;
1295   char *banstr;
1296
1297   rcp=cip->exts[chanservext];
1298
1299   if (cip->channel)
1300     localsetmodeinit(&changes, cip->channel, chanservnick);
1301
1302   for (rbh=&(rcp->bans); *rbh; ) {
1303     rbp=*rbh;
1304     if (fn(arg, rbp->cbp)) {
1305       banstr=bantostring(rbp->cbp);
1306       /* Check perms and remove */
1307       if(!removepermbans) {
1308         chanservstdmessage(sender, QM_WARNNOTREMOVEDPERMBAN, banstr, cip->name->content);
1309         rbh=&(rbp->next);
1310       } else if (!cs_checkaccess(sender, NULL, CA_MASTERPRIV, cip, NULL, 0, 1)) {
1311         chanservstdmessage(sender, QM_NOTREMOVEDPERMBAN, banstr, cip->name->content);
1312         if (abortonfailure) return 1; /* Just give up... */
1313         rbh=&(rbp->next);
1314       } else {
1315         chanservstdmessage(sender, QM_REMOVEDPERMBAN, banstr, cip->name->content);
1316         if (cip->channel)
1317           localdosetmode_ban(&changes, banstr, MCB_DEL);
1318         /* Remove from database */
1319         csdb_deleteban(rbp);
1320         /* Remove from list */
1321         (*rbh)=rbp->next;
1322         /* Free ban/string and update setby refcount, and free actual regban */
1323         freesstring(rbp->reason);
1324         freechanban(rbp->cbp);
1325         freeregban(rbp);
1326       }
1327     } else {
1328       rbh=&(rbp->next);
1329     }
1330   }
1331
1332   if (cip->channel) {
1333     for (cbh=&(cip->channel->bans); *cbh; ) {
1334       cbp=*cbh;
1335       if (fn(arg, cbp)) {
1336         /* Remove */
1337         banstr=bantostring(cbp);
1338         chanservstdmessage(sender, QM_REMOVEDCHANBAN, banstr, cip->name->content);
1339         localdosetmode_ban(&changes, banstr, MCB_DEL);
1340       } else {
1341         cbh=&(cbp->next);
1342       }
1343     }
1344     localsetmodeflush(&changes,1);
1345   }
1346
1347   return 0;
1348 }
1349
1350 /* Add entry to channel op history when someone gets ops. */
1351 void cs_logchanop(regchan *rcp, char *nick, reguser *rup) {
1352   strncpy(rcp->chanopnicks[rcp->chanoppos], nick, NICKLEN);
1353   rcp->chanopnicks[rcp->chanoppos][NICKLEN]='\0';
1354   rcp->chanopaccts[rcp->chanoppos]=rup->ID;
1355   rcp->chanoppos=(rcp->chanoppos+1)%CHANOPHISTORY;
1356 }