X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=citadel%2Fuser_ops.c;h=397907524e91c04d91a5f8dd4930be81cc4307d7;hb=e329db30593524cc2d8851a4500bac41f2340354;hp=92cf99e24c8164c65cf316ac6ac59f60afbaa68e;hpb=b11aa21e7968de3591f30d7af1ba561fab7bc53f;p=citadel.git

diff --git a/citadel/user_ops.c b/citadel/user_ops.c
index 92cf99e24..397907524 100644
--- a/citadel/user_ops.c
+++ b/citadel/user_ops.c
@@ -1,7 +1,7 @@
 /* 
  * Server functions which perform operations on user objects.
  *
- * Copyright (c) 1987-2011 by the citadel.org team
+ * Copyright (c) 1987-2018 by the citadel.org team
  *
  * This program is open source software; you can redistribute it and/or
  * modify it under the terms of the GNU General Public License, version 3.
@@ -12,13 +12,16 @@
  * GNU General Public License for more details.
  */
 
+#include <stdlib.h>
+#include <unistd.h>
 #include "sysdep.h"
 #include <stdio.h>
+#include <sys/stat.h>
 #include <libcitadel.h>
-
 #include "control.h"
 #include "support.h"
 #include "citserver.h"
+#include "config.h"
 #include "citadel_ldap.h"
 #include "ctdl_module.h"
 #include "user_ops.h"
@@ -30,14 +33,14 @@ int chkpwd_read_pipe[2];
 
 
 /*
- * CtdlGetUser()  -  retrieve named user into supplied buffer.
- *	       returns 0 on success
+ * CtdlGetUser()	retrieve named user into supplied buffer.
+ *			returns 0 on success
  */
-int CtdlGetUserLen(struct ctdluser *usbuf, const char *name, long len)
+int CtdlGetUser(struct ctdluser *usbuf, char *name)
 {
-
 	char usernamekey[USERNAME_SIZE];
 	struct cdbdata *cdbus;
+	long len = cutuserkey(name);
 
 	if (usbuf != NULL) {
 		memset(usbuf, 0, sizeof(struct ctdluser));
@@ -50,28 +53,20 @@ int CtdlGetUserLen(struct ctdluser *usbuf, const char *name, long len)
 		return(1);
 	}
 	if (usbuf != NULL) {
-		memcpy(usbuf, cdbus->ptr,
-			((cdbus->len > sizeof(struct ctdluser)) ?
-			 sizeof(struct ctdluser) : cdbus->len));
+		memcpy(usbuf, cdbus->ptr, ((cdbus->len > sizeof(struct ctdluser)) ?  sizeof(struct ctdluser) : cdbus->len));
 	}
 	cdb_free(cdbus);
-
-	return (0);
+	return(0);
 }
 
 
-int CtdlGetUser(struct ctdluser *usbuf, char *name)
-{
-	return CtdlGetUserLen(usbuf, name, cutuserkey(name));
-}
-
 int CtdlLockGetCurrentUser(void)
 {
 	CitContext *CCC = CC;
-
-	return CtdlGetUserLen(&CCC->user, CCC->curr_user, cutuserkey(CCC->curr_user));
+	return CtdlGetUser(&CCC->user, CCC->curr_user);
 }
 
+
 /*
  * CtdlGetUserLock()  -  same as getuser() but locks the record
  */
@@ -83,7 +78,7 @@ int CtdlGetUserLock(struct ctdluser *usbuf, char *name)
 	if (retcode == 0) {
 		begin_critical_section(S_USERS);
 	}
-	return (retcode);
+	return(retcode);
 }
 
 
@@ -94,17 +89,12 @@ void CtdlPutUser(struct ctdluser *usbuf)
 {
 	char usernamekey[USERNAME_SIZE];
 
-	makeuserkey(usernamekey, 
-		    usbuf->fullname, 
-		    cutuserkey(usbuf->fullname));
-
+	makeuserkey(usernamekey, usbuf->fullname, cutuserkey(usbuf->fullname));
 	usbuf->version = REV_LEVEL;
-	cdb_store(CDB_USERS,
-		  usernamekey, strlen(usernamekey),
-		  usbuf, sizeof(struct ctdluser));
-
+	cdb_store(CDB_USERS, usernamekey, strlen(usernamekey), usbuf, sizeof(struct ctdluser));
 }
 
+
 void CtdlPutCurrentUserLock()
 {
 	CtdlPutUser(&CC->user);
@@ -121,7 +111,6 @@ void CtdlPutUserLock(struct ctdluser *usbuf)
 }
 
 
-
 /*
  * rename_user()  -  this is tricky because the user's display name is the database key
  *
@@ -160,16 +149,14 @@ int rename_user(char *oldname, char *newname) {
 		else {		/* Sanity checks succeeded.  Now rename the user. */
 			if (usbuf.usernum == 0)
 			{
-				CONM_syslog(LOG_DEBUG, "Can not rename user \"Citadel\".\n");
+				syslog(LOG_DEBUG, "user_ops: can not rename user \"Citadel\".");
 				retcode = RENAMEUSER_NOT_FOUND;
 			} else {
-				CON_syslog(LOG_DEBUG, "Renaming <%s> to <%s>\n", oldname, newname);
+				syslog(LOG_DEBUG, "user_ops: renaming <%s> to <%s>", oldname, newname);
 				cdb_delete(CDB_USERS, oldnamekey, strlen(oldnamekey));
 				safestrncpy(usbuf.fullname, newname, sizeof usbuf.fullname);
 				CtdlPutUser(&usbuf);
-				cdb_store(CDB_USERSBYNUMBER, &usbuf.usernum, sizeof(long),
-					usbuf.fullname, strlen(usbuf.fullname)+1 );
-
+				cdb_store(CDB_USERSBYNUMBER, &usbuf.usernum, sizeof(long), usbuf.fullname, strlen(usbuf.fullname)+1 );
 				retcode = RENAMEUSER_OK;
 			}
 		}
