summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--editors/vi.c227
1 files changed, 120 insertions, 107 deletions
diff --git a/editors/vi.c b/editors/vi.c
index 9426ab8..e58d6b3 100644
--- a/editors/vi.c
+++ b/editors/vi.c
@@ -35,6 +35,7 @@
enum {
MAX_LINELEN = CONFIG_FEATURE_VI_MAX_LEN,
MAX_SCR_COLS = CONFIG_FEATURE_VI_MAX_LEN,
+ MAX_TABSTOP = 32, // sanity limit
};
// Misc. non-Ascii keys that report an escape sequence
@@ -116,7 +117,8 @@ static int fn_start; // index of first cmd line file name
static int save_argc; // how many file names on cmd line
static int cmdcnt; // repetition count
static int rows, columns; // the terminal screen is this size
-static int crow, ccol, offset; // cursor is on Crow x Ccol with Horz Ofset
+static int crow, ccol; // cursor is on Crow x Ccol
+static int offset; // chars scrolled off the screen to the left
static char *status_buffer; // mesages to the user
#define STATUS_BUFFER_LEN 200
static int have_status_msg; // is default edit status needed?
@@ -253,6 +255,9 @@ static int file_insert(const char *, char *, int);
static int file_insert(const char *, char *);
#endif
static int file_write(char *, char *, char *);
+#if !ENABLE_FEATURE_VI_OPTIMIZE_CURSOR
+#define place_cursor(a, b, optimize) place_cursor(a, b)
+#endif
static void place_cursor(int, int, int);
static void screen_erase(void);
static void clear_to_eol(void);
@@ -266,7 +271,7 @@ static void psbs(const char *, ...); // Print Status Buf in standout mode
static void ni(const char *); // display messages
static int format_edit_status(void); // format file status on status line
static void redraw(int); // force a full screen refresh
-static void format_line(char*, char*, int);
+static int format_line(char*, char*, int);
static void refresh(int); // update the terminal from screen[]
static void Indicate_Error(void); // use flash or beep to indicate error
@@ -992,7 +997,7 @@ static void colon(char * buf)
/* tabstopXXXX */
if (strncasecmp(argp + i, "tabstop=%d ", 7) == 0) {
sscanf(strchr(argp + i, '='), "tabstop=%d" + 7, &ch);
- if (ch > 0 && ch < columns - 1)
+ if (ch > 0 && ch <= MAX_TABSTOP)
tabstop = ch;
}
while (*argp && *argp != ' ')
@@ -1252,7 +1257,7 @@ static char *end_line(char * p) // return pointer to NL of cur line line
return p;
}
-static inline char *dollar_line(char * p) // return pointer to just before NL line
+static char *dollar_line(char * p) // return pointer to just before NL line
{
while (p < end - 1 && *p != '\n')
p++; // go to cur line E-o-l
@@ -1923,7 +1928,7 @@ static void show_help(void)
);
}
-static inline void print_literal(char * buf, const char * s) // copy s to buf, convert unprintable
+static void print_literal(char * buf, const char * s) // copy s to buf, convert unprintable
{
unsigned char c;
char b[2];
@@ -2055,7 +2060,7 @@ static void check_context(char cmd)
}
}
-static inline char *swap_context(char * p) // goto new context for '' command make this the current context
+static char *swap_context(char * p) // goto new context for '' command make this the current context
{
char *tmp;
@@ -2147,7 +2152,7 @@ static int mysleep(int hund) // sleep for 'h' 1/100 seconds
return safe_poll(pfd, 1, hund*10) > 0;
}
-static int readed_for_parse;
+static int chars_to_parse;
//----- IO Routines --------------------------------------------
static char readit(void) // read (maybe cursor) key from stdin
@@ -2199,7 +2204,7 @@ static char readit(void) // read (maybe cursor) key from stdin
alarm(0); // turn alarm OFF while we wait for input
fflush(stdout);
- n = readed_for_parse;
+ n = chars_to_parse;
// get input from User- are there already input chars in Q?
if (n <= 0) {
// the Q is empty, wait for a typed char
@@ -2228,7 +2233,7 @@ static char readit(void) // read (maybe cursor) key from stdin
n += r;
}
}
- readed_for_parse = n;
+ chars_to_parse = n;
}
c = readbuffer[0];
if (c == 27 && n > 1) {
@@ -2256,7 +2261,7 @@ static char readit(void) // read (maybe cursor) key from stdin
n = 1;
}
// remove key sequence from Q
- readed_for_parse -= n;
+ chars_to_parse -= n;
memmove(readbuffer, readbuffer + n, MAX_LINELEN - n);
alarm(3); // we are done waiting for input, turn alarm ON
return c;
@@ -2265,7 +2270,7 @@ static char readit(void) // read (maybe cursor) key from stdin
//----- IO Routines --------------------------------------------
static char get_one_char(void)
{
- static char c;
+ char c;
#if ENABLE_FEATURE_VI_DOT_CMD
// ! adding2q && ioq == 0 read()
@@ -2290,7 +2295,7 @@ static char get_one_char(void)
} else {
// adding STDIN chars to q
c = readit(); // get the users input
- if (last_modifying_cmd != 0) {
+ if (last_modifying_cmd != NULL) {
int len = strlen(last_modifying_cmd);
if (len >= MAX_LINELEN - 1) {
psbs("last_modifying_cmd overrun");
@@ -2303,17 +2308,18 @@ static char get_one_char(void)
#else
c = readit(); // get the users input
#endif /* FEATURE_VI_DOT_CMD */
- return c; // return the char, where ever it came from
+ return c;
}
static char *get_input_line(const char * prompt) // get input line- use "status line"
{
- static char *obufp;
+ static char *buf; // [MAX_LINELEN]
- char buf[MAX_LINELEN];
char c;
int i;
+ if (!buf) buf = xmalloc(MAX_LINELEN);
+
strcpy(buf, prompt);
last_status_cksum = 0; // force status update
place_cursor(rows - 1, 0, FALSE); // go to Status line, bottom of screen
@@ -2329,7 +2335,7 @@ static char *get_input_line(const char * prompt) // get input line- use "status
// user wants to erase prev char
i--; // backup to prev char
buf[i] = '\0'; // erase the char
- buf[i + 1] = '\0'; // null terminate buffer
+ //buf[i + 1] = '\0'; // null terminate buffer
write1("\b \b"); // erase char on screen
if (i <= 0) { // user backs up before b-o-l, exit
break;
@@ -2342,9 +2348,7 @@ static char *get_input_line(const char * prompt) // get input line- use "status
}
}
refresh(FALSE);
- free(obufp);
- obufp = xstrdup(buf);
- return obufp;
+ return buf;
}
static int file_size(const char *fn) // what is the byte size of "fn"
@@ -2434,12 +2438,11 @@ static int file_write(char * fn, char * first, char * last)
return -2;
}
charcnt = 0;
- // FIXIT- use the correct umask()
- fd = open(fn, (O_WRONLY | O_CREAT | O_TRUNC), 0664);
+ fd = open(fn, (O_WRONLY | O_CREAT | O_TRUNC), 0666);
if (fd < 0)
return -1;
cnt = last - first + 1;
- charcnt = write(fd, first, cnt);
+ charcnt = full_write(fd, first, cnt);
if (charcnt == cnt) {
// good write
//file_modified = FALSE; // the file has not been modified
@@ -2459,22 +2462,13 @@ static int file_write(char * fn, char * first, char * last)
// . ... .
// . ... .
// 22,0 ... 22,79
-// 23,0 ... 23,79 status line
-//
+// 23,0 ... 23,79 <- status line
//----- Move the cursor to row x col (count from 0, not 1) -------
-static void place_cursor(int row, int col, int opti)
+static void place_cursor(int row, int col, int optimize)
{
- char cm1[MAX_LINELEN];
+ char cm1[32];
char *cm;
-#if ENABLE_FEATURE_VI_OPTIMIZE_CURSOR
- char cm2[MAX_LINELEN];
- char *screenp;
- // char cm3[MAX_LINELEN];
- int Rrow = last_row;
-#endif
-
- memset(cm1, '\0', MAX_LINELEN); // clear the buffer
if (row < 0) row = 0;
if (row >= rows) row = rows - 1;
@@ -2484,45 +2478,42 @@ static void place_cursor(int row, int col, int opti)
//----- 1. Try the standard terminal ESC sequence
sprintf(cm1, CMrc, row + 1, col + 1);
cm = cm1;
- if (!opti)
- goto pc0;
#if ENABLE_FEATURE_VI_OPTIMIZE_CURSOR
- //----- find the minimum # of chars to move cursor -------------
- //----- 2. Try moving with discreet chars (Newline, [back]space, ...)
- memset(cm2, '\0', MAX_LINELEN); // clear the buffer
+ if (optimize && col < 16) {
+ char cm2[MAX_LINELEN]; // better size estimate?
+ char *screenp;
+ int Rrow = last_row;
- // move to the correct row
- while (row < Rrow) {
- // the cursor has to move up
- strcat(cm2, CMup);
- Rrow--;
- }
- while (row > Rrow) {
- // the cursor has to move down
- strcat(cm2, CMdown);
- Rrow++;
- }
+ //----- find the minimum # of chars to move cursor -------------
+ //----- 2. Try moving with discreet chars (Newline, [back]space, ...)
+ cm2[0] = '\0';
- // now move to the correct column
- strcat(cm2, "\r"); // start at col 0
- // just send out orignal source char to get to correct place
- screenp = &screen[row * columns]; // start of screen line
- strncat(cm2, screenp, col);
+ // move to the correct row
+ while (row < Rrow) {
+ // the cursor has to move up
+ strcat(cm2, CMup);
+ Rrow--;
+ }
+ while (row > Rrow) {
+ // the cursor has to move down
+ strcat(cm2, CMdown);
+ Rrow++;
+ }
- //----- 3. Try some other way of moving cursor
- //---------------------------------------------
+ // now move to the correct column
+ strcat(cm2, "\r"); // start at col 0
+ // just send out orignal source char to get to correct place
+ screenp = &screen[row * columns]; // start of screen line
+ strncat(cm2, screenp, col);
- // pick the shortest cursor motion to send out
- cm = cm1;
- if (strlen(cm2) < strlen(cm)) {
- cm = cm2;
- } /* else if (strlen(cm3) < strlen(cm)) {
- cm= cm3;
- } */
+ // pick the shortest cursor motion to send out
+ if (strlen(cm2) < strlen(cm)) {
+ cm = cm2;
+ }
+ }
#endif /* FEATURE_VI_OPTIMIZE_CURSOR */
- pc0:
- write1(cm); // move the cursor
+ write1(cm);
}
//----- Erase from cursor to end of line -----------------------
@@ -2721,11 +2712,15 @@ static void redraw(int full_screen)
}
//----- Format a text[] line into a buffer ---------------------
-static void format_line(char *dest, char *src, int li)
+// Returns number of leading chars which should be ignored
+// (return value is always <= offset)
+static int format_line(char *dest, char *src, int li)
{
- int co;
char c;
+ int co;
+ int ofs = offset;
+ memset(dest, ' ', MAX_SCR_COLS);
for (co = 0; co < MAX_SCR_COLS; co++) {
c = ' '; // assume blank
if (li > 0 && co == 0) {
@@ -2734,33 +2729,52 @@ static void format_line(char *dest, char *src, int li)
// are there chars in text[] and have we gone past the end
if (text < end && src < end) {
c = *src++;
- }
- if (c == '\n')
- break;
- if ((c & 0x80) && !Isprint(c)) {
- c = '.';
- }
- if ((unsigned char)(c) < ' ' || c == 0x7f) {
- if (c == '\t') {
- c = ' ';
- // co % 8 != 7
- for (; (co % tabstop) != (tabstop - 1); co++) {
- dest[co] = c;
+
+ if (c == '\n')
+ break;
+ if ((c & 0x80) && !Isprint(c)) {
+ c = '.';
+ }
+ if ((unsigned char)(c) < ' ' || c == 0x7f) {
+ if (c == '\t') {
+ c = ' ';
+ // co % 8 != 7
+ while ((co % tabstop) != (tabstop - 1)) {
+ dest[co++] = c;
+ if (co >= MAX_SCR_COLS)
+ goto ret;
+ }
+ } else {
+ dest[co++] = '^';
+ if (co >= MAX_SCR_COLS)
+ goto ret;
+ if (c == 0x7f)
+ c = '?';
+ else
+ c += '@'; // make it visible
}
- } else {
- dest[co++] = '^';
- if (c == 0x7f)
- c = '?';
- else
- c += '@'; // make it visible
}
}
// the co++ is done here so that the column will
// not be overwritten when we blank-out the rest of line
dest[co] = c;
+ // discard scrolled-off portion, in tabstop-sized pieces
+ if (ofs >= tabstop && co >= tabstop) {
+ co -= tabstop;
+ ofs -= tabstop;
+ memset(&dest[co + 1], ' ', tabstop);
+ }
if (src >= end)
break;
}
+ ret:
+ if (co < ofs) {
+ // entire line has scrolled off, make it entirely blank
+ memset(dest, ' ', MAX_SCR_COLS);
+ ofs = 0;
+ }
+ dest[MAX_SCR_COLS-1] = '\0';
+ return ofs;
}
//----- Refresh the changed screen lines -----------------------
@@ -2786,19 +2800,19 @@ static void refresh(int full_screen)
// compare text[] to screen[] and mark screen[] lines that need updating
for (li = 0; li < rows - 1; li++) {
+ int ofs;
int cs, ce; // column start & end
- memset(buf, ' ', MAX_SCR_COLS); // blank-out the buffer
- buf[MAX_SCR_COLS-1] = 0; // NULL terminate the buffer
// format current text line into buf
- format_line(buf, tp, li);
+ ofs = format_line(buf, tp, li);
// skip to the end of the current text[] line
- while (tp < end && *tp++ != '\n') /*no-op*/;
+ while (tp < end && *tp++ != '\n')
+ continue;
// see if there are any changes between vitual screen and buf
changed = FALSE; // assume no change
- cs= 0;
- ce= columns-1;
+ cs = 0;
+ ce = columns - 1;
sp = &screen[li * columns]; // start of screen line
if (full_screen) {
// force re-draw of every single column from 0 - columns-1
@@ -2807,15 +2821,15 @@ static void refresh(int full_screen)
// compare newly formatted buffer with virtual screen
// look forward for first difference between buf and screen
for (; cs <= ce; cs++) {
- if (buf[cs + offset] != sp[cs]) {
+ if (buf[cs + ofs] != sp[cs]) {
changed = TRUE; // mark for redraw
break;
}
}
// look backward for last difference between buf and screen
- for ( ; ce >= cs; ce--) {
- if (buf[ce + offset] != sp[ce]) {
+ for (; ce >= cs; ce--) {
+ if (buf[ce + ofs] != sp[ce]) {
changed = TRUE; // mark for redraw
break;
}
@@ -2829,13 +2843,13 @@ static void refresh(int full_screen)
}
// make a sanity check of columns indexes
- if (cs < 0) cs= 0;
- if (ce > columns-1) ce= columns-1;
- if (cs > ce) { cs= 0; ce= columns-1; }
+ if (cs < 0) cs = 0;
+ if (ce > columns - 1) ce = columns - 1;
+ if (cs > ce) { cs = 0; ce = columns - 1; }
// is there a change between vitual screen and buf
if (changed) {
- // copy changed part of buffer to virtual screen
- memmove(sp+cs, buf+(cs+offset), ce-cs+1);
+ // copy changed part of buffer to virtual screen
+ memmove(sp+cs, buf+(cs+ofs), ce-cs+1);
// move cursor to column of first change
if (offset != old_offset) {
@@ -2848,7 +2862,7 @@ static void refresh(int full_screen)
// try to optimize cursor movement
// otherwise, use standard ESC sequence
place_cursor(li, cs, li == (last_li+1) ? TRUE : FALSE);
- last_li= li;
+ last_li = li;
#else
place_cursor(li, cs, FALSE); // use standard ESC sequence
#endif /* FEATURE_VI_OPTIMIZE_CURSOR */
@@ -2859,7 +2873,7 @@ static void refresh(int full_screen)
int nic = ce - cs + 1;
char *out = sp + cs;
- while (nic-- > 0) {
+ while (--nic >= 0) {
bb_putchar(*out);
out++;
}
@@ -2877,8 +2891,7 @@ static void refresh(int full_screen)
place_cursor(crow, ccol, FALSE);
#endif
- if (offset != old_offset)
- old_offset = offset;
+ old_offset = offset;
}
//---------------------------------------------------------------------
@@ -3230,7 +3243,7 @@ static void do_cmd(char c)
case '.': // .- repeat the last modifying command
// Stuff the last_modifying_cmd back into stdin
// and let it be re-executed.
- if (last_modifying_cmd != 0) {
+ if (last_modifying_cmd != NULL) {
ioq = ioq_start = xstrdup(last_modifying_cmd);
}
break;
@@ -3844,7 +3857,7 @@ static void crash_dummy()
cmd1 = " \n\r\002\004\005\006\025\0310^$-+wWeEbBhjklHL";
// is there already a command running?
- if (readed_for_parse > 0)
+ if (chars_to_parse > 0)
goto cd1;
cd0:
startrbi = rbi = 0;
@@ -3921,7 +3934,7 @@ static void crash_dummy()
}
strcat(readbuffer, "\033");
}
- readed_for_parse = strlen(readbuffer);
+ chars_to_parse = strlen(readbuffer);
cd1:
totalcmds++;
if (sleeptime > 0)