ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/common/fgetline.c
Revision: 2.6
Committed: Thu Apr 29 14:36:49 2004 UTC (20 years ago) by greg
Content type: text/plain
Branch: MAIN
Changes since 2.5: +5 -1 lines
Log Message:
Added macros to avoid flockfile(3) overhead

File Contents

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