bogon patch [ was PATCH for vtable bug on alpha ]

Jeffrey A Law law@cygnus.com
Fri Oct 9 10:36:00 GMT 1998


1998-10-07  Mark Mitchell  <mark@markmitchell.com>

        * cp-tree.h (vtbl_ptr_type_node): New variable.
        * class.c (build_vtbl_ref): Don't indirect through the vptr; it's
        already of the right type.
        (finish_struct_1): Make the vptr be of type vtbl_ptr_type_node.
        Simplify code to grow vtable.
        * decl.c (vtbl_ptr_type_node): Define.
        (init_decl_processing): Initialize it.


I get lots of these errors trying to build libio:

../../../devo/libio/iostream.h: In method `ostream::ostream()':
In file included from ../../../devo/libio/fstream.h:30,
                 from ../../../devo/libio/fstream.cc:34:
../../../devo/libio/iostream.h:49: assignment to `const __vtbl_ptr_type *' from 
`const __vtbl_ptr_type (*)[2]'

I happen to be working with a PA compiler, but I've also seen it with a mn102
cross compiler (hppa1.1-hp-hpux10 or mn10200-elf).  No compiler arguments are
necessary.


extern "C" {
extern int errno;
     extern "C" {
         extern int errno;
     }
extern "C" {
    extern void perror(const char*);
    extern int sys_nerr;
    extern char *sys_errlist[];
    extern char *strerror (int);
}
typedef          int   _G_int8_t __attribute__((__mode__(__QI__)));
typedef unsigned int  _G_uint8_t __attribute__((__mode__(__QI__)));
typedef          int  _G_int16_t __attribute__((__mode__(__HI__)));
typedef unsigned int _G_uint16_t __attribute__((__mode__(__HI__)));
typedef          int  _G_int32_t __attribute__((__mode__(__SI__)));
typedef unsigned int _G_uint32_t __attribute__((__mode__(__SI__)));
typedef          int  _G_int64_t __attribute__((__mode__(__DI__)));
typedef unsigned int _G_uint64_t __attribute__((__mode__(__DI__)));
__extension__ typedef long long _G_llong;
__extension__ typedef unsigned long long _G_ullong;
typedef unsigned int _G_clock_t;
typedef int _G_dev_t;
typedef int _G_fpos_t;
typedef int _G_gid_t;
typedef unsigned int _G_ino_t;
typedef unsigned short _G_mode_t;
typedef unsigned short _G_nlink_t;
typedef int _G_off_t;
typedef int _G_pid_t;
typedef int _G_ptrdiff_t;
typedef int   _G_sigset_t;
typedef unsigned int _G_size_t;
typedef int _G_time_t;
typedef int _G_uid_t;
typedef unsigned int _G_wchar_t;
typedef int _G_ssize_t;
typedef unsigned int _G_wint_t;
typedef void * _G_va_list;
struct _IO_jump_t;  struct _IO_FILE;
    typedef void _IO_lock_t;
struct _IO_marker {
  struct _IO_marker *_next;
  struct _IO_FILE *_sbuf;
  int _pos;
};
struct _IO_FILE {
  int _flags;		 
  char* _IO_read_ptr;	 
  char* _IO_read_end;	 
  char* _IO_read_base;	 
  char* _IO_write_base;	 
  char* _IO_write_ptr;	 
  char* _IO_write_end;	 
  char* _IO_buf_base;	 
  char* _IO_buf_end;	 
  char *_IO_save_base;  
  char *_IO_backup_base;   
  char *_IO_save_end;  
  struct _IO_marker *_markers;
  struct _IO_FILE *_chain;
  int _fileno;
  int _blksize;
  _G_off_t  _offset;
  unsigned short _cur_column;
  char _unused;
  char _shortbuf[1];
};
struct _IO_FILE_plus;
extern struct _IO_FILE_plus _IO_stdin_, _IO_stdout_, _IO_stderr_;
typedef struct
{
  _G_ssize_t  (*read)  (struct _IO_FILE *, void *, _G_ssize_t )  ;
  _G_ssize_t  (*write)  (struct _IO_FILE *, const void *, _G_ssize_t )  ;
  _G_fpos_t  (*seek)  (struct _IO_FILE *, _G_off_t , int)  ;
  int (*close)  (struct _IO_FILE *)  ;
} _IO_cookie_io_functions_t;
struct _IO_cookie_file
{
  struct _IO_FILE file;
  const void *vtable;
  void *cookie;
  _IO_cookie_io_functions_t io_functions;
};
extern "C" {
extern int __underflow  (_IO_FILE *)  ;
extern int __uflow  (_IO_FILE *)  ;
extern int __overflow  (_IO_FILE *, int)  ;
extern int _IO_getc  (_IO_FILE *__fp)  ;
extern int _IO_putc  (int __c, _IO_FILE *__fp)  ;
extern int _IO_feof  (_IO_FILE *__fp)  ;
extern int _IO_ferror  (_IO_FILE *__fp)  ;
extern int _IO_peekc_locked  (_IO_FILE *__fp)  ;
extern void _IO_flockfile  (_IO_FILE *)  ;
extern void _IO_funlockfile  (_IO_FILE *)  ;
extern int _IO_ftrylockfile  (_IO_FILE *)  ;
extern int _IO_vfscanf  (_IO_FILE *, const char *, _G_va_list , int *)  ;
extern int _IO_vfprintf  (_IO_FILE *, const char *, _G_va_list )  ;
extern _G_ssize_t  _IO_padn  (_IO_FILE *, int, _G_ssize_t )  ;
extern _G_size_t  _IO_sgetn  (_IO_FILE *, void *, _G_size_t )  ;
extern _G_fpos_t  _IO_seekoff  (_IO_FILE *, _G_off_t , int, int)  ;
extern _G_fpos_t  _IO_seekpos  (_IO_FILE *, _G_fpos_t , int)  ;
extern void _IO_free_backup_area  (_IO_FILE *)  ;
}
extern "C" {
extern int _IO_fclose  (_IO_FILE*)  ;
extern _IO_FILE *_IO_fdopen  (int, const char*)  ;
extern int _IO_fflush  (_IO_FILE*)  ;
extern int _IO_fgetpos  (_IO_FILE*, _G_fpos_t *)  ;
extern char* _IO_fgets  (char*, int, _IO_FILE*)  ;
extern _IO_FILE *_IO_fopen  (const char*, const char*)  ;
extern int _IO_fprintf  (_IO_FILE*, const char*, ...)  ;
extern int _IO_fputs  (const char*, _IO_FILE*)  ;
extern int _IO_fsetpos  (_IO_FILE*, const _G_fpos_t  *)  ;
extern long int _IO_ftell  (_IO_FILE*)  ;
extern _G_size_t  _IO_fread  (void*, _G_size_t , _G_size_t , _IO_FILE*)  ;
extern _G_size_t  _IO_fwrite  (const void*,
				      _G_size_t , _G_size_t , _IO_FILE*)  ;
extern char* _IO_gets  (char*)  ;
extern void _IO_perror  (const char*)  ;
extern int _IO_printf  (const char*, ...)  ;
extern int _IO_puts  (const char*)  ;
extern int _IO_scanf  (const char*, ...)  ;
extern void _IO_setbuffer  (_IO_FILE *, char*, _G_size_t )  ;
extern int _IO_setvbuf  (_IO_FILE*, char*, int, _G_size_t )  ;
extern int _IO_sscanf  (const char*, const char*, ...)  ;
extern int _IO_sprintf  (char *, const char*, ...)  ;
extern int _IO_ungetc  (int, _IO_FILE*)  ;
extern int _IO_vsscanf  (const char *, const char *, _G_va_list )  ;
extern int _IO_vsprintf  (char*, const char*, _G_va_list )  ;
struct obstack;
extern int _IO_obstack_vprintf  (struct obstack *, const char *,
                                    _G_va_list )  ;
extern int _IO_obstack_printf  (struct obstack *, const char *, ...)  ;
extern _IO_FILE* _IO_popen  (const char*, const char*)  ;
}
extern "C" {
typedef void (*_IO_finish_t)  (_IO_FILE *, int)  ;  
typedef int (*_IO_overflow_t)  (_IO_FILE *, int)  ;
typedef int (*_IO_underflow_t)  (_IO_FILE *)  ;
typedef int (*_IO_pbackfail_t)  (_IO_FILE *, int)  ;
typedef _G_size_t  (*_IO_xsputn_t)  (_IO_FILE *FP, const void *DATA,
					 _G_size_t  N)  ;
typedef _G_size_t  (*_IO_xsgetn_t)  (_IO_FILE *FP, void *DATA,
					 _G_size_t  N)  ;
typedef _G_fpos_t  (*_IO_seekoff_t)  (_IO_FILE *FP, _G_off_t  OFF,
					  int DIR, int MODE)  ;
typedef _G_fpos_t  (*_IO_seekpos_t)  (_IO_FILE *, _G_fpos_t , int)  ;
typedef _IO_FILE* (*_IO_setbuf_t)  (_IO_FILE *, char *, _G_ssize_t )  ;
typedef int (*_IO_sync_t)  (_IO_FILE *)  ;
typedef int (*_IO_doallocate_t)  (_IO_FILE *)  ;
typedef _G_ssize_t  (*_IO_read_t)  (_IO_FILE *, void *, _G_ssize_t )  ;
typedef _G_ssize_t  (*_IO_write_t)  (_IO_FILE *,const void *,_G_ssize_t )  ;
typedef _G_fpos_t  (*_IO_seek_t)  (_IO_FILE *, _G_off_t , int)  ;
typedef int (*_IO_close_t)  (_IO_FILE *)  ;  
typedef int (*_IO_stat_t)  (_IO_FILE *, void *)  ;
struct _IO_jump_t
{
    struct { short delta1, delta2;  _G_size_t  pfn; }   __dummy  ;
    struct { short delta1, delta2;  _IO_finish_t  pfn; }   __finish  ;
    struct { short delta1, delta2;  _IO_overflow_t  pfn; }   __overflow  ;
    struct { short delta1, delta2;  _IO_underflow_t  pfn; }   __underflow  ;
    struct { short delta1, delta2;  _IO_underflow_t  pfn; }   __uflow  ;
    struct { short delta1, delta2;  _IO_pbackfail_t  pfn; }   __pbackfail  ;
    struct { short delta1, delta2;  _IO_xsputn_t  pfn; }   __xsputn  ;
    struct { short delta1, delta2;  _IO_xsgetn_t  pfn; }   __xsgetn  ;
    struct { short delta1, delta2;  _IO_seekoff_t  pfn; }   __seekoff  ;
    struct { short delta1, delta2;  _IO_seekpos_t  pfn; }   __seekpos  ;
    struct { short delta1, delta2;  _IO_setbuf_t  pfn; }   __setbuf  ;
    struct { short delta1, delta2;  _IO_sync_t  pfn; }   __sync  ;
    struct { short delta1, delta2;  _IO_doallocate_t  pfn; }   __doallocate  ;
    struct { short delta1, delta2;  _IO_read_t  pfn; }   __read  ;
    struct { short delta1, delta2;  _IO_write_t  pfn; }   __write  ;
    struct { short delta1, delta2;  _IO_seek_t  pfn; }   __seek  ;
    struct { short delta1, delta2;  _IO_close_t  pfn; }   __close  ;
    struct { short delta1, delta2;  _IO_stat_t  pfn; }   __stat  ;
};
struct _IO_FILE_plus
{
  _IO_FILE file;
  const struct _IO_jump_t *vtable;
};
extern _G_fpos_t  _IO_seekoff  (_IO_FILE *, _G_off_t , int, int)  ;
extern _G_fpos_t  _IO_seekpos  (_IO_FILE *, _G_fpos_t , int)  ;
extern void _IO_switch_to_main_get_area  (_IO_FILE *)  ;
extern void _IO_switch_to_backup_area  (_IO_FILE *)  ;
extern int _IO_switch_to_get_mode  (_IO_FILE *)  ;
extern void _IO_init  (_IO_FILE *, int)  ;
extern int _IO_sputbackc  (_IO_FILE *, int)  ;
extern int _IO_sungetc  (_IO_FILE *)  ;
extern void _IO_un_link  (_IO_FILE *)  ;
extern void _IO_link_in  (_IO_FILE *)  ;
extern void _IO_doallocbuf  (_IO_FILE *)  ;
extern void _IO_unsave_markers  (_IO_FILE *)  ;
extern void _IO_setb  (_IO_FILE *, char *, char *, int)  ;
extern unsigned _IO_adjust_column  (unsigned, const char *, int)  ;
extern void _IO_init_marker  (struct _IO_marker *, _IO_FILE *)  ;
extern void _IO_remove_marker  (struct _IO_marker *)  ;
extern int _IO_marker_difference  (struct _IO_marker *,
				       struct _IO_marker *)  ;
extern int _IO_marker_delta  (struct _IO_marker *)  ;
extern int _IO_seekmark  (_IO_FILE *, struct _IO_marker *, int)  ;
extern int _IO_default_underflow  (_IO_FILE *)  ;
extern int _IO_default_uflow  (_IO_FILE *)  ;
extern int _IO_default_doallocate  (_IO_FILE *)  ;
extern void _IO_default_finish  (_IO_FILE *, int)  ;
extern int _IO_default_pbackfail  (_IO_FILE *, int)  ;
extern _IO_FILE* _IO_default_setbuf  (_IO_FILE *, char *, _G_ssize_t )  ;
extern _G_size_t  _IO_default_xsputn  (_IO_FILE *, const void *,
					   _G_size_t )  ;
extern _G_size_t  _IO_default_xsgetn  (_IO_FILE *, void *, _G_size_t )  ;
extern _G_fpos_t  _IO_default_seekoff  (_IO_FILE *, _G_off_t , int, int)  ;
extern _G_fpos_t  _IO_default_seekpos  (_IO_FILE *, _G_fpos_t , int)  ;
extern _G_ssize_t  _IO_default_write  (_IO_FILE *, const void *,
					   _G_ssize_t )  ;
extern _G_ssize_t  _IO_default_read  (_IO_FILE *, void *, _G_ssize_t )  ;
extern int _IO_default_stat  (_IO_FILE *, void *)  ;
extern _G_fpos_t  _IO_default_seek  (_IO_FILE *, _G_off_t , int)  ;
extern int _IO_default_sync  (_IO_FILE *)  ;
extern struct _IO_jump_t _IO_file_jumps;
extern struct _IO_jump_t _IO_streambuf_jumps;
extern struct _IO_jump_t _IO_proc_jumps;
extern struct _IO_jump_t _IO_str_jumps;
extern int _IO_do_write  (_IO_FILE *, const char *, _G_size_t )  ;
extern int _IO_flush_all  (void)  ;
extern void _IO_cleanup  (void)  ;
extern void _IO_flush_all_linebuffered  (void)  ;
extern int _IO_file_doallocate  (_IO_FILE *)  ;
extern _IO_FILE* _IO_file_setbuf  (_IO_FILE *, char *, _G_ssize_t )  ;
extern _G_fpos_t  _IO_file_seekoff  (_IO_FILE *, _G_off_t , int, int)  ;
extern _G_fpos_t  _IO_file_seek  (_IO_FILE *, _G_off_t , int)  ;
extern _G_size_t  _IO_file_xsputn  (_IO_FILE *, const void *, _G_size_t )  ;
extern int _IO_file_stat  (_IO_FILE *, void *)  ;
extern int _IO_file_close  (_IO_FILE *)  ;
extern int _IO_file_underflow  (_IO_FILE *)  ;
extern int _IO_file_overflow  (_IO_FILE *, int)  ;
extern void _IO_file_init  (_IO_FILE *)  ;
extern _IO_FILE* _IO_file_attach  (_IO_FILE *, int)  ;
extern _IO_FILE* _IO_file_open  (_IO_FILE *, const char *, int, int,
				     int, int)  ;
extern _IO_FILE* _IO_file_fopen  (_IO_FILE *, const char *, const char *)  ;
extern _G_ssize_t  _IO_file_write  (_IO_FILE *, const void *,
					_G_ssize_t )  ;
extern _G_ssize_t  _IO_file_read  (_IO_FILE *, void *, _G_ssize_t )  ;
extern int _IO_file_sync  (_IO_FILE *)  ;
extern int _IO_file_close_it  (_IO_FILE *)  ;
extern void _IO_file_finish  (_IO_FILE *, int)  ;
extern _IO_FILE* _IO_proc_open  (_IO_FILE *, const char *, const char *)  ;
extern int _IO_proc_close  (_IO_FILE *)  ;
extern int _IO_str_underflow  (_IO_FILE *)  ;
extern int _IO_str_overflow  (_IO_FILE *, int)  ;
extern int _IO_str_pbackfail  (_IO_FILE *, int)  ;
extern _G_fpos_t  _IO_str_seekoff  (_IO_FILE *, _G_off_t , int, int)  ;
extern void _IO_str_finish  (_IO_FILE *, int)  ;
extern void _IO_str_init_static  (_IO_FILE *, char *, int, char *)  ;
extern void _IO_str_init_readonly  (_IO_FILE *, const char *, int)  ;
extern _G_ssize_t  _IO_str_count  (_IO_FILE *)  ;
extern int _IO_vasprintf  (char **result_ptr, __const char *format,
			       _G_va_list  args)  ;
extern int _IO_vdprintf  (int d, __const char *format, _G_va_list  arg)  ;
extern int _IO_vsnprintf  (char *string, _G_size_t  maxlen,
			       __const char *format, _G_va_list  args)  ;
extern _G_size_t  _IO_getline  (_IO_FILE *,char *, _G_size_t , int, int)  ;
extern _G_size_t  _IO_getline_info  (_IO_FILE *,char *, _G_size_t ,
					 int, int, int *)  ;
extern _G_ssize_t  _IO_getdelim  (char **, _G_size_t  *, int, _IO_FILE *)  ;
extern double _IO_strtod  (const char *, char **)  ;
extern char *_IO_dtoa  (double __d, int __mode, int __ndigits,
			    int *__decpt, int *__sign, char **__rve)  ;
extern int _IO_outfloat  (double __value, _IO_FILE *__sb, int __type,
			      int __width, int __precision, int __flags,
			      int __sign_mode, int __fill)  ;
extern _IO_FILE *_IO_list_all;
extern void (*_IO_cleanup_registration_needed)  (void)  ;
struct stat;
extern _G_ssize_t  _IO_read  (int, void *, _G_size_t )  ;
extern _G_ssize_t  _IO_write  (int, const void *, _G_size_t )  ;
extern _G_off_t  _IO_lseek  (int, _G_off_t , int)  ;
extern int _IO_close  (int)  ;
extern int _IO_fstat  (int, struct stat *)  ;
extern int _IO_vscanf  (const char *, _G_va_list )  ;
}
extern char  builtinbuf_vtable [] asm ("_vt$"  "10" "builtinbuf"); 
extern struct _IO_fake_stdiobuf _IO_stdin_buf, _IO_stdout_buf, _IO_stderr_buf;
}
extern "C" {
}
extern "C++" {
class istream;  
class ostream; class streambuf;
typedef _G_off_t  streamoff;
typedef _G_fpos_t  streampos;
typedef _G_ssize_t  streamsize;
typedef unsigned long __fmtflags;
typedef unsigned char __iostate;
struct _ios_fields
{  
    streambuf *_strbuf;
    ostream* _tie;
    int _width;
    __fmtflags _flags;
    short  _fill;
    __iostate _state;
    __iostate _exceptions;
    int _precision;
    void *_arrays;  
};
enum state_value {
    _good = 0 ,
    _eof = 1 ,
    _fail = 2 ,
    _bad = 4  };
enum open_mode {
    input = 1 ,
    output = 2 ,
    atend = 4 ,
    append = 8  };
class ios : public _ios_fields {
  ios& operator=(ios&);   
  ios (const ios&);  
  public:
    typedef __fmtflags fmtflags;
    typedef int iostate;
    typedef int openmode;
    typedef int streamsize;
    enum io_state {
	goodbit = 0 ,
	eofbit = 1 ,
	failbit = 2 ,
	badbit = 4  };
    enum open_mode {
	in = 1 ,
	out = 2 ,
	ate = 4 ,
	app = 8 ,
	trunc = 16 ,
	nocreate = 32 ,
	noreplace = 64 ,
	bin = 128 ,  
	binary = 128  };
    enum seek_dir { beg, cur, end};
    typedef enum seek_dir seekdir;
    enum { skipws= 01 ,
	   left= 02 , right= 04 , internal= 010 ,
	   dec= 020 , oct= 040 , hex= 0100 ,
	   showbase= 0200 , showpoint= 0400 ,
	   uppercase= 01000 , showpos= 02000 ,
	   scientific= 04000 , fixed= 010000 ,
	   unitbuf= 020000 , stdio= 040000 
	   };
    enum {  
	basefield=dec+oct+hex,
	floatfield = scientific+fixed,
	adjustfield = left+right+internal
    };
    ostream* tie() const { return _tie; }
    ostream* tie(ostream* val) { ostream* save=_tie; _tie=val; return save; }
    short  fill() const { return _fill; }
    short  fill(short  newf)
	{short  oldf = _fill; _fill = newf; return oldf;}
    fmtflags flags() const { return _flags; }
    fmtflags flags(fmtflags new_val) {
	fmtflags old_val = _flags; _flags = new_val; return old_val; }
    int precision() const { return _precision; }
    int precision(int newp) {
	unsigned short oldp = _precision; _precision = (unsigned short)newp;
	return oldp; }
    fmtflags setf(fmtflags val) {
	fmtflags oldbits = _flags;
	_flags |= val; return oldbits; }
    fmtflags setf(fmtflags val, fmtflags mask) {
	fmtflags oldbits = _flags;
	_flags = (_flags & ~mask) | (val & mask); return oldbits; }
    fmtflags unsetf(fmtflags mask) {
	fmtflags oldbits = _flags;
	_flags &= ~mask; return oldbits; }
    int width() const { return _width; }
    int width(int val) { int save = _width; _width = val; return save; }
    void _throw_failure() const { }
    void clear(iostate state = 0) {
	_state = _strbuf ? state : state|badbit;
	if (_state & _exceptions) _throw_failure(); }
    void set(iostate flag) { _state |= flag;
	if (_state & _exceptions) _throw_failure(); }
    void setstate(iostate flag) { _state |= flag;  
	if (_state & _exceptions) _throw_failure(); }
    int good() const { return _state == 0; }
    int eof() const { return _state & ios::eofbit; }
    int fail() const { return _state & (ios::badbit|ios::failbit); }
    int bad() const { return _state & ios::badbit; }
    iostate rdstate() const { return _state; }
    operator void*() const { return fail() ? (void*)0 : (void*)(-1); }
    int operator!() const { return fail(); }
    iostate exceptions() const { return _exceptions; }
    void exceptions(iostate enable) {
	_exceptions = enable;
	if (_state & _exceptions) _throw_failure(); }
    streambuf* rdbuf() const { return _strbuf; }
    streambuf* rdbuf(streambuf *_s) {
      streambuf *_old = _strbuf; _strbuf = _s; clear (); return _old; }
    static int sync_with_stdio(int on);
    static void sync_with_stdio() { sync_with_stdio(1); }
    static fmtflags bitalloc();
    static int xalloc();
    void*& pword(int);
    void* pword(int) const;
    long& iword(int);
    long iword(int) const;
    void unset(state_value flag) { _state &= ~flag; }
    void close();
    int is_open();
    int readable();
    int writable();
    class Init {
    public:
      Init () { }
    };
  protected:
    inline ios(streambuf* sb = 0, ostream* tie_to = 0);
    inline virtual ~ios();
    inline void init(streambuf* sb, ostream* tie = 0);
};
typedef ios::seek_dir _seek_dir;
class streammarker : private _IO_marker {
    friend class streambuf;
    void set_offset(int offset) { _pos = offset; }
  public:
    streammarker(streambuf *sb);
    ~streammarker();
    int saving() { return  1; }
    int delta(streammarker&);
    int delta();
};
struct streambuf : public _IO_FILE {  
    friend class ios;
    friend class istream;
    friend class ostream;
    friend class streammarker;
    const void *&_vtable() { return *(const void**)((_IO_FILE*)this + 1); }
  protected:
    static streambuf* _list_all;  
    _IO_FILE*& xchain() { return _chain; }
    void _un_link();
    void _link_in();
    char* gptr() const
      { return _flags  & 0x100  ? _IO_save_base : _IO_read_ptr; }
    char* pptr() const { return _IO_write_ptr; }
    char* egptr() const
      { return _flags  & 0x100  ? _IO_save_end : _IO_read_end; }
    char* epptr() const { return _IO_write_end; }
    char* pbase() const { return _IO_write_base; }
    char* eback() const
      { return _flags  & 0x100  ? _IO_save_base : _IO_read_base;}
    char* base() const { return _IO_buf_base; }
    char* ebuf() const { return _IO_buf_end; }
    int blen() const { return _IO_buf_end - _IO_buf_base; }
    void xput_char(char c) { *_IO_write_ptr++ = c; }
    int xflags() { return _flags ; }
    int xflags(int f) {int fl = _flags ; _flags  = f; return fl;}
    void xsetflags(int f) { _flags  |= f; }
    void xsetflags(int f, int mask)
      { _flags  = (_flags  & ~mask) | (f & mask); }
    void gbump(int n)
      { _flags  & 0x100  ? (_IO_save_base+=n):(_IO_read_ptr+=n);}
    void pbump(int n) { _IO_write_ptr += n; }
    void setb(char* b, char* eb, int a=0);
    void setp(char* p, char* ep)
      { _IO_write_base=_IO_write_ptr=p; _IO_write_end=ep; }
    void setg(char* eb, char* g, char *eg) {
      if (_flags  & 0x100 ) _IO_free_backup_area(this); 
      _IO_read_base = eb; _IO_read_ptr = g; _IO_read_end = eg; }
    char *shortbuf() { return _shortbuf; }
    int in_backup() { return _flags & 0x100 ; }
    char *Gbase() { return in_backup() ? _IO_save_base : _IO_read_base; }
    char *eGptr() { return in_backup() ? _IO_save_end : _IO_read_end; }
    char *Bbase() { return in_backup() ? _IO_read_base : _IO_save_base; }
    char *Bptr() { return _IO_backup_base; }
    char *eBptr() { return in_backup() ? _IO_read_end : _IO_save_end; }
    char *Nbase() { return _IO_save_base; }
    char *eNptr() { return _IO_save_end; }
    int have_backup() { return _IO_save_base != __null ; }
    int have_markers() { return _markers != __null ; }
    void free_backup_area();
    void unsave_markers();  
    int put_mode() { return _flags & 0x800 ; }
    int switch_to_get_mode();
    streambuf(int flags=0);
  public:
    static int flush_all();
    static void flush_all_linebuffered();  
    virtual ~streambuf();
    virtual int overflow(int c = (-1) );  
    virtual int underflow();  
    virtual int uflow();  
    virtual int pbackfail(int c);
    virtual streamsize xsputn(const char* s, streamsize n);
    virtual streamsize xsgetn(char* s, streamsize n);
    virtual streampos seekoff(streamoff, _seek_dir, int mode=ios::in|ios::out);
    virtual streampos seekpos(streampos pos, int mode = ios::in|ios::out);
    streampos pubseekoff(streamoff o, _seek_dir d, int mode=ios::in|ios::out)
      { return _IO_seekoff (this, o, d, mode); }
    streampos pubseekpos(streampos pos, int mode = ios::in|ios::out)
      { return _IO_seekpos (this, pos, mode); }
    streampos sseekoff(streamoff, _seek_dir, int mode=ios::in|ios::out);
    streampos sseekpos(streampos pos, int mode = ios::in|ios::out);
    virtual streambuf* setbuf(char* p, int len);
    virtual int sync();
    virtual int doallocate();
    int seekmark(streammarker& mark, int delta = 0);
    int sputbackc(char c);
    int sungetc();
    int unbuffered() { return _flags & 2  ? 1 : 0; }
    int linebuffered() { return _flags & 0x200  ? 1 : 0; }
    void unbuffered(int i)
	{ if (i) _flags |= 2 ; else _flags &= ~2 ; }
    void linebuffered(int i)
	{ if (i) _flags |= 0x200 ; else _flags &= ~0x200 ; }
    int allocate() {  
	if (base() || unbuffered()) return 0;
	else return doallocate(); }
    void allocbuf() { if (base() == __null ) doallocbuf(); }
    void doallocbuf();
    int in_avail() { return _IO_read_end - _IO_read_ptr; }
    int out_waiting() { return _IO_write_ptr - _IO_write_base; }
    streamsize sputn(const char* s, streamsize n) { return xsputn(s, n); }
    streamsize padn(char pad, streamsize n) { return _IO_padn(this, pad, n); }
    streamsize sgetn(char* s, streamsize n) { return _IO_sgetn(this, s, n); }
    int ignore(int);
    int get_column();
    int set_column(int);
    long sgetline(char* buf, _G_size_t  n, char delim, int putback_delim);
    int sputc(int c) { return _IO_putc(c, this); }
    int sbumpc() { return _IO_getc(this); }
    int sgetc() { return ((  this  )->_IO_read_ptr >= (  this  )->_IO_read_end && __underflow (  this  ) == (-1)  ? (-1)  : *(unsigned char *) (  this  )->_IO_read_ptr)  ; }
    int snextc() {
	if (_IO_read_ptr >= _IO_read_end && __underflow(this) == (-1) )
	  return (-1) ;
	else return _IO_read_ptr++, sgetc(); }
    void stossc() { if (_IO_read_ptr < _IO_read_end) _IO_read_ptr++; }
    int vscan(char const *fmt0, _G_va_list  ap, ios* stream = __null );
    int scan(char const *fmt0 ...);
    int vform(char const *fmt0, _G_va_list  ap);
    int form(char const *fmt0 ...);
    virtual streamsize sys_read(char* buf, streamsize size);
    virtual streamsize sys_write(const char*, streamsize);
    virtual streampos sys_seek(streamoff, _seek_dir);
    virtual int sys_close();
    virtual int sys_stat(void*);  
};
class filebuf : public streambuf {
  protected:
    void init();
  public:
    static const int openprot;  
    filebuf();
    filebuf(int fd);
    filebuf(int fd, char* p, int len);
    ~filebuf();
    filebuf* attach(int fd);
    filebuf* open(const char *filename, const char *mode);
    filebuf* open(const char *filename, ios::openmode mode, int prot = 0664);
    virtual int underflow();
    virtual int overflow(int c = (-1) );
    int is_open() const { return _fileno >= 0; }
    int fd() const { return is_open() ? _fileno : (-1) ; }
    filebuf* close();
    virtual int doallocate();
    virtual streampos seekoff(streamoff, _seek_dir, int mode=ios::in|ios::out);
    virtual streambuf* setbuf(char* p, int len);
    streamsize xsputn(const char* s, streamsize n);
    streamsize xsgetn(char* s, streamsize n);
    virtual int sync();
  protected:  
    int is_reading() { return eback() != egptr(); }
    char* cur_ptr() { return is_reading() ?  gptr() : pptr(); }
    char* file_ptr() { return eGptr(); }
    virtual streamsize sys_read(char* buf, streamsize size);
    virtual streampos sys_seek(streamoff, _seek_dir);
    virtual streamsize sys_write(const char*, streamsize);
    virtual int sys_stat(void*);  
    virtual int sys_close();
};
inline void ios::init(streambuf* sb, ostream* tie_to) {
		_state = sb ? ios::goodbit : ios::badbit; _exceptions=0;
		_strbuf=sb; _tie = tie_to; _width=0; _fill=' ';
		_flags=ios::skipws|ios::dec;
		_precision=6; _arrays = 0; }
inline ios::ios(streambuf* sb, ostream* tie_to) { init(sb, tie_to); }
inline ios::~ios() {
    if (_arrays) delete [] _arrays;
}
}  
extern "C++" {
class istream; class ostream;
typedef ios& (*__manip)(ios&);
typedef istream& (*__imanip)(istream&);
typedef ostream& (*__omanip)(ostream&);
extern istream& ws(istream& ins);
extern ostream& flush(ostream& outs);
extern ostream& endl(ostream& outs);
extern ostream& ends(ostream& outs);
class ostream : virtual public ios
{
    void do_osfx();
  public:
    ostream() { }
    ostream(streambuf* sb, ostream* tied= __null );
    int opfx() {
	if (!good()) return 0;
	else { if (_tie) _tie->flush();  ; return 1;} }
    void osfx() {  ;
		  if (flags() & (ios::unitbuf|ios::stdio))
		      do_osfx(); }
    ostream& flush();
    ostream& put(char c) { _strbuf->sputc(c); return *this; }
    ostream& put(unsigned char c) { return put((char)c); }
    ostream& put(signed char c) { return put((char)c); }
    ostream& write(const char *s, streamsize n);
    ostream& write(const unsigned char *s, streamsize n)
      { return write((const char*)s, n);}
    ostream& write(const signed char *s, streamsize n)
      { return write((const char*)s, n);}
    ostream& write(const void *s, streamsize n)
      { return write((const char*)s, n);}
    ostream& seekp(streampos);
    ostream& seekp(streamoff, _seek_dir);
    streampos tellp();
    ostream& form(const char *format ...);
    ostream& vform(const char *format, _G_va_list  args);
    ostream& operator<<(char c);
    ostream& operator<<(unsigned char c) { return (*this) << (char)c; }
    ostream& operator<<(signed char c) { return (*this) << (char)c; }
    ostream& operator<<(const char *s);
    ostream& operator<<(const unsigned char *s)
	{ return (*this) << (const char*)s; }
    ostream& operator<<(const signed char *s)
	{ return (*this) << (const char*)s; }
    ostream& operator<<(const void *p);
    ostream& operator<<(int n);
    ostream& operator<<(unsigned int n);
    ostream& operator<<(long n);
    ostream& operator<<(unsigned long n);
    __extension__ ostream& operator<<(long long n);
    __extension__ ostream& operator<<(unsigned long long n);
    ostream& operator<<(short n) {return operator<<((int)n);}
    ostream& operator<<(unsigned short n) {return operator<<((unsigned int)n);}
    ostream& operator<<(bool b) { return operator<<((int)b); }
    ostream& operator<<(double n);
    ostream& operator<<(float n) { return operator<<((double)n); }
    ostream& operator<<(long double n) { return operator<<((double)n); }
    ostream& operator<<(__omanip func) { return (*func)(*this); }
    ostream& operator<<(__manip func) {(*func)(*this); return *this;}
    ostream& operator<<(streambuf*);
    streambuf* ostreambuf() const { return _strbuf; }
};
class istream : virtual public ios
{
protected:
    _G_size_t  _gcount;
    int _skip_ws();
  public:
    istream(): _gcount (0) { }
    istream(streambuf* sb, ostream*tied= __null );
    istream& get(char* ptr, int len, char delim = '\n');
    istream& get(unsigned char* ptr, int len, char delim = '\n')
	{ return get((char*)ptr, len, delim); }
    istream& get(char& c);
    istream& get(unsigned char& c) { return get((char&)c); }
    istream& getline(char* ptr, int len, char delim = '\n');
    istream& getline(unsigned char* ptr, int len, char delim = '\n')
	{ return getline((char*)ptr, len, delim); }
    istream& get(signed char& c)  { return get((char&)c); }
    istream& get(signed char* ptr, int len, char delim = '\n')
	{ return get((char*)ptr, len, delim); }
    istream& getline(signed char* ptr, int len, char delim = '\n')
	{ return getline((char*)ptr, len, delim); }
    istream& read(char *ptr, streamsize n);
    istream& read(unsigned char *ptr, streamsize n)
      { return read((char*)ptr, n); }
    istream& read(signed char *ptr, streamsize n)
      { return read((char*)ptr, n); }
    istream& read(void *ptr, streamsize n)
      { return read((char*)ptr, n); }
    istream& get(streambuf& sb, char delim = '\n');
    istream& gets(char **s, char delim = '\n');
    int ipfx(int need = 0) {
	if (!good()) { set(ios::failbit); return 0; }
	else {
	   ;
	  if (_tie && (need == 0 || rdbuf()->in_avail() < need)) _tie->flush();
	  if (!need && (flags() & ios::skipws)) return _skip_ws();
	  else return 1;
	}
    }
    int ipfx0() {  
	if (!good()) { set(ios::failbit); return 0; }
	else {
	   ;
	  if (_tie) _tie->flush();
	  if (flags() & ios::skipws) return _skip_ws();
	  else return 1;
	}
    }
    int ipfx1() {  
	if (!good()) { set(ios::failbit); return 0; }
	else {
	   ;
	  if (_tie && rdbuf()->in_avail() == 0) _tie->flush();
	  return 1;
	}
    }
    void isfx() {  ; }
    int get() { if (!ipfx1()) return (-1) ;
		else { int ch = _strbuf->sbumpc();
		       if (ch == (-1) ) set(ios::eofbit);
		       return ch;
		     } }
    int peek();
    _G_size_t  gcount() { return _gcount; }
    istream& ignore(int n=1, int delim = (-1) );
    int sync ();
    istream& seekg(streampos);
    istream& seekg(streamoff, _seek_dir);
    streampos tellg();
    istream& putback(char ch) {
	if (good() && _strbuf->sputbackc(ch) == (-1) ) clear(ios::badbit);
	return *this;}
    istream& unget() {
	if (good() && _strbuf->sungetc() == (-1) ) clear(ios::badbit);
	return *this;}
    istream& scan(const char *format ...);
    istream& vscan(const char *format, _G_va_list  args);
    istream& unget(char ch) { return putback(ch); }
    int skip(int i);
    streambuf* istreambuf() const { return _strbuf; }
    istream& operator>>(char*);
    istream& operator>>(unsigned char* p) { return operator>>((char*)p); }
    istream& operator>>(signed char*p) { return operator>>((char*)p); }
    istream& operator>>(char& c);
    istream& operator>>(unsigned char& c) {return operator>>((char&)c);}
    istream& operator>>(signed char& c) {return operator>>((char&)c);}
    istream& operator>>(int&);
    istream& operator>>(long&);
    __extension__ istream& operator>>(long long&);
    __extension__ istream& operator>>(unsigned long long&);
    istream& operator>>(short&);
    istream& operator>>(unsigned int&);
    istream& operator>>(unsigned long&);
    istream& operator>>(unsigned short&);
    istream& operator>>(bool&);
    istream& operator>>(float&);
    istream& operator>>(double&);
    istream& operator>>(long double&);
    istream& operator>>( __manip func) {(*func)(*this); return *this;}
    istream& operator>>(__imanip func) { return (*func)(*this); }
    istream& operator>>(streambuf*);
};
class iostream : public istream, public ostream
{
  public:
    iostream() { }
    iostream(streambuf* sb, ostream*tied= __null );
};
class _IO_istream_withassign : public istream {
public:
  _IO_istream_withassign& operator=(istream&);
  _IO_istream_withassign& operator=(_IO_istream_withassign& rhs)
    { return operator= (static_cast<istream&> (rhs)); }
};
class _IO_ostream_withassign : public ostream {
public:
  _IO_ostream_withassign& operator=(ostream&);
  _IO_ostream_withassign& operator=(_IO_ostream_withassign& rhs)
    { return operator= (static_cast<ostream&> (rhs)); }
};
extern _IO_istream_withassign cin;
extern _IO_ostream_withassign cout, cerr;
extern _IO_ostream_withassign clog
;
extern istream& lock(istream& ins);
extern istream& unlock(istream& ins);
extern ostream& lock(ostream& outs);
extern ostream& unlock(ostream& outs);
struct Iostream_init { } ;   
inline ios& dec(ios& i)
{ i.setf(ios::dec, ios::dec|ios::hex|ios::oct); return i; }
inline ios& hex(ios& i)
{ i.setf(ios::hex, ios::dec|ios::hex|ios::oct); return i; }
inline ios& oct(ios& i)
{ i.setf(ios::oct, ios::dec|ios::hex|ios::oct); return i; }
}  
extern "C++" {
class fstreambase : virtual public ios {
    mutable filebuf __my_fb;  
    void __fb_init ();
  public:
    fstreambase();
    fstreambase(int fd);
    fstreambase(int fd, char *p, int l);  
    fstreambase(const char *name, int mode, int prot=0664);
    void close();
    filebuf* rdbuf() const { return &__my_fb; }
    void open(const char *name, int mode, int prot=0664);
    int is_open() const { return rdbuf()->is_open(); }
    void setbuf(char *ptr, int len) { rdbuf()->setbuf(ptr, len); }
    void attach(int fd);
    int filedesc() { return rdbuf()->fd(); }
    fstreambase& raw() { rdbuf()->setbuf(__null , 0); return *this; }
};
class ifstream : public fstreambase, public istream {
  public:
    ifstream() : fstreambase() { }
    ifstream(int fd) : fstreambase(fd) { }
    ifstream(int fd, char *p, int l) : fstreambase(fd, p, l) { }  
    ifstream(const char *name, int mode=ios::in, int prot=0664)
	: fstreambase(name, mode, prot) { }
    void open(const char *name, int mode=ios::in, int prot=0664)
	{ fstreambase::open(name, mode, prot); }
};
class ofstream : public fstreambase, public ostream {
  public:
    ofstream() : fstreambase() { }
    ofstream(int fd) : fstreambase(fd) { }
    ofstream(int fd, char *p, int l) : fstreambase(fd, p, l) { }  
    ofstream(const char *name, int mode=ios::out, int prot=0664)
	: fstreambase(name, mode, prot) { }
    void open(const char *name, int mode=ios::out, int prot=0664)
	{ fstreambase::open(name, mode, prot); }
};
class fstream : public fstreambase, public iostream {
  public:
    fstream() : fstreambase() { }
    fstream(int fd) : fstreambase(fd) { }
    fstream(const char *name, int mode, int prot=0664)
	: fstreambase(name, mode, prot) { }
    fstream(int fd, char *p, int l) : fstreambase(fd, p, l) { }  
    void open(const char *name, int mode, int prot=0664)
	{ fstreambase::open(name, mode, prot); }
};
}  
inline void
fstreambase::__fb_init()
{
  init (&__my_fb);
}
fstreambase::fstreambase()
{
  __fb_init ();
}
fstreambase::fstreambase(int fd)
{
  __fb_init ();
  _IO_file_attach(rdbuf(), fd);
}
fstreambase::fstreambase(const char *name, int mode, int prot)
{
  __fb_init ();
  if (!rdbuf()->open(name, mode, prot))
    set(ios::badbit);
}
fstreambase::fstreambase(int fd, char *p, int l)
{
  __fb_init ();
  _IO_file_attach(rdbuf(), fd);
  _IO_file_setbuf(rdbuf(), p, l);
}
void fstreambase::open(const char *name, int mode, int prot)
{
    clear();
    if (!rdbuf()->open(name, mode, prot))
	set(ios::badbit);
}
void fstreambase::close()
{
    if (!rdbuf()->close())
	set(ios::failbit);
}
void fstreambase::attach(int fd)
{
  if (!rdbuf()->attach(fd))
    set(ios::failbit);
}



More information about the Gcc-bugs mailing list