ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/duphead.c
Revision: 2.7
Committed: Wed Oct 22 02:06:35 2003 UTC (20 years, 5 months ago) by greg
Content type: text/plain
Branch: MAIN
CVS Tags: rad5R4, rad5R2, rad4R2P2, rad5R0, rad5R1, rad3R7P2, rad3R7P1, rad4R2, rad4R1, rad4R0, rad3R6, rad3R6P1, rad3R8, rad3R9, rad4R2P1, rad5R3, HEAD
Changes since 2.6: +2 -2 lines
Log Message:
Fewer complaints if "platform.h" precedes "standard.h"

File Contents

# Content
1 #ifndef lint
2 static const char RCSid[] = "$Id: duphead.c,v 2.6 2003/06/08 12:03:10 schorsch Exp $";
3 #endif
4 /*
5 * Duplicate header on stdout.
6 *
7 * Externals declared in ray.h
8 */
9
10 #include "copyright.h"
11
12 #include "platform.h"
13 #include "standard.h"
14 #include "paths.h"
15
16
17 int headismine = 1; /* true if header file belongs to me */
18
19 static char *headfname = NULL; /* temp file name */
20 static FILE *headfp = NULL; /* temp file pointer */
21
22
23 void
24 headclean() /* remove header temp file (if one) */
25 {
26 if (headfname == NULL)
27 return;
28 if (headfp != NULL)
29 fclose(headfp);
30 if (headismine)
31 unlink(headfname);
32 }
33
34
35 void
36 openheader() /* save standard output to header file */
37 {
38 static char template[] = TEMPLATE;
39
40 headfname = mktemp(template);
41 if (freopen(headfname, "w", stdout) == NULL) {
42 sprintf(errmsg, "cannot open header file \"%s\"", headfname);
43 error(SYSTEM, errmsg);
44 }
45 }
46
47
48 void
49 dupheader() /* repeat header on standard output */
50 {
51 register int c;
52
53 if (headfp == NULL) {
54 if ((headfp = fopen(headfname, "r")) == NULL)
55 error(SYSTEM, "error reopening header file");
56 SET_FILE_BINARY(headfp);
57 } else if (fseek(headfp, 0L, 0) < 0)
58 error(SYSTEM, "seek error on header file");
59 while ((c = getc(headfp)) != EOF)
60 putchar(c);
61 }