enclave 0.1.0

data/ext/enclave/mruby/mrbgems/mruby-bin-mirb/tools/mirb/mirb_highlight.h

@@ -0,0 +1,95 @@
+/*
+** mirb_highlight.h - Syntax highlighting for mirb
+**
+** See Copyright Notice in mruby.h
+*/
+
+#ifndef MIRB_HIGHLIGHT_H
+#define MIRB_HIGHLIGHT_H
+
+#include <mruby.h>
+#include <stdio.h>
+
+/*
+ * Token types for syntax highlighting
+ */
+typedef enum mirb_token_type {
+  MIRB_TOK_DEFAULT,      /* default text */
+  MIRB_TOK_KEYWORD,      /* if, else, def, class, end, etc. */
+  MIRB_TOK_STRING,       /* "..." or '...' */
+  MIRB_TOK_COMMENT,      /* # to end of line */
+  MIRB_TOK_NUMBER,       /* integers, floats */
+  MIRB_TOK_SYMBOL,       /* :symbol */
+  MIRB_TOK_CONSTANT,     /* Uppercase identifiers */
+  MIRB_TOK_IVAR,         /* @instance_var */
+  MIRB_TOK_GVAR,         /* $global_var */
+  MIRB_TOK_REGEXP,       /* /regexp/ */
+  MIRB_TOK_MAX
+} mirb_token_type;
+
+/*
+ * Color theme
+ */
+typedef enum mirb_theme {
+  MIRB_THEME_DARK,       /* light text on dark background (default) */
+  MIRB_THEME_LIGHT       /* dark text on light background */
+} mirb_theme;
+
+/*
+ * Highlighter state
+ */
+typedef struct mirb_highlighter {
+  mirb_theme theme;
+  mrb_bool enabled;
+  /* Multi-line state tracking */
+  mrb_bool in_string;
+  char string_quote;     /* '"' or '\'' */
+  mrb_bool in_heredoc;
+  mrb_bool in_regexp;
+} mirb_highlighter;
+
+/*
+ * Initialize highlighter with auto-detected or specified theme
+ */
+void mirb_highlight_init(mirb_highlighter *hl, mrb_bool enabled);
+
+/*
+ * Set theme explicitly
+ */
+void mirb_highlight_set_theme(mirb_highlighter *hl, mirb_theme theme);
+
+/*
+ * Detect theme from environment variables and terminal query
+ * Returns MIRB_THEME_DARK if cannot detect
+ */
+mirb_theme mirb_highlight_detect_theme(void);
+
+/*
+ * Pre-query terminal background color (call before any output)
+ * This caches the result for later use by mirb_highlight_detect_theme()
+ */
+void mirb_highlight_query_terminal(void);
+
+/*
+ * Print a line with syntax highlighting
+ * Handles multi-line strings/comments by tracking state
+ */
+void mirb_highlight_print_line(mirb_highlighter *hl, const char *line);
+
+/*
+ * Reset multi-line state (call when starting new input)
+ */
+void mirb_highlight_reset(mirb_highlighter *hl);
+
+/*
+ * Print result value with highlighting
+ * Prints " => " prefix and the result string with appropriate colors
+ */
+void mirb_highlight_print_result(mirb_highlighter *hl, const char *result);
+
+/*
+ * Print error message with highlighting
+ */
+void mirb_highlight_print_error(mirb_highlighter *hl, const char *error);
+
+#endif /* MIRB_HIGHLIGHT_H */

data/ext/enclave/mruby/mrbgems/mruby-bin-mirb/tools/mirb/mirb_history.c

