!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;

}