!752

// TODO: When in a dialog, this should be prioritized by dispatcher

static new Map<S, Status> statusMap; // key = dialog id

p {
  load("statusMap");
}

static abstract class Status {
  abstract S answer(S s);
}

static class AgainThis extends Status {
  S q;
  *() {}
  *(S *q) {}
  
  S answer(S s) {
    status(null); // always forget question after one line
    
    if (isYes(s)) exceptionToUser {
      ret q + " >> " + askSelf(q);
    } else if (isNo(s))
      ret "OK";
    null;
  }
}

static void status(Status s) {
  if (s == null)
    statusMap.remove(getDialogID());
  else
    statusMap.put(getDialogID(), s);
  save("statusMap");
}

answer {
  if (matchStart("again", s, m)) {
    S query = m.rest().trim();
    if (!empty(query)) {
      L<Map> dialog = getDialog();
      Map match = findMatch(dialog, query);
      if (match == null)
        ret "No match in history for " + quote(query);
        
      S q = getString(match, "question");
      status(new AgainThis(q));
      ret "Again this? >> " + q;
    }
  }
  
  Status status = statusMap.get(getDialogID());
  if (status != null)
    ret status.answer(s);
}

static Map findMatch(L<Map> dialog, S query) {
  // search for prefix
  
  for (int i = l(dialog)-1; i >= 0; i--)
    if (matchStart(query, getString(dialog.get(i), "question")))
      ret dialog.get(i);
      
  // search for inner match
  for (int i = l(dialog)-1; i >= 0; i--)
    if (find3(query, getString(dialog.get(i), "question")))
      ret dialog.get(i);
      
  null;
}