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
148
149
150
151
152
153
|
/* ed - edit text
* Copyright (C) 2022 Ferass EL HAFIDI
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <https://www.gnu.org/licenses/>.
*/
#include <stdio.h>
#include <unistd.h>
#include <fcntl.h>
#include <errno.h>
#include <signal.h>
#include <string.h>
#include "version.h"
#ifndef COMPILETIME
#define COMPILETIME
#endif
void printUsage();
void print_error();
size_t c_append(char buffer[4096]);
int main(int argc, char *argv[]) {
int argument, i = 0, fildes;
char buffer[4096], *edit_pathname, *prompt_string = "",
command_string[4096], *error = "";
int help_mode = 0;
struct sigaction signal_action;
while ((argument = getopt(argc, argv, "p:")) != -1) {
if (argument == '?') {
printUsage();
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 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 errno;
printf("%ld\n", read(fildes, buffer, 4096));
if (fildes) 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 errno;
printf("%ld\n", write(fildes, buffer, strlen(buffer)));
if (fildes) close(fildes);
continue;
case 'q':
if (fildes) close(fildes);
return 0;
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;
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() {
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", COMPILETIME);
}
void print_error(const char *error, int help_mode) {
if (help_mode <= 1) puts("?");
if (help_mode) puts(error);
}
|
