old-autovect-branch/libstdc++-v3/testsuite/27_io/basic_stringbuf/sungetc/char/1.cc

   1 // 981208 bkoz test functionality of basic_stringbuf for char_type == char
   2
   3 // Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004
   4 // Free Software Foundation, Inc.
   5 //
   6 // This file is part of the GNU ISO C++ Library.  This library is free
   7 // software; you can redistribute it and/or modify it under the
   8 // terms of the GNU General Public License as published by the
   9 // Free Software Foundation; either version 2, or (at your option)
  10 // any later version.
  11
  12 // This library is distributed in the hope that it will be useful,
  13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 // GNU General Public License for more details.
  16
  17 // You should have received a copy of the GNU General Public License along
  18 // with this library; see the file COPYING.  If not, write to the Free
  19 // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
  20 // USA.
  21
  22 #include <sstream>
  23 #include <testsuite_hooks.h>
  24
  25 std::string str_01("mykonos. . . or what?");
  26 std::string str_02("paris, or sainte-maxime?");
  27 std::string str_03;
  28 std::stringbuf strb_01(str_01);
  29 std::stringbuf strb_02(str_02, std::ios_base::in);
  30 std::stringbuf strb_03(str_03, std::ios_base::out);
  31
  32 // test overloaded virtual functions
  33 void test04()
  34 {
  35   bool test __attribute__((unused)) = true;
  36   std::string           str_tmp;
  37   std::streamsize               strmsz_1, strmsz_2;
  38   typedef std::stringbuf::int_type int_type;
  39   typedef std::stringbuf::traits_type traits_type;
  40
  41   int_type c1 = strb_01.sbumpc();
  42   int_type c2 = strb_02.sbumpc();
  43   int_type c3 = strb_01.sbumpc();
  44   int_type c4 = strb_02.sbumpc();
  45
  46   // PUT
  47   strb_03.str(str_01); //reset
  48   std::string::size_type sz1 = strb_03.str().length();
  49   std::string::size_type sz2 = strb_03.str().length();
  50
  51   // streamsize sputn(const char_typs* s, streamsize n)
  52   // write up to n chars to out_cur from s, returning number assigned
  53   // NB *sputn will happily put '\0' into your stream if you give it a chance*
  54   str_tmp = strb_03.str();
  55   sz1 = str_tmp.length();
  56   strmsz_1 = strb_03.sputn("racadabras", 10);//"abracadabras or what?"
  57   sz2 = strb_03.str().length();
  58   strmsz_2 = strb_03.sputn(", i wanna reach out and", 10);
  59   sz2 = strb_03.str().length();
  60   str_tmp = strb_02.str();
  61   strmsz_1 = strb_02.sputn("racadabra", 10);
  62
  63   // PUTBACK
  64
  65   // int_type sputbackc(char_type c)
  66   // if in_cur not avail || ! traits::eq(c, gptr() [-1]), return pbfail
  67   // otherwise decrements in_cur and returns *gptr()
  68   strmsz_1 = strb_01.in_avail();
  69   str_tmp = strb_01.str();
  70   c1 = strb_01.sgetc(); //"mykonos. . . 'o'r what?"
  71   c2 = strb_01.sputbackc('z');//"mykonos. . .zor what?"
  72   c3 = strb_01.sgetc();
  73   //test for _in_cur == _in_beg
  74   strb_01.str(str_tmp);
  75   strmsz_1 = strb_01.in_avail();
  76   c1 = strb_01.sgetc(); //"'m'ykonos. . . or what?"
  77   c2 = strb_01.sputbackc('z');//"mykonos. . . or what?"
  78   c3 = strb_01.sgetc();
  79   // test for replacing char with identical one
  80   strb_01.str(str_01); //reset
  81   strmsz_1 = strb_01.in_avail();
  82   strb_01.sbumpc();
  83   strb_01.sbumpc();
  84   c1 = strb_01.sgetc(); //"my'k'onos. . . or what?"
  85   c2 = strb_01.sputbackc('y');//"mykonos. . . or what?"
  86   c3 = strb_01.sgetc();
  87   //test for ios_base::out
  88   strmsz_2 = strb_03.in_avail();
  89   c4 = strb_03.sputbackc('x');
  90
  91   // int_type sungetc()
  92   // if in_cur not avail, return pbackfail(), else decrement and
  93   // return to_int_type(*gptr())
  94   for (int i = 0; i<12; ++i)
  95     strb_01.sbumpc();
  96   strmsz_1 = strb_01.in_avail();
  97   str_tmp = strb_01.str();
  98   c1 = strb_01.sgetc(); //"mykonos. . . 'o'r what?"
  99   c2 = strb_01.sungetc();//"mykonos. . . or what?"
 100   c3 = strb_01.sgetc();
 101   VERIFY( c1 != c2 );
 102   VERIFY( c3 == c2 );
 103   VERIFY( c1 != c3 );
 104   VERIFY( c2 == ' ' );
 105   VERIFY( strb_01.str() == str_01 );
 106   VERIFY( str_01.size() == strb_01.str().size() );
 107   //test for _in_cur == _in_beg
 108   strb_01.str(str_tmp);
 109   strmsz_1 = strb_01.in_avail();
 110   c1 = strb_01.sgetc(); //"'m'ykonos. . . or what?"
 111   c2 = strb_01.sungetc();//"mykonos. . . or what?"
 112   c3 = strb_01.sgetc();
 113   VERIFY( c1 != c2 );
 114   VERIFY( c3 != c2 );
 115   VERIFY( c1 == c3 );
 116   VERIFY( c2 == traits_type::eof() );
 117   VERIFY( strb_01.str() == str_01 );
 118   VERIFY( str_01.size() == strb_01.str().size() );
 119   // test for replacing char with identical one
 120   strb_01.str(str_01); //reset
 121   strmsz_1 = strb_01.in_avail();
 122   strb_01.sbumpc();
 123   strb_01.sbumpc();
 124   c1 = strb_01.sgetc(); //"my'k'onos. . . or what?"
 125   c2 = strb_01.sungetc();//"mykonos. . . or what?"
 126   c3 = strb_01.sgetc();
 127   VERIFY( c1 != c2 );
 128   VERIFY( c3 == c2 );
 129   VERIFY( c1 != c3 );
 130   VERIFY( strb_01.str() == str_01 );
 131   VERIFY( str_01.size() == strb_01.str().size() );
 132   //test for ios_base::out
 133   strmsz_2 = strb_03.in_avail();
 134   c4 = strb_03.sungetc();
 135   VERIFY( c4 == traits_type::eof() );
 136 }
 137
 138 int main()
 139 {
 140   test04();
 141   return 0;
 142 }
 143
 144
 145
 146 // more candy!!!