@@ -181,7 +168,6 @@ int rename_user(char *oldname, char *newname) {
 }
 
 
-
 /*
  * Index-generating function used by Ctdl[Get|Set]Relationship
  */
@@ -202,11 +188,10 @@ int GenerateRelationshipIndex(char *IndexBuf,
 	TheIndex.iUserID = UserID;
 
 	memcpy(IndexBuf, &TheIndex, sizeof(TheIndex));
-	return (sizeof(TheIndex));
+	return(sizeof(TheIndex));
 }
 
 
-
 /*
  * Back end for CtdlSetRelationship()
  */
@@ -217,10 +202,7 @@ void put_visit(visit *newvisit)
 
 	memset (IndexBuf, 0, sizeof (IndexBuf));
 	/* Generate an index */
-	IndexLen = GenerateRelationshipIndex(IndexBuf,
-					     newvisit->v_roomnum,
-					     newvisit->v_roomgen,
-					     newvisit->v_usernum);
+	IndexLen = GenerateRelationshipIndex(IndexBuf, newvisit->v_roomnum, newvisit->v_roomgen, newvisit->v_usernum);
 
 	/* Store the record */
 	cdb_store(CDB_VISIT, IndexBuf, IndexLen,
@@ -229,8 +211,6 @@ void put_visit(visit *newvisit)
 }
 
 
-
-
 /*
  * Define a relationship between a user and a room
  */
