aboutsummaryrefslogtreecommitdiff
path: root/ed.c
diff options
context:
space:
mode:
Diffstat (limited to 'ed.c')
-rw-r--r--ed.c147
1 files changed, 147 insertions, 0 deletions
diff --git a/ed.c b/ed.c
new file mode 100644
index 0000000..e7cb71e
--- /dev/null
+++ b/ed.c
@@ -0,0 +1,147 @@
+/* SPDX-License-Identifier: BSD-3-Clause */
+/*
+ * Copyright (C) 2022, 2023 Ferass El Hafidi <vitali64pmemail@protonmail.com>
+ */
+#include <stdio.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <errno.h>
+#include <signal.h>
+#include <string.h>
+
+#define REQ_PRINT_USAGE /* Require print_usage() from common.h */
+#define REQ_ERRPRINT /* Require errprint() from common.h */
+#define DESCRIPTION "Edit text."
+#define OPERANDS "[-p prompt]"
+#include "common.h"
+
+void print_error(const char *error, int help_mode);
+size_t c_append(char buffer[4096]);
+
+#ifdef FASESBOX
+int ed_main(int argc, char *argv[]) {
+#else
+int main(int argc, char *argv[]) {
+#endif
+ int argument, i = 0, fildes = -1;
+ char buffer[4096], *edit_pathname, *prompt_string = "",
+ command_string[4096], *error = "", *argv0 = strdup(argv[0]);
+ int help_mode = 0;
+ struct sigaction signal_action;
+
+ while ((argument = getopt(argc, argv, "p:")) != -1) {
+ if (argument == '?') {
+ print_usage(argv[0], DESCRIPTION, OPERANDS, VERSION);
+ return 1;
+ }
+ else if (argument == 'p')
+ prompt_string = optarg;
+ }
+ argc -= optind;
+ argv += optind;
+
+ signal_action.sa_handler = SIG_IGN;
+ sigemptyset(&signal_action.sa_mask);
+ sigaction(SIGINT, &signal_action, NULL);
+
+ setvbuf(stdout, NULL, _IONBF, 0);
+ for (;;) {
+ write(STDOUT_FILENO, prompt_string, strlen(prompt_string));
+ //if (fgets(command_string, 4096, stdin) == NULL) return errno;
+ if (read(STDIN_FILENO, command_string, 4096) == -1)
+ return errprint(argv0, "read <stdin>", errno);
+ switch (command_string[i]) { /* Addresses */
+ case '.':
+ case '$':
+ case '\'':
+ case '+':
+ case '-':
+ /* FALLTHROUGH */
+ ++i;
+ print_error((error = "not implemented"), help_mode);
+ continue;
+ }
+ switch (command_string[i]) { /* Commands */
+ case 'e': /* Edit Command */
+ if (i < 0) {
+ print_error((error = "unexpected address"), help_mode);
+ continue;
+ }
+ if (strlen(command_string) > 2 && i == 0) {
+ edit_pathname = command_string + 2;
+ edit_pathname[strlen(edit_pathname) - 1] = '\0';
+ } else if (!edit_pathname) {
+ print_error((error = "no pathname given"), help_mode);
+ continue;
+ }
+ fildes = open(edit_pathname, O_RDONLY | O_CREAT);
+ if (errno) return errprint(argv0, "open()", errno);
+ printf("%ld\n", read(fildes, buffer, 4096));
+ if (fildes != -1) close(fildes);
+ continue;
+ case 'a':
+ c_append(buffer);
+ continue;
+ case 'w':
+ if (strtok(command_string, " ") != NULL && strtok(NULL, " ") != NULL
+ && i == 0) {
+ edit_pathname = command_string + 2;
+ edit_pathname[strlen(edit_pathname) - 1] = '\0';
+ fildes = open(edit_pathname, O_RDWR | O_CREAT);
+ } else if (edit_pathname) {
+ fildes = open(edit_pathname, O_RDWR);
+ } else {
+ if (i != 0)
+ print_error((error = "unexpected address"), help_mode);
+ else
+ print_error((error = "no pathname given"), help_mode);
+ continue;
+ }
+ if (errno) return errprint(argv0, "open()", errno);
+ printf("%ld\n", write(fildes, buffer, strlen(buffer)));
+ if (errno) return errprint(argv0, "write()", errno);
+ if (fildes != -1) close(fildes);
+ continue;
+ case 'q':
+ if (fildes != -1) close(fildes);
+ return errprint(argv0, NULL, errno);
+ case 'H': /* Help mode */
+ if (i < 0) {
+ print_error((error = "unexpected address"), help_mode);
+ continue;
+ }
+ /* If help_mode was equal to 1, set it to 0 and vice-versa. */
+ help_mode = !help_mode;
+ /* FALLTHROUGH */
+ case 'h': /* Help Command */
+ /* FALLTHROUGH */
+ print_error(error, help_mode + 2); /* Print the last encountered error. */
+ continue;
+ default: /* Invalid/Not implemented command */
+ print_error((error = "invalid or not implemented"), help_mode);
+ }
+ }
+}
+
+size_t c_append(char buffer[4096]) {
+ char *tempbuf = NULL;
+ size_t bufsize = 0, bytes_read = 0;
+
+ while ((bytes_read += getline(&tempbuf, &bufsize, stdin)) > 0) {
+ if (!strcmp(tempbuf, ".\n")) break;
+ strcat(buffer, tempbuf);
+ }
+ return bytes_read;
+}
+
+void printUsage(void) {
+ printf("Ferass' Base System. (%s)\n\n"
+ "Usage: ed [-p prompt_string]\n\n"
+ "Edit text.\n\n"
+ "\t-p prompt_string\tAppend a prompt string.\n", VERSION);
+}
+
+void print_error(const char *error, int help_mode) {
+ if (help_mode <= 1) puts("?");
+ if (help_mode) puts(error);
+}