mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-07 18:30:55 +03:00
7c65581dd3
AIS_ColorScale, AIS_Dimension - the protected method DrawText() has been renamed to drawText() to avoid name collisions with macros. _MSC_VER/_WIN32 misuse has been fixed in several places. Header <malloc.h> is now included where alloca() is used. Draw_Window - dllimport flag has been dropped from inline methods. TKernel - mandatory dependencies Winspool.lib and Psapi.lib are now linked explicitly (instead of msvc-specific pragma syntax). CMake scripts - the option -std=c++0x has been replaced by -std=gnu++0x for mingw to allow extensions (like _wfopen() and others). The minimum Windows version has been set to _WIN32_WINNT=0x0501. Invalid options "-z defs" and "-lm" have been dropped for mingw. Flag --export-all-symbols has been added to CMAKE_SHARED_LINKER_FLAGS to workaround missing vtable symbols when using mingw. FreeType is now linked explicitly on Windows. Draw::Load() - "lib" suffix is now prepended on mingw as well. Drop redundant declaration of _TINT from OSD_WNT_1.hxx. NCollection_UtfString::FromLocale() - platform-specific code has been moved to .cxx file. Draw_BasicCommands - fixed incorrect mingw64 version macros. genproj, cbp - added workaround for process argument list limits on Windows. TKSTEP linkage is failing on this platform due to too long list of files. The list of object files to link is now stored in dedicated file which is passed to gcc. Option "-z defs" removed from CMake linker options to avoid problems when building with different configurations of VTK on Linux Some MinGW-specific compiler warnings (potentially uninitialized vars, use of NULL, parentheses in conditional expressions) are fixed (speculatively)
928 lines
30 KiB
C++
928 lines
30 KiB
C++
// Copyright (c) 1993-1999 Matra Datavision
|
|
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
|
//
|
|
// This file is part of Open CASCADE Technology software library.
|
|
//
|
|
// This library is free software; you can redistribute it and/or modify it under
|
|
// the terms of the GNU Lesser General Public License version 2.1 as published
|
|
// by the Free Software Foundation, with special exception defined in the file
|
|
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
|
// distribution for complete text of the license and disclaimer of any warranty.
|
|
//
|
|
// Alternatively, this file may be used under the terms of Open CASCADE
|
|
// commercial license or contractual agreement.
|
|
|
|
|
|
#include <Standard.hxx>
|
|
#include <Standard_ExtString.hxx>
|
|
#include <Standard_NegativeValue.hxx>
|
|
#include <Standard_NullObject.hxx>
|
|
#include <Standard_NumericError.hxx>
|
|
#include <Standard_OutOfRange.hxx>
|
|
#include <TCollection_AsciiString.hxx>
|
|
#include <TCollection_ExtendedString.hxx>
|
|
|
|
#include <cctype>
|
|
#include <cstdio>
|
|
static
|
|
Standard_PExtCharacter Allocate(const Standard_Size aLength);
|
|
|
|
static
|
|
Standard_PExtCharacter Reallocate(Standard_Address aAddr,
|
|
const Standard_Size aLength);
|
|
|
|
Standard_EXPORT short NULL_EXTSTRING[1] = {0};
|
|
|
|
//============================== input value have len = 2 bytes ====
|
|
inline Standard_ExtCharacter ConvertToUnicode2B (unsigned char *p)
|
|
{
|
|
// *p, *(p+1)
|
|
// little endian
|
|
union {
|
|
struct {
|
|
unsigned char l;
|
|
unsigned char h;
|
|
} hl;
|
|
Standard_ExtCharacter chr;
|
|
} EL;
|
|
|
|
unsigned char l = *(p+1);
|
|
l |= 0xC0;
|
|
unsigned char h = *p;
|
|
h <<= 6;
|
|
h |= 0x3F;
|
|
l &= h;// l is defined
|
|
h = *p;
|
|
h >>= 2;
|
|
h &= 0x07;
|
|
EL.hl.l = l;
|
|
EL.hl.h = h;
|
|
return EL.chr;
|
|
}
|
|
|
|
//============================== input value have len = 3 bytes ====
|
|
inline Standard_ExtCharacter ConvertToUnicode3B (unsigned char *p)
|
|
{
|
|
// *p, *(p+1), *(p+2) =>0 , 1, 2
|
|
// little endian
|
|
union {
|
|
struct {
|
|
unsigned char l;
|
|
unsigned char h;
|
|
} hl;
|
|
Standard_ExtCharacter chr;
|
|
} EL;
|
|
|
|
|
|
unsigned char h = *(p+1);//h = 10yyyyyy
|
|
unsigned char l = *(p+2);//h = 10zzzzzz
|
|
|
|
l |= 0xC0;
|
|
h <<= 6; //yy------
|
|
h |= 0x3F; //yy111111
|
|
l &= h; // yyzzzzzz - l is defined
|
|
EL.hl.l = l;
|
|
|
|
unsigned char a = *p;// a = 1110xxxx
|
|
a <<= 4;//xxxx----
|
|
a |= 0x0F;//a = xxxx1111
|
|
h = *(p+1);
|
|
h >>= 2;//----yyyy
|
|
h |= 0xF0; //1111yyyy
|
|
a &= h; // a = xxxxyyyy
|
|
EL.hl.h = a; //h is defined
|
|
return EL.chr;
|
|
}
|
|
//============================== returns number of symbols in UTF8 string ====
|
|
inline Standard_Integer nbSymbols(const Standard_CString aStr) {
|
|
Standard_Integer aLen = 0;// length in symbols
|
|
int i = 0;
|
|
while (aStr[i] != '\0') {
|
|
if((aStr[i] & 0x80) == 0x00) //1byte => 1 symb - Lat1
|
|
{aLen++; i++;}
|
|
else if((aStr[i] & 0xE0) == 0xC0 &&
|
|
(aStr[i+1] &&
|
|
(aStr[i+1] & 0xC0) == 0x80)) {//2 bytes => 1 symb
|
|
aLen++;
|
|
i += 2;
|
|
} else if((aStr[i] & 0xF0) == 0xE0 &&
|
|
((aStr[i+1] && (aStr[i+1] & 0xC0) == 0x80)) &&
|
|
(aStr[i+2] && (aStr[i+2] & 0xC0) == 0x80)) {
|
|
aLen++;
|
|
i += 3;
|
|
} else
|
|
i++;
|
|
}
|
|
return aLen;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
// Create an empty ExtendedString
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString()
|
|
{
|
|
// mystring = 0L;
|
|
mylength = 0;
|
|
mystring = Allocate((mylength+1)*2);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
//----------------------------------------------------------------------------
|
|
// Create an ExtendedString from a Standard_CString
|
|
//----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_CString astring,
|
|
const Standard_Boolean isMultiByte)
|
|
: mystring(0), mylength(0)
|
|
{
|
|
if (astring) {
|
|
if(!isMultiByte) {
|
|
mylength = (int)strlen( astring );
|
|
mystring = Allocate((mylength+1)*2);
|
|
for (int i = 0 ; i < mylength ; i++)
|
|
mystring[i] = ToExtCharacter(astring[i]);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
else {
|
|
mylength = nbSymbols(astring);
|
|
mystring = Allocate( (mylength+1)*2 );
|
|
if(!ConvertToUnicode (astring))
|
|
{
|
|
mylength = (int)strlen( astring );
|
|
mystring = Reallocate(mystring, (mylength+1)*2);
|
|
for (int i = 0 ; i < mylength ; i++)
|
|
mystring[i] = ToExtCharacter(astring[i]);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
Standard_NullObject::Raise("TCollection_ExtendedString : "
|
|
"parameter 'astring'");
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
// Create an ExtendedString from an ExtString
|
|
//--------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_ExtString astring)
|
|
: mystring(0), mylength(0)
|
|
{
|
|
|
|
if (astring) {
|
|
for ( mylength=0; astring[mylength]; ++mylength );
|
|
const Standard_Integer size = (mylength+1)*2;
|
|
mystring = Allocate(size);
|
|
memcpy( mystring, astring, size );
|
|
mystring[mylength] = '\0';
|
|
}
|
|
else {
|
|
Standard_NullObject::Raise("TCollection_ExtendedString : null parameter ");
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Create an asciistring from a Standard_Character
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_Character aChar)
|
|
{
|
|
if ( aChar != '\0' ) {
|
|
mylength = 1;
|
|
mystring = Allocate(2*2);
|
|
mystring[0] = ToExtCharacter(aChar);
|
|
mystring[1] = '\0';
|
|
}
|
|
else {
|
|
// mystring = 0L;
|
|
mylength = 0;
|
|
mystring = Allocate((mylength+1)*2);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
}
|
|
|
|
//--------------------------------------------------------------------------
|
|
// Create a string from a ExtCharacter
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_ExtCharacter aChar)
|
|
{
|
|
mylength = 1;
|
|
mystring = Allocate(2*2);
|
|
mystring[0] = aChar;
|
|
mystring[1] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Create an AsciiString from a filler
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_Integer length,
|
|
const Standard_ExtCharacter filler )
|
|
{
|
|
mystring = Allocate( (length+1)*2 );
|
|
mylength = length;
|
|
for (int i = 0 ; i < length ; i++) mystring[i] = filler;
|
|
mystring[length] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Create a String from an Integer
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_Integer aValue)
|
|
{
|
|
union {int bid ;
|
|
char t [13];} CHN ;
|
|
Sprintf(&CHN.t[0],"%d",aValue);
|
|
mylength = (int)strlen(CHN.t);
|
|
mystring = Allocate((mylength+1)*2);
|
|
for (int i = 0 ; i < mylength ; i++) mystring[i] = ToExtCharacter(CHN.t[i]);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Create a String from a real
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const Standard_Real aValue)
|
|
{
|
|
union {int bid ;
|
|
char t [50];} CHN ;
|
|
Sprintf(&CHN.t[0],"%g",aValue);
|
|
mylength = (int)strlen( CHN.t );
|
|
mystring = Allocate((mylength+1)*2);
|
|
for (int i = 0 ; i < mylength ; i++) mystring[i] = ToExtCharacter(CHN.t[i]);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
// create an extendedstring from an extendedstring
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const TCollection_ExtendedString& astring)
|
|
{
|
|
const Standard_Integer size = (astring.mylength+1)*2;
|
|
mylength = astring.mylength;
|
|
mystring = Allocate(size);
|
|
memcpy( mystring, astring.mystring, size );
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
// Create an extendedstring from an AsciiString
|
|
//---------------------------------------------------------------------------
|
|
TCollection_ExtendedString::TCollection_ExtendedString
|
|
(const TCollection_AsciiString& astring)
|
|
{
|
|
mylength = nbSymbols(astring.ToCString());
|
|
mystring = Allocate((mylength+1)*2);
|
|
if(!ConvertToUnicode (astring.ToCString()))
|
|
{
|
|
mylength = astring.Length();
|
|
mystring = Reallocate(mystring, (mylength+1)*2);
|
|
Standard_CString aCString = astring.ToCString();
|
|
for (Standard_Integer i = 0; i <= mylength ; i++)
|
|
mystring[i] = ToExtCharacter( aCString[i] );
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// AssignCat
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::AssignCat
|
|
(const TCollection_ExtendedString& other)
|
|
{
|
|
Standard_Integer otherlength = other.mylength;
|
|
if (otherlength) {
|
|
Standard_ExtString sother = other.mystring;
|
|
Standard_Integer newlength = mylength + otherlength;
|
|
if (mystring) {
|
|
mystring = Reallocate(mystring, (newlength+1)*2 );
|
|
memcpy( mystring + mylength, sother, (otherlength+1)*2 );
|
|
}
|
|
else {
|
|
mystring = Allocate( (newlength+1)*2 );
|
|
memcpy( mystring, sother, (otherlength+1)*2 );
|
|
}
|
|
mylength = newlength;
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Cat
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString TCollection_ExtendedString::Cat
|
|
(const TCollection_ExtendedString& other) const
|
|
{
|
|
TCollection_ExtendedString res( mylength + other.mylength, 0 );
|
|
if ( mylength > 0 )
|
|
memcpy( res.mystring, mystring, mylength*2 );
|
|
if ( other.mylength > 0 )
|
|
memcpy( res.mystring + mylength, other.mystring, other.mylength*2 );
|
|
return res;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// ChangeAll
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::ChangeAll(const Standard_ExtCharacter aChar,
|
|
const Standard_ExtCharacter NewChar)
|
|
{
|
|
for (int i = 0 ; i < mylength; i++)
|
|
if (mystring[i] == aChar) mystring[i] = NewChar;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Clear
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Clear()
|
|
{
|
|
if (mystring) Standard::Free(mystring);
|
|
// mystring = 0L;
|
|
mylength = 0;
|
|
mystring = Allocate((mylength+1)*2);
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Copy
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Copy (const TCollection_ExtendedString& fromwhere)
|
|
{
|
|
|
|
if (fromwhere.mystring) {
|
|
const Standard_Integer newlength = fromwhere.mylength;
|
|
const Standard_Integer size = (newlength + 1) * 2;
|
|
if (mystring) {
|
|
mystring = Reallocate(mystring, size );
|
|
}
|
|
else {
|
|
mystring = Allocate( size );
|
|
}
|
|
mylength = newlength;
|
|
memcpy( mystring, fromwhere.mystring, size );
|
|
}
|
|
else {
|
|
if (mystring) {
|
|
mylength = 0;
|
|
mystring[mylength] = '\0';
|
|
}
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Destroy
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Destroy()
|
|
{
|
|
if (mystring) Standard::Free(mystring);
|
|
mystring = 0L;
|
|
}
|
|
|
|
//----------------------------------------------------------------------------
|
|
// Insert a character before 'where'th character
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Insert(const Standard_Integer where,
|
|
const Standard_ExtCharacter what)
|
|
{
|
|
if (where > mylength + 1 )
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Insert : "
|
|
"Parameter where is too big");
|
|
if (where < 0)
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Insert : "
|
|
"Parameter where is negative");
|
|
|
|
if (mystring) {
|
|
mystring = Reallocate(mystring, (mylength+2)*2);
|
|
}
|
|
else {
|
|
mystring = Allocate((mylength+2)*2);
|
|
}
|
|
if (where != mylength +1) {
|
|
for (int i=mylength-1; i >= where-1; i--)
|
|
mystring[i+1] = mystring[i];
|
|
}
|
|
mystring[where-1] = what;
|
|
mylength++;
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Insert
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Insert(const Standard_Integer where,
|
|
const TCollection_ExtendedString& what)
|
|
{
|
|
Standard_ExtString swhat = what.mystring;
|
|
if (where <= mylength + 1) {
|
|
Standard_Integer whatlength = what.mylength;
|
|
if(whatlength) {
|
|
Standard_Integer newlength = mylength + whatlength;
|
|
|
|
if (mystring) {
|
|
mystring = Reallocate(mystring,(newlength+1)*2);
|
|
}
|
|
else {
|
|
mystring = Allocate((newlength+1)*2);
|
|
}
|
|
if (where != mylength +1) {
|
|
for (int i=mylength-1; i >= where-1; i--)
|
|
mystring[i+whatlength] = mystring[i];
|
|
}
|
|
for (int i=0; i < whatlength; i++)
|
|
mystring[where-1+i] = swhat[i];
|
|
|
|
mylength = newlength;
|
|
mystring[mylength] = '\0';
|
|
}
|
|
}
|
|
else {
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Insert : "
|
|
"Parameter where is too big");
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsEqual
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsEqual
|
|
(const Standard_ExtString other) const
|
|
{
|
|
return ( memcmp( mystring, other, (mylength+1)*2 ) == 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsEqual
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsEqual
|
|
(const TCollection_ExtendedString& other) const
|
|
{
|
|
return ( memcmp( mystring, other.mystring, (mylength+1)*2 ) == 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsDifferent
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsDifferent
|
|
(const Standard_ExtString other ) const
|
|
{
|
|
return ( memcmp( mystring, other, (mylength+1)*2 ) != 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsDifferent
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsDifferent
|
|
(const TCollection_ExtendedString& other) const
|
|
{
|
|
return ( memcmp( mystring, other.mystring, (mylength+1)*2 ) != 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsLess
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsLess
|
|
(const Standard_ExtString other) const
|
|
{
|
|
return ( memcmp( mystring, other, (mylength+1)*2 ) < 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsLess
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsLess
|
|
(const TCollection_ExtendedString& other) const
|
|
{
|
|
return ( memcmp( mystring, other.mystring, (mylength+1)*2 ) < 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsGreater
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsGreater
|
|
(const Standard_ExtString other) const
|
|
{
|
|
return ( memcmp( mystring, other, (mylength+1)*2 ) > 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsGreater
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsGreater
|
|
(const TCollection_ExtendedString& other) const
|
|
{
|
|
return ( memcmp( mystring, other.mystring, (mylength+1)*2 ) > 0 );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// IsAscii
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::IsAscii() const
|
|
{
|
|
for( Standard_Integer i = 0 ; i < mylength ; i++)
|
|
if (!IsAnAscii(mystring[i])) return Standard_False;
|
|
return Standard_True;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
// Length
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Integer TCollection_ExtendedString::Length() const
|
|
{
|
|
return mylength;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Print
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Print(Standard_OStream& astream) const
|
|
{
|
|
// ASCII symbols (including extended Ascii) are printed as is;
|
|
// other Unicode characters are encoded as SGML numeric character references
|
|
for (Standard_Integer i = 0 ; i < mylength ; i++) {
|
|
Standard_ExtCharacter c = mystring[i];
|
|
if ( IsAnAscii(c) )
|
|
astream << ToCharacter(c);
|
|
else
|
|
astream << "&#" << c << ";";
|
|
}
|
|
}
|
|
|
|
|
|
// ----------------------------------------------------------------------------
|
|
Standard_OStream& operator << (Standard_OStream& astream,
|
|
const TCollection_ExtendedString& astring)
|
|
{
|
|
astring.Print(astream);
|
|
return astream;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// RemoveAll
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::RemoveAll(const Standard_ExtCharacter what)
|
|
|
|
{
|
|
if (mylength == 0) return;
|
|
int c = 0;
|
|
for (int i=0; i < mylength; i++)
|
|
if (mystring[i] != what) mystring[c++] = mystring[i];
|
|
mylength = c;
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Remove
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Remove (const Standard_Integer where,
|
|
const Standard_Integer ahowmany)
|
|
{
|
|
if (where+ahowmany <= mylength+1) {
|
|
int i,j;
|
|
for (i = where+ahowmany-1, j = where-1; i < mylength; i++, j++)
|
|
mystring[j] = mystring[i];
|
|
mylength -= ahowmany;
|
|
mystring[mylength] = '\0';
|
|
}
|
|
else
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Remove: "
|
|
"Too many characters to erase or "
|
|
"invalid starting value.");
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Search
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Integer TCollection_ExtendedString::Search
|
|
(const TCollection_ExtendedString& what) const
|
|
{
|
|
Standard_Integer size = what.mylength;
|
|
Standard_ExtString swhat = what.mystring;
|
|
if (size) {
|
|
int k,j;
|
|
int i = 0;
|
|
Standard_Boolean find = Standard_False;
|
|
while ( i < mylength-size+1 && !find) {
|
|
k = i++;
|
|
j = 0;
|
|
while (j < size && mystring[k++] == swhat[j++])
|
|
if (j == size) find = Standard_True;
|
|
}
|
|
if (find) return i;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// SearchFromEnd
|
|
// ----------------------------------------------------------------------------
|
|
Standard_Integer TCollection_ExtendedString::SearchFromEnd
|
|
(const TCollection_ExtendedString& what) const
|
|
{
|
|
Standard_Integer size = what.mylength;
|
|
if (size) {
|
|
Standard_ExtString swhat = what.mystring;
|
|
int k,j;
|
|
int i = mylength-1;
|
|
Standard_Boolean find = Standard_False;
|
|
while ( i >= size-1 && !find) {
|
|
k = i--;
|
|
j = size-1;
|
|
while (j >= 0 && mystring[k--] == swhat[j--])
|
|
if (j == -1) find = Standard_True;
|
|
}
|
|
if (find) return i-size+3;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// SetValue
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::SetValue(const Standard_Integer where,
|
|
const Standard_ExtCharacter what)
|
|
{
|
|
if (where > 0 && where <= mylength) {
|
|
mystring[where-1] = what;
|
|
}
|
|
else {
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::SetValue : parameter where");
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// SetValue
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::SetValue
|
|
(const Standard_Integer where,
|
|
const TCollection_ExtendedString& what)
|
|
{
|
|
if (where > 0 && where <= mylength+1) {
|
|
Standard_Integer size = what.mylength;
|
|
Standard_ExtString swhat = what.mystring;
|
|
size += (where - 1);
|
|
if (size >= mylength){
|
|
if (mystring) {
|
|
mystring = Reallocate (mystring,(size+1)*2);
|
|
}
|
|
else {
|
|
mystring = Allocate((size+1)*2);
|
|
}
|
|
mylength = size;
|
|
}
|
|
for (int i = where-1; i < size; i++)
|
|
mystring[i] = swhat[i-(where-1)];
|
|
mystring[mylength] = '\0';
|
|
}
|
|
else
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::SetValue : "
|
|
"parameter where");
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Split
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString TCollection_ExtendedString::Split
|
|
(const Standard_Integer where)
|
|
{
|
|
if (where >= 0 && where < mylength) {
|
|
TCollection_ExtendedString res(&mystring[where]);
|
|
Trunc(where);
|
|
return res;
|
|
}
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Split index");
|
|
TCollection_ExtendedString res;
|
|
return res;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Token
|
|
// ----------------------------------------------------------------------------
|
|
TCollection_ExtendedString TCollection_ExtendedString::Token
|
|
(const Standard_ExtString separators,
|
|
const Standard_Integer whichone) const
|
|
{
|
|
TCollection_ExtendedString res;
|
|
if (!separators)
|
|
Standard_NullObject::Raise("TCollection_ExtendedString::Token : "
|
|
"parameter 'separators'");
|
|
|
|
int i,j,k,l;
|
|
Standard_PExtCharacter buftmp = Allocate((mylength+1)*2);
|
|
Standard_ExtCharacter aSep;
|
|
|
|
Standard_Boolean isSepFound = Standard_False, otherSepFound;
|
|
|
|
j = 0;
|
|
|
|
for (i = 0; i < whichone && j < mylength; i++) {
|
|
isSepFound = Standard_False;
|
|
k = 0;
|
|
buftmp[0] = 0;
|
|
|
|
// Avant de commencer il faut virer les saloperies devant
|
|
//
|
|
otherSepFound = Standard_True;
|
|
while (j < mylength && otherSepFound) {
|
|
l = 0;
|
|
otherSepFound = Standard_False;
|
|
aSep = separators[l];
|
|
while(aSep != 0) {
|
|
if (aSep == mystring[j]) {
|
|
aSep = 0;
|
|
otherSepFound = Standard_True;
|
|
}
|
|
else {
|
|
aSep = separators[l++];
|
|
}
|
|
}
|
|
if (otherSepFound) j++;
|
|
}
|
|
|
|
while (!isSepFound && k < mylength && j<mylength ) {
|
|
l = 0;
|
|
aSep = separators[l];
|
|
|
|
while (aSep != 0 && !isSepFound) {
|
|
if (aSep == mystring[j]) {
|
|
buftmp[k] = 0;
|
|
isSepFound = Standard_True;
|
|
}
|
|
else {
|
|
buftmp[k] = mystring[j];
|
|
}
|
|
l++;
|
|
aSep = separators[l];
|
|
}
|
|
j++; k++;
|
|
if(j==mylength) buftmp[k] = 0;
|
|
}
|
|
}
|
|
|
|
if (i < whichone) {
|
|
buftmp[0] = 0;
|
|
Standard::Free(buftmp);
|
|
}
|
|
else {
|
|
Standard::Free(res.mystring);
|
|
res.mystring = buftmp;
|
|
for ( res.mylength=0; buftmp[res.mylength]; ++res.mylength );
|
|
}
|
|
return res;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// ToExtString
|
|
// ----------------------------------------------------------------------------
|
|
Standard_ExtString TCollection_ExtendedString::ToExtString() const
|
|
{
|
|
if(mystring) return mystring;
|
|
return NULL_EXTSTRING;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Trunc
|
|
// ----------------------------------------------------------------------------
|
|
void TCollection_ExtendedString::Trunc(const Standard_Integer ahowmany)
|
|
{
|
|
if (ahowmany < 0 || ahowmany > mylength)
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Trunc : "
|
|
"parameter 'ahowmany'");
|
|
mylength = ahowmany;
|
|
mystring[mylength] = '\0';
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// Value
|
|
// ----------------------------------------------------------------------------
|
|
Standard_ExtCharacter TCollection_ExtendedString::Value
|
|
(const Standard_Integer where) const
|
|
{
|
|
if (where > 0 && where <= mylength) {
|
|
if(mystring) return mystring[where-1];
|
|
else return 0;
|
|
}
|
|
Standard_OutOfRange::Raise("TCollection_ExtendedString::Value : "
|
|
"parameter where");
|
|
return 0;
|
|
}
|
|
|
|
|
|
//----------------------------------------------------------------------------
|
|
// Convert CString (including multibyte case) to UniCode representation
|
|
//----------------------------------------------------------------------------
|
|
Standard_Boolean TCollection_ExtendedString::ConvertToUnicode
|
|
(const Standard_CString aStr)
|
|
{
|
|
Standard_Boolean aRes = Standard_True;
|
|
short * p = mystring;
|
|
int i = 0;
|
|
while (aStr[i] != '\0') {
|
|
if((aStr[i] & 0x80) == 0x00) //1byte => 1 symb - Lat1
|
|
{*p++ = ToExtCharacter(aStr[i]); i++;}
|
|
else if((aStr[i] & 0xE0) == 0xC0 &&
|
|
(aStr[i+1] &&
|
|
(aStr[i+1] & 0xC0) == 0x80)) {//2 bytes => 1 symb
|
|
*p++ = ConvertToUnicode2B((unsigned char*)&aStr[i]);
|
|
i += 2;
|
|
} else if((aStr[i] & 0xF0) == 0xE0 &&
|
|
((aStr[i+1] && (aStr[i+1] & 0xC0) == 0x80)) &&
|
|
(aStr[i+2] && (aStr[i+2] & 0xC0) == 0x80)) {
|
|
*p++ = ConvertToUnicode3B((unsigned char*)&aStr[i]);
|
|
i += 3;
|
|
} else { //unsupported case ==> not UTF8
|
|
aRes = Standard_False;
|
|
break;
|
|
}
|
|
}
|
|
*p = 0x0000;
|
|
return aRes;
|
|
}
|
|
//----------------------------------------------------------------------------
|
|
// Returns expected CString length in UTF8 coding.
|
|
//----------------------------------------------------------------------------
|
|
Standard_Integer TCollection_ExtendedString::LengthOfCString() const
|
|
{
|
|
Standard_Integer i=0, aLen=0;
|
|
while(mystring[i]) {
|
|
if((mystring[i] & 0xFF80) == 0)
|
|
aLen++;
|
|
else if((mystring[i] & 0xF800) == 0)
|
|
aLen +=2;
|
|
else
|
|
aLen += 3;
|
|
i++;
|
|
}
|
|
return aLen;
|
|
}
|
|
|
|
//----------------------------------------------------------------------------
|
|
// Converts the internal <mystring> to UTF8 coding and returns length of the
|
|
// out CString.
|
|
//----------------------------------------------------------------------------
|
|
Standard_Integer TCollection_ExtendedString::ToUTF8CString(Standard_PCharacter& theCString) const
|
|
{
|
|
Standard_Integer i=0, j=0;
|
|
unsigned char a,b,c;
|
|
while(mystring[i]) {
|
|
if((mystring[i] & 0xFF80) == 0) {
|
|
theCString[j++] = (char)mystring[i];
|
|
}
|
|
else if((mystring[i] & 0xF800) == 0) {
|
|
b = (unsigned char)mystring[i];//yyzzzzzz
|
|
c = (unsigned char)mystring[i];//yyzzzzzz
|
|
a = (unsigned char)(mystring[i]>>8);//00000yyy
|
|
b &= 0x3F;
|
|
b |= 0x80;
|
|
a <<=2;
|
|
a |= 0xC0;//110yyy00;
|
|
c >>=6;
|
|
c &= 0x03;
|
|
a |=c;
|
|
theCString[j++] = a;
|
|
theCString[j++] = b;
|
|
} else {
|
|
b = (unsigned char)mystring[i];//yyzzzzzz
|
|
c = (unsigned char)mystring[i];//yyzzzzzz
|
|
unsigned char d = a = (unsigned char)(mystring[i]>>8);//xxxxyyyy
|
|
c &= 0x3F;
|
|
c |= 0x80;//10zzzzzz
|
|
b >>= 6; //000000yy
|
|
d <<= 2;//xxyyyy00;
|
|
b |= d;
|
|
b = (b & 0x3F) | 0x80;//10yyyyyy
|
|
a >>= 4; //0000xxxx
|
|
a |= 0xE0;//1110xxxx
|
|
theCString[j++] = a;
|
|
theCString[j++] = b;
|
|
theCString[j++] = c;
|
|
}
|
|
i++;
|
|
}
|
|
theCString[j] = 0x00;
|
|
return j;
|
|
}
|
|
//=======================================================================
|
|
//function : Allocate
|
|
//purpose :
|
|
//=======================================================================
|
|
Standard_PExtCharacter Allocate(const Standard_Size aLength)
|
|
{
|
|
Standard_PExtCharacter pChar;
|
|
//
|
|
pChar=(Standard_PExtCharacter)Standard::Allocate(aLength);
|
|
//
|
|
return pChar;
|
|
}
|
|
//=======================================================================
|
|
//function : Reallocate
|
|
//purpose :
|
|
//=======================================================================
|
|
Standard_PExtCharacter Reallocate(Standard_Address aAddr,
|
|
const Standard_Size aLength)
|
|
{
|
|
return (Standard_PExtCharacter)Standard::Reallocate(aAddr, aLength);
|
|
}
|