Roxen.git / server / base_server / mainconfig.pike

version» Context lines:

Roxen.git/server/base_server/mainconfig.pike:1:   inherit "config/builders"; - string cvs_version = "$Id: mainconfig.pike,v 1.70 1997/08/14 15:59:50 grubba Exp $"; + string cvs_version = "$Id: mainconfig.pike,v 1.71 1997/08/14 20:11:01 thomas Exp $";   inherit "roxenlib";   inherit "config/draw_things";      import Array;   import Stdio;   string status_row(object node);   string display_tabular_header(object node);   object get_template(string t);      /* Work-around for Simulate.perror */
Roxen.git/server/base_server/mainconfig.pike:179:      #define BUTTON(ACTION,TEXT,ALIGN) do{buttons += ({({"<a href=\"/(ACTION)"+(o?o->path(1):"/")+"?"+(bar++)+"\"><img border=0 hspacing=0 vspacing=0 src=\"/auto/button/"+(lm?"lm/":""),replace(TEXT," ","%20")+"\" alt=\""+(lm?"/ ":" ")+TEXT+" /\""+(("ALIGN"-" ")=="left"?"":" align="+("ALIGN"-" "))+"></a>"})});lm=0;}while(0)   #define PUSH_BUTTONS(CLEAR) do{if(sizeof(buttons)){buttons[-1][0]+="rm/";res+=`+(@buttons);if(CLEAR){PUSH("<br clear=all>");}}lm=1;buttons=({});}while(0)      #endif /* 0 */         string default_head(string h, string|void save)   {    return ("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Draft//EN\">" -  "<head><title>"+h+"</title></head>\n"+ BODY+"\n"); +  "<head><title>"+h+"</title>\n<META HTTP-EQUIV=\"Expires\" CONTENT=\"0\">\n</head>\n"+ BODY+"\n");   }      object find_node(string l)   {    array tmp = l/"/"-({""});    object o;    if(!sizeof(tmp)) return root;    for(o=root; sizeof(tmp) && (o=o->descend(tmp[0],1)); tmp=tmp[1..1000]);    if(!o) return 0;    return o;
Roxen.git/server/base_server/mainconfig.pike:1180:    }    return res[0..strlen(res)-8];   }      string status_row(object node)   {    return ("<table width=\"100%\" bgcolor=\"#dddddd\" border=0 cellpadding=0"    " cellspacing=0>\n"    "<tr><td valign=middle align=left><a href=\"$docurl\">"    "<img border=0 src=\"/image/roxen-small.gif\" alt=\"Roxen\"></a>" -  "</td>\n<td align=right valign=top>" + describe_node_path(node) + +  "</td>\n<td align=right valign=center>" + describe_node_path(node) +    "</td>\n<td>&nbsp;</td></tr>\n</table><br>");   }      mapping logged = ([ ]);      void check_login(object id)   {    if(logged[id->remoteaddr]+1000<time())    report_notice("Administrator logged on from "+    roxen->blocking_ip_to_host(id->remoteaddr)+".");