MIDAS
Loading...
Searching...
No Matches
Macros | Functions | Variables
cmdedit.cxx File Reference
#include "midas.h"
#include "msystem.h"
Include dependency graph for cmdedit.cxx:

Go to the source code of this file.

Macros

#define MAX_HISTORY   50
 
#define LINE_LENGTH   256
 

Functions

INT cmd_edit (const char *prompt, char *cmd, INT(*dir)(char *, INT *), INT(*idle)())
 

Variables

char history [MAX_HISTORY][LINE_LENGTH]
 
INT his_index = 0
 

Macro Definition Documentation

◆ LINE_LENGTH

#define LINE_LENGTH   256

Definition at line 21 of file cmdedit.cxx.

◆ MAX_HISTORY

#define MAX_HISTORY   50

Definition at line 18 of file cmdedit.cxx.

Function Documentation

◆ cmd_edit()

INT cmd_edit ( const char *  prompt,
char *  cmd,
INT(*)(char *, INT *)  dir,
INT(*)()  idle 
)

Definition at line 38 of file cmdedit.cxx.

39{
40 char line[LINE_LENGTH];
41 INT i, j, k, c, hi;
42 INT status;
43 DWORD last_time = 0;
44 BOOL escape_flag = 0;
45
46 if (ss_getchar(0) == -1) {
47 /* normal input if ss_getchar not supported */
48 fputs(prompt, stdout);
49 ss_gets(cmd, 256);
50 return strlen(cmd);
51 }
52
53 fputs(prompt, stdout);
54 fflush(stdout);
55
56 hi = his_index;
57 memset(line, 0, LINE_LENGTH);
58 memset(history[hi], 0, LINE_LENGTH);
59 strcpy(line, cmd);
60 fputs(line, stdout);
61 i = strlen(cmd);
62 fflush(stdout);
63
64 do {
65 c = ss_getchar(0);
66
67 if (c == 27)
68 escape_flag = TRUE;
69
70 if (c >= ' ' && c < CH_EXT && escape_flag) {
71 escape_flag = FALSE;
72 if (c == 'p')
73 c = 6;
74 }
75
76 /* normal input */
77 if (c >= ' ' && c < CH_EXT) {
78 if (strlen(line) < LINE_LENGTH - 1) {
79 for (j = strlen(line); j >= i; j--)
80 line[j + 1] = line[j];
81 if (i < LINE_LENGTH - 1) {
82 line[i++] = c;
83 fputc(c, stdout);
84 }
85 for (j = i; j < (INT) strlen(line); j++)
86 fputc(line[j], stdout);
87 for (j = i; j < (INT) strlen(line); j++)
88 fputc('\b', stdout);
89 }
90 }
91
92 /* BS */
93 if (c == CH_BS && i > 0) {
94 i--;
95 fputc('\b', stdout);
96 for (j = i; j <= (INT) strlen(line); j++) {
97 line[j] = line[j + 1];
98 if (line[j])
99 fputc(line[j], stdout);
100 else
101 fputc(' ', stdout);
102 }
103 for (k = 0; k < j - i; k++)
104 fputc('\b', stdout);
105 }
106
107 /* DELETE/Ctrl-D */
108 if (c == CH_DELETE || c == 4) {
109 for (j = i; j <= (INT) strlen(line); j++) {
110 line[j] = line[j + 1];
111 if (line[j])
112 fputc(line[j], stdout);
113 else
114 fputc(' ', stdout);
115 }
116 for (k = 0; k < j - i; k++)
117 fputc('\b', stdout);
118 }
119
120 /* Erase line: CTRL-W, CTRL-U */
121 if (c == 23 || c == 21) {
122 i = strlen(line);
123 memset(line, 0, sizeof(line));
124 printf("\r%s", prompt);
125 for (j = 0; j < i; j++)
126 fputc(' ', stdout);
127 for (j = 0; j < i; j++)
128 fputc('\b', stdout);
129 i = 0;
130 }
131
132 /* Erase line from cursor: CTRL-K */
133 if (c == 11) {
134 for (j = i; j < (INT) strlen(line); j++)
135 fputc(' ', stdout);
136 for (j = i; j < (INT) strlen(line); j++)
137 fputc('\b', stdout);
138 for (j = strlen(line); j >= i; j--)
139 line[j] = 0;
140 }
141
142 /* left arrow, CTRL-B */
143 if ((c == CH_LEFT || c == 2) && i > 0) {
144 i--;
145 fputc('\b', stdout);
146 }
147
148 /* right arrow, CTRL-F */
149 if ((c == CH_RIGHT || c == 6) && i < (INT) strlen(line))
150 fputc(line[i++], stdout);
151
152 /* HOME, CTRL-A */
153 if ((c == CH_HOME || c == 1) && i > 0) {
154 for (j = 0; j < i; j++)
155 fputc('\b', stdout);
156 i = 0;
157 }
158
159 /* END, CTRL-E */
160 if ((c == CH_END || c == 5) && i < (INT) strlen(line)) {
161 for (j = i; j < (INT) strlen(line); j++)
162 fputc(line[i++], stdout);
163 i = strlen(line);
164 }
165
166 /* up arrow / CTRL-P */
167 if (c == CH_UP || c == 16) {
168 if (history[(hi + MAX_HISTORY - 1) % MAX_HISTORY][0]) {
169 hi = (hi + MAX_HISTORY - 1) % MAX_HISTORY;
170 i = strlen(line);
171 fputc('\r', stdout);
172 fputs(prompt, stdout);
173 for (j = 0; j < i; j++)
174 fputc(' ', stdout);
175 for (j = 0; j < i; j++)
176 fputc('\b', stdout);
177 memcpy(line, history[hi], 256);
178 i = strlen(line);
179 for (j = 0; j < i; j++)
180 fputc(line[j], stdout);
181 }
182 }
183
184 /* down arrow / CTRL-N */
185 if (c == CH_DOWN || c == 14) {
186 if (history[hi][0]) {
187 hi = (hi + 1) % MAX_HISTORY;
188 i = strlen(line);
189 fputc('\r', stdout);
190 fputs(prompt, stdout);
191 for (j = 0; j < i; j++)
192 fputc(' ', stdout);
193 for (j = 0; j < i; j++)
194 fputc('\b', stdout);
195 memcpy(line, history[hi], 256);
196 i = strlen(line);
197 for (j = 0; j < i; j++)
198 fputc(line[j], stdout);
199 }
200 }
201
202 /* CTRL-F */
203 if (c == 6) {
204 for (j = (hi + MAX_HISTORY - 1) % MAX_HISTORY; j != hi;
205 j = (j + MAX_HISTORY - 1) % MAX_HISTORY)
206 if (history[j][0] && strncmp(line, history[j], i) == 0) {
207 memcpy(line, history[j], 256);
208 fputs(line + i, stdout);
209 i = strlen(line);
210 break;
211 }
212 if (j == hi)
213 fputc(7, stdout);
214 }
215
216 /* tab */
217 if (c == 9 && dir != NULL) {
218 status = dir(line, &i);
219
220 /* redraw line */
221 fputc('\r', stdout);
222 fputs(prompt, stdout);
223 fputs(line, stdout);
224
225 for (j = 0; j < (INT) strlen(line) - i; j++)
226 fputc('\b', stdout);
227 }
228
229 if (c != 0) {
230 last_time = ss_millitime();
231 fflush(stdout);
232 }
233
234 if ((ss_millitime() - last_time > 300) && idle != NULL) {
235 status = idle();
236
237 if (status) {
238 fputc('\r', stdout);
239 fputs(prompt, stdout);
240 fputs(line, stdout);
241
242 for (j = 0; j < (INT) strlen(line) - i; j++)
243 fputc('\b', stdout);
244
245 fflush(stdout);
246 }
247 }
248
249 } while (c != CH_CR && c != CH_LF);
250
251 strcpy(cmd, line);
252
253 if (dir != NULL)
254 if (strcmp(cmd, history[(his_index + MAX_HISTORY - 1) % MAX_HISTORY]) != 0 &&
255 cmd[0]) {
256 strcpy(history[his_index], cmd);
257 his_index = (his_index + 1) % MAX_HISTORY;
258 }
259
260 /* reset terminal */
261 ss_getchar(1);
262
263 fputc('\n', stdout);
264
265 return strlen(line);
266}
FALSE
#define FALSE
Definition cfortran.h:309
history
char history[MAX_HISTORY][LINE_LENGTH]
Definition cmdedit.cxx:23
MAX_HISTORY
#define MAX_HISTORY
Definition cmdedit.cxx:18
LINE_LENGTH
#define LINE_LENGTH
Definition cmdedit.cxx:21
his_index
INT his_index
Definition cmdedit.cxx:24
DWORD
unsigned int DWORD
Definition mcstd.h:51
ss_millitime
DWORD ss_millitime()
Definition system.cxx:3465
ss_getchar
INT ss_getchar(BOOL reset)
Definition system.cxx:7581
ss_gets
char * ss_gets(char *string, int size)
Definition system.cxx:7848
last_time
DWORD last_time
Definition mana.cxx:3070
i
INT i
Definition mdump.cxx:32
CH_LF
#define CH_LF
Definition midas.h:447
CH_END
#define CH_END
Definition midas.h:455
BOOL
DWORD BOOL
Definition midas.h:105
CH_DOWN
#define CH_DOWN
Definition midas.h:459
INT
int INT
Definition midas.h:129
CH_DELETE
#define CH_DELETE
Definition midas.h:454
CH_EXT
#define CH_EXT
Definition midas.h:450
CH_RIGHT
#define CH_RIGHT
Definition midas.h:460
CH_CR
#define CH_CR
Definition midas.h:448
CH_LEFT
#define CH_LEFT
Definition midas.h:461
TRUE
#define TRUE
Definition midas.h:182
CH_HOME
#define CH_HOME
Definition midas.h:452
CH_UP
#define CH_UP
Definition midas.h:458
CH_BS
#define CH_BS
Definition midas.h:445
j
INT j
Definition odbhist.cxx:40
k
INT k
Definition odbhist.cxx:40
status
DWORD status
Definition odbhist.cxx:39
c
char c
Definition system.cxx:1312
Here is the call graph for this function:
Here is the caller graph for this function:

Variable Documentation

◆ his_index

INT his_index = 0

Definition at line 24 of file cmdedit.cxx.

◆ history

char history[MAX_HISTORY][LINE_LENGTH]

Definition at line 23 of file cmdedit.cxx.