Roxen.git / server / config_actions / proc.pike

version» Context lines:

Roxen.git/server/config_actions/proc.pike:1:   /* -  * $Id: proc.pike,v 1.6 1997/09/10 12:36:17 grubba Exp $ +  * $Id: proc.pike,v 1.7 1998/02/05 00:59:24 js Exp $    */      inherit "wizard";      constant name= "Status//Extended process status";   constant doc = "Shows detailed process status on Solaris 2.5 and 2.6.";      constant more=1;      void create()
Roxen.git/server/config_actions/proc.pike:74:    if(search(in,"/proc/")==-1)    return (pre+    "<a href=/Actions/?action=proc.pike&pid="+pid+"&unique="+time()+">"+    (ipid==pid?"<b>":"")+    html_encode_string(in)+    (ipid==pid?"</b>":"")+    "</a>\n");    return "";   }    + #if !constant(getpwuid) + array(string) getpwuid(int uid) { return ({ (string)uid }); } + #endif +    string cred(object id)   {    string r = "", s;    int uid, gid;    if(sscanf(proc("cred",id->variables->pid), "%*d:\te/r/suid=%d "    "e/r/sgid=%d\n\tgroups:%s\n", uid, gid, s) != 4)    return "-<br>";    array groups = ((s||"")/" ") - ({ "" });   #if constant(getgrgid)    for(int i = 0; i < sizeof(groups); i++)