//      /bin/adm/_whoguests.c
//      from the Dead Souls Mudlib
//      shows the list of guests allowed in when the mud is locked
//      created by Descartes of Borg 08 july 1993

#include <lib.h>
#include <daemons.h>

inherit LIB_DAEMON;

int cmd(string str) {
    string *guests;

    if(!archp(previous_object())) return 0;
    if(str) {
        notify_fail("Correct syntax: whoguests\n");
        return 0;
    }
    catch(guests = BANISH_D->query_guests());
    message("info", "The following people are currently allowed in when "
            "the mud is locked: ", this_player());
    if(!sizeof(guests)) message("info", "No guests allowed.", this_player());
    else this_player()->more(explode(format_page(guests, 5), "\n"));
    return 1;
}

string GetHelp(){
    return ("Syntax: whoguests\n\n"
            "Lists all the guests allowed into the game when it is locked.\n"
            "See also: addguest, removeguest");
}