+/* $NetBSD: hack.pager.c,v 1.11 2007/12/15 19:44:41 perry Exp $ */
+
/*
- * Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985.
+ * Copyright (c) 1985, Stichting Centrum voor Wiskunde en Informatica,
+ * Amsterdam
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are
+ * met:
+ *
+ * - Redistributions of source code must retain the above copyright notice,
+ * this list of conditions and the following disclaimer.
+ *
+ * - Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ *
+ * - Neither the name of the Stichting Centrum voor Wiskunde en
+ * Informatica, nor the names of its contributors may be used to endorse or
+ * promote products derived from this software without specific prior
+ * written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
+ * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+ * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
+ * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
+ * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+ * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+ * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+ * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+ * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+ * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+ * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
+/*
+ * Copyright (c) 1982 Jay Fenlason <hack@gnu.org>
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ * 3. The name of the author may not be used to endorse or promote products
+ * derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
+ * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
+ * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+ * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+ * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
+ * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+ * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
+ * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include <sys/cdefs.h>
#ifndef lint
-static char rcsid[] = "$NetBSD: hack.pager.c,v 1.4 1995/03/23 08:31:16 cgd Exp $";
-#endif /* not lint */
+__RCSID("$NetBSD: hack.pager.c,v 1.11 2007/12/15 19:44:41 perry Exp $");
+#endif /* not lint */
/* This file contains the command routine dowhatis() and a pager. */
-/* Also readmail() and doshell(), and generally the things that
- contact the outside world. */
-
-#include <sys/types.h>
-#include <signal.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
+/*
+ * Also readmail() and doshell(), and generally the things that contact the
+ * outside world.
+ */
+
+#include <sys/types.h>
+#include <signal.h>
+#include <stdlib.h>
+#include <unistd.h>
#include "hack.h"
-extern int CO, LI; /* usually COLNO and ROWNO+2 */
-extern char *CD;
-extern char quitchars[];
-void done1();
+#include "extern.h"
+int
dowhatis()
{
- FILE *fp;
- char bufr[BUFSZ+6];
- register char *buf = &bufr[6], *ep, q;
- extern char readchar();
+ FILE *fp;
+ char bufr[BUFSZ + 6];
+ char *buf = &bufr[6], *ep, q;
- if(!(fp = fopen(DATAFILE, "r")))
+ if (!(fp = fopen(DATAFILE, "r")))
pline("Cannot open data file!");
else {
pline("Specify what? ");
q = readchar();
- if(q != '\t')
- while(fgets(buf,BUFSZ,fp))
- if(*buf == q) {
- ep = index(buf, '\n');
- if(ep) *ep = 0;
- /* else: bad data file */
- /* Expand tab 'by hand' */
- if(buf[1] == '\t'){
- buf = bufr;
- buf[0] = q;
- (void) strncpy(buf+1, " ", 7);
- }
- pline(buf);
- if(ep[-1] == ';') {
- pline("More info? ");
- if(readchar() == 'y') {
- page_more(fp,1); /* does fclose() */
- return(0);
+ if (q != '\t')
+ while (fgets(buf, BUFSZ, fp))
+ if (*buf == q) {
+ ep = strchr(buf, '\n');
+ if (ep)
+ *ep = 0;
+ /* else: bad data file */
+ else {
+ pline("Bad data file!");
+ (void) fclose(fp);
+ return(0);
+ }
+ /* Expand tab 'by hand' */
+ if (buf[1] == '\t') {
+ buf = bufr;
+ buf[0] = q;
+ (void) strncpy(buf + 1, " ", 7);
+ }
+ pline(buf);
+ if (ep[-1] == ';') {
+ pline("More info? ");
+ if (readchar() == 'y') {
+ page_more(fp, 1); /* does fclose() */
+ return (0);
+ }
+ }
+ (void) fclose(fp); /* kopper@psuvax1 */
+ return (0);
}
- }
- (void) fclose(fp); /* kopper@psuvax1 */
- return(0);
- }
pline("I've never heard of such things.");
(void) fclose(fp);
}
- return(0);
+ return (0);
}
/* make the paging of a file interruptible */
-static int got_intrup;
+static int got_intrup;
void
-intruph(){
+intruph(n)
+ int n __unused;
+{
got_intrup++;
}
/* simple pager, also used from dohelp() */
-page_more(fp,strip)
-FILE *fp;
-int strip; /* nr of chars to be stripped from each line (0 or 1) */
+void
+page_more(fp, strip)
+ FILE *fp;
+ int strip; /* nr of chars to be stripped from each line
+ * (0 or 1) */
{
- register char *bufr, *ep;
- sig_t prevsig = signal(SIGINT, intruph);
+ char *bufr, *ep;
+ sig_t prevsig = signal(SIGINT, intruph);
set_pager(0);
bufr = (char *) alloc((unsigned) CO);
- bufr[CO-1] = 0;
- while(fgets(bufr,CO-1,fp) && (!strip || *bufr == '\t') && !got_intrup){
- ep = index(bufr, '\n');
- if(ep)
+ bufr[CO - 1] = 0;
+ while (fgets(bufr, CO - 1, fp) && (!strip || *bufr == '\t') && !got_intrup) {
+ ep = strchr(bufr, '\n');
+ if (ep)
*ep = 0;
- if(page_line(bufr+strip)) {
+ if (page_line(bufr + strip)) {
set_pager(2);
goto ret;
}
got_intrup = 0;
}
-static boolean whole_screen = TRUE;
-#define PAGMIN 12 /* minimum # of lines for page below level map */
+static boolean whole_screen = TRUE;
+#define PAGMIN 12 /* minimum # of lines for page below level
+ * map */
-set_whole_screen() { /* called in termcap as soon as LI is known */
- whole_screen = (LI-ROWNO-2 <= PAGMIN || !CD);
+void
+set_whole_screen()
+{ /* called in termcap as soon as LI is known */
+ whole_screen = (LI - ROWNO - 2 <= PAGMIN || !CD);
}
#ifdef NEWS
-readnews() {
- register int ret;
+int
+readnews()
+{
+ int ret;
whole_screen = TRUE; /* force a docrt(), our first */
ret = page_file(NEWS, TRUE);
set_whole_screen();
- return(ret); /* report whether we did docrt() */
+ return (ret); /* report whether we did docrt() */
}
-#endif NEWS
+#endif /* NEWS */
+void
set_pager(mode)
-register int mode; /* 0: open 1: wait+close 2: close */
+ int mode; /* 0: open 1: wait+close 2: close */
{
- static boolean so;
- if(mode == 0) {
- if(!whole_screen) {
+ static boolean so;
+ if (mode == 0) {
+ if (!whole_screen) {
/* clear topline */
clrlin();
/* use part of screen below level map */
- curs(1, ROWNO+4);
+ curs(1, ROWNO + 4);
} else {
cls();
}
so = flags.standout;
flags.standout = 1;
} else {
- if(mode == 1) {
+ if (mode == 1) {
curs(1, LI);
more();
}
flags.standout = so;
- if(whole_screen)
+ if (whole_screen)
docrt();
else {
- curs(1, ROWNO+4);
+ curs(1, ROWNO + 4);
cl_eos();
}
}
}
-page_line(s) /* returns 1 if we should quit */
-register char *s;
+int
+page_line(s) /* returns 1 if we should quit */
+ const char *s;
{
- extern char morc;
-
- if(cury == LI-1) {
- if(!*s)
- return(0); /* suppress blank lines at top */
+ if (cury == LI - 1) {
+ if (!*s)
+ return (0); /* suppress blank lines at top */
putchar('\n');
cury++;
cmore("q\033");
- if(morc) {
+ if (morc) {
morc = 0;
- return(1);
+ return (1);
}
- if(whole_screen)
+ if (whole_screen)
cls();
else {
- curs(1, ROWNO+4);
+ curs(1, ROWNO + 4);
cl_eos();
}
}
puts(s);
cury++;
- return(0);
+ return (0);
}
/*
* cornline(3, 0) : cleanup
*/
+void
cornline(mode, text)
-int mode;
-char *text;
+ int mode;
+ const char *text;
{
static struct line {
- struct line *next_line;
- char *line_text;
- } *texthead, *texttail;
- static int maxlen;
- static int linect;
- register struct line *tl;
-
- if(mode == 0) {
+ struct line *next_line;
+ char *line_text;
+ } *texthead, *texttail;
+ static int maxlen;
+ static int linect;
+ struct line *tl;
+
+ if (mode == 0) {
texthead = 0;
maxlen = 0;
linect = 0;
- if(text) {
+ if (text) {
cornline(1, text); /* title */
cornline(1, ""); /* blank line */
}
return;
}
-
- if(mode == 1) {
- register int len;
-
- if(!text) return; /* superfluous, just to be sure */
- linect++;
- len = strlen(text);
- if(len > maxlen)
- maxlen = len;
- tl = (struct line *)
- alloc((unsigned)(len + sizeof(struct line) + 1));
- tl->next_line = 0;
- tl->line_text = (char *)(tl + 1);
- (void) strcpy(tl->line_text, text);
- if(!texthead)
- texthead = tl;
- else
- texttail->next_line = tl;
- texttail = tl;
- return;
+ if (mode == 1) {
+ int len;
+
+ if (!text)
+ return; /* superfluous, just to be sure */
+ linect++;
+ len = strlen(text);
+ if (len > maxlen)
+ maxlen = len;
+ tl = (struct line *)
+ alloc((unsigned) (len + sizeof(struct line) + 1));
+ tl->next_line = 0;
+ tl->line_text = (char *) (tl + 1);
+ (void) strcpy(tl->line_text, text);
+ if (!texthead)
+ texthead = tl;
+ else
+ texttail->next_line = tl;
+ texttail = tl;
+ return;
}
-
/* --- now we really do it --- */
- if(mode == 2 && linect == 1) /* topline only */
+ if (mode == 2 && linect == 1) /* topline only */
pline(texthead->line_text);
- else
- if(mode == 2) {
- register int curline, lth;
-
- if(flags.toplin == 1) more(); /* ab@unido */
- remember_topl();
-
- lth = CO - maxlen - 2; /* Use full screen width */
- if (linect < LI && lth >= 10) { /* in a corner */
- home ();
- cl_end ();
- flags.toplin = 0;
- curline = 1;
- for (tl = texthead; tl; tl = tl->next_line) {
- curs (lth, curline);
- if(curline > 1)
- cl_end ();
- putsym(' ');
- putstr (tl->line_text);
- curline++;
- }
- curs (lth, curline);
- cl_end ();
- cmore (text);
- home ();
- cl_end ();
- docorner (lth, curline-1);
- } else { /* feed to pager */
- set_pager(0);
- for (tl = texthead; tl; tl = tl->next_line) {
- if (page_line (tl->line_text)) {
- set_pager(2);
- goto cleanup;
- }
+ else if (mode == 2) {
+ int curline, lth;
+
+ if (flags.toplin == 1)
+ more(); /* ab@unido */
+ remember_topl();
+
+ lth = CO - maxlen - 2; /* Use full screen width */
+ if (linect < LI && lth >= 10) { /* in a corner */
+ home();
+ cl_end();
+ flags.toplin = 0;
+ curline = 1;
+ for (tl = texthead; tl; tl = tl->next_line) {
+ curs(lth, curline);
+ if (curline > 1)
+ cl_end();
+ putsym(' ');
+ putstr(tl->line_text);
+ curline++;
+ }
+ curs(lth, curline);
+ cl_end();
+ cmore(text);
+ home();
+ cl_end();
+ docorner(lth, curline - 1);
+ } else { /* feed to pager */
+ set_pager(0);
+ for (tl = texthead; tl; tl = tl->next_line) {
+ if (page_line(tl->line_text)) {
+ set_pager(2);
+ goto cleanup;
+ }
+ }
+ if (text) {
+ cgetret(text);
+ set_pager(2);
+ } else
+ set_pager(1);
}
- if(text) {
- cgetret(text);
- set_pager(2);
- } else
- set_pager(1);
- }
}
-
cleanup:
- while(tl = texthead) {
+ while ((tl = texthead) != NULL) {
texthead = tl->next_line;
free((char *) tl);
}
}
+int
dohelp()
{
- char c;
+ char c;
- pline ("Long or short help? ");
- while (((c = readchar ()) != 'l') && (c != 's') && !index(quitchars,c))
- bell ();
- if (!index(quitchars, c))
+ pline("Long or short help? ");
+ while (((c = readchar()) != 'l') && (c != 's') && !strchr(quitchars, c))
+ bell();
+ if (!strchr(quitchars, c))
(void) page_file((c == 'l') ? HELP : SHELP, FALSE);
- return(0);
+ return (0);
}
-page_file(fnam, silent) /* return: 0 - cannot open fnam; 1 - otherwise */
-register char *fnam;
-boolean silent;
+int
+page_file(fnam, silent) /* return: 0 - cannot open fnam; 1 -
+ * otherwise */
+ const char *fnam;
+ boolean silent;
{
-#ifdef DEF_PAGER /* this implies that UNIX is defined */
- {
- /* use external pager; this may give security problems */
+#ifdef DEF_PAGER /* this implies that UNIX is defined */
+ {
+ /* use external pager; this may give security problems */
- register int fd = open(fnam, 0);
+ int fd = open(fnam, O_RDONLY);
- if(fd < 0) {
- if(!silent) pline("Cannot open %s.", fnam);
- return(0);
- }
- if(child(1)){
- extern char *catmore;
-
- /* Now that child() does a setuid(getuid()) and a chdir(),
- we may not be able to open file fnam anymore, so make
- it stdin. */
- (void) close(0);
- if(dup(fd)) {
- if(!silent) printf("Cannot open %s as stdin.\n", fnam);
- } else {
- execl(catmore, "page", (char *) 0);
- if(!silent) printf("Cannot exec %s.\n", catmore);
+ if (fd < 0) {
+ if (!silent)
+ pline("Cannot open %s.", fnam);
+ return (0);
}
- exit(1);
+ if (child(1)) {
+
+ /*
+ * Now that child() does a setuid(getuid()) and a
+ * chdir(), we may not be able to open file fnam
+ * anymore, so make it stdin.
+ */
+ (void) close(0);
+ if (dup(fd)) {
+ if (!silent)
+ printf("Cannot open %s as stdin.\n", fnam);
+ } else {
+ execl(catmore, "page", (char *) 0);
+ if (!silent)
+ printf("Cannot exec %s.\n", catmore);
+ }
+ exit(1);
+ }
+ (void) close(fd);
}
- (void) close(fd);
- }
-#else DEF_PAGER
- {
- FILE *f; /* free after Robert Viduya */
-
- if ((f = fopen (fnam, "r")) == (FILE *) 0) {
- if(!silent) {
- home(); perror (fnam); flags.toplin = 1;
- pline ("Cannot open %s.", fnam);
+#else /* DEF_PAGER */
+ {
+ FILE *f; /* free after Robert Viduya */
+
+ if ((f = fopen(fnam, "r")) == (FILE *) 0) {
+ if (!silent) {
+ home();
+ perror(fnam);
+ flags.toplin = 1;
+ pline("Cannot open %s.", fnam);
+ }
+ return (0);
}
- return(0);
+ page_more(f, 0);
}
- page_more(f, 0);
- }
-#endif DEF_PAGER
+#endif /* DEF_PAGER */
- return(1);
+ return (1);
}
#ifdef UNIX
#ifdef SHELL
-dosh(){
-register char *str;
- if(child(0)) {
- if(str = getenv("SHELL"))
+int
+dosh()
+{
+ char *str;
+ if (child(0)) {
+ if ((str = getenv("SHELL")) != NULL)
execl(str, str, (char *) 0);
else
execl("/bin/sh", "sh", (char *) 0);
pline("sh: cannot execute.");
exit(1);
}
- return(0);
+ return (0);
}
-#endif SHELL
+#endif /* SHELL */
#ifdef NOWAITINCLUDE
-union wait { /* used only for the cast (union wait *) 0 */
- int w_status;
+union wait { /* used only for the cast (union wait *) 0 */
+ int w_status;
struct {
- unsigned short w_Termsig:7;
- unsigned short w_Coredump:1;
- unsigned short w_Retcode:8;
- } w_T;
+ unsigned short w_Termsig:7;
+ unsigned short w_Coredump:1;
+ unsigned short w_Retcode:8;
+ } w_T;
};
#else
#include <sys/wait.h>
#else
#include <wait.h>
-#endif BSD
-#endif NOWAITINCLUDE
+#endif /* BSD */
+#endif /* NOWAITINCLUDE */
-child(wt) {
- int status;
- register int f;
+int
+child(int wt)
+{
+ int status;
+ int f;
f = fork();
- if(f == 0){ /* child */
- settty((char *) 0); /* also calls end_screen() */
+ if (f == 0) { /* child */
+ settty((char *) 0); /* also calls end_screen() */
(void) setuid(getuid());
(void) setgid(getgid());
#ifdef CHDIR
(void) chdir(getenv("HOME"));
-#endif CHDIR
- return(1);
+#endif /* CHDIR */
+ return (1);
}
- if(f == -1) { /* cannot fork */
+ if (f == -1) { /* cannot fork */
pline("Fork failed. Try again.");
- return(0);
+ return (0);
}
/* fork succeeded; wait for child to exit */
- (void) signal(SIGINT,SIG_IGN);
- (void) signal(SIGQUIT,SIG_IGN);
+ (void) signal(SIGINT, SIG_IGN);
+ (void) signal(SIGQUIT, SIG_IGN);
(void) wait(&status);
gettty();
setftty();
- (void) signal(SIGINT,done1);
+ (void) signal(SIGINT, done1);
#ifdef WIZARD
- if(wizard) (void) signal(SIGQUIT,SIG_DFL);
-#endif WIZARD
- if(wt) getret();
+ if (wizard)
+ (void) signal(SIGQUIT, SIG_DFL);
+#endif /* WIZARD */
+ if (wt)
+ getret();
docrt();
- return(0);
+ return (0);
}
-#endif UNIX
+#endif /* UNIX */
git.ckatri.com / bsdgames-darwin.git / blobdiff