src/player.c File Reference

#include "copyright.h"
#include "config.h"
#include "mudconf.h"
#include "db.h"
#include "interface.h"
#include "externs.h"
#include "alloc.h"
#include "attrs.h"
#include "powers.h"
#include "command.h"

Include dependency graph for player.c:

Go to the source code of this file.

Data Structures
struct	hostdtm
struct	logindata
Defines
#define	NUM_GOOD   4
#define	NUM_BAD   3
Typedefs
typedef hostdtm	HOSTDTM
typedef logindata	LDATA
Functions
char *	crypt (const char *, const char *)
time_t	time (time_t *)
static void	decrypt_logindata (char *atrbuf, LDATA *info)
static void	encrypt_logindata (char *atrbuf, LDATA *info)
void	record_login (dbref player, int isgood, char *ldate, char *lhost, char *lusername)
int	check_pass (dbref player, const char *password)
dbref	connect_player (char *name, char *password, char *host, char *username)
dbref	create_player (char *name, char *password, dbref creator, int isrobot, int isguest)
void	do_password (dbref player, dbref cause, int key, char *oldpass, char *newpass)
static void	disp_from_on (dbref player, char *dtm_str, char *host_str)
void	do_last (dbref player, dbref cause, int key, char *who)
int	add_player_name (dbref player, char *name)
int	delete_player_name (dbref player, char *name)
dbref	lookup_player (dbref doer, char *name, int check_who)
void	load_player_names (void)
void	badname_add (char *bad_name)
void	badname_remove (char *bad_name)
int	badname_check (char *bad_name)
void	badname_list (dbref player, const char *prefix)

---

Define Documentation

#define NUM_BAD   3

Definition at line 22 of file player.c.

Referenced by decrypt_logindata(), do_last(), encrypt_logindata(), and record_login().

#define NUM_GOOD   4

Definition at line 19 of file player.c.

Referenced by decrypt_logindata(), do_last(), encrypt_logindata(), and record_login().

---

Typedef Documentation

typedef struct hostdtm HOSTDTM

Definition at line 26 of file player.c.

typedef struct logindata LDATA

Definition at line 32 of file player.c.

---

Function Documentation

int add_player_name	(	dbref	player,
		char *	name
	)

Definition at line 389 of file player.c.

References alloc_lbuf, AMBIGUOUS, free_lbuf, hashfind(), mudstate, statedata::player_htab, safe_str, and ToLower.

Referenced by create_obj(), do_alias(), do_fixdb(), do_name(), and load_player_names().

{
        int stat;
        dbref *p;
        char *temp, *tp;

        /*
         * Convert to all lowercase 
         */

        tp = temp = alloc_lbuf("add_player_name");
        safe_str(name, temp, &tp);
        *tp = '\0';
        for(tp = temp; *tp; tp++)
                *tp = ToLower(*tp);

        p = (int *) hashfind(temp, &mudstate.player_htab);
        if(p) {

                /*
                 * Entry found in the hashtable.  If a player, succeed if the
                 * * * numbers match (already correctly in the hash table),
                 * fail * * if they don't.  Fail if the name is a disallowed
                 * name * * (value AMBIGUOUS). 
                 */

                if(*p == AMBIGUOUS) {
                        free_lbuf(temp);
                        return 0;
                }
                if(Good_obj(*p) && (Typeof(*p) == TYPE_PLAYER)) {
                        free_lbuf(temp);
                        if(*p == player) {
                                return 1;
                        } else {
                                return 0;
                        }
                }
                /*
                 * It's an alias (or an incorrect entry).  Clobber it 
                 */
                free(p);
                p = (dbref *) malloc(sizeof(int));

                *p = player;
                stat = hashrepl(temp, p, &mudstate.player_htab);
                free_lbuf(temp);
        } else {
                p = (dbref *) malloc(sizeof(int));

                *p = player;
                stat = hashadd(temp, p, &mudstate.player_htab);
                free_lbuf(temp);
                stat = (stat < 0) ? 0 : 1;
        }
        return stat;
}

void badname_add

(

char *

bad_name

)

badname_add, badname_check, badname_list: Add/look for/display bad names.

Definition at line 537 of file player.c.

