ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/common/fgetline.c
Revision: 2.7
Committed: Tue Sep 14 02:53:50 2004 UTC (19 years, 7 months ago) by greg
Content type: text/plain
Branch: MAIN
CVS Tags: rad3R7P2, rad3R7P1, rad4R1, rad4R0, rad3R6, rad3R6P1, rad3R8, rad3R9
Changes since 2.6: +2 -1 lines
Log Message:
Added #undef for getc/putc where they were being replaced

File Contents

# User Rev Content
1 greg 1.1 #ifndef lint
2 greg 2.7 static const char RCSid[] = "$Id: fgetline.c,v 2.6 2004/04/29 14:36:49 greg Exp $";
3 greg 1.1 #endif
4     /*
5 greg 1.2 * fgetline.c - read line with escaped newlines.
6 greg 1.1 *
7 greg 2.4 * External symbols declared in rtio.h
8 greg 2.2 */
9    
10 greg 2.3 #include "copyright.h"
11 greg 1.1
12 greg 2.4 #include "rtio.h"
13 greg 1.1
14 greg 2.6 #ifdef getc_unlocked /* avoid horrendous overhead of flockfile */
15 greg 2.7 #undef getc
16 greg 2.6 #define getc getc_unlocked
17     #endif
18    
19 greg 1.1
20     char *
21     fgetline(s, n, fp) /* read in line with escapes, elide final newline */
22     char *s;
23 greg 1.2 int n;
24     register FILE *fp;
25 greg 1.1 {
26 greg 1.2 register char *cp = s;
27     register int c = EOF;
28 greg 1.1
29 greg 1.2 while (--n > 0 && (c = getc(fp)) != EOF) {
30 greg 2.5 if (c == '\r' && (c = getc(fp)) != '\n') {
31     ungetc(c, fp); /* must be Apple file */
32     c = '\n';
33     }
34 greg 1.2 if (c == '\n' && (cp == s || cp[-1] != '\\'))
35     break;
36 greg 1.1 *cp++ = c;
37     }
38 greg 1.2 if (cp == s && c == EOF)
39 greg 1.1 return(NULL);
40 greg 1.2 *cp = '\0';
41 greg 1.1 return(s);
42     }