Spelling fix: "nick name" -> "nickname"
[ngircd-alex.git] / src / ngircd / client.c
index ca50d37..92262b5 100644 (file)
@@ -1,23 +1,22 @@
 /*
  * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001-2005 by Alexander Barton (alex@barton.de)
+ * Copyright (c)2001-2012 Alexander Barton (alex@barton.de)
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2 of the License, or
  * (at your option) any later version.
  * Please read the file COPYING, README and AUTHORS for more information.
- *
- * Client management.
  */
 
-
 #define __client_c__
 
-
 #include "portab.h"
 
-static char UNUSED id[] = "$Id: client.c,v 1.86 2006/03/10 20:25:29 fw Exp $";
+/**
+ * @file
+ * Client management.
+ */
 
 #include "imp.h"
 #include <assert.h>
@@ -37,8 +36,8 @@ static char UNUSED id[] = "$Id: client.c,v 1.86 2006/03/10 20:25:29 fw Exp $";
 #include <imp.h>
 #include "ngircd.h"
 #include "channel.h"
-#include "resolve.h"
 #include "conf.h"
+#include "conn-func.h"
 #include "hash.h"
 #include "irc-write.h"
 #include "log.h"
@@ -46,31 +45,33 @@ static char UNUSED id[] = "$Id: client.c,v 1.86 2006/03/10 20:25:29 fw Exp $";
 
 #include <exp.h>
 
-
 #define GETID_LEN (CLIENT_NICK_LEN-1) + 1 + (CLIENT_USER_LEN-1) + 1 + (CLIENT_HOST_LEN-1) + 1
 
-
 static CLIENT *This_Server, *My_Clients;
-static char GetID_Buffer[GETID_LEN];
 
 static WHOWAS My_Whowas[MAX_WHOWAS];
 static int Last_Whowas = -1;
+static long Max_Users, My_Max_Users;
 
 
-static long Count PARAMS(( CLIENT_TYPE Type ));
-static long MyCount PARAMS(( CLIENT_TYPE Type ));
+static unsigned long Count PARAMS(( CLIENT_TYPE Type ));
+static unsigned long MyCount PARAMS(( CLIENT_TYPE Type ));
 
 static CLIENT *New_Client_Struct PARAMS(( void ));
 static void Generate_MyToken PARAMS(( CLIENT *Client ));
 static void Adjust_Counters PARAMS(( CLIENT *Client ));
 
-#ifndef Client_DestroyNow
-GLOBAL void Client_DestroyNow PARAMS((CLIENT *Client ));
-#endif
-
+static CLIENT *Init_New_Client PARAMS((CONN_ID Idx, CLIENT *Introducer,
+                                      CLIENT *TopServer, int Type, const char *ID,
+                                      const char *User, const char *Hostname, const char *Info,
+                                      int Hops, int Token, const char *Modes,
+                                      bool Idented));
 
-long Max_Users = 0, My_Max_Users = 0;
+static void Destroy_UserOrService PARAMS((CLIENT *Client,const char *Txt, const char *FwdMsg,
+                                       bool SendQuit));
 
+static void cb_introduceClient PARAMS((CLIENT *Client, CLIENT *Prefix,
+                                      void *i));
 
 GLOBAL void
 Client_Init( void )
@@ -94,9 +95,10 @@ Client_Init( void )
        This_Server->hops = 0;
 
        gethostname( This_Server->host, CLIENT_HOST_LEN );
-       h = gethostbyname( This_Server->host );
-       if( h ) strlcpy( This_Server->host, h->h_name, sizeof( This_Server->host ));
-
+       if (Conf_DNS) {
+               h = gethostbyname( This_Server->host );
+               if (h) strlcpy(This_Server->host, h->h_name, sizeof(This_Server->host));
+       }
        Client_SetID( This_Server, Conf_ServerName );
        Client_SetInfo( This_Server, Conf_ServerInfo );
 
@@ -135,78 +137,105 @@ Client_ThisServer( void )
 } /* Client_ThisServer */
 
 
+/**
+ * Initialize new local client; wrapper function for Init_New_Client().
+ * @return New CLIENT structure.
+ */
 GLOBAL CLIENT *
-Client_NewLocal( CONN_ID Idx, char *Hostname, int Type, bool Idented )
+Client_NewLocal(CONN_ID Idx, const char *Hostname, int Type, bool Idented)
 {
-       /* Neuen lokalen Client erzeugen: Wrapper-Funktion fuer Client_New(). */
-       return Client_New( Idx, This_Server, NULL, Type, NULL, NULL, Hostname, NULL, 0, 0, NULL, Idented );
+       return Init_New_Client(Idx, This_Server, NULL, Type, NULL, NULL,
+               Hostname, NULL, 0, 0, NULL, Idented);
 } /* Client_NewLocal */
 
 
+/**
+ * Initialize new remote server; wrapper function for Init_New_Client().
+ * @return New CLIENT structure.
+ */
 GLOBAL CLIENT *
-Client_NewRemoteServer( CLIENT *Introducer, char *Hostname, CLIENT *TopServer, int Hops, int Token, char *Info, bool Idented )
+Client_NewRemoteServer(CLIENT *Introducer, const char *Hostname, CLIENT *TopServer,
+ int Hops, int Token, const char *Info, bool Idented)
 {
-       /* Neuen Remote-Client erzeugen: Wrapper-Funktion fuer Client_New (). */
-       return Client_New( NONE, Introducer, TopServer, CLIENT_SERVER, Hostname, NULL, Hostname, Info, Hops, Token, NULL, Idented );
+       return Init_New_Client(NONE, Introducer, TopServer, CLIENT_SERVER,
+               Hostname, NULL, Hostname, Info, Hops, Token, NULL, Idented);
 } /* Client_NewRemoteServer */
 
 
+/**
+ * Initialize new remote client; wrapper function for Init_New_Client().
+ * @return New CLIENT structure.
+ */
 GLOBAL CLIENT *
