/* /secure/daemon/character.c
* from the Dead Souls V Object Library
* the multi-character management daemon
* created by Descartes of Borg 951216
*/
#include <lib.h>
#include <save.h>
#include <privs.h>
#include <link.h>
#include <config.h>
#include "include/character.h"
inherit LIB_DAEMON;
private mapping Links;
static void create() {
daemon::create();
SetNoClean(1);
Links = ([]);
if( unguarded( (: file_size(SAVE_CHARACTER __SAVE_EXTENSION__) :)) > 0 )
unguarded((: restore_object, SAVE_CHARACTER :));
}
mixed eventConnect(string who) {
class char_link c;
string prime;
int min_wait;
if( base_name(previous_object()) != LIB_CONNECT ) return 0;
if( !(c = Links[prime = who]) ) {
foreach(string pl, class char_link cl in Links) {
if( member_array(who, cl->Secondaries) != -1 ) {
prime = pl;
c = cl;
break;
}
}
if( !c ) return 1;
}
foreach(string ind in c->Secondaries + ({ prime })) {
if( find_player(ind) ) {
if( who == ind ) return 1;
if(member_group(who, PRIV_SECURE) || member_group(who,PRIV_ASSIST))
return 1;
else if( archp(find_player(ind)) ) return 1;
else return "You have a linked character currently logged in.\n";
}
}
if( LINK_WAIT_PERIOD > uptime() ) min_wait = uptime();
else min_wait = LINK_WAIT_PERIOD;
if( c->LastOnDate > time() - min_wait ) {
string tmp;
int x;
if( c->LastOnWith == who ) return 1;
x = c->LastOnDate + min_wait - time();
if( x < 60 ) tmp = consolidate(x, "a second");
else tmp = consolidate(x/60, "a minute");
if( !(member_group(who, PRIV_SECURE) || member_group(who,PRIV_ASSIST)))
return "\nYour character " + capitalize(c->LastOnWith) +
" recently logged in at " + ctime(c->LastOnDate) + ".\n" +
"You must wait another " + tmp + ".\n";
}
c->LastOnDate = time();
c->LastOnWith = who;
save_object(SAVE_CHARACTER);
return 1;
}
mixed eventLink(string primary, string secondary, string email) {
class char_link ch;
if( !((int)master()->valid_apply(({ PRIV_LAW }))) )
return "Permission denied.";
if( !user_exists(primary = convert_name(primary)) )
return "No such user: primary";
if( !email ) return "Email is required for linking.";
secondary = convert_name(secondary);
if( Links[primary] ) {
ch = Links[primary];
if( Links[secondary] ) {
class char_link c2;
c2 = Links[secondary];
ch->Secondaries += ({ secondary });
ch->Secondaries += c2->Secondaries;
ch->Secondaries = distinct_array(ch->Secondaries);
ch->Email = email;
if( ch->LastOnDate < c2->LastOnDate ) {
ch->LastOnDate = c2->LastOnDate;
ch->LastOnWith = c2->LastOnWith;
}
Links[primary] = ch;
map_delete(Links, secondary);
if( !save_object(SAVE_CHARACTER) ) return "Error in saving.";
return 1;
}
}
else if( Links[secondary] ) {
ch = Links[secondary];
map_delete(Links, secondary);
}
else ch = new(class char_link);
if( ch->Secondaries ) ch->Secondaries += ({ secondary });
else ch->Secondaries = ({ secondary });
ch->Email = email;
ch->LastOnDate = 0;
ch->LastOnWith = primary;
Links[primary] = ch;
if( !save_object(SAVE_CHARACTER) ) return "Error in saving.";
return 1;
}
mixed eventSaveTime() {
class char_link c;
object ob;
string who;
if( !userp(ob = previous_object()) ) return 0;
who = (string)ob->GetKeyName();
if( !(c = Links[who]) ) {
foreach(string pl, class char_link cl in Links) {
if( member_array(who, cl->Secondaries) != -1 ) {
c = cl;
break;
}
}
if( !c ) return 1;
}
c->LastOnDate = time();
c->LastOnWith = who;
unguarded((: save_object, SAVE_CHARACTER :));
return 1;
}
mixed eventUnlink(string primary, string who) {
class char_link ch;
if( !((int)master()->valid_apply(({ PRIV_ASSIST }))) )
return "Permission denied.";
primary = convert_name(primary);
who = convert_name(who);
if( !(ch = Links[primary]) ) return "No such primary character.";
if( who == primary ) {
if( sizeof(ch->Secondaries) < 2) {
map_delete(Links, primary);
save_object(SAVE_CHARACTER);
return 1;
}
primary = ch->Secondaries[0];
ch->Secondaries = ch->Secondaries[1..];
map_delete(Links, who);
Links[primary] = ch;
save_object(SAVE_CHARACTER);
return 1;
}
if( member_array(who, ch->Secondaries) == -1 )
return "Invalid secondary character for " + primary + ".";
ch->Secondaries -= ({ who });
Links[primary] = ch;
save_object(SAVE_CHARACTER);
return 1;
}
mapping GetLinks() {
if( !((int)master()->valid_apply(({ PRIV_ASSIST }))) ) return ([]);
else return Links;
}
mapping GetLink(string who) {
class char_link ch;
who = convert_name(who);
if( Links[who] ) ch = Links[who];
else {
class char_link l;
string pl;
foreach(pl, l in Links) {
if( member_array(who, l->Secondaries) != -1 ) {
ch = l;
who = pl;
break;
}
}
if( !ch ) return 0;
}
return ([ "primary" : who, "last char" : ch->LastOnWith,
"secondaries" : ch->Secondaries, "last on" : ch->LastOnDate ]);
}
