Portable Half-Life SDK. GoldSource and Xash3D. Crossplatform.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

2612 lines
62 KiB

/**
** Copyright (c) 1994-1995 Modena Software Inc.,
**
** Permission to use, copy, modify, distribute and sell this software
** and its documentation for any purpose is hereby granted without fee,
** provided that the above copyright notice appear in all copies and
** that both that copyright notice and this permission notice appear
** in supporting documentation. Modena Software, Inc. makes no
** representations about the suitability of this software for any
** purpose. It is provided "as is" without express or implied warranty.
**
**/
#ifndef __cplusplus
#error Must use C++ for BSTRING.H
#endif
#ifndef __MBSTRING_H
#define __MBSTRING_H
extern "C" {
#include <ctype.h>
#include <string.h>
#include <stddef.h>
#include <stdlib.h>
}
//#include <iostream.h>
// bool.h
#ifndef __GNUG__
#include <ministl/bool.h>
#endif
// a typedef is less sweeping than a #define for "bool"
#ifndef __BOOL_DEFINED
//typedef int bool;
#endif
// bc4const
#ifdef __BC4_STL
#define __BC401_STL
#endif
#ifdef __BC401_STL
#define __BC401_const
#else
#define __BC401_const const
#endif
// bndchk.h
#ifdef BOUNDS_CHECK
void check_bounds
( int index,
int container_size,
int lineno,
char *filename );
#endif
// mexcept.h
#define _THROW_NONE
#define _THROW_DOMAIN
#define _THROW_INVALIDARG
#define _THROW_LENGTH
#define _THROW_OUTRANGE
#define _THROW_RANGE
#define _THROW_OVERFLOW
#define _THROW_ALLOC
#define _THROW_CAST
#define _THROW_TYPEID
#define _THROW_ALLOC_LENGTH
#define _THROW_ALLOC_OUTRANGE
#define _THROW_LENGTH_OUTRANGE
#define _THROW_ALLOC_LENGTH_OUTRANGE
#include <ministl/vector>
#ifdef __MMULTITHREAD
#include "mutex.h"
#endif
const size_t NPOS = (size_t)(-1);
enum capacity { default_size, reserve };
template<class charT>
struct string_char_baggage {
typedef charT char_type;
//
// for users to acquire the basic character type
//
// constraints functions
//
static void
assign (char_type& c1, const char_type& c2) _THROW_NONE
{
c1 = c2;
}
static bool
eq (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 == c2);
}
static bool
ne (const char_type& c1, const char_type& c2) _THROW_NONE
{
return !(c1 == c2);
}
static bool
lt (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 < c2);
}
static char_type
eos () _THROW_NONE
{
return char_type(); // the null character
}
/*
static istream&
char_in (istream& is, char_type& c) _THROW_NONE
{
return is >> c; // extractor for a char_type object
}
static ostream&
char_out (ostream& os, char_type c) _THROW_NONE
{
return os << c; // inserter for a char_type object
}
static bool
is_del (char_type c) _THROW_NONE
{
// characteristic function for delimiters of char_type
return isspace(c);
}
*/
//
// speed-up functions
//
static int
compare (const char_type* s1, const char_type* s2, size_t n) _THROW_NONE
{
for (size_t i = 0; i < n; ++i, ++s1, ++s2)
if (ne(*s1, *s2))
{
return lt(*s1, *s2) ? -1 : 1;
}
return 0;
}
static size_t
length (const char_type* s) _THROW_NONE
{
size_t l = 0;
while (ne(*s++, eos()))
++l;
return l;
}
static char_type*
copy (char_type* s1, const char_type* s2, size_t n) _THROW_NONE
{
char_type* s = s1;
for (size_t i = 0; i < n; ++i)
assign(*s1++, *s2++);
return s;
}
};
template<> struct string_char_baggage<char> {
typedef char char_type;
//
// constraint member functions
//
static void
assign (char_type& c1, const char_type& c2) _THROW_NONE
{
c1 = c2;
}
static bool
eq (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 == c2);
}
static bool
ne (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 != c2);
}
static bool
lt (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 < c2);
}
static char_type
eos () _THROW_NONE
{
return 0; // the null character
}
/*
static istream&
char_in (istream& is, char_type& c) _THROW_NONE
{
// extractor for a char_type object
// return is >> c; // this does not work
is.get(c);
return is;
}
static ostream&
char_out (ostream& os, char_type c) _THROW_NONE
{
return os << c; // inserter for a char_type object
}
static bool
is_del (char_type c) _THROW_NONE
{
// characteristic function for delimiters of char_type
return isspace(c);
}
*/
//
// speed-up functions
//
static int
compare (const char_type* s1, const char_type* s2, size_t n) _THROW_NONE
{
return memcmp(s1, s2, n);
}
static size_t
length (const char_type* s) _THROW_NONE
{
return strlen(s);
}
static char_type*
copy (char_type* s1, const char_type* s2, size_t n) _THROW_NONE
{
// type cast required as memcpy returns void*
return (char_type*)memcpy(s1, s2, n);
}
};
#if 0
struct string_char_baggage<wchar_t> {
typedef wchar_t char_type;
static void
assign (char_type& c1, const char_type& c2) _THROW_NONE
{
c1 = c2;
}
static bool
eq (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 == c2);
}
static bool
ne (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 != c2);
}
static bool
lt (const char_type& c1, const char_type& c2) _THROW_NONE
{
return (c1 < c2);
}
static char_type
eos () _THROW_NONE
{
return 0; // the null character
}
/*
static istream&
char_in (istream& is, char_type& c) _THROW_NONE
{
return is >> c; // extractor for a char_type object
}
static ostream&
char_out (ostream& os, char_type c) _THROW_NONE
{
return os << c; // inserter for a char_type object
}
static bool
is_del (char_type c) _THROW_NONE
{
// characteristic function for delimiters of char_type
// using templatized locale::isspace function
return isspace(c);
}
*/
//
// speed-up functions
//
static int
compare (const char_type* s1, const char_type* s2, size_t n) _THROW_NONE
{
return wmemcmp(s1, s2, n);
}
static size_t
length (const char_type* s) _THROW_NONE
{
return wcslen(s);
// May use Koshida's overloaded MSE function strlen(s)
}
static char_type*
copy (char_type* s1, const char_type* s2, size_t n) _THROW_NONE
{
return (char_type*)wmemcpy(s1, s2, n);
}
};
#endif
template <class charT>
class basic_string;
template <class charT>
class basic_string_ref {
//
// friend class declaration
//
friend class basic_string<charT>;
//
// typedef declarations
//
typedef string_char_baggage<charT> baggage_type;
//
// private data members
//
charT* ptr;
size_t len;
size_t res;
#ifdef __MMULTITHREAD
mutex_arith<size_t, mutex> count; // reference count
#else
size_t count; // reference count
#endif
//
// private constructors and destructors
//
basic_string_ref () _THROW_NONE ;
basic_string_ref (size_t size, capacity cap) _THROW_ALLOC_LENGTH ;
basic_string_ref (const basic_string<charT>& str, size_t pos , size_t rlen)
_THROW_ALLOC ;
basic_string_ref (const charT* s, size_t rlen, size_t rres) _THROW_ALLOC ;
basic_string_ref (const charT* s, size_t n) _THROW_ALLOC_LENGTH ;
basic_string_ref (const charT* s) _THROW_ALLOC ;
basic_string_ref (charT c, size_t rep) _THROW_ALLOC_LENGTH ;
basic_string_ref (const vector<charT>& vec) _THROW_ALLOC_LENGTH ;
~basic_string_ref () _THROW_NONE ;
inline void
delete_ptr () _THROW_NONE ;
static charT
eos () _THROW_NONE ;
inline static
void
throwlength () _THROW_LENGTH;
inline static
void
throwrange () _THROW_OUTRANGE;
};
template<class charT>
class basic_string {
private:
//
// typedef declaration
//
typedef basic_string_ref<charT> reference_class;
typedef basic_string_ref<charT>* reference_pointer;
//
// data member
//
charT* c_str_ptr;
reference_pointer reference;
#if 1
charT empty_string;
#endif
//
// private member functions
//
inline charT*
point () _THROW_NONE ;
inline size_t&
len () _THROW_NONE ;
inline size_t
ref_count () const _THROW_NONE ;
static charT
eos () _THROW_NONE ;
void
assign_str (const charT* s, size_t slen) _THROW_ALLOC_LENGTH ;
void
append_str (const charT* s, size_t slen) _THROW_ALLOC_LENGTH ;
void
insert_str (size_t pos, const charT* s, size_t slen)
_THROW_ALLOC_LENGTH_OUTRANGE ;
void
replace_str (size_t xlen, size_t pos, const charT* s, size_t slen)
_THROW_ALLOC_LENGTH_OUTRANGE ;
int
compare_str (size_t pos, const charT* str, size_t slen, size_t strlen)
const _THROW_OUTRANGE ;
size_t
find_str (const charT* s, size_t pos, size_t len) const _THROW_NONE ;
size_t
rfind_str (const charT* s, size_t pos, size_t len) const _THROW_NONE ;
size_t
find_first_of_str (const charT* s, size_t pos, size_t len) const
_THROW_NONE ;
size_t
find_last_of_str (const charT* s, size_t pos, size_t len) const
_THROW_NONE ;
size_t
find_first_not_of_str (const charT* s, size_t pos, size_t len) const
_THROW_NONE ;
size_t
find_last_not_of_str (const charT* s, size_t pos, size_t len) const
_THROW_NONE ;
protected:
basic_string (const charT* s, size_t rlen, size_t xlen) _THROW_ALLOC_LENGTH;
inline void
delete_ref () _THROW_NONE ;
public:
#if 1
typedef unsigned long size_type;
#endif
typedef charT char_type;
typedef string_char_baggage<charT> baggage_type;
basic_string () _THROW_ALLOC ;
basic_string (size_t size, capacity cap) _THROW_ALLOC_LENGTH ;
basic_string (const basic_string<charT>& str, size_t pos = 0, size_t n = NPOS)
_THROW_ALLOC_OUTRANGE ;
basic_string (const charT* s, size_t n) _THROW_ALLOC_LENGTH ;
basic_string (const charT* s) _THROW_ALLOC ;
basic_string (charT c, size_t rep = 1) _THROW_ALLOC_LENGTH ;
basic_string (const vector<charT>& vec) _THROW_ALLOC_LENGTH ;
~basic_string () _THROW_NONE ;
basic_string<charT>&
operator= (const basic_string<charT>& str) _THROW_ALLOC ;
basic_string<charT>&
operator= (const charT* s) _THROW_ALLOC ;
basic_string<charT>&
operator= (charT c) _THROW_ALLOC ;
basic_string<charT>&
operator+= (const basic_string<charT>& rhs) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
operator+= (const charT* s) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
operator+= (charT c) _THROW_ALLOC_LENGTH ;
operator vector<charT> () const _THROW_ALLOC {
return vector<charT> (data(), data()+length());
}
basic_string<charT>&
append (const basic_string<charT>& str, size_t pos = 0, size_t n = NPOS)
_THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
append (const charT* s, size_t n) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
append (const charT* s) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
append (charT c, size_t rep = 1) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
assign (const basic_string<charT>& str, size_t pos = 0, size_t n = NPOS)
_THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
assign (const charT* s, size_t n) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
assign (const charT* s) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
assign (charT c, size_t rep = 1) _THROW_ALLOC_LENGTH ;
basic_string<charT>&
insert (size_t pos1, const basic_string<charT>& str, size_t pos2 = 0,
size_t n = NPOS) _THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
insert (size_t pos, const charT* s, size_t n) _THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
insert (size_t pos, const charT* s) _THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
insert (size_t pos, charT c, size_t rep = 1) _THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
remove (size_t pos = 0, size_t n = NPOS) _THROW_ALLOC_OUTRANGE ;
basic_string<charT>&
replace (size_t pos1, size_t n1, const basic_string<charT>& str, size_t pos2 = 0,
size_t n2 = NPOS) _THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
replace (size_t pos, size_t n1, const charT* s, size_t n2)
_THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
replace (size_t pos, size_t n1, const charT* s)
_THROW_ALLOC_LENGTH_OUTRANGE ;
basic_string<charT>&
replace (size_t pos, size_t n, charT c, size_t rep = 1)
_THROW_ALLOC_LENGTH_OUTRANGE ;
inline charT
get_at (size_t pos) const _THROW_OUTRANGE ;
void
put_at (size_t pos, charT c) _THROW_ALLOC_OUTRANGE ;
inline charT
operator[] (size_t pos) const _THROW_NONE ;
charT&
operator[] (size_t pos) _THROW_ALLOC_OUTRANGE ;
const charT*
c_str () const _THROW_ALLOC ;
inline const charT*
data () const _THROW_NONE ;
inline size_t
length () const _THROW_NONE ;
size_t size () const _THROW_NONE { return length(); }
void
resize (size_t n, charT c) _THROW_ALLOC_LENGTH ;
void
resize (size_t n) _THROW_ALLOC_LENGTH ;
inline size_t
reserve () const _THROW_NONE ;
void
reserve (size_t res_arg) _THROW_ALLOC_LENGTH ;
size_t
copy (charT* s, size_t n, size_t pos = 0) const _THROW_OUTRANGE ;
size_t
find (const basic_string<charT>& str, size_t pos = 0) const _THROW_NONE ;
size_t
find (const charT* s, size_t pos, size_t n) const _THROW_NONE ;
size_t
find (const charT* s, size_t pos = 0) const _THROW_NONE ;
size_t
find (charT c, size_t pos = 0) const _THROW_NONE ;
size_t
rfind (const basic_string<charT>& str, size_t pos = NPOS) const _THROW_NONE ;
size_t
rfind (const charT* s, size_t pos, size_t n) const _THROW_NONE ;
size_t
rfind (const charT* s, size_t pos = NPOS) const _THROW_NONE ;
size_t
rfind (charT c, size_t pos = NPOS) const _THROW_NONE ;
size_t
find_first_of (const basic_string<charT>& str, size_t pos = 0) const _THROW_NONE ;
size_t
find_first_of (const charT* s, size_t pos, size_t n) const _THROW_NONE ;
size_t
find_first_of (const charT* s, size_t pos = 0) const _THROW_NONE ;
size_t
find_first_of (charT c, size_t pos = 0) const _THROW_NONE ;
size_t
find_last_of (const basic_string<charT>& str, size_t pos = NPOS) const
_THROW_NONE ;
size_t
find_last_of (const charT* s, size_t pos, size_t n) const _THROW_NONE ;
size_t
find_last_of (const charT* s, size_t pos = NPOS) const _THROW_NONE ;
size_t
find_last_of (charT c, size_t pos = NPOS) const _THROW_NONE ;
size_t
find_first_not_of (const basic_string<charT>& str, size_t pos = 0) const
_THROW_NONE ;
size_t
find_first_not_of (const charT* s, size_t pos, size_t n) const _THROW_NONE ;
size_t
find_first_not_of (const charT* s, size_t pos = 0) const _THROW_NONE ;
size_t
find_first_not_of (charT c, size_t pos = 0) const _THROW_NONE ;
size_t
find_last_not_of (const basic_string<charT>& str, size_t pos = NPOS) const
_THROW_NONE ;
size_t
find_last_not_of (const charT* s, size_t pos, size_t n) const _THROW_NONE ;
size_t
find_last_not_of (const charT* s, size_t pos = NPOS) const _THROW_NONE ;
size_t
find_last_not_of (charT c, size_t pos = NPOS) const _THROW_NONE ;
basic_string<charT>
substr (size_t pos = 0, size_t n = NPOS) const _THROW_ALLOC_OUTRANGE ;
int
compare (const basic_string<charT>& str, size_t pos = 0, size_t n = NPOS) const
_THROW_OUTRANGE ;
int
compare (const charT* s, size_t pos, size_t n) const
_THROW_LENGTH_OUTRANGE ;
int
compare (const charT* s, size_t pos = 0) const _THROW_OUTRANGE ;
int
compare (charT c, size_t pos = 0, size_t rep = 1) const
_THROW_LENGTH_OUTRANGE ;
/*
static ostream&
op_lshift (ostream& o, const basic_string<charT>& s) _THROW_NONE ;
static istream&
op_rshift (istream& i, basic_string<charT>& s) _THROW_ALLOC_LENGTH ;
*/
static basic_string<charT>
op_plus (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH ;
static basic_string<charT>
op_plus (const charT* lhs, const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH ;
static basic_string<charT>
op_plus (charT lhs, const basic_string<charT>& rhs) _THROW_ALLOC_LENGTH ;
static basic_string<charT>
op_plus (const basic_string<charT>& lhs, const charT* rhs)
_THROW_ALLOC_LENGTH ;
static basic_string<charT>
op_plus (const basic_string<charT>& lhs, charT rhs) _THROW_ALLOC_LENGTH ;
};
template <class charT>
inline void
basic_string_ref<charT>::delete_ptr () _THROW_NONE
{
if (res)
{
delete[] ptr;
res = 0;
ptr = 0;
}
}
template <class charT>
inline void
basic_string_ref<charT>::throwlength () _THROW_LENGTH
{
#ifdef __MEXCEPT
throw length_error("Length exception occurred");
#else
//cout << "Length exception occurred" << endl;
exit(1);
#endif
}
template <class charT>
inline void
basic_string_ref<charT>::throwrange () _THROW_OUTRANGE
{
#ifdef __MEXCEPT
throw out_of_range("Out of range exception occurred");
#else
//cout << "Out of range exception occurred" << endl;
exit(1);
#endif
}
template <class charT>
inline void
basic_string<charT>::delete_ref () _THROW_NONE
{
--(reference->count);
if (!(reference->count))
delete reference;
}
template <class charT>
inline size_t
basic_string<charT>::ref_count () const _THROW_NONE
{
return reference->count;
}
template <class charT>
inline const charT*
basic_string<charT>::data () const _THROW_NONE
{
if (length())
return reference->ptr;
else
return 0;
}
template <class charT>
inline charT*
basic_string<charT>::point () _THROW_NONE
{
return reference->ptr;
}
template <class charT>
inline size_t&
basic_string<charT>::len () _THROW_NONE
{
return reference->len;
}
template <class charT>
inline size_t
basic_string<charT>::length () const _THROW_NONE
{
return reference->len;
}
template <class charT>
inline size_t
basic_string<charT>::reserve () const _THROW_NONE
{
return reference->res;
}
template <class charT>
inline charT
basic_string<charT>::get_at (size_t pos) const _THROW_OUTRANGE
{
if (pos >= length())
{
reference_class::throwrange();
}
return *(data()+pos);
}
template <class charT>
inline charT
basic_string<charT>::operator[] (size_t pos) const _THROW_NONE
{
if (pos < length())
return *(data()+pos);
else
return 0;
}
template <class charT>
inline bool
operator== (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_NONE
{
return 0 == lhs.compare(rhs);
}
template <class charT>
inline bool
operator== (const charT* lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return 0 == rhs.compare(lhs);
}
template <class charT>
inline bool
operator== (charT lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return 0 == rhs.compare(lhs);
}
template <class charT>
inline bool
operator== (const basic_string<charT>& lhs, const charT* rhs) _THROW_NONE
{
return 0 == lhs.compare(rhs);
}
template <class charT>
inline bool
operator== (const basic_string<charT>& lhs, charT rhs) _THROW_NONE
{
return 0 == lhs.compare(rhs);
}
template <class charT>
inline bool
operator!= (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_NONE
{
return 0 != lhs.compare(rhs);
}
template <class charT>
inline bool
operator!= (const charT* lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return 0 != rhs.compare(lhs);
}
template <class charT>
inline bool
operator!= (charT lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return 0 != rhs.compare(lhs);
}
template <class charT>
inline bool
operator!= (const basic_string<charT>& lhs, const charT* rhs) _THROW_NONE
{
return 0 != lhs.compare(rhs);
}
template <class charT>
inline bool
operator!= (const basic_string<charT>& lhs, charT rhs) _THROW_NONE
{
return 0 != lhs.compare(rhs);
}
template <class charT>
inline bool
operator< (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_NONE
{
if (lhs.compare(rhs) < 0)
return true;
else
return false;
}
template <class charT>
inline bool
operator< (const charT* lhs, const basic_string<charT>& rhs) _THROW_NONE
{
if (rhs.compare(lhs) > 0)
return true;
else
return false;
}
template <class charT>
inline bool
operator< (charT lhs, const basic_string<charT>& rhs) _THROW_NONE
{
if (rhs.compare(lhs) > 0)
return true;
else
return false;
}
template <class charT>
inline bool
operator< (const basic_string<charT>& lhs, const charT* rhs) _THROW_NONE
{
if (lhs.compare(rhs) < 0)
return true;
else
return false;
}
template <class charT>
inline bool
operator< (const basic_string<charT>& lhs, charT rhs) _THROW_NONE
{
if (lhs.compare(rhs) < 0)
return true;
else
return false;
}
#ifdef __MNONDEF
template <class charT>
inline bool
operator> (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_NONE
{
return (rhs < lhs);
}
#endif
template <class charT>
inline bool
operator> (const charT* lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return (rhs < lhs);
}
template <class charT>
inline bool
operator> (charT lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return (rhs < lhs);
}
template <class charT>
inline bool
operator> (const basic_string<charT>& lhs, const charT* rhs) _THROW_NONE
{
return (rhs < lhs);
}
template <class charT>
inline bool
operator> (const basic_string<charT>& lhs, charT rhs) _THROW_NONE
{
return (rhs < lhs);
}
#ifdef __MNONDEF
template <class charT>
inline bool
operator>= (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_NONE
{
return !(lhs < rhs);
}
#endif
template <class charT>
inline bool
operator>= (const charT* lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return !(lhs < rhs);
}
template <class charT>
inline bool
operator>= (charT lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return !(lhs < rhs);
}
template <class charT>
inline bool
operator>= (const basic_string<charT>& lhs, const charT* rhs) _THROW_NONE
{
return !(lhs < rhs);
}
template <class charT>
inline bool
operator>= (const basic_string<charT>& lhs, charT rhs) _THROW_NONE
{
return !(lhs < rhs);
}
#ifdef __MNONDEF
template <class charT>
inline bool
operator<= (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_NONE
{
return !(rhs < lhs);
}
#endif
template <class charT>
inline bool
operator<= (const charT* lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return !(rhs < lhs);
}
template <class charT>
inline bool
operator<= (charT lhs, const basic_string<charT>& rhs) _THROW_NONE
{
return !(rhs < lhs);
}
template <class charT>
inline bool
operator<= (const basic_string<charT>& lhs, const charT* rhs) _THROW_NONE
{
return !(rhs < lhs);
}
template <class charT>
inline bool
operator<= (const basic_string<charT>& lhs, charT rhs) _THROW_NONE
{
return !(rhs < lhs);
}
// definitions : can be in a .c file
//
template <class charT>
charT
basic_string_ref<charT>::eos () _THROW_NONE
{
return baggage_type::eos();
}
template <class charT>
basic_string_ref<charT>::basic_string_ref () _THROW_NONE
{
res = len = 0;
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (size_t size, capacity cap)
_THROW_ALLOC_LENGTH
{
if (cap == ::reserve)
{
len = 0;
res = size;
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
}
else if ((cap == ::default_size) && (size != NPOS))
{
res = len = size;
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
for (size_t position = 0; position < len; ++position)
baggage_type::assign (*(ptr+position), eos());
}
else
ptr = 0;
}
else
{
throwlength();
}
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (const basic_string<charT>& str,
size_t pos, size_t rlen) _THROW_ALLOC
{
res = len = rlen;
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
baggage_type::copy (ptr, str.data()+pos, len);
}
else
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (const charT* s, size_t rlen,
size_t rres) _THROW_ALLOC
{
res = rres;
len = rlen;
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
if (len)
baggage_type::copy (ptr, s, len);
}
else
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (const charT* s, size_t n)
_THROW_ALLOC_LENGTH
{
if (n == NPOS)
{
throwlength();
}
res = len = n;
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
baggage_type::copy (ptr, s, len);
}
else
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (const charT* s) _THROW_ALLOC
{
res = len = baggage_type::length(s);
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
baggage_type::copy (ptr, s, len);
}
else
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (charT c, size_t rep)
_THROW_ALLOC_LENGTH
{
if (rep == NPOS)
{
throwlength();
}
res = len = rep;
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
for (size_t position = 0; position < len; ++position)
baggage_type::assign (*(ptr+position), c);
}
else
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::basic_string_ref (const vector<charT>& vec)
_THROW_ALLOC_LENGTH
{
size_t n = vec.size();
if (n == NPOS)
{
throwlength();
}
res = len = n;
if (res)
{
#if 0
ptr = new charT [res];
#else
ptr = new charT [res+1];
#endif
baggage_type::copy (ptr, vec.begin(), len);
}
else
ptr = 0;
count = 1;
}
template <class charT>
basic_string_ref<charT>::~basic_string_ref () _THROW_NONE
{
delete_ptr();
}
template <class charT>
charT
basic_string<charT>::eos () _THROW_NONE
{
return baggage_type::eos();
}
template <class charT>
void
basic_string<charT>::assign_str (const charT* s, size_t slen)
_THROW_ALLOC_LENGTH
{
if (slen == NPOS)
{
reference_class::throwlength();
}
if ((ref_count() > 1) || (slen && (reserve() < slen)))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (s, slen);
delete_ref();
reference = tmp;
}
else if (slen)
{
baggage_type::copy (point(), s, slen);
}
reference->len = slen;
}
template <class charT>
void
basic_string<charT>::append_str (const charT* s, size_t slen)
_THROW_ALLOC_LENGTH
{
if (length() >= (NPOS-slen))
{
reference_class::throwlength();
}
if ((ref_count() > 1) || (slen > (reserve()-length())))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), length(), length()+slen);
delete_ref();
reference = tmp;
}
if (slen)
baggage_type::copy (point()+length(), s, slen);
reference->len += slen;
}
template <class charT>
void
basic_string<charT>::insert_str (size_t pos, const charT* s, size_t slen)
_THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
if (length() >= (NPOS-slen))
{
reference_class::throwlength();
}
if ((ref_count() > 1) || (slen > (reserve()-length())))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), pos, length()+slen);
baggage_type::copy (tmp->ptr+pos+slen, data()+pos, length()-pos);
tmp->len = length();
delete_ref();
reference = tmp;
}
else
{
for (size_t count = length()-pos; count > 0; --count)
baggage_type::assign (*(point()+pos+slen+count-1),
*(data()+pos+count-1));
}
if (slen)
baggage_type::copy (point()+pos, s, slen);
reference->len += slen;
}
template <class charT>
void
basic_string<charT>::replace_str (size_t xlen, size_t pos, const charT* s,
size_t slen) _THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
if ((length()-xlen) >= (NPOS-slen))
{
reference_class::throwlength();
}
if ((ref_count() > 1) || (reserve() < (length()+slen-xlen)))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), pos, length()+slen-xlen);
baggage_type::copy (tmp->ptr+pos+slen, data()+pos+xlen,
length()-pos-xlen);
tmp->len = length();
delete_ref();
reference = tmp;
}
else
{
if (slen < xlen)
baggage_type::copy (point()+pos+slen, data()+pos+xlen,
length()-pos-xlen);
else
{
for (size_t count = length()-pos-xlen; count > 0; --count)
baggage_type::assign (*(point()+pos+slen+count-1),
*(data()+pos+xlen+count-1));
}
}
if (slen)
baggage_type::copy (point()+pos, s, slen);
reference->len += (slen-xlen);
}
template <class charT>
int
basic_string<charT>::compare_str (size_t pos, const charT* str, size_t slen,
size_t strlen) const _THROW_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
size_t rlen = (slen > strlen ) ? strlen : slen;
int result;
if (!length())
return str ? (eos()- *str) : eos();
result = baggage_type::compare (data()+pos, str, rlen);
return result ? result : (length()-pos-strlen);
}
template <class charT>
size_t
basic_string<charT>::find_str (const charT* s, size_t pos, size_t len)
const _THROW_NONE
{
size_t count = pos;
size_t shift;
size_t place;
if ((length() == 0) || (len == 0))
return NPOS;
while (len <= (length()-count))
{
for (place = 0; place < len; ++place)
{
if (baggage_type::ne(*(s+len-1-place), *(data()+count+(len-1-place))))
break;
}
if (place == len)
return count;
shift = find(*(s+len-1-place), count+(len-place));
if (shift == NPOS)
return NPOS;
count = shift-(len-place-1);
}
return NPOS;
}
template <class charT>
size_t
basic_string<charT>::rfind_str (const charT* s, size_t pos, size_t len)
const _THROW_NONE
{
size_t count = (pos < (length()-len)) ? (pos+1) : (length()-len);
size_t shift;
size_t place;
if ((length() < len) || (len == 0))
return NPOS;
while (count > 0)
{
for (place = 0; place < len; ++place)
{
if (baggage_type::ne(*(s+len-1-place), *(data()+count+(len-place)-2)))
break;
}
if (place == len)
return count-1;
shift = rfind(*(s+len-1-place), count+(len-place)-3);
if (shift == NPOS)
return NPOS;
count = shift+place-len+2;
}
return NPOS;
}
template <class charT>
size_t
basic_string<charT>::find_first_of_str (const charT* s, size_t pos, size_t len)
const _THROW_NONE
{
size_t temp;
size_t count = pos;
size_t result = NPOS;
while (count < length())
{
temp = 0;
while ((temp < len) && baggage_type::ne(*(data()+count), *(s+temp)))
++temp;
if (temp != len)
break;
++count;
}
temp = (count >= length()) ? NPOS : count;
return ((result > temp) ? temp : result);
}
template <class charT>
size_t
basic_string<charT>::find_last_of_str (const charT* s, size_t pos, size_t len)
const _THROW_NONE
{
size_t temp = 0;
size_t count = (pos < length()) ? (pos+1) : length();
if (length())
{
while (count > 0)
{
temp = 0;
--count;
while ((temp != len) && baggage_type::ne(*(data()+count), *(s+temp)))
++temp;
if (temp != len)
break;
}
}
return ((temp != len) && length()) ? count : NPOS;
}
template <class charT>
size_t
basic_string<charT>::find_first_not_of_str (const charT* s, size_t pos,
size_t len) const _THROW_NONE
{
size_t count = pos;
while (count < length())
{
size_t temp = 0;
while (temp < len)
{
if (baggage_type::eq(*(data()+count), *(s+temp)))
break;
++temp;
}
if (temp == len)
break;
++count;
}
return ((count >= length()) ? NPOS : count);
}
template <class charT>
size_t
basic_string<charT>::find_last_not_of_str (const charT* s, size_t pos,
size_t len) const _THROW_NONE
{
size_t temp = 0;
size_t count = (pos < length()) ? (pos+1) : length();
if (length())
{
while (count > 0)
{
temp = 0;
while (temp != len)
{
if (baggage_type::eq(*(data()+count-1), *(s+temp)))
break;
++temp;
}
if (temp == len)
break;
--count;
}
}
return ((temp == len) && length()) ? count-1 : NPOS;
}
template <class charT>
basic_string<charT>::basic_string () _THROW_ALLOC
{
reference = new basic_string_ref<charT> ();
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (size_t size, capacity cap)
_THROW_ALLOC_LENGTH
{
reference = new basic_string_ref<charT> (size, cap);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (const basic_string<charT>& str,
size_t pos, size_t n) _THROW_ALLOC_OUTRANGE
{
if (pos > str.length())
{
reference_class::throwrange();
}
size_t rlen = (n > (str.length() - pos)) ? str.length() - pos : n;
if ((rlen == str.length()) && (str.ref_count() != NPOS))
(reference = str.reference)->count++;
else
reference = new basic_string_ref<charT> (str, pos, rlen);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (const charT* s, size_t rlen, size_t xlen)
_THROW_ALLOC_LENGTH
{
if (rlen >= (NPOS - xlen))
{
reference_class::throwlength();
}
reference = new basic_string_ref<charT> (s, rlen, rlen+xlen);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (const charT* s, size_t n) _THROW_ALLOC_LENGTH
{
reference = new basic_string_ref<charT> (s, n);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (const charT* s) _THROW_ALLOC
{
reference = new basic_string_ref<charT> (s);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (charT c, size_t rep) _THROW_ALLOC_LENGTH
{
reference = new basic_string_ref<charT> (c, rep);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::basic_string (const vector<charT>& vec) _THROW_ALLOC_LENGTH
{
reference = new basic_string_ref<charT> (vec);
c_str_ptr = 0;
}
template <class charT>
basic_string<charT>::~basic_string () _THROW_NONE
{
delete_ref();
if (c_str_ptr)
delete[] c_str_ptr;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::operator= (const basic_string<charT>& str) _THROW_ALLOC
{
if (this != &str)
{
delete_ref();
if (str.ref_count() != NPOS)
(reference = str.reference)->count++;
else
reference = new basic_string_ref<charT> (str, 0, str.length());
}
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::operator= (const charT* s) _THROW_ALLOC
{
assign_str (s, baggage_type::length(s));
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::operator= (charT c) _THROW_ALLOC
{
if ((ref_count() == 1) && (reserve() >= 1))
{
baggage_type::assign (*(point()), c);
reference->len = 1;
}
else
{
delete_ref();
reference = new basic_string_ref<charT> (c, 1);
}
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::operator+= (const basic_string<charT>& rhs) _THROW_ALLOC_LENGTH
{
append_str (rhs.data(), rhs.length());
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::operator+= (const charT* s) _THROW_ALLOC_LENGTH
{
append_str (s, baggage_type::length(s));
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::operator+= (charT c) _THROW_ALLOC_LENGTH
{
if (length() >= (NPOS-1))
{
reference_class::throwlength();
}
if (!((ref_count() == 1) && (reserve() > length())))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), length(), length()+1);
delete_ref();
reference = tmp;
}
baggage_type::assign (*(point()+length()), c);
reference->len++;
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::append (const basic_string<charT>& str, size_t pos, size_t n)
_THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos > str.length())
{
reference_class::throwrange();
}
append_str (str.data() + pos, (n>(str.length()-pos))?(str.length()-pos):n);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::append (const charT* s, size_t n) _THROW_ALLOC_LENGTH
{
append_str (s, n);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::append (const charT* s) _THROW_ALLOC_LENGTH
{
append_str (s, baggage_type::length(s));
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::append (charT c, size_t rep) _THROW_ALLOC_LENGTH
{
if (length() >= (NPOS-rep))
{
reference_class::throwlength();
}
if (rep)
{
if ((ref_count() > 1) || (reserve() < (length() + rep)))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), length(), length()+rep);
delete_ref();
reference = tmp;
}
for (size_t count = 0; count < rep; ++count)
baggage_type::assign (*(point()+length()+count), c);
reference->len += rep;
}
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::assign (const basic_string<charT>& str, size_t pos, size_t n)
_THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos > str.length())
{
reference_class::throwrange();
}
size_t rlen = (n > (str.length() - pos)) ? str.length() - pos : n;
if ((rlen == str.length()) && (str.ref_count() != NPOS))
{
delete_ref();
(reference = str.reference)->count++;
}
else
assign_str (str.data()+pos, rlen);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::assign (const charT* s, size_t n) _THROW_ALLOC_LENGTH
{
assign_str (s, n);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::assign (const charT* s) _THROW_ALLOC_LENGTH
{
assign_str (s, baggage_type::length(s));
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::assign (charT c, size_t rep) _THROW_ALLOC_LENGTH
{
if (rep == NPOS)
{
reference_class::throwlength();
}
if ((ref_count() > 1) || (rep && (reserve() < rep)))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (c, rep);
delete_ref();
reference = tmp;
}
else
{
for (size_t count = 0; count < rep; ++count)
baggage_type::assign (*(point()+count), c);
reference->len = rep;
}
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::insert (size_t pos1, const basic_string<charT>& str,
size_t pos2, size_t n) _THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos2 > str.length())
{
reference_class::throwrange();
}
size_t rlen = (n > (str.length() - pos2)) ? str.length() - pos2 : n;
insert_str (pos1, str.data()+pos2, rlen);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::insert (size_t pos, const charT* s, size_t n)
_THROW_ALLOC_LENGTH_OUTRANGE
{
insert_str(pos, s, n);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::insert (size_t pos, const charT* s)
_THROW_ALLOC_LENGTH_OUTRANGE
{
insert_str(pos, s, baggage_type::length(s));
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::insert (size_t pos, charT c, size_t rep)
_THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
if ((rep == NPOS) || (length() >= (NPOS - rep)))
{
reference_class::throwlength();
}
if (rep)
{
size_t count;
if ((ref_count() > 1) || (reserve() < (length()+rep)))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), pos, length()+rep);
if (length())
for (count = length()-pos; count > 0; --count)
baggage_type::assign (*(tmp->ptr+pos+rep+count-1),
*(data()+pos+count-1));
tmp->len = length();
delete_ref();
reference = tmp;
}
else
{
for (count = length()-pos; count > 0; --count)
baggage_type::assign (*(point()+pos+rep+count-1),
*(data()+pos+count-1));
}
for (count = 0; count < rep; ++count)
baggage_type::assign (*(point()+pos+count), c);
reference->len += rep;
}
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::remove (size_t pos, size_t n) _THROW_ALLOC_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
size_t xlen = (n > (length()-pos)) ? (length()-pos) : n;
if (ref_count() > 1)
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), pos, length());
baggage_type::copy (tmp->ptr+pos, data()+pos+xlen, length()-xlen-pos);
tmp->len = length()-xlen;
delete_ref();
reference = tmp;
}
else if (xlen == length())
reference->len = 0;
else if (xlen)
{
baggage_type::copy (point()+pos, data()+pos+xlen, length()-xlen-pos);
reference->len -= xlen;
}
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::replace (size_t pos1, size_t n1, const basic_string<charT>& str,
size_t pos2, size_t n2) _THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos2 > str.length())
{
reference_class::throwrange();
}
size_t xlen = (n1 > (length()-pos1)) ? (length()-pos1) : n1;
size_t rlen = (n2 > (str.length()-pos2)) ? (str.length()-pos2) : n2;
replace_str (xlen, pos1, str.data()+pos2, rlen);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::replace (size_t pos, size_t n1, const charT* s, size_t n2)
_THROW_ALLOC_LENGTH_OUTRANGE
{
size_t xlen = (n1 > (length()-pos)) ? (length()-pos) : n1;
replace_str (xlen, pos, s, n2);
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::replace (size_t pos, size_t n1, const charT* s)
_THROW_ALLOC_LENGTH_OUTRANGE
{
size_t xlen = (n1 > (length()-pos)) ? (length()-pos) : n1;
replace_str (xlen, pos, s, baggage_type::length(s));
return *this;
}
template <class charT>
basic_string<charT>&
basic_string<charT>::replace (size_t pos, size_t n, charT c, size_t rep)
_THROW_ALLOC_LENGTH_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
size_t xlen = (n > (length()-pos)) ? (length()-pos) : n;
if ((length()-xlen) >= (NPOS-rep))
{
reference_class::throwlength();
}
if (!rep)
return remove (pos, n);
else
{
size_t count;
if ((ref_count() > 1) || (reserve() < (length()-xlen+rep)))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), pos,
length()+((xlen > rep) ? (xlen-rep) : 0));
if (rep < xlen)
baggage_type::copy (tmp->ptr+pos+rep, data()+pos+xlen,
length()-pos-xlen);
else
{
for (count = length()-xlen-pos; count > 0; --count)
baggage_type::assign (*(tmp->ptr+pos+rep+count-1),
*(data()+pos+xlen+count-1));
}
tmp->len = length();
delete_ref();
reference = tmp;
}
else
{
if (rep < xlen)
baggage_type::copy (point()+pos+rep, data()+pos+xlen,
length()-pos-xlen);
else
{
for (count = length()-xlen-pos; count > 0; --count)
baggage_type::assign (*(point()+pos+rep+count-1),
*(data()+pos+xlen+count-1));
}
}
for (count = 0; count < rep; ++count)
baggage_type::assign (*(point()+pos+count), c);
reference->len += (rep-xlen);
}
return *this;
}
template <class charT>
void
basic_string<charT>::put_at (size_t pos, charT c) _THROW_ALLOC_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
if ((ref_count() > 1) || (pos == reserve()))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), length(),
length()+((pos==length())?1:0));
delete_ref();
reference = tmp;
}
if (pos == length())
++reference->len;
baggage_type::assign (*(point()+pos), c);
}
template <class charT>
charT&
basic_string<charT>::operator[] (size_t pos) _THROW_ALLOC_OUTRANGE
{
if (pos >= length())
{
reference_class::throwrange();
}
if (ref_count() > 1)
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), length(), length());
delete_ref();
reference = tmp;
}
return *(point()+pos);
}
template <class charT>
const charT*
basic_string<charT>::c_str () const _THROW_ALLOC
{
#if 0
if (c_str_ptr)
delete[] ((basic_string<charT>*)this)->c_str_ptr;
((basic_string<charT>*)this)->c_str_ptr = new charT [length()+1];
if (length())
baggage_type::copy (((basic_string<charT>*)this)->c_str_ptr, data(),
length());
baggage_type::assign (*(((basic_string<charT>*)this)->c_str_ptr+length()),
eos());
return c_str_ptr;
#else
if (!length()) {
baggage_type::assign ((charT &)empty_string, eos());
return &empty_string;
}
baggage_type::assign (*(charT *)(data()+length()),
eos());
return data();
#endif
}
template <class charT>
void
basic_string<charT>::resize (size_t n, charT c) _THROW_ALLOC_LENGTH
{
if (n == NPOS)
{
reference_class::throwlength();
}
if ((ref_count() > 1) || (n > reserve()))
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(),
((n > length()) ? length() : n), n);
delete_ref();
reference = tmp;
}
while (reference->len < n)
{
baggage_type::assign (*(reference->ptr+length()), c);
++reference->len;
}
reference->len = n;
}
template <class charT>
void
basic_string<charT>::resize (size_t n) _THROW_ALLOC_LENGTH
{
resize (n, eos());
}
template <class charT>
void
basic_string<charT>::reserve (size_t res_arg) _THROW_ALLOC_LENGTH
{
if (res_arg == NPOS)
{
reference_class::throwlength();
}
if (res_arg > reserve())
{
reference_pointer tmp;
tmp = new basic_string_ref<charT> (data(), length(), res_arg);
delete_ref();
reference = tmp;
}
}
template <class charT>
size_t
basic_string<charT>::copy (charT* s, size_t n, size_t pos) const _THROW_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
size_t rlen = (n > (length()-pos)) ? (length()-pos) : n;
if (length())
baggage_type::copy (s, data()+pos, rlen);
return rlen;
}
template <class charT>
size_t
basic_string<charT>::find (const basic_string<charT>& str, size_t pos) const
_THROW_NONE
{
return find_str (str.data(), pos, str.length());
}
template <class charT>
size_t
basic_string<charT>::find (const charT* s, size_t pos, size_t n) const
_THROW_NONE
{
return find_str (s, pos, n);
}
template <class charT>
size_t
basic_string<charT>::find (const charT* s, size_t pos) const _THROW_NONE
{
return find_str (s, pos, baggage_type::length(s));
}
template <class charT>
size_t
basic_string<charT>::find (charT c, size_t pos) const _THROW_NONE
{
while ((pos < length()) && (baggage_type::ne(*(data()+pos), c)))
++pos;
return ((pos < length()) ? pos : NPOS);
}
template <class charT>
size_t
basic_string<charT>::rfind (const basic_string<charT>& str, size_t pos) const
_THROW_NONE
{
return rfind_str (str.data(), pos, str.length());
}
template <class charT>
size_t
basic_string<charT>::rfind (const charT* s, size_t pos, size_t n) const
_THROW_NONE
{
return rfind_str (s, pos, n);
}
template <class charT>
size_t
basic_string<charT>::rfind (const charT* s, size_t pos) const _THROW_NONE
{
return rfind_str (s, pos, baggage_type::length(s));
}
template <class charT>
size_t
basic_string<charT>::rfind (charT c, size_t pos) const _THROW_NONE
{
size_t count = ((pos < length()) ? pos+1 : length());
if (length() == 0)
return NPOS;
while ((baggage_type::ne(*(data()+count-1), c)) && (count > 1))
--count;
if ((count == 1) && (baggage_type::ne(*(data()), c)))
return NPOS;
else
return count-1;
}
template <class charT>
size_t
basic_string<charT>::find_first_of (const basic_string<charT>& str, size_t pos) const
_THROW_NONE
{
return find_first_of_str (str.data(), pos, str.length());
}
template <class charT>
size_t
basic_string<charT>::find_first_of (const charT* s, size_t pos, size_t n) const
_THROW_NONE
{
return find_first_of_str (s, pos, n);
}
template <class charT>
size_t
basic_string<charT>::find_first_of (const charT* s, size_t pos) const
_THROW_NONE
{
return find_first_of_str (s, pos, baggage_type::length(s));
}
template <class charT>
size_t
basic_string<charT>::find_first_of (charT c, size_t pos) const _THROW_NONE
{
return find (c, pos);
}
template <class charT>
size_t
basic_string<charT>::find_last_of (const basic_string<charT>& str, size_t pos) const
_THROW_NONE
{
return find_last_of_str (str.data(), pos, str.length());
}
template <class charT>
size_t
basic_string<charT>::find_last_of (const charT* s, size_t pos, size_t n) const
_THROW_NONE
{
return find_last_of_str (s, pos, n);
}
template <class charT>
size_t
basic_string<charT>::find_last_of (const charT* s, size_t pos) const _THROW_NONE
{
return find_last_of_str (s, pos, baggage_type::length(s));
}
template <class charT>
size_t
basic_string<charT>::find_last_of (charT c, size_t pos) const _THROW_NONE
{
return rfind (c, pos);
}
template <class charT>
size_t
basic_string<charT>::find_first_not_of (const basic_string<charT>& str, size_t pos)
const _THROW_NONE
{
return find_first_not_of_str (str.data(), pos, str.length());
}
template <class charT>
size_t
basic_string<charT>::find_first_not_of (const charT* s, size_t pos, size_t n)
const _THROW_NONE
{
return find_first_not_of_str (s, pos, n);
}
template <class charT>
size_t
basic_string<charT>::find_first_not_of (const charT* s, size_t pos) const
_THROW_NONE
{
return find_first_not_of_str (s, pos, baggage_type::length(s));
}
template <class charT>
size_t
basic_string<charT>::find_first_not_of (charT c, size_t pos) const _THROW_NONE
{
while ((pos < length()) && (baggage_type::eq(*(data()+pos), c)))
++pos;
return ((pos < length()) ? pos : NPOS);
}
template <class charT>
size_t
basic_string<charT>::find_last_not_of (const basic_string<charT>& str, size_t pos)
const _THROW_NONE
{
return find_last_not_of_str (str.data(), pos, str.length());
}
template <class charT>
size_t
basic_string<charT>::find_last_not_of (const charT* s, size_t pos, size_t n)
const _THROW_NONE
{
return find_last_not_of_str (s, pos, n);
}
template <class charT>
size_t
basic_string<charT>::find_last_not_of (const charT* s, size_t pos) const
_THROW_NONE
{
return find_last_not_of_str (s, pos, baggage_type::length(s));
}
template <class charT>
size_t
basic_string<charT>::find_last_not_of (charT c, size_t pos) const _THROW_NONE
{
size_t count = ((pos < length()) ? pos+1 : length());
if (length() == 0)
return NPOS;
while ((baggage_type::eq(*(data()+count-1), c)) && (count > 1))
--count;
if ((count == 1) && (baggage_type::eq(*(data()), c)))
return NPOS;
else
return count-1;
}
template <class charT>
basic_string<charT>
basic_string<charT>::substr (size_t pos, size_t n) const _THROW_ALLOC_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
if (length())
return basic_string<charT> (data()+pos,
(n > (length()-pos)) ? (length()-pos) : n);
else
return basic_string<charT>();
}
template <class charT>
int
basic_string<charT>::compare (const basic_string<charT>& str, size_t pos,
size_t n) const _THROW_OUTRANGE
{
size_t slen = (n > (length()-pos)) ? (length()-pos) : n;
return compare_str (pos, str.data(), slen, str.length());
}
template <class charT>
int
basic_string<charT>::compare (const charT* s, size_t pos, size_t n) const
_THROW_LENGTH_OUTRANGE
{
if (n == NPOS)
{
reference_class::throwlength();
}
return compare_str (pos, s, length()-pos, n);
}
template <class charT>
int
basic_string<charT>::compare (const charT* s, size_t pos) const _THROW_OUTRANGE
{
return compare_str (pos, s, length()-pos, baggage_type::length(s));
}
template <class charT>
int
basic_string<charT>::compare (charT c, size_t pos, size_t rep) const
_THROW_LENGTH_OUTRANGE
{
if (pos > length())
{
reference_class::throwrange();
}
if (rep == NPOS)
{
reference_class::throwlength();
}
if (rep)
{
size_t count = 0;
while ((count < rep) && (count < (length()-pos)) &&
baggage_type::eq (*(data()+pos+count), c))
++count;
if ((count == rep) || (count == (length()-pos)))
return (length()-pos-count);
else
return (*(data()+pos+count)-c);
}
else
{
return (length()-pos);
}
}
template <class charT>
basic_string<charT>
basic_string<charT>::op_plus (const basic_string<charT>& lhs,
const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH
{
typedef basic_string<charT>::baggage_type baggage_type;
basic_string<charT> tmp(lhs.data(), lhs.length(), rhs.length());
if (rhs.length())
baggage_type::copy (tmp.point()+lhs.length(), rhs.data(), rhs.length());
tmp.len() += rhs.length();
return tmp;
}
template <class charT>
basic_string<charT>
basic_string<charT>::op_plus (const charT* lhs,
const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH
{
typedef basic_string<charT>::baggage_type baggage_type;
size_t slen = baggage_type::length(lhs);
basic_string<charT> tmp(lhs, slen, rhs.length());
if (rhs.length())
baggage_type::copy (tmp.point()+slen, rhs.data(), rhs.length());
tmp.len() += rhs.length();
return tmp;
}
template <class charT>
basic_string<charT>
basic_string<charT>::op_plus (charT lhs, const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH
{
typedef basic_string<charT>::baggage_type baggage_type;
basic_string<charT> tmp(&lhs, 1, rhs.length());
if (rhs.length())
baggage_type::copy (tmp.point()+1, rhs.data(), rhs.length());
tmp.len() += rhs.length();
return tmp;
}
template <class charT>
basic_string<charT>
basic_string<charT>::op_plus (const basic_string<charT>& lhs, const charT* rhs)
_THROW_ALLOC_LENGTH
{
typedef basic_string<charT>::baggage_type baggage_type;
size_t slen = baggage_type::length(rhs);
basic_string<charT> tmp(lhs.data(), lhs.length(), slen);
if (slen)
baggage_type::copy (tmp.point()+lhs.length(), rhs, slen);
tmp.len() += slen;
return tmp;
}
template <class charT>
basic_string<charT>
basic_string<charT>::op_plus (const basic_string<charT>& lhs, charT rhs)
_THROW_ALLOC_LENGTH
{
typedef basic_string<charT>::baggage_type baggage_type;
basic_string<charT> tmp(lhs.data(), lhs.length(), 1);
baggage_type::assign (*(tmp.point()+lhs.length()), rhs);
++tmp.len();
return tmp;
}
/*
template <class charT>
ostream&
basic_string<charT>::op_lshift (ostream& o, const basic_string<charT>& s)
_THROW_NONE
{
typedef basic_string<charT>::baggage_type baggage_type;
for (size_t count = 0; count < s.length(); ++count)
baggage_type::char_out (o, *(s.data()+count));
return o;
}
template <class charT>
istream&
basic_string<charT>::op_rshift (istream& i, basic_string<charT>& s)
_THROW_ALLOC_LENGTH
{
typedef basic_string<charT>::baggage_type baggage_type;
s.remove();
while (true)
{
charT value;
baggage_type::char_in (i, value);
if (!i.operator void*())
break;
if (!baggage_type::is_del (value))
{
s.append(value);
while (true)
{
baggage_type::char_in (i, value);
if (!i.operator void*())
break;
if (!baggage_type::is_del (value))
{
s.append(value);
}
else
break;
}
break;
}
}
return i;
}
*/
template <class charT>
inline basic_string<charT>
operator+ (const basic_string<charT>& lhs, const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH
{
return basic_string<charT>::op_plus (lhs, rhs);
}
template <class charT>
inline basic_string<charT>
operator+ (const charT* lhs, const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH
{
return basic_string<charT>::op_plus (lhs, rhs);
}
template <class charT>
inline basic_string<charT>
operator+ (charT lhs, const basic_string<charT>& rhs)
_THROW_ALLOC_LENGTH
{
return basic_string<charT>::op_plus (lhs, rhs);
}
template <class charT>
inline basic_string<charT>
operator+ (const basic_string<charT>& lhs, const charT* rhs)
_THROW_ALLOC_LENGTH
{
return basic_string<charT>::op_plus (lhs, rhs);
}
template <class charT>
inline basic_string<charT>
operator+ (const basic_string<charT>& lhs, charT rhs)
_THROW_ALLOC_LENGTH
{
return basic_string<charT>::op_plus (lhs, rhs);
}
/*
template <class charT>
inline ostream&
operator<< (ostream& o, const basic_string<charT>& s)
_THROW_NONE
{
return basic_string<charT>::op_lshift (o, s);
}
template <class charT>
inline istream&
operator>> (istream& i, basic_string<charT>& s)
_THROW_ALLOC_LENGTH
{
return basic_string<charT>::op_rshift (i, s);
}
*/
typedef basic_string<char> cstring;
typedef basic_string<char> string;
// typedef basic_string<wchar_t> wstring;
/* The following is a workaround for a compiler bug in some versions
of the Apogee compiler. This looks pretty weird, and it shouldn't
work, but more obvious constructs cause other error messages.---DRM */
#if 0
inline void destroy(string* pointer) {
pointer->~basic_string();
}
#endif
#endif