diff options
Diffstat (limited to 'contrib/libg++/libio/strops.c')
-rw-r--r-- | contrib/libg++/libio/strops.c | 290 |
1 files changed, 0 insertions, 290 deletions
diff --git a/contrib/libg++/libio/strops.c b/contrib/libg++/libio/strops.c deleted file mode 100644 index c88a1335ffd6..000000000000 --- a/contrib/libg++/libio/strops.c +++ /dev/null @@ -1,290 +0,0 @@ -/* -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 this library; see the file COPYING. If not, write to the Free -Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, 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 "strfile.h" -#include "libioP.h" -#include <string.h> - -#if 0 -/* The following definitions are for exposition only. - They map the terminlogy used in the ANSI/ISO C++ draft standard - to the implementation. */ - -/* allocated: set when a dynamic array object has been allocated, and - hence should be freed by the destructor for the strstreambuf object. */ -#define ALLOCATED(FP) ((FP)->_f._IO_buf_base && DYNAMIC(FP)) - -/* constant: set when the array object has const elements, - so the output sequence cannot be written. */ -#define CONSTANT(FP) ((FP)->_f._IO_file_flags & _IO_NO_WRITES) - -/* alsize: the suggested minimum size for a dynamic array object. */ -#define ALSIZE(FP) ??? /* not stored */ - -/* palloc: points to the function to call to allocate a dynamic array object.*/ -#define PALLOC(FP) \ - ((FP)->_s._allocate_buffer == default_alloc ? 0 : (FP)->_s._allocate_buffer) - -/* pfree: points to the function to call to free a dynamic array object. */ -#define PFREE(FP) \ - ((FP)->_s._free_buffer == default_free ? 0 : (FP)->_s._free_buffer) - -#endif - -#ifdef TODO -/* An "unbounded buffer" is when a buffer is supplied, but with no - specified length. An example is the buffer argument to sprintf. - */ -#endif - -void -DEFUN(_IO_str_init_static, (fp, ptr, size, pstart), - _IO_FILE *fp AND char *ptr AND int size AND char *pstart) -{ - if (size == 0) - size = strlen(ptr); - else if (size < 0) - { - /* If size is negative 'the characters are assumed to - continue indefinitely.' This is kind of messy ... */ - int s; - size = 512; - /* Try increasing powers of 2, as long as we don't wrap around. */ - for (; s = 2*size, s > 0 && ptr + s > ptr && s < 0x4000000L; ) - size = s; - /* Try increasing size as much as we can without wrapping around. */ - for (s = size >> 1; s > 0; s >>= 1) - { - if (ptr + size + s > ptr) - size += s; - } - } - _IO_setb(fp, ptr, ptr+size, 0); - - fp->_IO_write_base = ptr; - fp->_IO_read_base = ptr; - fp->_IO_read_ptr = ptr; - if (pstart) - { - fp->_IO_write_ptr = pstart; - fp->_IO_write_end = ptr+size; - fp->_IO_read_end = pstart; - } - else - { - fp->_IO_write_ptr = ptr; - fp->_IO_write_end = ptr; - fp->_IO_read_end = ptr+size; - } - /* A null _allocate_buffer function flags the strfile as being static. */ - (((_IO_strfile*)(fp))->_s._allocate_buffer) = (_IO_alloc_type)0; -} - -void -DEFUN(_IO_str_init_readonly, (fp, ptr, size), - _IO_FILE *fp AND const char *ptr AND int size) -{ - _IO_str_init_static (fp, (char*)ptr, size, NULL); - fp->_IO_file_flags |= _IO_NO_WRITES; -} - -int -DEFUN(_IO_str_overflow, (fp, c), - register _IO_FILE* fp AND int c) -{ - int flush_only = c == EOF; - _IO_size_t pos; - if (fp->_flags & _IO_NO_WRITES) - return flush_only ? 0 : EOF; - if ((fp->_flags & _IO_TIED_PUT_GET) && !(fp->_flags & _IO_CURRENTLY_PUTTING)) - { - fp->_flags |= _IO_CURRENTLY_PUTTING; - fp->_IO_write_ptr = fp->_IO_read_ptr; - fp->_IO_read_ptr = fp->_IO_read_end; - } - pos = fp->_IO_write_ptr - fp->_IO_write_base; - if (pos >= _IO_blen(fp) + flush_only) - { - if (fp->_flags & _IO_USER_BUF) /* not allowed to enlarge */ - return EOF; - else - { - char *new_buf; - char *old_buf = fp->_IO_buf_base; - _IO_size_t new_size = 2 * _IO_blen(fp) + 100; - new_buf - = (char*)(*((_IO_strfile*)fp)->_s._allocate_buffer)(new_size); - if (new_buf == NULL) - { - /* __ferror(fp) = 1; */ - return EOF; - } - if (fp->_IO_buf_base) - { - memcpy(new_buf, old_buf, _IO_blen(fp)); - (*((_IO_strfile*)fp)->_s._free_buffer)(fp->_IO_buf_base); - /* Make sure _IO_setb won't try to delete _IO_buf_base. */ - fp->_IO_buf_base = NULL; - } -#if 0 - if (lenp == &LEN(fp)) /* use '\0'-filling */ - memset(new_buf + pos, 0, blen() - pos); -#endif - _IO_setb(fp, new_buf, new_buf + new_size, 1); - fp->_IO_read_base = new_buf + (fp->_IO_read_base - old_buf); - fp->_IO_read_ptr = new_buf + (fp->_IO_read_ptr - old_buf); - fp->_IO_read_end = new_buf + (fp->_IO_read_end - old_buf); - fp->_IO_write_ptr = new_buf + (fp->_IO_write_ptr - old_buf); - - fp->_IO_write_base = new_buf; - fp->_IO_write_end = fp->_IO_buf_end; - } - } - - if (!flush_only) - *fp->_IO_write_ptr++ = (unsigned char) c; - if (fp->_IO_write_ptr > fp->_IO_read_end) - fp->_IO_read_end = fp->_IO_write_ptr; - return c; -} - -int -DEFUN(_IO_str_underflow, (fp), - register _IO_FILE* fp) -{ - if (fp->_IO_write_ptr > fp->_IO_read_end) - fp->_IO_read_end = fp->_IO_write_ptr; - if ((fp->_flags & _IO_TIED_PUT_GET) && (fp->_flags & _IO_CURRENTLY_PUTTING)) - { - fp->_flags &= ~_IO_CURRENTLY_PUTTING; - fp->_IO_read_ptr = fp->_IO_write_ptr; - fp->_IO_write_ptr = fp->_IO_write_end; - } - if (fp->_IO_read_ptr < fp->_IO_read_end) - return *fp->_IO_read_ptr; - else - return EOF; -} - -/* The size of the valid part of the buffer. */ - -_IO_ssize_t -DEFUN(_IO_str_count, (fp), - register _IO_FILE *fp) -{ - return (fp->_IO_write_ptr > fp->_IO_read_end ? fp->_IO_write_ptr - : fp->_IO_read_end) - - fp->_IO_read_base; -} - -_IO_pos_t -DEFUN(_IO_str_seekoff, (fp, offset, dir, mode), - register _IO_FILE *fp AND _IO_off_t offset AND int dir AND int mode) -{ - _IO_ssize_t cur_size = _IO_str_count(fp); - _IO_pos_t new_pos = EOF; - - /* Move the get pointer, if requested. */ - if (mode & _IOS_INPUT) - { - switch (dir) - { - case _IO_seek_end: - offset += cur_size; - break; - case _IO_seek_cur: - offset += fp->_IO_read_ptr - fp->_IO_read_base; - break; - default: /* case _IO_seek_set: */ - break; - } - if (offset < 0 || (_IO_size_t)offset > cur_size) - return EOF; - fp->_IO_read_ptr = fp->_IO_read_base + offset; - fp->_IO_read_end = fp->_IO_read_base + cur_size; - new_pos = offset; - } - - /* Move the put pointer, if requested. */ - if (mode & _IOS_OUTPUT) - { - switch (dir) - { - case _IO_seek_end: - offset += cur_size; - break; - case _IO_seek_cur: - offset += fp->_IO_write_ptr - fp->_IO_write_base; - break; - default: /* case _IO_seek_set: */ - break; - } - if (offset < 0 || (_IO_size_t)offset > cur_size) - return EOF; - fp->_IO_write_ptr = fp->_IO_write_base + offset; - new_pos = offset; - } - return new_pos; -} - -int -DEFUN(_IO_str_pbackfail, (fp, c), - register _IO_FILE *fp AND int c) -{ - if ((fp->_flags & _IO_NO_WRITES) && c != EOF) - return EOF; - return _IO_default_pbackfail(fp, c); -} - -void -DEFUN (_IO_str_finish, (fp), - register _IO_FILE* fp) -{ - if (fp->_IO_buf_base && !(fp->_flags & _IO_USER_BUF)) - (((_IO_strfile*)fp)->_s._free_buffer)(fp->_IO_buf_base); - fp->_IO_buf_base = NULL; - - _IO_default_finish(fp); -} - -struct _IO_jump_t _IO_str_jumps = { - JUMP_INIT_DUMMY, - JUMP_INIT(finish, _IO_str_finish), - JUMP_INIT(overflow, _IO_str_overflow), - JUMP_INIT(underflow, _IO_str_underflow), - JUMP_INIT(uflow, _IO_default_uflow), - JUMP_INIT(pbackfail, _IO_str_pbackfail), - JUMP_INIT(xsputn, _IO_default_xsputn), - JUMP_INIT(xsgetn, _IO_default_xsgetn), - JUMP_INIT(seekoff, _IO_str_seekoff), - JUMP_INIT(seekpos, _IO_default_seekpos), - JUMP_INIT(setbuf, _IO_default_setbuf), - JUMP_INIT(sync, _IO_default_sync), - JUMP_INIT(doallocate, _IO_default_doallocate), - JUMP_INIT(read, _IO_default_read), - JUMP_INIT(write, _IO_default_write), - JUMP_INIT(seek, _IO_default_seek), - JUMP_INIT(close, _IO_default_close), - JUMP_INIT(stat, _IO_default_stat) -}; |