home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Spezial / SPEZIAL2_97.zip / SPEZIAL2_97.iso / ANWEND / EDITOR / NVI179B / NVI179B.ZIP / ex / ex_util.c < prev    next >
C/C++ Source or Header  |  1996-07-13  |  5KB  |  235 lines
  1. /*-
  2.  * Copyright (c) 1993, 1994
  3.  *    The Regents of the University of California.  All rights reserved.
  4.  * Copyright (c) 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[] = "@(#)ex_util.c    10.23 (Berkeley) 6/19/96";
  14. #endif /* not lint */
  15.  
  16. #include <sys/types.h>
  17. #include <sys/queue.h>
  18. #include <sys/stat.h>
  19.  
  20. #include <bitstring.h>
  21. #include <errno.h>
  22. #include <limits.h>
  23. #include <stdio.h>
  24. #include <stdlib.h>
  25. #include <string.h>
  26. #include <unistd.h>
  27.  
  28. #include "../common/common.h"
  29.  
  30. /*
  31.  * ex_cinit --
  32.  *    Create an EX command structure.
  33.  *
  34.  * PUBLIC: void ex_cinit __P((EXCMD *,
  35.  * PUBLIC:    int, int, recno_t, recno_t, int, ARGS **));
  36.  */
  37. void
  38. ex_cinit(cmdp, cmd_id, naddr, lno1, lno2, force, ap)
  39.     EXCMD *cmdp;
  40.     int cmd_id, force, naddr;
  41.     recno_t lno1, lno2;
  42.     ARGS **ap;
  43. {
  44.     memset(cmdp, 0, sizeof(EXCMD));
  45.     cmdp->cmd = &cmds[cmd_id];
  46.     cmdp->addrcnt = naddr;
  47.     cmdp->addr1.lno = lno1;
  48.     cmdp->addr2.lno = lno2;
  49.     cmdp->addr1.cno = cmdp->addr2.cno = 1;
  50.     if (force)
  51.         cmdp->iflags |= E_C_FORCE;
  52.     cmdp->argc = 0;
  53.     if ((cmdp->argv = ap) != NULL)
  54.         cmdp->argv[0] = NULL;
  55. }
  56.  
  57. /*
  58.  * ex_cadd --
  59.  *    Add an argument to an EX command structure.
  60.  *
  61.  * PUBLIC: void ex_cadd __P((EXCMD *, ARGS *, char *, size_t));
  62.  */
  63. void
  64. ex_cadd(cmdp, ap, arg, len)
  65.     EXCMD *cmdp;
  66.     ARGS *ap;
  67.     char *arg;
  68.     size_t len;
  69. {
  70.     cmdp->argv[cmdp->argc] = ap;
  71.     ap->bp = arg;
  72.     ap->len = len;
  73.     cmdp->argv[++cmdp->argc] = NULL;
  74. }
  75.  
  76. /*
  77.  * ex_getline --
  78.  *    Return a line from the file.
  79.  *
  80.  * PUBLIC: int ex_getline __P((SCR *, FILE *, size_t *));
  81.  */
  82. int
  83. ex_getline(sp, fp, lenp)
  84.     SCR *sp;
  85.     FILE *fp;
  86.     size_t *lenp;
  87. {
  88.     EX_PRIVATE *exp;
  89.     size_t off;
  90.     int ch;
  91.     char *p;
  92.  
  93.     exp = EXP(sp);
  94.     for (errno = 0, off = 0, p = exp->ibp;;) {
  95.         if (off >= exp->ibp_len) {
  96.             BINC_RET(sp, exp->ibp, exp->ibp_len, off + 1);
  97.             p = exp->ibp + off;
  98.         }
  99.         if ((ch = getc(fp)) == EOF && !feof(fp)) {
  100.             if (errno == EINTR) {
  101.                 errno = 0;
  102.                 clearerr(fp);
  103.                 continue;
  104.             }
  105.             return (1);
  106.         }
  107.         if (ch == EOF || ch == '\n') {
  108.             if (ch == EOF && !off)
  109.                 return (1);
  110.             *lenp = off;
  111.             return (0);
  112.         }
  113.         *p++ = ch;
  114.         ++off;
  115.     }
  116.     /* NOTREACHED */
  117. }
  118.  
  119. /*
  120.  * ex_ncheck --
  121.  *    Check for more files to edit.
  122.  *
  123.  * PUBLIC: int ex_ncheck __P((SCR *, int));
  124.  */
  125. int
  126. ex_ncheck(sp, force)
  127.     SCR *sp;
  128.     int force;
  129. {
  130.     char **ap;
  131.  
  132.     /*
  133.      * !!!
  134.      * Historic practice: quit! or two quit's done in succession
  135.      * (where ZZ counts as a quit) didn't check for other files.
  136.      */
  137.     if (!force && sp->ccnt != sp->q_ccnt + 1 &&
  138.         sp->cargv != NULL && sp->cargv[1] != NULL) {
  139.         sp->q_ccnt = sp->ccnt;
  140.  
  141.         for (ap = sp->cargv + 1; *ap != NULL; ++ap);
  142.         msgq(sp, M_ERR,
  143.             "167|%d more files to edit", (ap - sp->cargv) - 1);
  144.  
  145.         return (1);
  146.     }
  147.     return (0);
  148. }
  149.  
  150. /*
  151.  * ex_init --
  152.  *    Init the screen for ex.
  153.  *
  154.  * PUBLIC: int ex_init __P((SCR *));
  155.  */
  156. int
  157. ex_init(sp)
  158.     SCR *sp;
  159. {
  160.     GS *gp;
  161.  
  162.     gp = sp->gp;
  163.  
  164.     if (gp->scr_screen(sp, SC_EX))
  165.         return (1);
  166.     (void)gp->scr_attr(sp, SA_ALTERNATE, 0);
  167.  
  168.     sp->rows = O_VAL(sp, O_LINES);
  169.     sp->cols = O_VAL(sp, O_COLUMNS);
  170.  
  171.     F_CLR(sp, SC_VI);
  172.     F_SET(sp, SC_EX | SC_SCR_EX);
  173.     return (0);
  174. }
  175.  
  176. /*
  177.  * ex_emsg --
  178.  *    Display a few common ex and vi error messages.
  179.  *
  180.  * PUBLIC: void ex_emsg __P((SCR *, char *, exm_t));
  181.  */
  182. void
  183. ex_emsg(sp, p, which)
  184.     SCR *sp;
  185.     char *p;
  186.     exm_t which;
  187. {
  188.     switch (which) {
  189.     case EXM_EMPTYBUF:
  190.         msgq(sp, M_ERR, "168|Buffer %s is empty", p);
  191.         break;
  192.     case EXM_FILECOUNT:
  193.          msgq_str(sp, M_ERR, p, 
  194.              "144|%s: expanded into too many file names");
  195.         break;
  196.     case EXM_NOCANON:
  197.         msgq(sp, M_ERR,
  198.             "283|The %s command requires the ex terminal interface", p);
  199.         break;
  200.     case EXM_NOCANON_F:
  201.         msgq(sp, M_ERR,
  202.             "272|That form of %s requires the ex terminal interface",
  203.             p);
  204.         break;
  205.     case EXM_NOFILEYET:
  206.         if (p == NULL)
  207.             msgq(sp, M_ERR,
  208.                 "274|Command failed, no file read in yet.");
  209.         else
  210.             msgq(sp, M_ERR,
  211.     "173|The %s command requires that a file have already been read in", p);
  212.         break;
  213.     case EXM_NOPREVBUF:
  214.         msgq(sp, M_ERR, "171|No previous buffer to execute");
  215.         break;
  216.     case EXM_NOPREVRE:
  217.         msgq(sp, M_ERR, "172|No previous regular expression");
  218.         break;
  219.     case EXM_NOSUSPEND:
  220.         msgq(sp, M_ERR, "230|This screen may not be suspended");
  221.         break;
  222.     case EXM_SECURE:
  223.         msgq(sp, M_ERR,
  224. "290|The %s command is not supported when the secure edit option is set", p);
  225.         break;
  226.     case EXM_SECURE_F:
  227.         msgq(sp, M_ERR,
  228. "284|That form of %s is not supported when the secure edit option is set", p);
  229.         break;
  230.     case EXM_USAGE:
  231.         msgq(sp, M_ERR, "174|Usage: %s", p);
  232.         break;
  233.     }
  234. }
  235.