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 #pragma ident "%Z%%M% %I% %E% SMI" 16 17 #include <stdio.h> 18 #include <ctype.h> 19 #include <locale.h> 20 21 static void instruct(void); 22 static void map_lower(char *); 23 24 /* look in biblio for record matching keywords */ 25 int 26 main(int argc, char **argv) 27 { 28 FILE *hfp, *fopen(), *popen(); 29 char s[BUFSIZ], hunt[64]; 30 31 (void) setlocale(LC_ALL, ""); 32 33 #if !defined(TEXT_DOMAIN) 34 #define TEXT_DOMAIN "SYS_TEST" 35 #endif 36 (void) textdomain(TEXT_DOMAIN); 37 38 if (argc == 1 || argc > 2) { 39 fputs(gettext("Usage: lookbib database\n\ 40 \tfinds citations specified on standard input\n"), stderr); 41 exit(1); 42 } 43 sprintf(s, "%s.ia", argv[1]); 44 if (access(s, 0) == -1) { 45 sprintf(s, "%s", argv[1]); 46 if (access(s, 0) == -1) { 47 perror(s); 48 fprintf(stderr, gettext("\tNeither index file %s.ia \ 49 nor reference file %s found\n"), s, s); 50 exit(1); 51 } 52 } 53 sprintf(hunt, "/usr/lib/refer/hunt %s", argv[1]); 54 if (isatty(fileno(stdin))) { 55 fprintf(stderr, gettext("Instructions? ")); 56 fgets(s, BUFSIZ, stdin); 57 if (*s == 'y') 58 instruct(); 59 } 60 again: 61 fprintf(stderr, "> "); 62 if (fgets(s, BUFSIZ, stdin)) { 63 if (*s == '\n') 64 goto again; 65 if (strlen(s) <= 3) 66 goto again; 67 if ((hfp = popen(hunt, "w")) == NULL) { 68 perror(gettext("lookbib: /usr/lib/refer/hunt")); 69 exit(1); 70 } 71 map_lower(s); 72 fputs(s, hfp); 73 pclose(hfp); 74 goto again; 75 } 76 fprintf(stderr, gettext("EOT\n")); 77 return (0); 78 } 79 80 static void 81 map_lower(char *s) /* map string s to lower case */ 82 { 83 for (; *s; ++s) 84 if (isupper(*s)) 85 *s = tolower(*s); 86 } 87 88 static void 89 instruct(void) 90 { 91 fputs(gettext( 92 "\nType keywords (such as author and date) after the > prompt.\n\ 93 References with those keywords are printed if they exist;\n\ 94 \tif nothing matches you are given another prompt.\n\ 95 To quit lookbib, press CTRL-d after the > prompt.\n\n"), stderr); 96 97 } 98