!7

sclass UniversalSearch extends DynModule {

  S query;

  transient L<SS> result;

  transient Q q;

  transient int maxInputLength = 120;

  transient WaitForStableValue<S> waitForStableValue = new(1.0);

  transient volatile bool calculating;

  transient JTable table;

  transient SimpleLiveValue<S> lvQuery = stringLiveValue();

  JComponent visualize() {

    ret jLiveValueSection(lvQuery, dataToTable_uneditable(result, table = sexyTable()));

  }

  void unvisualize() { table = null; }  

  void start {

    lvQuery.set(query);

    q = startQ();

    ownTimer(doEvery(1000, r updateMe));

  }

  void update {

    S s = dm_getInterestingString();

    if (nempty(s) && l(s) <= maxInputLength) { // TODO: more quality checks?

      waitForStableValue.set(s);

    }

    fS q = waitForStableValue!;

    if (nempty(q) && neq(q, query))

      this.q.add(r { calc(q) });

  }

  void calc(S q) {

    if (eq(query, q)) ret;

    result = null;

    lvQuery.set(query = q);

    temp tempSetField(this, calculating := true);

    L<Pair<O, S>> l = dm_universalSearch(q);

    result = map(l, func(Pair<O, S> p) -> SS {

      litorderedmap("Result" := str(first(p)), "From Module" := second(p))

    });

    dataToTable_uneditable_ifHasTable(result, table);

  }

}