diff options
Diffstat (limited to 'usr.bin/vi/ex/ex_print.c')
| -rw-r--r-- | usr.bin/vi/ex/ex_print.c | 206 |
1 files changed, 206 insertions, 0 deletions
diff --git a/usr.bin/vi/ex/ex_print.c b/usr.bin/vi/ex/ex_print.c new file mode 100644 index 000000000000..ad37c2b2235c --- /dev/null +++ b/usr.bin/vi/ex/ex_print.c @@ -0,0 +1,206 @@ +/*- + * Copyright (c) 1992, 1993, 1994 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + */ + +#ifndef lint +static char sccsid[] = "@(#)ex_print.c 8.8 (Berkeley) 3/14/94"; +#endif /* not lint */ + +#include <sys/types.h> +#include <queue.h> +#include <sys/time.h> + +#include <bitstring.h> +#include <ctype.h> +#include <limits.h> +#include <signal.h> +#include <stdio.h> +#include <string.h> +#include <termios.h> + +#include <db.h> +#include <regex.h> + +#include "vi.h" +#include "excmd.h" + +/* + * ex_list -- :[line [,line]] l[ist] [count] [flags] + * + * Display the addressed lines such that the output is unambiguous. + */ +int +ex_list(sp, ep, cmdp) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; +{ + if (ex_print(sp, ep, + &cmdp->addr1, &cmdp->addr2, cmdp->flags | E_F_LIST)) + return (1); + sp->lno = cmdp->addr2.lno; + sp->cno = cmdp->addr2.cno; + return (0); +} + +/* + * ex_number -- :[line [,line]] nu[mber] [count] [flags] + * + * Display the addressed lines with a leading line number. + */ +int +ex_number(sp, ep, cmdp) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; +{ + if (ex_print(sp, ep, + &cmdp->addr1, &cmdp->addr2, cmdp->flags | E_F_HASH)) + return (1); + sp->lno = cmdp->addr2.lno; + sp->cno = cmdp->addr2.cno; + return (0); +} + +/* + * ex_pr -- :[line [,line]] p[rint] [count] [flags] + * + * Display the addressed lines. + */ +int +ex_pr(sp, ep, cmdp) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; +{ + if (ex_print(sp, ep, &cmdp->addr1, &cmdp->addr2, cmdp->flags)) + return (1); + sp->lno = cmdp->addr2.lno; + sp->cno = cmdp->addr2.cno; + return (0); +} + +/* + * ex_print -- + * Print the selected lines. + */ +int +ex_print(sp, ep, fp, tp, flags) + SCR *sp; + EXF *ep; + MARK *fp, *tp; + register int flags; +{ + register int ch, col, rlen; + recno_t from, to; + size_t len; + int cnt; + char *p, buf[10]; + + F_SET(sp, S_INTERRUPTIBLE); + for (from = fp->lno, to = tp->lno; from <= to; ++from) { + /* Display the line number. */ + if (LF_ISSET(E_F_HASH)) + col = ex_printf(EXCOOKIE, "%7ld ", from); + else + col = 0; + + /* + * Display the line. The format for E_F_PRINT isn't very good, + * especially in handling end-of-line tabs, but they're almost + * backward compatible. + */ + if ((p = file_gline(sp, ep, from, &len)) == NULL) { + GETLINE_ERR(sp, from); + return (1); + } + +#define WCHECK(ch) { \ + if (col == sp->cols) { \ + (void)ex_printf(EXCOOKIE, "\n"); \ + col = 0; \ + } \ + (void)ex_printf(EXCOOKIE, "%c", ch); \ + ++col; \ +} + for (rlen = len; rlen--;) { + ch = *p++; + if (LF_ISSET(E_F_LIST)) + if (ch != '\t' && isprint(ch)) { + WCHECK(ch); + } else if (ch & 0x80) { + (void)snprintf(buf, + sizeof(buf), "\\%03o", ch); + len = strlen(buf); + for (cnt = 0; cnt < len; ++cnt) + WCHECK(buf[cnt]); + } else { + WCHECK('^'); + WCHECK(ch + 0x40); + } + else { + ch &= 0x7f; + if (ch == '\t') { + while (col < sp->cols && + ++col % O_VAL(sp, O_TABSTOP)) + (void)ex_printf(EXCOOKIE, " "); + if (col == sp->cols) { + col = 0; + (void)ex_printf(EXCOOKIE, "\n"); + } + } else if (isprint(ch)) { + WCHECK(ch); + } else if (ch == '\n') { + col = 0; + (void)ex_printf(EXCOOKIE, "\n"); + } else { + WCHECK('^'); + WCHECK(ch + 0x40); + } + } + } + if (LF_ISSET(E_F_LIST)) { + WCHECK('$'); + } else if (len == 0) { + /* + * If the line is empty, output a space + * to overwrite the colon prompt. + */ + WCHECK(' '); + } + (void)ex_printf(EXCOOKIE, "\n"); + + if (F_ISSET(sp, S_INTERRUPTED)) + break; + } + return (0); +} |