#include <std.h>
#include <save.h>
#include <objects.h>
#include <commands.h>
#include "users.h"

inherit DAEMON;
inherit OB_USER;

void create() {
    daemon::create();
    user::create();
}

void change_password(string who, string passwd) {
    if(!((int)master()->valid_apply( ({ "law" }) ))) return;
    if(!stringp(who) || !stringp(passwd)) return;
    if(member_group(who, "assist") || member_group(who, "superuser")) return;
    if(!user_exists(who)) return;
    if(find_player(who)) return;
    unguarded((: restore_object, DIR_USERS+"/"+who[0..0]+"/"+who :));
    this_object()->set_password(crypt(passwd, 0));
    unguarded((: save_object, DIR_USERS+"/"+who[0..0]+"/"+who :));
}

void xmote(string who, string pos, int lev) {
    if(!((int)master()->valid_apply( ({ "assist" }) ))) return;
    if(!stringp(who) || !user_exists(who)) return;
    if(member_group(who, "superuser")) return;
    if(find_player(who)) return;
    unguarded((: restore_object, DIR_USERS+"/"+who[0..0]+"/"+who :));
    if(pos) this_object()->set_position(pos);
    if(lev) this_object()->set_level(lev);
    unguarded((: save_object, DIR_USERS+"/"+who[0..0]+"/"+who :));
}

void suicide(string who) {
    if(base_name(previous_object()) != CMD_SUICIDE) return;
    if(!((int)master()->valid_apply(({ (string)this_player(1)->query_name()}))))
      return;
    if(adminp(this_player())) return;
    this_player()->remove();
    log_file("suicide", who+" at "+ctime(time())+"\n");
    delete_user(who);
}

static private void delete_user(string who) {
    string tmp;

    rename(sprintf("%s/%s/%s%s", DIR_USERS, who[0..0], who, SAVE_EXTENSION),
      sprintf("%s/rid/%s%s", DIR_USERS, who, SAVE_EXTENSION));
    if(unguarded((: file_exists, tmp = DIR_ACCOUNTS+"/"+who+SAVE_EXTENSION :)))
      unguarded((: rm, tmp :));
}

void setup() { }

int remove() { return daemon::remove(); }