[UI] UI window prepared

extern/ui.cpp

@@ -19,15 +19,56 @@
 #define Uses_ipstream
 #define Uses_opstream
 #define Uses_TStreamableClass
+#define Uses_TFrame
 
-#include <string>
+#include <memory>
 #include <tvision/tv.h>
 
+// Single Line Frame Characters
+const char BOX_SINGLE_HORIZONTAL = '\xC4'; // ─
+const char BOX_SINGLE_VERTICAL = '\xB3';   // │
+
+// Double Line Frame Characters
+const char BOX_DOUBLE_HORIZONTAL = '\xCD'; // ═
+const char BOX_DOUBLE_VERTICAL = '\xBA';   // ║
+
+// Junctions: Single Horizontal to Double Vertical
+const char BOX_SINGLE_HORIZONTAL_TO_DOUBLE_VERTICAL_TOP =
+    '\xD1'; // ╤ (Approximation)
+const char BOX_SINGLE_HORIZONTAL_TO_DOUBLE_VERTICAL_BOTTOM =
+    '\xCF'; // ╧ (Approximation)
+
+// Junctions: Double Horizontal to Single Vertical
+const char BOX_DOUBLE_HORIZONTAL_TO_SINGLE_VERTICAL_LEFT =
+    '\xC3'; // ╟ (Approximation)
+const char BOX_DOUBLE_HORIZONTAL_TO_SINGLE_VERTICAL_RIGHT =
+    '\xB4'; // ╢ (Approximation)
+
+// Cross junctions
+const char BOX_CROSS_SINGLE = '\xC5'; // ┼
+const char BOX_CROSS_DOUBLE =
+    '\xCE'; // ╬ (No direct equivalent, used closest match)
+const char BOX_CROSS_SINGLE_TO_DOUBLE = '\xD8'; // ╪ (Approximation)
+const char BOX_CROSS_DOUBLE_TO_SINGLE = '\xD7'; // ╫ (Approximation)
+
+// Corners
+const char BOX_CORNER_TOP_LEFT_SINGLE = '\xDA';     // ┌
+const char BOX_CORNER_TOP_RIGHT_SINGLE = '\xBF';    // ┐
+const char BOX_CORNER_BOTTOM_LEFT_SINGLE = '\xC0';  // └
+const char BOX_CORNER_BOTTOM_RIGHT_SINGLE = '\xD9'; // ┘
+
+const char BOX_CORNER_TOP_LEFT_DOUBLE = '\xC9';     // ╔
+const char BOX_CORNER_TOP_RIGHT_DOUBLE = '\xBB';    // ╗
+const char BOX_CORNER_BOTTOM_LEFT_DOUBLE = '\xC8';  // ╚
+const char BOX_CORNER_BOTTOM_RIGHT_DOUBLE = '\xBC'; // ╝
+
+static char text[100] = "iniytial";
+
 class TItemCollection : public TCollection {
 
 public:
   TItemCollection(short lim, short delta) : TCollection(lim, delta) {}
-  virtual void freeItem(void *p) { delete[](char *) p; }
+  virtual void freeItem(void *p) { delete[] (char *)p; }
 
 private:
   virtual void *readItem(ipstream &) { return 0; }
@@ -36,18 +77,25 @@ private:
 
 class TItemViewer : public TScroller {
 
+  int selectedLine = 0;
+
 public:
+  enum class ViewedColumn { Items, Categories, Weights };
+
   char *fileName;
   TCollection *fileLines;
   Boolean isValid;
   TItemViewer(const TRect &bounds, TScrollBar *aHScrollBar,
-              TScrollBar *aVScrollBar, Boolean left);
+              TScrollBar *aVScrollBar, const ViewedColumn &col);
   ~TItemViewer();
   TItemViewer(StreamableInit) : TScroller(streamableInit){};
   void draw();
   void setState(ushort aState, Boolean enable);
   void scrollDraw();
   Boolean valid(ushort command) const;
+  virtual void handleEvent(TEvent &event) override;
+  int findSel(TPoint p);
+  virtual TPalette &getPalette() const override;
 
 private:
   virtual const char *streamableName() const { return name; }
@@ -61,53 +109,168 @@ public:
   static TStreamable *build();
 };
 
