!7

static Map<S, S> cmdToProgram;

static Map<S, S> cmdToShell;

static Map<S, S> cmdToAnswer;

static Map<S, S> cmdToCmd;

static Map<S, S> cmdToEval;

static Map<S, Pair<S>> cmdToBotSend;

static L<Pair<S, Long>> voiceCommandLog;

static IVar<S> prioBot;

p {

  magellan();

  quietDB();

  cmdToProgram = persistentTreeMap("Command to program");

  cmdToShell = persistentTreeMap("Command to shell");

  cmdToAnswer = persistentTreeMap("Command to answer");

  cmdToCmd = persistentTreeMap("Command to command");

  cmdToBotSend = persistentTreeMap("Command to bot send");

  cmdToEval = persistentTreeMap("Command to eval");

  prioBot = persistentVar("Prio bot");

  voiceCommandLog = persistentList("Voice Command Log");

  makeBot("Voice Actions.");

}

sS answer(S s) {

  new Matches m;

  voiceCommandLog.add(pair(s, now()));

  if "prio bot *" { prioBot.set($1); consoleStatus(prioBot!); ret "OK"; }

  if "prio bot done *" { if (eqic(prioBot!, $1)) prioBot.set(null); consoleStatus(prioBot!); ret "OK"; }

  if "prio bot none" { prioBot.set(null); consoleStatus(prioBot!); ret "OK"; }

  if "user said: *" s = $1;

  S a;

  try { a = answer2(s); } catch e { printStackTrace(e); a = str(e); }

  if (nempty(a)) infoBox_lower(a);

  ret a;

}

sS answer2(S s) {

  new Matches m;

  // drop "ja" or "yep"

  //S answerWord = dropPunctuation(botAnswerWord());

  //if (matchStart(answerWord, s, m)) s = m.rest();

  if (nempty(prioBot!)) pcall {

    try answer send(prioBot!, "User said: *", s);

  }

  Set<S> seen;

  for ping (seen = new LinkedHashSet; l(seen) < 100; ) {

    if "command * to program *" { cmdToProgram.put($1, $2); ret "OK"; }

    if "command * to shell *" { cmdToShell.put($1, $2); ret "OK"; }

    if "command * to answer *" { cmdToAnswer.put($1, $2); ret "OK"; }

    if "command * send * to *" { cmdToBotSend.put($1, pair($3, $2)); ret "OK"; }

    if "command * to eval *" { cmdToEval.put($1, $2); ret "OK"; }

    if "command * to command *" { cmdToCmd.put($1, $2); ret "OK"; }

    if "remove command *" { removeFromMaps($1, cmdToProgram, cmdToShell, cmdToAnswer, cmdToBotSend, cmdToEval); ret "OK"; }

    if "applause" { applause(); ret "Applause!"; }

    if "restart voice actions" { restartIn1(); ret "OK"; }

    if "voice log" { showLog(); ret "OK"; }

    S program = lookupByNLMatch(cmdToProgram, s);

    if (nempty(program)) { nohupJavax(program); ret "Running: " + snippetWithTitle(program); }

    Pair<S> botSend = lookupByNLMatch(cmdToBotSend, s);

    if (botSend != null)

      ret send(botSend.a, botSend.b);

    S eval = lookupByNLMatch(cmdToEval, s);

    if (eval != null)

      ret or2(strOrEmpty(evalJava(eval)), "OK");

    S shell = lookupByNLMatch(cmdToShell, s);

    if (nempty(shell)) { nohup(shell); ret "Running: " + shell; }

    try answer lookupByNLMatch(cmdToAnswer, s);

    seen.add(s);

    s = lookupByNLMatch(cmdToCmd, s);

    if (empty(s)) null;

    if (seen.contains(s)) fail("bad cmd-to-cmd: " + sfu(seen));

  }

  fail("bad cmd-to-cmd: " + sfu(seen));

}

svoid showLog {

  showTable_updatedOnConceptsChange("Voice Log", f renderLog);

}

static L renderLog() {

  ret reversed(map(cloneList(voiceCommandLog), func(Pair<S, Long> p) {

    litorderedmap("Command" := p.a, "Time" := formatDateAndTime(p.b))

  }));

}