![[BACK]](/icons/back.gif){kind=icon}
Return to db_input.c CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [local] / sys / ddb|
Return to db_input.c CVS log | Up to [local] / sys / ddb |
1.1 nbrk 1: /* $OpenBSD: db_input.c,v 1.11 2006/07/06 18:14:14 miod Exp $ */
2: /* $NetBSD: db_input.c,v 1.7 1996/02/05 01:57:02 christos Exp $ */
3:
4: /*
5: * Mach Operating System
6: * Copyright (c) 1993,1992,1991,1990 Carnegie Mellon University
7: * All Rights Reserved.
8: *
9: * Permission to use, copy, modify and distribute this software and its
10: * documentation is hereby granted, provided that both the copyright
11: * notice and this permission notice appear in all copies of the
12: * software, derivative works or modified versions, and any portions
13: * thereof, and that both notices appear in supporting documentation.
14: *
15: * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
16: * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
17: * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
18: *
19: * Carnegie Mellon requests users of this software to return to
20: *
21: * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
22: * School of Computer Science
23: * Carnegie Mellon University
24: * Pittsburgh PA 15213-3890
25: *
26: * any improvements or extensions that they make and grant Carnegie Mellon
27: * the rights to redistribute these changes.
28: *
29: * Author: David B. Golub, Carnegie Mellon University
30: * Date: 7/90
31: */
32:
33: #include <sys/param.h>
34: #include <sys/proc.h>
35:
36: #include <uvm/uvm_extern.h>
37:
38: #include <machine/db_machdep.h>
39:
40: #include <ddb/db_var.h>
41: #include <ddb/db_output.h>
42: #include <ddb/db_command.h>
43: #include <ddb/db_sym.h>
44: #include <ddb/db_extern.h>
45:
46: #include <dev/cons.h>
47:
48: /*
49: * Character input and editing.
50: */
51:
52: /*
53: * We don't track output position while editing input,
54: * since input always ends with a new-line. We just
55: * reset the line position at the end.
56: */
57: char * db_lbuf_start; /* start of input line buffer */
58: char * db_lbuf_end; /* end of input line buffer */
59: char * db_lc; /* current character */
60: char * db_le; /* one past last character */
61: #if DB_HISTORY_SIZE != 0
62: char db_history[DB_HISTORY_SIZE]; /* start of history buffer */
63: int db_history_size = DB_HISTORY_SIZE;/* size of history buffer */
64: char * db_history_curr = db_history; /* start of current line */
65: char * db_history_last = db_history; /* start of last line */
66: char * db_history_prev = (char *) 0; /* start of previous line */
67: #endif
68:
69:
70: #define CTRL(c) ((c) & 0x1f)
71: #define isspace(c) ((c) == ' ' || (c) == '\t')
72: #define BLANK ' '
73: #define BACKUP '\b'
74:
75: void
76: db_putstring(char *s, int count)
77: {
78: while (--count >= 0)
79: cnputc(*s++);
80: }
81:
82: void
83: db_putnchars(int c, int count)
84: {
85: while (--count >= 0)
86: cnputc(c);
87: }
88:
89: /*
90: * Delete N characters, forward or backward
91: */
92: #define DEL_FWD 0
93: #define DEL_BWD 1
94: void
95: db_delete(int n, int bwd)
96: {
97: char *p;
98:
99: if (bwd) {
100: db_lc -= n;
101: db_putnchars(BACKUP, n);
102: }
103: for (p = db_lc; p < db_le-n; p++) {
104: *p = *(p+n);
105: cnputc(*p);
106: }
107: db_putnchars(BLANK, n);
108: db_putnchars(BACKUP, db_le - db_lc);
109: db_le -= n;
110: }
111:
112: void
113: db_delete_line(void)
114: {
115: db_delete(db_le - db_lc, DEL_FWD);
116: db_delete(db_lc - db_lbuf_start, DEL_BWD);
117: db_le = db_lc = db_lbuf_start;
118: }
119:
120: #if DB_HISTORY_SIZE != 0
121: #define INC_DB_CURR() \
122: do { \
123: db_history_curr++; \
124: if (db_history_curr > \
125: db_history + db_history_size - 1) \
126: db_history_curr = db_history; \
127: } while (0)
128: #define DEC_DB_CURR() \
129: do { \
130: db_history_curr--; \
131: if (db_history_curr < db_history) \
132: db_history_curr = db_history + \
133: db_history_size - 1; \
134: } while (0)
135: #endif
136:
137: /* returns TRUE at end-of-line */
138: int
139: db_inputchar(int c)
140: {
141: switch (c) {
142: case CTRL('b'):
143: /* back up one character */
144: if (db_lc > db_lbuf_start) {
145: cnputc(BACKUP);
146: db_lc--;
147: }
148: break;
149: case CTRL('f'):
150: /* forward one character */
151: if (db_lc < db_le) {
152: cnputc(*db_lc);
153: db_lc++;
154: }
155: break;
156: case CTRL('a'):
157: /* beginning of line */
158: while (db_lc > db_lbuf_start) {
159: cnputc(BACKUP);
160: db_lc--;
161: }
162: break;
163: case CTRL('e'):
164: /* end of line */
165: while (db_lc < db_le) {
166: cnputc(*db_lc);
167: db_lc++;
168: }
169: break;
170: case CTRL('w'):
171: /* erase word back */
172: while (db_lc > db_lbuf_start && db_lc[-1] != BLANK)
173: db_delete(1, DEL_BWD);
174: break;
175: case CTRL('h'):
176: case 0177:
177: /* erase previous character */
178: if (db_lc > db_lbuf_start)
179: db_delete(1, DEL_BWD);
180: break;
181: case CTRL('d'):
182: /* erase next character */
183: if (db_lc < db_le)
184: db_delete(1, DEL_FWD);
185: break;
186: case CTRL('k'):
187: /* delete to end of line */
188: if (db_lc < db_le)
189: db_delete(db_le - db_lc, DEL_FWD);
190: break;
191: case CTRL('u'):
192: /* delete line */
193: db_delete_line();
194: break;
195: case CTRL('t'):
196: /* twiddle last 2 characters */
197: if (db_lc >= db_lbuf_start + 2) {
198: c = db_lc[-2];
199: db_lc[-2] = db_lc[-1];
200: db_lc[-1] = c;
201: cnputc(BACKUP);
202: cnputc(BACKUP);
203: cnputc(db_lc[-2]);
204: cnputc(db_lc[-1]);
205: }
206: break;
207: #if DB_HISTORY_SIZE != 0
208: case CTRL('p'):
209: DEC_DB_CURR();
210: while (db_history_curr != db_history_last) {
211: DEC_DB_CURR();
212: if (*db_history_curr == '\0')
213: break;
214: }
215: db_delete_line();
216: if (db_history_curr == db_history_last) {
217: INC_DB_CURR();
218: db_le = db_lc = db_lbuf_start;
219: } else {
220: char *p;
221: INC_DB_CURR();
222: for (p = db_history_curr, db_le = db_lbuf_start;*p; ) {
223: *db_le++ = *p++;
224: if (p == db_history + db_history_size)
225: p = db_history;
226: }
227: db_lc = db_le;
228: }
229: db_putstring(db_lbuf_start, db_le - db_lbuf_start);
230: break;
231: case CTRL('n'):
232: while (db_history_curr != db_history_last) {
233: if (*db_history_curr == '\0')
234: break;
235: INC_DB_CURR();
236: }
237: if (db_history_curr != db_history_last) {
238: INC_DB_CURR();
239: db_delete_line();
240: if (db_history_curr != db_history_last) {
241: char *p;
242: for (p = db_history_curr,
243: db_le = db_lbuf_start; *p;) {
244: *db_le++ = *p++;
245: if (p == db_history + db_history_size)
246: p = db_history;
247: }
248: db_lc = db_le;
249: }
250: db_putstring(db_lbuf_start, db_le - db_lbuf_start);
251: }
252: break;
253: #endif
254: case CTRL('r'):
255: db_putstring("^R\n", 3);
256: if (db_le > db_lbuf_start) {
257: db_putstring(db_lbuf_start, db_le - db_lbuf_start);
258: db_putnchars(BACKUP, db_le - db_lc);
259: }
260: break;
261: case '\n':
262: case '\r':
263: #if DB_HISTORY_SIZE != 0
264: /*
265: * Check whether current line is the same
266: * as previous saved line. If it is, don`t
267: * save it.
268: */
269: if (db_history_curr == db_history_prev) {
270: char *pp, *pc;
271:
272: /*
273: * Is it the same?
274: */
275: for (pp = db_history_prev, pc = db_lbuf_start;
276: pc != db_le && *pp; ) {
277: if (*pp != *pc)
278: break;
279: if (++pp == db_history + db_history_size)
280: pp = db_history;
281: pc++;
282: }
283: if (!*pp && pc == db_le) {
284: /*
285: * Repeated previous line. Don`t save.
286: */
287: db_history_curr = db_history_last;
288: *db_le++ = c;
289: return TRUE;
290: }
291: }
292: if (db_le != db_lbuf_start) {
293: char *p;
294: db_history_prev = db_history_last;
295: for (p = db_lbuf_start; p != db_le; p++) {
296: *db_history_last++ = *p;
297: if (db_history_last ==
298: db_history + db_history_size)
299: db_history_last = db_history;
300: }
301: *db_history_last++ = '\0';
302: }
303: db_history_curr = db_history_last;
304: #endif
305: *db_le++ = c;
306: return TRUE;
307: default:
308: if (db_le == db_lbuf_end) {
309: cnputc('\007');
310: }
311: else if (c >= ' ' && c <= '~') {
312: char *p;
313:
314: for (p = db_le; p > db_lc; p--)
315: *p = *(p-1);
316: *db_lc++ = c;
317: db_le++;
318: cnputc(c);
319: db_putstring(db_lc, db_le - db_lc);
320: db_putnchars(BACKUP, db_le - db_lc);
321: }
322: break;
323: }
324: return FALSE;
325: }
326:
327: int
328: db_readline(char *lstart, int lsize)
329: {
330: db_force_whitespace(); /* synch output position */
331:
332: db_lbuf_start = lstart;
333: db_lbuf_end = lstart + lsize - 1;
334: db_lc = lstart;
335: db_le = lstart;
336:
337: while (!db_inputchar(cngetc()))
338: continue;
339:
340: db_putchar('\n'); /* synch output position */
341:
342: *db_le = 0;
343: return (db_le - db_lbuf_start);
344: }