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 |
|
|
} |