OSDN Git Service

c9fdb25317d38ea2d963d57873e960ad9b2b5be8
[pf3gnuchains/gcc-fork.git] / libstdc++-v3 / include / ext / rc_string_base.h
1 // Reference-counted versatile string base -*- C++ -*-
2
3 // Copyright (C) 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
4 //
5 // This file is part of the GNU ISO C++ Library.  This library is free
6 // software; you can redistribute it and/or modify it under the
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 3, or (at your option)
9 // any later version.
10
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 // GNU General Public License for more details.
15
16 // Under Section 7 of GPL version 3, you are granted additional
17 // permissions described in the GCC Runtime Library Exception, version
18 // 3.1, as published by the Free Software Foundation.
19
20 // You should have received a copy of the GNU General Public License and
21 // a copy of the GCC Runtime Library Exception along with this program;
22 // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
23 // <http://www.gnu.org/licenses/>.
24
25 /** @file ext/rc_string_base.h
26  *  This file is a GNU extension to the Standard C++ Library.
27  *  This is an internal header file, included by other library headers.
28  *  You should not attempt to use it directly.
29  */
30
31 #ifndef _RC_STRING_BASE_H
32 #define _RC_STRING_BASE_H 1
33
34 #include <ext/atomicity.h>
35 #include <bits/stl_iterator_base_funcs.h>
36
37 _GLIBCXX_BEGIN_NAMESPACE(__gnu_cxx)
38
39   /**
40    *  Documentation?  What's that?
41    *  Nathan Myers <ncm@cantrip.org>.
42    *
43    *  A string looks like this:
44    *
45    *  @code
46    *                                        [_Rep]
47    *                                        _M_length
48    *   [__rc_string_base<char_type>]        _M_capacity
49    *   _M_dataplus                          _M_refcount
50    *   _M_p ---------------->               unnamed array of char_type
51    *  @endcode
52    *
53    *  Where the _M_p points to the first character in the string, and
54    *  you cast it to a pointer-to-_Rep and subtract 1 to get a
55    *  pointer to the header.
56    *
57    *  This approach has the enormous advantage that a string object
58    *  requires only one allocation.  All the ugliness is confined
59    *  within a single pair of inline functions, which each compile to
60    *  a single "add" instruction: _Rep::_M_refdata(), and
61    *  __rc_string_base::_M_rep(); and the allocation function which gets a
62    *  block of raw bytes and with room enough and constructs a _Rep
63    *  object at the front.
64    *
65    *  The reason you want _M_data pointing to the character array and
66    *  not the _Rep is so that the debugger can see the string
67    *  contents. (Probably we should add a non-inline member to get
68    *  the _Rep for the debugger to use, so users can check the actual
69    *  string length.)
70    *
71    *  Note that the _Rep object is a POD so that you can have a
72    *  static "empty string" _Rep object already "constructed" before
73    *  static constructors have run.  The reference-count encoding is
74    *  chosen so that a 0 indicates one reference, so you never try to
75    *  destroy the empty-string _Rep object.
76    *
77    *  All but the last paragraph is considered pretty conventional
78    *  for a C++ string implementation.
79   */
80  template<typename _CharT, typename _Traits, typename _Alloc>
81     class __rc_string_base
82     : protected __vstring_utility<_CharT, _Traits, _Alloc>
83     {
84     public:
85       typedef _Traits                                       traits_type;
86       typedef typename _Traits::char_type                   value_type;
87       typedef _Alloc                                        allocator_type;
88
89       typedef __vstring_utility<_CharT, _Traits, _Alloc>    _Util_Base;
90       typedef typename _Util_Base::_CharT_alloc_type        _CharT_alloc_type;
91       typedef typename _CharT_alloc_type::size_type         size_type;
92
93     private:
94       // _Rep: string representation
95       //   Invariants:
96       //   1. String really contains _M_length + 1 characters: due to 21.3.4
97       //      must be kept null-terminated.
98       //   2. _M_capacity >= _M_length
99       //      Allocated memory is always (_M_capacity + 1) * sizeof(_CharT).
100       //   3. _M_refcount has three states:
101       //      -1: leaked, one reference, no ref-copies allowed, non-const.
102       //       0: one reference, non-const.
103       //     n>0: n + 1 references, operations require a lock, const.
104       //   4. All fields == 0 is an empty string, given the extra storage
105       //      beyond-the-end for a null terminator; thus, the shared
106       //      empty string representation needs no constructor.
107       struct _Rep
108       {
109         union
110         {
111           struct
112           {
113             size_type       _M_length;
114             size_type       _M_capacity;
115             _Atomic_word    _M_refcount;
116           }                 _M_info;
117           
118           // Only for alignment purposes.
119           _CharT            _M_align;
120         };
121
122         typedef typename _Alloc::template rebind<_Rep>::other _Rep_alloc_type;
123
124         _CharT*
125         _M_refdata() throw()
126         { return reinterpret_cast<_CharT*>(this + 1); }
127
128         _CharT*
129         _M_refcopy() throw()
130         {
131           __atomic_add_dispatch(&_M_info._M_refcount, 1);
132           return _M_refdata();
133         }  // XXX MT
134         
135         void
136         _M_set_length(size_type __n)
137         { 
138           _M_info._M_refcount = 0;  // One reference.
139           _M_info._M_length = __n;
140           // grrr. (per 21.3.4)
141           // You cannot leave those LWG people alone for a second.
142           traits_type::assign(_M_refdata()[__n], _CharT());
143         }
144
145         // Create & Destroy
146         static _Rep*
147         _S_create(size_type, size_type, const _Alloc&);
148
149         void
150         _M_destroy(const _Alloc&) throw();
151
152         _CharT*
153         _M_clone(const _Alloc&, size_type __res = 0);
154       };
155
156       struct _Rep_empty
157       : public _Rep
158       {
159         _CharT              _M_terminal;
160       };
161
162       static _Rep_empty     _S_empty_rep;
163
164       // The maximum number of individual char_type elements of an
165       // individual string is determined by _S_max_size. This is the
166       // value that will be returned by max_size().  (Whereas npos
167       // is the maximum number of bytes the allocator can allocate.)
168       // If one was to divvy up the theoretical largest size string,
169       // with a terminating character and m _CharT elements, it'd
170       // look like this:
171       // npos = sizeof(_Rep) + (m * sizeof(_CharT)) + sizeof(_CharT)
172       //        + sizeof(_Rep) - 1
173       // (NB: last two terms for rounding reasons, see _M_create below)
174       // Solving for m:
175       // m = ((npos - 2 * sizeof(_Rep) + 1) / sizeof(_CharT)) - 1
176       // In addition, this implementation halves this amount.
177       enum { _S_max_size = (((static_cast<size_type>(-1) - 2 * sizeof(_Rep)
178                               + 1) / sizeof(_CharT)) - 1) / 2 };
179
180       // Data Member (private):
181       mutable typename _Util_Base::template _Alloc_hider<_Alloc>  _M_dataplus;
182
183       void
184       _M_data(_CharT* __p)
185       { _M_dataplus._M_p = __p; }
186
187       _Rep*
188       _M_rep() const
189       { return &((reinterpret_cast<_Rep*>(_M_data()))[-1]); }
190
191       _CharT*
192       _M_grab(const _Alloc& __alloc) const
193       {
194         return (!_M_is_leaked() && _M_get_allocator() == __alloc)
195                 ? _M_rep()->_M_refcopy() : _M_rep()->_M_clone(__alloc);
196       }
197
198       void
199       _M_dispose()
200       {
201         if (__exchange_and_add_dispatch(&_M_rep()->_M_info._M_refcount,
202                                         -1) <= 0)
203           _M_rep()->_M_destroy(_M_get_allocator());
204       }  // XXX MT
205
206       bool
207       _M_is_leaked() const
208       { return _M_rep()->_M_info._M_refcount < 0; }
209
210       void
211       _M_set_sharable()
212       { _M_rep()->_M_info._M_refcount = 0; }
213
214       void
215       _M_leak_hard();
216
217       // _S_construct_aux is used to implement the 21.3.1 para 15 which
218       // requires special behaviour if _InIterator is an integral type
219       template<typename _InIterator>
220         static _CharT*
221         _S_construct_aux(_InIterator __beg, _InIterator __end,
222                          const _Alloc& __a, std::__false_type)
223         {
224           typedef typename iterator_traits<_InIterator>::iterator_category _Tag;
225           return _S_construct(__beg, __end, __a, _Tag());
226         }
227
228       // _GLIBCXX_RESOLVE_LIB_DEFECTS
229       // 438. Ambiguity in the "do the right thing" clause
230       template<typename _Integer>
231         static _CharT*
232         _S_construct_aux(_Integer __beg, _Integer __end,
233                          const _Alloc& __a, std::__true_type)
234         { return _S_construct(static_cast<size_type>(__beg),
235                               static_cast<value_type>(__end), __a); }
236
237       template<typename _InIterator>
238         static _CharT*
239         _S_construct(_InIterator __beg, _InIterator __end, const _Alloc& __a)
240         {
241           typedef typename std::__is_integer<_InIterator>::__type _Integral;
242           return _S_construct_aux(__beg, __end, __a, _Integral());
243         }
244
245       // For Input Iterators, used in istreambuf_iterators, etc.
246       template<typename _InIterator>
247         static _CharT*
248          _S_construct(_InIterator __beg, _InIterator __end, const _Alloc& __a,
249                       std::input_iterator_tag);
250       
251       // For forward_iterators up to random_access_iterators, used for
252       // string::iterator, _CharT*, etc.
253       template<typename _FwdIterator>
254         static _CharT*
255         _S_construct(_FwdIterator __beg, _FwdIterator __end, const _Alloc& __a,
256                      std::forward_iterator_tag);
257
258       static _CharT*
259       _S_construct(size_type __req, _CharT __c, const _Alloc& __a);
260
261     public:
262       size_type
263       _M_max_size() const
264       { return size_type(_S_max_size); }
265
266       _CharT*
267       _M_data() const
268       { return _M_dataplus._M_p; }
269
270       size_type
271       _M_length() const
272       { return _M_rep()->_M_info._M_length; }
273
274       size_type
275       _M_capacity() const
276       { return _M_rep()->_M_info._M_capacity; }
277
278       bool
279       _M_is_shared() const
280       { return _M_rep()->_M_info._M_refcount > 0; }
281
282       void
283       _M_set_leaked()
284       { _M_rep()->_M_info._M_refcount = -1; }
285
286       void
287       _M_leak()    // for use in begin() & non-const op[]
288       {
289         if (!_M_is_leaked())
290           _M_leak_hard();
291       }
292
293       void
294       _M_set_length(size_type __n)
295       { _M_rep()->_M_set_length(__n); }
296
297       __rc_string_base()
298       : _M_dataplus(_S_empty_rep._M_refcopy()) { }
299
300       __rc_string_base(const _Alloc& __a);
301
302       __rc_string_base(const __rc_string_base& __rcs);
303
304 #ifdef __GXX_EXPERIMENTAL_CXX0X__
305       __rc_string_base(__rc_string_base&& __rcs)
306       : _M_dataplus(__rcs._M_get_allocator(), __rcs._M_data())
307       { __rcs._M_data(_S_empty_rep._M_refcopy()); }
308 #endif
309
310       __rc_string_base(size_type __n, _CharT __c, const _Alloc& __a);
311
312       template<typename _InputIterator>
313         __rc_string_base(_InputIterator __beg, _InputIterator __end,
314                          const _Alloc& __a);
315
316       ~__rc_string_base()
317       { _M_dispose(); }      
318
319       allocator_type&
320       _M_get_allocator()
321       { return _M_dataplus; }
322
323       const allocator_type&
324       _M_get_allocator() const
325       { return _M_dataplus; }
326
327       void
328       _M_swap(__rc_string_base& __rcs);
329
330       void
331       _M_assign(const __rc_string_base& __rcs);
332
333       void
334       _M_reserve(size_type __res);
335
336       void
337       _M_mutate(size_type __pos, size_type __len1, const _CharT* __s,
338                 size_type __len2);
339       
340       void
341       _M_erase(size_type __pos, size_type __n);
342
343       void
344       _M_clear()
345       { _M_erase(size_type(0), _M_length()); }
346
347       bool
348       _M_compare(const __rc_string_base&) const
349       { return false; }
350     };
351
352   template<typename _CharT, typename _Traits, typename _Alloc>
353     typename __rc_string_base<_CharT, _Traits, _Alloc>::_Rep_empty
354     __rc_string_base<_CharT, _Traits, _Alloc>::_S_empty_rep;
355
356   template<typename _CharT, typename _Traits, typename _Alloc>
357     typename __rc_string_base<_CharT, _Traits, _Alloc>::_Rep*
358     __rc_string_base<_CharT, _Traits, _Alloc>::_Rep::
359     _S_create(size_type __capacity, size_type __old_capacity,
360               const _Alloc& __alloc)
361     {
362       // _GLIBCXX_RESOLVE_LIB_DEFECTS
363       // 83.  String::npos vs. string::max_size()
364       if (__capacity > size_type(_S_max_size))
365         std::__throw_length_error(__N("__rc_string_base::_Rep::_S_create"));
366
367       // The standard places no restriction on allocating more memory
368       // than is strictly needed within this layer at the moment or as
369       // requested by an explicit application call to reserve().
370
371       // Many malloc implementations perform quite poorly when an
372       // application attempts to allocate memory in a stepwise fashion
373       // growing each allocation size by only 1 char.  Additionally,
374       // it makes little sense to allocate less linear memory than the
375       // natural blocking size of the malloc implementation.
376       // Unfortunately, we would need a somewhat low-level calculation
377       // with tuned parameters to get this perfect for any particular
378       // malloc implementation.  Fortunately, generalizations about
379       // common features seen among implementations seems to suffice.
380
381       // __pagesize need not match the actual VM page size for good
382       // results in practice, thus we pick a common value on the low
383       // side.  __malloc_header_size is an estimate of the amount of
384       // overhead per memory allocation (in practice seen N * sizeof
385       // (void*) where N is 0, 2 or 4).  According to folklore,
386       // picking this value on the high side is better than
387       // low-balling it (especially when this algorithm is used with
388       // malloc implementations that allocate memory blocks rounded up
389       // to a size which is a power of 2).
390       const size_type __pagesize = 4096;
391       const size_type __malloc_header_size = 4 * sizeof(void*);
392
393       // The below implements an exponential growth policy, necessary to
394       // meet amortized linear time requirements of the library: see
395       // http://gcc.gnu.org/ml/libstdc++/2001-07/msg00085.html.
396       if (__capacity > __old_capacity && __capacity < 2 * __old_capacity)
397         {
398           __capacity = 2 * __old_capacity;
399           // Never allocate a string bigger than _S_max_size.
400           if (__capacity > size_type(_S_max_size))
401             __capacity = size_type(_S_max_size);
402         }
403
404       // NB: Need an array of char_type[__capacity], plus a terminating
405       // null char_type() element, plus enough for the _Rep data structure,
406       // plus sizeof(_Rep) - 1 to upper round to a size multiple of
407       // sizeof(_Rep).
408       // Whew. Seemingly so needy, yet so elemental.
409       size_type __size = ((__capacity + 1) * sizeof(_CharT)
410                           + 2 * sizeof(_Rep) - 1);
411
412       const size_type __adj_size = __size + __malloc_header_size;
413       if (__adj_size > __pagesize && __capacity > __old_capacity)
414         {
415           const size_type __extra = __pagesize - __adj_size % __pagesize;
416           __capacity += __extra / sizeof(_CharT);
417           if (__capacity > size_type(_S_max_size))
418             __capacity = size_type(_S_max_size);
419           __size = (__capacity + 1) * sizeof(_CharT) + 2 * sizeof(_Rep) - 1;
420         }
421
422       // NB: Might throw, but no worries about a leak, mate: _Rep()
423       // does not throw.
424       _Rep* __place = _Rep_alloc_type(__alloc).allocate(__size / sizeof(_Rep));
425       _Rep* __p = new (__place) _Rep;
426       __p->_M_info._M_capacity = __capacity;
427       return __p;
428     }
429
430   template<typename _CharT, typename _Traits, typename _Alloc>
431     void
432     __rc_string_base<_CharT, _Traits, _Alloc>::_Rep::
433     _M_destroy(const _Alloc& __a) throw ()
434     {
435       const size_type __size = ((_M_info._M_capacity + 1) * sizeof(_CharT)
436                                 + 2 * sizeof(_Rep) - 1);
437       _Rep_alloc_type(__a).deallocate(this, __size / sizeof(_Rep));
438     }
439
440   template<typename _CharT, typename _Traits, typename _Alloc>
441     _CharT*
442     __rc_string_base<_CharT, _Traits, _Alloc>::_Rep::
443     _M_clone(const _Alloc& __alloc, size_type __res)
444     {
445       // Requested capacity of the clone.
446       const size_type __requested_cap = _M_info._M_length + __res;
447       _Rep* __r = _Rep::_S_create(__requested_cap, _M_info._M_capacity,
448                                   __alloc);
449
450       if (_M_info._M_length)
451         _S_copy(__r->_M_refdata(), _M_refdata(), _M_info._M_length);
452
453       __r->_M_set_length(_M_info._M_length);
454       return __r->_M_refdata();
455     }
456
457   template<typename _CharT, typename _Traits, typename _Alloc>
458     __rc_string_base<_CharT, _Traits, _Alloc>::
459     __rc_string_base(const _Alloc& __a)
460     : _M_dataplus(__a, _S_construct(size_type(), _CharT(), __a)) { }
461
462   template<typename _CharT, typename _Traits, typename _Alloc>
463     __rc_string_base<_CharT, _Traits, _Alloc>::
464     __rc_string_base(const __rc_string_base& __rcs)
465     : _M_dataplus(__rcs._M_get_allocator(),
466                   __rcs._M_grab(__rcs._M_get_allocator())) { }
467
468   template<typename _CharT, typename _Traits, typename _Alloc>
469     __rc_string_base<_CharT, _Traits, _Alloc>::
470     __rc_string_base(size_type __n, _CharT __c, const _Alloc& __a)
471     : _M_dataplus(__a, _S_construct(__n, __c, __a)) { }
472
473   template<typename _CharT, typename _Traits, typename _Alloc>
474     template<typename _InputIterator>
475     __rc_string_base<_CharT, _Traits, _Alloc>::
476     __rc_string_base(_InputIterator __beg, _InputIterator __end,
477                      const _Alloc& __a)
478     : _M_dataplus(__a, _S_construct(__beg, __end, __a)) { }
479
480   template<typename _CharT, typename _Traits, typename _Alloc>
481     void
482     __rc_string_base<_CharT, _Traits, _Alloc>::
483     _M_leak_hard()
484     {
485       if (_M_is_shared())
486         _M_erase(0, 0);
487       _M_set_leaked();
488     }
489
490   // NB: This is the special case for Input Iterators, used in
491   // istreambuf_iterators, etc.
492   // Input Iterators have a cost structure very different from
493   // pointers, calling for a different coding style.
494   template<typename _CharT, typename _Traits, typename _Alloc>
495     template<typename _InIterator>
496       _CharT*
497       __rc_string_base<_CharT, _Traits, _Alloc>::
498       _S_construct(_InIterator __beg, _InIterator __end, const _Alloc& __a,
499                    std::input_iterator_tag)
500       {
501         if (__beg == __end && __a == _Alloc())
502           return _S_empty_rep._M_refcopy();
503
504         // Avoid reallocation for common case.
505         _CharT __buf[128];
506         size_type __len = 0;
507         while (__beg != __end && __len < sizeof(__buf) / sizeof(_CharT))
508           {
509             __buf[__len++] = *__beg;
510             ++__beg;
511           }
512         _Rep* __r = _Rep::_S_create(__len, size_type(0), __a);
513         _S_copy(__r->_M_refdata(), __buf, __len);
514         __try
515           {
516             while (__beg != __end)
517               {
518                 if (__len == __r->_M_info._M_capacity)
519                   {
520                     // Allocate more space.
521                     _Rep* __another = _Rep::_S_create(__len + 1, __len, __a);
522                     _S_copy(__another->_M_refdata(), __r->_M_refdata(), __len);
523                     __r->_M_destroy(__a);
524                     __r = __another;
525                   }
526                 __r->_M_refdata()[__len++] = *__beg;
527                 ++__beg;
528               }
529           }
530         __catch(...)
531           {
532             __r->_M_destroy(__a);
533             __throw_exception_again;
534           }
535         __r->_M_set_length(__len);
536         return __r->_M_refdata();
537       }
538
539   template<typename _CharT, typename _Traits, typename _Alloc>
540     template<typename _InIterator>
541       _CharT*
542       __rc_string_base<_CharT, _Traits, _Alloc>::
543       _S_construct(_InIterator __beg, _InIterator __end, const _Alloc& __a,
544                    std::forward_iterator_tag)
545       {
546         if (__beg == __end && __a == _Alloc())
547           return _S_empty_rep._M_refcopy();
548
549         // NB: Not required, but considered best practice.
550         if (__is_null_pointer(__beg) && __beg != __end)
551           std::__throw_logic_error(__N("__rc_string_base::"
552                                        "_S_construct NULL not valid"));
553
554         const size_type __dnew = static_cast<size_type>(std::distance(__beg,
555                                                                       __end));
556         // Check for out_of_range and length_error exceptions.
557         _Rep* __r = _Rep::_S_create(__dnew, size_type(0), __a);
558         __try
559           { _S_copy_chars(__r->_M_refdata(), __beg, __end); }
560         __catch(...)
561           {
562             __r->_M_destroy(__a);
563             __throw_exception_again;
564           }
565         __r->_M_set_length(__dnew);
566         return __r->_M_refdata();
567       }
568
569   template<typename _CharT, typename _Traits, typename _Alloc>
570     _CharT*
571     __rc_string_base<_CharT, _Traits, _Alloc>::
572     _S_construct(size_type __n, _CharT __c, const _Alloc& __a)
573     {
574       if (__n == 0 && __a == _Alloc())
575         return _S_empty_rep._M_refcopy();
576
577       // Check for out_of_range and length_error exceptions.
578       _Rep* __r = _Rep::_S_create(__n, size_type(0), __a);
579       if (__n)
580         _S_assign(__r->_M_refdata(), __n, __c);
581
582       __r->_M_set_length(__n);
583       return __r->_M_refdata();
584     }
585
586   template<typename _CharT, typename _Traits, typename _Alloc>
587     void
588     __rc_string_base<_CharT, _Traits, _Alloc>::
589     _M_swap(__rc_string_base& __rcs)
590     {
591       if (_M_is_leaked())
592         _M_set_sharable();
593       if (__rcs._M_is_leaked())
594         __rcs._M_set_sharable();
595       
596       _CharT* __tmp = _M_data();
597       _M_data(__rcs._M_data());
598       __rcs._M_data(__tmp);
599
600       // _GLIBCXX_RESOLVE_LIB_DEFECTS
601       // 431. Swapping containers with unequal allocators.
602       std::__alloc_swap<allocator_type>::_S_do_it(_M_get_allocator(),
603                                                   __rcs._M_get_allocator());
604     } 
605
606   template<typename _CharT, typename _Traits, typename _Alloc>
607     void
608     __rc_string_base<_CharT, _Traits, _Alloc>::
609     _M_assign(const __rc_string_base& __rcs)
610     {
611       if (_M_rep() != __rcs._M_rep())
612         {
613           _CharT* __tmp = __rcs._M_grab(_M_get_allocator());
614           _M_dispose();
615           _M_data(__tmp);
616         }
617     }
618
619   template<typename _CharT, typename _Traits, typename _Alloc>
620     void
621     __rc_string_base<_CharT, _Traits, _Alloc>::
622     _M_reserve(size_type __res)
623     {
624       // Make sure we don't shrink below the current size.
625       if (__res < _M_length())
626         __res = _M_length();
627       
628       if (__res != _M_capacity() || _M_is_shared())
629         {
630           _CharT* __tmp = _M_rep()->_M_clone(_M_get_allocator(),
631                                              __res - _M_length());
632           _M_dispose();
633           _M_data(__tmp);
634         }
635     }
636
637   template<typename _CharT, typename _Traits, typename _Alloc>
638     void
639     __rc_string_base<_CharT, _Traits, _Alloc>::
640     _M_mutate(size_type __pos, size_type __len1, const _CharT* __s,
641               size_type __len2)
642     {
643       const size_type __how_much = _M_length() - __pos - __len1;
644       
645       _Rep* __r = _Rep::_S_create(_M_length() + __len2 - __len1,
646                                   _M_capacity(), _M_get_allocator());
647       
648       if (__pos)
649         _S_copy(__r->_M_refdata(), _M_data(), __pos);
650       if (__s && __len2)
651         _S_copy(__r->_M_refdata() + __pos, __s, __len2);
652       if (__how_much)
653         _S_copy(__r->_M_refdata() + __pos + __len2,
654                 _M_data() + __pos + __len1, __how_much);
655       
656       _M_dispose();
657       _M_data(__r->_M_refdata());
658     }
659
660   template<typename _CharT, typename _Traits, typename _Alloc>
661     void
662     __rc_string_base<_CharT, _Traits, _Alloc>::
663     _M_erase(size_type __pos, size_type __n)
664     {
665       const size_type __new_size = _M_length() - __n;
666       const size_type __how_much = _M_length() - __pos - __n;
667       
668       if (_M_is_shared())
669         {
670           // Must reallocate.
671           _Rep* __r = _Rep::_S_create(__new_size, _M_capacity(),
672                                       _M_get_allocator());
673
674           if (__pos)
675             _S_copy(__r->_M_refdata(), _M_data(), __pos);
676           if (__how_much)
677             _S_copy(__r->_M_refdata() + __pos,
678                     _M_data() + __pos + __n, __how_much);
679
680           _M_dispose();
681           _M_data(__r->_M_refdata());
682         }
683       else if (__how_much && __n)
684         {
685           // Work in-place.
686           _S_move(_M_data() + __pos,
687                   _M_data() + __pos + __n, __how_much);
688         }
689
690       _M_rep()->_M_set_length(__new_size);      
691     }
692
693   template<>
694     inline bool
695     __rc_string_base<char, std::char_traits<char>,
696                      std::allocator<char> >::
697     _M_compare(const __rc_string_base& __rcs) const
698     {
699       if (_M_rep() == __rcs._M_rep())
700         return true;
701       return false;
702     }
703
704 #ifdef _GLIBCXX_USE_WCHAR_T
705   template<>
706     inline bool
707     __rc_string_base<wchar_t, std::char_traits<wchar_t>,
708                      std::allocator<wchar_t> >::
709     _M_compare(const __rc_string_base& __rcs) const
710     {
711       if (_M_rep() == __rcs._M_rep())
712         return true;
713       return false;
714     }
715 #endif
716
717 _GLIBCXX_END_NAMESPACE
718
719 #endif /* _RC_STRING_BASE_H */