<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_vdokgng912233r5e59cd7mg39a, 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

static new L thoughtBots;
static long started;
static Class theoryModule;

p {
  started = sysNow();
  db();
  autoRestart();
  serveHttp(4678);
  typicalDownload();
  bot("Smart Bot.");
  loadPage_forcedTimeout = 70000;
  thoughtBots.add(mc());
  loadBots(#1010753, #1010821, #1010825, #1001951);
  stefansChat_onLine_lookback = 2;
  stefansChat_onLine_safe(voidfunc(S text) {
    print("> " + text);
    S answer = scanMultipleBots(thoughtBots, text);
    if (nempty(answer))
      postToStefansChat(answer);
  });
  //stefansChat_post("Smart Bot Upgraded! Boot took: " + formatDouble(fromMS(sysNow()-started), 1) + " s");
  
  runInNewThread(#1010793); // Post on UAIP
  
  theoryModule = run(#1010963);
}

static int lineCount;

answer {
  ++lineCount;
  bool authed = isTrue(stefansChat_onLine_fullParams->get('auth));
  
  int safety = 0;
  replaceloop: while (safety++ < 10) {
    s = trim(s);
    if (authed) {
      if (lineCount > 1 && eqic(s, "!restart")) { restart(); ret "Yo"; }
      
      if "unlearn * *"
        ret "OK, was: " + uniq(MatchLearner, pattern := $1).examples.put($2, 'rejected);
    }
    
    if "Are you online?" ret "Yes";
    if (eqic(s, "!question"))
      ret random_gac36k();
      
    if (eqic(s, "!uptime"))
      ret n(secondsSinceSysTime(started), "second");
      
    if (swic(s, "!nodes ", m))
      ret lstr(indexedNodes($1));
      
    s = ai_dropLeadingAdditions(s);
  
    if "cache size"
      ret n(keys(cachedNodeIndex()), "different term")
        + ", " + n(web_countNodes(allWebs_cached()), "node")
        + ", " + n(allWebs_cached(), "web");
    
    if "give me subtypes of ..."
      ret ai_renderList(ai_subtypesOf(m.rest()));
      
    if "give me a third person verb"
      ret random(thirdPersonVerbs());
      
    if (learnedFlexMatch("give me some *", s, m)) {
      S query = singular($1);
      ret ai_renderNodesList(concatLists(
        webs_search_dollarX(webFromTriples("$X", "is a", query), indexedWebs(query)),
        webs_search_dollarX(webFromTriples("$X", "is", a(query)), indexedWebs(a(query)))));
    }
      
    if "authed?"
      ret authed ? "You are authed." : "You are not authed.";
      
    if "what is the singular of *"
      ret singular($1);
      
    if "what unix day is it"
      ret str(unixDay());
      
    if "show me the ..."
      ret "What " + $1 + "?";
      
    if (learnedFlexMatch("What do * have?", s, m))
      ret ai_renderNodesList(webs_search_dollarX(webFromTriples($1, "have", "$X"), indexedWebs($1)));
      
    if (learnedFlexMatch("What does * do?", s, m))
      ret ai_renderList(map(f web_nodePairToText, webs_search_dollarXY(webFromTriples($1, "$X", "$Y"), indexedWebs($1))));
      
    if (learnedFlexMatch("What is *", s, m))
      try answer ai_renderNodesList(webs_search_dollarX(webFromTriples($1, "is", "$X"), indexedWebs($1)), "");
      
    S sf = web_text(first(webs_search_dollarX(webFromTriples("$X", "implements", quote(s)), indexedWebs(quote(s)))));
    if (startsWith(sf, "sf ", m))
      ret str(makeAndCall($1));
      
    if (learnedFlexMatch("* how many visitors *", s) || match("how many visitors", s))
      ret str(ai1_cookiesToday_int());
      
    // Once more with generated webs (replacing $ vars)
    
    if (learnedFlexMatch("What is *", s, m)) {
      L<Web> extendedWebs = indexedWebsAfterVariableSubstitution($1);
      print("Have " + n(extendedWebs, "extended web") + " for " + quote($1));
      ret ai_renderNodesList(webs_search_dollarX(webFromTriples($1, "is", "$X"), extendedWebs), "I don't know");
    }
    
    S match;
    if (learnedFlexMatch(match = "* is *", s, m)) {
      postSoftwareMadeWeb(webFromTriples($1, "is", $2),
        +match, input := s);
      ret "OK, stored.";
    }
    
    for (WebNode node : indexedNodes(s)) {
      S x = web_operandText(node, "replace with");
      if (x != null) {
        print("Replacing with " + x);
        s = x;
        continue replaceloop;
      }
    }
    break;
  }
  
  if (ai_isQuestion_1(s)) ret "No idea";
}

svoid loadBots(S... botIDs) {
  for (S id : botIDs) pcall {
    thoughtBots.add(runSubBot(id));
  }
}

// s = uri
static NanoHTTPD.Response html(S s) {
  if "thoughts"
    ret serveHTML(html_thoughts());
    
  if "log"
    ret serveText_direct(printLog());
  ret serveText_direct(renderConcepts(list(MatchLearner)));
}

sS html_thoughts() {
  S html = hrefresh(10);
  if (theoryModule == null)
    ret html + "Loading theory module...";
  ret html + (S) call(theoryModule, "html_thoughtsAboutLastLine");
}