#ifndef __STRSTREAM_H
#define __STRSTREAM_H

/*-------------------------------------------------------------------*/
/* Copyright (c) 1993-1996        by SAS Institute Inc., Cary NC     */
/*                                                                   */
/* NAME:       strstream.h                                           */
/* AUTHOR:     Gavin Koch - IBM 370 C Compiler department            */
/* DATE:                                                             */
/* SUPPORT:    sasgak - IBM 370 C Compiler department                */
/* PRODUCT:    C++ Library                                           */
/* LANGUAGE:   C++                                                   */
/* MACHINE:    all                                                   */
/* PURPOSE:                                                          */
/*                                                                   */
/* HISTORY:    action                                   date   name  */
/*             spilt iobase.h out of iostream.h       96/03/27  gak  */
/*             Added __alignmem to each class def.    94/03/16  led  */
/*             Added #ifndef's around each #include   93/07/02  hlc  */
/*             Added this description header.         93/03/18  gww  */
/*             Changed __alignmem to #define          94/10/04  gak  */
/* NOTES:                                                            */
/* ALGORITHM:                                                        */
/* END                                                               */
/*-------------------------------------------------------------------*/

#ifndef __IOBASE_H
#include <iobase.h>
#endif

// class strstreambuf
//     is created to allow reading and writing to and from
//    strings in memory.

/* All include's for this file must happen before here. */

#ifdef __I370__
#define __SASCXXLIB_CLASS_DEF_KEYS __alignmem
#else
#define __SASCXXLIB_CLASS_DEF_KEYS 
#endif 

__SASCXXLIB_CLASS_DEF_KEYS class strstreambuf : public streambuf {
    public:
      strstreambuf() { _dynamic_init(); }

      strstreambuf( int _i )
          {
          _dynamic_init();
          setbuf( 0, _i );
          }

      strstreambuf( void* (*_a)(long), void (*_f)(void*) )
          {
          _dynamic_init();
          _alloc_func = _a;
          _free_func = _f;
          }

      strstreambuf( char* _b, int _s, char* _pstart = 0 )
          {
          _fixed_init( _b, _s, _pstart );
          }

     ~strstreambuf();

      void  freeze( int _n = 1 ) { _frozen = (char)_n; }
      char* str() { freeze(); return base(); }
      int pcount()
        { return (base() == NULL ? 0 : pptr() - base()); }


      virtual int  sync() { return 0; }
      virtual streampos seekoff(streamoff, ios::seek_dir,
                                int =ios::in|ios::out);
      virtual streampos seekpos(streampos, int =ios::in|ios::out);

      streambuf* setbuf( char* , size_t _i )
          {
          _upsize = ( _i <= 0) ? 512 : _i;
          return this;
          }

    private:
      virtual int        underflow();
      virtual int        overflow(int c=EOF);

    private:
      unsigned int _upsize;
      char _unlimited;
      char _frozen;
      char _dynamic;

      void _dynamic_init();
      void _fixed_init( char*, int size, char* );
      void* (*_alloc_func)(long);
      void (*_free_func)(void*);
    };


__SASCXXLIB_CLASS_DEF_KEYS class istrstream : public istream {
    public:
      istrstream( char* _p ) : ios( &buffer ), buffer( _p, 0, 0 ) {}
      istrstream( char* _p, int _l )
          : ios( &buffer ), buffer( _p, _l, 0 ) {}

     ~istrstream() {}
      strstreambuf* rdbuf() { return &buffer; }

    private:
      strstreambuf buffer;
    };

__SASCXXLIB_CLASS_DEF_KEYS class ostrstream : public ostream {
    public:
      ostrstream( char* _p, int _l, int _mode = ios::out )
          : ios( &buffer ),
            buffer( _p, _l,
                    ( _mode & (ios::ate|ios::app) )
                        ? _p + strlen( _p ) : _p )
                {}

      ostrstream() : ios( &buffer ) {}
     ~ostrstream() {}

      strstreambuf* rdbuf() { return &buffer; }

      char* str() { return buffer.str(); }
      int   pcount() { return buffer.pcount(); }

    private:
      strstreambuf buffer;
    };

__SASCXXLIB_CLASS_DEF_KEYS class strstream : public iostream {
    public:
      strstream( char* _p, int _l, int _mode )
          : ios( &buffer ),
            buffer( _p, _l,
                    ( _mode & (ios::ate|ios::app) )
                        ? _p + strlen( _p ) : _p )
                {}

      strstream() : ios( &buffer ) {}
     ~strstream() {}

      strstreambuf* rdbuf() { return &buffer; }

      char* str() { return buffer.str(); }
      int   pcount() { return buffer.pcount(); }

    private:
      strstreambuf buffer;
    };

#undef __SASCXXLIB_CLASS_DEF_KEYS

#endif /* __STRSTREAM_H */