fix C-e bug

I think clion royally wrecked my formatting. Going to keep
fixing it up as I find stuff.

.gitignore

@@ -1,2 +1,4 @@
 *.log
 build
+ke
+*.txt

CMakeLists.txt

@@ -2,15 +2,29 @@ cmake_minimum_required(VERSION 3.15)
 project(ke C)  # Specify C language explicitly
 
 set(CMAKE_C_STANDARD 99)
-set(KE_VERSION "1.0.8")
+set(KE_VERSION "1.4.0")
 
 set(CMAKE_C_FLAGS "-Wall -Wextra -pedantic -Wshadow -Werror -std=c99 -g")
 set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} -D_DEFAULT_SOURCE -D_XOPEN_SOURCE")
-set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} -fsanitize=address -fno-omit-frame-pointer")
 
+# Optionally enable AddressSanitizer (ASan)
+option(ENABLE_ASAN "Enable AddressSanitizer for builds" OFF)
+
+if (ENABLE_ASAN)
+    message(STATUS "ASan enabled")
+    set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} -fsanitize=address -fno-omit-frame-pointer")
+    # Ensure the sanitizer is linked too (especially important on some platforms)
+    set(CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} -fsanitize=address")
+endif()
+
+include(GNUInstallDirs)
 
 # Add executable
 add_executable(ke main.c)
-
-# Define KE_VERSION for use in C code (e.g., #define KE_VERSION)
 target_compile_definitions(ke PRIVATE KE_VERSION="ke version ${KE_VERSION}")
+install(TARGETS ke RUNTIME DESTINATION bin)
+install(FILES ke.1 TYPE MAN)
+
+install(TARGETS ke RUNTIME DESTINATION ${CMAKE_INSTALL_BINDIR})
+install(FILES ke.1 DESTINATION ${CMAKE_INSTALL_MANDIR}/man1)
+

Makefile

@@ -0,0 +1,33 @@
+TARGET :=		ke
+KE_VERSION :=		devel
+DEST :=			$(HOME)/.local/bin/$(TARGET)
+
+CFLAGS :=	-Wall -Wextra -pedantic -Wshadow -Werror -std=c99 -g
+CFLAGS +=	-Wno-unused-result
+CFLAGS +=	-D_DEFAULT_SOURCE -D_XOPEN_SOURCE
+CFLAGS +=	-fsanitize=address -fno-omit-frame-pointer 
+
+LDFLAGS :=	-fsanitize=address
+
+all: $(TARGET) test.txt
+
+$(TARGET): main.c
+	$(CC) $(CFLAGS) -o $(TARGET) $(LDFLAGS) main.c
+
+.PHONY: install
+#install: $(TARGET) 
+install:
+	cp $(TARGET) $(DEST)
+
+clean:
+	rm -f $(TARGET)
+	rm -f asan.log*
+
+.PHONY: test.txt
+test.txt:
+	cp test.txt.bak $@
+
+.PHONY: gdb
+gdb:
+	@test -f $(TARGET).pid || (echo "error: $(TARGET).pid not found" >&2; exit 1)
+	@gdb -p $$(cat $(TARGET).pid | tr -d ' \t\n\r') ./$(TARGET)

README.txt

@@ -11,4 +11,11 @@ It should be available via homebrew, even:
     brew tap kisom/homebrew-tap
     brew install ke
 
-Released under an ISC license.
+To get verbose ASAN messages:
+
+    export LSAN_OPTIONS=verbosity=1:log_threads=1
+
+Released under an ISC license.
+
+Started by following along with kilo:
+    https://viewsourcecode.org/snaptoken/kilo/

TODO

@@ -1,15 +1,18 @@
 [X] goto-line
 [X] text-corruption bug
 [ ] alt-modifiers
-[ ] refresh-screen
+[x] refresh-screen
-[ ] functions -> keymapping?
+[ ] functions -> keymapping? (what did this even mean)
 [X] rendering: need to skip over control characters like we do with tabs
 [X] control-d -> delete
-[ ] control-g -> exit buf prompt
+[x] control-g -> exit buf prompt
-[ ] load-file prompt on dirty buffer
+[x] load-file prompt on dirty buffer
 [ ] multiple files
+[x] utf-8
+[x] kill ring
+[x] mark/region
 
 What would it take for ke to be your daily drives?
-+ C-u
+[x] C-u (repeat actions)
-+ Alt nav (backspace, delete, f, b, etc)
+[x] Alt nav (backspace, delete, f, b, etc)
-
+[-] undo tree (C-k u/U)

default.nix

