/* -*- LPC -*- */ /* * $Locker: $ * $Id: crea_tor.c,v 1.1 1998/01/06 05:25:41 ceres Exp $ * $Log: crea_tor.c,v $ * Revision 1.1 1998/01/06 05:25:41 ceres * Initial revision * */ /* creator command, trial out by Turrican for a commands daemon. */ #include <creator.h> mixed cmd(string str) { object *ov, ob; notify_fail("Creator of what?\n"); ov = WIZ_PRESENT->wiz_present(str,this_player()); if (!sizeof(ov)) return 0; foreach (ob in ov) { write("Creator of " + WIZ_PRESENT->desc_object(ob) + ": " + master()->creator_file (file_name(ob)) + ", uid: " + getuid(ob) + ", euid: "+geteuid(ob)+"\n"); } return 1; } void dest_me() { destruct(this_object()); } void clean_up() { dest_me(); } void reset() { dest_me(); }