47 lines
1.4 KiB
C
47 lines
1.4 KiB
C
// /bin/adm/_allow.c
|
|
// from the Dead Souls mudlib
|
|
// lets in selected players from sites on register
|
|
// created by Shadowwolf@Dead Souls?
|
|
|
|
#include <lib.h>
|
|
#include <privs.h>
|
|
#include <daemons.h>
|
|
|
|
inherit LIB_DAEMON;
|
|
|
|
int cmd(string str) {
|
|
string who, email;
|
|
mixed res;
|
|
|
|
if(!archp(previous_object())) return 0;
|
|
if(!member_group(previous_object(), PRIV_SECURE)) {
|
|
if(!member_group(previous_object(), "LAW")) {
|
|
notify_fail("Only law may allow new players in the game.\n");
|
|
return 0;
|
|
}
|
|
}
|
|
if(!str) return 0;
|
|
if(sscanf(lower_case(str), "%s %s", who, email) != 2) {
|
|
notify_fail("Syntax: allow <who> <email>\n");
|
|
return 0;
|
|
}
|
|
if(user_exists(who)) {
|
|
notify_fail("A character by that name already exists.\n");
|
|
return 0;
|
|
}
|
|
write(capitalize(who)+" is now allowed to create a character.\n");
|
|
if(res = catch(call_other(BANISH_D, "allow_name", who)))
|
|
write("Error in letting in "+who+": "+res+"\n");
|
|
log_file("watch/players", capitalize(who)+": "+email+" ("+ctime(time())+")\n");
|
|
return 1;
|
|
}
|
|
|
|
string GetHelp(){
|
|
return "Syntax: allow <who> <email>\n\n"
|
|
"Members of law may allow people from sites on register to create "
|
|
"new characters with this command. <who> is the character name, "
|
|
"<email> is the player's real life email address. "
|
|
"See also: whobanished, whoregistered, whowatched";
|
|
}
|
|
|