Import nvi2 version 2.1.3 to vendor branch
[dragonfly.git] / contrib / nvi2 / ex / ex_delete.c
1 /*-
2  * Copyright (c) 1992, 1993, 1994
3  *      The Regents of the University of California.  All rights reserved.
4  * Copyright (c) 1992, 1993, 1994, 1995, 1996
5  *      Keith Bostic.  All rights reserved.
6  *
7  * See the LICENSE file for redistribution information.
8  */
9
10 #include "config.h"
11
12 #ifndef lint
13 static const char sccsid[] = "$Id: ex_delete.c,v 10.11 2001/06/25 15:19:15 skimo Exp $";
14 #endif /* not lint */
15
16 #include <sys/types.h>
17 #include <sys/queue.h>
18 #include <sys/time.h>
19
20 #include <bitstring.h>
21 #include <limits.h>
22 #include <stdio.h>
23
24 #include "../common/common.h"
25
26 /*
27  * ex_delete: [line [,line]] d[elete] [buffer] [count] [flags]
28  *
29  *      Delete lines from the file.
30  *
31  * PUBLIC: int ex_delete(SCR *, EXCMD *);
32  */
33 int
34 ex_delete(SCR *sp, EXCMD *cmdp)
35 {
36         recno_t lno;
37
38         NEEDFILE(sp, cmdp);
39
40         /*
41          * !!!
42          * Historically, lines deleted in ex were not placed in the numeric
43          * buffers.  We follow historic practice so that we don't overwrite
44          * vi buffers accidentally.
45          */
46         if (cut(sp,
47             FL_ISSET(cmdp->iflags, E_C_BUFFER) ? &cmdp->buffer : NULL,
48             &cmdp->addr1, &cmdp->addr2, CUT_LINEMODE))
49                 return (1);
50
51         /* Delete the lines. */
52         if (del(sp, &cmdp->addr1, &cmdp->addr2, 1))
53                 return (1);
54
55         /* Set the cursor to the line after the last line deleted. */
56         sp->lno = cmdp->addr1.lno;
57
58         /* Or the last line in the file if deleted to the end of the file. */
59         if (db_last(sp, &lno))
60                 return (1);
61         if (sp->lno > lno)
62                 sp->lno = lno;
63         return (0);
64 }