References statedata::badname_head, mudstate, badname_struc::name, badname_struc::next, StringCopy, and XMALLOC.

Referenced by cf_badname().

{
        BADNAME *bp;

        /*
         * Make a new node and link it in at the top 
         */

        bp = (BADNAME *) XMALLOC(sizeof(BADNAME), "badname.struc");
        bp->name = XMALLOC(strlen(bad_name) + 1, "badname.name");
        bp->next = mudstate.badname_head;
        mudstate.badname_head = bp;
        StringCopy(bp->name, bad_name);
}

int badname_check

(

char *

bad_name

)

Definition at line 574 of file player.c.

References statedata::badname_head, mudstate, badname_struc::name, badname_struc::next, and quick_wild().

Referenced by create_obj(), do_alias(), and do_name().

{
        BADNAME *bp;

        /*
         * Walk the badname list, doing wildcard matching.  If we get a hit * 
         * 
         * *  * *  * * then return false.  If no matches in the list, return
         * true.  
         */

        for(bp = mudstate.badname_head; bp; bp = bp->next) {
                if(quick_wild(bp->name, bad_name))
                        return 0;
        }
        return 1;
}

void badname_list	(	dbref	player,
		const char *	prefix
	)

Definition at line 592 of file player.c.

References alloc_lbuf, statedata::badname_head, free_lbuf, mudstate, badname_struc::name, badname_struc::next, notify, safe_chr, and safe_str.

Referenced by do_list().

{
        BADNAME *bp;
        char *buff, *bufp;

        /*
         * Construct an lbuf with all the names separated by spaces 
         */

        buff = bufp = alloc_lbuf("badname_list");
        safe_str((char *) prefix, buff, &bufp);
        for(bp = mudstate.badname_head; bp; bp = bp->next) {
                safe_chr(' ', buff, &bufp);
                safe_str(bp->name, buff, &bufp);
        }
        *bufp = '\0';

        /*
         * Now display it 
         */

        notify(player, buff);
        free_lbuf(buff);
}

void badname_remove

(

char *

bad_name

)

Definition at line 552 of file player.c.

References statedata::badname_head, mudstate, badname_struc::name, badname_struc::next, string_compare(), and XFREE.

Referenced by cf_badname().

{
        BADNAME *bp, *backp;

        /*
         * Look for an exact match on the bad name and remove if found 
         */

        backp = NULL;
        for(bp = mudstate.badname_head; bp; backp = bp, bp = bp->next) {
                if(!string_compare(bad_name, bp->name)) {
                        if(backp)
                                backp->next = bp->next;
                        else
                                mudstate.badname_head = bp->next;
                        XFREE(bp->name, "badname.name");
                        XFREE(bp, "badname.struc");
                        return;
                }
        }
}

int check_pass	(	dbref	player,
		const char *	password
	)

Test a password to see if it is correct.

Definition at line 198 of file player.c.

References A_PASS, atr_get(), crypt(), and free_lbuf.

Referenced by connect_player(), and do_password().

{
        dbref aowner;
        int aflags;
        char *target;
        char *hashed;

        target = atr_get(player, A_PASS, &aowner, &aflags);
        hashed = crypt(password, "XX");
        if(*target && strcmp(target, password) && strcmp(hashed, target)) {
                free_lbuf(target);
                return 0;
        }
        free_lbuf(target);

        /*
         * This is needed to prevent entering the raw encrypted password from
         * working. Do it better if you like, but it's needed. 
         *
         * Not really, you should just not really allow unencrypted passwords.
         * -Hag
         */

        if((strlen(password) == 13) && (password[0] == 'X') &&
           (password[1] == 'X'))
                return 0;

        return 1;
}

dbref connect_player	(	char *	name,
		char *	password,
		char *	host,
		char *	username
	)

Try to connect to an existing player.

Definition at line 231 of file player.c.

References A_ALLOWANCE, A_LAST, atr_add_raw(), atr_get(), atr_pget(), check_pass(), free_lbuf, giveto(), lookup_player(), mudconf, NOTHING, confdata::paycheck, record_login(), and time().

Referenced by check_connect().

