/* -*- LPC -*- */
/*
* $Locker: $
* $Id: valid_binary.c,v 1.5 2003/02/11 08:59:32 pinkfish Exp $
* $Log: valid_binary.c,v $
* Revision 1.5 2003/02/11 08:59:32 pinkfish
* Add in the /www directory ot the binary list.
*
* Revision 1.4 2000/06/19 04:15:54 pinkfish
* Allow binaries to be created for the domain directories too.
*
* Revision 1.3 1998/08/19 08:04:54 pinkfish
* Add in the cmds dir to the list which binaries are saved for.,
*
* Revision 1.2 1998/08/17 13:06:04 pinkfish
* Turn on binaries for he secure dir as well.
*
* Revision 1.1 1998/01/06 05:12:03 ceres
* Initial revision
*
*/
int valid_save_binary(string fname) {
string *bits;
bits = explode(fname, "/");
switch (bits[0]) {
/*
case "secure" :
if ( bits[ 1 ] == "simul_efun" )
return 0;
*/
case "global" :
case "std" :
case "secure" :
case "cmds" :
case "d" :
case "www" :
return 1;
case "obj" :
//if (sscanf(bits[sizeof(bits)-1], "%*s-%*d%*s") == 0)
return 1;
}
return 0;
} /* valid_save_binary() */
