ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/common/fgetline.c
Revision: 2.8
Committed: Wed Jul 9 22:46:51 2014 UTC (9 years, 9 months ago) by greg
Content type: text/plain
Branch: MAIN
CVS Tags: rad4R2P2, rad5R0, rad4R2, rad4R2P1
Changes since 2.7: +9 -8 lines
Log Message:
Ansification

File Contents

# User Rev Content
1 greg 1.1 #ifndef lint
2 greg 2.8 static const char RCSid[] = "$Id: fgetline.c,v 2.7 2004/09/14 02:53:50 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 greg 2.8 fgetline( /* read in line with escapes, elide final newline */
22     char *s,
23     int n,
24     FILE *fp
25     )
26 greg 1.1 {
27 greg 2.8 char *cp = s;
28     int c = EOF;
29 greg 1.1
30 greg 1.2 while (--n > 0 && (c = getc(fp)) != EOF) {
31 greg 2.5 if (c == '\r' && (c = getc(fp)) != '\n') {
32     ungetc(c, fp); /* must be Apple file */
33     c = '\n';
34     }
35 greg 1.2 if (c == '\n' && (cp == s || cp[-1] != '\\'))
36     break;
37 greg 1.1 *cp++ = c;
38     }
39 greg 2.8 if ((cp == s) & (c == EOF))
40 greg 1.1 return(NULL);
41 greg 1.2 *cp = '\0';
42 greg 1.1 return(s);
43     }