NetBSD/sys/ddb/db_input.c

401 lines
8.4 KiB
C
Raw Normal View History

/* $NetBSD: db_input.c,v 1.19 2002/11/04 06:24:41 itohy Exp $ */
/*
1993-03-21 12:45:37 +03:00
* Mach Operating System
* Copyright (c) 1991,1990 Carnegie Mellon University
* All Rights Reserved.
*
1993-03-21 12:45:37 +03:00
* Permission to use, copy, modify and distribute this software and its
* documentation is hereby granted, provided that both the copyright
* notice and this permission notice appear in all copies of the
* software, derivative works or modified versions, and any portions
* thereof, and that both notices appear in supporting documentation.
*
* CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
1993-03-21 12:45:37 +03:00
* CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
* ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
*
1993-03-21 12:45:37 +03:00
* Carnegie Mellon requests users of this software to return to
*
1993-03-21 12:45:37 +03:00
* Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
* School of Computer Science
* Carnegie Mellon University
* Pittsburgh PA 15213-3890
*
1993-03-21 12:45:37 +03:00
* any improvements or extensions that they make and grant Carnegie the
* rights to redistribute these changes.
1993-05-20 07:39:04 +04:00
*
1993-03-21 12:45:37 +03:00
* Author: David B. Golub, Carnegie Mellon University
* Date: 7/90
*/
2001-11-13 01:54:03 +03:00
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: db_input.c,v 1.19 2002/11/04 06:24:41 itohy Exp $");
2001-11-13 01:54:03 +03:00
#include "opt_ddbparam.h"
1998-07-05 02:18:13 +04:00
1993-12-18 07:46:25 +03:00
#include <sys/param.h>
#include <sys/proc.h>
1996-02-05 04:56:47 +03:00
#include <machine/db_machdep.h>
1993-03-21 12:45:37 +03:00
#include <ddb/db_output.h>
1996-02-05 04:56:47 +03:00
#include <ddb/db_command.h>
#include <ddb/db_sym.h>
#include <ddb/db_extern.h>
#include <dev/cons.h>
1993-03-21 12:45:37 +03:00
#ifndef DDB_HISTORY_SIZE
#define DDB_HISTORY_SIZE 0
#endif /* DDB_HISTORY_SIZE */
1993-03-21 12:45:37 +03:00
/*
* Character input and editing.
*/
/*
* We don't track output position while editing input,
* since input always ends with a new-line. We just
* reset the line position at the end.
*/
static char *db_lbuf_start; /* start of input line buffer */
static char *db_lbuf_end; /* end of input line buffer */
static char *db_lc; /* current character */
static char *db_le; /* one past last character */
#if DDB_HISTORY_SIZE != 0
static char db_history[DDB_HISTORY_SIZE]; /* start of history buffer */
static int db_history_size = DDB_HISTORY_SIZE;/* size of history buffer */
static char *db_history_curr = db_history; /* start of current line */
static char *db_history_last = db_history; /* start of last line */
static char *db_history_prev = (char *) 0; /* start of previous line */
#endif
1993-03-21 12:45:37 +03:00
#define CTRL(c) ((c) & 0x1f)
#define isspace(c) ((c) == ' ' || (c) == '\t')
#define BLANK ' '
#define BACKUP '\b'
static int cnmaygetc(void);
static void db_putstring(char *, int);
static void db_putnchars(int, int);
static void db_delete(int, int);
static void db_delete_line(void);
static int db_inputchar(int);
1996-02-05 04:56:47 +03:00
static void
db_putstring(char *s, int count)
1993-03-21 12:45:37 +03:00
{
1993-03-21 12:45:37 +03:00
while (--count >= 0)
cnputc(*s++);
1993-03-21 12:45:37 +03:00
}
static void
db_putnchars(int c, int count)
1993-03-21 12:45:37 +03:00
{
1993-03-21 12:45:37 +03:00
while (--count >= 0)
cnputc(c);
1993-03-21 12:45:37 +03:00
}
/*
* Delete N characters, forward or backward
*/
#define DEL_FWD 0
#define DEL_BWD 1
static void
db_delete(int n, int bwd)
1993-03-21 12:45:37 +03:00
{
2000-03-30 15:31:26 +04:00
char *p;
1993-03-21 12:45:37 +03:00
if (bwd) {
db_lc -= n;
db_putnchars(BACKUP, n);
1993-03-21 12:45:37 +03:00
}
for (p = db_lc; p < db_le-n; p++) {
*p = *(p+n);
cnputc(*p);
1993-03-21 12:45:37 +03:00
}
db_putnchars(BLANK, n);
db_putnchars(BACKUP, db_le - db_lc);
db_le -= n;
}
static void
db_delete_line(void)
{
db_delete(db_le - db_lc, DEL_FWD);
db_delete(db_lc - db_lbuf_start, DEL_BWD);
db_le = db_lc = db_lbuf_start;
}
#if DDB_HISTORY_SIZE != 0
#define INC_DB_CURR() \
do { \
db_history_curr++; \
if (db_history_curr > db_history + db_history_size - 1) \
db_history_curr = db_history; \
2002-11-02 10:20:42 +03:00
} while (/*CONSTCOND*/ 0)
#define DEC_DB_CURR() \
do { \
db_history_curr--; \
if (db_history_curr < db_history) \
db_history_curr = db_history + \
db_history_size - 1; \
2002-11-02 10:20:42 +03:00
} while (/*CONSTCOND*/ 0)
#endif
1993-03-21 12:45:37 +03:00
/* returns TRUE at end-of-line */
static int
db_inputchar(int c)
1993-03-21 12:45:37 +03:00
{
switch (c) {
case CTRL('b'):
1993-03-21 12:45:37 +03:00
/* back up one character */
if (db_lc > db_lbuf_start) {
cnputc(BACKUP);
db_lc--;
1993-03-21 12:45:37 +03:00
}
break;
case CTRL('f'):
1993-03-21 12:45:37 +03:00
/* forward one character */
if (db_lc < db_le) {
cnputc(*db_lc);
db_lc++;
1993-03-21 12:45:37 +03:00
}
break;
case CTRL('a'):
1993-03-21 12:45:37 +03:00
/* beginning of line */
while (db_lc > db_lbuf_start) {
cnputc(BACKUP);
db_lc--;
1993-03-21 12:45:37 +03:00
}
break;
case CTRL('e'):
1993-03-21 12:45:37 +03:00
/* end of line */
while (db_lc < db_le) {
cnputc(*db_lc);
db_lc++;
1993-03-21 12:45:37 +03:00
}
break;
case CTRL('h'):
case 0177:
1993-03-21 12:45:37 +03:00
/* erase previous character */
if (db_lc > db_lbuf_start)
db_delete(1, DEL_BWD);
1993-03-21 12:45:37 +03:00
break;
case CTRL('d'):
1993-03-21 12:45:37 +03:00
/* erase next character */
if (db_lc < db_le)
db_delete(1, DEL_FWD);
1993-03-21 12:45:37 +03:00
break;
case CTRL('k'):
1993-03-21 12:45:37 +03:00
/* delete to end of line */
if (db_lc < db_le)
db_delete(db_le - db_lc, DEL_FWD);
1993-03-21 12:45:37 +03:00
break;
case CTRL('u'):
/* delete line */
db_delete_line();
break;
case CTRL('t'):
1993-03-21 12:45:37 +03:00
/* twiddle last 2 characters */
if (db_lc >= db_lbuf_start + 1) {
if (db_lc < db_le) {
c = db_lc[-1];
db_lc[-1] = db_lc[0];
db_lc[0] = c;
cnputc(BACKUP);
cnputc(db_lc[-1]);
cnputc(db_lc[0]);
db_lc++;
} else if (db_lc >= db_lbuf_start + 2) {
c = db_lc[-2];
db_lc[-2] = db_lc[-1];
db_lc[-1] = c;
cnputc(BACKUP);
cnputc(BACKUP);
cnputc(db_lc[-2]);
cnputc(db_lc[-1]);
}
1993-03-21 12:45:37 +03:00
}
break;
#if DDB_HISTORY_SIZE != 0
case CTRL('p'):
DEC_DB_CURR();
while (db_history_curr != db_history_last) {
DEC_DB_CURR();
if (*db_history_curr == '\0')
break;
}
db_delete_line();
if (db_history_curr == db_history_last) {
INC_DB_CURR();
db_le = db_lc = db_lbuf_start;
} else {
2000-03-30 15:31:26 +04:00
char *p;
INC_DB_CURR();
for (p = db_history_curr, db_le = db_lbuf_start;
*p; ) {
*db_le++ = *p++;
if (p == db_history + db_history_size) {
p = db_history;
}
}
db_lc = db_le;
}
db_putstring(db_lbuf_start, db_le - db_lbuf_start);
break;
case CTRL('n'):
while (db_history_curr != db_history_last) {
if (*db_history_curr == '\0')
break;
INC_DB_CURR();
}
if (db_history_curr != db_history_last) {
INC_DB_CURR();
db_delete_line();
if (db_history_curr != db_history_last) {
2000-03-30 15:31:26 +04:00
char *p;
for (p = db_history_curr,
db_le = db_lbuf_start; *p;) {
*db_le++ = *p++;
if (p == db_history +
db_history_size) {
p = db_history;
}
}
db_lc = db_le;
}
db_putstring(db_lbuf_start, db_le - db_lbuf_start);
}
break;
#endif
case CTRL('r'):
1993-03-21 12:45:37 +03:00
db_putstring("^R\n", 3);
if (db_le > db_lbuf_start) {
db_putstring(db_lbuf_start, db_le - db_lbuf_start);
db_putnchars(BACKUP, db_le - db_lc);
1993-03-21 12:45:37 +03:00
}
break;
case '\n':
case '\r':
#if DDB_HISTORY_SIZE != 0
/* Check if it same than previous line */
if (db_history_curr == db_history_prev) {
2000-03-30 15:31:26 +04:00
char *pp, *pc;
/* Is it unmodified */
for (pp = db_history_prev, pc = db_lbuf_start;
pc != db_le && *pp; pp++, pc++) {
if (*pp != *pc)
break;
if (++pp == db_history + db_history_size) {
pp = db_history;
}
if (++pc == db_history + db_history_size) {
pc = db_history;
}
}
if (!*pp && pc == db_le) {
/* Repeted previous line, not saved */
db_history_curr = db_history_last;
*db_le++ = c;
return (TRUE);
}
}
if (db_le != db_lbuf_start) {
2000-03-30 15:31:26 +04:00
char *p;
db_history_prev = db_history_last;
for (p = db_lbuf_start; p != db_le; p++) {
*db_history_last++ = *p;
if (db_history_last == db_history +
db_history_size) {
db_history_last = db_history;
}
}
*db_history_last++ = '\0';
}
db_history_curr = db_history_last;
#endif
1993-03-21 12:45:37 +03:00
*db_le++ = c;
return (1);
default:
1993-03-21 12:45:37 +03:00
if (db_le == db_lbuf_end) {
cnputc('\007');
1993-03-21 12:45:37 +03:00
}
else if (c >= ' ' && c <= '~') {
char *p;
for (p = db_le; p > db_lc; p--)
*p = *(p-1);
*db_lc++ = c;
db_le++;
cnputc(c);
db_putstring(db_lc, db_le - db_lc);
db_putnchars(BACKUP, db_le - db_lc);
1993-03-21 12:45:37 +03:00
}
break;
}
return (0);
}
int
db_readline(char *lstart, int lsize)
1993-03-21 12:45:37 +03:00
{
db_force_whitespace(); /* synch output position */
db_lbuf_start = lstart;
db_lbuf_end = lstart + lsize;
db_lc = lstart;
db_le = lstart;
while (!db_inputchar(cngetc()))
continue;
1993-03-21 12:45:37 +03:00
db_putchar('\n'); /* synch output position */
*db_le = 0;
return (db_le - db_lbuf_start);
}
void
db_check_interrupt(void)
1993-03-21 12:45:37 +03:00
{
2000-03-30 15:31:26 +04:00
int c;
1993-03-21 12:45:37 +03:00
c = cnmaygetc();
switch (c) {
case -1: /* no character */
1993-03-21 12:45:37 +03:00
return;
case CTRL('c'):
1993-03-21 12:45:37 +03:00
db_error((char *)0);
/*NOTREACHED*/
case CTRL('s'):
1993-03-21 12:45:37 +03:00
do {
c = cnmaygetc();
if (c == CTRL('c')) {
db_error((char *)0);
/*NOTREACHED*/
}
1993-03-21 12:45:37 +03:00
} while (c != CTRL('q'));
break;
default:
1993-03-21 12:45:37 +03:00
/* drop on floor */
break;
}
}
1996-02-05 04:56:47 +03:00
static int
cnmaygetc(void)
1993-03-21 12:45:37 +03:00
{
1993-03-21 12:45:37 +03:00
return (-1);
}