112 lines
2.6 KiB
C
Raw Normal View History

2001-01-01 00:00:00 +01:00
/***
*fgets.c - get string from a file
*
* Copyright (c) 1985-1991, Microsoft Corporation. All rights reserved.
*
*Purpose:
* defines fgets() - read a string from a file
*
*Revision History:
* 09-02-83 RN initial version
* 04-16-87 JCR changed count from an unsigned int to an int (ANSI)
* and modified comparisons accordingly
* 11-06-87 JCR Multi-thread support
* 12-11-87 JCR Added "_LOAD_DS" to declaration
* 05-31-88 PHG Merged DLL and normal versions
* 06-14-88 JCR Use near pointer to reference _iob[] entries
* 08-24-88 GJF Don't use FP_OFF() macro for the 386
* 08-28-89 JCR Removed _NEAR_ for 386
* 02-15-90 GJF Fixed copyright and indents
* 03-19-90 GJF Replaced _LOAD_DS with _CALLTYPE1, added #include
* <cruntime.h> and added #include <register.h>. Also,
* removed some leftover 16-bit support.
* 07-24-90 SBM Replaced <assertm.h> by <assert.h>
* 08-14-90 SBM Compiles cleanly with -W3
* 10-02-90 GJF New-style function declarator.
*
*******************************************************************************/
#include <cruntime.h>
#include <stdio.h>
#include <assert.h>
#include <file2.h>
#include <internal.h>
#include <os2dll.h>
/***
*char *fgets(string, count, stream) - input string from a stream
*
*Purpose:
* get a string, up to count-1 chars or '\n', whichever comes first,
* append '\0' and put the whole thing into string. the '\n' IS included
* in the string. if count<=1 no input is requested. if EOF is found
* immediately, return NULL. if EOF found after chars read, let EOF
* finish the string as '\n' would.
*
*Entry:
* char *string - pointer to place to store string
* int count - max characters to place at string (include \0)
* FILE *stream - stream to read from
*
*Exit:
* returns string with text read from file in it.
* if count <= 0 return NULL
* if count == 1 put null string in string
* returns NULL if error or end-of-file found immediately
*
*Exceptions:
*
*******************************************************************************/
char * _CALLTYPE1 fgets (
char *string,
int count,
FILE *str
)
{
REG1 FILE *stream;
REG2 char *pointer = string;
char *retval = string;
int ch;
#ifdef MTHREAD
int index;
#endif
assert(string != NULL);
assert(str != NULL);
if (count <= 0)
return(NULL);
/* Init stream pointer */
stream = str;
#ifdef MTHREAD
index = _iob_index(stream);
#endif
_lock_str(index);
while (--count)
{
if ((ch = _getc_lk(stream)) == EOF)
{
if (pointer == string) {
retval=NULL;
goto done;
}
break;
}
if ((*pointer++ = (char)ch) == '\n')
break;
}
*pointer = '\0';
/* Common return */
done:
_unlock_str(index);
return(retval);
}