//      /bin/dev/_rm.c
//      from the Dead Souls Mudlib
//      the command to rm files (wild cards without prompt!!!!, be careful)
//      created by Descartes of Borg 02 august 1993

#include <lib.h>

inherit LIB_DAEMON;

int cmd(string str) {
    string *files;
    string tmp;
    object ob;
    int i;

    if(!str) {
        notify_fail("Correct syntax: <rm [file]>\n");
        return 0;
    }
    if((ob=previous_object())->GetForced()) {
        write("Someone attempted to force you to rm "+str+".");
        return 1;
    }
    tmp = absolute_path((string)ob->query_cwd(), str);
    if(!archp(ob) || !sizeof(files = (string *)wild_card(tmp)))
        files = ({ tmp });
    if(!(i=sizeof(files))) {
        message("system", "File "+tmp+" does not exist.", this_player());
        return 1;
    }
    while(i--) {
        switch(file_size(files[i])) {
        case -1: message("system", "File "+files[i]+" does not exist.",
              this_player()); break;
        case -2: message("system", files[i]+" is a directory.", 
              this_player()); break;
        default: message("system", rm(files[i]) ? files[i]+": Ok." :
              files[i]+": Permission denied.", this_player());
            break;
        }
    }
    return 1;
}

void help() {
    message("help", "Syntax: <rm [file]>\n\n"
      "The command deletes the file named.  Once deleted, the file "
      "cannot be recovered.", this_player());
    if(archp(this_player()))
        message("help", "Note for arches: wild cards work with this command, "
          "but there is no prompt, so be VERY CAREFULL!!!!", 
          this_player());
}