-Client_NewRemoteUser( CLIENT *Introducer, char *Nick, int Hops, char *User, char *Hostname, int Token, char *Modes, char *Info, bool Idented )
+Client_NewRemoteUser(CLIENT *Introducer, const char *Nick, int Hops, const char *User,
+ const char *Hostname, int Token, const char *Modes, const char *Info, bool Idented)
 {
-       /* Neuen Remote-Client erzeugen: Wrapper-Funktion fuer Client_New (). */
-       return Client_New( NONE, Introducer, NULL, CLIENT_USER, Nick, User, Hostname, Info, Hops, Token, Modes, Idented );
+       return Init_New_Client(NONE, Introducer, NULL, CLIENT_USER, Nick,
+               User, Hostname, Info, Hops, Token, Modes, Idented);
 } /* Client_NewRemoteUser */
 
 
+/**
+ * Initialize new client and set up the given parameters like client type,
+ * user name, host name, introducing server etc. ...
+ * @return New CLIENT structure.
+ */
 static CLIENT *
-Client_New( CONN_ID Idx, CLIENT *Introducer, CLIENT *TopServer, int Type, char *ID, char *User, char *Hostname, char *Info, int Hops, int Token, char *Modes, bool Idented )
+Init_New_Client(CONN_ID Idx, CLIENT *Introducer, CLIENT *TopServer,
+  int Type, const char *ID, const char *User, const char *Hostname,
+  const char *Info, int Hops, int Token, const char *Modes, bool Idented)
 {
        CLIENT *client;
 
-       assert( Idx >= NONE );
-       assert( Introducer != NULL );
-       assert( Hostname != NULL );
+       assert(Idx >= NONE);
+       assert(Introducer != NULL);
 
-       client = New_Client_Struct( );
-       if( ! client ) return NULL;
+       client = New_Client_Struct();
+       if (!client)
+               return NULL;
 
-       /* Initialisieren */
        client->starttime = time(NULL);
        client->conn_id = Idx;
        client->introducer = Introducer;
        client->topserver = TopServer;
        client->type = Type;
-       if( ID ) Client_SetID( client, ID );
-       if( User ) Client_SetUser( client, User, Idented );
-       if( Hostname ) Client_SetHostname( client, Hostname );
-       if( Info ) Client_SetInfo( client, Info );
+       if (ID)
+               Client_SetID(client, ID);
+       if (User) {
+               Client_SetUser(client, User, Idented);
+               Client_SetOrigUser(client, User);
+       }
+       if (Hostname)
+               Client_SetHostname(client, Hostname);
+       if (Info)
+               Client_SetInfo(client, Info);
        client->hops = Hops;
        client->token = Token;
-       if( Modes ) Client_SetModes( client, Modes );
-       if( Type == CLIENT_SERVER ) Generate_MyToken( client );
+       if (Modes)
+               Client_SetModes(client, Modes);
+       if (Type == CLIENT_SERVER)
+               Generate_MyToken(client);
 
-       /* ist der User away? */
-       if( strchr( client->modes, 'a' )) strlcpy( client->away, DEFAULT_AWAY_MSG, sizeof( client->away ));
+       if (strchr(client->modes, 'a'))
+               strlcpy(client->away, DEFAULT_AWAY_MSG, sizeof(client->away));
 
-       /* Verketten */
        client->next = (POINTER *)My_Clients;
        My_Clients = client;
 
-       /* Adjust counters */
-       Adjust_Counters( client );
+       Adjust_Counters(client);
 
        return client;
-} /* Client_New */
+} /* Init_New_Client */
 
 
 GLOBAL void
-Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
+Client_Destroy( CLIENT *Client, const char *LogMsg, const char *FwdMsg, bool SendQuit )
 {
-       /* Client entfernen. */
+       /* remove a client */
        
        CLIENT *last, *c;
-       char msg[LINE_LEN], *txt;
+       char msg[LINE_LEN];
+       const char *txt;
 
        assert( Client != NULL );
 
@@ -214,7 +243,7 @@ Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
        else txt = FwdMsg;
        if( ! txt ) txt = "Reason unknown.";
 
-       /* Netz-Split-Nachricht vorbereiten (noch nicht optimal) */
+       /* netsplit message */
        if( Client->type == CLIENT_SERVER ) {
                strlcpy(msg, This_Server->id, sizeof (msg));
                strlcat(msg, " ", sizeof (msg));
@@ -227,8 +256,16 @@ Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
        {
                if(( Client->type == CLIENT_SERVER ) && ( c->introducer == Client ) && ( c != Client ))
                {
-                       /* der Client, der geloescht wird ist ein Server. Der Client, den wir gerade
-                        * pruefen, ist ein Child von diesem und muss daher auch entfernt werden */
+                       /*
+                        * The client that is about to be removed is a server,
+                        * the client we are checking right now is a child of that
+                        * server and thus has to be removed, too.
+                        *
+                        * Call Client_Destroy() recursively with the server as the
+                        * new "object to be removed". This starts the cycle again, until
+                        * all servers that are linked via the original server have been
+                        * removed.
+                        */
                        Client_Destroy( c, NULL, msg, false );
                        last = NULL;
                        c = My_Clients;
@@ -236,45 +273,12 @@ Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
                }
                if( c == Client )
                {
-                       /* Wir haben den Client gefunden: entfernen */
+                       /* found  the client: remove it */
                        if( last ) last->next = c->next;
                        else My_Clients = (CLIENT *)c->next;
 
-                       if( c->type == CLIENT_USER )
-                       {
-                               if( c->conn_id != NONE )
-                               {
-                                       /* Ein lokaler User */
-                                       Log( LOG_NOTICE, "User \"%s\" unregistered (connection %d): %s", Client_Mask( c ), c->conn_id, txt );
-
-                                       if( SendQuit )
-                                       {
-                                               /* Alle andere Server informieren! */
-                                               if( FwdMsg ) IRC_WriteStrServersPrefix( NULL, c, "QUIT :%s", FwdMsg );
-                                               else IRC_WriteStrServersPrefix( NULL, c, "QUIT :" );
-                                       }
-                               }
-                               else
-                               {
-                                       /* Remote User */
-                                       Log( LOG_DEBUG, "User \"%s\" unregistered: %s", Client_Mask( c ), txt );
-
-                                       if( SendQuit )
-                                       {
-                                               /* Andere Server informieren, ausser denen, die "in
-                                                * Richtung dem liegen", auf dem der User registriert
-                                                * ist. Von denen haben wir das QUIT ja wohl bekommen. */
-                                               if( FwdMsg ) IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "QUIT :%s", FwdMsg );
-                                               else IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "QUIT :" );
-                                       }
-                               }
-
-                               /* Unregister client from channels */
-                               Channel_Quit( c, FwdMsg ? FwdMsg : c->id );
-                               
-                               /* Register client in My_Whowas structure */
-                               Client_RegisterWhowas( c );
-                       }
+                       if(c->type == CLIENT_USER || c->type == CLIENT_SERVICE)
+                               Destroy_UserOrService(c, txt, FwdMsg, SendQuit);
                        else if( c->type == CLIENT_SERVER )
                        {
                                if( c != This_Server )
@@ -283,7 +287,7 @@ Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
                                        else Log( LOG_NOTICE|LOG_snotice, "Server \"%s\" unregistered: %s", c->id, txt );
                                }
 
-                               /* andere Server informieren */
+                               /* inform other servers */
                                if( ! NGIRCd_SignalQuit )
                                {
                                        if( FwdMsg ) IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "SQUIT %s :%s", c->id, FwdMsg );
@@ -296,11 +300,9 @@ Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
                                {
                                        if( c->id[0] ) Log( LOG_NOTICE, "Client \"%s\" unregistered (connection %d): %s", c->id, c->conn_id, txt );
                                        else Log( LOG_NOTICE, "Client unregistered (connection %d): %s", c->conn_id, txt );
-                               }
-                               else
-                               {
-                                       if( c->id[0] ) Log( LOG_WARNING, "Unregistered unknown client \"%s\": %s", c->id, txt );
-                                       else Log( LOG_WARNING, "Unregistered unknown client: %s", c->id, txt );
+                               } else {
+                                       Log(LOG_WARNING, "Unregistered unknown client \"%s\": %s",
+                                                               c->id[0] ? c->id : "(No Nick)", txt );
                                }
                        }
 
@@ -313,129 +315,133 @@ Client_Destroy( CLIENT *Client, char *LogMsg, char *FwdMsg, bool SendQuit )
 } /* Client_Destroy */
 
 