{
        dbref player, aowner;
        int aflags;
        time_t tt;
        char *time_str, *player_last, *allowance;

        time(&tt);
        time_str = ctime(&tt);
        time_str[strlen(time_str) - 1] = '\0';

        if((player = lookup_player(NOTHING, name, 0)) == NOTHING)
                return NOTHING;
        if(!check_pass(player, password)) {
                record_login(player, 0, time_str, host, username);
                return NOTHING;
        }
        time(&tt);
        time_str = ctime(&tt);
        time_str[strlen(time_str) - 1] = '\0';

        /*
         * compare to last connect see if player gets salary 
         */
        player_last = atr_get(player, A_LAST, &aowner, &aflags);
        if(strncmp(player_last, time_str, 10) != 0) {
                allowance = atr_pget(player, A_ALLOWANCE, &aowner, &aflags);
                if(*allowance == '\0')
                        giveto(player, mudconf.paycheck);
                else
                        giveto(player, atoi(allowance));
                free_lbuf(allowance);
        }
        atr_add_raw(player, A_LAST, time_str);
        free_lbuf(player_last);
        return player;
}

dbref create_player	(	char *	name,
		char *	password,
		dbref	creator,
		int	isrobot,
		int	isguest
	)

Create a new player.

Definition at line 272 of file player.c.

References create_obj(), crypt(), do_addcom(), free_lbuf, confdata::guests_channel, mudconf, NOTHING, ok_password(), confdata::public_channel, s_Fixed, s_Home, s_Pass(), start_home(), trim_spaces(), and TYPE_PLAYER.

Referenced by check_connect(), create_guest(), db_make_minimal(), and do_pcreate().

{
        dbref player;
        char *pbuf;

        /*
         * Make sure the password is OK.  Name is checked in create_obj 
         */

        pbuf = trim_spaces(password);
        if(!ok_password(pbuf)) {
                free_lbuf(pbuf);
                return NOTHING;
        }
        /*
         * If so, go create him 
         */

        player = create_obj(creator, TYPE_PLAYER, name, isrobot);
        if(player == NOTHING) {
                free_lbuf(pbuf);
                return NOTHING;
        }
        /*
         * initialize everything 
         */
        if(isguest) {
                if(*mudconf.guests_channel)
                        do_addcom(player, player, 0, "g", mudconf.guests_channel);
        } else {
                if(*mudconf.public_channel)
                        do_addcom(player, player, 0, "pub", mudconf.public_channel);
        }

        s_Pass(player, crypt(pbuf, "XX"));
        s_Home(player, start_home());
        s_Fixed(player);
        free_lbuf(pbuf);
        return player;
}

char* crypt	(	const char *	,
		const char *
	)

Referenced by check_pass(), create_player(), do_newpassword(), and do_password().

static void decrypt_logindata	(	char *	atrbuf,
		LDATA *	info
	)			[static]

Decode login info.

Definition at line 47 of file player.c.

References logindata::bad, hostdtm::dtm, logindata::good, grabto(), hostdtm::host, logindata::new_bad, NUM_BAD, NUM_GOOD, logindata::tot_bad, and logindata::tot_good.

Referenced by do_last(), and record_login().

{
        int i;
        char *tmpc;

        info->tot_good = 0;
        info->tot_bad = 0;
        info->new_bad = 0;
        for(i = 0; i < NUM_GOOD; i++) {
                info->good[i].host = NULL;
                info->good[i].dtm = NULL;
        }
        for(i = 0; i < NUM_BAD; i++) {
                info->bad[i].host = NULL;
                info->bad[i].dtm = NULL;
        }

        if(*atrbuf == '#') {
                atrbuf++;
                if(!(tmpc = grabto(&atrbuf, ';')))
                        return;
                info->tot_good = atoi(tmpc);
                for(i = 0; i < NUM_GOOD; i++) {
                        if(!(tmpc = grabto(&atrbuf, ';')))
                                return;
                        info->good[i].host = tmpc;
                        if(!(tmpc = grabto(&atrbuf, ';')))
                                return;
                        info->good[i].dtm = tmpc;
                }
                if(!(tmpc = grabto(&atrbuf, ';')))
                        return;
                info->new_bad = atoi(tmpc);
                if(!(tmpc = grabto(&atrbuf, ';')))
                        return;
                info->tot_bad = atoi(tmpc);
                for(i = 0; i < NUM_BAD; i++) {
                        if(!(tmpc = grabto(&atrbuf, ';')))
                                return;
                        info->bad[i].host = tmpc;
                        if(!(tmpc = grabto(&atrbuf, ';')))
                                return;
                        info->bad[i].dtm = tmpc;
                }
        }
}

