ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/common/fgetline.c
Revision: 2.10
Committed: Wed Jul 29 18:19:31 2020 UTC (3 years, 9 months ago) by greg
Content type: text/plain
Branch: MAIN
Changes since 2.9: +6 -1 lines
Log Message:
fix: Removed escaped newlines for Windows (popen call, mostly)

File Contents

# User Rev Content
1 greg 1.1 #ifndef lint
2 greg 2.10 static const char RCSid[] = "$Id: fgetline.c,v 2.9 2016/03/04 00:21:21 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    
15     char *
16 greg 2.8 fgetline( /* read in line with escapes, elide final newline */
17     char *s,
18     int n,
19     FILE *fp
20     )
21 greg 1.1 {
22 greg 2.8 char *cp = s;
23     int c = EOF;
24 greg 1.1
25 greg 1.2 while (--n > 0 && (c = getc(fp)) != EOF) {
26 greg 2.5 if (c == '\r' && (c = getc(fp)) != '\n') {
27     ungetc(c, fp); /* must be Apple file */
28     c = '\n';
29     }
30 greg 1.2 if (c == '\n' && (cp == s || cp[-1] != '\\'))
31     break;
32 greg 1.1 *cp++ = c;
33     }
34 greg 2.8 if ((cp == s) & (c == EOF))
35 greg 1.1 return(NULL);
36 greg 1.2 *cp = '\0';
37 greg 2.10 #if defined(_WIN32) || defined(_WIN64)
38     /* remove escaped newlines */
39     for (cp = s; (cp = strchr(cp, '\\')) != NULL && cp[1] == '\n'; )
40     memmove(cp, cp+2, strlen(cp+2)+1);
41     #endif
42 greg 1.1 return(s);
43     }