1 /*
2 * Copyright 2005 Sun Microsystems, Inc. All rights reserved.
3 * Use is subject to license terms.
4 */
5
6 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
7 /* All Rights Reserved */
8
9 /*
10 * Copyright (c) 1980 Regents of the University of California.
11 * All rights reserved. The Berkeley software License Agreement
12 * specifies the terms and conditions for redistribution.
13 */
14
15 #include <stdio.h>
16 #include <ctype.h>
17 #include <locale.h>
18
19 static void instruct(void);
20 static void map_lower(char *);
21
22 /* look in biblio for record matching keywords */
23 int
main(int argc,char ** argv)24 main(int argc, char **argv)
25 {
26 FILE *hfp, *fopen(), *popen();
27 char s[BUFSIZ], hunt[64];
28
29 (void) setlocale(LC_ALL, "");
30
31 #if !defined(TEXT_DOMAIN)
32 #define TEXT_DOMAIN "SYS_TEST"
33 #endif
34 (void) textdomain(TEXT_DOMAIN);
35
36 if (argc == 1 || argc > 2) {
37 fputs(gettext("Usage: lookbib database\n\
38 \tfinds citations specified on standard input\n"), stderr);
39 exit(1);
40 }
41 sprintf(s, "%s.ia", argv[1]);
42 if (access(s, 0) == -1) {
43 sprintf(s, "%s", argv[1]);
44 if (access(s, 0) == -1) {
45 perror(s);
46 fprintf(stderr, gettext("\tNeither index file %s.ia \
47 nor reference file %s found\n"), s, s);
48 exit(1);
49 }
50 }
51 sprintf(hunt, "/usr/lib/refer/hunt %s", argv[1]);
52 if (isatty(fileno(stdin))) {
53 fprintf(stderr, gettext("Instructions? "));
54 fgets(s, BUFSIZ, stdin);
55 if (*s == 'y')
56 instruct();
57 }
58 again:
59 fprintf(stderr, "> ");
60 if (fgets(s, BUFSIZ, stdin)) {
61 if (*s == '\n')
62 goto again;
63 if (strlen(s) <= 3)
64 goto again;
65 if ((hfp = popen(hunt, "w")) == NULL) {
66 perror(gettext("lookbib: /usr/lib/refer/hunt"));
67 exit(1);
68 }
69 map_lower(s);
70 fputs(s, hfp);
71 pclose(hfp);
72 goto again;
73 }
74 fprintf(stderr, gettext("EOT\n"));
75 return (0);
76 }
77
78 static void
map_lower(char * s)79 map_lower(char *s) /* map string s to lower case */
80 {
81 for (; *s; ++s)
82 if (isupper(*s))
83 *s = tolower(*s);
84 }
85
86 static void
instruct(void)87 instruct(void)
88 {
89 fputs(gettext(
90 "\nType keywords (such as author and date) after the > prompt.\n\
91 References with those keywords are printed if they exist;\n\
92 \tif nothing matches you are given another prompt.\n\
93 To quit lookbib, press CTRL-d after the > prompt.\n\n"), stderr);
94
95 }
96