int delete_player_name	(	dbref	player,
		char *	name
	)

Definition at line 447 of file player.c.

References alloc_lbuf, free_lbuf, hashfind(), mudstate, NOTHING, statedata::player_htab, safe_str, and ToLower.

Referenced by destroy_player(), do_alias(), do_fixdb(), do_name(), and do_toad().

{
        dbref *p;
        char *temp, *tp;

        tp = temp = alloc_lbuf("delete_player_name");
        safe_str(name, temp, &tp);
        *tp = '\0';
        for(tp = temp; *tp; tp++)
                *tp = ToLower(*tp);

        p = (int *) hashfind(temp, &mudstate.player_htab);
        if(!p || (*p == NOTHING) || ((player != NOTHING) && (*p != player))) {
                free_lbuf(temp);
                return 0;
        }
        free(p);
        hashdelete(temp, &mudstate.player_htab);
        free_lbuf(temp);
        return 1;
}

static void disp_from_on	(	dbref	player,
		char *	dtm_str,
		char *	host_str
	)			[static]

Display login history data.

Definition at line 339 of file player.c.

References notify_printf().

Referenced by do_last().

{
        if(dtm_str && *dtm_str && host_str && *host_str) {
                notify_printf(player, "     From: %s   On: %s", dtm_str, host_str);
        }
}

void do_last	(	dbref	player,
		dbref	cause,
		int	key,
		char *	who
	)

Definition at line 346 of file player.c.

References A_LOGINDATA, atr_get(), logindata::bad, Controls, decrypt_logindata(), disp_from_on(), hostdtm::dtm, free_lbuf, logindata::good, hostdtm::host, lookup_player(), NOTHING, notify, notify_printf(), NUM_BAD, NUM_GOOD, Owner, string_compare(), logindata::tot_bad, and logindata::tot_good.

{
        dbref target, aowner;
        LDATA login_info;
        char *atrbuf;
        int i, aflags;

        if(!who || !*who) {
                target = Owner(player);
        } else if(!(string_compare(who, "me"))) {
                target = Owner(player);
        } else {
                target = lookup_player(player, who, 1);
        }

        if(target == NOTHING) {
                notify(player, "I couldn't find that player.");
        } else if(!Controls(player, target)) {
                notify(player, "Permission denied.");
        } else {
                atrbuf = atr_get(target, A_LOGINDATA, &aowner, &aflags);
                decrypt_logindata(atrbuf, &login_info);

                notify_printf(player, "Total successful connects: %d",
                                          login_info.tot_good);
                for(i = 0; i < NUM_GOOD; i++) {
                        disp_from_on(player, login_info.good[i].host,
                                                 login_info.good[i].dtm);
                }
                notify_printf(player, "Total failed connects: %d",
                                          login_info.tot_bad);
                for(i = 0; i < NUM_BAD; i++) {
                        disp_from_on(player, login_info.bad[i].host,
                                                 login_info.bad[i].dtm);
                }
                free_lbuf(atrbuf);
        }
}

void do_password	(	dbref	player,
		dbref	cause,
		int	key,
		char *	oldpass,
		char *	newpass
	)

Change the password for a player

Definition at line 317 of file player.c.

References A_PASS, atr_add_raw(), atr_get(), check_pass(), crypt(), free_lbuf, notify, and ok_password().

{
        dbref aowner;
        int aflags;
        char *target;

        target = atr_get(player, A_PASS, &aowner, &aflags);
        if(!*target || !check_pass(player, oldpass)) {
                notify(player, "Sorry.");
        } else if(!ok_password(newpass)) {
                notify(player, "Bad new password.");
        } else {
                atr_add_raw(player, A_PASS, crypt(newpass, "XX"));
                notify(player, "Password changed.");
        }
        free_lbuf(target);
}