@@ -0,0 +1,185 @@
+/*
+** mirb_history.c - Command history for mirb editor
+**
+** See Copyright Notice in mruby.h
+*/
+
+#include "mirb_history.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+/* Windows compatibility */
+#ifdef _MSC_VER
+#define strdup _strdup
+#endif
+
+/*
+ * Initialize history
+ */
+mrb_bool
+mirb_history_init(mirb_history *hist, size_t capacity)
+{
+  memset(hist, 0, sizeof(*hist));
+
+  if (capacity == 0) capacity = MIRB_HISTORY_SIZE;
+
+  hist->entries = (char**)calloc(capacity, sizeof(char*));
+  if (hist->entries == NULL) return FALSE;
+
+  hist->capacity = capacity;
+  hist->count = 0;
+  hist->start = 0;
+  hist->pos = 0;
+  hist->saved_input = NULL;
+  hist->browsing = FALSE;
+
+  return TRUE;
+}
+
+/*
+ * Free history resources
+ */
+void
+mirb_history_free(mirb_history *hist)
+{
+  if (hist->entries) {
+    for (size_t i = 0; i < hist->capacity; i++) {
+      free(hist->entries[i]);
+    }
+    free(hist->entries);
+    hist->entries = NULL;
+  }
+  free(hist->saved_input);
+  hist->saved_input = NULL;
+  hist->count = 0;
+  hist->capacity = 0;
+}
+
+/*
+ * Get actual index in circular buffer
+ */
+static size_t
+actual_index(mirb_history *hist, size_t logical_idx)
+{
+  return (hist->start + logical_idx) % hist->capacity;
+}
+
+/*
+ * Add entry to history
+ */
+void
+mirb_history_add(mirb_history *hist, const char *entry)
+{
+  if (entry == NULL || entry[0] == '\0') return;
+
+  /* Don't add if same as last entry */
+  if (hist->count > 0) {
+    size_t last_idx = actual_index(hist, hist->count - 1);
+    if (strcmp(hist->entries[last_idx], entry) == 0) {
+      return;
+    }
+  }
+
+  char *copy = strdup(entry);
+  if (copy == NULL) return;
+
+  if (hist->count < hist->capacity) {
+    /* Still have room */
+    size_t idx = actual_index(hist, hist->count);
+    hist->entries[idx] = copy;
+    hist->count++;
+  }
+  else {
+    /* Buffer is full, overwrite oldest */
+    size_t idx = hist->start;
+    free(hist->entries[idx]);
+    hist->entries[idx] = copy;
+    hist->start = (hist->start + 1) % hist->capacity;
+  }
+
+  /* Reset browsing state */
+  hist->browsing = FALSE;
+  hist->pos = hist->count;
+}
+
+/*
+ * Start browsing history
+ */
+void
+mirb_history_browse_start(mirb_history *hist, const char *current_input)
+{
+  if (hist->browsing) return;
+
+  free(hist->saved_input);
+  hist->saved_input = current_input ? strdup(current_input) : NULL;
+  hist->browsing = TRUE;
+  hist->pos = hist->count;  /* Start past the end (at current input) */
+}
+
+/*
+ * Stop browsing history
+ */
+void
+mirb_history_browse_stop(mirb_history *hist)
+{
+  free(hist->saved_input);
+  hist->saved_input = NULL;
+  hist->browsing = FALSE;
+  hist->pos = hist->count;
+}
+
+/*
+ * Get previous entry (older)
+ */
+const char *
+mirb_history_prev(mirb_history *hist)
+{
+  if (hist->count == 0) return NULL;
+
+  if (!hist->browsing) {
+    /* Should call browse_start first, but handle gracefully */
+    hist->browsing = TRUE;
+    hist->pos = hist->count;
+  }
+
+  if (hist->pos == 0) {
+    /* Already at oldest entry */
+    return NULL;
+  }
+
+  hist->pos--;
+  return hist->entries[actual_index(hist, hist->pos)];
+}
+
+/*
+ * Get next entry (newer)
+ */
+const char *
+mirb_history_next(mirb_history *hist)
+{
+  if (!hist->browsing) return NULL;
+
+  if (hist->pos >= hist->count) {
+    /* Already at current input */
+    return NULL;
+  }
+
+  hist->pos++;
+
+  if (hist->pos >= hist->count) {
+    /* Moved past newest entry, return saved input */
+    return hist->saved_input ? hist->saved_input : "";
+  }
+
+  return hist->entries[actual_index(hist, hist->pos)];
+}
+
+/*
+ * Get current entry count
+ */
+size_t
+mirb_history_count(mirb_history *hist)
+{
+  return hist->count;
+}

data/ext/enclave/mruby/mrbgems/mruby-bin-mirb/tools/mirb/mirb_history.h

@@ -0,0 +1,76 @@
+/*
+** mirb_history.h - Command history for mirb editor
+**
+** See Copyright Notice in mruby.h
+*/
+
+#ifndef MIRB_HISTORY_H
+#define MIRB_HISTORY_H
+
+#include <mruby.h>
+#include <stddef.h>
+
+/* Default history size */
+#define MIRB_HISTORY_SIZE 100
+
+/*
+ * History entry
+ */
+typedef struct mirb_history {
+  char **entries;         /* array of history entries */
+  size_t capacity;        /* max number of entries */
+  size_t count;           /* current number of entries */
+  size_t start;           /* index of oldest entry (circular buffer) */
+  size_t pos;             /* current browsing position */
+  char *saved_input;      /* saved current input when browsing */
+  mrb_bool browsing;      /* TRUE if currently browsing history */
+} mirb_history;
+
+/*
+ * Initialize history
+ * Returns TRUE on success
+ */
+mrb_bool mirb_history_init(mirb_history *hist, size_t capacity);
+
+/*
+ * Free history resources
+ */
+void mirb_history_free(mirb_history *hist);
+
+/*
+ * Add entry to history
+ * Empty strings are not added
+ * Duplicate of last entry is not added
+ */
+void mirb_history_add(mirb_history *hist, const char *entry);
+
+/*
+ * Start browsing history
+ * Saves the current input for later restoration
+ */
+void mirb_history_browse_start(mirb_history *hist, const char *current_input);
+
+/*
+ * Stop browsing history
+ */
+void mirb_history_browse_stop(mirb_history *hist);
+
+/*
+ * Get previous entry (older)
+ * Returns NULL if at oldest entry or history is empty
+ */
+const char *mirb_history_prev(mirb_history *hist);
+
+/*
+ * Get next entry (newer)
+ * Returns saved input if moving past newest entry
+ * Returns NULL if not browsing
+ */
+const char *mirb_history_next(mirb_history *hist);
+
+/*
+ * Get current entry count
+ */
+size_t mirb_history_count(mirb_history *hist);
+
+#endif /* MIRB_HISTORY_H */