ReactOS  0.4.14-dev-115-g4576127
_bitset.c
Go to the documentation of this file.
1 /*
2  * Copyright (c) 1998
3  * Silicon Graphics Computer Systems, Inc.
4  *
5  * Copyright (c) 1999
6  * Boris Fomitchev
7  *
8  * This material is provided "as is", with absolutely no warranty expressed
9  * or implied. Any use is at your own risk.
10  *
11  * Permission to use or copy this software for any purpose is hereby granted
12  * without fee, provided the above notices are retained on all copies.
13  * Permission to modify the code and to distribute modified code is granted,
14  * provided the above notices are retained, and a notice that the code was
15  * modified is included with the above copyright notice.
16  *
17  */
18 
19 #ifndef _STLP_BITSET_C
20 #define _STLP_BITSET_C
21 
22 #ifndef _STLP_BITSET_H
23 # include <stl/_bitset.h>
24 #endif
25 
26 #define __BITS_PER_WORD (CHAR_BIT * sizeof(unsigned long))
27 
29 
31 //
32 // Definitions of non-inline functions from _Base_bitset.
33 //
34 template<size_t _Nw>
36  if (__shift != 0) {
37  const size_t __wshift = __shift / __BITS_PER_WORD;
38  const size_t __offset = __shift % __BITS_PER_WORD;
39 
40  if (__offset == 0)
41  for (size_t __n = _Nw - 1; __n >= __wshift; --__n)
42  _M_w[__n] = _M_w[__n - __wshift];
43 
44  else {
45  const size_t __sub_offset = __BITS_PER_WORD - __offset;
46  for (size_t __n = _Nw - 1; __n > __wshift; --__n)
47  _M_w[__n] = (_M_w[__n - __wshift] << __offset) |
48  (_M_w[__n - __wshift - 1] >> __sub_offset);
49  _M_w[__wshift] = _M_w[0] << __offset;
50  }
51 
52  fill(_M_w + 0, _M_w + __wshift, __STATIC_CAST(_WordT,0));
53  }
54 }
55 
56 template<size_t _Nw>
58  if (__shift != 0) {
59  const size_t __wshift = __shift / __BITS_PER_WORD;
60  const size_t __offset = __shift % __BITS_PER_WORD;
61  const size_t __limit = _Nw - __wshift - 1;
62 
63  if (__offset == 0)
64  for (size_t __n = 0; __n <= __limit; ++__n)
65  _M_w[__n] = _M_w[__n + __wshift];
66 
67  else {
68  const size_t __sub_offset = __BITS_PER_WORD - __offset;
69  for (size_t __n = 0; __n < __limit; ++__n)
70  _M_w[__n] = (_M_w[__n + __wshift] >> __offset) |
71  (_M_w[__n + __wshift + 1] << __sub_offset);
72  _M_w[__limit] = _M_w[_Nw-1] >> __offset;
73  }
74 
75  fill(_M_w + __limit + 1, _M_w + _Nw, __STATIC_CAST(_WordT,0));
76  }
77 }
78 
79 template<size_t _Nw>
80 unsigned long _Base_bitset<_Nw>::_M_do_to_ulong() const {
81  for (size_t __i = 1; __i < _Nw; ++__i)
82  if (_M_w[__i])
84  return _M_w[0];
85 } // End _M_do_to_ulong
86 
87 template<size_t _Nw>
88 size_t _Base_bitset<_Nw>::_M_do_find_first(size_t __not_found) const {
89  for ( size_t __i = 0; __i < _Nw; __i++ ) {
90  _WordT __thisword = _M_w[__i];
91  if ( __thisword != __STATIC_CAST(_WordT,0) ) {
92  // find byte within word
93  for ( size_t __j = 0; __j < sizeof(_WordT); __j++ ) {
94  unsigned char __this_byte
95  = __STATIC_CAST(unsigned char,(__thisword & (~(unsigned char)0)));
96  if ( __this_byte )
97  return __i*__BITS_PER_WORD + __j*CHAR_BIT +
98  _Bs_G::_S_first_one(__this_byte);
99 
100  __thisword >>= CHAR_BIT;
101  }
102  }
103  }
104  // not found, so return an indication of failure.
105  return __not_found;
106 }
107 
108 template<size_t _Nw>
109 size_t
111  size_t __not_found) const {
112  // make bound inclusive
113  ++__prev;
114 
115  // check out of bounds
116  if ( __prev >= _Nw * __BITS_PER_WORD )
117  return __not_found;
118 
119  // search first word
120  size_t __i = _S_whichword(__prev);
121  _WordT __thisword = _M_w[__i];
122 
123  // mask off bits below bound
124  __thisword &= (~__STATIC_CAST(_WordT,0)) << _S_whichbit(__prev);
125 
126  if ( __thisword != __STATIC_CAST(_WordT,0) ) {
127  // find byte within word
128  // get first byte into place
129  __thisword >>= _S_whichbyte(__prev) * CHAR_BIT;
130  for ( size_t __j = _S_whichbyte(__prev); __j < sizeof(_WordT); ++__j ) {
131  unsigned char __this_byte
132  = __STATIC_CAST(unsigned char,(__thisword & (~(unsigned char)0)));
133  if ( __this_byte )
134  return __i*__BITS_PER_WORD + __j*CHAR_BIT +
135  _Bs_G::_S_first_one(__this_byte);
136 
137  __thisword >>= CHAR_BIT;
138  }
139  }
140 
141  // check subsequent words
142  ++__i;
143  for ( ; __i < _Nw; ++__i ) {
144  /* _WordT */ __thisword = _M_w[__i];
145  if ( __thisword != __STATIC_CAST(_WordT,0) ) {
146  // find byte within word
147  for ( size_t __j = 0; __j < sizeof(_WordT); ++__j ) {
148  unsigned char __this_byte
149  = __STATIC_CAST(unsigned char,(__thisword & (~(unsigned char)0)));
150  if ( __this_byte )
151  return __i*__BITS_PER_WORD + __j*CHAR_BIT +
152  _Bs_G::_S_first_one(__this_byte);
153 
154  __thisword >>= CHAR_BIT;
155  }
156  }
157  }
158 
159  // not found, so return an indication of failure.
160  return __not_found;
161 } // end _M_do_find_next
162 
164 
165 #if !defined (_STLP_NON_TYPE_TMPL_PARAM_BUG)
166 
167 # if !defined (_STLP_USE_NO_IOSTREAMS)
168 
170 
171 #ifndef _STLP_STRING_IO_H
172 # include <stl/_string_io.h> //includes _istream.h and _ostream.h
173 #endif
174 
176 
177 template <class _CharT, class _Traits, size_t _Nb>
181  __tmp.reserve(_Nb);
182 
183  // Skip whitespace
184  typename basic_istream<_CharT, _Traits>::sentry __sentry(__is);
185  if (__sentry) {
186  basic_streambuf<_CharT, _Traits>* __buf = __is.rdbuf();
187  for (size_t __i = 0; __i < _Nb; ++__i) {
188  static typename _Traits::int_type __eof = _Traits::eof();
189 
190  typename _Traits::int_type __c1 = __buf->sbumpc();
191  if (_Traits::eq_int_type(__c1, __eof)) {
192  __is.setstate(ios_base::eofbit);
193  break;
194  }
195  else {
196  typename _Traits::char_type __c2 = _Traits::to_char_type(__c1);
197  char __c = __is.narrow(__c2, '*');
198 
199  if (__c == '0' || __c == '1')
200  __tmp.push_back(__c);
201  else if (_Traits::eq_int_type(__buf->sputbackc(__c2), __eof)) {
202  __is.setstate(ios_base::failbit);
203  break;
204  }
205  }
206  }
207 
208  if (__tmp.empty())
209  __is.setstate(ios_base::failbit);
210  else
211  __x._M_copy_from_string(__tmp, __STATIC_CAST(size_t,0), _Nb);
212  }
213 
214  return __is;
215 }
216 
217 template <class _CharT, class _Traits, size_t _Nb>
220  const bitset<_Nb>& __x) {
222  __x._M_copy_to_string(__tmp);
223  return __os << __tmp;
224 }
225 
226 # endif /* !_STLP_USE_NO_IOSTREAMS */
227 
228 #endif /* _STLP_NON_TYPE_TMPL_PARAM_BUG */
229 
231 
232 #undef __BITS_PER_WORD
233 #undef bitset
234 
235 #endif /* _STLP_BITSET_C */
return __n
Definition: _algo.h:75
#define __BITS_PER_WORD
Definition: _bitset.c:26
basic_streambuf< _CharT, _Traits > * rdbuf() const
Definition: _ios.h:72
static unsigned char _S_first_one(unsigned char __x)
Definition: bitset.cpp:95
#define __STATIC_CAST(__x, __y)
Definition: features.h:585
#define CHAR_BIT
Definition: urlcache.c:57
_STLP_MOVE_TO_STD_NAMESPACE _STLP_END_NAMESPACE _STLP_BEGIN_NAMESPACE basic_istream< _CharT, _Traits > &_STLP_CALL operator>>(basic_istream< _CharT, _Traits > &__is, bitset< _Nb > &__x)
Definition: _bitset.c:179
#define __c
Definition: schilyio.h:209
#define _STLP_MOVE_TO_PRIV_NAMESPACE
Definition: features.h:524
char narrow(_CharT, char) const
Definition: _ios.h:145
void _M_do_right_shift(size_t __shift)
Definition: _bitset.c:57
int_type sbumpc()
Definition: _streambuf.h:227
void _M_copy_to_string(string &__s) const
Definition: _bitset.h:656
size_t _M_do_find_first(size_t __not_found) const
Definition: _bitset.c:88
bool empty() const
Definition: _string.h:428
#define _STLP_MOVE_TO_STD_NAMESPACE
Definition: features.h:525
_STLP_MOVE_TO_STD_NAMESPACE void fill(_ForwardIter __first, _ForwardIter __last, const _Tp &__val)
Definition: _algobase.h:449
void push_back(_CharT __c)
Definition: _string.h:534
size_t _M_do_find_next(size_t __prev, size_t __not_found) const
Definition: _bitset.c:110
unsigned long _WordT
Definition: _bitset.h:108
void setstate(iostate __state)
Definition: _ios.h:95
_STLP_THROW_FUNCT_SPEC _STLP_CALL __stl_throw_overflow_error(const char *__msg)
Definition: _range_errors.c:78
unsigned long _M_do_to_ulong() const
Definition: _bitset.c:80
_Check_return_ _CRTIMP int __cdecl __cdecl eof(_In_ int _FileHandle)
void _M_copy_from_string(const string &__s, size_t __pos, size_t __n)
Definition: _bitset.h:635
#define _STLP_END_NAMESPACE
Definition: features.h:503
int_type sputbackc(char_type __c)
Definition: _streambuf.h:241
#define _STLP_BEGIN_NAMESPACE
Definition: features.h:501
void reserve(size_type=0)
Definition: _string.c:158
basic_ostream< _CharT, _Traits > &_STLP_CALL operator<<(basic_ostream< _CharT, _Traits > &__os, const bitset< _Nb > &__x)
Definition: _bitset.c:219
#define _STLP_CALL
Definition: _bc.h:131
void _M_do_left_shift(size_t __shift)
Definition: _bitset.c:35