static void encrypt_logindata	(	char *	atrbuf,
		LDATA *	info
	)			[static]

Encode login info.

Definition at line 97 of file player.c.

References alloc_lbuf, logindata::bad, hostdtm::dtm, free_lbuf, logindata::good, hostdtm::host, logindata::new_bad, NUM_BAD, NUM_GOOD, StringCopy, logindata::tot_bad, and logindata::tot_good.

Referenced by record_login().

{
        char *bp, nullc;
        int i;

        /*
         * Make sure the SPRINTF call tracks NUM_GOOD and NUM_BAD for the * * 
         * 
         * *  * * number of host/dtm pairs of each type. 
         */

        nullc = '\0';
        for(i = 0; i < NUM_GOOD; i++) {
                if(!info->good[i].host)
                        info->good[i].host = &nullc;
                if(!info->good[i].dtm)
                        info->good[i].dtm = &nullc;
        }
        for(i = 0; i < NUM_BAD; i++) {
                if(!info->bad[i].host)
                        info->bad[i].host = &nullc;
                if(!info->bad[i].dtm)
                        info->bad[i].dtm = &nullc;
        }
        bp = alloc_lbuf("encrypt_logindata");
        sprintf(bp, "#%d;%s;%s;%s;%s;%s;%s;%s;%s;%d;%d;%s;%s;%s;%s;%s;%s;",
                        info->tot_good, info->good[0].host, info->good[0].dtm,
                        info->good[1].host, info->good[1].dtm, info->good[2].host,
                        info->good[2].dtm, info->good[3].host, info->good[3].dtm,
                        info->new_bad, info->tot_bad, info->bad[0].host, info->bad[0].dtm,
                        info->bad[1].host, info->bad[1].dtm, info->bad[2].host,
                        info->bad[2].dtm);
        StringCopy(atrbuf, bp);
        free_lbuf(bp);
}

void load_player_names

(

void

)

Definition at line 510 of file player.c.

References A_ALIAS, add_player_name(), alloc_lbuf, atr_pget_str(), DO_WHOLE_DB, free_lbuf, Name(), TYPE_PLAYER, and Typeof.

Referenced by db_make_minimal(), db_read(), and mmdb_db_read().

{
        dbref i, j, aowner;
        int aflags;
        char *alias;

        j = 0;
        DO_WHOLE_DB(i) {
                if(Typeof(i) == TYPE_PLAYER) {
                        add_player_name(i, Name(i));
                }
        }
        alias = alloc_lbuf("load_player_names");
        j = 0;
        DO_WHOLE_DB(i) {
                if(Typeof(i) == TYPE_PLAYER) {
                        alias = atr_pget_str(alias, i, A_ALIAS, &aowner, &aflags);
                        if(*alias)
                                add_player_name(i, alias);
                }
        }
        free_lbuf(alias);
}

dbref lookup_player	(	dbref	doer,
		char *	name,
		int	check_who
	)

Definition at line 469 of file player.c.

References alloc_lbuf, Dark, find_connected_name(), free_lbuf, God, Good_obj, hashfind(), is_number(), mudstate, NOTHING, NUMBER_TOKEN, statedata::player_htab, safe_str, string_compare(), ToLower, TYPE_PLAYER, and Typeof.

Referenced by char_lookupplayer(), connect_player(), create_obj(), dbrefs_to_names(), do_alias(), do_chown(), do_editchannel(), do_fixdb(), do_last(), do_mail_debug(), do_mail_retract(), do_mail_review(), do_mail_stats(), do_malias_add(), do_malias_chown(), do_malias_create(), do_malias_remove(), do_name(), do_newpassword(), do_page(), do_quota(), do_stats(), fun_conn(), fun_doing(), fun_idle(), fun_mail(), fun_mailfrom(), fun_pmatch(), fun_ports(), fun_stats(), make_guest(), make_numlist(), match_player(), parse_msglist(), and search_setup().

