src/hostmask.c

   1 /*
   2  *  charybdis: an advanced internet relay chat daemon (ircd).
   3  *  hostmask.c: Code to efficiently find IP & hostmask based configs.
   4  *
   5  *  Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
   6  *  Copyright (C) 1996-2002 Hybrid Development Team
   7  *  Copyright (C) 2002-2005 ircd-ratbox development team
   8  *  Copyright (C) 2005-2006 charybdis development team
   9  *
  10  *  This program is free software; you can redistribute it and/or modify
  11  *  it under the terms of the GNU General Public License as published by
  12  *  the Free Software Foundation; either version 2 of the License, or
  13  *  (at your option) any later version.
  14  *
  15  *  This program is distributed in the hope that it will be useful,
  16  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  *  GNU General Public License for more details.
  19  *
  20  *  You should have received a copy of the GNU General Public License
  21  *  along with this program; if not, write to the Free Software
  22  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  23  *  USA
  24  *
  25  *  $Id: hostmask.c 62 2006-09-22 23:51:46Z spb $
  26  */
  27
  28 #include "stdinc.h"
  29 #include "memory.h"
  30 #include "ircd_defs.h"
  31 #include "s_conf.h"
  32 #include "hostmask.h"
  33 #include "numeric.h"
  34 #include "send.h"
  35 #include "irc_string.h"
  36
  37 #ifdef IPV6
  38 static unsigned long hash_ipv6(struct sockaddr *, int);
  39 #endif
  40 static unsigned long hash_ipv4(struct sockaddr *, int);
  41
  42
  43 /* int parse_netmask(const char *, struct irc_sockaddr_storage *, int *);
  44  * Input: A hostmask, or an IPV4/6 address.
  45  * Output: An integer describing whether it is an IPV4, IPV6 address or a
  46  *         hostmask, an address(if it is an IP mask),
  47  *         a bitlength(if it is IP mask).
  48  * Side effects: None
  49  */
  50 int
  51 parse_netmask(const char *text, struct sockaddr  *naddr, int *nb)
  52 {
  53         char *ip = LOCAL_COPY(text);
  54         char *ptr;
  55         struct irc_sockaddr_storage *addr, xaddr;
  56         int *b, xb;
  57         if(nb == NULL)
  58                 b = &xb;
  59         else
  60                 b = nb;
  61
  62         if(naddr == NULL)
  63                 addr = (struct irc_sockaddr_storage *)&xaddr;
  64         else
  65                 addr = (struct irc_sockaddr_storage *)naddr;
  66
  67 #ifdef IPV6
  68         if(strchr(ip, ':'))
  69         {
  70                 if((ptr = strchr(ip, '/')))
  71                 {
  72                         *ptr = '\0';
  73                         ptr++;
  74                         *b = atoi(ptr);
  75                         if(*b > 128)
  76                                 *b = 128;
  77                 } else
  78                         *b = 128;
  79                 if(inetpton_sock(ip, (struct sockaddr *)addr) > 0)
  80                         return HM_IPV6;
  81                 else
  82                         return HM_HOST;
  83         } else
  84 #endif
  85         if(strchr(text, '.'))
  86         {
  87                 if((ptr = strchr(ip, '/')))
  88                 {
  89                         *ptr = '\0';
  90                         ptr++;
  91                         *b = atoi(ptr);
  92                         if(*b > 32)
  93                                 *b = 32;
  94                 } else
  95                         *b = 32;
  96                 if(inetpton_sock(ip, (struct sockaddr *)addr) > 0)
  97                         return HM_IPV4;
  98                 else
  99                         return HM_HOST;
 100         }
 101         return HM_HOST;
 102 }
 103
 104 /* Hashtable stuff...now external as its used in m_stats.c */
 105 struct AddressRec *atable[ATABLE_SIZE];
 106
 107 void
 108 init_host_hash(void)
 109 {
 110         memset(&atable, 0, sizeof(atable));
 111 }
 112
 113 /* unsigned long hash_ipv4(struct irc_sockaddr_storage*)
 114  * Input: An IP address.
 115  * Output: A hash value of the IP address.
 116  * Side effects: None
 117  */
 118 static unsigned long
 119 hash_ipv4(struct sockaddr *saddr, int bits)
 120 {
 121         struct sockaddr_in *addr = (struct sockaddr_in *) saddr;
 122
 123         if(bits != 0)
 124         {
 125                 unsigned long av = ntohl(addr->sin_addr.s_addr) & ~((1 << (32 - bits)) - 1);
 126                 return (av ^ (av >> 12) ^ (av >> 24)) & (ATABLE_SIZE - 1);
 127         }
 128
 129         return 0;
 130 }
 131
 132 /* unsigned long hash_ipv6(struct irc_sockaddr_storage*)
 133  * Input: An IP address.
 134  * Output: A hash value of the IP address.
 135  * Side effects: None
 136  */
 137 #ifdef IPV6
 138 static unsigned long
 139 hash_ipv6(struct sockaddr *saddr, int bits)
 140 {
 141         struct sockaddr_in6 *addr = (struct sockaddr_in6 *) saddr;
 142         unsigned long v = 0, n;
 143         for (n = 0; n < 16; n++)
 144         {
 145                 if(bits >= 8)
 146                 {
 147                         v ^= addr->sin6_addr.s6_addr[n];
 148                         bits -= 8;
 149                 }
 150                 else if(bits)
 151                 {
 152                         v ^= addr->sin6_addr.s6_addr[n] & ~((1 << (8 - bits)) - 1);
 153                         return v & (ATABLE_SIZE - 1);
 154                 }
 155                 else
 156                         return v & (ATABLE_SIZE - 1);
 157         }
 158         return v & (ATABLE_SIZE - 1);
 159 }
 160 #endif
 161
 162 /* int hash_text(const char *start)
 163  * Input: The start of the text to hash.
 164  * Output: The hash of the string between 1 and (TH_MAX-1)
 165  * Side-effects: None.
 166  */
 167 static int
 168 hash_text(const char *start)
 169 {
 170         const char *p = start;
 171         unsigned long h = 0;
 172
 173         while(*p)
 174         {
 175                 h = (h << 4) - (h + (unsigned char) ToLower(*p++));
 176         }
 177
 178         return (h & (ATABLE_SIZE - 1));
 179 }
 180
 181 /* unsigned long get_hash_mask(const char *)
 182  * Input: The text to hash.
 183  * Output: The hash of the string right of the first '.' past the last
 184  *         wildcard in the string.
 185  * Side-effects: None.
 186  */
 187 static unsigned long
 188 get_mask_hash(const char *text)
 189 {
 190         const char *hp = "", *p;
 191
 192         for (p = text + strlen(text) - 1; p >= text; p--)
 193                 if(*p == '*' || *p == '?')
 194                         return hash_text(hp);
 195                 else if(*p == '.')
 196                         hp = p + 1;
 197         return hash_text(text);
 198 }
 199
 200 /* struct ConfItem* find_conf_by_address(const char*, struct irc_sockaddr_storage*,
 201  *         int type, int fam, const char *username)
 202  * Input: The hostname, the address, the type of mask to find, the address
 203  *        family, the username.
 204  * Output: The matching value with the highest precedence.
 205  * Side-effects: None
 206  * Note: Setting bit 0 of the type means that the username is ignored.
 207  */
 208 struct ConfItem *
 209 find_conf_by_address(const char *name, const char *sockhost,
 210                         const char *orighost,
 211                         struct sockaddr *addr, int type, int fam,
 212                         const char *username)
 213 {
 214         unsigned long hprecv = 0;
 215         struct ConfItem *hprec = NULL;
 216         struct AddressRec *arec;
 217         int b;
 218
 219         if(username == NULL)
 220                 username = "";
 221
 222         if(addr)
 223         {
 224                 /* Check for IPV6 matches... */
 225 #ifdef IPV6
 226                 if(fam == AF_INET6)
 227                 {
 228
 229                         for (b = 128; b >= 0; b -= 16)
 230                         {
 231                                 for (arec = atable[hash_ipv6(addr, b)]; arec; arec = arec->next)
 232                                         if(arec->type == (type & ~0x1) &&
 233                                            arec->masktype == HM_IPV6 &&
 234                                            comp_with_mask_sock(addr, (struct sockaddr *)&arec->Mask.ipa.addr,
 235                                                                arec->Mask.ipa.bits) && (type & 0x1
 236                                                                                         ||
 237                                                                                         match(arec->
 238                                                                                               username,
 239                                                                                               username))
 240                                            && arec->precedence > hprecv)
 241                                         {
 242                                                 hprecv = arec->precedence;
 243                                                 hprec = arec->aconf;
 244                                         }
 245                         }
 246                 }
 247                 else
 248 #endif
 249                 if(fam == AF_INET)
 250                 {
 251                         for (b = 32; b >= 0; b -= 8)
 252                         {
 253                                 for (arec = atable[hash_ipv4(addr, b)]; arec; arec = arec->next)
 254                                         if(arec->type == (type & ~0x1) &&
 255                                            arec->masktype == HM_IPV4 &&
 256                                            arec->precedence > hprecv &&
 257                                            comp_with_mask_sock(addr, (struct sockaddr *)&arec->Mask.ipa.addr,
 258                                                                arec->Mask.ipa.bits) &&
 259                                            (type & 0x1 || match(arec->username, username)))
 260                                         {
 261                                                 hprecv = arec->precedence;
 262                                                 hprec = arec->aconf;
 263                                         }
 264                         }
 265                 }
 266         }
 267
 268         if(orighost != NULL)
 269         {
 270                 const char *p;
 271
 272                 for (p = orighost; p != NULL;)
 273                 {
 274                         for (arec = atable[hash_text(p)]; arec; arec = arec->next)
 275
 276                                 if((arec->type == (type & ~0x1)) &&
 277                                    (arec->masktype == HM_HOST) &&
 278                                    arec->precedence > hprecv &&
 279                                    match(arec->Mask.hostname, orighost) &&
 280                                    (type & 0x1 || match(arec->username, username)))
 281                                 {
 282                                         hprecv = arec->precedence;
 283                                         hprec = arec->aconf;
 284                                 }
 285                         p = strchr(p, '.');
 286                         if(p != NULL)
 287                                 p++;
 288                         else
 289                                 break;
 290                 }
 291                 for (arec = atable[0]; arec; arec = arec->next)
 292                 {
 293                         if(arec->type == (type & ~0x1) &&
 294                            arec->masktype == HM_HOST &&
 295                            arec->precedence > hprecv &&
 296                            (match(arec->Mask.hostname, orighost) ||
 297                             (sockhost && match(arec->Mask.hostname, sockhost))) &&
 298                            (type & 0x1 || match(arec->username, username)))
 299                         {
 300                                 hprecv = arec->precedence;
 301                                 hprec = arec->aconf;
 302                         }
 303                 }
 304         }
 305
 306         if(name != NULL)
 307         {
 308                 const char *p;
 309                 /* And yes - we have to check p after strchr and p after increment for
 310                  * NULL -kre */
 311                 for (p = name; p != NULL;)
 312                 {
 313                         for (arec = atable[hash_text(p)]; arec; arec = arec->next)
 314                                 if((arec->type == (type & ~0x1)) &&
 315                                    (arec->masktype == HM_HOST) &&
 316                                    arec->precedence > hprecv &&
 317                                    match(arec->Mask.hostname, name) &&
 318                                    (type & 0x1 || match(arec->username, username)))
 319                                 {
 320                                         hprecv = arec->precedence;
 321                                         hprec = arec->aconf;
 322                                 }
 323                         p = strchr(p, '.');
 324                         if(p != NULL)
 325                                 p++;
 326                         else
 327                                 break;
 328                 }
 329                 for (arec = atable[0]; arec; arec = arec->next)
 330                 {
 331                         if(arec->type == (type & ~0x1) &&
 332                            arec->masktype == HM_HOST &&
 333                            arec->precedence > hprecv &&
 334                            (match(arec->Mask.hostname, name) ||
 335                             (sockhost && match(arec->Mask.hostname, sockhost))) &&
 336                            (type & 0x1 || match(arec->username, username)))
 337                         {
 338                                 hprecv = arec->precedence;
 339                                 hprec = arec->aconf;
 340                         }
 341                 }
 342         }
 343         return hprec;
 344 }
 345
 346 /* struct ConfItem* find_address_conf(const char*, const char*,
 347  *                                     struct irc_sockaddr_storage*, int);
 348  * Input: The hostname, username, address, address family.
 349  * Output: The applicable ConfItem.
 350  * Side-effects: None
 351  */
 352 struct ConfItem *
 353 find_address_conf(const char *host, const char *sockhost, const char *user,
 354                 struct sockaddr *ip, int aftype)
 355 {
 356         struct ConfItem *iconf, *kconf;
 357
 358         /* Find the best I-line... If none, return NULL -A1kmm */
 359         if(!(iconf = find_conf_by_address(host, sockhost, NULL, ip, CONF_CLIENT, aftype, user)))
 360                 return NULL;
 361
 362         /* If they are exempt from K-lines, return the best I-line. -A1kmm */
 363         if(IsConfExemptKline(iconf))
 364                 return iconf;
 365
 366         /* Find the best K-line... -A1kmm */
 367         kconf = find_conf_by_address(host, sockhost, NULL, ip, CONF_KILL, aftype, user);
 368
 369         /* If they are K-lined, return the K-line */
 370         if(kconf)
 371                 return kconf;
 372
 373         /* if theres a spoof, check it against klines.. */
 374         if(IsConfDoSpoofIp(iconf))
 375         {
 376                 char *p = strchr(iconf->name, '@');
 377
 378                 /* note, we dont need to pass sockhost here, as its
 379                  * guaranteed to not match by whats above.. --anfl
 380                  */
 381                 if(p)
 382                 {
 383                         *p = '\0';
 384                         kconf = find_conf_by_address(p+1, NULL, NULL, ip, CONF_KILL, aftype, iconf->name);
 385                         *p = '@';
 386                 }
 387                 else
 388                         kconf = find_conf_by_address(iconf->name, NULL, NULL, ip, CONF_KILL, aftype, user);
 389
 390                 if(kconf)
 391                         return kconf;
 392         }
 393
 394         return iconf;
 395 }
 396
 397 /* struct ConfItem* find_dline(struct irc_sockaddr_storage*, int)
 398  * Input: An address, an address family.
 399  * Output: The best matching D-line or exempt line.
 400  * Side effects: None.
 401  */
 402 struct ConfItem *
 403 find_dline(struct sockaddr *addr, int aftype)
 404 {
 405         struct ConfItem *eline;
 406         eline = find_conf_by_address(NULL, NULL, NULL, addr, CONF_EXEMPTDLINE | 1, aftype, NULL);
 407         if(eline)
 408                 return eline;
 409         return find_conf_by_address(NULL, NULL, NULL, addr, CONF_DLINE | 1, aftype, NULL);
 410 }
 411
 412 /* void add_conf_by_address(const char*, int, const char *,
 413  *         struct ConfItem *aconf)
 414  * Input:
 415  * Output: None
 416  * Side-effects: Adds this entry to the hash table.
 417  */
 418 void
 419 add_conf_by_address(const char *address, int type, const char *username, struct ConfItem *aconf)
 420 {
 421         static unsigned long prec_value = 0xFFFFFFFF;
 422         int masktype, bits;
 423         unsigned long hv;
 424         struct AddressRec *arec;
 425
 426         if(address == NULL)
 427                 address = "/NOMATCH!/";
 428         arec = MyMalloc(sizeof(struct AddressRec));
 429         masktype = parse_netmask(address, (struct sockaddr *)&arec->Mask.ipa.addr, &bits);
 430         arec->Mask.ipa.bits = bits;
 431         arec->masktype = masktype;
 432 #ifdef IPV6
 433         if(masktype == HM_IPV6)
 434         {
 435                 /* We have to do this, since we do not re-hash for every bit -A1kmm. */
 436                 bits -= bits % 16;
 437                 arec->next = atable[(hv = hash_ipv6((struct sockaddr *)&arec->Mask.ipa.addr, bits))];
 438                 atable[hv] = arec;
 439         }
 440         else
 441 #endif
 442         if(masktype == HM_IPV4)
 443         {
 444                 /* We have to do this, since we do not re-hash for every bit -A1kmm. */
 445                 bits -= bits % 8;
 446                 arec->next = atable[(hv = hash_ipv4((struct sockaddr *)&arec->Mask.ipa.addr, bits))];
 447                 atable[hv] = arec;
 448         }
 449         else
 450         {
 451                 arec->Mask.hostname = address;
 452                 arec->next = atable[(hv = get_mask_hash(address))];
 453                 atable[hv] = arec;
 454         }
 455         arec->username = username;
 456         arec->aconf = aconf;
 457         arec->precedence = prec_value--;
 458         arec->type = type;
 459 }
 460
 461 /* void delete_one_address(const char*, struct ConfItem*)
 462  * Input: An address string, the associated ConfItem.
 463  * Output: None
 464  * Side effects: Deletes an address record. Frees the ConfItem if there
 465  *               is nothing referencing it, sets it as illegal otherwise.
 466  */
 467 void
 468 delete_one_address_conf(const char *address, struct ConfItem *aconf)
 469 {
 470         int masktype, bits;
 471         unsigned long hv;
 472         struct AddressRec *arec, *arecl = NULL;
 473         struct irc_sockaddr_storage addr;
 474         masktype = parse_netmask(address, (struct sockaddr *)&addr, &bits);
 475 #ifdef IPV6
 476         if(masktype == HM_IPV6)
 477         {
 478                 /* We have to do this, since we do not re-hash for every bit -A1kmm. */
 479                 bits -= bits % 16;
 480                 hv = hash_ipv6((struct sockaddr *)&addr, bits);
 481         }
 482         else
 483 #endif
 484         if(masktype == HM_IPV4)
 485         {
 486                 /* We have to do this, since we do not re-hash for every bit -A1kmm. */
 487                 bits -= bits % 8;
 488                 hv = hash_ipv4((struct sockaddr *)&addr, bits);
 489         }
 490         else
 491                 hv = get_mask_hash(address);
 492         for (arec = atable[hv]; arec; arec = arec->next)
 493         {
 494                 if(arec->aconf == aconf)
 495                 {
 496                         if(arecl)
 497                                 arecl->next = arec->next;
 498                         else
 499                                 atable[hv] = arec->next;
 500                         aconf->status |= CONF_ILLEGAL;
 501                         if(!aconf->clients)
 502                                 free_conf(aconf);
 503                         MyFree(arec);
 504                         return;
 505                 }
 506                 arecl = arec;
 507         }
 508 }
 509
 510 /* void clear_out_address_conf(void)
 511  * Input: None
 512  * Output: None
 513  * Side effects: Clears out all address records in the hash table,
 514  *               frees them, and frees the ConfItems if nothing references
 515  *               them, otherwise sets them as illegal.
 516  */
 517 void
 518 clear_out_address_conf(void)
 519 {
 520         int i;
 521         struct AddressRec **store_next;
 522         struct AddressRec *arec, *arecn;
 523
 524         for (i = 0; i < ATABLE_SIZE; i++)
 525         {
 526                 store_next = &atable[i];
 527                 for (arec = atable[i]; arec; arec = arecn)
 528                 {
 529                         arecn = arec->next;
 530                         /* We keep the temporary K-lines and destroy the
 531                          * permanent ones, just to be confusing :) -A1kmm */
 532                         if(arec->aconf->flags & CONF_FLAGS_TEMPORARY ||
 533                            (arec->type != CONF_CLIENT && arec->type != CONF_EXEMPTDLINE))
 534                         {
 535                                 *store_next = arec;
 536                                 store_next = &arec->next;
 537                         }
 538                         else
 539                         {
 540                                 arec->aconf->status |= CONF_ILLEGAL;
 541                                 if(!arec->aconf->clients)
 542                                         free_conf(arec->aconf);
 543                                 MyFree(arec);
 544                         }
 545                 }
 546                 *store_next = NULL;
 547         }
 548 }
 549
 550 void
 551 clear_out_address_conf_bans(void)
 552 {
 553         int i;
 554         struct AddressRec **store_next;
 555         struct AddressRec *arec, *arecn;
 556
 557         for (i = 0; i < ATABLE_SIZE; i++)
 558         {
 559                 store_next = &atable[i];
 560                 for (arec = atable[i]; arec; arec = arecn)
 561                 {
 562                         arecn = arec->next;
 563                         /* We keep the temporary K-lines and destroy the
 564                          * permanent ones, just to be confusing :) -A1kmm */
 565                         if(arec->aconf->flags & CONF_FLAGS_TEMPORARY ||
 566                            (arec->type == CONF_CLIENT || arec->type == CONF_EXEMPTDLINE))
 567                         {
 568                                 *store_next = arec;
 569                                 store_next = &arec->next;
 570                         }
 571                         else
 572                         {
 573                                 arec->aconf->status |= CONF_ILLEGAL;
 574                                 if(!arec->aconf->clients)
 575                                         free_conf(arec->aconf);
 576                                 MyFree(arec);
 577                         }
 578                 }
 579                 *store_next = NULL;
 580         }
 581 }
 582
 583
 584 /*
 585  * show_iline_prefix()
 586  *
 587  * inputs       - pointer to struct Client requesting output
 588  *              - pointer to struct ConfItem
 589  *              - name to which iline prefix will be prefixed to
 590  * output       - pointer to static string with prefixes listed in ascii form
 591  * side effects - NONE
 592  */
 593 char *
 594 show_iline_prefix(struct Client *sptr, struct ConfItem *aconf, char *name)
 595 {
 596         static char prefix_of_host[USERLEN + 15];
 597         char *prefix_ptr;
 598
 599         prefix_ptr = prefix_of_host;
 600         if(IsNoTilde(aconf))
 601                 *prefix_ptr++ = '-';
 602         if(IsLimitIp(aconf))
 603                 *prefix_ptr++ = '!';
 604         if(IsNeedIdentd(aconf))
 605                 *prefix_ptr++ = '+';
 606         if(IsPassIdentd(aconf))
 607                 *prefix_ptr++ = '$';
 608         if(IsNoMatchIp(aconf))
 609                 *prefix_ptr++ = '%';
 610         if(IsConfDoSpoofIp(aconf))
 611                 *prefix_ptr++ = '=';
 612         if(MyOper(sptr) && IsConfExemptKline(aconf))
 613                 *prefix_ptr++ = '^';
 614         if(MyOper(sptr) && IsConfExemptLimits(aconf))
 615                 *prefix_ptr++ = '>';
 616         if(MyOper(sptr) && IsConfIdlelined(aconf))
 617                 *prefix_ptr++ = '<';
 618         *prefix_ptr = '\0';
 619         strncpy(prefix_ptr, name, USERLEN);
 620         return (prefix_of_host);
 621 }
 622
 623 /* report_auth()
 624  *
 625  * Inputs: pointer to client to report to
 626  * Output: None
 627  * Side effects: Reports configured auth{} blocks to client_p
 628  */
 629 void
 630 report_auth(struct Client *client_p)
 631 {
 632         char *name, *host, *pass, *user, *classname;
 633         struct AddressRec *arec;
 634         struct ConfItem *aconf;
 635         int i, port;
 636
 637         for (i = 0; i < ATABLE_SIZE; i++)
 638                 for (arec = atable[i]; arec; arec = arec->next)
 639                         if(arec->type == CONF_CLIENT)
 640                         {
 641                                 aconf = arec->aconf;
 642
 643                                 if(!MyOper(client_p) && IsConfDoSpoofIp(aconf))
 644                                         continue;
 645
 646                                 get_printable_conf(aconf, &name, &host, &pass, &user, &port,
 647                                                    &classname);
 648
 649                                 sendto_one_numeric(client_p, RPL_STATSILINE,
 650                                                    form_str(RPL_STATSILINE),
 651                                                    name, show_iline_prefix(client_p, aconf, user),
 652                                                    show_ip_conf(aconf, client_p) ? host : "255.255.255.255",
 653                                                    port, classname);
 654                         }
 655 }
 656
 657 /* report_Klines()
 658  *
 659  * inputs       - Client to report to, mask
 660  * outputs      -
 661  * side effects - Reports configured K-lines to client_p.
 662  */
 663 void
 664 report_Klines(struct Client *source_p)
 665 {
 666         char *host, *pass, *user, *oper_reason;
 667         struct AddressRec *arec;
 668         struct ConfItem *aconf = NULL;
 669         int i;
 670
 671         for (i = 0; i < ATABLE_SIZE; i++)
 672         {
 673                 for (arec = atable[i]; arec; arec = arec->next)
 674                 {
 675                         if(arec->type == CONF_KILL)
 676                         {
 677                                 aconf = arec->aconf;
 678
 679                                 /* its a tempkline, theyre reported elsewhere */
 680                                 if(aconf->flags & CONF_FLAGS_TEMPORARY)
 681                                         continue;
 682
 683                                 get_printable_kline(source_p, aconf, &host, &pass, &user, &oper_reason);
 684                                 sendto_one_numeric(source_p, RPL_STATSKLINE,
 685                                                    form_str(RPL_STATSKLINE),
 686                                                    'K', host, user, pass,
 687                                                    oper_reason ? "|" : "",
 688                                                    oper_reason ? oper_reason : "");
 689                         }
 690                 }
 691         }
 692 }