/* /lib/obj/storage.c
* From the Dead Souls Object Library
* The standard object for storing things
* Created by Descartes of Borg 940212
* Version: @(#) storage.c 1.7@(#)
* Last modified: 96/12/31
*/
#include <lib.h>
inherit LIB_HOLDER;
inherit LIB_ITEM;
inherit LIB_SEAL;
private int CanClose = 0;
private int CanLock = 0;
private int MaxRecurseDepth = 3;
private int RecurseDepth = 1;
int GetMaxRecurseDepth(){
return MaxRecurseDepth;
}
int GetRecurseDepth(){
return RecurseDepth;
}
int SetMaxRecurseDepth(int i){
MaxRecurseDepth =i;
return 1;
}
int SetRecurseDepth(int i){
RecurseDepth=i;
return 1;
}
int AddRecurseDepth(int i){
RecurseDepth += i;
return 1;
}
int GetCanClose(){
return CanClose;
}
int SetCanClose(int x){
CanClose = x;
}
int GetCanLock(){
return CanLock;
}
int SetCanLock(int x){
return SetCanClose(CanLock = x);
}
void SetKey(string key){
SetKeys(key);
}
int GetOpacity(){
return holder::GetOpacity();
}
int SetOpacity(mixed arg){
return holder::SetOpacity(arg);
}
int GetRadiantLight(int ambient){
return item::GetRadiantLight(ambient) + holder::GetRadiantLight(ambient);
}
static mixed array AddSave(mixed array vars){
return item::AddSave(vars);
}
int SetSaveRecurse(int x){
return item::SetSaveRecurse(x);
}
mixed CanClose(object who, string id){
if( !GetCanClose() ){
return 0;
}
else {
return seal::CanClose(who, id);
}
}
mixed CanGetFrom(object who, object item){
mixed tmp = holder::CanGetFrom(who, item);
if( tmp != 1 ){
return tmp;
}
if( GetClosed() ){
return capitalize(GetDefiniteShort()) + " is closed.";
}
return 1;
}
mixed CanLock(object who, string id){
if( !GetCanLock() ){
return 0;
}
else {
return seal::CanLock(who, id);
}
}
mixed CanOpen(object who, string id){
if( !GetCanClose() ){
return 0;
}
else {
return seal::CanOpen(who, id);
}
}
mixed CanPick(object who, string id){
if( !GetCanLock() ){
return "It isn't lockable in the first place.";
}
else {
return seal::CanPick(who, id);
}
}
mixed CanPutInto(object who, object what){
mixed tmp;
int mydepth,yourdepth,total,indirectp,indirectpp;
string wherefrom,stackstring;
string *callstack;
if(!tmp = holder::CanPutInto(who, what)){
if(GetClosed()) return capitalize(GetDefiniteShort()) + " is closed right now.";
else return "You can't do that right now.";
}
wherefrom=origin();
callstack=call_stack(2);
stackstring=implode(callstack," ");
indirectp=member_array("indirect_put_obj_word_obj",callstack);
indirectpp=member_array("indirect_put_objs_word_obj",callstack);
if( tmp != 1 ){
if( GetClosed() ) return capitalize(GetDefiniteShort()) + " is closed.";
else return "You can't do that at this time.";
}
if( GetClosed() ){
return capitalize(GetDefiniteShort()) + " is closed.";
}
if(inherits("/lib/std/storage",what) ){
yourdepth = what->GetRecurseDepth();
mydepth = this_object()->GetRecurseDepth();
if(yourdepth && mydepth) total = yourdepth + mydepth;
if(total && total > this_object()->GetMaxRecurseDepth()) return "Doesn't fit.";
}
return 1;
}
varargs mixed CanShowInterior(object who, object target){
if( GetClosed() && this_object()->GetOpacity() > 33){
return capitalize(GetDefiniteShort()) + " is closed.";
}
else return holder::CanShowInterior();
}
mixed CanUnlock(object who, string id, object key){
if( !GetCanLock() ){
return 0;
}
else {
return seal::CanUnlock(who, id, key);
}
}
int eventReceiveObject(object ob){
if( GetClosed() ){
return 0;
}
return holder::eventReceiveObject(ob);
}
void PutCheck(){
if(RecurseDepth >= MaxRecurseDepth){
SetPreventPut("You have enough containers inside containers there. This one will have to stay out.");
}
}
void create(){
string *i_save, *s_save, *a_save;
i_save = item::GetSave();
s_save = seal::GetSave();
a_save = i_save + s_save;
AddSave( ({ "Closed","CanClose", "CanLock", "RecurseDepth" , "MaxRecurseDepth" }) );
AddSave( a_save );
holder::create();
item::create();
seal::create();
PutCheck();
}
string array GetSave(){
return item::GetSave();
}
int inventory_accessible(){
return seal::inventory_accessible();
}
int inventory_visible(){
return (seal::inventory_visible() || holder::inventory_visible());
}
