61d5ffaf10
issues in these areas:
.h's installed
.hP's installed
-lcurses interaction
files needed in ~/legal for copyleft reasons.
141 lines
3.6 KiB
C++
141 lines
3.6 KiB
C++
/* This is part of libio/iostream, providing -*- C++ -*- input/output.
|
|
Copyright (C) 1993 Free Software Foundation
|
|
|
|
This file is part of the GNU IO Library. This library is free
|
|
software; you can redistribute it and/or modify it under the
|
|
terms of the GNU General Public License as published by the
|
|
Free Software Foundation; either version 2, or (at your option)
|
|
any later version.
|
|
|
|
This library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GNU CC; see the file COPYING. If not, write to
|
|
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
|
As a special exception, if you link this library with files
|
|
compiled with a GNU compiler to produce an executable, this does not cause
|
|
the resulting executable to be covered by the GNU General Public License.
|
|
This exception does not however invalidate any other reasons why
|
|
the executable file might be covered by the GNU General Public License. */
|
|
|
|
#include <libioP.h>
|
|
#include "iostream.h"
|
|
#include <string.h>
|
|
|
|
istream& istream::getline(char* buf, int len, char delim)
|
|
{
|
|
_gcount = 0;
|
|
if (len <= 0)
|
|
{
|
|
set(ios::failbit);
|
|
return *this;
|
|
}
|
|
int ch;
|
|
if (ipfx1())
|
|
{
|
|
streambuf *sb = rdbuf();
|
|
_gcount = _IO_getline(sb, buf, len - 1, delim, -1);
|
|
ch = sb->sbumpc();
|
|
if (ch == EOF)
|
|
set (_gcount == 0 ? (ios::failbit|ios::eofbit) : ios::eofbit);
|
|
else if (ch != (unsigned char) delim)
|
|
{
|
|
set(ios::failbit);
|
|
sb->sungetc(); // Leave delimiter unread.
|
|
}
|
|
}
|
|
else
|
|
ch = EOF;
|
|
buf[_gcount] = '\0';
|
|
if (ch == (unsigned char)delim)
|
|
_gcount++; // The delimiter is counted in the gcount().
|
|
return *this;
|
|
}
|
|
|
|
istream& istream::get(char* buf, int len, char delim)
|
|
{
|
|
_gcount = 0;
|
|
if (len <= 0)
|
|
{
|
|
set(ios::failbit);
|
|
return *this;
|
|
}
|
|
if (ipfx1())
|
|
{
|
|
streambuf *sbuf = rdbuf();
|
|
long count = _IO_getline(sbuf, buf, len - 1, delim, -1);
|
|
if (count == 0 && sbuf->sgetc() == EOF)
|
|
set(ios::failbit|ios::eofbit);
|
|
else
|
|
_gcount = count;
|
|
}
|
|
buf[_gcount] = '\0';
|
|
return *this;
|
|
}
|
|
|
|
|
|
// from Doug Schmidt
|
|
|
|
#define CHUNK_SIZE 512
|
|
|
|
/* Reads an arbitrarily long input line terminated by a user-specified
|
|
TERMINATOR. Super-nifty trick using recursion avoids unnecessary calls
|
|
to NEW! */
|
|
|
|
char *_sb_readline (streambuf *sb, long& total, char terminator)
|
|
{
|
|
char buf[CHUNK_SIZE];
|
|
char *ptr;
|
|
int ch;
|
|
|
|
_IO_size_t count = _IO_getline(sb, buf, CHUNK_SIZE, terminator, -1);
|
|
ch = sb->sbumpc();
|
|
long old_total = total;
|
|
total += count;
|
|
if (ch != EOF && ch != terminator) {
|
|
total++; // Include ch in total.
|
|
ptr = _sb_readline(sb, total, terminator);
|
|
if (ptr) {
|
|
memcpy(ptr + old_total, buf, count);
|
|
ptr[old_total+count] = ch;
|
|
}
|
|
return ptr;
|
|
}
|
|
|
|
if (ptr = new char[total+1]) {
|
|
ptr[total] = '\0';
|
|
memcpy(ptr + total - count, buf, count);
|
|
return ptr;
|
|
}
|
|
else
|
|
return NULL;
|
|
}
|
|
|
|
/* Reads an arbitrarily long input line terminated by TERMINATOR.
|
|
This routine allocates its own memory, so the user should
|
|
only supply the address of a (char *). */
|
|
|
|
istream& istream::gets(char **s, char delim /* = '\n' */)
|
|
{
|
|
if (ipfx1()) {
|
|
long size = 0;
|
|
streambuf *sb = rdbuf();
|
|
*s = _sb_readline (sb, size, delim);
|
|
_gcount = *s ? size : 0;
|
|
if (sb->_flags & _IO_EOF_SEEN) {
|
|
set(ios::eofbit);
|
|
if (_gcount == 0)
|
|
set(ios::failbit);
|
|
}
|
|
}
|
|
else {
|
|
_gcount = 0;
|
|
*s = NULL;
|
|
}
|
|
return *this;
|
|
}
|