vi/v_delete.c

   1 /*-
   2  * Copyright (c) 1992, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * %sccs.include.redist.c%
   6  */
   7
   8 #ifndef lint
   9 static char sccsid[] = "$Id: v_delete.c,v 8.5 1993/11/04 16:17:23 bostic Exp $ (Berkeley) $Date: 1993/11/04 16:17:23 $";
  10 #endif /* not lint */
  11
  12 #include <sys/types.h>
  13
  14 #include "vi.h"
  15 #include "vcmd.h"
  16
  17 /*
  18  * v_Delete -- [buffer][count]D
  19  *      Delete line command.
  20  */
  21 int
  22 v_Delete(sp, ep, vp, fm, tm, rp)
  23         SCR *sp;
  24         EXF *ep;
  25         VICMDARG *vp;
  26         MARK *fm, *tm, *rp;
  27 {
  28         recno_t lno;
  29         size_t len;
  30
  31         if (file_gline(sp, ep, fm->lno, &len) == NULL) {
  32                 if (file_lline(sp, ep, &lno))
  33                         return (1);
  34                 if (lno == 0)
  35                         return (0);
  36                 GETLINE_ERR(sp, fm->lno);
  37                 return (1);
  38         }
  39
  40         if (len == 0)
  41                 return (0);
  42
  43         tm->lno = fm->lno;
  44         tm->cno = len;
  45
  46         if (cut(sp, ep,
  47             F_ISSET(vp, VC_BUFFER) ? vp->buffer : DEFCB, fm, tm, 0))
  48                 return (1);
  49         if (delete(sp, ep, fm, tm, 0))
  50                 return (1);
  51
  52         rp->lno = fm->lno;
  53         rp->cno = fm->cno ? fm->cno - 1 : 0;
  54         return (0);
  55 }
  56
  57 /*
  58  * v_delete -- [buffer][count]d[count]motion
  59  *      Delete a range of text.
  60  */
  61 int
  62 v_delete(sp, ep, vp, fm, tm, rp)
  63         SCR *sp;
  64         EXF *ep;
  65         VICMDARG *vp;
  66         MARK *fm, *tm, *rp;
  67 {
  68         recno_t nlines;
  69         size_t len;
  70         int lmode;
  71
  72         lmode = F_ISSET(vp, VC_LMODE);
  73         if (cut(sp, ep,
  74             F_ISSET(vp, VC_BUFFER) ? vp->buffer : DEFCB, fm, tm, lmode))
  75                 return (1);
  76         if (delete(sp, ep, fm, tm, lmode))
  77                 return (1);
  78
  79         /* Check for deleting the file. */
  80         if (file_lline(sp, ep, &nlines))
  81                 return (1);
  82         if (nlines == 0) {
  83                 rp->lno = 1;
  84                 rp->cno = 0;
  85                 return (0);
  86         }
  87
  88         /*
  89          * If deleting lines, leave the cursor at the lowest line deleted,
  90          * else, leave the cursor where it started.  Always correct for EOL.
  91          *
  92          * The historic vi would delete the line the cursor was on (even if
  93          * not in line mode) if the motion from the cursor was past the EOF
  94          * and the cursor didn't originate on the last line of the file.  A
  95          * strange special case.  We never delete the line the cursor is on.
  96          * We'd have to pass a flag down to the delete() routine which would
  97          * have to special case it.
  98          */
  99         if (lmode) {
 100                 rp->lno = MIN(fm->lno, tm->lno);
 101                 if (rp->lno > nlines)
 102                         rp->lno = nlines;
 103                 rp->cno = 0;
 104                 (void)nonblank(sp, ep, rp->lno, &rp->cno);
 105                 return (0);
 106         }
 107
 108         rp->lno = fm->lno;
 109         if (file_gline(sp, ep, rp->lno, &len) == NULL) {
 110                 GETLINE_ERR(sp, rp->lno);
 111                 return (1);
 112         }
 113         if (fm->cno >= len)
 114                 rp->cno = len ? len - 1 : 0;
 115         else
 116                 rp->cno = fm->cno;
 117         return (0);
 118 }