sbool SimpleCRUD_searcher = true;

sclass SimpleCRUD<A extends Concept> {
  Concepts concepts;
  Class<A> cc;
  JTable table;
  JPanel buttons, panel;
  O renderer; // optional, func(A) -> Map
  O sorter; // optional, func(Cl<Concept>) -> Cl<Concept>
  S hID = "ID";
  Set<S> unshownFields; // not shown in table or form
  Set<S> excludeFieldsFromEditing;
  S modifiedField; // field to hold last-modified timestamp
  TableSearcher tableSearcher;
  Set<S> multiLineFields; // string fields that should be shown as text areas
  Set<S> dontDuplicateFields;
  bool latestFirst;
  int formFixer = 12; // stupid value to make submit button appear
  bool editOnDoubleClick = true;
  bool ensureIndexed;
  bool showValuesAsStruct; // BREAKING CHANGE - used to be true

  *(Class<A> cc) { this(db_mainConcepts(), cc); }
  *(Concepts *concepts, Class<A> *cc) {}
  
  SimpleCRUD<A> show(S frameTitle) {
    make();
    showFrame(frameTitle, panel);
    this;
  }
  
  SimpleCRUD<A> show() {
    ret show(plural(shortClassName(cc)));
  }
  
  SimpleCRUD<A> showMaximized() { show(); maximizeFrame(panel); ret this; }
  
  JPanel makePanel() { ret make(); }
  JPanel make() {
    db();
    framesBot();
    ret make_dontStartBots();
  }
  
  JPanel make_dontStartBots() {
    printVars("SimpleCRUD.make_dontStartBots", +concepts, +cc, count := countConcepts(cc));
    if (ensureIndexed)
      indexConceptClass(concepts, cc);

    // next line not in swing part to allow passing arguments
    // from outside like showConceptsTable_afterUpdate
    temp tempSetTL(showConceptsTable_concepts, concepts);
    temp tempSetTL(showConceptsTable_latestFirst, latestFirst);
    temp tempSetTL(showConceptsTable_sorter, sorter);
    temp tempSetTL(showConceptsTable_dropFields, asList(unshownFields));
    temp tempSetTL(dataToTable_useStruct, showValuesAsStruct);
    table = makeConceptsTable(cc, wrapRenderer(renderer));
    swing {
      buttons = jRightAlignedLine(
        jbutton("Add...", r { newConcept() }),
        tableDependButton(table, jbutton("Edit", r {
          editConcept(selectedConcept())
        })),
        tableDependButton(table, jbutton("Delete", r {
          final L<A> l = selectedConcepts();
          thread "Delete concepts" {
            withDBLock(concepts, r { for (A c : l) c.delete() });
          }
        })),
        tableDependButton(table, jbutton("Duplicate...", r {
          duplicateConcept(selectedConcept())
        })));
        
      if (SimpleCRUD_searcher) {
        tableSearcher = tableWithSearcher2(table, withMargin := true);
        panel = centerAndSouthWithMargin(tableSearcher.panel, withBottomMargin(buttons));
      } else
        panel = centerAndSouthWithMargin(table, withBottomMargin(buttons));
      
      O fEdit = voidfunc(int row) { editConcept(conceptForRow(row)) };
      tablePopupMenuItem(table, "Edit...", fEdit);
      if (editOnDoubleClick)
        onDoubleClick(table, fEdit);
    }
    ret panel;
  }
  
  O wrapRenderer(fO renderer) {
    ret renderer == null ? null : func(A a) {
      putAll(litorderedmap(hID, str(a.id)), (Map) callF(renderer, a))
    };
  }
  
  void newConcept {
    duplicateConcept(null);
  }
    
  void duplicateConcept(A oldConcept) {
    final A c = unlisted(cc);
    ccopyFieldsExcept(oldConcept, c, dontDuplicateFields);
    final Map<S, JComponent> map = makeComponents(c);
    Runnable r = r {
      concepts.register(c);
      saveData(c, map);
    };
    temp tempSetMCOpt(formLayouter1_fixer2 := formFixer);
    showFormTitled2("New " + shortClassName(cc), arrayPlus(mapToObjectArray(map), r));
  }

  void editConcept(final A c) {
    if (c == null) ret;
    final Map<S, JComponent> map = makeComponents(c);
    Runnable r = r { saveData(c, map) };
    temp tempSetMCOpt(formLayouter1_fixer2 := formFixer);
    showFormTitled2("Edit " + shortClassName(cc) + " #" + c.id, arrayPlus(mapToObjectArray(map), r));
  }
  
  A selected aka selectedConcept() {
    ret conceptForRow(selectedRow(table));
  }
  
  A conceptForRow(int row) {
    ret (A) concepts.getConcept(toLong(getTableCell(table, row, 0)));
  }
  
  int indexOfConcept(final A c) {
    if (c == null) ret -1;
    ret swing(func -> int {
      int n = tableRowCount(table);
      for row to n:
        if (toLong(getTableCell(table, row, 0)) == c.id)
          ret row;
      ret -1;
    });
  }
  
  L<A> selectedConcepts() {
    ret swing(() -> {
      int[] rows = table?.getSelectedRows();
      new L<A> l;
      fOr (int row : rows)
        l.add(conceptForRow(row));
      ret l;
    });
  }
  
  Map<S, JComponent> makeComponents(A c) {
    Map<S, JComponent> map = litorderedmap();
    makeComponents(c, map);
    ret map;
  }
  
  JComponent fieldComponent(A c, S field) {
    Class type = getFieldType(cc, field);
    O value = getOpt(c, field);
    //print("Field type: " + field + " => " + type);
    if (type == bool.class)
      ret jCenteredCheckBox(isTrue(value));
    else if (contains(multiLineFields, field) || containsNewLines(optCast S(value)))
      ret typeWriterTextArea((S) value);
    else if (isSubtype(type, Concept))
      ret jcomboboxFromConcepts_str(concepts, type, (Concept) value);
    ifclass SecretValue
    else if (type == SecretValue.class)
      ret jpassword(strOrEmpty(getVar(value/SecretValue)));
    endif
    else try {
      ret autoComboBox(valueToString(value), new TreeSet<S>(map valueToString(collect(list(concepts, cc), field))));
    } catch e {
      printException(e);
      ret jTextField(valueToString(value));
    }
  }
  
  void saveComponent(A c, S field, JComponent comp) {
    comp = unwrap(comp);
    Class type = fieldType(c, field);
    ifclass SecretValue
      if (type == SecretValue.class) {
        S text = getTextTrim((JPasswordField) comp);
        cset(c, field, empty(text) ? null : SecretValue(text));
      } else
    endif
    if (comp instanceof JTextComponent)
      cset(c, field, convertToField(trimIf(!comp instanceof JTextArea, getText((JTextComponent) comp)), cc, field));
    else if (comp cast JComboBox) {
      S text = getTextTrim(comp);
      if (isSubtype(type, Concept))
        cset(c, field, getConcept(concepts, parseFirstLong(text)));
      else
        cset(c, field, convertToField(text, cc, field));
    } else if (comp instanceof JCheckBox)
      cset(c, field, isChecked((JCheckBox) comp));
    ifclass ImageChooser
      else if (comp instanceof ImageChooser)
        cUpdatePNGFile(c, field, comp/ImageChooser.getImage(), false);
    endif
  }
  
  L<S> fields() {
    if (excludeFieldsFromEditing != null && modifiedField != null) excludeFieldsFromEditing.add(modifiedField);
    ret listWithoutSet([S field : conceptFieldsInOrder(cc) | fieldType(cc, field) != Concept.Ref.class],
      joinSets(excludeFieldsFromEditing, unshownFields));
  }
  
  void excludeFieldsFromEditing(S... fields) {
    excludeFieldsFromEditing = setPlus(excludeFieldsFromEditing, fields);
  }
  
  // override the following two methods to customize edit window
  
  void makeComponents(A c, Map<S, JComponent> map) {
    for (S field : fields())
      map.put(field, fieldComponent(c, field));
  }
  
  void saveData(A c, Map<S, JComponent> components) {
    for (S field : keys(components))
      saveComponent(c, field, components.get(field));
    if (modifiedField != null) cset(c, modifiedField, now());
  }
  
  JTable table() { ret table; }
  
  swappable S valueToString(O o) {
    ret showValuesAsStruct
      ? structureOrText_crud(o)
      : strOrNull(o);
  }
} // end of SimpleCRUD