/*    /lib/sit.c
 *    From the Dead Souls Object Library
 *    Handles people sitting down in it
 *    Created by Descartes of Borg 961221
 *    Version: @(#) sit.c 1.1@(#)
 *    Last modified: 96/12/21
 */

#include <position.h>

private int          MaxSitters = 1;
private object array Sitters    = ({});

int GetMaxSitters() {
    return MaxSitters;
}

static int SetMaxSitters(int x) {
    return (MaxSitters = x);
}

object array GetSitters() {
    return copy(Sitters);
}

mixed eventReceiveSit(object who) {
    if(who->GetProperty("furniture")){
	write("You are already using a piece of furniture.");
	return 1;
    }
    Sitters = ({ Sitters..., who });
    who->SetProperty("furniture", " on "+this_object()->GetShort());
    who->SetProperty("furniture_object", this_object());
    return 1;
}

mixed eventReleaseStand(object who) {
    Sitters -= ({ who });
    Sitters = filter(Sitters, (: objectp($1) :) );
    if(who) who->RemoveProperty("furniture");
    if(who) who->RemoveProperty("furniture_object");
    return 1;
}

mixed direct_sit_word_obj() {
    Sitters = filter(Sitters, (: $1 && $1->GetPosition()==POSITION_SITTING :));
    if( sizeof(Sitters) >= MaxSitters ) {
	return "There is no room to sit there.";
    }
    if(environment() != environment(this_player())) {
	return "That's not available for sitting right now.";
    }
    return 1;
}

mixed direct_sit_down_word_obj() {
    return direct_sit_word_obj();
}

int CanGet(object who){
    object *sitters = this_object()->GetSitters();
    if(sizeof(sitters)){
	foreach(object wer in sitters){
	    if(!wer || environment(wer) != environment()) this_object()->eventReleaseStand(wer);
	}         if(sizeof(this_object()->GetSitters())){
	    write(this_object()->GetSitters()[0]->GetName()+" is using it right now.");
	    return 0;
	}
	else return 1;
    }
    else return 1;
}