ircd/s_auth.c

   1 /************************************************************************
   2  *   IRC - Internet Relay Chat, src/s_auth.c
   3  *   Copyright (C) 1992 Darren Reed
   4  *
   5  *   This program is free software; you can redistribute it and/or modify
   6  *   it under the terms of the GNU General Public License as published by
   7  *   the Free Software Foundation; either version 1, or (at your option)
   8  *   any later version.
   9  *
  10  *   This program is distributed in the hope that it will be useful,
  11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *   GNU General Public License for more details.
  14  *
  15  *   You should have received a copy of the GNU General Public License
  16  *   along with this program; if not, write to the Free Software
  17  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18  *
  19  *   $Id$
  20  *
  21  * Changes:
  22  *   July 6, 1999 - Rewrote most of the code here. When a client connects
  23  *     to the server and passes initial socket validation checks, it
  24  *     is owned by this module (auth) which returns it to the rest of the
  25  *     server when dns and auth queries are finished. Until the client is
  26  *     released, the server does not know it exists and does not process
  27  *     any messages from it.
  28  *     --Bleep  Thomas Helvey <tomh@inxpress.net>
  29  */
  30 #include "config.h"
  31
  32 #include "s_auth.h"
  33 #include "client.h"
  34 #include "IPcheck.h"
  35 #include "ircd.h"
  36 #include "ircd_alloc.h"
  37 #include "ircd_chattr.h"
  38 #include "ircd_events.h"
  39 #include "ircd_features.h"
  40 #include "ircd_log.h"
  41 #include "ircd_osdep.h"
  42 #include "ircd_snprintf.h"
  43 #include "ircd_string.h"
  44 #include "list.h"
  45 #include "numeric.h"
  46 #include "querycmds.h"
  47 #include "res.h"
  48 #include "s_bsd.h"
  49 #include "s_debug.h"
  50 #include "s_misc.h"
  51 #include "send.h"
  52 #include "struct.h"
  53 #include "sys.h"               /* TRUE bleah */
  54
  55 #include <arpa/inet.h>         /* inet_netof */
  56 #include <netdb.h>             /* struct hostent */
  57 #include <string.h>
  58 #include <stdlib.h>
  59 #include <unistd.h>
  60 #include <errno.h>
  61 #include <fcntl.h>
  62 #include <assert.h>
  63 #include <sys/socket.h>
  64 #include <sys/file.h>
  65 #include <sys/ioctl.h>
  66
  67 /*
  68  * a bit different approach
  69  * this replaces the original sendheader macros
  70  */
  71 static struct {
  72   const char*  message;
  73   unsigned int length;
  74 } HeaderMessages [] = {
  75   /* 123456789012345678901234567890123456789012345678901234567890 */
  76   { "NOTICE AUTH :*** Looking up your hostname\r\n",       43 },
  77   { "NOTICE AUTH :*** Found your hostname\r\n",            38 },
  78   { "NOTICE AUTH :*** Found your hostname, cached\r\n",    46 },
  79   { "NOTICE AUTH :*** Couldn't look up your hostname\r\n", 49 },
  80   { "NOTICE AUTH :*** Checking Ident\r\n",                 33 },
  81   { "NOTICE AUTH :*** Got ident response\r\n",             37 },
  82   { "NOTICE AUTH :*** No ident response\r\n",              36 },
  83   { "NOTICE AUTH :*** Your forward and reverse DNS do not match, " \
  84     "ignoring hostname.\r\n",                              80 }
  85 };
  86
  87 typedef enum {
  88   REPORT_DO_DNS,
  89   REPORT_FIN_DNS,
  90   REPORT_FIN_DNSC,
  91   REPORT_FAIL_DNS,
  92   REPORT_DO_ID,
  93   REPORT_FIN_ID,
  94   REPORT_FAIL_ID,
  95   REPORT_IP_MISMATCH
  96 } ReportType;
  97
  98 #define sendheader(c, r) \
  99    send(cli_fd(c), HeaderMessages[(r)].message, HeaderMessages[(r)].length, 0)
 100
 101 struct AuthRequest* AuthPollList = 0; /* GLOBAL - auth queries pending io */
 102 static struct AuthRequest* AuthIncompleteList = 0;
 103
 104 enum { AUTH_TIMEOUT = 60 };
 105
 106 static void release_auth_client(struct Client* client);
 107 static void unlink_auth_request(struct AuthRequest* request,
 108                                 struct AuthRequest** list);
 109 void free_auth_request(struct AuthRequest* auth);
 110
 111 /*
 112  * auth_timeout - timeout a given auth request
 113  */
 114 static void auth_timeout_callback(struct Event* ev)
 115 {
 116   struct AuthRequest* auth;
 117
 118   assert(0 != ev_timer(ev));
 119   assert(0 != t_data(ev_timer(ev)));
 120
 121   auth = t_data(ev_timer(ev));
 122
 123   if (ev_type(ev) == ET_DESTROY) { /* being destroyed */
 124     auth->flags &= ~AM_TIMEOUT;
 125
 126     if (!(auth->flags & AM_FREE_MASK)) {
 127       Debug((DEBUG_LIST, "Freeing auth from timeout callback; %p [%p]", auth,
 128              ev_timer(ev)));
 129       MyFree(auth); /* done with it, finally */
 130     }
 131   } else {
 132     assert(ev_type(ev) == ET_EXPIRE);
 133
 134     destroy_auth_request(auth, 1);
 135   }
 136 }
 137
 138 /*
 139  * auth_sock_callback - called when an event occurs on the socket
 140  */
 141 static void auth_sock_callback(struct Event* ev)
 142 {
 143   struct AuthRequest* auth;
 144
 145   assert(0 != ev_socket(ev));
 146   assert(0 != s_data(ev_socket(ev)));
 147
 148   auth = s_data(ev_socket(ev));
 149
 150   switch (ev_type(ev)) {
 151   case ET_DESTROY: /* being destroyed */
 152     auth->flags &= ~AM_SOCKET;
 153
 154     if (!(auth->flags & AM_FREE_MASK)) {
 155       Debug((DEBUG_LIST, "Freeing auth from sock callback; %p [%p]", auth,
 156              ev_socket(ev)));
 157       MyFree(auth); /* done with it finally */
 158     }
 159     break;
 160
 161   case ET_CONNECT: /* socket connection completed */
 162     Debug((DEBUG_LIST, "Connection completed for auth %p [%p]; sending query",
 163            auth, ev_socket(ev)));
 164     socket_state(&auth->socket, SS_CONNECTED);
 165     send_auth_query(auth);
 166     break;
 167
 168   case ET_READ: /* socket is readable */
 169   case ET_EOF: /* end of file on socket */
 170   case ET_ERROR: /* error on socket */
 171     Debug((DEBUG_LIST, "Auth socket %p [%p] readable", auth, ev_socket(ev)));
 172     read_auth_reply(auth);
 173     break;
 174
 175   default:
 176 #ifndef NDEBUG
 177     abort(); /* unrecognized event */
 178 #endif
 179     break;
 180   }
 181 }
 182
 183 /*
 184  * destroy_auth_request - stop an auth request completely
 185  */
 186 void destroy_auth_request(struct AuthRequest* auth, int send_reports)
 187 {
 188   struct AuthRequest** authList;
 189
 190   if (IsDoingAuth(auth)) {
 191     authList = &AuthPollList;
 192     if (-1 < auth->fd) {
 193       close(auth->fd);
 194       auth->fd = -1;
 195       socket_del(&auth->socket);
 196     }
 197
 198     if (send_reports && IsUserPort(auth->client))
 199       sendheader(auth->client, REPORT_FAIL_ID);
 200   } else
 201     authList = &AuthIncompleteList;
 202
 203   if (IsDNSPending(auth)) {
 204     delete_resolver_queries(auth);
 205     if (send_reports && IsUserPort(auth->client))
 206       sendheader(auth->client, REPORT_FAIL_DNS);
 207   }
 208
 209   if (send_reports)
 210     log_write(LS_RESOLVER, L_INFO, 0, "DNS/AUTH timeout %s",
 211               get_client_name(auth->client, HIDE_IP));
 212
 213   release_auth_client(auth->client);
 214   unlink_auth_request(auth, authList);
 215   free_auth_request(auth);
 216 }
 217
 218 /*
 219  * make_auth_request - allocate a new auth request
 220  */
 221 static struct AuthRequest* make_auth_request(struct Client* client)
 222 {
 223   struct AuthRequest* auth =
 224                (struct AuthRequest*) MyMalloc(sizeof(struct AuthRequest));
 225   assert(0 != auth);
 226   memset(auth, 0, sizeof(struct AuthRequest));
 227   auth->flags   = AM_TIMEOUT;
 228   auth->fd      = -1;
 229   auth->client  = client;
 230   cli_auth(client) = auth;
 231   timer_add(&auth->timeout, auth_timeout_callback, (void*) auth, TT_RELATIVE,
 232             AUTH_TIMEOUT);
 233   return auth;
 234 }
 235
 236 /*
 237  * free_auth_request - cleanup auth request allocations
 238  */
 239 void free_auth_request(struct AuthRequest* auth)
 240 {
 241   if (-1 < auth->fd) {
 242     close(auth->fd);
 243     Debug((DEBUG_LIST, "Deleting auth socket for %p", auth->client));
 244     socket_del(&auth->socket);
 245   }
 246   Debug((DEBUG_LIST, "Deleting auth timeout timer for %p", auth->client));
 247   timer_del(&auth->timeout);
 248 }
 249
 250 /*
 251  * unlink_auth_request - remove auth request from a list
 252  */
 253 static void unlink_auth_request(struct AuthRequest* request,
 254                                 struct AuthRequest** list)
 255 {
 256   if (request->next)
 257     request->next->prev = request->prev;
 258   if (request->prev)
 259     request->prev->next = request->next;
 260   else
 261     *list = request->next;
 262 }
 263
 264 /*
 265  * link_auth_request - add auth request to a list
 266  */
 267 static void link_auth_request(struct AuthRequest* request,
 268                               struct AuthRequest** list)
 269 {
 270   request->prev = 0;
 271   request->next = *list;
 272   if (*list)
 273     (*list)->prev = request;
 274   *list = request;
 275 }
 276
 277 /*
 278  * release_auth_client - release auth client from auth system
 279  * this adds the client into the local client lists so it can be read by
 280  * the main io processing loop
 281  */
 282 static void release_auth_client(struct Client* client)
 283 {
 284   assert(0 != client);
 285   cli_auth(client) = 0;
 286   cli_lasttime(client) = cli_since(client) = CurrentTime;
 287   if (cli_fd(client) > HighestFd)
 288     HighestFd = cli_fd(client);
 289   LocalClientArray[cli_fd(client)] = client;
 290
 291   add_client_to_list(client);
 292   socket_events(&(cli_socket(client)), SOCK_ACTION_SET | SOCK_EVENT_READABLE);
 293   Debug((DEBUG_INFO, "Auth: release_auth_client %s@%s[%s]",
 294          cli_username(client), cli_sockhost(client), cli_sock_ip(client)));
 295 }
 296
 297 static void auth_kill_client(struct AuthRequest* auth)
 298 {
 299   assert(0 != auth);
 300
 301   unlink_auth_request(auth, (IsDoingAuth(auth)) ? &AuthPollList : &AuthIncompleteList);
 302
 303   if (IsDNSPending(auth))
 304     delete_resolver_queries(auth);
 305   IPcheck_disconnect(auth->client);
 306   Count_unknowndisconnects(UserStats);
 307   free_client(auth->client);
 308   free_auth_request(auth);
 309 }
 310
 311 /*
 312  * auth_dns_callback - called when resolver query finishes
 313  * if the query resulted in a successful search, hp will contain
 314  * a non-null pointer, otherwise hp will be null.
 315  * set the client on it's way to a connection completion, regardless
 316  * of success of failure
 317  */
 318 static void auth_dns_callback(void* vptr, struct DNSReply* reply)
 319 {
 320   struct AuthRequest* auth = (struct AuthRequest*) vptr;
 321
 322   assert(0 != auth);
 323   /*
 324    * need to do this here so auth_kill_client doesn't
 325    * try have the resolver delete the query it's about
 326    * to delete anyways. --Bleep
 327    */
 328   ClearDNSPending(auth);
 329
 330   if (reply) {
 331     const struct hostent* hp = reply->hp;
 332     int i;
 333     assert(0 != hp);
 334     /*
 335      * Verify that the host to ip mapping is correct both ways and that
 336      * the ip#(s) for the socket is listed for the host.
 337      */
 338     for (i = 0; hp->h_addr_list[i]; ++i) {
 339       if (0 == memcmp(hp->h_addr_list[i], &(cli_ip(auth->client)),
 340                       sizeof(struct in_addr)))
 341          break;
 342     }
 343     if (!hp->h_addr_list[i]) {
 344       if (IsUserPort(auth->client))
 345         sendheader(auth->client, REPORT_IP_MISMATCH);
 346       sendto_opmask_butone(0, SNO_IPMISMATCH, "IP# Mismatch: %s != %s[%s]",
 347                            cli_sock_ip(auth->client), hp->h_name,
 348                            ircd_ntoa(hp->h_addr_list[0]));
 349       if (feature_bool(FEAT_KILL_IPMISMATCH)) {
 350         auth_kill_client(auth);
 351         return;
 352       }
 353     }
 354     else {
 355       ++reply->ref_count;
 356       cli_dns_reply(auth->client) = reply;
 357       ircd_strncpy(cli_sockhost(auth->client), hp->h_name, HOSTLEN);
 358       if (IsUserPort(auth->client))
 359         sendheader(auth->client, REPORT_FIN_DNS);
 360     }
 361   }
 362   else {
 363     /*
 364      * this should have already been done by s_bsd.c in add_connection
 365      *
 366      * strcpy(auth->client->sockhost, auth->client->sock_ip);
 367      */
 368     if (IsUserPort(auth->client))
 369       sendheader(auth->client, REPORT_FAIL_DNS);
 370   }
 371   if (!IsDoingAuth(auth)) {
 372     release_auth_client(auth->client);
 373     unlink_auth_request(auth, &AuthIncompleteList);
 374     free_auth_request(auth);
 375   }
 376 }
 377
 378 /*
 379  * authsenderr - handle auth send errors
 380  */
 381 static void auth_error(struct AuthRequest* auth, int kill)
 382 {
 383   ++ServerStats->is_abad;
 384
 385   assert(0 != auth);
 386   close(auth->fd);
 387   auth->fd = -1;
 388   socket_del(&auth->socket);
 389
 390   if (IsUserPort(auth->client))
 391     sendheader(auth->client, REPORT_FAIL_ID);
 392
 393   if (kill) {
 394     /*
 395      * we can't read the client info from the client socket,
 396      * close the client connection and free the client
 397      * Need to do this before we ClearAuth(auth) so we know
 398      * which list to remove the query from. --Bleep
 399      */
 400     auth_kill_client(auth);
 401     return;
 402   }
 403
 404   ClearAuth(auth);
 405   unlink_auth_request(auth, &AuthPollList);
 406
 407   if (IsDNSPending(auth))
 408     link_auth_request(auth, &AuthIncompleteList);
 409   else {
 410     release_auth_client(auth->client);
 411     free_auth_request(auth);
 412   }
 413 }
 414
 415 /*
 416  * start_auth_query - Flag the client to show that an attempt to
 417  * contact the ident server on the client's host.  The connect and
 418  * subsequently the socket are all put into 'non-blocking' mode.
 419  * Should the connect or any later phase of the identifing process fail,
 420  * it is aborted and the user is given a username of "unknown".
 421  */
 422 static int start_auth_query(struct AuthRequest* auth)
 423 {
 424   struct sockaddr_in remote_addr;
 425   struct sockaddr_in local_addr;
 426   int                fd;
 427   IOResult           result;
 428
 429   assert(0 != auth);
 430   assert(0 != auth->client);
 431
 432   if ((fd = socket(AF_INET, SOCK_STREAM, 0)) == -1) {
 433     ++ServerStats->is_abad;
 434     return 0;
 435   }
 436   if ((MAXCONNECTIONS - 10) < fd) {
 437     close(fd);
 438     return 0;
 439   }
 440   if (!os_set_nonblocking(fd)) {
 441     close(fd);
 442     return 0;
 443   }
 444   if (IsUserPort(auth->client))
 445     sendheader(auth->client, REPORT_DO_ID);
 446   /*
 447    * get the local address of the client and bind to that to
 448    * make the auth request.  This used to be done only for
 449    * ifdef VIRTTUAL_HOST, but needs to be done for all clients
 450    * since the ident request must originate from that same address--
 451    * and machines with multiple IP addresses are common now
 452    */
 453   memset(&local_addr, 0, sizeof(struct sockaddr_in));
 454   os_get_sockname(cli_fd(auth->client), &local_addr);
 455   local_addr.sin_port = htons(0);
 456
 457   if (bind(fd, (struct sockaddr*) &local_addr, sizeof(struct sockaddr_in))) {
 458     close(fd);
 459     return 0;
 460   }
 461
 462   remote_addr.sin_addr.s_addr = (cli_ip(auth->client)).s_addr;
 463   remote_addr.sin_port = htons(113);
 464   remote_addr.sin_family = AF_INET;
 465
 466   if ((result = os_connect_nonb(fd, &remote_addr)) == IO_FAILURE ||
 467       !socket_add(&auth->socket, auth_sock_callback, (void*) auth,
 468                   result == IO_SUCCESS ? SS_CONNECTED : SS_CONNECTING,
 469                   SOCK_EVENT_READABLE, fd)) {
 470     ServerStats->is_abad++;
 471     /*
 472      * No error report from this...
 473      */
 474     close(fd);
 475     if (IsUserPort(auth->client))
 476       sendheader(auth->client, REPORT_FAIL_ID);
 477     return 0;
 478   }
 479
 480   auth->flags |= AM_SOCKET;
 481   auth->fd = fd;
 482
 483   SetAuthConnect(auth);
 484   if (result == IO_SUCCESS)
 485     send_auth_query(auth); /* this does a SetAuthPending(auth) for us */
 486
 487   return 1;
 488 }
 489
 490
 491 enum IdentReplyFields {
 492   IDENT_PORT_NUMBERS,
 493   IDENT_REPLY_TYPE,
 494   IDENT_OS_TYPE,
 495   IDENT_INFO,
 496   USERID_TOKEN_COUNT
 497 };
 498
 499 static char* check_ident_reply(char* reply)
 500 {
 501   char* token;
 502   char* end;
 503   char* vector[USERID_TOKEN_COUNT];
 504   int count = token_vector(reply, ':', vector, USERID_TOKEN_COUNT);
 505
 506   if (USERID_TOKEN_COUNT != count)
 507     return 0;
 508   /*
 509    * second token is the reply type
 510    */
 511   token = vector[IDENT_REPLY_TYPE];
 512   if (EmptyString(token))
 513     return 0;
 514
 515   while (IsSpace(*token))
 516     ++token;
 517
 518   if (0 != strncmp(token, "USERID", 6))
 519     return 0;
 520
 521   /*
 522    * third token is the os type
 523    */
 524   token = vector[IDENT_OS_TYPE];
 525   if (EmptyString(token))
 526     return 0;
 527   while (IsSpace(*token))
 528    ++token;
 529
 530   /*
 531    * Unless "OTHER" is specified as the operating system
 532    * type, the server is expected to return the "normal"
 533    * user identification of the owner of this connection.
 534    * "Normal" in this context may be taken to mean a string
 535    * of characters which uniquely identifies the connection
 536    * owner such as a user identifier assigned by the system
 537    * administrator and used by such user as a mail
 538    * identifier, or as the "user" part of a user/password
 539    * pair used to gain access to system resources.  When an
 540    * operating system is specified (e.g., anything but
 541    * "OTHER"), the user identifier is expected to be in a
 542    * more or less immediately useful form - e.g., something
 543    * that could be used as an argument to "finger" or as a
 544    * mail address.
 545    */
 546   if (0 == strncmp(token, "OTHER", 5))
 547     return 0;
 548   /*
 549    * fourth token is the username
 550    */
 551   token = vector[IDENT_INFO];
 552   if (EmptyString(token))
 553     return 0;
 554   while (IsSpace(*token))
 555     ++token;
 556   /*
 557    * look for the end of the username, terminators are '\0, @, <SPACE>, :'
 558    */
 559   for (end = token; *end; ++end) {
 560     if (IsSpace(*end) || '@' == *end || ':' == *end)
 561       break;
 562   }
 563   *end = '\0';
 564   return token;
 565 }
 566
 567 /*
 568  * start_auth - starts auth (identd) and dns queries for a client
 569  */
 570 enum { LOOPBACK = 127 };
 571
 572 void start_auth(struct Client* client)
 573 {
 574   struct AuthRequest* auth = 0;
 575
 576   assert(0 != client);
 577
 578   auth = make_auth_request(client);
 579   assert(0 != auth);
 580
 581   Debug((DEBUG_INFO, "Beginning auth request on client %p", client));
 582
 583   if (!feature_bool(FEAT_NODNS)) {
 584     if (LOOPBACK == inet_netof(cli_ip(client)))
 585       strcpy(cli_sockhost(client), cli_name(&me));
 586     else {
 587       struct DNSQuery query;
 588
 589       query.vptr     = auth;
 590       query.callback = auth_dns_callback;
 591
 592       if (IsUserPort(auth->client))
 593         sendheader(client, REPORT_DO_DNS);
 594
 595       cli_dns_reply(client) = gethost_byaddr((const char*) &(cli_ip(client)),
 596                                              &query);
 597
 598       if (cli_dns_reply(client)) {
 599         ++(cli_dns_reply(client))->ref_count;
 600         ircd_strncpy(cli_sockhost(client), cli_dns_reply(client)->hp->h_name,
 601                      HOSTLEN);
 602         if (IsUserPort(auth->client))
 603           sendheader(client, REPORT_FIN_DNSC);
 604         Debug((DEBUG_LIST, "DNS entry for %p was cached", auth->client));
 605       } else
 606         SetDNSPending(auth);
 607     }
 608   }
 609
 610   if (start_auth_query(auth)) {
 611     Debug((DEBUG_LIST, "identd query for %p initiated successfully",
 612            auth->client));
 613     link_auth_request(auth, &AuthPollList);
 614   } else if (IsDNSPending(auth)) {
 615     Debug((DEBUG_LIST, "identd query for %p not initiated successfully; "
 616            "waiting on DNS", auth->client));
 617     link_auth_request(auth, &AuthIncompleteList);
 618   } else {
 619     Debug((DEBUG_LIST, "identd query for %p not initiated successfully; "
 620            "no DNS pending; releasing immediately", auth->client));
 621     free_auth_request(auth);
 622     release_auth_client(client);
 623   }
 624 }
 625
 626 /*
 627  * send_auth_query - send the ident server a query giving "theirport , ourport"
 628  * The write is only attempted *once* so it is deemed to be a fail if the
 629  * entire write doesn't write all the data given.  This shouldnt be a
 630  * problem since the socket should have a write buffer far greater than
 631  * this message to store it in should problems arise. -avalon
 632  */
 633 void send_auth_query(struct AuthRequest* auth)
 634 {
 635   struct sockaddr_in us;
 636   struct sockaddr_in them;
 637   char               authbuf[32];
 638   unsigned int       count;
 639
 640   assert(0 != auth);
 641   assert(0 != auth->client);
 642
 643   if (!os_get_sockname(cli_fd(auth->client), &us) ||
 644       !os_get_peername(cli_fd(auth->client), &them)) {
 645     auth_error(auth, 1);
 646     return;
 647   }
 648   ircd_snprintf(0, authbuf, sizeof(authbuf), "%u , %u\r\n",
 649                 (unsigned int) ntohs(them.sin_port),
 650                 (unsigned int) ntohs(us.sin_port));
 651
 652   if (IO_SUCCESS == os_send_nonb(auth->fd, authbuf, strlen(authbuf), &count)) {
 653     ClearAuthConnect(auth);
 654     SetAuthPending(auth);
 655   }
 656   else
 657     auth_error(auth, 0);
 658 }
 659
 660
 661 /*
 662  * read_auth_reply - read the reply (if any) from the ident server
 663  * we connected to.
 664  * We only give it one shot, if the reply isn't good the first time
 665  * fail the authentication entirely. --Bleep
 666  */
 667 void read_auth_reply(struct AuthRequest* auth)
 668 {
 669   char*        username = 0;
 670   unsigned int len;
 671   /*
 672    * rfc1453 sez we MUST accept 512 bytes
 673    */
 674   char   buf[BUFSIZE + 1];
 675
 676   assert(0 != auth);
 677   assert(0 != auth->client);
 678   assert(auth = cli_auth(auth->client));
 679
 680   if (IO_SUCCESS == os_recv_nonb(auth->fd, buf, BUFSIZE, &len)) {
 681     buf[len] = '\0';
 682     Debug((DEBUG_LIST, "Auth %p [%p] reply: %s", auth, &auth->socket, buf));
 683     username = check_ident_reply(buf);
 684     Debug((DEBUG_LIST, "Username: %s", username));
 685   }
 686
 687   close(auth->fd);
 688   auth->fd = -1;
 689   Debug((DEBUG_LIST, "Deleting auth [%p] socket %p", auth, &auth->socket));
 690   socket_del(&auth->socket);
 691   ClearAuth(auth);
 692
 693   if (!EmptyString(username)) {
 694     ircd_strncpy(cli_username(auth->client), username, USERLEN);
 695     /*
 696      * Not needed, struct is zeroed by memset
 697      * auth->client->username[USERLEN] = '\0';
 698      */
 699     SetGotId(auth->client);
 700     ++ServerStats->is_asuc;
 701     if (IsUserPort(auth->client))
 702       sendheader(auth->client, REPORT_FIN_ID);
 703   }
 704   else {
 705     ++ServerStats->is_abad;
 706   }
 707   unlink_auth_request(auth, &AuthPollList);
 708
 709   if (IsDNSPending(auth))
 710     link_auth_request(auth, &AuthIncompleteList);
 711   else {
 712     release_auth_client(auth->client);
 713     free_auth_request(auth);
 714   }
 715 }