@@ -0,0 +1,34 @@
+{
+  lib,
+  stdenv,
+  cmake,
+  installShellFiles,
+  ...
+}:
+stdenv.mkDerivation {
+  pname = "ke";
+  version = "1.4.0";
+
+  src = lib.cleanSource ./.;
+
+  nativeBuildInputs = [
+    cmake
+    installShellFiles
+  ];
+
+  cmakeFlags = [
+    "-DENABLE_ASAN=on"
+    "-DCMAKE_BUILD_TYPE=Debug"
+  ];
+
+  installPhase = ''
+    runHook preInstall
+
+    mkdir -p $out/bin
+    cp ke $out/bin/
+
+    installManPage ../ke.1
+
+    runHook postInstall
+  '';
+}

flake.lock

@@ -0,0 +1,27 @@
+{
+  "nodes": {
+    "nixpkgs": {
+      "locked": {
+        "lastModified": 1763835633,
+        "narHash": "sha256-HzxeGVID5MChuCPESuC0dlQL1/scDKu+MmzoVBJxulM=",
+        "owner": "nixos",
+        "repo": "nixpkgs",
+        "rev": "050e09e091117c3d7328c7b2b7b577492c43c134",
+        "type": "github"
+      },
+      "original": {
+        "owner": "nixos",
+        "ref": "nixos-unstable",
+        "repo": "nixpkgs",
+        "type": "github"
+      }
+    },
+    "root": {
+      "inputs": {
+        "nixpkgs": "nixpkgs"
+      }
+    }
+  },
+  "root": "root",
+  "version": 7
+}

flake.nix

@@ -0,0 +1,18 @@
+{
+  description = "Kyle's Text Editor";
+
+  inputs = {
+    nixpkgs.url = "github:nixos/nixpkgs?ref=nixos-unstable";
+  };
+
+  outputs =
+    { self, nixpkgs }:
+    let
+      pkgs = import nixpkgs { system = "x86_64-linux"; };
+    in
+    {
+      packages.x86_64-linux = {
+        default = pkgs.callPackage ./default.nix { };
+      };
+    };
+}

ke.1

@@ -19,30 +19,84 @@ is
 K-command mode is entered using C-k. This is taken from Wordstar and just
 so happens to be blessed with starting with a most excellent letter of
 grandeur. Many commands work with and without control; for example,
-saving a file can be done with either C-k s or C-k C-s.
+saving a file can be done with either C-k s or C-k C-s. Other commands work
-.Pp
+with ESC or CTRL.
+.Sh K-COMMANDS
+k-command mode can be exited with ESC or C-g.
 .Bl -tag -width xxxxxxxxxxxx -offset indent
 .It C-k BACKSPACE
 Delete from the cursor to the beginning of the line.
+.It C-k SPACE
+Toggle the mark.
+.It C-k -
+If the mark is set, unindent the region.
+.It C-k =
+If the mark is set, indent the region.
+.It C-k c
+Clear (flush) the kill ring.
 .It C-k d
 Delete from the cursor to the end of the line.
+.It C-k C-d
+Delete the entire line.
 .It C-k e
 Edit a new file. Also C-k C-e.
 .It C-k f
 Incremental find.
 .It C-k g
-Go to a specific line. Also C-k C-g.
+Go to a specific line.
+.It C-k j
+Jump to the mark.
+.It C-k l
+List the number of lines of code in a saved file.
 .It C-k m
 Run make(1).
 .It C-k q
-exit the editor. Also C-k C-q.
+Exit the editor. If the file has unsaved changes,
+a warning will be printed; a second C-k q will exit.
+.It C-k C-q
+Immediately exit the editor.
+.It C-k C-r
+Reload the current buffer from disk.
 .It C-k s
-save the file, prompting for a filename if needed. Also C-k C-s.
+Save the file, prompting for a filename if needed. Also C-k C-s.
+.It C-k u
+Undo changes.
+.It C-k U
+Redo changes.
 .It C-k x
 save the file and exit. Also C-k C-x.
-.It C-k \
+.It C-k y
+Yank the kill ring.
+.It C-k \[char92]
 Dump core.
 .El
+.Sh OTHER KEYBINDINGS
+.Bl -tag -width xxxxxxxxxxxx -offset indent
+.It C-g
+In general, C-g cancels an operation.
+.It C-l
+Refresh the display.
+.It C-s
+Incremental find.
+.It C-u
+Universal argument. C-u followed by numbers will repeat an
+operation n times.
+.It C-w
+Kill the region if the mark is set.
+.It C-y
+Yank the kill ring.
+.It ESC BACKSPACE
+Delete the previous word.
+.It ESC b
+Move to the previous word.
+.It ESC d
+Delete the next word.
+.It ESC f
+Move to the next word.
+.It ESC w
+Save the region (if the mark is set) to the kill ring.
+.It
+.El
 .Sh FIND
 The find operation is an incremental search. The up or left arrow keys will
 go to the previous result, while the down or right arrow keys will go to

