src/common/fgetword.c

/* Copyright (c) 1991 Regents of the University of California */

#ifndef lint
static char SCCSid[] = "$SunId$ LBL";
#endif

/*
 * Read white space separated words from stream
 */

#include  <stdio.h>

#include  <ctype.h>


char *
fgetword(s, n, fp)              /* get a word, maximum n-1 characters */
char  *s;
int  n;
register FILE  *fp;
{
        register char  *cp;
        register int  c;
                                        /* skip initial white space */
        do
                c = getc(fp);
        while (isspace(c));
                                        /* check for end of file */
        if (c == EOF)
                return(NULL);
                                        /* get actual word */
        cp = s;
        do {
                if (--n <= 0)                   /* check length limit */
                        break;
                *cp++ = c;
                c = getc(fp);
        } while (c != EOF && !isspace(c));
        *cp = '\0';
        if (c != EOF)                   /* replace delimiter */
                ungetc(c, fp);
        return(s);
}
Revision:	1.2
Committed:	Mon Jul 22 14:33:06 1991 UTC (34 years, 3 months ago) by greg
Content type:	text/plain
Branch:	MAIN
Changes since 1.1:	+0 -42 lines
Log Message:	created words.c for manipulating words in strings
#	User	Rev	Content
1	greg	1.1	/* Copyright (c) 1991 Regents of the University of California */
2
3			#ifndef lint
4			static char SCCSid[] = "$SunId$ LBL";
5			#endif
6
7			/*
8			* Read white space separated words from stream
9			*/
10
11			#include <stdio.h>
12
13			#include <ctype.h>
14
15
16			char *
17			fgetword(s, n, fp) /* get a word, maximum n-1 characters */
18			char *s;
19			int n;
20			register FILE *fp;
21			{
22			register char *cp;
23			register int c;
24			/* skip initial white space */
25			do
26			c = getc(fp);
27			while (isspace(c));
28			/* check for end of file */
29			if (c == EOF)
30			return(NULL);
31			/* get actual word */
32			cp = s;
33			do {
34			if (--n <= 0) /* check length limit */
35			break;
36			*cp++ = c;
37			c = getc(fp);
38			} while (c != EOF && !isspace(c));
39			*cp = '\0';
40			if (c != EOF) /* replace delimiter */
41			ungetc(c, fp);
42			return(s);
43			}