|
|
1.1 root 1: /*-
2: * Copyright (c) 1990 The Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted
6: * provided that: (1) source distributions retain this entire copyright
7: * notice and comment, and (2) distributions including binaries display
8: * the following acknowledgement: ``This product includes software
9: * developed by the University of California, Berkeley and its contributors''
10: * in the documentation or other materials provided with the distribution
11: * and in all advertising materials mentioning features or use of this
12: * software. Neither the name of the University nor the names of its
13: * contributors may be used to endorse or promote products derived
14: * from this software without specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
16: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17: * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)instr.c 5.1 (Berkeley) 6/1/90";
22: #endif /* not lint */
23:
24: #include <sys/types.h>
25: #include <sys/wait.h>
26: #include <sys/errno.h>
27: #include <sys/stat.h>
28: #include <sys/file.h>
29: #include <stdio.h>
30: #include "pathnames.h"
31:
32: instructions()
33: {
34: extern int errno;
35: struct stat sb;
36: union wait pstat;
37: pid_t pid, waitpid();
38: char *pager, *path, *getenv(), *rindex(), *strerror();
39:
40: if (stat(_PATH_INSTR, &sb)) {
41: (void)fprintf(stderr, "cribbage: %s: %s.\n", _PATH_INSTR,
42: strerror(errno));
43: exit(1);
44: }
45: switch(pid = vfork()) {
46: case -1:
47: (void)fprintf(stderr, "cribbage: %s.\n", strerror(errno));
48: exit(1);
49: case 0:
50: if (!(path = getenv("PAGER")))
51: path = _PATH_MORE;
52: if (pager = rindex(path, '/'))
53: ++pager;
54: pager = path;
55: execlp(path, pager, _PATH_INSTR, (char *)NULL);
56: (void)fprintf(stderr, "cribbage: %s.\n", strerror(errno));
57: _exit(1);
58: default:
59: do {
60: pid = waitpid(pid, &pstat, 0);
61: } while (pid == -1 && errno == EINTR);
62: if (pid == -1 || pstat.w_status)
63: exit(1);
64: }
65: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.