scratch.c

@@ -0,0 +1,162 @@
+/*
+ * scratch.c - ideas in progress
+ */
+
+#define REFLOW_MARGIN		72
+
+void
+reflow_region(void)
+{
+	int		 start_row, end_row, i, col, wlen, this_len;
+	struct erow	*row;
+	struct abuf	 buf = ABUF_INIT;
+	struct abuf	 out = ABUF_INIT;
+	int		 in_paragraph = 0;
+	int		 indent_len = 0;
+	char		 indent[REFLOW_MARGIN + 1];
+	char		 word[REFLOW_MARGIN + 1];
+	char		*e = NULL;
+	char		*p = NULL;
+	char		*s = NULL;
+
+	if (editor.mark_set) {
+		if (editor.mark_cury < editor.cury ||
+			(editor.mark_cury == editor.cury &&
+				editor.mark_curx < editor.curx)) {
+			start_row = editor.mark_cury;
+			end_row = editor.cury;
+		} else {
+			start_row = editor.cury;
+			end_row = editor.mark_cury;
+		}
+	} else {
+		start_row = end_row = editor.cury;
+		while (start_row > 0 && editor.row[start_row - 1].size > 0) {
+			start_row--;
+		}
+
+		while (end_row < editor.nrows - 1 &&
+			editor.row[end_row + 1].size > 0) {
+			end_row++;
+		}
+	}
+
+	if (start_row >= editor.nrows) {
+		return;
+	}
+
+	if (end_row >= editor.nrows) {
+		end_row = editor.nrows - 1;
+	}
+
+	for (i = start_row; i <= end_row; i++) {
+		row = &editor.row[i];
+
+		if (row->size == 0) {
+			if (in_paragraph) {
+				ab_append(&buf, "\n", 1);
+				in_paragraph = 0;
+			}
+
+			ab_append(&buf, "\n", 1);
+			continue;
+		}
+
+		if (!in_paragraph) {
+			indent_len = 0;
+			while (indent_len < row->size &&
+				(row->line[indent_len] == ' ' ||
+					row->line[indent_len] == '\t')) {
+				indent[indent_len] = row->line[indent_len], indent_len++;
+			}
+
+			indent[indent_len] = '\0';
+			in_paragraph = 1;
+		}
+
+		ab_append(&buf, row->line + indent_len, row->size - indent_len);
+		ab_append(&buf, " ", 1);
+	}
+
+	if (in_paragraph) {
+		ab_append(&buf, "\n", 1);
+	}
+
+
+	p = buf.b;
+	col = 0;
+
+	while (p != NULL && *p != '\0') {
+		while (*p && isspace((unsigned char)*p) &&
+			*p != '\n') {
+			p++;
+		}
+
+		if (*p == '\0') {
+			break;
+		}
+
+		wlen = 0;
+		while (*p && !isspace((unsigned char)*p)) {
+			if (wlen < REFLOW_MARGIN)
+				word[wlen++] = *p;
+			p++;
+		}
+		word[wlen] = '\0';
+
+		if (*p == '\n' && (p[1] == '\n' || p[1] == '\0')) {
+			ab_append(&out, "\n", 1); /* flush */
+			col = 0;
+			p++; /* consume the extra \n */
+			continue;
+		}
+
+		this_len = wlen;
+		if (col > 0) {
+			this_len++; /* space before word */
+		}
+
+		if (col == 0) {
+			ab_append(&out, indent, indent_len);
+			col = indent_len;
+		}
+
+		if (col + this_len > REFLOW_MARGIN && col > 0) {
+			ab_append(&out, "\n", 1);
+			ab_append(&out, indent, indent_len);
+			col = indent_len;
+		}
+
+		if (col > 0) {
+			ab_append(&out, " ", 1);
+			col++;
+		}
+
+		ab_append(&out, word, wlen);
+		col += wlen;
+	}
+
+	if (col > 0) {
+		ab_append(&out, "\n", 1);
+	}
+
+	/* the old switcharoo */
+	buf = out;
+	ab_free(&out);
+
+
+	for (i = end_row; i >= start_row; i--) {
+		delete_row(i);
+	}
+
+	s = buf.b;
+	while ((e = strchr(s, '\n'))) {
+		erow_insert(start_row++, s, e - s);
+		s = e + 1;
+	}
+
+	ab_free(&buf);
+
+	editor.dirty++;
+	editor_set_status("Region reflowed to %d columns", REFLOW_MARGIN);
+}

test.txt.bak

@@ -0,0 +1,15 @@
+hello
+
+
+
+
+
+
+
+
+
+
+
+
+world it is 	me
+	but I am not me