/* /secure/cmds/player/suicide.c * from the Dead Soulsr2 Object Library * Allows players to obliterate their character * created by Blitz@Dead Souls */ #include <lib.h> #include <dirs.h> #include <flags.h> #include <privs.h> #include <daemons.h> #include <rooms.h> #include <message_class.h> inherit LIB_DAEMON; static private void GetPassword(string input); static private void GetYesOrNo(string input); static private void EndSuicide(string who); string home_dir = ""; string gwho = ""; int eventHoseDude(object dude){ if(dude) dude->eventDestruct(); if(dude) destruct(dude); return 1; } mixed cmd(string str) { string who; object ob; if( sizeof(str) ) return "Suicide does not require any arguments."; ob = previous_object(); if( this_player(1) != ob || !userp(ob) ) { log_file("security", "** Illegal suicide attempt **\n " "Call stack:\n"+ sprintf("%O\n", previous_object(-1))); return "Suicide failed."; } if( this_player()->GetForced() ) { log_file("security", "*** Illegal \"Forced\" Suicide **\n" "Call stack:\n"+ sprintf("%O\n", previous_object(-1))); return 0; } who = (string)this_player()->GetKeyName(); if( who == "guest" ) return "Guest is not suicidal!"; if( member_group(who, PRIV_SECURE) || member_group(who, PRIV_ASSIST) ) return "You must first have your security privileges removed."; this_player()->eventPrint("Committing suicide means having your character " "completely erased from "+mud_name()+"'s database. If you " "are certain this is what you want, enter in your correct " "password. Otherwise enter in a wrong password."); this_player()->eventPrint("Password: ", MSG_EDIT); input_to((: GetPassword :), I_NOECHO | I_NOESC); return 1; } static private void GetPassword(string input) { string tmp; if( !sizeof(input) ) { this_player()->eventPrint("Suicide aborted."); return; } tmp = (string)this_player()->GetPassword(); if( tmp != crypt(input, tmp) ) { this_player()->eventPrint("Wrong password. Suicide aborted."); return; } this_player()->eventPrint("\nLeave a suicide note? (a)bort, (y)es, (N)o :\n", MSG_EDIT); input_to((: GetYesOrNo :)); return; } static private void GetYesOrNo(string input) { string tmp = (string)this_player()->GetKeyName(); if( !sizeof(input) || (input = lower_case(input))[0] != 'y' ) { if( input && input[0] == 'a' ) { this_player()->eventPrint("Suicide has been aborted."); return; } EndSuicide(tmp); return; } this_player()->eventPrint("\nYou may now enter a letter " "explaining why you suicided. If you do not wish to write a " "letter, simply exit the editor without writing anything. " "(enter \".\" on a blank line to exit editor.)\n"); this_player()->eventEdit(DIR_TMP + "/" + tmp, (: EndSuicide, tmp :)); } static private void EndSuicide(string who) { string tmp, file, newfile; object *ob; string whocheck = last_string_element(base_name(this_player()),"/"); if(who != whocheck){ write("There seems to be a conflict in determining your identity."); write("Suicide aborted."); return; } gwho = who; home_dir = homedir(this_player()); if(!directory_exists(DIR_TMP + "/suicide/")) mkdir (DIR_TMP + "/suicide/"); file = DIR_TMP + "/" + who; newfile = DIR_TMP + "/suicide/" + who; if( file_size(file) > 0 ) { tmp = possessive_noun(who)+" suicide note.\n" "Dated: "+ctime(time())+"\n"; tmp += read_file(file); write_file(newfile, tmp, 1); } if( file_exists(file) ) rm(file); log_file("suicide", who+" suicided at "+ctime(time()) +". (from "+query_ip_name(this_player())+")\n"); tmp = save_file(who) + __SAVE_EXTENSION__; unguarded((: rename, tmp, DIR_SUICIDE + "/" + who + __SAVE_EXTENSION__ :)); if(home_dir && directory_exists(home_dir)){ object *purge_array = filter(objects(), (: !strsrch(base_name($1), home_dir) :) ); foreach(object tainted in purge_array){ if(clonep(tainted)){ tainted->eventMove(ROOM_FURNACE); purge_array -= ({ tainted }); } } foreach(object tainted in purge_array){ tainted->eventDestruct(); } unguarded( (: rename(home_dir,"/secure/save/decre/"+gwho+"."+timestamp()) :) ); home_dir = ""; gwho = ""; } this_player()->eventPrint("You have suicided. Please try " "again another time."); environment(this_player())->eventPrint( (string)this_player()->GetName()+" has ended "+ possessive(this_player())+" own life before your very eyes.", this_player() ); if( sizeof( ob = filter(users(), (: archp :)) ) ) ob->eventPrint("["+(string)this_player()->GetName()+" has " "committed suicide]"); PLAYERS_D->RemoveUser(who); this_player()->eventMove(ROOM_FURNACE); this_player()->eventDestruct(); return; } string GetHelp(string str) { return "Syntax: suicide\n\n" "Ends your character's existence on "+mud_name()+" FOREVER. " "It is non-reversible. Once you issue this command, you will be asked" "for a password to confirm your identity. Once password is confirmed, " "you will no longer exist in the MUD's database. You may also opt " "to write a final suicide note.\n\n" "NOTE: If you suicide from a restricted site, you will have to " "reregister!"; }