3 61f5c35c 2004-05-15 devnull * Things used to handle special requests (eg. manual feed) globally or on a per
4 61f5c35c 2004-05-15 devnull * page basis. Requests are passed through to the translator using the -R option.
5 61f5c35c 2004-05-15 devnull * The argument to -R can be "request", "request:page", or "request:page:file".
6 61f5c35c 2004-05-15 devnull * If page is omitted (as in the first form) or set to 0 request will be applied
7 61f5c35c 2004-05-15 devnull * to the global environment. In all other cases it applies only to the selected
8 61f5c35c 2004-05-15 devnull * page. If a file is given, page must be supplied, and the lookup is in that file
9 61f5c35c 2004-05-15 devnull * rather than *requestfile.
13 61f5c35c 2004-05-15 devnull #include <stdio.h>
14 b855148c 2004-05-16 devnull #include <stdlib.h>
15 b855148c 2004-05-16 devnull #include <string.h>
16 b855148c 2004-05-16 devnull #include <unistd.h>
18 61f5c35c 2004-05-15 devnull #include "gen.h" /* general purpose definitions */
19 b855148c 2004-05-16 devnull #include "ext.h"
20 61f5c35c 2004-05-15 devnull #include "request.h" /* a few special definitions */
21 61f5c35c 2004-05-15 devnull #include "path.h" /* for the default request file */
23 61f5c35c 2004-05-15 devnull Request request[MAXREQUEST]; /* next page or global request */
24 61f5c35c 2004-05-15 devnull int nextreq = 0; /* goes in request[nextreq] */
25 61f5c35c 2004-05-15 devnull char *requestfile = REQUESTFILE; /* default lookup file */
27 e8fb1d3e 2004-05-17 devnull void dumprequest(char *want, char *file, FILE *fp_out);
28 e8fb1d3e 2004-05-17 devnull extern void error(int errtype, char *fmt, ...);
30 61f5c35c 2004-05-15 devnull /*****************************************************************************/
33 61f5c35c 2004-05-15 devnull saverequest(want)
35 61f5c35c 2004-05-15 devnull char *want; /* grab code for this stuff */
39 61f5c35c 2004-05-15 devnull char *page; /* and save it for this page */
40 61f5c35c 2004-05-15 devnull char *strtok();
44 61f5c35c 2004-05-15 devnull * Save the request until we get to appropriate page - don't even bother with
45 61f5c35c 2004-05-15 devnull * the lookup right now. Format of *want string is "request", "request:page", or
46 61f5c35c 2004-05-15 devnull * "request:page:file", and we assume we can change the string here as needed.
47 61f5c35c 2004-05-15 devnull * If page is omitted or given as 0 the request will be done globally. If *want
48 61f5c35c 2004-05-15 devnull * includes a file, request and page must also be given, and in that case *file
49 61f5c35c 2004-05-15 devnull * will be used for the lookup.
53 61f5c35c 2004-05-15 devnull if ( nextreq < MAXREQUEST ) {
54 61f5c35c 2004-05-15 devnull request[nextreq].want = strtok(want, ": ");
55 61f5c35c 2004-05-15 devnull if ( (page = strtok(NULL, ": ")) == NULL )
56 61f5c35c 2004-05-15 devnull request[nextreq].page = 0;
57 61f5c35c 2004-05-15 devnull else request[nextreq].page = atoi(page);
58 61f5c35c 2004-05-15 devnull if ( (request[nextreq].file = strtok(NULL, ": ")) == NULL )
59 61f5c35c 2004-05-15 devnull request[nextreq].file = requestfile;
60 61f5c35c 2004-05-15 devnull nextreq++;
61 61f5c35c 2004-05-15 devnull } else error(NON_FATAL, "too many requests - ignoring %s", want);
63 61f5c35c 2004-05-15 devnull } /* End of saverequest */
65 61f5c35c 2004-05-15 devnull /*****************************************************************************/
66 b855148c 2004-05-16 devnull extern void dumprequest();
69 61f5c35c 2004-05-15 devnull writerequest(page, fp_out)
71 61f5c35c 2004-05-15 devnull int page; /* write everything for this page */
72 61f5c35c 2004-05-15 devnull FILE *fp_out; /* to this file */
76 61f5c35c 2004-05-15 devnull int i; /* loop index */
80 61f5c35c 2004-05-15 devnull * Writes out all the requests that have been saved for page. Page 0 refers to
81 61f5c35c 2004-05-15 devnull * the global environment and is done during initial setup.
85 61f5c35c 2004-05-15 devnull for ( i = 0; i < nextreq; i++ )
86 61f5c35c 2004-05-15 devnull if ( request[i].page == page )
87 61f5c35c 2004-05-15 devnull dumprequest(request[i].want, request[i].file, fp_out);
89 61f5c35c 2004-05-15 devnull } /* End of writerequest */
91 61f5c35c 2004-05-15 devnull /*****************************************************************************/
94 61f5c35c 2004-05-15 devnull dumprequest(want, file, fp_out)
96 61f5c35c 2004-05-15 devnull char *want; /* look for this string */
97 61f5c35c 2004-05-15 devnull char *file; /* in this file */
98 61f5c35c 2004-05-15 devnull FILE *fp_out; /* and write the value out here */
102 61f5c35c 2004-05-15 devnull char buf[100]; /* line buffer for reading *file */
103 61f5c35c 2004-05-15 devnull FILE *fp_in;
107 61f5c35c 2004-05-15 devnull * Looks for *want in the request file and if it's found the associated value
108 61f5c35c 2004-05-15 devnull * is copied to the output file. Keywords (ie. the *want strings) begin an @ in
109 61f5c35c 2004-05-15 devnull * the first column of file, while the values (ie. the stuff that's copied to
110 61f5c35c 2004-05-15 devnull * the output file) starts on the next line and extends to the next keyword or
111 61f5c35c 2004-05-15 devnull * to the end of file.
115 61f5c35c 2004-05-15 devnull if ( (fp_in = fopen(file, "r")) != NULL ) {
116 61f5c35c 2004-05-15 devnull while ( fgets(buf, sizeof(buf), fp_in) != NULL )
117 61f5c35c 2004-05-15 devnull if ( buf[0] == '@' && strncmp(want, &buf[1], strlen(want)) == 0 )
118 61f5c35c 2004-05-15 devnull while ( fgets(buf, sizeof(buf), fp_in) != NULL )
119 61f5c35c 2004-05-15 devnull if ( buf[0] == '#' || buf[0] == '%' )
120 61f5c35c 2004-05-15 devnull continue;
121 61f5c35c 2004-05-15 devnull else if ( buf[0] != '@' )
122 61f5c35c 2004-05-15 devnull fprintf(fp_out, "%s", buf);
123 61f5c35c 2004-05-15 devnull else break;
124 61f5c35c 2004-05-15 devnull fclose(fp_in);
125 61f5c35c 2004-05-15 devnull } /* End if */
127 61f5c35c 2004-05-15 devnull } /* End of dumprequest */
129 61f5c35c 2004-05-15 devnull /*****************************************************************************/