+#define cpTestView "\x6\x7\x2\x9"
+
+TPalette &TItemViewer::getPalette() const {
+  static TPalette palette(cpTestView, sizeof(cpTestView) - 1);
+  return palette;
+}
+
 class TItemWindow : public TWindow {
+  TItemViewer *itemViewer, *catViewer, *weightViewer;
+  const TRect itemViewerBounds() const {
+    auto bounds = getExtent();
+    TRect r(bounds.a.x, bounds.a.y, bounds.b.x / 3, bounds.b.y);
+    r.grow(-1, -1);
+    return r;
+  }
+
+  const TRect catViewerBounds() const {
+    auto bounds = getExtent();
+    TRect r(bounds.b.x / 3 - 2, bounds.a.y, 2 * bounds.b.x / 3 - 1, bounds.b.y);
+    r.grow(-1, -1);
+    return r;
+  }
+
+  const TRect weightViewerBounds() const {
+    auto bounds = getExtent();
+    TRect r(2 * bounds.b.x / 3 - 3, bounds.a.y, bounds.b.x, bounds.b.y);
+    r.grow(-1, -1);
+    return r;
+  }
 
 public:
   TItemWindow(const char *fileName);
+  static TFrame *initFrame(TRect r);
+  void draw() override;
+  virtual void handleEvent(TEvent &event) override;
+  virtual TPalette &getPalette() const override;
+
 protected:
-  virtual void sizeLimits(TPoint& min, TPoint& max) override {
+  virtual void sizeLimits(TPoint &min, TPoint &max) override {
     TWindow::sizeLimits(min, max);
     min.x = size.x / 2 + 10;
   };
-
 };
+#define cpItemWindow "\x08\x09\x0A\x0B\x0C\x0D\x0E\x0F\x06"
+
+TPalette &TItemWindow::getPalette() const {
+  static TPalette palette(cpItemWindow, sizeof(cpItemWindow) - 1);
+  return palette;
+}
 
 const int maxLineLength = 256;
 
 const char *const TItemViewer::name = "TItemViewer";
 
+void TItemViewer::handleEvent(TEvent &event) {
+  TScroller::handleEvent(event);
+
+  switch (event.what) {
+  case evKeyDown:
+    switch (event.keyDown.keyCode) {
+    case kbDown:
+      if (selectedLine < fileLines->getCount() - 1) // -2 is header for now
+        selectedLine++;
+      clearEvent(event);
+      break;
+    case kbUp:
+      if (selectedLine > 0)
+        selectedLine--;
+      clearEvent(event);
+      break;
+    }
+    break;
+  case evMouseDown:
+    TPoint mouse = makeLocal(event.mouse.where);
+    int i = findSel(mouse);
+    if (i != -1)
+      selectedLine = i;
+    clearEvent(event);
+    break;
+  }
+  sprintf(text, "%s: %d", fileName, selectedLine);
+  TProgram::application->statusLine->update();
+  draw();
+  TProgram::application->statusLine->draw();
+}
+
+int TItemViewer::findSel(TPoint p) {
+  TRect r = getExtent();
+  if (!r.contains(p))
+    return -1;
+  else {
+    int s = p.y - 2;
+    if (s >= fileLines->getCount())
+      return -1;
+    else
+      return s;
+  }
+}
+
 TItemViewer::TItemViewer(const TRect &bounds, TScrollBar *aHScrollBar,
-                         TScrollBar *aVScrollBar, Boolean left)
+                         TScrollBar *aVScrollBar, const ViewedColumn &col)
     : TScroller(bounds, aHScrollBar, aVScrollBar) {
-  if (left)
-    growMode = gfGrowHiY;
-  else
+  if (col == ViewedColumn::Categories)
     growMode = gfGrowHiX | gfGrowHiY;
+  else
+    growMode = gfGrowHiY;
 
   isValid = True;
-  fileName = 0;
   fileLines = new TItemCollection(5, 5);
-  fileLines->insert(newStr(left ? "Items" : "Categories"));
+  switch (col) {
+  case ViewedColumn::Items:
+    fileName = newStr("Items");
+    break;
+  case ViewedColumn::Categories:
+    fileName = newStr("Categories");
+    break;
+  case ViewedColumn::Weights:
+    fileName = newStr("Weights");
+    break;
+  }
+
+  fileLines->insert(newStr("1"));
+  fileLines->insert(newStr("2"));
+  fileLines->insert(newStr("3"));
+  fileLines->insert(newStr("4"));
+  fileLines->insert(newStr("5"));
+  fileLines->insert(newStr("6"));
+  fileLines->insert(newStr("7"));
 }
 
 TItemViewer::~TItemViewer() { destroy(fileLines); }
 
 void TItemViewer::draw() {
+  TDrawBuffer b;
   char *p;
-
-  ushort c = getColor(0x0301);
+  TAttrPair c = getColor(1);
+  TAttrPair cFrame = getColor(3);
+  TAttrPair cSelected = getColor(2);
+  TAttrPair cHeader = getColor(4);
+
+  // Header
+  b.moveChar(0, ' ', c, size.x);
+  b.moveChar(size.x - 1, BOX_SINGLE_VERTICAL, cFrame, 1);
+  b.moveStr(0, fileName, getState(sfFocused) ? cHeader : c);
+  writeBuf(0, 0, (short)size.x, 1, b);
+  // Line
+  b.moveChar(0, ' ', cFrame, size.x);
+  char line[size.x] = {0};
+  memset(line, BOX_SINGLE_HORIZONTAL, size.x - 1);
+  b.moveStr(0, line, cFrame);
+  b.moveChar(size.x - 1, BOX_CROSS_SINGLE, cFrame, 1);
+  writeBuf(0, 1, (short)size.x, 1, b);
 
   for (short i = 0; i < size.y; i++) {
-    TDrawBuffer b;
     b.moveChar(0, ' ', c, size.x);
-
+    b.moveChar(size.x - 1, BOX_SINGLE_VERTICAL, c, 1);
     if (delta.y + i < fileLines->getCount()) {
       p = (char *)(fileLines->at(delta.y + i));
       if (p)
-        b.moveStr(0, p, c, (short)size.x, (short)delta.x);
+        b.moveStr(0, p, i == selectedLine ? cSelected : c);
     }
-    writeBuf(0, i, (short)size.x, 1, b);
+    writeBuf(0, i + 2, (short)size.x, 1, b);
   }
 }
 