+/**
+ * Set client hostname.
+ *
+ * If global hostname cloaking is in effect, don't set the real hostname
+ * but the configured one.
+ *
+ * @param Client The client of which the hostname should be set.
+ * @param Hostname The new hostname.
+ */
 GLOBAL void
-Client_DestroyNow( CLIENT *Client )
+Client_SetHostname( CLIENT *Client, const char *Hostname )
 {
-       /* Destroy client structure immediately. This function is only
-        * intended for the connection layer to remove client structures
-        * of connections that can't be established! */
+       assert(Client != NULL);
+       assert(Hostname != NULL);
 
-       CLIENT *last, *c;
+       if (strlen(Conf_CloakHost)) {
+               char cloak[GETID_LEN];
 
-       assert( Client != NULL );
+               strlcpy(cloak, Hostname, GETID_LEN);
+               strlcat(cloak, Conf_CloakHostSalt, GETID_LEN);
+               snprintf(cloak, GETID_LEN, Conf_CloakHost, Hash(cloak));
 
-       last = NULL;
-       c = My_Clients;
-       while( c )
-       {
-               if( c == Client )
-               {
-                       /* Wir haben den Client gefunden: entfernen */
-                       if( last ) last->next = c->next;
-                       else My_Clients = (CLIENT *)c->next;
-                       free( c );
-                       break;
-               }
-               last = c;
-               c = (CLIENT *)c->next;
+               LogDebug("Updating hostname of \"%s\": \"%s\" -> \"%s\"",
+                       Client_ID(Client), Client->host, cloak);
+               strlcpy(Client->host, cloak, sizeof(Client->host));
+       } else {
+               LogDebug("Updating hostname of \"%s\": \"%s\" -> \"%s\"",
+                        Client_ID(Client), Client->host, Hostname);
+               strlcpy(Client->host, Hostname, sizeof(Client->host));
        }
-} /* Client_DestroyNow */
-
-
-GLOBAL void
-Client_SetHostname( CLIENT *Client, char *Hostname )
-{
-       /* Hostname eines Clients setzen */
-       
-       assert( Client != NULL );
-       assert( Hostname != NULL );
-       
-       strlcpy( Client->host, Hostname, sizeof( Client->host ));
 } /* Client_SetHostname */
 
 
 GLOBAL void
-Client_SetID( CLIENT *Client, char *ID )
+Client_SetID( CLIENT *Client, const char *ID )
 {
-       /* Hostname eines Clients setzen, Hash-Wert berechnen */
-
        assert( Client != NULL );
        assert( ID != NULL );
        
        strlcpy( Client->id, ID, sizeof( Client->id ));
 
+       if (Conf_CloakUserToNick) {
+               strlcpy( Client->user, ID, sizeof( Client->user ));
+               strlcpy( Client->info, ID, sizeof( Client->info ));
+       }
+
        /* Hash */
        Client->hash = Hash( Client->id );
 } /* Client_SetID */
 
 
 GLOBAL void
-Client_SetUser( CLIENT *Client, char *User, bool Idented )
+Client_SetUser( CLIENT *Client, const char *User, bool Idented )
 {
-       /* Username eines Clients setzen */
+       /* set clients username */
 
        assert( Client != NULL );
        assert( User != NULL );
-       
-       if( Idented ) strlcpy( Client->user, User, sizeof( Client->user ));
-       else
-       {
+
+       if (Conf_CloakUserToNick) {
+               strlcpy(Client->user, Client->id, sizeof(Client->user));
+       } else if (Idented) {
+               strlcpy(Client->user, User, sizeof(Client->user));
+       } else {
                Client->user[0] = '~';
-               strlcpy( Client->user + 1, User, sizeof( Client->user ) - 1 );
+               strlcpy(Client->user + 1, User, sizeof(Client->user) - 1);
        }
 } /* Client_SetUser */
 
 
+/**
+ * Set "original" user name of a client.
+ * This function saves the "original" user name, the user name specified by
+ * the peer using the USER command, into the CLIENT structure. This user
+ * name may be used for authentication, for example.
+ * @param Client The client.
+ * @param User User name to set.
+ */
 GLOBAL void
-Client_SetInfo( CLIENT *Client, char *Info )
+Client_SetOrigUser(CLIENT UNUSED *Client, const char UNUSED *User)
 {
-       /* Hostname eines Clients setzen */
+       assert(Client != NULL);
+       assert(User != NULL);
+
+#if defined(PAM) && defined(IDENTAUTH)
+       strlcpy(Client->orig_user, User, sizeof(Client->orig_user));
+#endif
+} /* Client_SetOrigUser */
+
+
+GLOBAL void
+Client_SetInfo( CLIENT *Client, const char *Info )
+{
+       /* set client hostname */
 
        assert( Client != NULL );
        assert( Info != NULL );
-       
-       strlcpy( Client->info, Info, sizeof( Client->info ));
+
+       if (Conf_CloakUserToNick)
+               strlcpy(Client->info, Client->id, sizeof(Client->info));
+       else
+               strlcpy(Client->info, Info, sizeof(Client->info));
 } /* Client_SetInfo */
 
 
 GLOBAL void
-Client_SetModes( CLIENT *Client, char *Modes )
+Client_SetModes( CLIENT *Client, const char *Modes )
 {
-       /* Modes eines Clients setzen */
-
        assert( Client != NULL );
        assert( Modes != NULL );
 
-       strlcpy( Client->modes, Modes, sizeof( Client->modes ));
+       strlcpy(Client->modes, Modes, sizeof( Client->modes ));
 } /* Client_SetModes */
 
 
 GLOBAL void
-Client_SetFlags( CLIENT *Client, char *Flags )
+Client_SetFlags( CLIENT *Client, const char *Flags )
 {
-       /* Flags eines Clients setzen */
-
        assert( Client != NULL );
        assert( Flags != NULL );
 
-       strlcpy( Client->flags, Flags, sizeof( Client->flags ));
+       strlcpy(Client->flags, Flags, sizeof(Client->flags));
 } /* Client_SetFlags */
 
 
 GLOBAL void
-Client_SetPassword( CLIENT *Client, char *Pwd )
-{
-       /* Von einem Client geliefertes Passwort */
-
-       assert( Client != NULL );
-       assert( Pwd != NULL );
-       
-       strlcpy( Client->pwd, Pwd, sizeof( Client->pwd ));
-} /* Client_SetPassword */
-
-
-GLOBAL void
-Client_SetAway( CLIENT *Client, char *Txt )
+Client_SetAway( CLIENT *Client, const char *Txt )
 {
        /* Set AWAY reason of client */
 
@@ -443,7 +449,8 @@ Client_SetAway( CLIENT *Client, char *Txt )
        assert( Txt != NULL );
 
        strlcpy( Client->away, Txt, sizeof( Client->away ));
-       Log( LOG_DEBUG, "User \"%s\" is away: %s", Client_Mask( Client ), Txt );
+       LogDebug("%s \"%s\" is away: %s", Client_TypeText(Client),
+                Client_Mask(Client), Txt);
 } /* Client_SetAway */
 
 
@@ -499,13 +506,11 @@ Client_ModeAdd( CLIENT *Client, char Mode )
         */
 
        char x[2];
-       
+
        assert( Client != NULL );
 
        x[0] = Mode; x[1] = '\0';
-       if( ! strchr( Client->modes, x[0] ))
-       {
-               /* Client hat den Mode noch nicht -> setzen */
+       if (!strchr( Client->modes, x[0])) {
                strlcat( Client->modes, x, sizeof( Client->modes ));
                return true;
        }
@@ -541,28 +546,7 @@ Client_ModeDel( CLIENT *Client, char Mode )
 
 
 GLOBAL CLIENT *
-Client_GetFromConn( CONN_ID Idx )
-{
-       /* return Client-Structure that belongs to the local Connection Idx gehoert.
-        * If none is found, return NULL.
-        */
-
-       CLIENT *c;
-
-       assert( Idx >= 0 );
-       
-       c = My_Clients;
-       while( c )
-       {
-               if( c->conn_id == Idx ) return c;
-               c = (CLIENT *)c->next;
-       }
-       return NULL;
-} /* Client_GetFromConn */
-
-
-GLOBAL CLIENT *
-Client_Search( char *Nick )
+Client_Search( const char *Nick )
 {
        /* return Client-Structure that has the corresponding Nick.
         * If none is found, return NULL.
@@ -579,38 +563,37 @@ Client_Search( char *Nick )
        ptr = strchr( search_id, '!' );
        if( ptr ) *ptr = '\0';
 
-       search_hash = Hash( search_id );
+       search_hash = Hash(search_id);
 
        c = My_Clients;
-       while( c )
-       {
-               if( c->hash == search_hash )
-               {
-                       /* lt. Hash-Wert: Treffer! */
-                       if( strcasecmp( c->id, search_id ) == 0 ) return c;
-               }
+       while (c) {
+               if (c->hash == search_hash && strcasecmp(c->id, search_id) == 0)
+                       return c;
                c = (CLIENT *)c->next;
        }
        return NULL;
 } /* Client_Search */
 
 
+/**
+ * Get client structure ("introducer") identfied by a server token.
+ * @return CLIENT structure or NULL if none could be found.
+ */
 GLOBAL CLIENT *
 Client_GetFromToken( CLIENT *Client, int Token )
 {
-       /* Client-Struktur, die den entsprechenden Introducer (=Client)
-        * und das gegebene Token hat, liefern. Wird keine gefunden,
-        * so wird NULL geliefert. */
-
        CLIENT *c;
 
        assert( Client != NULL );
-       assert( Token > 0 );
+
+       if (!Token)
+               return NULL;
 
        c = My_Clients;
-       while( c )
-       {
-               if(( c->type == CLIENT_SERVER ) && ( c->introducer == Client ) && ( c->token == Token )) return c;
+       while (c) {
+               if ((c->type == CLIENT_SERVER) && (c->introducer == Client) &&
+                       (c->token == Token))
+                               return c;
                c = (CLIENT *)c->next;
        }
        return NULL;
@@ -639,7 +622,8 @@ Client_ID( CLIENT *Client )
        assert( Client != NULL );
 
 #ifdef DEBUG
-       if( Client->type == CLIENT_USER ) assert( strlen( Client->id ) < CLIENT_NICK_LEN );
+       if(Client->type == CLIENT_USER)
+               assert(strlen(Client->id) < Conf_MaxNickLength);
 #endif
                                                   
        if( Client->id[0] ) return Client->id;
@@ -659,25 +643,80 @@ GLOBAL char *
 Client_User( CLIENT *Client )
 {
        assert( Client != NULL );
-       if( Client->user[0] ) return Client->user;
-       else return "~";
+       return Client->user[0] ? Client->user : "~";
 } /* Client_User */
 
 
+#ifdef PAM
+
+/**
+ * Get the "original" user name as supplied by the USER command.
+ * The user name as given by the client is used for authentication instead
+ * of the one detected using IDENT requests.
+ * @param Client The client.
+ * @return Original user name.
+ */
 GLOBAL char *
-Client_Hostname( CLIENT *Client )
+Client_OrigUser(CLIENT *Client) {
+#ifndef IDENTAUTH
+       char *user = Client->user;
+
+       if (user[0] == '~')
+               user++;
+       return user;
+#else
+       return Client->orig_user;
+#endif
+} /* Client_OrigUser */
+
+#endif
+
+
+/**
+ * Return the hostname of a client.
+ * @param Client Pointer to client structure
+ * @return Pointer to client hostname
+ */
+GLOBAL char *
+Client_Hostname(CLIENT *Client)
 {
-       assert( Client != NULL );
+       assert (Client != NULL);
        return Client->host;
 } /* Client_Hostname */
 
 
+/**
+ * Get potentially cloaked hostname of a client.
+ *
+ * If the client has not enabled cloaking, the real hostname is used.
+ * Please note that this function uses a global static buffer, so you can't
+ * nest invocations without overwriting earlier results!
+ *
+ * @param Client Pointer to client structure
+ * @return Pointer to client hostname
+ */
 GLOBAL char *
-Client_Password( CLIENT *Client )
+Client_HostnameCloaked(CLIENT *Client)
 {
-       assert( Client != NULL );
-       return Client->pwd;
-} /* Client_Password */
+       static char Cloak_Buffer[CLIENT_HOST_LEN];
+
+       assert(Client != NULL);
+
+       if (!Client_HasMode(Client, 'x'))
+               return Client_Hostname(Client);
+
+       /* Do simple mapping to the server ID? */
+       if (!*Conf_CloakHostModeX)
+               return Client_ID(Client->introducer);
+
+       strlcpy(Cloak_Buffer, Client->host, CLIENT_HOST_LEN);
+       strlcat(Cloak_Buffer, Conf_CloakHostSalt, CLIENT_HOST_LEN);
+
+       snprintf(Cloak_Buffer, CLIENT_HOST_LEN, Conf_CloakHostModeX,
+                Hash(Cloak_Buffer));
+
+       return Cloak_Buffer;
+} /* Client_HostnameCloaked */
 
 
 GLOBAL char *
@@ -732,30 +771,71 @@ GLOBAL CLIENT *
 Client_NextHop( CLIENT *Client )
 {
        CLIENT *c;
-       
+
        assert( Client != NULL );
 
        c = Client;
-       while( c->introducer && ( c->introducer != c ) && ( c->introducer != This_Server )) c = c->introducer;
+       while( c->introducer && ( c->introducer != c ) && ( c->introducer != This_Server ))
+               c = c->introducer;
+
        return c;
 } /* Client_NextHop */
 
 
+/**
+ * Return ID of a client: "client!user@host"
+ * This client ID is used for IRC prefixes, for example.
+ * Please note that this function uses a global static buffer, so you can't
+ * nest invocations without overwriting earlier results!
+ * @param Client Pointer to client structure
+ * @return Pointer to global buffer containing the client ID
+ */
 GLOBAL char *
 Client_Mask( CLIENT *Client )
 {
-       /* Client-"ID" liefern, wie sie z.B. fuer
-        * Prefixe benoetigt wird. */
+       static char Mask_Buffer[GETID_LEN];
 
-       assert( Client != NULL );
-       
-       if( Client->type == CLIENT_SERVER ) return Client->id;
+       assert (Client != NULL);
+
+       /* Servers: return name only, there is no "mask" */
+       if (Client->type == CLIENT_SERVER)
+               return Client->id;
 
-       snprintf( GetID_Buffer, GETID_LEN, "%s!%s@%s", Client->id, Client->user, Client->host );
-       return GetID_Buffer;
+       snprintf(Mask_Buffer, GETID_LEN, "%s!%s@%s",
+                Client->id, Client->user, Client->host);
+       return Mask_Buffer;
 } /* Client_Mask */
 
 
+/**
+ * Return ID of a client with cloaked hostname: "client!user@server-name"
+ *
+ * This client ID is used for IRC prefixes, for example.
+ * Please note that this function uses a global static buffer, so you can't
+ * nest invocations without overwriting earlier results!
+ * If the client has not enabled cloaking, the real hostname is used.
+ *
+ * @param Client Pointer to client structure
+ * @return Pointer to global buffer containing the client ID
+ */
+GLOBAL char *
+Client_MaskCloaked(CLIENT *Client)
+{
+       static char Mask_Buffer[GETID_LEN];
+
+       assert (Client != NULL);
+
+       /* Is the client using cloaking at all? */
+       if (!Client_HasMode(Client, 'x'))
+               return Client_Mask(Client);
+
+       snprintf(Mask_Buffer, GETID_LEN, "%s!%s@%s", Client->id, Client->user,
+                Client_HostnameCloaked(Client));
+
+       return Mask_Buffer;
+} /* Client_MaskCloaked */
+
+
 GLOBAL CLIENT *
 Client_Introducer( CLIENT *Client )
 {
@@ -783,33 +863,52 @@ Client_HasMode( CLIENT *Client, char Mode )
 GLOBAL char *
 Client_Away( CLIENT *Client )
 {
-       /* AWAY-Text liefern */
-
        assert( Client != NULL );
        return Client->away;
 } /* Client_Away */
 
 
+/**
+ * Make sure that a given nickname is valid.
+ *
+ * If the nickname is not valid for the given client, this function sends back
+ * the appropriate error messages.
+ *
+ * @param      Client Client that wants to change the nickname.
+ * @param      Nick New nickname.
+ * @returns    true if nickname is valid, false otherwise.
+ */
 GLOBAL bool
-Client_CheckNick( CLIENT *Client, char *Nick )
-{
-       /* Nick ueberpruefen */
-
-       assert( Client != NULL );
-       assert( Nick != NULL );
-       
-       /* Nick ungueltig? */
-       if( ! Client_IsValidNick( Nick ))
-       {
-               IRC_WriteStrClient( Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID( Client ), Nick );
+Client_CheckNick(CLIENT *Client, char *Nick)
+{
+       assert(Client != NULL);
+       assert(Nick != NULL);
+
+       if (!Client_IsValidNick(Nick)) {
+               if (strlen(Nick ) >= Conf_MaxNickLength)
+                       IRC_WriteStrClient(Client, ERR_NICKNAMETOOLONG_MSG,
+                                          Client_ID(Client), Nick,
+                                          Conf_MaxNickLength - 1);
+               else
+                       IRC_WriteStrClient(Client, ERR_ERRONEUSNICKNAME_MSG,
+                                          Client_ID(Client), Nick);
                return false;
        }
 
-       /* Nick bereits vergeben? */
-       if( Client_Search( Nick ))
-       {
-               /* den Nick gibt es bereits */
-               IRC_WriteStrClient( Client, ERR_NICKNAMEINUSE_MSG, Client_ID( Client ), Nick );
+       if (Client_Type(Client) != CLIENT_SERVER
+           && Client_Type(Client) != CLIENT_SERVICE) {
+               /* Make sure that this isn't a restricted/forbidden nickname */
+               if (Conf_NickIsBlocked(Nick)) {
+                       IRC_WriteStrClient(Client, ERR_FORBIDDENNICKNAME_MSG,
+                                          Client_ID(Client), Nick);
+                       return false;
+               }
+       }
+
+       /* Nickname already registered? */
+       if (Client_Search(Nick)) {
+               IRC_WriteStrClient(Client, ERR_NICKNAMEINUSE_MSG,
+                       Client_ID(Client), Nick);
                return false;
        }
 
@@ -820,8 +919,6 @@ Client_CheckNick( CLIENT *Client, char *Nick )
 GLOBAL bool
 Client_CheckID( CLIENT *Client, char *ID )
 {
-       /* Nick ueberpruefen */
-
        char str[COMMAND_LEN];
        CLIENT *c;
 
@@ -829,24 +926,22 @@ Client_CheckID( CLIENT *Client, char *ID )
        assert( Client->conn_id > NONE );
        assert( ID != NULL );
 
-       /* Nick zu lang? */
-       if( strlen( ID ) > CLIENT_ID_LEN )
-       {
-               IRC_WriteStrClient( Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID( Client ), ID );
+       /* ID too long? */
+       if (strlen(ID) > CLIENT_ID_LEN) {
+               IRC_WriteStrClient(Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID(Client), ID);
                return false;
        }
 
-       /* ID bereits vergeben? */
+       /* ID already in use? */
        c = My_Clients;
-       while( c )
-       {
-               if( strcasecmp( c->id, ID ) == 0 )
-               {
-                       /* die Server-ID gibt es bereits */
-                       snprintf( str, sizeof( str ), "ID \"%s\" already registered", ID );
-                       if( Client->conn_id != c->conn_id ) Log( LOG_ERR, "%s (on connection %d)!", str, c->conn_id );
-                       else Log( LOG_ERR, "%s (via network)!", str );
-                       Conn_Close( Client->conn_id, str, str, true);
+       while (c) {
+               if (strcasecmp(c->id, ID) == 0) {
+                       snprintf(str, sizeof(str), "ID \"%s\" already registered", ID);
+                       if (c->conn_id != NONE)
+                               Log(LOG_ERR, "%s (on connection %d)!", str, c->conn_id);
+                       else
+                               Log(LOG_ERR, "%s (via network)!", str);
+                       Conn_Close(Client->conn_id, str, str, true);
                        return false;
                }
                c = (CLIENT *)c->next;
@@ -859,8 +954,6 @@ Client_CheckID( CLIENT *Client, char *ID )
 GLOBAL CLIENT *
 Client_First( void )
 {
-       /* Ersten Client liefern. */
-
        return My_Clients;
 } /* Client_First */
 
@@ -868,9 +961,6 @@ Client_First( void )
 GLOBAL CLIENT *
 Client_Next( CLIENT *c )
 {
-       /* Naechsten Client liefern. Existiert keiner,
-        * so wird NULL geliefert. */
-
        assert( c != NULL );
        return (CLIENT *)c->next;
 } /* Client_Next */
@@ -911,13 +1001,12 @@ Client_MyServiceCount( void )
 } /* Client_MyServiceCount */
 
 
-GLOBAL long
+GLOBAL unsigned long
 Client_MyServerCount( void )
 {
        CLIENT *c;
-       long cnt;
+       unsigned long cnt = 0;
 
-       cnt = 0;
        c = My_Clients;
        while( c )
        {
@@ -928,13 +1017,12 @@ Client_MyServerCount( void )
 } /* Client_MyServerCount */
 
 
-GLOBAL long
+GLOBAL unsigned long
 Client_OperCount( void )
 {
        CLIENT *c;
-       long cnt;
+       unsigned long cnt = 0;
 
-       cnt = 0;
        c = My_Clients;
        while( c )
        {
@@ -945,19 +1033,19 @@ Client_OperCount( void )
 } /* Client_OperCount */
 
 
-GLOBAL long
+GLOBAL unsigned long
 Client_UnknownCount( void )
 {
        CLIENT *c;
-       long cnt;
+       unsigned long cnt = 0;
 
-       cnt = 0;
        c = My_Clients;
        while( c )
        {
                if( c && ( c->type != CLIENT_USER ) && ( c->type != CLIENT_SERVICE ) && ( c->type != CLIENT_SERVER )) cnt++;
                c = (CLIENT *)c->next;
        }
+
        return cnt;
 } /* Client_UnknownCount */
 
@@ -976,29 +1064,34 @@ Client_MyMaxUserCount( void )
 } /* Client_MyMaxUserCount */
 
 
+/**
+ * Check that a given nickname is valid.
+ *
+ * @param      Nick the nickname to check.
+ * @returns    true if nickname is valid, false otherwise.
+ */
 GLOBAL bool
-Client_IsValidNick( char *Nick )
+Client_IsValidNick(const char *Nick)
 {
-       /* Ist der Nick gueltig? */
+       const char *ptr;
+       static const char goodchars[] = ";0123456789-";
 
-       char *ptr, goodchars[20];
-       
-       assert( Nick != NULL );
-
-       strcpy( goodchars, ";0123456789-" );
+       assert (Nick != NULL);
 
-       if( Nick[0] == '#' ) return false;
-       if( strchr( goodchars, Nick[0] )) return false;
-       if( strlen( Nick ) >= CLIENT_NICK_LEN ) return false;
+       if (strchr(goodchars, Nick[0]))
+               return false;
+       if (strlen(Nick ) >= Conf_MaxNickLength)
+               return false;
 
        ptr = Nick;
-       while( *ptr )
-       {
-               if(( *ptr < 'A' ) && ( ! strchr( goodchars, *ptr ))) return false;
-               if(( *ptr > '}' ) && ( ! strchr( goodchars, *ptr ))) return false;
+       while (*ptr) {
+               if (*ptr < 'A' && !strchr(goodchars, *ptr ))
+                       return false;
+               if (*ptr > '}')
+                       return false;
                ptr++;
        }
-       
+
        return true;
 } /* Client_IsValidNick */
 
@@ -1035,13 +1128,85 @@ Client_StartTime(CLIENT *Client)
 } /* Client_Uptime */
 
 
-static long
+/**
+ * Reject a client when logging in.
+ *
+ * This function is called when a client isn't allowed to connect to this
+ * server. Possible reasons are bad server password, bad PAM password,
+ * or that the client is G/K-Line'd.
+ *
+ * After calling this function, the client isn't connected any more.
+ *
+ * @param Client The client to reject.
+ * @param Reason The reason why the client has been rejected.
+ * @param InformClient If true, send the exact reason to the client.
+ */
+GLOBAL void
+Client_Reject(CLIENT *Client, const char *Reason, bool InformClient)
+{
+       char info[COMMAND_LEN];
+
+       assert(Client != NULL);
+       assert(Reason != NULL);
+
+       if (InformClient)
+               snprintf(info, sizeof(info), "Access denied: %s", Reason);
+       else
+               strcpy(info, "Access denied: Bad password?");
+
+       Log(LOG_ERR,
+           "User \"%s\" rejected (connection %d): %s!",
+           Client_Mask(Client), Client_Conn(Client), Reason);
+       Conn_Close(Client_Conn(Client), Reason, info, true);
+}
+
+
+/**
+ * Introduce a new user or service client in the network.
+ *
+ * @param From Remote server introducing the client or NULL (local).
+ * @param Client New client.
+ * @param Type Type of the client (CLIENT_USER or CLIENT_SERVICE).
+ */
+GLOBAL void
+Client_Introduce(CLIENT *From, CLIENT *Client, int Type)
+{
+       /* Set client type (user or service) */
+       Client_SetType(Client, Type);
+
+       if (From) {
+               if (Conf_NickIsService(Conf_GetServer(Client_Conn(From)),
+                                  Client_ID(Client)))
+                       Client_SetType(Client, CLIENT_SERVICE);
+               LogDebug("%s \"%s\" (+%s) registered (via %s, on %s, %d hop%s).",
+                        Client_TypeText(Client), Client_Mask(Client),
+                        Client_Modes(Client), Client_ID(From),
+                        Client_ID(Client_Introducer(Client)),
+                        Client_Hops(Client), Client_Hops(Client) > 1 ? "s": "");
+       } else {
+               Log(LOG_NOTICE, "%s \"%s\" registered (connection %d).",
+                   Client_TypeText(Client), Client_Mask(Client),
+                   Client_Conn(Client));
+               Log_ServerNotice('c', "Client connecting: %s (%s@%s) [%s] - %s",
+                                Client_ID(Client), Client_User(Client),
+                                Client_Hostname(Client),
+                                Conn_IPA(Client_Conn(Client)),
+                                Client_TypeText(Client));
+       }
+
+       /* Inform other servers */
+       IRC_WriteStrServersPrefixFlag_CB(From,
+                               From != NULL ? From : Client_ThisServer(),
+                               '\0', cb_introduceClient, (void *)Client);
+} /* Client_Introduce */
+
+
+static unsigned long
 Count( CLIENT_TYPE Type )
 {
        CLIENT *c;
-       long cnt;
+       unsigned long cnt = 0;
 
-       cnt = 0;
        c = My_Clients;
        while( c )
        {
@@ -1052,13 +1217,12 @@ Count( CLIENT_TYPE Type )
 } /* Count */
 
 
-static long
+static unsigned long
 MyCount( CLIENT_TYPE Type )
 {
        CLIENT *c;
-       long cnt;
+       unsigned long cnt = 0;
 
-       cnt = 0;
        c = My_Clients;
        while( c )
        {
@@ -1073,9 +1237,9 @@ static CLIENT *
 New_Client_Struct( void )
 {
        /* Neue CLIENT-Struktur pre-initialisieren */
-       
+
        CLIENT *c;
-       
+
        c = (CLIENT *)malloc( sizeof( CLIENT ));
        if( ! c )
        {
@@ -1116,7 +1280,7 @@ Generate_MyToken( CLIENT *Client )
                else c = (CLIENT *)c->next;
        }
        Client->mytoken = token;
-       Log( LOG_DEBUG, "Assigned token %d to server \"%s\".", token, Client->id );
+       LogDebug("Assigned token %d to server \"%s\".", token, Client->id);
 } /* Generate_MyToken */
 
 
@@ -1128,7 +1292,7 @@ Adjust_Counters( CLIENT *Client )
        assert( Client != NULL );
 
        if( Client->type != CLIENT_USER ) return;
-       
+
        if( Client->conn_id != NONE )
        {
                /* Local connection */
@@ -1150,11 +1314,17 @@ GLOBAL void
 Client_RegisterWhowas( CLIENT *Client )
 {
        int slot;
-       
+       time_t now;
+
        assert( Client != NULL );
 
+       /* Don't register WHOWAS information when "MorePrivacy" is enabled. */
+       if (Conf_MorePrivacy)
+               return;
+
+       now = time(NULL);
        /* Don't register clients that were connected less than 30 seconds. */
-       if( time(NULL) - Client->starttime < 30 )
+       if( now - Client->starttime < 30 )
                return;
 
        slot = Last_Whowas + 1;
@@ -1163,21 +1333,166 @@ Client_RegisterWhowas( CLIENT *Client )
 #ifdef DEBUG
        Log( LOG_DEBUG, "Saving WHOWAS information to slot %d ...", slot );
 #endif
-       
-       My_Whowas[slot].time = time( NULL );
+
+       My_Whowas[slot].time = now;
        strlcpy( My_Whowas[slot].id, Client_ID( Client ),
                 sizeof( My_Whowas[slot].id ));
        strlcpy( My_Whowas[slot].user, Client_User( Client ),
                 sizeof( My_Whowas[slot].user ));
-       strlcpy( My_Whowas[slot].host, Client_Hostname( Client ),
+       strlcpy( My_Whowas[slot].host, Client_HostnameCloaked( Client ),
                 sizeof( My_Whowas[slot].host ));
        strlcpy( My_Whowas[slot].info, Client_Info( Client ),
                 sizeof( My_Whowas[slot].info ));
        strlcpy( My_Whowas[slot].server, Client_ID( Client_Introducer( Client )),
                 sizeof( My_Whowas[slot].server ));
-       
+
        Last_Whowas = slot;
 } /* Client_RegisterWhowas */
 
 
+GLOBAL const char *
+Client_TypeText(CLIENT *Client)
+{
+       assert(Client != NULL);
+       switch (Client_Type(Client)) {
+               case CLIENT_USER:
+                       return "User";
+                       break;
+               case CLIENT_SERVICE:
+                       return "Service";
+                       break;
+               case CLIENT_SERVER:
+                       return "Server";
+                       break;
+               default:
+                       return "Client";
+       }
+} /* Client_TypeText */
+
+
+/**
+ * Destroy user or service client.
+ */
+static void
+Destroy_UserOrService(CLIENT *Client, const char *Txt, const char *FwdMsg, bool SendQuit)
+{
+       if(Client->conn_id != NONE) {
+               /* Local (directly connected) client */
+               Log(LOG_NOTICE,
+                   "%s \"%s\" unregistered (connection %d): %s",
+                   Client_TypeText(Client), Client_Mask(Client),
+                   Client->conn_id, Txt);
+               Log_ServerNotice('c', "Client exiting: %s (%s@%s) [%s]",
+                                Client_ID(Client), Client_User(Client),
+                                Client_Hostname(Client), Txt);
+
+               if (SendQuit) {
+                       /* Inforam all the other servers */
+                       if (FwdMsg)
+                               IRC_WriteStrServersPrefix(NULL,
+                                               Client, "QUIT :%s", FwdMsg );
+                       else
+                               IRC_WriteStrServersPrefix(NULL,
+                                               Client, "QUIT :");
+               }
+       } else {
+               /* Remote client */
+               LogDebug("%s \"%s\" unregistered: %s",
+                        Client_TypeText(Client), Client_Mask(Client), Txt);
+
+               if(SendQuit) {
+                       /* Inform all the other servers, but the ones in the
+                        * direction we got the QUIT from */
+                       if(FwdMsg)
+                               IRC_WriteStrServersPrefix(Client_NextHop(Client),
+                                               Client, "QUIT :%s", FwdMsg );
+                       else
+                               IRC_WriteStrServersPrefix(Client_NextHop(Client),
+                                               Client, "QUIT :" );
+               }
+       }
+
+       /* Unregister client from channels */
+       Channel_Quit(Client, FwdMsg ? FwdMsg : Client->id);
+
+       /* Register client in My_Whowas structure */
+       Client_RegisterWhowas(Client);
+} /* Destroy_UserOrService */
+
+
+/**
+ * Introduce a new user or service client to a remote server.
+ *
+ * This function differentiates between RFC1459 and RFC2813 server links and
+ * generates the appropriate commands to register the new user or service.
+ *
+ * @param To           The remote server to inform.
+ * @param Prefix       Prefix for the generated commands.
+ * @param data         CLIENT structure of the new client.
+ */
+static void
+cb_introduceClient(CLIENT *To, CLIENT *Prefix, void *data)
+{
+       CLIENT *c = (CLIENT *)data;
+       CONN_ID conn;
+       char *modes, *user, *host;
+
+       modes = Client_Modes(c);
+       user = Client_User(c) ? Client_User(c) : "-";
+       host = Client_Hostname(c) ? Client_Hostname(c) : "-";
+
+       conn = Client_Conn(To);
+       if (Conn_Options(conn) & CONN_RFC1459) {
+               /* RFC 1459 mode: separate NICK and USER commands */
+               Conn_WriteStr(conn, "NICK %s :%d", Client_ID(c),
+                             Client_Hops(c) + 1);
+               Conn_WriteStr(conn, ":%s USER %s %s %s :%s",
+                             Client_ID(c), user, host,
+                             Client_ID(Client_Introducer(c)), Client_Info(c));
+               if (modes[0])
+                       Conn_WriteStr(conn, ":%s MODE %s +%s",
+                                     Client_ID(c), Client_ID(c), modes);
+       } else {
+               /* RFC 2813 mode: one combined NICK or SERVICE command */
+               if (Client_Type(c) == CLIENT_SERVICE
+                   && strchr(Client_Flags(To), 'S'))
+                       IRC_WriteStrClientPrefix(To, Prefix,
+                                                "SERVICE %s %d * +%s %d :%s",
+                                                Client_Mask(c),
+                                                Client_MyToken(Client_Introducer(c)),
+                                                Client_Modes(c), Client_Hops(c) + 1,
+                                                Client_Info(c));
+               else
+                       IRC_WriteStrClientPrefix(To, Prefix,
+                                                "NICK %s %d %s %s %d +%s :%s",
+                                                Client_ID(c), Client_Hops(c) + 1,
+                                                user, host,
+                                                Client_MyToken(Client_Introducer(c)),
+                                                modes, Client_Info(c));
+       }
+} /* cb_introduceClient */
+
+
+#ifdef DEBUG
+
+GLOBAL void
+Client_DebugDump(void)
+{
+       CLIENT *c;
+
+       Log(LOG_DEBUG, "Client status:");
+       c = My_Clients;
+       while (c) {
+               Log(LOG_DEBUG,
+                   " - %s: type=%d, host=%s, user=%s, conn=%d, start=%ld, flags=%s",
+                   Client_ID(c), Client_Type(c), Client_Hostname(c),
+                   Client_User(c), Client_Conn(c), Client_StartTime(c),
+                   Client_Flags(c));
+               c = (CLIENT *)c->next;
+       }
+} /* Client_DumpClients */
+
+#endif
+
+
 /* -eof- */