contrib/nvi/ex/ex_display.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_display.c,v 10.15 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 <ctype.h>
  22 #include <limits.h>
  23 #include <stdio.h>
  24 #include <string.h>
  25
  26 #include "../common/common.h"
  27 #include "tag.h"
  28
  29 static int      is_prefix __P((ARGS *, CHAR_T *));
  30 static int      bdisplay __P((SCR *));
  31 static void     db __P((SCR *, CB *, const char *));
  32
  33 /*
  34  * ex_display -- :display b[uffers] | c[onnections] | s[creens] | t[ags]
  35  *
  36  *      Display cscope connections, buffers, tags or screens.
  37  *
  38  * PUBLIC: int ex_display __P((SCR *, EXCMD *));
  39  */
  40 int
  41 ex_display(SCR *sp, EXCMD *cmdp)
  42 {
  43         ARGS *arg;
  44
  45         arg = cmdp->argv[0];
  46
  47         switch (arg->bp[0]) {
  48         case 'b':
  49                 if (!is_prefix(arg, L("buffers")))
  50                         break;
  51                 return (bdisplay(sp));
  52         case 'c':
  53                 if (!is_prefix(arg, L("connections")))
  54                         break;
  55                 return (cscope_display(sp));
  56         case 's':
  57                 if (!is_prefix(arg, L("screens")))
  58                         break;
  59                 return (ex_sdisplay(sp));
  60         case 't':
  61                 if (!is_prefix(arg, L("tags")))
  62                         break;
  63                 return (ex_tag_display(sp));
  64         }
  65         ex_emsg(sp, cmdp->cmd->usage, EXM_USAGE);
  66         return (1);
  67 }
  68
  69 /*
  70  * is_prefix --
  71  *
  72  *      Check that a command argument matches a prefix of a given string.
  73  */
  74 static int
  75 is_prefix(ARGS *arg, CHAR_T *str)
  76 {
  77         return arg->len <= STRLEN(str) && !MEMCMP(arg->bp, str, arg->len);
  78 }
  79
  80 /*
  81  * bdisplay --
  82  *
  83  *      Display buffers.
  84  */
  85 static int
  86 bdisplay(SCR *sp)
  87 {
  88         CB *cbp;
  89
  90         if (SLIST_EMPTY(sp->gp->cutq) && sp->gp->dcbp == NULL) {
  91                 msgq(sp, M_INFO, "123|No cut buffers to display");
  92                 return (0);
  93         }
  94
  95         /* Display regular cut buffers. */
  96         SLIST_FOREACH(cbp, sp->gp->cutq, q) {
  97                 if (isdigit(cbp->name))
  98                         continue;
  99                 if (!TAILQ_EMPTY(cbp->textq))
 100                         db(sp, cbp, NULL);
 101                 if (INTERRUPTED(sp))
 102                         return (0);
 103         }
 104         /* Display numbered buffers. */
 105         SLIST_FOREACH(cbp, sp->gp->cutq, q) {
 106                 if (!isdigit(cbp->name))
 107                         continue;
 108                 if (!TAILQ_EMPTY(cbp->textq))
 109                         db(sp, cbp, NULL);
 110                 if (INTERRUPTED(sp))
 111                         return (0);
 112         }
 113         /* Display default buffer. */
 114         if ((cbp = sp->gp->dcbp) != NULL)
 115                 db(sp, cbp, "default buffer");
 116         return (0);
 117 }
 118
 119 /*
 120  * db --
 121  *      Display a buffer.
 122  */
 123 static void
 124 db(SCR *sp, CB *cbp, const char *name)
 125 {
 126         CHAR_T *p;
 127         GS *gp;
 128         TEXT *tp;
 129         size_t len;
 130
 131         gp = sp->gp;
 132         (void)ex_printf(sp, "********** %s%s\n",
 133             name == NULL ? KEY_NAME(sp, cbp->name) : name,
 134             F_ISSET(cbp, CB_LMODE) ? " (line mode)" : " (character mode)");
 135         TAILQ_FOREACH(tp, cbp->textq, q) {
 136                 for (len = tp->len, p = tp->lb; len--; ++p) {
 137                         (void)ex_puts(sp, KEY_NAME(sp, *p));
 138                         if (INTERRUPTED(sp))
 139                                 return;
 140                 }
 141                 (void)ex_puts(sp, "\n");
 142         }
 143 }