!7

static new L<Map> data;

concept Para {

  S text;

  L<S> split;

  bool ok;

}

p {

  db();

  parasFromText();

  makeData();

  serveHttpOpenBrowser(4000);

}

static synchronized NanoHTTPD.Response serve(S uri, NanoHTTPD.Method method,

  Map<S,S> header, Map<S,S> parms, Map<S,S> files) {

  if (neq(uri, "/")) ret serve404();

  if (nempty(parms.get("update"))) {

    Set<Long> toCheck = asSet(map(f toLong, keysDeprefixNemptyValue(parms, "ok_")));

    //print("toCheck: " + struct(toCheck));

    for (Para p)

      cset(p, ok := toCheck.contains(p.id));

    makeData();

  }

  if (nempty(parms.get("resplit")))

    resplit();

  S title = "Splitting paragraphs into sentences";

  ret serveHTML(hhtml(

      hhead(htitle(title)

        + loadJQuery()

        + hCheckBoxMultiSelect())

    + hbody(h3(title)

      + hformPOST(p(hhidden("resplit", "1") + hsubmit("Resplit")))

      + hformPOST(

          hhidden("update", "1")

        + p(hsubmit())

        + htable_noEncode(data)

        + p(hsubmit())))));

}

svoid parasFromText {

  S text = loadSnippet(#1008407);

  for (S line : toLinesFullTrim(text)) {

    if (line.startsWith("#")) continue;

    uniq(Para, text := line);

  }

}

svoid makeData {

  data.clear();

  for (Para p) {

    if (p.split == null) {

      p.split = splitIntoSentences_v3(p.text);

      p.change();

    }

    S sp;

    if (l(p.split) == 1 && eq(first(p.split), p.text))

      sp = "-";

    else

      //sp = htmlEncode_nlToBr(lines(p.split));

      sp = ul(htmlEncodeAll(p.split));

    data.add(litorderedmap(

      "Original Paragraph" := htmlencode(p.text),

      "Split" := sp,

      "OK" := hcheckbox("ok_" + p.id, p.ok, "class" := "chkbox")));

  }

  data = sortByCalculatedField(data, func(Map m) {

    comparableList(

      contains(getString(m, "OK"), "checked"),

      neq(m.get("Split"), "-"),

      m.get("Original Paragraph"))

  });

}

svoid resplit {

  for (Para p) {

    L<S> split = splitIntoSentences_v3(p.text);

    if (neq(split, p.split)) {

      p.split = split;

      p.ok = false;

      p.change();

    }

  }

  makeData();

}