ex/ex_preserve.c

   1 /*-
   2  * Copyright (c) 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: ex_preserve.c,v 8.4 1993/11/08 11:10:45 bostic Exp $ (Berkeley) $Date: 1993/11/08 11:10:45 $";
  10 #endif /* not lint */
  11
  12 #include <sys/types.h>
  13
  14 #include <errno.h>
  15 #include <string.h>
  16
  17 #include "vi.h"
  18 #include "excmd.h"
  19
  20 /*
  21  * ex_preserve -- :pre[serve]
  22  *      Push the file to recovery.
  23  */
  24 int
  25 ex_preserve(sp, ep, cmdp)
  26         SCR *sp;
  27         EXF *ep;
  28         EXCMDARG *cmdp;
  29 {
  30         recno_t lno;
  31
  32         if (!F_ISSET(ep, F_RCV_ON)) {
  33                 msgq(sp, M_ERR, "Preservation of this file not possible.");
  34                 return (1);
  35         }
  36
  37         /* If recovery not initialized, do so. */
  38         if (F_ISSET(ep, F_FIRSTMODIFY) && rcv_init(sp, ep))
  39                 return (1);
  40
  41         /* Force the file to be read in, in case it hasn't yet. */
  42         if (file_lline(sp, ep, &lno))
  43                 return (1);
  44
  45         /* Sync to disk. */
  46         if (rcv_sync(sp, ep))
  47                 return (1);
  48
  49         /* Preserve the recovery files. */
  50         F_SET(ep, F_RCV_NORM);
  51
  52         msgq(sp, M_INFO, "File preserved.");
  53         return (0);
  54 }