(file) Return to String.cpp CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / Common

Diff for /pegasus/src/Pegasus/Common/String.cpp between version 1.4 and 1.97

version 1.4, 2001/02/26 04:33:28 version 1.97, 2004/10/17 20:39:17
Line 1 
Line 1 
 //BEGIN_LICENSE  //%2004////////////////////////////////////////////////////////////////////////
 // //
 // Copyright (c) 2000 The Open Group, BMC Software, Tivoli Systems, IBM  // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
   // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
   // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L.P.;
   // IBM Corp.; EMC Corporation, The Open Group.
   // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
   // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
   //
   // Permission is hereby granted, free of charge, to any person obtaining a copy
   // of this software and associated documentation files (the "Software"), to
   // deal in the Software without restriction, including without limitation the
   // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
   // sell copies of the Software, and to permit persons to whom the Software is
   // furnished to do so, subject to the following conditions:
   //
   // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN
   // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
   // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
   // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
   // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
   // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
   // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
   // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 // //
 // Permission is hereby granted, free of charge, to any person obtaining a  //==============================================================================
 // copy of this software and associated documentation files (the "Software"),  
 // to deal in the Software without restriction, including without limitation  
 // the rights to use, copy, modify, merge, publish, distribute, sublicense,  
 // and/or sell copies of the Software, and to permit persons to whom the  
 // Software is furnished to do so, subject to the following conditions:  
 // //
 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR  // Author: Mike Brasher (mbrasher@bmc.com)
 // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,  
 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL  
 // THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER  
 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING  
 // FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER  
 // DEALINGS IN THE SOFTWARE.  
 // //
 //END_LICENSE  // Modified By: Roger Kumpf, Hewlett-Packard Company (roger_kumpf@hp.com)
 //BEGIN_HISTORY  
 // //
 // Author:  //%/////////////////////////////////////////////////////////////////////////////
 //  
 // $Log$  
 // Revision 1.4  2001/02/26 04:33:28  mike  #include <cctype>
 // Fixed many places where cim names were be compared with operator==(String,String).  #include <cstring>
 // Changed all of these to use CIMName::equal()  #include "String.h"
 //  #include "Array.h"
 // Revision 1.3  2001/02/11 17:19:30  mike  #include "InternalException.h"
 // added reverseFind() method  #include <iostream>
   #include <fstream>
   
   #include "CommonUTF.h"
   
   #ifdef PEGASUS_HAS_ICU
   #include <unicode/unistr.h>
   #endif
   
   PEGASUS_USING_STD;
   
   PEGASUS_NAMESPACE_BEGIN
   
   ///////////////////////////////////////////////////////////////////////////////
 // //
 // Revision 1.2  2001/02/11 05:42:33  mike  // CString
 // new  
 // //
 // Revision 1.1.1.1  2001/01/14 19:53:14  mike  ///////////////////////////////////////////////////////////////////////////////
 // Pegasus import  
   CString::CString()
       : _rep(0)
   {
   }
   
   CString::CString(const CString& cstr)
   {
       _rep = 0;
   
       if (cstr._rep)
       {
           _rep = (void*)new char[strlen((char*)cstr._rep)+1];
           strcpy((char*)_rep, (char*)cstr._rep);
       }
   }
   
   CString::CString(char* cstr)
       : _rep(cstr)
   {
   }
   
   CString::~CString()
   {
       if (_rep)
       {
           delete [] (char*)_rep;
       }
   }
   
   CString& CString::operator=(const CString& cstr)
   {
       if (&cstr != this)
       {
           if (_rep)
           {
               delete [] (char*)_rep;
               _rep = 0;
           }
           if (cstr._rep)
           {
               _rep = (char*)new char[strlen((char*)cstr._rep)+1];
               strcpy((char*)_rep, (char*)cstr._rep);
           }
       }
       return *this;
   }
   
   CString::operator const char*() const
   {
       return (char*)_rep;
   }
   
   ///////////////////////////////////////////////////////////////////////////////
 // //
   // String
 // //
 //END_HISTORY  ///////////////////////////////////////////////////////////////////////////////
  
 #include <cctype>  const String String::EMPTY = String();
 #include "String.h"  
 #include "Exception.h"  
 #include "String.h"  
  
 PEGASUS_NAMESPACE_BEGIN  Uint32 _strnlen(const char* str, Uint32 n)
   {
       if (!str)
           throw NullPointer();
   
       for (Uint32 i=0; i<n; i++)
       {
           if (!*str)
           {
               return i;
           }
       }
   
       return n;
   }
   
   Uint32 _strnlen(const Char16* str, Uint32 n)
   {
       if (!str)
           throw NullPointer();
  
 const String String::EMPTY;      for (Uint32 i=0; i<n; i++)
       {
           if (!*str)
           {
               return i;
           }
       }
   
       return n;
   }
  
 inline Uint32 StrLen(const char* str)  inline Uint32 _StrLen(const char* str)
 { {
     if (!str)     if (!str)
         throw NullPointer();         throw NullPointer();
Line 56 
Line 156 
     return strlen(str);     return strlen(str);
 } }
  
 inline Uint32 StrLen(const Char16* str)  inline Uint32 _StrLen(const Char16* str)
 { {
     if (!str)     if (!str)
         throw NullPointer();         throw NullPointer();
Line 69 
Line 169 
     return n;     return n;
 } }
  
   class StringRep
   {
   public:
       StringRep()
       {}
       StringRep(const StringRep& r)
           : c16a(r.c16a)
       {}
       StringRep(const Char16* str)
           : c16a(str, _StrLen(str) + 1)
       {}
   
       Array<Char16> c16a;
   };
   
 String::String() String::String()
 { {
     _rep.append('\0');      _rep = new StringRep;
       _rep->c16a.append('\0');
 } }
  
 String::String(const String& x) : _rep(x._rep)  String::String(const String& str)
 { {
     if (str._rep != NULL)
     {
       _rep = new StringRep(*str._rep);
 } }
     else
 String::String(const String& x, Uint32 n)  
 { {
     _rep.append('\0');      _rep = new StringRep();
     append(x.getData(), n);  
 } }
   }
   
  
 String::String(const Char16* x) : _rep(x, StrLen(x) + 1)  String::String(const String& str, Uint32 n)
 { {
       _rep = new StringRep;
       assign(str.getChar16Data(), n);
   }
  
   String::String(const Char16* str)
   {
       _rep = new StringRep(str);
 } }
  
 String::String(const Char16* x, Uint32 n)  String::String(const Char16* str, Uint32 n)
 { {
     assign(x, n);      _rep = new StringRep;
       assign(str, n);
 } }
  
 String::String(const char* str) String::String(const char* str)
 { {
     Uint32 n = ::strlen(str) + 1;      _rep = new StringRep;
     reserve(n);      assign(str);
   }
  
     while (n--)  String::String(const char* str, Uint32 n)
         _rep.append(*str++);  {
       _rep = new StringRep;
       assign(str, n);
 } }
  
 String::String(const char* str, Uint32 n_)  String::~String()
 { {
     Uint32 n = _min(strlen(str), n_);      delete _rep;
     reserve(n + 1);  }
  
     while (n--)  String& String::operator=(const String& str)
         _rep.append(*str++);  {
       if (&str != this)
       {
           assign(str);
       }
       return *this;
   }
  
     _rep.append('\0');  String& String::assign(const String& str)
   {
       _rep->c16a = str._rep->c16a;
       return *this;
 } }
  
 String& String::assign(const Char16* x)  String& String::assign(const Char16* str)
 { {
     _rep.clear();      _rep->c16a.clear();
     _rep.append(x, StrLen(x) + 1);      _rep->c16a.append(str, _StrLen(str) + 1);
     return *this;     return *this;
 } }
  
 String& String::assign(const Char16* str, Uint32 n) String& String::assign(const Char16* str, Uint32 n)
 { {
     _rep.clear();      _rep->c16a.clear();
     Uint32 m = _min(StrLen(str), n);      Uint32 m = _strnlen(str, n);
     _rep.append(str, m);      _rep->c16a.append(str, m);
     _rep.append('\0');      _rep->c16a.append('\0');
     return *this;     return *this;
 } }
  
 String& String::assign(const char* x)  String& String::assign(const char* str, Uint32 n)
 { {
     _rep.clear();      char *tmpStr = new char[n+1];
     Uint32 n = strlen(x);      memset(tmpStr,0x00,n+1);
     _rep.reserve(n + 1);  
  
     while (n--)      strncpy(tmpStr,str,n);
         _rep.append(*x++);      assign(tmpStr);
       delete [] tmpStr;
     _rep.append('\0');  
  
     return *this;     return *this;
 } }
  
 String& String::assign(const char* x, Uint32 n_)  void String::clear()
 { {
     _rep.clear();      _rep->c16a.clear();
       _rep->c16a.append('\0');
   }
  
     Uint32 n = _min(strlen(x), n_);  void String::reserveCapacity(Uint32 capacity)
     _rep.reserve(n + 1);  {
       _rep->c16a.reserveCapacity(capacity + 1);
   }
  
     while (n--)  Uint32 String::size() const
         _rep.append(*x++);  {
       return _rep->c16a.size() - 1;
   }
  
     _rep.append('\0');  const Char16* String::getChar16Data() const
   {
       return _rep->c16a.getData();
   }
   
   Char16& String::operator[](Uint32 index)
   {
       if (index > size())
           throw IndexOutOfBoundsException();
  
       return _rep->c16a[index];
   }
   
   const Char16 String::operator[](Uint32 index) const
   {
       if (index > size())
           throw IndexOutOfBoundsException();
   
       return _rep->c16a[index];
   }
   
   String& String::append(const Char16& c)
   {
       _rep->c16a.insert(_rep->c16a.size() - 1, c);
     return *this;     return *this;
 } }
  
 char* String::allocateCString(Uint32 extraBytes, Boolean noThrow) const  String& String::append(const Char16* str, Uint32 n)
 { {
     Uint32 n = getLength() + 1;      Uint32 m = _strnlen(str, n);
     char* str = new char[n + extraBytes];      _rep->c16a.reserveCapacity(_rep->c16a.size() + m);
     char* p = str;      _rep->c16a.remove(_rep->c16a.size() - 1);
     const Char16* q = getData();      _rep->c16a.append(str, m);
       _rep->c16a.append('\0');
       return *this;
   }
  
     for (Uint32 i = 0; i < n; i++)  String& String::append(const String& str)
   {
       return append(str.getChar16Data(), str.size());
   }
   
   void String::remove(Uint32 index, Uint32 size)
     {     {
         Uint16 c = *q++;      if (size == PEG_NOT_FOUND)
         *p++ = char(c);          size = this->size() - index;
   
       if (index + size > this->size())
           throw IndexOutOfBoundsException();
  
         if ((c & 0xff00) && !noThrow)      if (size)
             throw TruncatedCharacter();          _rep->c16a.remove(index, size);
     }     }
  
     return str;  String String::subString(Uint32 index, Uint32 length) const
   {
       if (index < size())
       {
           if ((length == PEG_NOT_FOUND) || (length > size() - index))
               length = size() - index;
   
           return String(getChar16Data() + index, length);
       }
       else
           return String();
 } }
  
 void String::appendToCString(  Uint32 String::find(Char16 c) const
     char* str,  
     Uint32 length,  
     Boolean noThrow) const  
 { {
     if (!str)      const Char16* first = getChar16Data();
         throw NullPointer();  
  
     Uint32 n = _min(getLength(), length);      for (const Char16* p = first; *p; p++)
       {
           if (*p == c)
               return  p - first;
       }
  
     char* p = str + strlen(str);      return PEG_NOT_FOUND;
     const Char16* q = getData();  }
  
     for (Uint32 i = 0; i < n; i++)  Uint32 String::find(Uint32 index, Char16 c) const
     {     {
         Uint16 c = *q++;      const Char16* data = getChar16Data();
         *p++ = char(c);  
  
         if ((c & 0xff00) && !noThrow)      for (Uint32 i = index, n = size(); i < n; i++)
             throw TruncatedCharacter();      {
           if (data[i] == c)
               return i;
     }     }
  
     *p = '\0';      return PEG_NOT_FOUND;
 } }
  
 Char16& String::operator[](Uint32 i)  Uint32 String::find(const String& s) const
 { {
     if (i > getLength())      const Char16* pSubStr = s.getChar16Data();
         ThrowOutOfBounds();      const Char16* pStr = getChar16Data();
       Uint32 subStrLen = s.size();
       Uint32 strLen = size();
  
     return _rep[i];      if (subStrLen > strLen)
       {
           return PEG_NOT_FOUND;
 } }
  
 const Char16 String::operator[](Uint32 i) const      // loop to find first char match
       Uint32 loc = 0;
       for( ; loc <= (strLen-subStrLen); loc++)
 { {
     if (i > getLength())          if (*pStr++ == *pSubStr)  // match first char
         ThrowOutOfBounds();          {
               // point to substr 2nd char
               const Char16* p = pSubStr + 1;
  
     return _rep[i];              // Test remaining chars for equal
               Uint32 i = 1;
               for (; i < subStrLen; i++)
                   if (*pStr++ != *p++ )
                       {pStr-=i; break;} // break from loop
               if (i == subStrLen)
                   return loc;
           }
       }
       return PEG_NOT_FOUND;
 } }
  
 String& String::append(const Char16* str, Uint32 n)  Uint32 String::reverseFind(Char16 c) const
 { {
     Uint32 m = _min(StrLen(str), n);      const Char16* first = getChar16Data();
     _rep.reserve(_rep.getSize() + m);      const Char16* last = getChar16Data() + size();
     _rep.remove(_rep.getSize() - 1);  
     _rep.append(str, m);      while (last != first)
     _rep.append('\0');      {
     return *this;          if (*--last == c)
               return last - first;
 } }
  
 void String::remove(Uint32 pos, Uint32 size)      return PEG_NOT_FOUND;
   }
   
   void String::toLower()
 { {
     if (size == Uint32(-1))      const char * noLocale = NULL;
         size = getLength() - pos;      String::toLower(noLocale);
   }
   void String::toLower(const char * strLocale)
   {
   #ifdef PEGASUS_HAS_ICU
       UnicodeString UniStr((const UChar *)_rep->c16a.getData());
       if(strLocale == NULL)
       {
           UniStr.toLower();
       }
       else
       {
           Locale loc(strLocale);
           if(loc.isBogus())
           {
               throw InvalidNameException(String(strLocale));
           }
           UniStr.toLower(loc);
       }
       UniStr.append((UChar)'\0');
  
     if (pos + size > getLength())      assign((Char16*)UniStr.getBuffer());
         ThrowOutOfBounds();  #else
       for (Char16* p = &_rep->c16a[0]; *p; p++)
       {
           if (*p <= PEGASUS_MAX_PRINTABLE_CHAR)
               *p = tolower(*p);
       }
   #endif
   }
  
     if (size)  void String::toUpper(const char * strLocale)
         _rep.remove(pos, size);  {
   #ifdef PEGASUS_HAS_ICU
       UnicodeString UniStr((const UChar *)_rep->c16a.getData());
       if(strLocale == NULL)
       {
           UniStr.toUpper();
       }
       else
       {
           Locale loc(strLocale);
           if(loc.isBogus())
           {
               throw InvalidNameException(String(strLocale));
           }
           UniStr.toUpper(loc);
 } }
       UniStr.append((UChar)'\0');
  
 int String::compare(const Char16* s1, const Char16* s2, Uint32 n)      assign((Char16*)UniStr.getBuffer());
   #else
       for (Char16* p = &_rep->c16a[0]; *p; p++)
 { {
           if (*p <= PEGASUS_MAX_PRINTABLE_CHAR)
               *p = toupper(*p);
       }
   #endif
   }
   
   int String::compare(const String& s1, const String& s2, Uint32 n)
   {
       const Char16* s1c16 = s1.getChar16Data();
       const Char16* s2c16 = s2.getChar16Data();
   
     while (n--)     while (n--)
     {     {
         int r = *s1++ - *s2++;          int r = *s1c16++ - *s2c16++;
  
         if (r)         if (r)
             return r;             return r;
Line 255 
Line 515 
     return 0;     return 0;
 } }
  
 Boolean String::equal(const String& x, const String& y)  int String::compare(const String& s1, const String& s2)
 { {
     if (x.getLength() != y.getLength())      const Char16* s1c16 = s1.getChar16Data();
         return false;      const Char16* s2c16 = s2.getChar16Data();
  
     return String::compare(x.getData(), y.getData(), x.getLength()) == 0;      while (*s1c16 && *s2c16)
       {
           int r = *s1c16++ - *s2c16++;
   
           if (r)
               return r;
 } }
  
 Boolean String::equal(const String& x, const Char16* y)      if (*s2c16)
 {          return -1;
     if (x.getLength() != StrLen(y))      else if (*s1c16)
         return false;          return 1;
  
     return String::compare(x.getData(), y, x.getLength()) == 0;      return 0;
 } }
  
 Boolean String::equal(const Char16* x, const String& y)  int String::compareNoCase(const String& s1, const String& s2)
 { {
     return equal(y, x);      const char * noLocale = NULL;
       return String::compareNoCase(s1, s2, noLocale);
 } }
  
 Boolean String::equal(const String& x, const char* y)  int String::compareNoCase(const String& s1, const String& s2,const char * strLocale)
 { {
     return equal(x, String(y));  #ifdef PEGASUS_HAS_ICU
       UnicodeString UniStr1((const UChar *)s1.getChar16Data(), (int32_t)s1.size());
       UnicodeString UniStr2((const UChar *)s2.getChar16Data(), (int32_t)s2.size());
       if(strLocale == NULL)
       {
           UniStr1.toLower();
           UniStr2.toLower();
 } }
       else
 Boolean String::equal(const char* x, const String& y)      {
           Locale loc(strLocale);
           if(loc.isBogus())
 { {
     return equal(String(x), y);              throw InvalidNameException(String(strLocale));
 } }
           UniStr1.toLower(loc);
           UniStr2.toLower(loc);
       }
       // Note:  the ICU 2.6.1 documentation for UnicodeString::compare( ) is
       // backwards!  The API actually returns +1 if this is greater than text.
       // This is why the line below appears wrong based on the 2.6.1 docs.
       // (ref. bugzilla 1207)
       return (UniStr1.compare(UniStr2));
   #else
       const Char16* _s1 = s1.getChar16Data();
       const Char16* _s2 = s2.getChar16Data();
  
       while (*_s1 && *_s2)
       {
           int r;
  
 String String::subString(Uint32 pos, Uint32 length) const          if (*_s1 <= PEGASUS_MAX_PRINTABLE_CHAR &&
               *_s2 <= PEGASUS_MAX_PRINTABLE_CHAR)
 { {
     if (pos < getLength())              r = tolower(*_s1++) - tolower(*_s2++);
           }
           else
     {     {
         if (length == Uint32(-1))              r = *_s1++ - *_s2++;
             length = getLength() - pos;          }
  
         return String(getData() + pos, length);          if (r)
               return r;
     }     }
     else  
         return String();      if (*_s2)
           return -1;
       else if (*_s1)
           return 1;
   
       return 0;
   #endif
 } }
  
 Uint32 String::find(Char16 c) const  Boolean String::equal(const String& str1, const String& str2)
 { {
     const Char16* first = getData();      return String::compare(str1, str2) == 0;
   }
  
     for (const Char16* p = first; *p; p++)  Boolean String::equalNoCase(const String& str1, const String& str2)
     {     {
         if (*p == c)      const char * noLocale = NULL;
             return  p - first;      return String::equalNoCase(str1, str2, noLocale);
     }     }
  
     return Uint32(-1);  Boolean String::equalNoCase(const String& str1, const String& str2,const char * strLocale)
   {
   #ifdef PEGASUS_HAS_ICU
       UnicodeString UniStr1((const UChar *)str1.getChar16Data(), (int32_t)str1.size());
       UnicodeString UniStr2((const UChar *)str2.getChar16Data(), (int32_t)str2.size());
       if(strLocale == NULL)
       {
           UniStr1.toLower();
           UniStr2.toLower();
 } }
       else
 Uint32 String::reverseFind(Char16 c) const  
 { {
     const Char16* first = getData();          Locale loc(strLocale);
     const Char16* last = getData() + getLength();          if(loc.isBogus())
           {
               throw InvalidNameException(String(strLocale));
           }
           UniStr1.toLower(loc);
           UniStr2.toLower(loc);
       }
       return (UniStr1 == UniStr2);
   #else
       if (str1.size() != str2.size())
           return false;
  
     while (last != first)      const Char16* p = str1.getChar16Data();
       const Char16* q = str2.getChar16Data();
   
       Uint32 n = str1.size();
   
       while (n--)
     {     {
         if (*--last == c)          if (*p <= PEGASUS_MAX_PRINTABLE_CHAR &&
             return last - first;              *q <= PEGASUS_MAX_PRINTABLE_CHAR)
           {
               if (tolower(*p++) != tolower(*q++))
                   return false;
           }
           else if (*p++ != *q++)
               return false;
     }     }
  
     return Uint32(-1);      return true;
   #endif
 } }
  
 int String::compare(const Char16* s1, const Char16* s2)  // UTF8 specific code:
   String& String::assign(const char* str)
 { {
     while (*s1 && *s2)      _rep->c16a.clear();
       Uint32 n = strlen(str) + 1;
   
       const Uint8 *strsrc = (Uint8 *)str;
       Uint8 *endsrc = (Uint8 *)&str[n-1];
   
       Char16 *msg16 = new Char16[n];
       Uint16 *strtgt = (Uint16 *)msg16;
       Uint16 *endtgt = (Uint16 *)&msg16[n];
   
       UTF8toUTF16(&strsrc,
                   endsrc,
                   &strtgt,
                   endtgt);
   
       Uint32 count;
   
       for(count = 0; ((msg16[count]) != Char16(0x00)) && (count < (n - 1)); ++count);
   
       _rep->c16a.append(msg16, count);
   
       _rep->c16a.append('\0');
   
       delete [] msg16;
   
       return *this;
   }
   
   CString String::getCString() const
     {     {
         int r = *s1++ - *s2++;      Uint32 n = 3*size() + 1;
       char* str = new char[n];
  
         if (r)      const Char16* msg16 = getChar16Data();
             return r;  
       const Uint16 *strsrc = (Uint16 *)msg16;
       Uint16 *endsrc = (Uint16 *)&msg16[size()+1];
   
       Uint8 *strtgt = (Uint8 *)str;
       Uint8 *endtgt = (Uint8 *)&str[n];
   
       UTF16toUTF8 (&strsrc,
                    endsrc,
                    &strtgt,
                    endtgt);
   
           char* str1 = new char[strlen(str)+1];
           strcpy(str1,str);
           delete [] str;
   
       return CString(str1);
     }     }
  
     if (*s2)  #if 0
         return -1;  // ATTN-RK-P3-20020603: This code is not completely correct
     else if (*s1)   // Wildcard String matching function that may be useful in the future
         return 1;  // The following code was provided by Bob Blair.
  
     return 0;  /* _StringMatch Match input MatchString against a GLOB style pattern
          Note that MatchChar is the char type so that this source
          in portable to different string types. This is an internal function
   
     Results: The return value is 1 if string matches pattern, and
           0 otherwise.  The matching operation permits the following
           special characters in the pattern: *?\[] (see the manual
           entry for details on what these mean).
   
   
     Side effects: None.
    */
   
   /* MatchChar defined as a separate entity because this function source used
       elsewhere was an unsigned char *. Here we use Uint16 to  maintain 16 bit
       size.
   */
   typedef Uint16 MatchChar;
   
   inline Uint16 _ToLower(Uint16 ch)
   {
       // ICU_TODO:  If ICU is available we should do this the correct way.
       return ch <= PEGASUS_MAX_PRINTABLE_CHAR ? tolower(char(ch)) : ch;
   }
   
   inline Boolean _Equal(MatchChar ch1, MatchChar ch2, int nocase)
   {
       // ICU_TODO:  If ICU is available we should do this the correct way.
       if (nocase)
           return _ToLower(ch1) == _ToLower(ch2);
       else
           return ch1 == ch2;
 } }
  
 std::ostream& operator<<(std::ostream& os, const String& x)  
   static const MatchChar *
   _matchrange(const MatchChar *range, MatchChar c, int nocase)
 { {
     for (Uint32 i = 0, n = x.getLength(); i < n; i++)    const MatchChar *p = range;
         os << x[i];    const MatchChar *rstart = range + 1;
     const MatchChar *rend = 0;
     MatchChar compchar;
   
     for (rend = rstart; *rend && *rend != ']'; rend++);
     if (*rend == ']') {  // if there is an end to this pattern
       for (compchar = *rstart; rstart != rend; rstart++) {
         if (_Equal(*rstart, c, nocase))
           return ++rend;
         if (*rstart == '-') {
           rstart++;
           if (c >= compchar && c <= *rstart)
             return ++rend;
         }
       }
     }
     return (const MatchChar *)0;
   }
   
   static int
   _StringMatch(
       const MatchChar *testString,
       const MatchChar *pattern,
       int nocase )                /* Ignore case if this is true */
   {
     const MatchChar *pat = pattern;
     const MatchChar *str = testString;
     unsigned int done = 0;
     unsigned int res = 0;  // the result: 1 == match
   
     while (!done) { // main loop walks through pattern and test string
       //cerr << "Comparing <" << *pat << "> and <" << *str << ">" << endl;
       if (!*pat) {                                         //end of pattern
         done = 1;                                          // we're done
         if (!*str)                                         //end of test, too?
           res = 1;                                         // then we matched
       } else {                                             //Not end of pattern
         if (!*str) {                                       // but end of test
           done = 1;                                        // We're done
           if (*pat == '*')                                 // If pattern openends
             res = 1;                                       //  then we matched
         } else {                                           //Not end of test
           if (*pat == '*') {                               //Ambiguuity found
             if (!*++pat) {                                 //and it ends pattern
               done = 1;                                    //  then we're done
               res = 1;                                     //  and match
             } else {                                       //if it doesn't end
               while (!done) {                              //  until we're done
                 if (_StringMatch(str, pat, nocase)) {      //  we recurse
                   done = 1;                                //if it recurses true
                   res = 1;                                 //  we done and match
                 } else {                                   //it recurses false
                   if (!*str)                               // see if test is done
                     done = 1;                              //  yes: we done
                   else                                     // not done:
                     str++;                                 //   keep testing
                 } // end test on recursive call
               } // end looping on recursive calls
             } // end logic when pattern is ambiguous
           } else {                                         //pattern not ambiguus
             if (*pat == '?') {                             //pattern is 'any'
               pat++, str++;                                //  so move along
             } else if (*pat == '[') {                      //see if it's a range
               pat = _matchrange(pat, *str, nocase);         // and is a match
               if (!pat) {                                  //It is not a match
                 done = 1;                                  //  we're done
                 res = 0;                                   //  no match
               } else {                                     //Range matches
                 str++, pat++;                              //  keep going
               }
             } else {               // only case left is individual characters
               if (!_Equal(*pat++, *str++, nocase))         // if they don't match
                 done = 1;                                  //   bail.
             }
           }  // end ("pattern is not ambiguous (*)" logic
         } // end logic when pattern and string still have data
       } // end logic when pattern still has data
     } // end main loop
     return res;
   }
   
   
       /** match matches a string against a GLOB style pattern.
           Return trues if the String parameter matches the pattern. C-Shell style
           glob matching is used.
           @param str String to be matched against the pattern
           @param pattern Pattern to use in the match
           @return Boolean true if str matches pattern
           The pattern definition is as follows:
           <pre>
           *             Matches any number of any characters
           ?             Match exactly one character
           [chars]       Match any character in chars
           [chara-charb] Match any character in the range between chara and charb
           </pre>
           The literal characters *, ?, [, ] can be included in a string by
           escaping them with backslash "\".  Ranges of characters can be concatenated.
           <pre>
           examples:
           Boolean result = String::match("This is a test", "*is*");
           Boolean works =  String::match("abcdef123", "*[0-9]");
           </pre>
       */
   Boolean String::match(const String& str, const String& pattern)
   {
       return _StringMatch(
           (Uint16*)str.getChar16Data(), (Uint16*)pattern.getChar16Data(), 0) != 0;
   }
   
       /** matchNoCase Matches a String against a GLOB style pattern independent
           of case.
           Returns true if the str parameter matches the pattern. C-Shell style
           glob matching is used. Ignore case in all comparisons. Case is
           ignored in the match.
           @parm str String containing the string to be matched\
           @parm pattern GLOB style patterh to use in the match.
           @return Boolean true if str matches patterh
           @SeeAlso match
       */
   Boolean String::matchNoCase(const String& str, const String& pattern)
   {
       return _StringMatch(
           (Uint16*)str.getChar16Data(), (Uint16*)pattern.getChar16Data(), 1) != 0;
   }
   #endif
   
   
   ///////////////////////////////////////////////////////////////////////////////
   //
   // String-related functions
   //
   ///////////////////////////////////////////////////////////////////////////////
   
   Boolean operator==(const String& str1, const String& str2)
   {
       return String::equal(str1, str2);
   }
   
   Boolean operator==(const String& str1, const char* str2)
   {
       return String::equal(str1, str2);
   }
   
   Boolean operator==(const char* str1, const String& str2)
   {
       return String::equal(str1, str2);
   }
   
   Boolean operator!=(const String& str1, const String& str2)
   {
       return !String::equal(str1, str2);
   }
   
   PEGASUS_STD(ostream)& operator<<(PEGASUS_STD(ostream)& os, const String& str)
   {
   
   #if defined(PEGASUS_OS_OS400)
       CString cstr = str.getCString();
       const char* utf8str = cstr;
   
       os << utf8str;
   
   #elif defined(PEGASUS_HAS_ICU)
           if(os == cout || os == cerr){
               char *buf = NULL;
           const int size = str.size() * 6;
           UnicodeString UniStr((const UChar *)str.getChar16Data(), (int32_t)str.size());
           Uint32 bufsize = UniStr.extract(0,size,buf);
   
           buf = new char[bufsize+1];
           UniStr.extract(0,bufsize,buf);
           os << buf;
           os.flush();
           delete [] buf;
           }else{
                   CString cstr = str.getCString();
           const char* utf8str = cstr;
           os << utf8str;
           }
   
   #else
           for (Uint32 i = 0, n = str.size(); i < n; i++)
           {
                   Uint16 code = str[i];
   
                   if (code > 0 && code <= PEGASUS_MAX_PRINTABLE_CHAR)
                   {
                    os << char(code);
                   }
                   else
                   {
                   // Print in hex format:
                   char buffer[8];
                   sprintf(buffer, "\\x%04X", code);
                   os << buffer;
                   }
           }
   #endif // End of PEGASUS_HAS_ICU #else leg.
  
     return os;     return os;
 } }
  
 void String::toLower(char* str)  String operator+(const String& str1, const String& str2)
 { {
     while (*str)      return String(str1).append(str2);
         tolower(*str++);  
 } }
  
 String ToLower(const String& str)  Boolean operator<(const String& str1, const String& str2)
 { {
     String tmp(str);      return String::compare(str1, str2) < 0;
   }
  
     for (Uint32 i = 0, n = tmp.getLength(); i < n; i++)  Boolean operator<=(const String& str1, const String& str2)
     {     {
         Char16 c = tmp[i];      return String::compare(str1, str2) <= 0;
   }
  
         if (c <= 127)  Boolean operator>(const String& str1, const String& str2)
             tmp[i] = tolower(c);  {
       return String::compare(str1, str2) > 0;
     }     }
  
     return tmp;  Boolean operator>=(const String& str1, const String& str2)
   {
       return String::compare(str1, str2) >= 0;
 } }
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END


Legend:
Removed from v.1.4  
changed lines
  Added in v.1.97

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2