<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_1ulc1j0sn2haockug06jd8hv5t, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
!7

p {
  doEvery(10*60*1000, f subBot_cleanBlockedIPs);
}

svoid subBot_cleanBlockedIPs {
  Collection c = (Collection) get(mainBot(), "blockedIPs");
  int n = l(c);
  if (n != 0) {
    clear(c);
    print("Cleared " + n2(n, "blocked IP"));
  }
}

html {
  if (webAuthed(params) ret "Not authed";
}

answer {
  if (!webAuthed()) null;
  ret serveText(answer_privileged(s));
}

sS answer_privileged(S s) {
  new Matches m;
  
  if "block ip *" {
    call(mainBot(), "addBlockedIP", assertIPv4($1));
    ret "OK";
  }
  
  if "unblock all ips" {
    clear((Collection) get(mainBot(), "blockedIPs"));
    ret "OK";
  }
  
  if "unblock ip *" {
    call(mainBot(), "removeBlockedIP", assertIPv4($1));
    ret "OK, blocked IPs now: " + askSelf("blocked ips");
  }
  
  if "blocked ips"
    ret structForUser(cloneList((Collection) get(mainBot(), "blockedIPs")));

  if "bad clients"
    ret str(subBot_numStalledConnections());
    
  if "whitelist ip *" {
    Cl<S> whiteList = cast get(mainBot(), "whiteListedIPs");
    add(whiteList, assertIPv4($1));
    ret "OK, white listed IPs now: " + whiteList;
  }
  
  null; 
}