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
21static void instruct(void);
22static void map_lower(char *);
23
24/* look in biblio for record matching keywords */
25int
26main(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 \
49nor 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	}
60again:
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
80static void
81map_lower(char *s)		/* map string s to lower case */
82{
83	for (; *s; ++s)
84		if (isupper(*s))
85			*s = tolower(*s);
86}
87
88static void
89instruct(void)
90{
91	fputs(gettext(
92"\nType keywords (such as author and date) after the > prompt.\n\
93References with those keywords are printed if they exist;\n\
94\tif nothing matches you are given another prompt.\n\
95To quit lookbib, press CTRL-d after the > prompt.\n\n"), stderr);
96
97}
98