freebsd-skq/contrib/nvi/ex/ex_display.c
peter 59cc89c2c2 Import of nvi-1.79, minus a few bits that we dont need (eg: postscript
files, curses, db, regex etc that we already have).  The other glue will
follow shortly.

Obtained from: Keith Bostic <bostic@bostic.com>
1996-11-01 06:45:43 +00:00

146 lines
3.1 KiB
C

/*-
* Copyright (c) 1992, 1993, 1994
* The Regents of the University of California. All rights reserved.
* Copyright (c) 1992, 1993, 1994, 1995, 1996
* Keith Bostic. All rights reserved.
*
* See the LICENSE file for redistribution information.
*/
#include "config.h"
#ifndef lint
static const char sccsid[] = "@(#)ex_display.c 10.12 (Berkeley) 4/10/96";
#endif /* not lint */
#include <sys/types.h>
#include <sys/queue.h>
#include <bitstring.h>
#include <ctype.h>
#include <limits.h>
#include <stdio.h>
#include <string.h>
#include "../common/common.h"
#include "tag.h"
static int bdisplay __P((SCR *));
static void db __P((SCR *, CB *, CHAR_T *));
/*
* ex_display -- :display b[uffers] | c[onnections] | s[creens] | t[ags]
*
* Display cscope connections, buffers, tags or screens.
*
* PUBLIC: int ex_display __P((SCR *, EXCMD *));
*/
int
ex_display(sp, cmdp)
SCR *sp;
EXCMD *cmdp;
{
switch (cmdp->argv[0]->bp[0]) {
case 'b':
#undef ARG
#define ARG "buffers"
if (cmdp->argv[0]->len >= sizeof(ARG) ||
memcmp(cmdp->argv[0]->bp, ARG, cmdp->argv[0]->len))
break;
return (bdisplay(sp));
case 'c':
#undef ARG
#define ARG "connections"
if (cmdp->argv[0]->len >= sizeof(ARG) ||
memcmp(cmdp->argv[0]->bp, ARG, cmdp->argv[0]->len))
break;
return (cscope_display(sp));
case 's':
#undef ARG
#define ARG "screens"
if (cmdp->argv[0]->len >= sizeof(ARG) ||
memcmp(cmdp->argv[0]->bp, ARG, cmdp->argv[0]->len))
break;
return (ex_sdisplay(sp));
case 't':
#undef ARG
#define ARG "tags"
if (cmdp->argv[0]->len >= sizeof(ARG) ||
memcmp(cmdp->argv[0]->bp, ARG, cmdp->argv[0]->len))
break;
return (ex_tag_display(sp));
}
ex_emsg(sp, cmdp->cmd->usage, EXM_USAGE);
return (1);
}
/*
* bdisplay --
*
* Display buffers.
*/
static int
bdisplay(sp)
SCR *sp;
{
CB *cbp;
if (sp->gp->cutq.lh_first == NULL && sp->gp->dcbp == NULL) {
msgq(sp, M_INFO, "123|No cut buffers to display");
return (0);
}
/* Display regular cut buffers. */
for (cbp = sp->gp->cutq.lh_first; cbp != NULL; cbp = cbp->q.le_next) {
if (isdigit(cbp->name))
continue;
if (cbp->textq.cqh_first != (void *)&cbp->textq)
db(sp, cbp, NULL);
if (INTERRUPTED(sp))
return (0);
}
/* Display numbered buffers. */
for (cbp = sp->gp->cutq.lh_first; cbp != NULL; cbp = cbp->q.le_next) {
if (!isdigit(cbp->name))
continue;
if (cbp->textq.cqh_first != (void *)&cbp->textq)
db(sp, cbp, NULL);
if (INTERRUPTED(sp))
return (0);
}
/* Display default buffer. */
if ((cbp = sp->gp->dcbp) != NULL)
db(sp, cbp, "default buffer");
return (0);
}
/*
* db --
* Display a buffer.
*/
static void
db(sp, cbp, name)
SCR *sp;
CB *cbp;
CHAR_T *name;
{
CHAR_T *p;
GS *gp;
TEXT *tp;
size_t len;
gp = sp->gp;
(void)ex_printf(sp, "********** %s%s\n",
name == NULL ? KEY_NAME(sp, cbp->name) : name,
F_ISSET(cbp, CB_LMODE) ? " (line mode)" : " (character mode)");
for (tp = cbp->textq.cqh_first;
tp != (void *)&cbp->textq; tp = tp->q.cqe_next) {
for (len = tp->len, p = tp->lb; len--; ++p) {
(void)ex_puts(sp, KEY_NAME(sp, *p));
if (INTERRUPTED(sp))
return;
}
(void)ex_puts(sp, "\n");
}
}