{
        dbref *p, thing;
        char *temp, *tp;

        if(!string_compare(name, "me"))
                return doer;

        if(*name == NUMBER_TOKEN) {
                name++;
                if(!is_number(name))
                        return NOTHING;
                thing = atoi(name);
                if(!Good_obj(thing))
                        return NOTHING;
                if(!((Typeof(thing) == TYPE_PLAYER) || God(doer)))
                        thing = NOTHING;
                return thing;
        }
        tp = temp = alloc_lbuf("lookup_player");
        safe_str(name, temp, &tp);
        *tp = '\0';
        for(tp = temp; *tp; tp++)
                *tp = ToLower(*tp);
        p = (int *) hashfind(temp, &mudstate.player_htab);
        free_lbuf(temp);
        if(!p) {
                if(check_who) {
                        thing = find_connected_name(doer, name);
                        if(Dark(thing))
                                thing = NOTHING;
                } else
                        thing = NOTHING;
        } else if(!Good_obj(*p)) {
                thing = NOTHING;
        } else
                thing = *p;

        return thing;
}

void record_login	(	dbref	player,
		int	isgood,
		char *	ldate,
		char *	lhost,
		char *	lusername
	)

Record successful or failed login attempt. If successful, report last successful login and number of failures since last successful login.

Definition at line 138 of file player.c.

References A_LASTSITE, A_LOGINDATA, atr_add_raw(), atr_get(), logindata::bad, check_mail(), decrypt_logindata(), hostdtm::dtm, encrypt_logindata(), free_lbuf, logindata::good, confdata::have_mailer, hostdtm::host, mudconf, logindata::new_bad, notify, notify_printf(), NUM_BAD, NUM_GOOD, logindata::tot_bad, logindata::tot_good, and tprintf().

Referenced by announce_connect(), and connect_player().

{
        LDATA login_info;
        char *atrbuf;
        dbref aowner;
        int aflags, i;

        atrbuf = atr_get(player, A_LOGINDATA, &aowner, &aflags);
        decrypt_logindata(atrbuf, &login_info);
        if(isgood) {
                if(login_info.new_bad > 0) {
                        notify(player, "");
                        notify_printf(player,
                                                  "**** %d failed connect%s since your last successful connect. ****",
                                                  login_info.new_bad,
                                                  (login_info.new_bad == 1 ? "" : "s"));
                        notify_printf(player,
                                                  "Most recent attempt was from %s on %s.",
                                                  login_info.bad[0].host, login_info.bad[0].dtm);
                        notify(player, "");
                        login_info.new_bad = 0;
                }
                if(login_info.good[0].host && *login_info.good[0].host &&
                   login_info.good[0].dtm && *login_info.good[0].dtm) {
                        notify_printf(player, "Last connect was from %s on %s.",
                                                  login_info.good[0].host, login_info.good[0].dtm);
                }
                if(mudconf.have_mailer)
                        check_mail(player, 0, 0);
                for(i = NUM_GOOD - 1; i > 0; i--) {
                        login_info.good[i].dtm = login_info.good[i - 1].dtm;
                        login_info.good[i].host = login_info.good[i - 1].host;
                }
                login_info.good[0].dtm = ldate;
                login_info.good[0].host = lhost;
                login_info.tot_good++;
                if(*lusername)
                        atr_add_raw(player, A_LASTSITE, tprintf("%s@%s", lusername,
                                                                                                        lhost));
                else
                        atr_add_raw(player, A_LASTSITE, lhost);
        } else {
                for(i = NUM_BAD - 1; i > 0; i--) {
                        login_info.bad[i].dtm = login_info.bad[i - 1].dtm;
                        login_info.bad[i].host = login_info.bad[i - 1].host;
                }
                login_info.bad[0].dtm = ldate;
                login_info.bad[0].host = lhost;
                login_info.tot_bad++;
                login_info.new_bad++;
        }
        encrypt_logindata(atrbuf, &login_info);
        atr_add_raw(player, A_LOGINDATA, atrbuf);
        free_lbuf(atrbuf);
}

time_t time

(

time_t *

)

Referenced by check_connect(), check_mail_expiration(), connect_player(), create_obj(), dispatch(), do_mail_list(), init_timer(), list_options(), load_restart_db(), loadrepairs(), log_error(), mail_match(), main(), map_pathfind(), mech_explode(), page_return(), send_mail(), and start_log().

---