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