+#include <stdio.h>
+#include <stdarg.h>
+#include <string.h>
+#include <stdlib.h>
+#include <stdbool.h>
+
+/* TODO
+- whitelist input on GetStr/GetInt
+*/
+
+// Memory
+
+#define NEW(TYPE) ((TYPE *)calloc(1, sizeof(TYPE)))
+#define NEWARR(TYPE, NUM) ((TYPE *)calloc(NUM, sizeof(TYPE)))
+
+
+// Util
+
+bool
+charInString(char c, const char * str) {
+ for (int i = 0; i < strlen(str); i++)
+ if (c == str[i])
+ return true;
+ return false;
+}
+
+bool
+isNewline(char c) {
+ return c == '\n' || c == '\r';
+}
+
+
+// getch
+
+#ifdef _WIN32
+#include <windows.h>
+#include <conio.h>
+#else
+#include <sys/ioctl.h>
+#include <termios.h>
+#include <unistd.h>
+#include <stdio.h>
+
+/* reads from keypress, doesn't echo */
+int getch(void)
+{
+ struct termios oldattr, newattr;
+ int ch;
+ tcgetattr( STDIN_FILENO, &oldattr );
+ newattr = oldattr;
+ newattr.c_lflag &= ~( ICANON | ECHO ); // no ECHO for echo(?)
+ tcsetattr( STDIN_FILENO, TCSANOW, &newattr );
+ ch = getchar();
+ tcsetattr( STDIN_FILENO, TCSANOW, &oldattr );
+ return ch;
+}
+
+/* ungets keypress */
+void ungetch(int ch)
+{
+ struct termios oldattr, newattr;
+ tcgetattr( STDIN_FILENO, &oldattr );
+ newattr = oldattr;
+ newattr.c_lflag &= ~( ICANON | ECHO );
+ tcsetattr( STDIN_FILENO, TCSANOW, &newattr );
+ ungetc(ch, stdin);
+ tcsetattr( STDIN_FILENO, TCSANOW, &oldattr );
+}
+#endif
+
+int
+peekch() {
+ int c = getch();
+ //ungetc(c, stdin);
+ ungetch(c);
+ return c;
+}
+
+
+// VT100
+
+#define ASCII_ESC 27
+
+void vt100Escape(const char * str, ...) {
+ va_list args;
+ va_start(args, str);
+
+ printf("%c", ASCII_ESC);
+ vprintf(str, args);
+}
+
+void vt100ClearScreen() { vt100Escape("[2J"); }
+void vt100CursorHome() { vt100Escape("[H"); }
+void vt100CursorPos(int v, int h) { vt100Escape("[%d;%dH", v, h); }
+void vt100SaveCursor() { vt100Escape("7"); }
+void vt100RestoreCursor() { vt100Escape("8"); }
+// void vt100GetCursor(int * v, int * h) {
+// *v = *h = 0;
+// printf("\033[6n");
+// getch(); getch();
+// int c;
+// while ((c = getch()) != ';')
+// *v = (10*(*v)+(c-'0'));
+// while ((c = getch()) != 'R')
+// *h = (10*(*h)+(c-'0'));
+// }
+void vt100GetScreenSize(int * v, int * h) {
+#ifdef _WIN32
+ CONSOLE_SCREEN_BUFFER_INFO csbi;
+ GetConsoleScreenBufferInfo(GetStdHandle(STD_OUTPUT_HANDLE), &csbi);
+ *h = csbi.srWindow.Right - csbi.srWindow.Left + 1;
+ *v = csbi.srWindow.Bottom - csbi.srWindow.Top + 1;
+#else
+ struct winsize w;
+ ioctl(STDOUT_FILENO, TIOCGWINSZ, &w);
+ *h = w.ws_row;
+ *v = w.ws_col;
+#endif
+}
+void vt100EnableAlternateBuffer() { vt100Escape("[?1049h"); }
+void vt100DisableAlternateBuffer() { vt100Escape("[?1049l"); }
+
+
+// JSON
+
+typedef enum {
+ JSONNodeKind_Nul,
+ JSONNodeKind_Int,
+ JSONNodeKind_Str,
+ JSONNodeKind_Obj,
+ JSONNodeKind_Arr,
+ JSONNodeKind_COUNT
+} JSONNodeKind;
+
+struct JSONNode;
+typedef struct JSONNode {
+ JSONNodeKind kind;
+ size_t data;
+ struct JSONNode * parent;
+ struct JSONNode * firstChild;
+ int childCount;
+ struct JSONNode * prev;
+ struct JSONNode * next;
+} JSONNode;
+
+JSONNode *
+JSONNodeNew(JSONNodeKind kind) {
+ JSONNode * result = NEW(JSONNode);
+ result->kind = kind;
+ return result;
+}
+
+JSONNode *
+JSONNodePush(JSONNode * this, JSONNode * that) {
+ if (this->firstChild == NULL) {
+ this->firstChild = that;
+ }
+ else {
+ JSONNode * lastNode = this->firstChild;
+ while (lastNode->next != NULL)
+ lastNode = lastNode->next;
+ lastNode->next = that;
+ that->prev = lastNode;
+ }
+ this->childCount++;
+ that->parent = this;
+
+ return that;
+}
+
+void
+Indent(int indent) {
+ for (int i = 0; i < indent; i++)
+ printf(" ");
+}
+
+void
+JSONNodePrint(JSONNode * node, JSONNode * currNode) {
+ if (node == NULL)
+ return;
+
+ static int indent;
+ if (node->parent == NULL)
+ indent = 0;
+
+ if (currNode == node) {
+ vt100SaveCursor();
+ }
+
+ switch (node->kind) {
+ case JSONNodeKind_Nul: {
+ printf("null");
+ break;
+ }
+ case JSONNodeKind_Int: {
+ char * str = (char *)node->data;
+ printf("%s", (str == NULL || strlen(str) == 0) ? "0" : str);
+ break;
+ }
+ case JSONNodeKind_Str: {
+ char * str = (char *)node->data;
+ printf("\"%s\"", str == NULL ? "" : str);
+ break;
+ }
+ case JSONNodeKind_Obj: {
+ printf("{\n");
+ JSONNode * ptr = node->firstChild;
+ indent++;
+ while (ptr != NULL) {
+ Indent(indent);
+ JSONNodePrint(ptr, currNode);
+ ptr = ptr->next;
+
+ if (ptr != NULL) {
+ printf(": ");
+ JSONNodePrint(ptr, currNode);
+ if (ptr->next != NULL)
+ printf(",");
+ ptr = ptr->next;
+ }
+ printf("\n");
+ }
+ indent--;
+ Indent(indent);
+ printf("}");
+ break;
+ }
+ case JSONNodeKind_Arr: {
+ printf("[\n");
+ JSONNode * ptr = node->firstChild;
+ indent++;
+ while (ptr != NULL) {
+ Indent(indent);
+ JSONNodePrint(ptr, currNode);
+ if (ptr->next != NULL)
+ printf(",");
+ printf("\n");
+ ptr = ptr->next;
+ }
+ indent--;
+ Indent(indent);
+ printf("]");
+ break;
+ }
+ }
+}
+
+
+// Input
+
+JSONNode * g_DrawNode = NULL;
+JSONNode * g_CurrNode = NULL;
+
+void
+Draw(void) {
+ vt100ClearScreen();
+ vt100CursorHome();
+
+ if (g_DrawNode != NULL) {
+ JSONNodePrint(g_DrawNode, g_CurrNode);
+ vt100RestoreCursor();
+ }
+}
+
+int
+GetChar() {
+ Draw();
+ int c = getch();
+ return c;
+}
+
+int
+PeekChar() {
+ Draw();
+ int c = peekch();
+ return c;
+}
+
+typedef bool(*CharPredicateFunc)(char, int);
+
+bool predStr(char c, int i) { return c >= 'a' && c <= 'z'; }
+bool predInt(char c, int i) { return c >= '0' && c <= '9'; }
+
+void
+GetStr(JSONNode * node, CharPredicateFunc charPredicate) {
+ node->data = (size_t)NEWARR(char, 16);
+ int strLen = 0;
+
+ char * str = (char *)node->data;
+
+ int c;
+ while ((c = PeekChar()), ! isNewline(c)) {
+ getch();
+ if ((c == 8 || c == 127) && strLen > 0) {
+ strLen--;
+ str[strLen] = '\0';
+ }
+ else if (strLen < 16 - 1 && charPredicate(c, strLen)) {
+ str[strLen] = c;
+ strLen++;
+ str[strLen] = '\0';
+ }
+ }
+}
+
+JSONNode *
+GetNode() {
+ JSONNode * result = NULL;
+
+ JSONNode * node = NULL;
+
+ while (true) {
+ if (isNewline(PeekChar())) {
+ getch();
+
+ if (node == NULL || node->parent == NULL)
+ break;
+
+ node = node->parent;
+ g_CurrNode = node;
+
+ continue;
+ }
+
+ // object key
+ if (node != NULL && node->kind == JSONNodeKind_Obj && node->childCount % 2 == 0) {
+ JSONNode * newNode = JSONNodeNew(JSONNodeKind_Str);
+ JSONNodePush(node, newNode);
+
+ node = newNode;
+ g_CurrNode = node;
+
+ GetStr(newNode, predStr);
+
+ continue;
+ }
+
+ int c = GetChar();
+
+ if (! charInString(c, "isoa"))
+ continue;
+
+ JSONNode * newNode = JSONNodeNew(JSONNodeKind_Nul);
+
+ if (result == NULL)
+ g_DrawNode = result = newNode;
+
+ if (node != NULL)
+ JSONNodePush(node, newNode);
+
+ node = newNode;
+ g_CurrNode = node;
+
+ switch (c) {
+ case 'i': {
+ node->kind = JSONNodeKind_Int;
+ GetStr(node, predInt);
+ break;
+ }
+ case 's': {
+ node->kind = JSONNodeKind_Str;
+ GetStr(node, predStr);
+ break;
+ }
+ case 'o': {
+ node->kind = JSONNodeKind_Obj;
+ break;
+ }
+ case 'a': {
+ node->kind = JSONNodeKind_Arr;
+ break;
+ }
+ case 8:
+ case 127:
+ break;
+ }
+ }
+
+ return result;
+}
+
+
+
+
+int main() {
+ vt100EnableAlternateBuffer();
+
+ JSONNode * n = GetNode();
+
+ vt100DisableAlternateBuffer();
+
+ JSONNodePrint(n, NULL);
+
+ // JSONFree(n);
+
+ return 0;
+}
projects / iftint / blobdiff