1 |
#ifndef lint |
2 |
static const char RCSid[] = "$Id: fgetline.c,v 2.9 2016/03/04 00:21:21 greg Exp $"; |
3 |
#endif |
4 |
/* |
5 |
* fgetline.c - read line with escaped newlines. |
6 |
* |
7 |
* External symbols declared in rtio.h |
8 |
*/ |
9 |
|
10 |
#include "copyright.h" |
11 |
|
12 |
#include "rtio.h" |
13 |
|
14 |
|
15 |
char * |
16 |
fgetline( /* read in line with escapes, elide final newline */ |
17 |
char *s, |
18 |
int n, |
19 |
FILE *fp |
20 |
) |
21 |
{ |
22 |
char *cp = s; |
23 |
int c = EOF; |
24 |
|
25 |
while (--n > 0 && (c = getc(fp)) != EOF) { |
26 |
if (c == '\r' && (c = getc(fp)) != '\n') { |
27 |
ungetc(c, fp); /* must be Apple file */ |
28 |
c = '\n'; |
29 |
} |
30 |
if (c == '\n' && (cp == s || cp[-1] != '\\')) |
31 |
break; |
32 |
*cp++ = c; |
33 |
} |
34 |
if ((cp == s) & (c == EOF)) |
35 |
return(NULL); |
36 |
*cp = '\0'; |
37 |
#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 |
return(s); |
43 |
} |