@@ -143,23 +306,60 @@ TStreamableClass RItemView(TItemViewer::name, TItemViewer::build,
 
 static short winNumber = 0;
 
+class TCustomFrame : public TFrame {
+public:
+  using TFrame::TFrame; // Inherit constructor
+
+  virtual void draw() override {
+    TFrame::draw(); // Call base class draw
+    TDrawBuffer b;
+    TAttrPair cNormal = getColor(4);
+    int fstSep = size.x / 3 - 2;
+    int sndSep = 2 * size.x / 3 - 3;
+
+    b.moveChar(0, ' ', cNormal, 1);
+    b.putChar(0, BOX_SINGLE_HORIZONTAL_TO_DOUBLE_VERTICAL_TOP);
+    writeLine(fstSep, 0, 1, 1, b);
+    writeLine(sndSep, 0, 1, 1, b);
+  }
+};
+
+TFrame *TItemWindow::initFrame(TRect r) { return new TCustomFrame(r); }
+
 TItemWindow::TItemWindow(const char *fileName)
     : TWindow(TProgram::deskTop->getExtent(), fileName, winNumber++),
       TWindowInit(&TItemWindow::initFrame) {
   options |= ofTileable;
   auto bounds = getExtent();
-  TRect r(bounds.a.x, bounds.a.y, bounds.b.x / 2 + 1, bounds.b.y);
-  r.grow(-1, -1);
-  insert(new TItemViewer(r, standardScrollBar(sbHorizontal | sbHandleKeyboard),
-                         standardScrollBar(sbVertical | sbHandleKeyboard),
-                         True));
-  r = TRect(bounds.b.x / 2, bounds.a.y, bounds.b.x, bounds.b.y);
-  r.grow(-1, -1);
-  insert(new TItemViewer(r, standardScrollBar(sbHorizontal | sbHandleKeyboard),
-                         standardScrollBar(sbVertical | sbHandleKeyboard),
-                         False));
+
+  itemViewer = new TItemViewer(
+      itemViewerBounds(), standardScrollBar(sbHorizontal | sbHandleKeyboard),
+      standardScrollBar(sbVertical | sbHandleKeyboard),
+      TItemViewer::ViewedColumn::Items);
+  insert(itemViewer);
+
+  catViewer = new TItemViewer(
+      catViewerBounds(), standardScrollBar(sbHorizontal | sbHandleKeyboard),
+      standardScrollBar(sbVertical | sbHandleKeyboard),
+      TItemViewer::ViewedColumn::Categories);
+  insert(catViewer);
+
+  weightViewer = new TItemViewer(
+      weightViewerBounds(), standardScrollBar(sbHorizontal | sbHandleKeyboard),
+      standardScrollBar(sbVertical | sbHandleKeyboard),
+      TItemViewer::ViewedColumn::Weights);
+  insert(weightViewer);
+}
+
+void TItemWindow::draw() {
+  itemViewer->changeBounds(itemViewerBounds());
+  catViewer->changeBounds(catViewerBounds());
+  weightViewer->changeBounds(weightViewerBounds());
+  TWindow::draw();
 }
 
+void TItemWindow::handleEvent(TEvent &event) { TWindow::handleEvent(event); }
+
 const int GreetThemCmd = 100;
 const int CallListCmd = 101;
 
@@ -172,6 +372,7 @@ public:
   static TMenuBar *initMenuBar(TRect);
   static TStatusLine *initStatusLine(TRect);
   void set_hello(const std::string &new_line) { hello_line = new_line; }
+  virtual void idle() override;
 
 private:
   std::string hello_line;
@@ -225,12 +426,34 @@ TMenuBar *THelloApp::initMenuBar(TRect r) {
              *new TMenuItem("E~x~it", cmQuit, cmQuit, hcNoContext, "Alt-X"));
 }
 
