1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/stdcpp/src/stdio_streambuf.cpp Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,248 @@
1.4 +/*
1.5 + * © Portions copyright (c) 2006-2007 Nokia Corporation. All rights reserved.
1.6 + *
1.7 + * Copyright (c) 1999
1.8 + * Silicon Graphics Computer Systems, Inc.
1.9 + *
1.10 + * Copyright (c) 1999
1.11 + * Boris Fomitchev
1.12 + *
1.13 + * This material is provided "as is", with absolutely no warranty expressed
1.14 + * or implied. Any use is at your own risk.
1.15 + *
1.16 + * Permission to use or copy this software for any purpose is hereby granted
1.17 + * without fee, provided the above notices are retained on all copies.
1.18 + * Permission to modify the code and to distribute modified code is granted,
1.19 + * provided the above notices are retained, and a notice that the code was
1.20 + * modified is included with the above copyright notice.
1.21 + *
1.22 + */
1.23 +# include "stlport_prefix.h"
1.24 +#include <stdio_streambuf>
1.25 +
1.26 +#ifdef _STLP_UNIX
1.27 +#include <sys/types.h>
1.28 +#include <sys/stat.h>
1.29 +#endif /* __unix */
1.30 +
1.31 +#include <stl/_fstream.h>
1.32 +#include "fstream_impl.h"
1.33 +
1.34 +# if defined (_STLP_USE_WIN32_IO) && !defined(_STLP_WINCE)
1.35 +# if defined (__BORLANDC__)
1.36 +// # include <cio.h>
1.37 +# include <cfcntl.h>
1.38 +# else
1.39 +# include <io.h>
1.40 +# include <fcntl.h>
1.41 +# endif
1.42 +
1.43 +# include <sys/stat.h>
1.44 +# endif
1.45 +
1.46 +__SGI_BEGIN_NAMESPACE
1.47 +//----------------------------------------------------------------------
1.48 +// Class stdio_streambuf_base
1.49 +
1.50 +stdio_streambuf_base::stdio_streambuf_base(FILE* file)
1.51 + : _STLP_STD::basic_streambuf<char, _STLP_STD::char_traits<char> >(file, 0),
1.52 + _M_file(file)
1.53 +{}
1.54 +
1.55 +stdio_streambuf_base::~stdio_streambuf_base()
1.56 +{
1.57 + _STLP_VENDOR_CSTD::fflush(_M_file);
1.58 +}
1.59 +
1.60 +_STLP_STD::streambuf* stdio_streambuf_base::setbuf(char* s, streamsize n)
1.61 +{
1.62 + _STLP_VENDOR_CSTD::setvbuf(_M_file, s, (s == 0 && n == 0) ? _IONBF : _IOFBF, n);
1.63 + return this;
1.64 +}
1.65 +
1.66 +stdio_streambuf_base::pos_type
1.67 +stdio_streambuf_base::seekoff(off_type off, ios_base::seekdir dir,
1.68 + ios_base::openmode /* mode */)
1.69 +{
1.70 + int whence;
1.71 + switch(dir) {
1.72 + case ios_base::beg:
1.73 + whence = SEEK_SET;
1.74 + break;
1.75 + case ios_base::cur:
1.76 + whence = SEEK_CUR;
1.77 + break;
1.78 + case ios_base::end:
1.79 + whence = SEEK_END;
1.80 + break;
1.81 + default:
1.82 + return pos_type(-1);
1.83 + }
1.84 +
1.85 + if (_STLP_VENDOR_CSTD::fseek(_M_file, off, whence) == 0) {
1.86 + fpos_t pos;
1.87 + _STLP_VENDOR_CSTD::fgetpos(_M_file, &pos);
1.88 + // added 21 june 00 mdb,rjf,wjs: glibc 2.2 changed fpos_t to be a struct instead
1.89 + // of a primitive type
1.90 +#if (defined(__GLIBC__) && ( (__GLIBC__ > 2) || ( (__GLIBC__ == 2) && (__GLIBC_MINOR__ >= 2) ) ) )
1.91 + return pos_type((streamoff)pos.__pos);
1.92 +#elif defined(__ISCPP__) || defined(__MVS__) || (__OS400__)
1.93 + return pos_type(pos.__fpos_elem[ 0 ]);
1.94 +#elif defined (__EMX__)
1.95 + return pos_type((streamoff)pos._pos);
1.96 +#else
1.97 + return pos_type(pos);
1.98 +#endif
1.99 + }
1.100 + else
1.101 + return pos_type(-1);
1.102 +}
1.103 +
1.104 +
1.105 +stdio_streambuf_base::pos_type
1.106 +stdio_streambuf_base::seekpos(pos_type pos, ios_base::openmode /* mode */) // dwa 4/27/00 - suppress unused parameter warning
1.107 +{
1.108 +
1.109 + // added 21 june 00 mdb,rjf,wjs: glibc 2.2 changed fpos_t to be a struct instead
1.110 + // of a primitive type
1.111 +#if (defined(__GLIBC__) && ( (__GLIBC__ > 2) || ( (__GLIBC__ == 2) && (__GLIBC_MINOR__ >= 2) ) ) )
1.112 + fpos_t p;
1.113 + p.__pos = pos;
1.114 + memset( &(p.__state), 0, sizeof(p.__state) );
1.115 +#elif defined(__MVS__) || (__OS400__)
1.116 + fpos_t p;
1.117 + p.__fpos_elem[0] = pos;
1.118 +#elif defined(__EMX__)
1.119 + fpos_t p;
1.120 + p._pos = pos;
1.121 + memset( &(p._mbstate), 0, sizeof(p._mbstate) );
1.122 +#else
1.123 + fpos_t p(pos);
1.124 +#endif
1.125 +
1.126 + if (_STLP_VENDOR_CSTD::fsetpos(_M_file, &p) == 0)
1.127 + return pos;
1.128 + else
1.129 + return pos_type(-1);
1.130 +}
1.131 +
1.132 +int stdio_streambuf_base::sync()
1.133 +{
1.134 + return _STLP_VENDOR_CSTD::fflush(_M_file) == 0 ? 0 : -1;
1.135 +}
1.136 +
1.137 +//----------------------------------------------------------------------
1.138 +// Class stdio_istreambuf
1.139 +
1.140 +stdio_istreambuf::~stdio_istreambuf() {}
1.141 +
1.142 +_STLP_EXP_DECLSPEC streamsize stdio_istreambuf::showmanyc()
1.143 +{
1.144 + if (feof(_M_file))
1.145 + return -1;
1.146 + else {
1.147 + int fd = _FILE_fd(_M_file);
1.148 +# ifdef _STLP_USE_WIN32_IO
1.149 + // in this case, __file_size works with Win32 fh , not libc one
1.150 + streamoff size;
1.151 + struct stat buf;
1.152 +# ifdef __BORLANDC__
1.153 + if(fstat(fd, &buf) == 0 && S_ISREG( buf.st_mode ) )
1.154 +# else
1.155 + if(fstat(fd, &buf) == 0 && ( _S_IFREG & buf.st_mode ) )
1.156 +# endif
1.157 + size = ( buf.st_size > 0 ? buf.st_size : 0);
1.158 + else
1.159 + size = 0;
1.160 +# else
1.161 + streamoff size = _SgI::__file_size(fd);
1.162 +# endif
1.163 + // fbp : we can use ftell as this flavour always use stdio.
1.164 + long pos = _STLP_VENDOR_CSTD::ftell(_M_file);
1.165 + return pos >= 0 && size > pos ? size - pos : 0;
1.166 + }
1.167 +}
1.168 +
1.169 +stdio_istreambuf::int_type stdio_istreambuf::underflow()
1.170 +{
1.171 + int c = getc(_M_file);
1.172 + if (c != EOF) {
1.173 + _STLP_VENDOR_CSTD::ungetc(c, _M_file);
1.174 + return c;
1.175 + }
1.176 + else
1.177 + return traits_type::eof();
1.178 +}
1.179 +
1.180 +stdio_istreambuf::int_type stdio_istreambuf::uflow()
1.181 +{
1.182 +#ifdef __SYMBIAN32__
1.183 + const int_type eof = traits_type::eof();
1.184 + return this->underflow() == eof
1.185 + ? eof
1.186 + : traits_type::to_int_type(_FILE_I_postincr(_M_file));
1.187 +#else
1.188 + int c = getc(_M_file);
1.189 + return c != EOF ? c : traits_type::eof();
1.190 +#endif
1.191 +}
1.192 +
1.193 +stdio_istreambuf::int_type stdio_istreambuf::pbackfail(int_type c)
1.194 +{
1.195 + if (c != traits_type::eof()) {
1.196 + int result = _STLP_VENDOR_CSTD::ungetc(c, _M_file);
1.197 + return result != EOF ? result : traits_type::eof();
1.198 + }
1.199 + else{
1.200 + if (this->eback() < this->gptr()) {
1.201 + this->gbump(-1);
1.202 + return traits_type::not_eof(c);
1.203 + }
1.204 + else
1.205 + return traits_type::eof();
1.206 + }
1.207 +}
1.208 +
1.209 +//----------------------------------------------------------------------
1.210 +// Class stdio_ostreambuf
1.211 +
1.212 +stdio_ostreambuf::~stdio_ostreambuf() {}
1.213 +
1.214 +_STLP_EXP_DECLSPEC streamsize stdio_ostreambuf::showmanyc()
1.215 +{
1.216 + return -1;
1.217 +}
1.218 +
1.219 +stdio_ostreambuf::int_type stdio_ostreambuf::overflow(int_type c)
1.220 +{
1.221 + // Write the existing buffer, without writing any additional character.
1.222 + if (c == traits_type::eof()) {
1.223 + // Do we have a buffer to write?
1.224 + ptrdiff_t unwritten = this->pptr() - this->pbase();
1.225 + if (unwritten != 0) {
1.226 + _STLP_VENDOR_CSTD::fflush(_M_file);
1.227 + // Test if the write succeeded.
1.228 + if (this->pptr() - this->pbase() < unwritten)
1.229 + return traits_type::not_eof(c);
1.230 + else
1.231 + return traits_type::eof();
1.232 + }
1.233 +
1.234 + // We always succeed if we don't have to do anything.
1.235 + else
1.236 + return traits_type::not_eof(c);
1.237 + }
1.238 +
1.239 + // Write the character c, and whatever else might be in the buffer.
1.240 + else {
1.241 + int result = putc(c, _M_file);
1.242 + return result != EOF ? result : traits_type::eof();
1.243 + }
1.244 +}
1.245 +
1.246 +__SGI_END_NAMESPACE
1.247 +
1.248 +// Local Variables:
1.249 +// mode:C++
1.250 +// End:
1.251 +