Initial support for ncurses.

3 files changed, 507 insertions, 177 deletions

diff --git a/core/gui.lua b/core/gui.lua
index 6681388a..97cc481a 100644
--- a/core/gui.lua
+++ b/core/gui.lua
@@ -4,7 +4,7 @@ local gui = gui
 
 --[[ This comment is for LuaDoc.
 --- The core gui table.
--- @field title (string)
+-- @field title (string, Write-only)
 --   The title of the Textadept window.
 -- @field context_menu
 --   A GTK menu defining the editor's context menu.
diff --git a/src/Makefile b/src/Makefile
index a7110d60..955046b7 100644
--- a/src/Makefile
+++ b/src/Makefile
@@ -7,10 +7,13 @@ CC = gcc
 CPP = g++
 PKG_CONFIG = pkg-config
 PKG_CONFIG_PATH = $PKG_CONFIG_PATH
-ifndef BSD
+ifndef NCURSES
 PLAT_FLAGS = -DGTK
 else
-PLAT_FLAGS = -DGTK -D__BSD__
+PLAT_FLAGS = -DNCURSES
+endif
+ifdef BSD
+PLAT_FLAGS += -D__BSD__
 endif
 SCI_THREAD_FLAG =
 LUAFLAGS = -DLUA_USE_LINUX
@@ -30,7 +33,7 @@ CC = i486-mingw32-gcc -mms-bitfields
 CPP = i486-mingw32-g++ -mms-bitfields -mwindows -static-libgcc -static-libstdc++
 PKG_CONFIG = pkg-config --define-variable=prefix=win32gtk
 PKG_CONFIG_PATH = $(shell pwd)/win32gtk/lib/pkgconfig
-PLAT_FLAGS = -DGTK -D__WIN32__
+PLAT_FLAGS += -D__WIN32__
 SCI_THREAD_FLAG = -DG_THREADS_IMPL_NONE
 LUAFLAGS = -D_WIN32 -DWIN32
 TEXTADEPT = textadept.exe
@@ -52,7 +55,7 @@ CPP = g++ -arch i386 -mdynamic-no-pic -mmacosx-version-min=10.5 \
   -isysroot /Developer/SDKs/MacOSX10.5.sdk
 PKG_CONFIG = gtkosx/bin/pkg-config --define-variable=prefix=gtkosx
 PKG_CONFIG_PATH = $(shell pwd)/gtkosx/lib/pkgconfig
-PLAT_FLAGS = -DGTK -D__OSX__
+PLAT_FLAGS += -D__OSX__
 SCI_THREAD_FLAG =
 LUAFLAGS = -DLUA_USE_MACOSX
 TEXTADEPT = textadept.osx
@@ -91,6 +94,9 @@ SI_FLAG =
 endif
 
 INCLUDEDIRS = -Iscintilla/include -I$(LUADIR)/src -Igcocoadialog
+ifdef NCURSES
+INCLUDEDIRS += -Iscintilla/term -Itermkey
+endif
 
 ifdef GTK3
 GTKVERSION = gtk+-3.0
@@ -104,6 +110,9 @@ CFLAGS = -std=c99 $(DEBUG_FLAG) $(LUAJIT_FLAG) $(SI_FLAG) -O $(PLAT_FLAGS) \
   $(INCLUDEDIRS) -W -Wall -Wno-sign-compare -Wno-unused
 GTKFLAGS = $(shell PKG_CONFIG_PATH=$(PKG_CONFIG_PATH) $(PKG_CONFIG) \
   --cflags $(GTKVERSION))
+ifndef NCURSES
+CFLAGS += $(GTKFLAGS)
+endif
 GTKLIBS = $(shell PKG_CONFIG_PATH=$(PKG_CONFIG_PATH) $(PKG_CONFIG) \
   --libs $(GTKVERSION))
 ifdef LIBPNG12
@@ -112,7 +121,15 @@ endif
 ifdef OSX
 GTKLIBS += -framework Cocoa -lgtkmacintegration
 endif
-GCDFLAGS = -DNOHELP -DLIBRARY
+GCDFLAGS = $(PLAT_FLAGS) -DNOHELP -DLIBRARY
+ifndef NCURSES
+GCDFLAGS += $(GTKFLAGS)
+endif
+ifndef NCURSES
+LIBS = $(GTKLIBS)
+else
+LIBS = -lncursesw -lcdk
+endif
 
 TEXTADEPT_OBJS = textadept.o
 LUA_OBJS = lapi.o lcode.o lctype.o ldebug.o ldo.o ldump.o lfunc.o lgc.o \
@@ -124,13 +141,18 @@ LUA_OBJS = lapi.o lcode.o lctype.o ldebug.o ldo.o ldump.o lfunc.o lgc.o \
 LUA_SRCS = lua/src/*.c lua/src/lib/*.c
 LUAJIT_OBJS =
 GCOCOADIALOG = gcocoadialog.o
+ifdef NCURSES
+TERMKEY_OBJS = termkey.o driver-ti.o driver-csi.o
+endif
 
 # Scintilla
 
 SCIFLAGS = $(DEBUG_FLAG) -pedantic -Os $(PLAT_FLAGS) -DSCI_LEXER \
-  $(SCI_THREAD_FLAG) $(INCLUDEDIRS) -Iscintilla/src -Iscintilla/gtk \
-  -Iscintilla/lexlib \
+  $(SCI_THREAD_FLAG) $(INCLUDEDIRS) -Iscintilla/src -Iscintilla/lexlib \
   -Wall -Wno-missing-braces -Wno-char-subscripts -Wno-long-long
+ifndef NCURSES
+SCIFLAGS += -Iscintilla/gtk
+endif
 
 SCINTILLA_OBJS = AutoComplete.o CallTip.o Catalogue.o CellBuffer.o \
   CharClassify.o ContractionState.o Decoration.o Document.o Editor.o \
@@ -138,9 +160,15 @@ SCINTILLA_OBJS = AutoComplete.o CallTip.o Catalogue.o CellBuffer.o \
   PositionCache.o RESearch.o RunStyles.o ScintillaBase.o Selection.o \
   Style.o UniConversion.o ViewStyle.o XPM.o \
   Accessor.o CharacterSet.o LexerBase.o LexerModule.o LexerNoExceptions.o \
-  LexerSimple.o PropSetSimple.o StyleContext.o WordList.o \
-  PlatGTK.o ScintillaGTK.o
+  LexerSimple.o PropSetSimple.o StyleContext.o WordList.o
+ifndef NCURSES
+SCINTILLA_GTK_OBJS = PlatGTK.o ScintillaGTK.o
 SCINTILLA_MARSHALLER = scintilla-marshal.o
+SCINTILLA_PLAT_OBJS = $(SCINTILLA_GTK_OBJS) $(SCINTILLA_MARSHALLER)
+else
+SCINTILLA_TERM_OBJS = ScintillaTerm.o
+SCINTILLA_PLAT_OBJS = $(SCINTILLA_TERM_OBJS)
+endif
 SCINTILLA_LEXER = LexLPeg.o
 
 # Build
@@ -156,15 +184,18 @@ endif
 
 all: $(TEXTADEPT)
 
-$(SCINTILLA_OBJS): scintilla/gtk/*.cxx scintilla/src/*.cxx \
-  scintilla/lexlib/*.cxx
+$(SCINTILLA_OBJS): scintilla/src/*.cxx scintilla/lexlib/*.cxx
+	$(CPP) $(SCIFLAGS) -c $^
+$(SCINTILLA_GTK_OBJS): scintilla/gtk/*.cxx
 	$(CPP) $(SCIFLAGS) $(GTKFLAGS) -c $^
+$(SCINTILLA_TERM_OBJS): scintilla/term/*.cxx
+	$(CPP) $(SCIFLAGS) -c $^
 $(SCINTILLA_MARSHALLER): scintilla/gtk/scintilla-marshal.c
 	$(CC) $(SCIFLAGS) $(GTKFLAGS) -w -c $<
 $(SCINTILLA_LEXER): LexLPeg.cxx
-	$(CPP) $(SCIFLAGS) $(GTKFLAGS) $(LUAFLAGS) -DLPEG_LEXER -DNO_SCITE -c $< -o $@
+	$(CPP) $(SCIFLAGS) $(LUAFLAGS) -DLPEG_LEXER -DNO_SCITE -c $< -o $@
 $(TEXTADEPT_OBJS): textadept.c
-	$(CC) $(CFLAGS) $(GTKFLAGS) -c $< -o $@
+	$(CC) $(CFLAGS) -c $< -o $@
 $(LUA_OBJS): $(LUA_SRCS)
 	$(CC) $(LUAFLAGS) $(INCLUDEDIRS) -c $^
 ifdef LUAJIT
@@ -174,12 +205,14 @@ $(LUAJIT_OBJS):
 	cd luajit && make $(LUAJIT_MAKE)
 	cp luajit/src/$(LUAJIT_LIB) .
 $(GCOCOADIALOG): gcocoadialog/gcocoadialog.c
-	$(CC) $(GTKFLAGS) $(GCDFLAGS) $(INCLUDEDIRS) -c $<
+	$(CC) $(GCDFLAGS) $(INCLUDEDIRS) -c $<
+$(TERMKEY_OBJS): termkey/*.c
+	$(CC) -std=c99 -c $^
 $(TEXTADEPT):\
-  $(SCINTILLA_OBJS) $(SCINTILLA_MARSHALLER) $(SCINTILLA_LEXER) \
+  $(SCINTILLA_OBJS) $(SCINTILLA_PLAT_OBJS) $(SCINTILLA_LEXER) \
   $(TEXTADEPT_OBJS) $(LUA_OBJS) $(LUAJIT_OBJS) $(GCOCOADIALOG) \
-  $(TEXTADEPT_RC)
-	$(CPP) $(EXPORTLUASYMS) -o $@ $^ $(GTKLIBS) $(LDL)
+  $(TERMKEY_OBJS) $(TEXTADEPT_RC)
+	$(CPP) $(EXPORTLUASYMS) -o $@ $^ $(LIBS) $(LDL)
 	mv $(TEXTADEPT) ../
 $(TEXTADEPT_RC): textadept.rc
 	$(WINDRES) $^ $@
diff --git a/src/textadept.c b/src/textadept.c
index b59f169e..19ac73bc 100644
--- a/src/textadept.c
+++ b/src/textadept.c
@@ -1,22 +1,11 @@
 // Copyright 2007-2012 Mitchell mitchell.att.foicica.com. See LICENSE.
 
 #include <locale.h>
+#include <iconv.h>
 #include <stdarg.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
-#include <gtk/gtk.h>
-
-#define PLAT_GTK 1
-#include "Scintilla.h"
-#include "SciLexer.h"
-#include "ScintillaWidget.h"
-
-#include "gcocoadialog.h"
-#include "lua.h"
-#include "lualib.h"
-#include "lauxlib.h"
-
 #if __WIN32__
 #include <windows.h>
 #define main main_
@@ -25,11 +14,36 @@
 #elif __BSD__
 #include <sys/types.h>
 #include <sys/sysctl.h>
+#else
+#include <unistd.h>
+#endif
+#if GTK
+#include <gtk/gtk.h>
+#define PLAT_GTK 1
+#elif NCURSES
+#include <ncurses.h>
+#define PLAT_TERM 1
 #endif
 
+#include "gcocoadialog.h"
+#include "lua.h"
+#include "lualib.h"
+#include "lauxlib.h"
+#include "Scintilla.h"
+#include "SciLexer.h"
+#if GTK
+#include "ScintillaWidget.h"
+#elif NCURSES
+#include "ScintillaTerm.h"
+#include "termkey.h"
+#endif
+
+#if GTK
+typedef GtkWidget Scintilla;
 #define SS(view, m, w, l) scintilla_send_message(SCINTILLA(view), m, w, l)
 #define signal(o, s, c) g_signal_connect(G_OBJECT(o), s, G_CALLBACK(c), 0)
-
+#define focus_view(v) gtk_widget_grab_focus(v)
+#define scintilla_delete(w) gtk_widget_destroy(w)
 #if GTK_CHECK_VERSION(3,0,0)
 #define gtk_statusbar_set_has_resize_grip(_,__)
 #define gtk_combo_box_entry_new_with_model(m,_) \
@@ -37,74 +51,114 @@
 #define gtk_combo_box_entry_set_text_column gtk_combo_box_set_entry_text_column
 #define GTK_COMBO_BOX_ENTRY GTK_COMBO_BOX
 #endif
+#elif NCURSES
+#define SS(view, m, w, l) scintilla_send_message(view, m, w, l)
+#define focus_view(v) \
+  SS(focused_view, SCI_SETFOCUS, 0, 0), SS(v, SCI_SETFOCUS, 1, 0)
+#endif
+#define copy(s) strcpy(malloc(strlen(s) + 1), s)
 
 /******************************************************************************/
 /***************************** Forward Declarations ***************************/
 /******************************************************************************/
 
 // Window
+char *textadept_home = NULL;
+#if GTK
 GtkWidget *window, *focused_view, *menubar, *statusbar[2];
 GtkAccelGroup *accel;
-char *textadept_home;
 static void new_window();
 static GtkWidget *new_view(sptr_t);
 static void new_buffer(sptr_t);
-static void s_notify(GtkWidget *, gint, gpointer, gpointer);
-static void s_command(GtkWidget *, gint, gpointer, gpointer);
-static gboolean s_keypress(GtkWidget *, GdkEventKey *, gpointer);
-static gboolean s_buttonpress(GtkWidget *, GdkEventButton *, gpointer);
-static gboolean w_focus(GtkWidget *, GdkEventFocus *, gpointer);
-static gboolean w_keypress(GtkWidget *, GdkEventKey *, gpointer);
-static gboolean w_exit(GtkWidget *, GdkEventAny *, gpointer);
+static void s_notify(GtkWidget *, int, void *, void *);
+static void s_command(GtkWidget *, int, void *, void *);
+static int s_keypress(GtkWidget *, GdkEventKey *, void *);
+static int s_buttonpress(GtkWidget *, GdkEventButton *, void *);
+static int w_focus(GtkWidget *, GdkEventFocus *, void *);
+static int w_keypress(GtkWidget *, GdkEventKey *, void *);
+static int w_exit(GtkWidget *, GdkEventAny *, void *);
 #if GLIB_CHECK_VERSION(2,28,0) && SINGLE_INSTANCE
-static int a_command_line(GApplication *, GApplicationCommandLine *, gpointer);
+static int a_command_line(GApplication *, GApplicationCommandLine *, void *);
 #endif
 #if __OSX__
 GtkOSXApplication *osxapp;
 #define app_signal(a, s, c) g_signal_connect(a, s, G_CALLBACK(c), 0)
-static gboolean w_open_osx(GtkOSXApplication *, char *, gpointer);
-static gboolean w_exit_osx(GtkOSXApplication *, gpointer);
-static void w_quit_osx(GtkOSXApplication *, gpointer);
+static int w_open_osx(GtkOSXApplication *, char *, void *);
+static int w_exit_osx(GtkOSXApplication *, void *);
+static void w_quit_osx(GtkOSXApplication *, void *);
+#endif
+#elif NCURSES
+Scintilla *focused_view;
+static void new_window();
+static Scintilla *new_view(sptr_t);
+static void new_buffer(sptr_t);
+static void s_notify(Scintilla *, int, void *, void *);
 #endif
 
 // Find/Replace
+#if GTK
 GtkWidget *findbox, *find_entry, *replace_entry, *fnext_button, *fprev_button,
           *r_button, *ra_button, *match_case_opt, *whole_word_opt, *lua_opt,
           *in_files_opt, *flabel, *rlabel;
-GtkListStore *find_store, *repl_store;
-static GtkWidget *new_findbox();
-static void f_clicked(GtkWidget *, gpointer);
+typedef GtkListStore LIST_STORE;
+LIST_STORE *find_store, *repl_store;
+typedef GtkWidget FINDBOX;
+typedef GtkWidget * FIND_BUTTON;
+#elif NCURSES
+WINDOW *findbox;
+char *find_text = NULL, *repl_text = NULL;
+enum { fnext_button, fprev_button, r_button, ra_button };
+int match_case_opt = FALSE, whole_word_opt = FALSE, lua_opt = FALSE,
+    in_files_opt = FALSE;
+typedef char * LIST_STORE;
+LIST_STORE find_store[10] = {
+  NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL
+}, repl_store[10] = {
+  NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL
+};
+typedef WINDOW FINDBOX;
+typedef int FIND_BUTTON;
+#endif
+static FINDBOX *new_findbox();
+static void f_clicked(FIND_BUTTON, void *);
 
 // Command Entry
+#if GTK
 GtkWidget *command_entry;
 GtkListStore *cc_store;
 GtkEntryCompletion *command_entry_completion;
 static int cc_matchfunc(GtkEntryCompletion *, const char *, GtkTreeIter *,
-                        gpointer);
-static gboolean cc_matchselected(GtkEntryCompletion *, GtkTreeModel *,
-                                 GtkTreeIter *, gpointer);
-static void c_activate(GtkWidget *, gpointer);
-static gboolean c_keypress(GtkWidget *, GdkEventKey *, gpointer);
+                        void *);
+static int cc_matchselected(GtkEntryCompletion *, GtkTreeModel *, GtkTreeIter *,
+                            void *);
+static void c_activate(GtkWidget *, void *);
+static int c_keypress(GtkWidget *, GdkEventKey *, void *);
+#elif NCURSES
+char *command_text = NULL;
+#endif
 
 // Lua
 lua_State *lua;
+#if NCURSES
+int quit = FALSE;
+#endif
 int closing = FALSE;
-char *statusbar_text = 0;
+char *statusbar_text = NULL;
 static int tVOID = 0, tINT = 1, tLENGTH = 2, /*tPOSITION = 3, tCOLOUR = 4,*/
            tBOOL = 5, tKEYMOD = 6, tSTRING = 7, tSTRINGRESULT = 8;
 static int lL_init(lua_State *, int, char **, int);
 static void l_close(lua_State *);
 static int lL_dofile(lua_State *, const char *);
-static void lL_addview(lua_State *, GtkWidget *);
-static void lL_removeview(lua_State *, GtkWidget *);
+static void lL_addview(lua_State *, Scintilla *);
+static void lL_removeview(lua_State *, Scintilla *);
 static void lL_adddoc(lua_State *, sptr_t);
 static void lL_removedoc(lua_State *, sptr_t);
-static void lL_gotodoc(lua_State *, GtkWidget *, int, int);
+static void lL_gotodoc(lua_State *, Scintilla *, int, int);
 static int lL_event(lua_State *, const char *, ...);
 static void lL_notify(lua_State *, struct SCNotification *);
-static void lL_showcontextmenu(lua_State *, GdkEventButton *);
+static void lL_showcontextmenu(lua_State *, void *);
 static void lL_cleartable(lua_State *, int);
-static void l_pushview(lua_State *, GtkWidget *);
+static void l_pushview(lua_State *, Scintilla *);
 static void l_pushdoc(lua_State *, sptr_t);
 #define l_setglobalview(l, v) (l_pushview(l, v), lua_setglobal(l, "view"))
 #define l_setglobaldoc(l, d) (l_pushdoc(l, d), lua_setglobal(l, "buffer"))
@@ -120,7 +174,7 @@ static int lbuf_property(lua_State *),
            lview_split(lua_State *), lview_unsplit(lua_State *),
            lgui_dialog(lua_State *), lgui_get_split_table(lua_State *),
            lgui_goto_view(lua_State *), lview_goto_buffer(lua_State *),
-           lgui_gtkmenu(lua_State *), lstring_iconv(lua_State *),
+           lgui_menu(lua_State *), lstring_iconv(lua_State *),
            lquit(lua_State *), lreset(lua_State *), ltimeout(lua_State *),
            lfind_focus(lua_State *), lfind_next(lua_State *),
            lfind_prev(lua_State *), lfind_replace(lua_State *),
@@ -139,10 +193,16 @@ static int lbuf_property(lua_State *),
  * @param argv The array of command line params.
  */
 int main(int argc, char **argv) {
+#if GTK
   gtk_init(&argc, &argv);
+#elif NCURSES
+  TermKey *tk = termkey_new(0, TERMKEY_FLAG_NOTERMIOS);
+  initscr(); // raw()/cbreak() and noecho() are taken care of in libtermkey
+#endif
 
 #if !(__WIN32__ || __OSX__ || __BSD__)
-  textadept_home = g_file_read_link("/proc/self/exe", NULL);
+  textadept_home = malloc(FILENAME_MAX);
+  readlink("/proc/self/exe", textadept_home, FILENAME_MAX);
 #elif __WIN32__
   textadept_home = malloc(FILENAME_MAX);
   GetModuleFileName(0, textadept_home, FILENAME_MAX);
@@ -158,24 +218,28 @@ int main(int argc, char **argv) {
   size_t cb = FILENAME_MAX;
   sysctl(mib, 4, textadept_home, &cb, NULL, 0);
 #endif
-#if !__OSX__
-  char *last_slash = strrchr(textadept_home, G_DIR_SEPARATOR);
-  if (last_slash) *last_slash = '\0';
+#if !(__WIN32__ || __OSX__)
+  char *last_slash = strrchr(textadept_home, '/');
+#elif !__OSX__
+  char *last_slash = strrchr(textadept_home, '\\');
 #endif
+  if (last_slash) *last_slash = '\0';
 
+#if GTK
 #if GLIB_CHECK_VERSION(2,28,0) && SINGLE_INSTANCE
-  int force = 0;
+  int force = FALSE;
   for (int i = 0; i < argc; i++)
     if (strcmp("-f", argv[i]) == 0 || strcmp("--force", argv[i]) == 0) {
-      force = 1;
+      force = TRUE;
       break;
     }
   GApplication *app = g_application_new("textadept.editor",
                                         G_APPLICATION_HANDLES_COMMAND_LINE);
   g_signal_connect(app, "command-line", G_CALLBACK(a_command_line), 0);
-  gboolean registered = g_application_register(app, NULL, NULL);
+  int registered = g_application_register(app, NULL, NULL);
   if (!registered || !g_application_get_is_remote(app) || force) {
 #endif
+#endif
 
   setlocale(LC_NUMERIC, "C");
   if (lua = luaL_newstate(), !lL_init(lua, argc, argv, FALSE)) return 1;
@@ -185,6 +249,7 @@ int main(int argc, char **argv) {
   gtk_osxapplication_ready(osxapp);
 #endif
 
+#if GTK
 #if GLIB_CHECK_VERSION(2,28,0) && SINGLE_INSTANCE
     gtk_main();
   } else g_application_run(app, argc, argv);
@@ -192,6 +257,59 @@ int main(int argc, char **argv) {
 #else
   gtk_main();
 #endif
+#elif NCURSES
+  TermKeyResult res;
+  TermKeyKey key;
+  int c = 0;
+  while ((res = termkey_waitkey(tk, &key)) != TERMKEY_RES_EOF) {
+    if (res == TERMKEY_RES_ERROR) continue;
+    switch (key.type) {
+      case TERMKEY_TYPE_UNICODE: c = key.code.codepoint; break;
+      case TERMKEY_TYPE_KEYSYM:
+        switch (key.code.sym) {
+          case TERMKEY_SYM_BACKSPACE: c = SCK_BACK; break;
+          case TERMKEY_SYM_TAB: c = SCK_TAB; break;
+          case TERMKEY_SYM_ENTER: c = SCK_RETURN; break;
+          case TERMKEY_SYM_ESCAPE: c = SCK_ESCAPE; break;
+          case TERMKEY_SYM_UP: c = SCK_UP; break;
+          case TERMKEY_SYM_DOWN: c = SCK_DOWN; break;
+          case TERMKEY_SYM_LEFT: c = SCK_LEFT; break;
+          case TERMKEY_SYM_RIGHT: c = SCK_RIGHT; break;
+          case TERMKEY_SYM_INSERT: c = SCK_INSERT; break;
+          case TERMKEY_SYM_DELETE: c = SCK_DELETE; break;
+          case TERMKEY_SYM_PAGEUP: c = SCK_PRIOR; break;
+          case TERMKEY_SYM_PAGEDOWN: c = SCK_NEXT; break;
+          case TERMKEY_SYM_HOME: c = SCK_HOME; break;
+          case TERMKEY_SYM_END: c = SCK_END; break;
+          default: break;
+        }
+        break;
+      default: continue;
+    }
+//    if (c == SCK_ESCAPE && gtk_widget_get_visible(findbox) &&
+//        !gtk_widget_has_focus(command_entry)) {
+//      gtk_widget_hide(findbox);
+//      gtk_widget_grab_focus(focused_view);
+//    } else
+    curs_set(0); // disable cursor when Scintilla has focus
+    if (!lL_event(lua, "keypress", LUA_TNUMBER, c, LUA_TBOOLEAN,
+                  key.modifiers & TERMKEY_KEYMOD_SHIFT, LUA_TBOOLEAN,
+                  key.modifiers & TERMKEY_KEYMOD_CTRL, LUA_TBOOLEAN,
+                  key.modifiers & TERMKEY_KEYMOD_ALT, LUA_TBOOLEAN, FALSE, -1))
+      scintilla_send_key(focused_view, c, key.modifiers & TERMKEY_KEYMOD_SHIFT,
+                         key.modifiers & TERMKEY_KEYMOD_CTRL,
+                         key.modifiers & TERMKEY_KEYMOD_ALT);
+    if (quit && lL_event(lua, "quit", -1)) {
+      l_close(lua);
+      break;
+    } else quit = FALSE;
+//    redrawwin(stdscr);
+    wrefresh(scintilla_get_window(focused_view));
+    redrawwin(scintilla_get_window(focused_view));
+  }
+  endwin();
+  termkey_destroy(tk);
+#endif
 
   free(textadept_home);
   return 0;
@@ -214,6 +332,7 @@ int WINAPI WinMain(HINSTANCE _, HINSTANCE __, LPSTR lpCmdLine, int ___) {
  * other for buffer status.
  */
 static void new_window() {
+#if GTK
   GList *icon_list = NULL;
   const char *icons[] = { "16x16", "32x32", "48x48", "64x64", "128x128" };
   for (int i = 0; i < 5; i++) {
@@ -290,6 +409,11 @@ static void new_window() {
   gtk_widget_hide(menubar); // hide initially
   gtk_widget_hide(findbox); // hide initially
   gtk_widget_hide(command_entry); // hide initially
+#elif NCURSES
+  Scintilla *view = new_view(0);
+  wresize(scintilla_get_window(view), LINES - 2, COLS);
+  mvwin(scintilla_get_window(view), 1, 0);
+#endif
 }
 
 /**
@@ -300,17 +424,21 @@ static void new_window() {
  * @return Scintilla view
  * @see lL_addview
  */
-static GtkWidget *new_view(sptr_t doc) {
-  GtkWidget *view = scintilla_new();
+static Scintilla *new_view(sptr_t doc) {
+#if GTK
+  Scintilla *view = scintilla_new();
   gtk_widget_set_size_request(view, 1, 1); // minimum size
-  SS(view, SCI_USEPOPUP, 0, 0);
   signal(view, SCINTILLA_NOTIFY, s_notify);
   signal(view, "command", s_command);
   signal(view, "key-press-event", s_keypress);
   signal(view, "button-press-event", s_buttonpress);
+#elif NCURSES
+  Scintilla *view = scintilla_new(s_notify);
+#endif
+  SS(view, SCI_USEPOPUP, 0, 0);
   lL_addview(lua, view);
-  gtk_widget_grab_focus(view);
   focused_view = view;
+  focus_view(view);
   if (doc) {
     SS(view, SCI_SETDOCPOINTER, 0, doc);
     l_setglobaldoc(lua, doc);
@@ -325,9 +453,9 @@ static GtkWidget *new_view(sptr_t doc) {
  * @param view The Scintilla view to remove.
  * @see lL_removeview
  */
-static void delete_view(GtkWidget *view) {
+static void delete_view(Scintilla *view) {
   lL_removeview(lua, view);
-  gtk_widget_destroy(view);
+  scintilla_delete(view);
 }
 
 /**
@@ -369,16 +497,18 @@ static void delete_buffer(sptr_t doc) {
  * @param vertical Flag indicating whether to split the view vertically or
  *   horozontally.
  */
-static void split_view(GtkWidget *view, int vertical) {
-  g_object_ref(view);
+static void split_view(Scintilla *view, int vertical) {
+  sptr_t curdoc = SS(view, SCI_GETDOCPOINTER, 0, 0);
   int first_line = SS(view, SCI_GETFIRSTVISIBLELINE, 0, 0);
   int current_pos = SS(view, SCI_GETCURRENTPOS, 0, 0);
   int anchor = SS(view, SCI_GETANCHOR, 0, 0);
+
+#if GTK
   GtkAllocation allocation;
   gtk_widget_get_allocation(view, &allocation);
   int middle = (vertical ? allocation.width : allocation.height) / 2;
 
-  sptr_t curdoc = SS(view, SCI_GETDOCPOINTER, 0, 0);
+  g_object_ref(view);
   GtkWidget *view2 = new_view(curdoc);
   GtkWidget *parent = gtk_widget_get_parent(view);
   gtk_container_remove(GTK_CONTAINER(parent), view);
@@ -387,14 +517,28 @@ static void split_view(GtkWidget *view, int vertical) {
   gtk_container_add(GTK_CONTAINER(parent), pane);
   gtk_paned_set_position(GTK_PANED(pane), middle);
   gtk_widget_show_all(pane);
-  gtk_widget_grab_focus(view2);
+  g_object_unref(view);
+#elif NCURSES
+  WINDOW *win = scintilla_get_window(view);
+  int x, y;
+  getbegyx(win, y, x);
+  int width = getmaxx(win) - x, height = getmaxy(win) - y;
+  wresize(win, vertical ? height : height / 2, vertical ? width / 2 : width);
+  Scintilla *view2 = new_view(curdoc);
+  wresize(scintilla_get_window(view2), vertical ? height : height / 2,
+                                       vertical ? width / 2 : width);
+  mvwin(scintilla_get_window(view2), vertical ? y : y + height / 2,
+                                     vertical ? x + width / 2 : x);
+  // TODO: draw split
+#endif
+  focus_view(view2);
 
   SS(view2, SCI_SETSEL, anchor, current_pos);
   int new_first_line = SS(view2, SCI_GETFIRSTVISIBLELINE, 0, 0);
   SS(view2, SCI_LINESCROLL, first_line - new_first_line, 0);
-  g_object_unref(view);
 }
 
+#if GTK
 /**
  * Remove all Scintilla views from the given pane and delete them.
  * @param pane The GTK pane to remove Scintilla views from.
@@ -406,6 +550,7 @@ static void remove_views_from_pane(GtkWidget *pane) {
   GTK_IS_PANED(child1) ? remove_views_from_pane(child1) : delete_view(child1);
   GTK_IS_PANED(child2) ? remove_views_from_pane(child2) : delete_view(child2);
 }
+#endif
 
 /**
  * Unsplits the pane a given Scintilla view is in and keeps the view.
@@ -414,7 +559,8 @@ static void remove_views_from_pane(GtkWidget *pane) {
  * @see remove_views_from_pane
  * @see delete_view
  */
-static int unsplit_view(GtkWidget *view) {
+static int unsplit_view(Scintilla *view) {
+#if GTK
   GtkWidget *pane = gtk_widget_get_parent(view);
   if (!GTK_IS_PANED(pane)) return FALSE;
   GtkWidget *other = gtk_paned_get_child1(GTK_PANED(pane));
@@ -435,6 +581,9 @@ static int unsplit_view(GtkWidget *view) {
   gtk_widget_grab_focus(GTK_WIDGET(view));
   g_object_unref(view), g_object_unref(other);
   return TRUE;
+#elif NCURSES
+  return FALSE;
+#endif
 }
 
 /******************************************************************************/
@@ -446,7 +595,7 @@ static int unsplit_view(GtkWidget *view) {
  * Generates 'view_before_switch' and 'view_after_switch' events.
  * @param view The Scintilla view to focus.
  */
-static void goto_view(GtkWidget *view) {
+static void goto_view(Scintilla *view) {
   if (!closing) lL_event(lua, "view_before_switch", -1);
   focused_view = view;
   l_setglobalview(lua, view);
@@ -457,31 +606,32 @@ static void goto_view(GtkWidget *view) {
 /**
  * Signal for a Scintilla notification.
  */
-static void s_notify(GtkWidget *view, gint _, gpointer lParam, gpointer __) {
+static void s_notify(Scintilla *view, int _, void *lParam, void*__) {
   struct SCNotification *n = (struct SCNotification *)lParam;
   if (focused_view == view || n->nmhdr.code == SCN_URIDROPPED) {
     if (focused_view != view) goto_view(view);
     lL_notify(lua, n);
   } else if (n->nmhdr.code == SCN_SAVEPOINTLEFT) {
-    GtkWidget *prev = focused_view;
+    Scintilla *prev = focused_view;
     goto_view(view);
     lL_notify(lua, n);
     goto_view(prev); // do not let a split view steal focus
   }
 }
 
+#if GTK
 /**
  * Signal for a Scintilla command.
  * Currently handles SCEN_SETFOCUS.
  */
-static void s_command(GtkWidget *view, gint wParam, gpointer _, gpointer __) {
+static void s_command(GtkWidget *view, int wParam, void*_, void*__) {
   if (wParam >> 16 == SCEN_SETFOCUS) goto_view(view);
 }
 
 /**
  * Signal for a Scintilla keypress.
  */
-static gboolean s_keypress(GtkWidget *view, GdkEventKey *event, gpointer _) {
+static int s_keypress(GtkWidget *view, GdkEventKey *event, void*_) {
   return lL_event(lua, "keypress", LUA_TNUMBER, event->keyval, LUA_TBOOLEAN,
                   event->state & GDK_SHIFT_MASK, LUA_TBOOLEAN,
                   event->state & GDK_CONTROL_MASK, LUA_TBOOLEAN,
@@ -492,16 +642,16 @@ static gboolean s_keypress(GtkWidget *view, GdkEventKey *event, gpointer _) {
 /**
  * Signal for a Scintilla mouse click.
  */
-static gboolean s_buttonpress(GtkWidget*_, GdkEventButton *event, gpointer __) {
+static int s_buttonpress(GtkWidget*_, GdkEventButton *event, void*__) {
   if (event->type == GDK_BUTTON_PRESS && event->button == 3)
-    return (lL_showcontextmenu(lua, event), TRUE);
+    return (lL_showcontextmenu(lua, (void *)event), TRUE);
   return FALSE;
 }
 
 /**
  * Signal for a Textadept window focus change.
  */
-static gboolean w_focus(GtkWidget*_, GdkEventFocus *event, gpointer __) {
+static int w_focus(GtkWidget*_, GdkEventFocus *event, void*__) {
   if (focused_view && !gtk_widget_has_focus(focused_view))
     gtk_widget_grab_focus(focused_view);
   return FALSE;
@@ -512,7 +662,7 @@ static gboolean w_focus(GtkWidget*_, GdkEventFocus *event, gpointer __) {
  * Currently handled keypresses:
  *  - Escape: hides the find box if it is open.
  */
-static gboolean w_keypress(GtkWidget*_, GdkEventKey *event, gpointer __) {
+static int w_keypress(GtkWidget*_, GdkEventKey *event, void*__) {
   if (event->keyval == 0xff1b && gtk_widget_get_visible(findbox) &&
       !gtk_widget_has_focus(command_entry)) {
     gtk_widget_hide(findbox);
@@ -527,7 +677,7 @@ static gboolean w_keypress(GtkWidget*_, GdkEventKey *event, gpointer __) {
  * Closes the Lua state and releases resources.
  * @see l_close
  */
-static gboolean w_exit(GtkWidget*_, GdkEventAny*__, gpointer ___) {
+static int w_exit(GtkWidget*_, GdkEventAny*__, void*___) {
   if (!lL_event(lua, "quit", -1)) return TRUE;
   l_close(lua);
   scintilla_release_resources();
@@ -540,7 +690,7 @@ static gboolean w_exit(GtkWidget*_, GdkEventAny*__, gpointer ___) {
  * Processes a remote Textadept's command line arguments.
  */
 static int a_command_line(GApplication *app, GApplicationCommandLine *cmdline,
-                          gpointer _) {
+                          void*_) {
   if (!lua) return 0; // only process argv for secondary/remote instances
   int argc = 0;
   char **argv = g_application_command_line_get_arguments(cmdline, &argc);
@@ -568,7 +718,7 @@ static int a_command_line(GApplication *app, GApplicationCommandLine *cmdline,
  * Signal for opening files from OSX.
  * Generates an 'appleevent_odoc' event for each document sent.
  */
-static gboolean w_open_osx(GtkOSXApplication*_, char *path, gpointer __) {
+static int w_open_osx(GtkOSXApplication*_, char *path, void*__) {
   lL_event(lua, "appleevent_odoc", LUA_TSTRING, path, -1);
   return TRUE;
 }
@@ -577,7 +727,7 @@ static gboolean w_open_osx(GtkOSXApplication*_, char *path, gpointer __) {
  * Signal for block terminating Textadept from OSX.
  * Generates a 'quit' event.
  */
-static gboolean w_exit_osx(GtkOSXApplication*_, gpointer __) {
+static int w_exit_osx(GtkOSXApplication*_, void*__) {
   return !lL_event(lua, "quit", -1);
 }
 
@@ -586,26 +736,30 @@ static gboolean w_exit_osx(GtkOSXApplication*_, gpointer __) {
  * Closes the Lua state and releases resources.
  * @see l_close
  */
-static void w_quit_osx(GtkOSXApplication*_, gpointer __) {
+static void w_quit_osx(GtkOSXApplication*_, void*__) {
   l_close(lua);
   scintilla_release_resources();
   g_object_unref(osxapp);
   gtk_main_quit();
 }
 #endif
+#endif // if GTK
 
 /******************************************************************************/
 /************************* Find/Replace GUI Interface *************************/
 /******************************************************************************/
 
+#if GTK
 #define attach(w, x1, x2, y1, y2, xo, yo, xp, yp) \
   gtk_table_attach(GTK_TABLE(findbox), w, x1, x2, y1, y2, xo, yo, xp, yp)
-#define ao_expand (GtkAttachOptions)(GTK_EXPAND | GTK_FILL)
-#define ao_normal (GtkAttachOptions)(GTK_SHRINK | GTK_FILL)
+#define EXPAND_FILL (GtkAttachOptions)(GTK_EXPAND | GTK_FILL)
+#define SHRINK_FILL (GtkAttachOptions)(GTK_SHRINK | GTK_FILL)
+#endif
 /**
  * Creates the Find box.
  */
-static GtkWidget *new_findbox() {
+static FINDBOX *new_findbox() {
+#if GTK
   findbox = gtk_table_new(2, 6, FALSE);
   find_store = gtk_list_store_new(1, G_TYPE_STRING);
   repl_store = gtk_list_store_new(1, G_TYPE_STRING);
@@ -638,18 +792,18 @@ static GtkWidget *new_findbox() {
   gtk_label_set_mnemonic_widget(GTK_LABEL(flabel), find_entry);
   gtk_label_set_mnemonic_widget(GTK_LABEL(rlabel), replace_entry);
 
-  attach(find_combo, 1, 2, 0, 1, ao_expand, ao_normal, 5, 0);
-  attach(replace_combo, 1, 2, 1, 2, ao_expand, ao_normal, 5, 0);
-  attach(flabel, 0, 1, 0, 1, ao_normal, ao_normal, 5, 0);
-  attach(rlabel, 0, 1, 1, 2, ao_normal, ao_normal, 5, 0);
-  attach(fnext_button, 2, 3, 0, 1, ao_normal, ao_normal, 0, 0);
-  attach(fprev_button, 3, 4, 0, 1, ao_normal, ao_normal, 0, 0);
-  attach(r_button, 2, 3, 1, 2, ao_normal, ao_normal, 0, 0);
-  attach(ra_button, 3, 4, 1, 2, ao_normal, ao_normal, 0, 0);
-  attach(match_case_opt, 4, 5, 0, 1, ao_normal, ao_normal, 5, 0);
-  attach(whole_word_opt, 4, 5, 1, 2, ao_normal, ao_normal, 5, 0);
-  attach(lua_opt, 5, 6, 0, 1, ao_normal, ao_normal, 5, 0);
-  attach(in_files_opt, 5, 6, 1, 2, ao_normal, ao_normal, 5, 0);
+  attach(find_combo, 1, 2, 0, 1, EXPAND_FILL, SHRINK_FILL, 5, 0);
+  attach(replace_combo, 1, 2, 1, 2, EXPAND_FILL, SHRINK_FILL, 5, 0);
+  attach(flabel, 0, 1, 0, 1, SHRINK_FILL, SHRINK_FILL, 5, 0);
+  attach(rlabel, 0, 1, 1, 2, SHRINK_FILL, SHRINK_FILL, 5, 0);
+  attach(fnext_button, 2, 3, 0, 1, SHRINK_FILL, SHRINK_FILL, 0, 0);
+  attach(fprev_button, 3, 4, 0, 1, SHRINK_FILL, SHRINK_FILL, 0, 0);
+  attach(r_button, 2, 3, 1, 2, SHRINK_FILL, SHRINK_FILL, 0, 0);
+  attach(ra_button, 3, 4, 1, 2, SHRINK_FILL, SHRINK_FILL, 0, 0);
+  attach(match_case_opt, 4, 5, 0, 1, SHRINK_FILL, SHRINK_FILL, 5, 0);
+  attach(whole_word_opt, 4, 5, 1, 2, SHRINK_FILL, SHRINK_FILL, 5, 0);
+  attach(lua_opt, 5, 6, 0, 1, SHRINK_FILL, SHRINK_FILL, 5, 0);
+  attach(in_files_opt, 5, 6, 1, 2, SHRINK_FILL, SHRINK_FILL, 5, 0);
 
   signal(fnext_button, "clicked", f_clicked);
   signal(fprev_button, "clicked", f_clicked);
@@ -665,6 +819,7 @@ static GtkWidget *new_findbox() {
   gtk_widget_set_can_focus(whole_word_opt, FALSE);
   gtk_widget_set_can_focus(lua_opt, FALSE);
   gtk_widget_set_can_focus(in_files_opt, FALSE);
+#endif
 
   return findbox;
 }
@@ -676,9 +831,10 @@ static GtkWidget *new_findbox() {
 /**
  * Adds the given text to the find/replace history list if it is not at the top.
  * @param text The text to add.
- * @param store The GtkListStore to add the text to.
+ * @param store The LIST_STORE to add the text to.
  */
-static void find_add_to_history(const char *text, GtkListStore *store) {
+static void find_add_to_history(const char *text, LIST_STORE *store) {
+#if GTK
   char *first_item = NULL;
   GtkTreeIter iter;
   if (gtk_tree_model_get_iter_first(GTK_TREE_MODEL(store), &iter))
@@ -691,14 +847,23 @@ static void find_add_to_history(const char *text, GtkListStore *store) {
     while (gtk_tree_model_iter_next(GTK_TREE_MODEL(store), &iter))
       if (++count > 10) gtk_list_store_remove(store, &iter); // keep 10 items
   }
+#elif NCURSES
+  if (!store[0] || strcmp(text, store[0]) != 0) {
+    if (store[9]) free(store[9]);
+    for (int i = 0; i < 9; i++) store[i + 1] = store[i];
+    store[0] = copy(text);
+  }
+#endif
 }
 
 /**
  * Signal for a find box button click.
  */
-static void f_clicked(GtkWidget *button, gpointer _) {
+static void f_clicked(FIND_BUTTON button, void*_) {
+#if GTK
   const char *find_text = gtk_entry_get_text(GTK_ENTRY(find_entry));
   const char *repl_text = gtk_entry_get_text(GTK_ENTRY(replace_entry));
+#endif
   if (strlen(find_text) == 0) return;
   if (button == fnext_button || button == fprev_button) {
     find_add_to_history(find_text, find_store);
@@ -719,19 +884,20 @@ static void f_clicked(GtkWidget *button, gpointer _) {
 /************************ Command Entry GUI Interface *************************/
 /******************************************************************************/
 
+#if GTK
 /**
  * The match function for the command entry.
  * Since the completion list is filled by Lua, every item is a "match".
  */
 static int cc_matchfunc(GtkEntryCompletion*_, const char *__, GtkTreeIter*___,
-                        gpointer ____) { return 1; }
+                        void*____) { return 1; }
 
 /**
  * Replaces the current word (consisting of alphanumeric and underscore
  * characters) with the match text.
  */
-static gboolean cc_matchselected(GtkEntryCompletion*_, GtkTreeModel *model,
-                                 GtkTreeIter *iter, gpointer __) {
+static int cc_matchselected(GtkEntryCompletion*_, GtkTreeModel *model,
+                                 GtkTreeIter *iter, void*__) {
   const char *text = gtk_entry_get_text(GTK_ENTRY(command_entry)), *p;
   for (p = text + strlen(text) - 1; g_ascii_isalnum(*p) || *p == '_'; p--)
     g_signal_emit_by_name(G_OBJECT(command_entry), "move-cursor",
@@ -755,7 +921,7 @@ static gboolean cc_matchselected(GtkEntryCompletion*_, GtkTreeModel *model,
 /**
  * Signal for the 'enter' key being pressed in the Command Entry.
  */
-static void c_activate(GtkWidget *entry, gpointer _) {
+static void c_activate(GtkWidget *entry, void*_) {
   lL_event(lua, "command_entry_command", LUA_TSTRING,
            gtk_entry_get_text(GTK_ENTRY(entry)), -1);
 }
@@ -763,13 +929,14 @@ static void c_activate(GtkWidget *entry, gpointer _) {
 /**
  * Signal for a keypress inside the Command Entry.
  */
-static gboolean c_keypress(GtkWidget*_, GdkEventKey *event, gpointer __) {
+static int c_keypress(GtkWidget*_, GdkEventKey *event, void*__) {
   return lL_event(lua, "command_entry_keypress", LUA_TNUMBER, event->keyval,
                   LUA_TBOOLEAN, event->state & GDK_SHIFT_MASK, LUA_TBOOLEAN,
                   event->state & GDK_CONTROL_MASK, LUA_TBOOLEAN,
                   event->state & GDK_MOD1_MASK, LUA_TBOOLEAN,
                   event->state & GDK_META_MASK, -1);
 }
+#endif // if GTK
 
 /******************************************************************************/
 /******************************** Lua Interface *******************************/
@@ -847,7 +1014,7 @@ static int lL_init(lua_State *L, int argc, char **argv, int reinit) {
   l_setcfunction(L, -1, "dialog", lgui_dialog);
   l_setcfunction(L, -1, "get_split_table", lgui_get_split_table);
   l_setcfunction(L, -1, "goto_view", lgui_goto_view);
-  l_setcfunction(L, -1, "gtkmenu", lgui_gtkmenu);
+  l_setcfunction(L, -1, "menu", lgui_menu);
   l_setmetatable(L, -1, "ta_gui", lgui__index, lgui__newindex);
   lua_setglobal(L, "gui");
 
@@ -872,9 +1039,15 @@ static int lL_init(lua_State *L, int argc, char **argv, int reinit) {
 #elif __OSX__
   lua_pushboolean(L, 1), lua_setglobal(L, "OSX");
 #endif
+#if GTK
   const char *charset = 0;
   g_get_charset(&charset);
   lua_pushstring(L, charset), lua_setglobal(L, "_CHARSET");
+#elif NCURSES
+  lua_pushboolean(L, 1), lua_setglobal(L, "NCURSES");
+  lua_pushstring(L, "UTF-8"), lua_setglobal(L, "_CHARSET"); // TODO: get charset
+#endif
+
 
   if (lL_dofile(L, "core/init.lua")) {
     lua_getglobal(L, "_SCINTILLA");
@@ -898,18 +1071,26 @@ static int lL_init(lua_State *L, int argc, char **argv, int reinit) {
  * @return 1 if there are no errors or 0 in case of errors.
  */
 static int lL_dofile(lua_State *L, const char *filename) {
-  char *file = g_strconcat(textadept_home, "/", filename, NULL);
+  char *file = malloc(strlen(textadept_home) + 1 + strlen(filename) + 1);
+  stpcpy(stpcpy(stpcpy(file, textadept_home), "/"), filename);
   int ok = (luaL_dofile(L, file) == LUA_OK);
   if (!ok) {
+#if GTK
     GtkWidget *dialog = gtk_message_dialog_new(NULL, GTK_DIALOG_MODAL,
                                                GTK_MESSAGE_ERROR,
                                                GTK_BUTTONS_OK, "%s\n",
                                                lua_tostring(L, -1));
     gtk_dialog_run(GTK_DIALOG(dialog));
     gtk_widget_destroy(dialog);
+#elif NCURSES
+    WINDOW *win = newwin(0, 0, 0, 0);
+    wprintw(win, lua_tostring(L, -1)), wrefresh(win);
+    getch();
+    delwin(win);
+#endif
     lua_settop(L, 0);
   }
-  g_free(file);
+  free(file);
   return ok;
 }
 
@@ -919,9 +1100,9 @@ static int lL_dofile(lua_State *L, const char *filename) {
  * @param index Stack index of the view.
  * @return Scintilla view
  */
-static GtkWidget *l_toview(lua_State *L, int index) {
+static Scintilla *l_toview(lua_State *L, int index) {
   lua_getfield(L, index, "widget_pointer");
-  GtkWidget *view = (GtkWidget *)lua_touserdata(L, -1);
+  Scintilla *view = (Scintilla *)lua_touserdata(L, -1);
   lua_pop(L, 1); // widget pointer
   return view;
 }
@@ -931,7 +1112,7 @@ static GtkWidget *l_toview(lua_State *L, int index) {
  * @param L The Lua state.
  * @param view The Scintilla view to add.
  */
-static void lL_addview(lua_State *L, GtkWidget *view) {
+static void lL_addview(lua_State *L, Scintilla *view) {
   lua_getfield(L, LUA_REGISTRYINDEX, "ta_views");
   lua_newtable(L);
   lua_pushlightuserdata(L, view);
@@ -954,7 +1135,7 @@ static void lL_addview(lua_State *L, GtkWidget *view) {
  * @param view The Scintilla view to remove.
  * @see lL_addview
  */
-static void lL_removeview(lua_State *L, GtkWidget *view) {
+static void lL_removeview(lua_State *L, Scintilla *view) {
   lua_newtable(L);
   lua_getfield(L, LUA_REGISTRYINDEX, "ta_views");
   lua_pushnil(L);
@@ -1020,7 +1201,7 @@ static void lL_removedoc(lua_State *L, sptr_t doc) {
   lua_pushnil(L);
   while (lua_next(L, -2)) {
     if (lua_isnumber(L, -2)) {
-      GtkWidget *view = l_toview(L, -1);
+      Scintilla *view = l_toview(L, -1);
       if (doc == SS(view, SCI_GETDOCPOINTER, 0, 0))
         lL_gotodoc(L, view, -1, TRUE);
     }
@@ -1052,7 +1233,7 @@ static void lL_removedoc(lua_State *L, sptr_t doc) {
  *   n of -1 represents the last document.
  * @param relative Flag indicating whether or not n is relative.
  */
-static void lL_gotodoc(lua_State *L, GtkWidget *view, int n, int relative) {
+static void lL_gotodoc(lua_State *L, Scintilla *view, int n, int relative) {
   if (relative && n == 0) return;
   lua_getfield(L, LUA_REGISTRYINDEX, "ta_buffers");
   if (relative) {
@@ -1091,7 +1272,7 @@ static void l_close(lua_State *L) {
     lua_pop(L, 1); // value
   }
   lua_pop(L, 1); // buffers
-  gtk_widget_destroy(focused_view);
+  scintilla_delete(focused_view);
   lua_close(L);
 }
 
@@ -1122,7 +1303,7 @@ static void lL_cleartable(lua_State *L, int index) {
  * @param view The Scintilla view to push.
  * @see lL_addview
  */
-static void l_pushview(lua_State *L, GtkWidget *view) {
+static void l_pushview(lua_State *L, Scintilla *view) {
   lua_getfield(L, LUA_REGISTRYINDEX, "ta_views");
   lua_pushlightuserdata(L, view), lua_gettable(L, -2);
   lua_remove(L, -2); // views
@@ -1205,17 +1386,17 @@ static long lL_checkscintillaparam(lua_State *L, int *narg, int type) {
 
 /**
  * Checks whether the function argument narg is a Scintilla view and returns
- * this view cast to a GtkWidget.
+ * this view cast to a Scintilla.
  * @param L The Lua state.
  * @param narg The stack index of the Scintilla view.
  * @return Scintilla view
  */
-static GtkWidget *lL_checkview(lua_State *L, int narg) {
+static Scintilla *lL_checkview(lua_State *L, int narg) {
   luaL_getmetatable(L, "ta_view");
   lua_getmetatable(L, narg);
   luaL_argcheck(L, lua_compare(L, -1, -2, LUA_OPEQ), narg, "View expected");
   lua_getfield(L, (narg > 0) ? narg : narg - 2, "widget_pointer");
-  GtkWidget *view = (GtkWidget *)lua_touserdata(L, -1);
+  Scintilla *view = (Scintilla *)lua_touserdata(L, -1);
   lua_pop(L, 3); // widget_pointer, metatable, metatable
   return view;
 }
@@ -1239,16 +1420,17 @@ static void lL_globaldoccheck(lua_State *L, int narg) {
 }
 
 /**
- * Pushes a GTK menu created from the table at the given valid index onto the
- * stack.
+ * Pushes a menu created from the table at the given valid index onto the stack.
  * Consult the LuaDoc for the table format.
  * @param L The Lua state.
  * @param index The stack index of the table to create the menu from.
- * @param callback A GCallback associated with each menu item.
+ * @param callback An optional GTK callback function associated with each menu
+ *   item.
  * @param submenu Flag indicating whether or not this menu is a submenu.
  */
-static void l_pushgtkmenu(lua_State *L, int index, GCallback callback,
-                          int submenu) {
+static void l_pushmenu(lua_State *L, int index, void (*callback)(void),
+                       int submenu) {
+#if GTK
   GtkWidget *menu = gtk_menu_new(), *menu_item = 0, *submenu_root = 0;
   const char *label;
   lua_pushvalue(L, index); // copy to stack top so relative indices can be used
@@ -1266,10 +1448,10 @@ static void l_pushgtkmenu(lua_State *L, int index, GCallback callback,
       int is_submenu = !lua_isnil(L, -1);
       lua_pop(L, 1); // title
       if (is_submenu) {
-        l_pushgtkmenu(L, -1, callback, TRUE);
+        l_pushmenu(L, -1, callback, TRUE);
         gtk_menu_shell_append(GTK_MENU_SHELL(menu),
                               (GtkWidget *)lua_touserdata(L, -1));
-        lua_pop(L, 1); // gtkmenu
+        lua_pop(L, 1); // menu
       } else if (lua_rawlen(L, -1) == 2 || lua_rawlen(L, -1) == 4) {
         lua_rawgeti(L, -1, 1);
         label = lua_tostring(L, -1);
@@ -1287,16 +1469,19 @@ static void l_pushgtkmenu(lua_State *L, int index, GCallback callback,
           if (key || modifiers)
               gtk_widget_add_accelerator(menu_item, "activate", accel, key,
                                          modifiers, GTK_ACCEL_VISIBLE);
-          g_signal_connect(menu_item, "activate", callback,
+          g_signal_connect(menu_item, "activate", G_CALLBACK(callback),
                            GINT_TO_POINTER(menu_id));
           gtk_menu_shell_append(GTK_MENU_SHELL(menu), menu_item);
         }
-      } else warn("gtkmenu: { 'label', id_num [, keycode, mods] } expected");
+      } else warn("menu: { 'label', id_num [, keycode, mods] } expected");
     }
     lua_pop(L, 1); // value
   }
   lua_pop(L, 1); // table copy
   lua_pushlightuserdata(L, !submenu_root ? menu : submenu_root);
+#elif NCURSES
+  lua_pushnil(L); // TODO: create and push menu (memory management?).
+#endif
 }
 
 /******************************************************************************/
@@ -1389,20 +1574,24 @@ static void lL_notify(lua_State *L, struct SCNotification *n) {
 /**
  * Shows the context menu for a Scintilla view based on a mouse event.
  * @param L The Lua state.
- * @param event The mouse button event.
+ * @param event An optional GTK mouse button event.
  */
-static void lL_showcontextmenu(lua_State *L, GdkEventButton *event) {
+static void lL_showcontextmenu(lua_State *L, void *event) {
   lua_getglobal(L, "gui");
   if (lua_istable(L, -1)) {
     lua_getfield(L, -1, "context_menu");
     if (lua_isuserdata(L, -1)) {
+#if GTK
       GtkWidget *menu = (GtkWidget *)lua_touserdata(L, -1);
       gtk_widget_show_all(menu);
       gtk_menu_popup(GTK_MENU(menu), NULL, NULL, NULL, NULL,
-                     event ? event->button : 0,
+                     event ? ((GdkEventButton *)event)->button : 0,
                      gdk_event_get_time((GdkEvent *)event));
+#elif NCURSES
+      // TODO: popup context menu.
+#endif
     } else if (!lua_isnil(L, -1))
-      warn("gui.context_menu: gtkmenu expected");
+      warn("gui.context_menu: menu expected");
     lua_pop(L, 1); // gui.context_menu
   } else lua_pop(L, 1); // non-table
 }
@@ -1470,7 +1659,7 @@ static int l_callscintilla(lua_State *L, int msg, int wtype, int ltype,
   if (string_return) lua_pushlstring(L, return_string, len);
   if (rtype == tBOOL) lua_pushboolean(L, result);
   if (rtype > tVOID && rtype < tBOOL) lua_pushinteger(L, result);
-  g_free(return_string);
+  if (return_string) free(return_string);
   return lua_gettop(L) - arg;
 }
 
@@ -1545,11 +1734,15 @@ static int lview__index(lua_State *L) {
   if (strcmp(key, "buffer") == 0)
     l_pushdoc(L, SS(lL_checkview(L, 1), SCI_GETDOCPOINTER, 0, 0));
   else if (strcmp(key, "size") == 0) {
-    GtkWidget *view = lL_checkview(L, 1);
+    Scintilla *view = lL_checkview(L, 1);
+#if GTK
     if (GTK_IS_PANED(gtk_widget_get_parent(view))) {
       int pos = gtk_paned_get_position(GTK_PANED(gtk_widget_get_parent(view)));
       lua_pushinteger(L, pos);
     } else lua_pushnil(L);
+#elif NCURSES
+    lua_pushnil(L);
+#endif
   } else lua_rawget(L, 1);
   return 1;
 }
@@ -1559,28 +1752,38 @@ static int lview__newindex(lua_State *L) {
   if (strcmp(key, "buffer") == 0)
     luaL_argerror(L, 3, "read-only property");
   else if (strcmp(key, "size") == 0) {
+#if GTK
     GtkWidget *pane = gtk_widget_get_parent(lL_checkview(L, 1));
     int size = luaL_checkinteger(L, 3);
     if (size < 0) size = 0;
     if (GTK_IS_PANED(pane)) gtk_paned_set_position(GTK_PANED(pane), size);
+#elif NCURSES
+    // TODO: set size.
+#endif
   } else lua_rawset(L, 1);
   return 0;
 }
 
 static int lgui__index(lua_State *L) {
   const char *key = lua_tostring(L, 2);
-  if (strcmp(key, "title") == 0)
-    lua_pushstring(L, gtk_window_get_title(GTK_WINDOW(window)));
-  else if (strcmp(key, "statusbar_text") == 0)
+  if (strcmp(key, "statusbar_text") == 0)
     lua_pushstring(L, statusbar_text);
   else if (strcmp(key, "clipboard_text") == 0) {
+#if GTK
     char *text = gtk_clipboard_wait_for_text(
                  gtk_clipboard_get(GDK_SELECTION_CLIPBOARD));
     lua_pushstring(L, text ? text : "");
-    if (text) g_free(text);
+    if (text) free(text);
+#elif NCURSES
+    lua_pushstring(L, ""); // TODO: get Xclipboard text?
+#endif
   } else if (strcmp(key, "size") == 0) {
+#if GTK
     int width, height;
     gtk_window_get_size(GTK_WINDOW(window), &width, &height);
+#elif NCURSES
+    int width = COLS, height = LINES;
+#endif
     lua_newtable(L);
     lua_pushinteger(L, width), lua_rawseti(L, -2, 1);
     lua_pushinteger(L, height), lua_rawseti(L, -2, 2);
@@ -1589,24 +1792,36 @@ static int lgui__index(lua_State *L) {
 }
 
 static void set_statusbar_text(const char *text, int bar) {
+#if GTK
   if (!statusbar[0] || !statusbar[1]) return; // unavailable on startup
   gtk_statusbar_pop(GTK_STATUSBAR(statusbar[bar]), 0);
   gtk_statusbar_push(GTK_STATUSBAR(statusbar[bar]), 0, text);
+#elif NCURSES
+  for (int i = ((bar == 0) ? 0 : 20); i < ((bar == 0) ? 20 : COLS); i++)
+    mvaddch(LINES - 1, i, ' '); // clear statusbar
+  mvaddstr(LINES - 1, (bar == 0) ? 0 : COLS - strlen(text), text), refresh();
+#endif
 }
 
 static int lgui__newindex(lua_State *L) {
   const char *key = lua_tostring(L, 2);
-  if (strcmp(key, "title") == 0)
+  if (strcmp(key, "title") == 0) {
+#if GTK
     gtk_window_set_title(GTK_WINDOW(window), lua_tostring(L, 3));
-  else if (strcmp(key, "clipboard_text") == 0)
+#elif NCURSES
+    for (int i = 0; i < COLS; i++) mvaddch(0, i, ' '); // clear titlebar
+    mvaddstr(0, 0, lua_tostring(L, 3)), refresh();
+#endif
+  } else if (strcmp(key, "clipboard_text") == 0)
     luaL_argerror(L, 3, "read-only property");
   else if (strcmp(key, "docstatusbar_text") == 0)
     set_statusbar_text(lua_tostring(L, 3), 1);
   else if (strcmp(key, "statusbar_text") == 0) {
-    g_free(statusbar_text);
-    statusbar_text = g_strdup(luaL_optstring(L, 3, ""));
+    if (statusbar_text) free(statusbar_text);
+    statusbar_text = copy(luaL_optstring(L, 3, ""));
     set_statusbar_text(statusbar_text, 0);
   } else if (strcmp(key, "menubar") == 0) {
+#if GTK
     luaL_argcheck(L, lua_istable(L, 3), 3, "table of menus expected");
     GtkWidget *new_menubar = gtk_menu_bar_new();
     lua_pushnil(L);
@@ -1626,22 +1841,37 @@ static int lgui__newindex(lua_State *L) {
     gtk_osxapplication_set_menu_bar(osxapp, GTK_MENU_SHELL(menubar));
     gtk_widget_hide(menubar);
 #endif
+#endif
   } else if (strcmp(key, "size") == 0) {
+#if GTK
     luaL_argcheck(L, lua_istable(L, 3) && lua_rawlen(L, 3) == 2, 3,
                   "{ width, height } table expected");
     int w = l_rawgetiint(L, 3, 1), h = l_rawgetiint(L, 3, 2);
     if (w > 0 && h > 0) gtk_window_resize(GTK_WINDOW(window), w, h);
+#endif
   } else lua_rawset(L, 1);
   return 0;
 }
 
+#if GTK
 #define toggled(w) gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(w))
+#elif NCURSES
+#define toggled(w) w
+#endif
 static int lfind__index(lua_State *L) {
   const char *key = lua_tostring(L, 2);
   if (strcmp(key, "find_entry_text") == 0)
+#if GTK
     lua_pushstring(L, gtk_entry_get_text(GTK_ENTRY(find_entry)));
+#elif NCURSES
+    lua_pushstring(L, find_text);
+#endif
   else if (strcmp(key, "replace_entry_text") == 0)
+#if GTK
     lua_pushstring(L, gtk_entry_get_text(GTK_ENTRY(replace_entry)));
+#elif NCURSES
+    lua_pushstring(L, repl_text);
+#endif
   else if (strcmp(key, "match_case") == 0)
     lua_pushboolean(L, toggled(match_case_opt));
   else if (strcmp(key, "whole_word") == 0)
@@ -1655,14 +1885,28 @@ static int lfind__index(lua_State *L) {
   return 1;
 }
 
+#if GTK
 #define toggle(w, b) gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(w), b)
+#elif NCURSES
+#define toggle(w, b) w = b
+#endif
 static int lfind__newindex(lua_State *L) {
   const char *key = lua_tostring(L, 2);
-  if (strcmp(key, "find_entry_text") == 0)
+  if (strcmp(key, "find_entry_text") == 0) {
+#if GTK
     gtk_entry_set_text(GTK_ENTRY(find_entry), lua_tostring(L, 3));
-  else if (strcmp(key, "replace_entry_text") == 0)
+#elif NCURSES
+    if (find_text) free(find_text);
+    find_text = copy(lua_tostring(L, 3));
+#endif
+  } else if (strcmp(key, "replace_entry_text") == 0) {
+#if GTK
     gtk_entry_set_text(GTK_ENTRY(replace_entry), lua_tostring(L, 3));
-  else if (strcmp(key, "match_case") == 0)
+#elif NCURSES
+    if (repl_text) free(repl_text);
+    repl_text = copy(lua_tostring(L, 3));
+#endif
+  } else if (strcmp(key, "match_case") == 0)
     toggle(match_case_opt, lua_toboolean(L, -1));
   else if (strcmp(key, "whole_word") == 0)
     toggle(whole_word_opt, lua_toboolean(L, -1));
@@ -1670,6 +1914,7 @@ static int lfind__newindex(lua_State *L) {
     toggle(lua_opt, lua_toboolean(L, -1));
   else if (strcmp(key, "in_files") == 0)
     toggle(in_files_opt, lua_toboolean(L, -1));
+#if GTK
   else if (strcmp(key, "find_label_text") == 0)
     gtk_label_set_text_with_mnemonic(GTK_LABEL(flabel), lua_tostring(L, 3));
   else if (strcmp(key, "replace_label_text") == 0)
@@ -1690,6 +1935,7 @@ static int lfind__newindex(lua_State *L) {
     gtk_button_set_label(GTK_BUTTON(lua_opt), lua_tostring(L, 3));
   else if (strcmp(key, "in_files_label_text") == 0)
     gtk_button_set_label(GTK_BUTTON(in_files_opt), lua_tostring(L, 3));
+#endif
   else
     lua_rawset(L, 1);
   return 0;
@@ -1698,7 +1944,11 @@ static int lfind__newindex(lua_State *L) {
 static int lce__index(lua_State *L) {
   const char *key = lua_tostring(L, 2);
   if (strcmp(key, "entry_text") == 0)
+#if GTK
     lua_pushstring(L, gtk_entry_get_text(GTK_ENTRY(command_entry)));
+#elif NCURSES
+    lua_pushstring(L, command_text);
+#endif
   else
     lua_rawget(L, 1);
   return 1;
@@ -1706,10 +1956,14 @@ static int lce__index(lua_State *L) {
 
 static int lce__newindex(lua_State *L) {
   const char *key = lua_tostring(L, 2);
-  if (strcmp(key, "entry_text") == 0)
+  if (strcmp(key, "entry_text") == 0) {
+#if GTK
     gtk_entry_set_text(GTK_ENTRY(command_entry), lua_tostring(L, 3));
-  else
-    lua_rawset(L, 1);
+#elif NCURSES
+    if (command_text) free(command_text);
+    command_text = copy(lua_tostring(L, 3));
+#endif
+  } else lua_rawset(L, 1);
   return 0;
 }
 
@@ -1751,7 +2005,7 @@ static int lbuffer_text_range(lua_State *L) {
   tr.lpstrText = malloc(tr.chrg.cpMax - tr.chrg.cpMin + 1);
   SS(focused_view, SCI_GETTEXTRANGE, 0, (long)(&tr));
   lua_pushlstring(L, tr.lpstrText, tr.chrg.cpMax - tr.chrg.cpMin);
-  g_free(tr.lpstrText);
+  if (tr.lpstrText) free(tr.lpstrText);
   return 1;
 }
 
@@ -1767,6 +2021,7 @@ static int lview_unsplit(lua_State *L) {
   return 1;
 }
 
+#if GTK
 #define child1(p) gtk_paned_get_child1(GTK_PANED(p))
 #define child2(p) gtk_paned_get_child2(GTK_PANED(p))
 
@@ -1787,29 +2042,33 @@ static void l_pushsplittable(lua_State *L, GtkWidget *c1, GtkWidget *c2) {
   int size = gtk_paned_get_position(GTK_PANED(gtk_widget_get_parent(c1)));
   lua_pushinteger(L, size), lua_setfield(L, -2, "size");
 }
+#endif
 
 static int lgui_get_split_table(lua_State *L) {
+#if GTK
   GtkWidget *pane = gtk_widget_get_parent(focused_view);
   if (GTK_IS_PANED(pane)) {
     while (GTK_IS_PANED(gtk_widget_get_parent(pane)))
       pane = gtk_widget_get_parent(pane);
     l_pushsplittable(L, child1(pane), child2(pane));
   } else l_pushview(L, focused_view);
+#elif NCURSES
+  l_pushview(L, focused_view); // TODO: push split table
+#endif
   return 1;
 }
 
 // If the indexed view is not currently focused, temporarily focus it so calls
 // to handlers will not throw 'indexed buffer is not the focused one' error.
 static int lview_goto_buffer(lua_State *L) {
-  GtkWidget *view = lL_checkview(L, 1), *prev_view = focused_view;
+  Scintilla *view = lL_checkview(L, 1), *prev_view = focused_view;
   int n = luaL_checkinteger(L, 2), relative = lua_toboolean(L, 3);
   int switch_focus = (view != focused_view);
   if (switch_focus) SS(view, SCI_SETFOCUS, TRUE, 0);
   lL_event(L, "buffer_before_switch", -1);
   lL_gotodoc(L, view, n, relative);
   lL_event(L, "buffer_after_switch", -1);
-  if (switch_focus)
-    SS(view, SCI_SETFOCUS, FALSE, 0), gtk_widget_grab_focus(prev_view);
+  if (switch_focus) SS(view, SCI_SETFOCUS, FALSE, 0), focus_view(prev_view);
   return 0;
 }
 
@@ -1852,42 +2111,64 @@ static int lgui_goto_view(lua_State *L) {
                   "no View exists at that index");
     lua_rawgeti(L, -1, n);
   }
-  GtkWidget *view = l_toview(L, -1);
-  gtk_widget_grab_focus(view);
+  Scintilla *view = l_toview(L, -1);
+  focus_view(view);
+#if GTK
   // gui.dialog() interferes with focus so gtk_widget_grab_focus() does not
   // always work. If this is the case, ensure goto_view() is called.
   if (!gtk_widget_has_focus(view)) goto_view(view);
+#endif
   return 0;
 }
 
-static void m_clicked(GtkWidget *menu, gpointer id) {
+#if GTK
+static void m_clicked(GtkWidget *menu, void *id) {
   lL_event(lua, "menu_clicked", LUA_TNUMBER, GPOINTER_TO_INT(id), -1);
 }
+#endif
 
-static int lgui_gtkmenu(lua_State *L) {
+static int lgui_menu(lua_State *L) {
   luaL_checktype(L, 1, LUA_TTABLE);
-  l_pushgtkmenu(L, -1, G_CALLBACK(m_clicked), FALSE);
+#if GTK
+  l_pushmenu(L, -1, m_clicked, FALSE);
+#elif NCURSES
+  // TODO: create menu and manage memory.
+#endif
   return 1;
 }
 
 static int lstring_iconv(lua_State *L) {
-  size_t text_len = 0, conv_len = 0;
-  const char *text = luaL_checklstring(L, 1, &text_len);
+  size_t text_len = 0;
+  char *text = (char *)luaL_checklstring(L, 1, &text_len);
   const char *to = luaL_checkstring(L, 2);
   const char *from = luaL_checkstring(L, 3);
-  char *converted = g_convert(text, text_len, to, from, NULL, &conv_len, NULL);
+  int converted = FALSE;
+  iconv_t cd = iconv_open(to, from);
+  if (cd != (iconv_t) -1) {
+    char *out = malloc(text_len + 1);
+    char *outp = out;
+    size_t inbytesleft = text_len, outbytesleft = text_len;
+    if (iconv(cd, &text, &inbytesleft, &outp, &outbytesleft) != -1) {
+      lua_pushlstring(L, out, outp - out);
+      converted = TRUE;
+    }
+    free(out);
+    iconv_close(cd);
+  }
   if (!converted) luaL_error(L, "Conversion failed");
-  lua_pushlstring(L, converted, conv_len);
-  g_free(converted);
   return 1;
 }
 
 static int lquit(lua_State *L) {
+#if GTK
   GdkEventAny event;
   event.type = GDK_DELETE;
   event.window = gtk_widget_get_window(window);
   event.send_event = TRUE;
   gdk_event_put((GdkEvent *)(&event));
+#elif NCURSES
+  quit = true;
+#endif
   return 0;
 }
 
@@ -1903,7 +2184,8 @@ static int lreset(lua_State *L) {
   return 0;
 }
 
-static gboolean emit_timeout(gpointer data) {
+#if GTK
+static int emit_timeout(void *data) {
   int *refs = (int *)data;
   lua_rawgeti(lua, LUA_REGISTRYINDEX, refs[0]); // function
   int nargs = 0, repeat = TRUE;
@@ -1917,8 +2199,10 @@ static gboolean emit_timeout(gpointer data) {
   lua_pop(lua, 1); // result
   return repeat;
 }
+#endif
 
 static int ltimeout(lua_State *L) {
+#if GTK
   double timeout = luaL_checknumber(L, 1);
   luaL_argcheck(L, timeout > 0, 1, "timeout must be > 0");
   luaL_argcheck(L, lua_isfunction(L, 2), 2, "function expected");
@@ -1930,11 +2214,15 @@ static int ltimeout(lua_State *L) {
     lua_pushvalue(L, i);
     refs[i - 2] = luaL_ref(L, LUA_REGISTRYINDEX);
   }
-  g_timeout_add(timeout * 1000, emit_timeout, (gpointer)refs);
+  g_timeout_add(timeout * 1000, emit_timeout, (void *)refs);
+#elif NCURSES
+  luaL_error(L, "not implemented in this environment");
+#endif
   return 0;
 }
 
 static int lfind_focus(lua_State *L) {
+#if GTK
   if (!gtk_widget_has_focus(findbox)) {
     gtk_widget_show(findbox);
     gtk_widget_grab_focus(find_entry);
@@ -1943,26 +2231,30 @@ static int lfind_focus(lua_State *L) {
     gtk_widget_grab_focus(focused_view);
     gtk_widget_hide(findbox);
   }
+#elif NCURSES
+  // TODO: toggle findbox focus.
+#endif
   return 0;
 }
 
 static int lfind_next(lua_State *L) {
-  return (g_signal_emit_by_name(G_OBJECT(fnext_button), "clicked"), 0);
+  return (f_clicked(fnext_button, NULL), 0);
 }
 
 static int lfind_prev(lua_State *L) {
-  return (g_signal_emit_by_name(G_OBJECT(fprev_button), "clicked"), 0);
+  return (f_clicked(fprev_button, NULL), 0);
 }
 
 static int lfind_replace(lua_State *L) {
-  return (g_signal_emit_by_name(G_OBJECT(r_button), "clicked"), 0);
+  return (f_clicked(r_button, NULL), 0);
 }
 
 static int lfind_replace_all(lua_State *L) {
-  return (g_signal_emit_by_name(G_OBJECT(ra_button), "clicked"), 0);
+  return (f_clicked(ra_button, NULL), 0);
 }
 
 static int lce_focus(lua_State *L) {
+#if GTK
   if (!gtk_widget_has_focus(command_entry)) {
     gtk_widget_show(command_entry);
     gtk_widget_grab_focus(command_entry);
@@ -1970,10 +2262,14 @@ static int lce_focus(lua_State *L) {
     gtk_widget_hide(command_entry);
     gtk_widget_grab_focus(focused_view);
   }
+#elif NCURSES
+  // TODO: ce toggle focus.
+#endif
   return 0;
 }
 
 static int lce_show_completions(lua_State *L) {
+#if GTK
   luaL_checktype(L, 1, LUA_TTABLE);
   GtkEntryCompletion *completion = gtk_entry_get_completion(
                                    GTK_ENTRY(command_entry));
@@ -1990,5 +2286,6 @@ static int lce_show_completions(lua_State *L) {
     lua_pop(L, 1); // value
   }
   gtk_entry_completion_complete(completion);
+#endif
   return 0;
 }