+class HintStatusLine : public TStatusLine {
+public:
+  HintStatusLine(TRect r, TStatusDef &def) : TStatusLine(r, def) {}
+  virtual const char *hint(ushort) override;
+};
+
+const char *HintStatusLine::hint(ushort aHelpCtx) { return text; }
+
 TStatusLine *THelloApp::initStatusLine(TRect r) {
   r.a.y = r.b.y - 1;
-  return new TStatusLine(r,
-                         *new TStatusDef(0, 0xFFFF) +
-                             *new TStatusItem("~Alt-X~ Exit", kbAltX, cmQuit) +
-                             *new TStatusItem(0, kbF10, cmMenu));
+
+  return new HintStatusLine(
+      r, *new TStatusDef(0, 50) +
+             *new TStatusItem("~F10~ Menu", kbF10, cmMenu) +
+             *new TStatusItem("~Alt-X~ Exit", kbAltX, cmQuit) +
+
+             *new TStatusDef(50, 0xFFFF) + *new TStatusItem(0, kbF10, cmMenu) +
+             *new TStatusItem("~F1~ Help", kbF1, cmHelp));
+}
+
+void THelloApp::idle() {
+  if (statusLine != 0)
+    statusLine->update();
+
+  if (commandSetChanged == True) {
+    message(this, evBroadcast, cmCommandSetChanged, 0);
+    commandSetChanged = False;
+  }
 }
 
 #ifndef BINARY