--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/stdcpp/src/stdio_streambuf.cpp Tue Feb 02 02:01:42 2010 +0200
@@ -0,0 +1,248 @@
+/*
+ * © Portions copyright (c) 2006-2007 Nokia Corporation. All rights reserved.
+ *
+ * Copyright (c) 1999
+ * Silicon Graphics Computer Systems, Inc.
+ *
+ * Copyright (c) 1999
+ * Boris Fomitchev
+ *
+ * This material is provided "as is", with absolutely no warranty expressed
+ * or implied. Any use is at your own risk.
+ *
+ * Permission to use or copy this software for any purpose is hereby granted
+ * without fee, provided the above notices are retained on all copies.
+ * Permission to modify the code and to distribute modified code is granted,
+ * provided the above notices are retained, and a notice that the code was
+ * modified is included with the above copyright notice.
+ *
+ */
+# include "stlport_prefix.h"
+#include <stdio_streambuf>
+
+#ifdef _STLP_UNIX
+#include <sys/types.h>
+#include <sys/stat.h>
+#endif /* __unix */
+
+#include <stl/_fstream.h>
+#include "fstream_impl.h"
+
+# if defined (_STLP_USE_WIN32_IO) && !defined(_STLP_WINCE)
+# if defined (__BORLANDC__)
+// # include <cio.h>
+# include <cfcntl.h>
+# else
+# include <io.h>
+# include <fcntl.h>
+# endif
+
+# include <sys/stat.h>
+# endif
+
+__SGI_BEGIN_NAMESPACE
+//----------------------------------------------------------------------
+// Class stdio_streambuf_base
+
+stdio_streambuf_base::stdio_streambuf_base(FILE* file)
+ : _STLP_STD::basic_streambuf<char, _STLP_STD::char_traits<char> >(file, 0),
+ _M_file(file)
+{}
+
+stdio_streambuf_base::~stdio_streambuf_base()
+{
+ _STLP_VENDOR_CSTD::fflush(_M_file);
+}
+
+_STLP_STD::streambuf* stdio_streambuf_base::setbuf(char* s, streamsize n)
+{
+ _STLP_VENDOR_CSTD::setvbuf(_M_file, s, (s == 0 && n == 0) ? _IONBF : _IOFBF, n);
+ return this;
+}
+
+stdio_streambuf_base::pos_type
+stdio_streambuf_base::seekoff(off_type off, ios_base::seekdir dir,
+ ios_base::openmode /* mode */)
+{
+ int whence;
+ switch(dir) {
+ case ios_base::beg:
+ whence = SEEK_SET;
+ break;
+ case ios_base::cur:
+ whence = SEEK_CUR;
+ break;
+ case ios_base::end:
+ whence = SEEK_END;
+ break;
+ default:
+ return pos_type(-1);
+ }
+
+ if (_STLP_VENDOR_CSTD::fseek(_M_file, off, whence) == 0) {
+ fpos_t pos;
+ _STLP_VENDOR_CSTD::fgetpos(_M_file, &pos);
+ // added 21 june 00 mdb,rjf,wjs: glibc 2.2 changed fpos_t to be a struct instead
+ // of a primitive type
+#if (defined(__GLIBC__) && ( (__GLIBC__ > 2) || ( (__GLIBC__ == 2) && (__GLIBC_MINOR__ >= 2) ) ) )
+ return pos_type((streamoff)pos.__pos);
+#elif defined(__ISCPP__) || defined(__MVS__) || (__OS400__)
+ return pos_type(pos.__fpos_elem[ 0 ]);
+#elif defined (__EMX__)
+ return pos_type((streamoff)pos._pos);
+#else
+ return pos_type(pos);
+#endif
+ }
+ else
+ return pos_type(-1);
+}
+
+
+stdio_streambuf_base::pos_type
+stdio_streambuf_base::seekpos(pos_type pos, ios_base::openmode /* mode */) // dwa 4/27/00 - suppress unused parameter warning
+{
+
+ // added 21 june 00 mdb,rjf,wjs: glibc 2.2 changed fpos_t to be a struct instead
+ // of a primitive type
+#if (defined(__GLIBC__) && ( (__GLIBC__ > 2) || ( (__GLIBC__ == 2) && (__GLIBC_MINOR__ >= 2) ) ) )
+ fpos_t p;
+ p.__pos = pos;
+ memset( &(p.__state), 0, sizeof(p.__state) );
+#elif defined(__MVS__) || (__OS400__)
+ fpos_t p;
+ p.__fpos_elem[0] = pos;
+#elif defined(__EMX__)
+ fpos_t p;
+ p._pos = pos;
+ memset( &(p._mbstate), 0, sizeof(p._mbstate) );
+#else
+ fpos_t p(pos);
+#endif
+
+ if (_STLP_VENDOR_CSTD::fsetpos(_M_file, &p) == 0)
+ return pos;
+ else
+ return pos_type(-1);
+}
+
+int stdio_streambuf_base::sync()
+{
+ return _STLP_VENDOR_CSTD::fflush(_M_file) == 0 ? 0 : -1;
+}
+
+//----------------------------------------------------------------------
+// Class stdio_istreambuf
+
+stdio_istreambuf::~stdio_istreambuf() {}
+
+_STLP_EXP_DECLSPEC streamsize stdio_istreambuf::showmanyc()
+{
+ if (feof(_M_file))
+ return -1;
+ else {
+ int fd = _FILE_fd(_M_file);
+# ifdef _STLP_USE_WIN32_IO
+ // in this case, __file_size works with Win32 fh , not libc one
+ streamoff size;
+ struct stat buf;
+# ifdef __BORLANDC__
+ if(fstat(fd, &buf) == 0 && S_ISREG( buf.st_mode ) )
+# else
+ if(fstat(fd, &buf) == 0 && ( _S_IFREG & buf.st_mode ) )
+# endif
+ size = ( buf.st_size > 0 ? buf.st_size : 0);
+ else
+ size = 0;
+# else
+ streamoff size = _SgI::__file_size(fd);
+# endif
+ // fbp : we can use ftell as this flavour always use stdio.
+ long pos = _STLP_VENDOR_CSTD::ftell(_M_file);
+ return pos >= 0 && size > pos ? size - pos : 0;
+ }
+}
+
+stdio_istreambuf::int_type stdio_istreambuf::underflow()
+{
+ int c = getc(_M_file);
+ if (c != EOF) {
+ _STLP_VENDOR_CSTD::ungetc(c, _M_file);
+ return c;
+ }
+ else
+ return traits_type::eof();
+}
+
+stdio_istreambuf::int_type stdio_istreambuf::uflow()
+{
+#ifdef __SYMBIAN32__
+ const int_type eof = traits_type::eof();
+ return this->underflow() == eof
+ ? eof
+ : traits_type::to_int_type(_FILE_I_postincr(_M_file));
+#else
+ int c = getc(_M_file);
+ return c != EOF ? c : traits_type::eof();
+#endif
+}
+
+stdio_istreambuf::int_type stdio_istreambuf::pbackfail(int_type c)
+{
+ if (c != traits_type::eof()) {
+ int result = _STLP_VENDOR_CSTD::ungetc(c, _M_file);
+ return result != EOF ? result : traits_type::eof();
+ }
+ else{
+ if (this->eback() < this->gptr()) {
+ this->gbump(-1);
+ return traits_type::not_eof(c);
+ }
+ else
+ return traits_type::eof();
+ }
+}
+
+//----------------------------------------------------------------------
+// Class stdio_ostreambuf
+
+stdio_ostreambuf::~stdio_ostreambuf() {}
+
+_STLP_EXP_DECLSPEC streamsize stdio_ostreambuf::showmanyc()
+{
+ return -1;
+}
+
+stdio_ostreambuf::int_type stdio_ostreambuf::overflow(int_type c)
+{
+ // Write the existing buffer, without writing any additional character.
+ if (c == traits_type::eof()) {
+ // Do we have a buffer to write?
+ ptrdiff_t unwritten = this->pptr() - this->pbase();
+ if (unwritten != 0) {
+ _STLP_VENDOR_CSTD::fflush(_M_file);
+ // Test if the write succeeded.
+ if (this->pptr() - this->pbase() < unwritten)
+ return traits_type::not_eof(c);
+ else
+ return traits_type::eof();
+ }
+
+ // We always succeed if we don't have to do anything.
+ else
+ return traits_type::not_eof(c);
+ }
+
+ // Write the character c, and whatever else might be in the buffer.
+ else {
+ int result = putc(c, _M_file);
+ return result != EOF ? result : traits_type::eof();
+ }
+}
+
+__SGI_END_NAMESPACE
+
+// Local Variables:
+// mode:C++
+// End:
+