@@ -238,8 +218,6 @@ void CtdlSetRelationship(visit *newvisit,
 			 struct ctdluser *rel_user,
 			 struct ctdlroom *rel_room)
 {
-
-
 	/* We don't use these in Citadel because they're implicit by the
 	 * index, but they must be present if the database is exported.
 	 */
@@ -250,6 +228,7 @@ void CtdlSetRelationship(visit *newvisit,
 	put_visit(newvisit);
 }
 
+
 /*
  * Locate a relationship between a user and a room
  */
@@ -257,25 +236,19 @@ void CtdlGetRelationship(visit *vbuf,
 			 struct ctdluser *rel_user,
 			 struct ctdlroom *rel_room)
 {
-
 	char IndexBuf[32];
 	int IndexLen;
 	struct cdbdata *cdbvisit;
 
 	/* Generate an index */
-	IndexLen = GenerateRelationshipIndex(IndexBuf,
-					     rel_room->QRnumber,
-					     rel_room->QRgen,
-					     rel_user->usernum);
+	IndexLen = GenerateRelationshipIndex(IndexBuf, rel_room->QRnumber, rel_room->QRgen, rel_user->usernum);
 
 	/* Clear out the buffer */
 	memset(vbuf, 0, sizeof(visit));
 
 	cdbvisit = cdb_fetch(CDB_VISIT, IndexBuf, IndexLen);
 	if (cdbvisit != NULL) {
-		memcpy(vbuf, cdbvisit->ptr,
-		       ((cdbvisit->len > sizeof(visit)) ?
-			sizeof(visit) : cdbvisit->len));
+		memcpy(vbuf, cdbvisit->ptr, ((cdbvisit->len > sizeof(visit)) ?  sizeof(visit) : cdbvisit->len));
 		cdb_free(cdbvisit);
 	}
 	else {
@@ -314,7 +287,7 @@ int CtdlCheckInternetMailPermission(struct ctdluser *who) {
 	if (who->axlevel <= AxProbU) return(0);
 
 	/* Globally enabled? */
-	if (config.c_restrict == 0) return(1);
+	if (CtdlGetConfigInt("c_restrict") == 0) return(1);
 
 	/* User flagged ok? */
 	if (who->flags & US_INTERNET) return(2);
@@ -326,6 +299,7 @@ int CtdlCheckInternetMailPermission(struct ctdluser *who) {
 	return(0);
 }
 
+
 /*
  * Convenience function.
  */
@@ -333,12 +307,11 @@ int CtdlAccessCheck(int required_level)
 {
 	if (CC->internal_pgm) return(0);
 	if (required_level >= ac_internal) {
-		cprintf("%d This is not a user-level command.\n",
-			ERROR + HIGHER_ACCESS_REQUIRED);
+		cprintf("%d This is not a user-level command.\n", ERROR + HIGHER_ACCESS_REQUIRED);
 		return(-1);
 	}
 
-	if ((required_level >= ac_logged_in_or_guest) && (CC->logged_in == 0) && (!config.c_guest_logins)) {
+	if ((required_level >= ac_logged_in_or_guest) && (CC->logged_in == 0) && (CtdlGetConfigInt("c_guest_logins") == 0)) {
 		cprintf("%d Not logged in.\n", ERROR + NOT_LOGGED_IN);
 		return(-1);
 	}
@@ -367,16 +340,15 @@ int CtdlAccessCheck(int required_level)
 }
 
 
-
 /*
  * Is the user currently logged in an Admin?
  */
 int is_aide(void)
 {
 	if (CC->user.axlevel >= AxAideU)
-		return (1);
+		return(1);
 	else
-		return (0);
+		return(0);
 }
 
 
@@ -387,17 +359,17 @@ int is_room_aide(void)
 {
 
 	if (!CC->logged_in) {
-		return (0);
+		return(0);
 	}
 
-	if ((CC->user.axlevel >= AxAideU)
-	    || (CC->room.QRroomaide == CC->user.usernum)) {
-		return (1);
+	if ((CC->user.axlevel >= AxAideU) || (CC->room.QRroomaide == CC->user.usernum)) {
+		return(1);
 	} else {
-		return (0);
+		return(0);
 	}
 }
 
+
 /*
  * CtdlGetUserByNumber() -	get user by number
  * 			returns 0 if user was found
@@ -411,16 +383,17 @@ int CtdlGetUserByNumber(struct ctdluser *usbuf, long number)
 
 	cdbun = cdb_fetch(CDB_USERSBYNUMBER, &number, sizeof(long));
 	if (cdbun == NULL) {
-		CON_syslog(LOG_INFO, "User %ld not found\n", number);
+		syslog(LOG_INFO, "user_ops: %ld not found", number);
 		return(-1);
 	}
 
-	CON_syslog(LOG_INFO, "User %ld maps to %s\n", number, cdbun->ptr);
+	syslog(LOG_INFO, "user_ops: %ld maps to %s", number, cdbun->ptr);
 	r = CtdlGetUser(usbuf, cdbun->ptr);
 	cdb_free(cdbun);
 	return(r);
 }
 
+
 /*
  * Helper function for rebuild_usersbynumber()
  */
@@ -451,10 +424,8 @@ void rebuild_ubn_for_user(struct ctdluser *usbuf, void *data) {
 	}
 
 	while (u != NULL) {
-		CON_syslog(LOG_DEBUG, "Rebuilding usersbynumber index %10ld : %s\n",
-			u->usernum, u->username);
+		syslog(LOG_DEBUG, "user_ops: rebuilding usersbynumber index %10ld : %s", u->usernum, u->username);
 		cdb_store(CDB_USERSBYNUMBER, &u->usernum, sizeof(long), u->username, strlen(u->username)+1);
-
 		ptr = u;
 		u = u->next;
 		free(ptr);
@@ -462,7 +433,6 @@ void rebuild_ubn_for_user(struct ctdluser *usbuf, void *data) {
 }
 
 
-
 /*
  * Rebuild the users-by-number index
  */
@@ -473,46 +443,45 @@ void rebuild_usersbynumber(void) {
 }
 
 
-
 /*
- * getuserbyuid()  -     get user by system uid (for PAM mode authentication)
- *		       returns 0 if user was found
- *
- * WARNING: don't use this function unless you absolutely have to.  It does
- *	  a sequential search and therefore is computationally expensive.
+ * getuserbyuid()	Get user by system uid (for PAM mode authentication)
+ *			Returns 0 if user was found
+ *			This now uses an extauth index.
  */
 int getuserbyuid(struct ctdluser *usbuf, uid_t number)
 {
-	struct cdbdata *cdbus;
+	struct cdbdata *cdbextauth;
+	long usernum = 0;
+	StrBuf *claimed_id;
+
+	claimed_id = NewStrBuf();
+	StrBufPrintf(claimed_id, "uid:%d", number);
+	cdbextauth = cdb_fetch(CDB_EXTAUTH, ChrPtr(claimed_id), StrLength(claimed_id));
+	FreeStrBuf(&claimed_id);
+	if (cdbextauth == NULL) {
+		return(-1);
+	}
 
-	cdb_rewind(CDB_USERS);
+	memcpy(&usernum, cdbextauth->ptr, sizeof(long));
+	cdb_free(cdbextauth);
 
-	while (cdbus = cdb_next_item(CDB_USERS), cdbus != NULL) {
-		memset(usbuf, 0, sizeof(struct ctdluser));
-		memcpy(usbuf, cdbus->ptr,
-		       ((cdbus->len > sizeof(struct ctdluser)) ?
-			sizeof(struct ctdluser) : cdbus->len));
-		cdb_free(cdbus);
-		if (usbuf->uid == number) {
-			cdb_close_cursor(CDB_USERS);
-			return (0);
-		}
+	if (!CtdlGetUserByNumber(usbuf, usernum)) {
+		return(0);
 	}
-	return (-1);
+
+	return(-1);
 }
 
+
 /*
  * Back end for cmd_user() and its ilk
- *
- * NOTE: "authname" should only be used if we are attempting to use the "master user" feature
  */
-int CtdlLoginExistingUser(char *authname, const char *trythisname)
+int CtdlLoginExistingUser(const char *trythisname)
 {
 	char username[SIZ];
 	int found_user;
-	long len;
 
-	CON_syslog(LOG_DEBUG, "CtdlLoginExistingUser(%s, %s)\n", authname, trythisname);
+	syslog(LOG_DEBUG, "user_ops: CtdlLoginExistingUser(%s)", trythisname);
 
 	if ((CC->logged_in)) {
 		return login_already_logged_in;
@@ -522,30 +491,19 @@ int CtdlLoginExistingUser(char *authname, const char *trythisname)
 	
 	if (!strncasecmp(trythisname, "SYS_", 4))
 	{
-		CON_syslog(LOG_DEBUG, "System user \"%s\" is not allowed to log in.\n", trythisname);
+		syslog(LOG_DEBUG, "user_ops: system user \"%s\" is not allowed to log in.", trythisname);
 		return login_not_found;
 	}
 
-	/* If a "master user" is defined, handle its authentication if specified */
-	CC->is_master = 0;
-	if ((configlen.c_master_user > 0) && 
-	    (configlen.c_master_pass > 0) &&
-	    (authname != NULL) &&
-	    (!strcasecmp(authname, config.c_master_user)))
-	{
-		CC->is_master = 1;
-	}
-
 	/* Continue attempting user validation... */
 	safestrncpy(username, trythisname, sizeof (username));
 	striplt(username);
-	len = cutuserkey(username);
 
 	if (IsEmptyStr(username)) {
 		return login_not_found;
 	}
 
-	if (config.c_auth_mode == AUTHMODE_HOST) {
+	if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_HOST) {
 
 		/* host auth mode */
 
@@ -553,40 +511,36 @@ int CtdlLoginExistingUser(char *authname, const char *trythisname)
 		struct passwd *tempPwdPtr;
 		char pwdbuffer[256];
 	
-		CON_syslog(LOG_DEBUG, "asking host about <%s>\n", username);
+		syslog(LOG_DEBUG, "user_ops: asking host about <%s>", username);
 #ifdef HAVE_GETPWNAM_R
 #ifdef SOLARIS_GETPWUID
-		CON_syslog(LOG_DEBUG, "Calling getpwnam_r()\n");
+		syslog(LOG_DEBUG, "user_ops: calling getpwnam_r()");
 		tempPwdPtr = getpwnam_r(username, &pd, pwdbuffer, sizeof pwdbuffer);
 #else // SOLARIS_GETPWUID
-		CONM_syslog(LOG_DEBUG, "Calling getpwnam_r()\n");
+		syslog(LOG_DEBUG, "user_ops: calling getpwnam_r()");
 		getpwnam_r(username, &pd, pwdbuffer, sizeof pwdbuffer, &tempPwdPtr);
 #endif // SOLARIS_GETPWUID
 #else // HAVE_GETPWNAM_R
-		CON_syslog(LOG_DEBUG, "SHOULD NEVER GET HERE!!!\n");
+		syslog(LOG_DEBUG, "user_ops: SHOULD NEVER GET HERE!!!");
 		tempPwdPtr = NULL;
 #endif // HAVE_GETPWNAM_R
 		if (tempPwdPtr == NULL) {
-			CON_syslog(LOG_DEBUG, "no such user <%s>\n", username);
+			syslog(LOG_DEBUG, "user_ops: no such user <%s>", username);
 			return login_not_found;
 		}
 	
-		/* Locate the associated Citadel account.
-		 * If not found, make one attempt to create it.
-		 */
+		/* Locate the associated Citadel account.  If not found, make one attempt to create it. */
 		found_user = getuserbyuid(&CC->user, pd.pw_uid);
-		CON_syslog(LOG_DEBUG, "found it: uid=%ld, gecos=%s here: %d\n",
-			(long)pd.pw_uid, pd.pw_gecos, found_user);
 		if (found_user != 0) {
-			len = cutuserkey(username);
-			create_user(username, len, 0);
+			create_user(username, CREATE_USER_DO_NOT_BECOME_USER, pd.pw_uid);
 			found_user = getuserbyuid(&CC->user, pd.pw_uid);
 		}
+		syslog(LOG_DEBUG, "user_ops: found it: uid=%ld, gecos=%s here: %d", (long)pd.pw_uid, pd.pw_gecos, found_user);
 
 	}
 
 #ifdef HAVE_LDAP
-	else if ((config.c_auth_mode == AUTHMODE_LDAP) || (config.c_auth_mode == AUTHMODE_LDAP_AD)) {
+	else if ((CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP) || (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD)) {
 	
 		/* LDAP auth mode */
 
@@ -601,7 +555,7 @@ int CtdlLoginExistingUser(char *authname, const char *trythisname)
 
 		found_user = getuserbyuid(&CC->user, ldap_uid);
 		if (found_user != 0) {
-			create_user(username, len, 0);
+			create_user(ldap_cn, CREATE_USER_DO_NOT_BECOME_USER, ldap_uid);
 			found_user = getuserbyuid(&CC->user, ldap_uid);
 		}
 
@@ -621,9 +575,7 @@ int CtdlLoginExistingUser(char *authname, const char *trythisname)
 		/* First, try to log in as if the supplied name is a display name */
 		found_user = CtdlGetUser(&CC->user, username);
 	
-		/* If that didn't work, try to log in as if the supplied name
-	 	* is an e-mail address
-	 	*/
+		/* If that didn't work, try to log in as if the supplied name * is an e-mail address */
 		if (found_user != 0) {
 			valid = validate_recipients(username, NULL, 0);
 			if (valid != NULL) {
@@ -640,8 +592,7 @@ int CtdlLoginExistingUser(char *authname, const char *trythisname)
 		if (((CC->nologin)) && (CC->user.axlevel < AxAideU)) {
 			return login_too_many_users;
 		} else {
-			safestrncpy(CC->curr_user, CC->user.fullname,
-					sizeof CC->curr_user);
+			safestrncpy(CC->curr_user, CC->user.fullname, sizeof CC->curr_user);
 			return login_ok;
 		}
 	}
@@ -649,50 +600,63 @@ int CtdlLoginExistingUser(char *authname, const char *trythisname)
 }
 
 
-
-
-
 /*
  * session startup code which is common to both cmd_pass() and cmd_newu()
  */
 void do_login(void)
 {
-	struct CitContext *CCC = CC;
-
-	CCC->logged_in = 1;
-	CON_syslog(LOG_NOTICE, "<%s> logged in\n", CCC->curr_user);
+	CC->logged_in = 1;
+	syslog(LOG_NOTICE, "user_ops: <%s> logged in", CC->curr_user);
 
-	CtdlGetUserLock(&CCC->user, CCC->curr_user);
-	++(CCC->user.timescalled);
-	CCC->previous_login = CCC->user.lastcall;
-	time(&CCC->user.lastcall);
+	CtdlGetUserLock(&CC->user, CC->curr_user);
+	++(CC->user.timescalled);
+	CC->previous_login = CC->user.lastcall;
+	time(&CC->user.lastcall);
 
 	/* If this user's name is the name of the system administrator
 	 * (as specified in setup), automatically assign access level 6.
 	 */
-	if (!strcasecmp(CCC->user.fullname, config.c_sysadm)) {
-		CCC->user.axlevel = AxAideU;
+	if ( (!IsEmptyStr(CtdlGetConfigStr("c_sysadm"))) && (!strcasecmp(CC->user.fullname, CtdlGetConfigStr("c_sysadm"))) ) {
+		CC->user.axlevel = AxAideU;
 	}
 
-	/* If we're authenticating off the host system, automatically give
-	 * root the highest level of access.
-	 */
-	if (config.c_auth_mode == AUTHMODE_HOST) {
-		if (CCC->user.uid == 0) {
-			CCC->user.axlevel = AxAideU;
+	/* If we're authenticating off the host system, automatically give root the highest level of access. */
+	if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_HOST) {
+		if (CC->user.uid == 0) {
+			CC->user.axlevel = AxAideU;
+		}
+	}
+	CtdlPutUserLock(&CC->user);
+
+	/* If we are using LDAP authentication, extract the user's email addresses from the directory. */
+#ifdef HAVE_LDAP
+	if ((CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP) || (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD)) {
+		char new_emailaddrs[512];
+		if (CtdlGetConfigInt("c_ldap_sync_email_addrs") > 0) {
+			if (extract_email_addresses_from_ldap(CC->ldap_dn, new_emailaddrs) == 0) {
+				CtdlSetEmailAddressesForUser(CC->user.fullname, new_emailaddrs);
+			}
 		}
 	}
+#endif
 
-	CtdlPutUserLock(&CCC->user);
+	/* If the user does not have any email addresses assigned, generate one. */
+	if (IsEmptyStr(CC->user.emailaddrs)) {
+		AutoGenerateEmailAddressForUser(&CC->user);
+	}
 
 	/*
-	 * Populate CCC->cs_inet_email with a default address.  This will be
-	 * overwritten with the user's directory address, if one exists, when
-	 * the vCard module's login hook runs.
+	 * Populate cs_inet_email and cs_inet_other_emails with valid email addresses from the user record
 	 */
-	snprintf(CCC->cs_inet_email, sizeof CCC->cs_inet_email, "%s@%s",
-		CCC->user.fullname, config.c_fqdn);
-	convert_spaces_to_underscores(CCC->cs_inet_email);
+	strcpy(CC->cs_inet_email, CC->user.emailaddrs);
+	char *firstsep = strstr(CC->cs_inet_email, "|");
+	if (firstsep) {
+		strcpy(CC->cs_inet_other_emails, firstsep+1);
+		*firstsep = 0;
+	}
+	else {
+		CC->cs_inet_other_emails[0] = 0;
+	}
 
 	/* Create any personal rooms required by the system.
 	 * (Technically, MAILROOM should be there already, but just in case...)
@@ -706,7 +670,7 @@ void do_login(void)
 	PerformSessionHooks(EVT_LOGIN);
 
 	/* Enter the lobby */
-	CtdlUserGoto(config.c_baseroom, 0, 0, NULL, NULL, NULL, NULL);
+	CtdlUserGoto(CtdlGetConfigStr("c_baseroom"), 0, 0, NULL, NULL, NULL, NULL);
 }
 
 
@@ -716,18 +680,16 @@ void logged_in_response(void)
 		CIT_OK, CC->user.fullname, CC->user.axlevel,
 		CC->user.timescalled, CC->user.posted,
 		CC->user.flags, CC->user.usernum,
-		CC->previous_login);
+		CC->previous_login
+	);
 }
 
 
-
 void CtdlUserLogout(void)
 {
 	CitContext *CCC = MyContext();
 
-	CON_syslog(LOG_DEBUG, "CtdlUserLogout() logging out <%s> from session %d",
-		   CCC->curr_user, CCC->cs_pid
-	);
+	syslog(LOG_DEBUG, "user_ops: CtdlUserLogout() logging out <%s> from session %d", CCC->curr_user, CCC->cs_pid);
 
 	/* Run any hooks registered by modules... */
 	PerformSessionHooks(EVT_LOGOUT);
@@ -743,21 +705,20 @@ void CtdlUserLogout(void)
 	strcpy(CCC->fake_roomname, "");
 	CCC->logged_in = 0;
 
-	/* Check to see if the user was deleted whilst logged in and purge them if necessary */
-	if ((CCC->user.axlevel == AxDeleted) && (CCC->user.usernum))
+	/* Check to see if the user was deleted while logged in and purge them if necessary */
+	if ((CCC->user.axlevel == AxDeleted) && (CCC->user.usernum)) {
 		purge_user(CCC->user.fullname);
+	}
 
 	/* Clear out the user record in memory so we don't behave like a ghost */
 	memset(&CCC->user, 0, sizeof(struct ctdluser));
 	CCC->curr_user[0] = 0;
-	CCC->is_master = 0;
 	CCC->cs_inet_email[0] = 0;
 	CCC->cs_inet_other_emails[0] = 0;
 	CCC->cs_inet_fn[0] = 0;
 	CCC->fake_username[0] = 0;
 	CCC->fake_hostname[0] = 0;
 	CCC->fake_roomname[0] = 0;
-	
 
 	/* Free any output buffers */
 	unbuffer_output();
@@ -773,42 +734,43 @@ static int validpw(uid_t uid, const char *pass)
 	int rv = 0;
 
 	if (IsEmptyStr(pass)) {
-		CON_syslog(LOG_DEBUG, "Refusing to chkpwd for uid=%d with empty password.\n", uid);
+		syslog(LOG_DEBUG, "user_ops: refusing to chkpwd for uid=%d with empty password", uid);
 		return 0;
 	}
 
-	CON_syslog(LOG_DEBUG, "Validating password for uid=%d using chkpwd...\n", uid);
+	syslog(LOG_DEBUG, "user_ops: validating password for uid=%d using chkpwd...", uid);
 
 	begin_critical_section(S_CHKPWD);
 	rv = write(chkpwd_write_pipe[1], &uid, sizeof(uid_t));
 	if (rv == -1) {
-		CON_syslog(LOG_EMERG, "Communicatino with chkpwd broken: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: communication with chkpwd broken: %m");
 		end_critical_section(S_CHKPWD);
 		return 0;
 	}
 	rv = write(chkpwd_write_pipe[1], pass, 256);
 	if (rv == -1) {
-		CON_syslog(LOG_EMERG, "Communicatino with chkpwd broken: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: communication with chkpwd broken: %m");
 		end_critical_section(S_CHKPWD);
 		return 0;
 	}
 	rv = read(chkpwd_read_pipe[0], buf, 4);
 	if (rv == -1) {
-		CON_syslog(LOG_EMERG, "Communicatino with chkpwd broken: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: ommunication with chkpwd broken: %m");
 		end_critical_section(S_CHKPWD);
 		return 0;
 	}
 	end_critical_section(S_CHKPWD);
 
 	if (!strncmp(buf, "PASS", 4)) {
-		CONM_syslog(LOG_DEBUG, "...pass\n");
+		syslog(LOG_DEBUG, "user_ops: chkpwd pass");
 		return(1);
 	}
 
-	CONM_syslog(LOG_DEBUG, "...fail\n");
+	syslog(LOG_DEBUG, "user_ops: chkpwd fail");
 	return 0;
 }
 
+
 /* 
  * Start up the chkpwd daemon so validpw() has something to talk to
  */
@@ -817,37 +779,32 @@ void start_chkpwd_daemon(void) {
 	struct stat filestats;
 	int i;
 
-	CONM_syslog(LOG_DEBUG, "Starting chkpwd daemon for host authentication mode\n");
+	syslog(LOG_DEBUG, "user_ops: starting chkpwd daemon for host authentication mode");
 
-	if ((stat(file_chkpwd, &filestats)==-1) ||
-	    (filestats.st_size==0)){
-		printf("didn't find chkpwd daemon in %s: %s\n", file_chkpwd, strerror(errno));
+	if ((stat(file_chkpwd, &filestats)==-1) || (filestats.st_size==0)) {
+		syslog(LOG_ERR, "user_ops: %s: %m", file_chkpwd);
 		abort();
 	}
 	if (pipe(chkpwd_write_pipe) != 0) {
-		CON_syslog(LOG_EMERG, "Unable to create pipe for chkpwd daemon: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: unable to create pipe for chkpwd daemon: %m");
 		abort();
 	}
 	if (pipe(chkpwd_read_pipe) != 0) {
-		CON_syslog(LOG_EMERG, "Unable to create pipe for chkpwd daemon: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: unable to create pipe for chkpwd daemon: %m");
 		abort();
 	}
 
 	chkpwd_pid = fork();
 	if (chkpwd_pid < 0) {
-		CON_syslog(LOG_EMERG, "Unable to fork chkpwd daemon: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: unable to fork chkpwd daemon: %m");
 		abort();
 	}
 	if (chkpwd_pid == 0) {
-		CONM_syslog(LOG_DEBUG, "Now calling dup2() write\n");
 		dup2(chkpwd_write_pipe[0], 0);
-		CONM_syslog(LOG_DEBUG, "Now calling dup2() write\n");
 		dup2(chkpwd_read_pipe[1], 1);
-		CONM_syslog(LOG_DEBUG, "Now closing stuff\n");
 		for (i=2; i<256; ++i) close(i);
-		CON_syslog(LOG_DEBUG, "Now calling execl(%s)\n", file_chkpwd);
 		execl(file_chkpwd, file_chkpwd, NULL);
-		CON_syslog(LOG_EMERG, "Unable to exec chkpwd daemon: %s\n", strerror(errno));
+		syslog(LOG_ERR, "user_ops: unable to exec chkpwd daemon: %m");
 		abort();
 		exit(errno);
 	}
@@ -860,27 +817,23 @@ int CtdlTryPassword(const char *password, long len)
 	CitContext *CCC = CC;
 
 	if ((CCC->logged_in)) {
-		CONM_syslog(LOG_WARNING, "CtdlTryPassword: already logged in\n");
+		syslog(LOG_WARNING, "user_ops: CtdlTryPassword: already logged in");
 		return pass_already_logged_in;
 	}
 	if (!strcmp(CCC->curr_user, NLI)) {
-		CONM_syslog(LOG_WARNING, "CtdlTryPassword: no user selected\n");
+		syslog(LOG_WARNING, "user_ops: CtdlTryPassword: no user selected");
 		return pass_no_user;
 	}
 	if (CtdlGetUser(&CCC->user, CCC->curr_user)) {
-		CONM_syslog(LOG_ERR, "CtdlTryPassword: internal error\n");
+		syslog(LOG_ERR, "user_ops: CtdlTryPassword: internal error");
 		return pass_internal_error;
 	}
 	if (password == NULL) {
-		CONM_syslog(LOG_INFO, "CtdlTryPassword: NULL password string supplied\n");
+		syslog(LOG_INFO, "user_ops: CtdlTryPassword: NULL password string supplied");
 		return pass_wrong_password;
 	}
 
-	if (CCC->is_master) {
-		code = strcmp(password, config.c_master_pass);
-	}
-
-	else if (config.c_auth_mode == AUTHMODE_HOST) {
+	else if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_HOST) {
 
 		/* host auth mode */
 
@@ -902,7 +855,6 @@ int CtdlTryPassword(const char *password, long len)
 			/*
 			 * (sooper-seekrit hack ends here)
 			 */
-
 		}
 		else {
 			code = (-1);
@@ -910,7 +862,7 @@ int CtdlTryPassword(const char *password, long len)
 	}
 
 #ifdef HAVE_LDAP
-	else if ((config.c_auth_mode == AUTHMODE_LDAP) || (config.c_auth_mode == AUTHMODE_LDAP_AD)) {
+	else if ((CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP) || (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD)) {
 
 		/* LDAP auth mode */
 
@@ -944,64 +896,52 @@ int CtdlTryPassword(const char *password, long len)
 	if (!code) {
 		do_login();
 		return pass_ok;
-	} else {
-		CON_syslog(LOG_WARNING, "Bad password specified for <%s> Service <%s> Port <%ld> Remote <%s / %s>\n",
-			   CCC->curr_user,
-			   CCC->ServiceName,
-			   CCC->tcp_port,
-			   CCC->cs_host,
-			   CCC->cs_addr);
-
-
-//citserver[5610]: Bad password specified for <willi> Service <citadel-TCP> Remote <PotzBlitz / >
-
+	}
+	else {
+		syslog(LOG_WARNING, "user_ops: bad password specified for <%s> Service <%s> Port <%ld> Remote <%s / %s>",
+			CCC->curr_user,
+			CCC->ServiceName,
+			CCC->tcp_port,
+			CCC->cs_host,
+			CCC->cs_addr
+		);
 		return pass_wrong_password;
 	}
 }
 
 
-
-
 /*
  * Delete a user record *and* all of its related resources.
  */
 int purge_user(char pname[])
 {
-	char filename[64];
 	struct ctdluser usbuf;
 	char usernamekey[USERNAME_SIZE];
 
 	makeuserkey(usernamekey, pname, cutuserkey(pname));
 
 	/* If the name is empty we can't find them in the DB any way so just return */
-	if (IsEmptyStr(pname))
-		return (ERROR + NO_SUCH_USER);
+	if (IsEmptyStr(pname)) {
+		return(ERROR + NO_SUCH_USER);
+	}
 
 	if (CtdlGetUser(&usbuf, pname) != 0) {
-		CON_syslog(LOG_ERR, "Cannot purge user <%s> - not found\n", pname);
-		return (ERROR + NO_SUCH_USER);
+		syslog(LOG_ERR, "user_ops: cannot purge user <%s> - not found", pname);
+		return(ERROR + NO_SUCH_USER);
 	}
+
 	/* Don't delete a user who is currently logged in.  Instead, just
 	 * set the access level to 0, and let the account get swept up
 	 * during the next purge.
 	 */
 	if (CtdlIsUserLoggedInByNum(usbuf.usernum)) {
-		CON_syslog(LOG_WARNING, "User <%s> is logged in; not deleting.\n", pname);
+		syslog(LOG_WARNING, "user_ops: <%s> is logged in; not deleting", pname);
 		usbuf.axlevel = AxDeleted;
 		CtdlPutUser(&usbuf);
-		return (1);
+		return(1);
 	}
-	CON_syslog(LOG_NOTICE, "Deleting user <%s>\n", pname);
 
-/*
- * FIXME:
- * This should all be wrapped in a S_USERS mutex.
- * Without the mutex the user could log in before we get to the next function
- * That would truly mess things up :-(
- * I would like to see the S_USERS start before the CtdlIsUserLoggedInByNum() above
- * and end after the user has been deleted from the database, below.
- * Question is should we enter the EVT_PURGEUSER whilst S_USERS is active?
- */
+	syslog(LOG_NOTICE, "user_ops: deleting <%s>", pname);
 
 	/* Perform any purge functions registered by server extensions */
 	PerformUserHooks(&usbuf, EVT_PURGEUSER);
@@ -1015,30 +955,14 @@ int purge_user(char pname[])
 	/* delete the userlog entry */
 	cdb_delete(CDB_USERS, usernamekey, strlen(usernamekey));
 
-	/* remove the user's bio file */
-	snprintf(filename, 
-			 sizeof filename, 
-			 "%s/%ld",
-			 ctdl_bio_dir,
-			 usbuf.usernum);
-	unlink(filename);
-
-	/* remove the user's picture */
-	snprintf(filename, 
-			 sizeof filename, 
-			 "%s/%ld.gif",
-			 ctdl_image_dir,
-			 usbuf.usernum);
-	unlink(filename);
-
-	return (0);
+	return(0);
 }
 
 
-int internal_create_user (const char *username, long len, struct ctdluser *usbuf, uid_t uid)
+int internal_create_user(char *username, struct ctdluser *usbuf, uid_t uid)
 {
-	if (!CtdlGetUserLen(usbuf, username, len)) {
-		return (ERROR + ALREADY_EXISTS);
+	if (!CtdlGetUser(usbuf, username)) {
+		return(ERROR + ALREADY_EXISTS);
 	}
 
 	/* Go ahead and initialize a new user record */
@@ -1052,7 +976,7 @@ int internal_create_user (const char *username, long len, struct ctdluser *usbuf
 
 	usbuf->timescalled = 0;
 	usbuf->posted = 0;
-	usbuf->axlevel = config.c_initax;
+	usbuf->axlevel = CtdlGetConfigInt("c_initax");
 	usbuf->lastcall = time(NULL);
 
 	/* fetch a new user number */
@@ -1062,75 +986,39 @@ int internal_create_user (const char *username, long len, struct ctdluser *usbuf
 	CtdlPutUser(usbuf);
 	cdb_store(CDB_USERSBYNUMBER, &usbuf->usernum, sizeof(long), usbuf->fullname, strlen(usbuf->fullname)+1);
 
-	return 0;
-}
+	/* If non-native auth, index by uid */
+	if ((usbuf->uid > 0) && (usbuf->uid != NATIVE_AUTH_UID)) {
+		StrBuf *claimed_id = NewStrBuf();
+		StrBufPrintf(claimed_id, "uid:%d", usbuf->uid);
+		attach_extauth(usbuf, claimed_id);
+		FreeStrBuf(&claimed_id);
+	}
 
+	return(0);
+}
 
 
 /*
  * create_user()  -  back end processing to create a new user
  *
  * Set 'newusername' to the desired account name.
- * Set 'become_user' to nonzero if this is self-service account creation and we want
- * to actually log in as the user we just created, otherwise set it to 0.
+ * Set 'become_user' to CREATE_USER_BECOME_USER if this is self-service account creation and we want to
+ *                   actually log in as the user we just created, otherwise set it to CREATE_USER_DO_NOT_BECOME_USER
+ * Set 'uid' to some uid_t value to associate the account with an external auth user, or (-1) for native auth
  */
-int create_user(const char *newusername, long len, int become_user)
+int create_user(char *username, int become_user, uid_t uid)
 {
 	struct ctdluser usbuf;
 	struct ctdlroom qrbuf;
-	char username[256];
 	char mailboxname[ROOMNAMELEN];
 	char buf[SIZ];
 	int retval;
-	uid_t uid = (-1);
-	
 
-	safestrncpy(username, newusername, sizeof username);
 	strproc(username);
-
-	
-	if (config.c_auth_mode == AUTHMODE_HOST) {
-
-		/* host auth mode */
-
-		struct passwd pd;
-		struct passwd *tempPwdPtr;
-		char pwdbuffer[SIZ];
-	
-#ifdef HAVE_GETPWNAM_R
-#ifdef SOLARIS_GETPWUID
-		tempPwdPtr = getpwnam_r(username, &pd, pwdbuffer, sizeof(pwdbuffer));
-#else // SOLARIS_GETPWUID
-		getpwnam_r(username, &pd, pwdbuffer, sizeof pwdbuffer, &tempPwdPtr);
-#endif // SOLARIS_GETPWUID
-#else // HAVE_GETPWNAM_R
-		tempPwdPtr = NULL;
-#endif // HAVE_GETPWNAM_R
-		if (tempPwdPtr != NULL) {
-			extract_token(username, pd.pw_gecos, 0, ',', sizeof username);
-			uid = pd.pw_uid;
-			if (IsEmptyStr (username))
-			{
-				safestrncpy(username, pd.pw_name, sizeof username);
-				len = cutuserkey(username);
-			}
-		}
-		else {
-			return (ERROR + NO_SUCH_USER);
-		}
+	if ((retval = internal_create_user(username, &usbuf, uid)) != 0) {
+		return retval;
 	}
 
-#ifdef HAVE_LDAP
-	if ((config.c_auth_mode == AUTHMODE_LDAP) || (config.c_auth_mode == AUTHMODE_LDAP_AD)) {
-		if (CtdlTryUserLDAP(username, NULL, 0, username, sizeof username, &uid) != 0) {
-			return(ERROR + NO_SUCH_USER);
-		}
-	}
-#endif /* HAVE_LDAP */
-	
-	if ((retval = internal_create_user(username, len, &usbuf, uid)) != 0)
-		return retval;
-	
 	/*
 	 * Give the user a private mailbox and a configuration room.
 	 * Make the latter an invisible system room.
@@ -1152,7 +1040,7 @@ int create_user(const char *newusername, long len, int become_user)
 	 * creating a user, instead of doing self-service account creation
 	 */
 
-	if (become_user) {
+	if (become_user == CREATE_USER_BECOME_USER) {
 		/* Now become the user we just created */
 		memcpy(&CC->user, &usbuf, sizeof(struct ctdluser));
 		safestrncpy(CC->curr_user, username, sizeof CC->curr_user);
@@ -1160,7 +1048,7 @@ int create_user(const char *newusername, long len, int become_user)
 	
 		/* Check to make sure we're still who we think we are */
 		if (CtdlGetUser(&CC->user, CC->curr_user)) {
-			return (ERROR + INTERNAL_ERROR);
+			return(ERROR + INTERNAL_ERROR);
 		}
 	}
 	
@@ -1171,12 +1059,11 @@ int create_user(const char *newusername, long len, int become_user)
 		CC->cs_addr
 	);
 	CtdlAideMessage(buf, "User Creation Notice");
-	CON_syslog(LOG_NOTICE, "New user <%s> created\n", username);
-	return (0);
+	syslog(LOG_NOTICE, "user_ops: <%s> created", username);
+	return(0);
 }
 
 
-
 /*
  * set password - back end api code
  */
@@ -1185,13 +1072,11 @@ void CtdlSetPassword(char *new_pw)
 	CtdlGetUserLock(&CC->user, CC->curr_user);
 	safestrncpy(CC->user.password, new_pw, sizeof(CC->user.password));
 	CtdlPutUserLock(&CC->user);
-	CON_syslog(LOG_INFO, "Password changed for user <%s>\n", CC->curr_user);
+	syslog(LOG_INFO, "user_ops: password changed for <%s>", CC->curr_user);
 	PerformSessionHooks(EVT_SETPASS);
 }
 
 
-
-
 /*
  * API function for cmd_invt_kick() and anything else that needs to
  * invite or kick out a user to/from a room.
@@ -1226,7 +1111,6 @@ int CtdlInvtKick(char *iuser, int op) {
 		(CC->logged_in ? CC->user.fullname : "an administrator")
 	);
 	CtdlAideMessage(bbb,"User Admin Message");
-
 	return(0);
 }
 
@@ -1239,7 +1123,7 @@ int CtdlForgetThisRoom(void) {
 	visit vbuf;
 
 	/* On some systems, Admins are not allowed to forget rooms */
-	if (is_aide() && (config.c_aide_zap == 0)
+	if (is_aide() && (CtdlGetConfigInt("c_aide_zap") == 0)
 	   && ((CC->room.QRflags & QR_MAILBOX) == 0)  ) {
 		return(1);
 	}
@@ -1254,14 +1138,11 @@ int CtdlForgetThisRoom(void) {
 	CtdlPutUserLock(&CC->user);
 
 	/* Return to the Lobby, so we don't end up in an undefined room */
-	CtdlUserGoto(config.c_baseroom, 0, 0, NULL, NULL, NULL, NULL);
+	CtdlUserGoto(CtdlGetConfigStr("c_baseroom"), 0, 0, NULL, NULL, NULL, NULL);
 	return(0);
-
 }
 
 
-
-
 /* 
  *  Traverse the user file...
  */
@@ -1312,19 +1193,15 @@ void ListThisUser(struct ctdluser *usbuf, void *data)
 }
 
 
-
-
 /*
  * Count the number of new mail messages the user has
  */
 int NewMailCount()
 {
 	int num_newmsgs = 0;
-
 	num_newmsgs = CC->newmail;
 	CC->newmail = 0;
-
-	return (num_newmsgs);
+	return(num_newmsgs);
 }
 
 
@@ -1344,7 +1221,7 @@ int InitialMailCheck()
 
 	CtdlMailboxName(mailboxname, sizeof mailboxname, &CC->user, MAILROOM);
 	if (CtdlGetRoom(&mailbox, mailboxname) != 0)
-		return (0);
+		return(0);
 	CtdlGetRelationship(&vbuf, &CC->user, &mailbox);
 
 	cdbfr = cdb_fetch(CDB_MSGLISTS, &mailbox.QRnumber, sizeof(long));
@@ -1366,9 +1243,5 @@ int InitialMailCheck()
 	if (msglist != NULL)
 		free(msglist);
 
-	return (num_newmsgs);
+	return(num_newmsgs);
 }
-
-
-
-