diff options
Diffstat (limited to 'usr.bin/vi/ex/ex_append.c')
| -rw-r--r-- | usr.bin/vi/ex/ex_append.c | 195 |
1 files changed, 195 insertions, 0 deletions
diff --git a/usr.bin/vi/ex/ex_append.c b/usr.bin/vi/ex/ex_append.c new file mode 100644 index 000000000000..f75b22fa31af --- /dev/null +++ b/usr.bin/vi/ex/ex_append.c @@ -0,0 +1,195 @@ +/*- + * 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_append.c 8.9 (Berkeley) 3/14/94"; +#endif /* not lint */ + +#include <sys/types.h> +#include <queue.h> +#include <sys/time.h> + +#include <bitstring.h> +#include <limits.h> +#include <signal.h> +#include <stdio.h> +#include <termios.h> + +#include <db.h> +#include <regex.h> + +#include "vi.h" +#include "excmd.h" + +enum which {APPEND, CHANGE, INSERT}; + +static int aci __P((SCR *, EXF *, EXCMDARG *, enum which)); + +/* + * ex_append -- :[line] a[ppend][!] + * Append one or more lines of new text after the specified line, + * or the current line if no address is specified. + */ +int +ex_append(sp, ep, cmdp) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; +{ + return (aci(sp, ep, cmdp, APPEND)); +} + +/* + * ex_change -- :[line[,line]] c[hange][!] [count] + * Change one or more lines to the input text. + */ +int +ex_change(sp, ep, cmdp) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; +{ + return (aci(sp, ep, cmdp, CHANGE)); +} + +/* + * ex_insert -- :[line] i[nsert][!] + * Insert one or more lines of new text before the specified line, + * or the current line if no address is specified. + */ +int +ex_insert(sp, ep, cmdp) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; +{ + return (aci(sp, ep, cmdp, INSERT)); +} + +static int +aci(sp, ep, cmdp, cmd) + SCR *sp; + EXF *ep; + EXCMDARG *cmdp; + enum which cmd; +{ + MARK m; + TEXT *tp; + recno_t cnt; + u_int flags; + int rval, aiset; + + /* + * The ! flag turns off autoindent for append, change and + * insert. + */ + if (F_ISSET(cmdp, E_FORCE)) { + aiset = O_ISSET(sp, O_AUTOINDENT); + O_CLR(sp, O_AUTOINDENT); + } else + aiset = 0; + + /* + * If doing a change, replace lines as long as possible. + * Then, append more lines or delete remaining lines. + * Inserts are the same as appends to the previous line. + */ + rval = 0; + m = cmdp->addr1; + if (cmd == INSERT) { + --m.lno; + cmd = APPEND; + } + + LF_INIT(TXT_CR | TXT_NLECHO); + if (O_ISSET(sp, O_BEAUTIFY)) + LF_SET(TXT_BEAUTIFY); + + if (cmd == CHANGE) + for (;; ++m.lno) { + if (m.lno > cmdp->addr2.lno) { + cmd = APPEND; + --m.lno; + break; + } + switch (sp->s_get(sp, ep, &sp->tiq, 0, flags)) { + case INP_OK: + break; + case INP_EOF: + case INP_ERR: + rval = 1; + goto done; + } + tp = sp->tiq.cqh_first; + if (tp->len == 1 && tp->lb[0] == '.') { + for (cnt = + (cmdp->addr2.lno - m.lno) + 1; cnt--;) + if (file_dline(sp, ep, m.lno)) { + rval = 1; + goto done; + } + goto done; + } + if (file_sline(sp, ep, m.lno, tp->lb, tp->len)) { + rval = 1; + goto done; + } + } + + if (cmd == APPEND) + for (;; ++m.lno) { + switch (sp->s_get(sp, ep, &sp->tiq, 0, flags)) { + case INP_OK: + break; + case INP_EOF: + case INP_ERR: + rval = 1; + goto done; + } + tp = sp->tiq.cqh_first; + if (tp->len == 1 && tp->lb[0] == '.') + break; + if (file_aline(sp, ep, 1, m.lno, tp->lb, tp->len)) { + rval = 1; + goto done; + } + } + +done: if (rval == 0) + sp->lno = m.lno; + + if (aiset) + O_SET(sp, O_AUTOINDENT); + + return (rval); +} |