1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
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);
}
|
