X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/f0b7eadf889c2882e81470ec8e629d831858acb1..0bd2681966523df88ad5cf8e505b532843e58d74:/src/common/xti.cpp diff --git a/src/common/xti.cpp b/src/common/xti.cpp index acaa9b56a9..04e166170d 100644 --- a/src/common/xti.cpp +++ b/src/common/xti.cpp @@ -10,28 +10,33 @@ // Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#ifdef __GNUG__ -#pragma implementation "xti.h" -#endif - // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif +#if wxUSE_EXTENDED_RTTI + #ifndef WX_PRECOMP - #include "wx/hash.h" #include "wx/object.h" + #include "wx/list.h" + #include "wx/hash.h" #endif +#include "wx/xti.h" #include "wx/xml/xml.h" #include "wx/tokenzr.h" - #include -#if wxUSE_EXTENDED_RTTI +#include "wx/beforestd.h" +#include +#include +#include +#include "wx/afterstd.h" + +using namespace std ; // ---------------------------------------------------------------------------- // Enum Support @@ -39,616 +44,724 @@ wxEnumData::wxEnumData( wxEnumMemberData* data ) { - m_members = data ; + m_members = data ; for ( m_count = 0; m_members[m_count].m_name ; m_count++) - {} ; + {} ; } -bool wxEnumData::HasEnumMemberValue(const wxChar *name, int *value) +bool wxEnumData::HasEnumMemberValue(const wxChar *name, int *value) const { int i; for (i = 0; m_members[i].m_name ; i++ ) - { - if (!strcmp(name, m_members[i].m_name)) - { - if ( value ) - *value = m_members[i].m_value; - return true ; - } - } - return false ; + { + if (!wxStrcmp(name, m_members[i].m_name)) + { + if ( value ) + *value = m_members[i].m_value; + return true ; + } + } + return false ; } -int wxEnumData::GetEnumMemberValue(const wxChar *name) +int wxEnumData::GetEnumMemberValue(const wxChar *name) const { int i; for (i = 0; m_members[i].m_name ; i++ ) - { - if (!strcmp(name, m_members[i].m_name)) - { - return m_members[i].m_value; - } - } + { + if (!wxStrcmp(name, m_members[i].m_name)) + { + return m_members[i].m_value; + } + } return 0 ; } -const wxChar *wxEnumData::GetEnumMemberName(int value) +const wxChar *wxEnumData::GetEnumMemberName(int value) const { int i; for (i = 0; m_members[i].m_name ; i++) - if (value == m_members[i].m_value) - return m_members[i].m_name; + if (value == m_members[i].m_value) + return m_members[i].m_name; - return wxT("") ; + return wxEmptyString ; } -int wxEnumData::GetEnumMemberValueByIndex( int idx ) +int wxEnumData::GetEnumMemberValueByIndex( int idx ) const { - // we should cache the count in order to avoid out-of-bounds errors - return m_members[idx].m_value ; + // we should cache the count in order to avoid out-of-bounds errors + return m_members[idx].m_value ; } -const char * wxEnumData::GetEnumMemberNameByIndex( int idx ) +const wxChar * wxEnumData::GetEnumMemberNameByIndex( int idx ) const { - // we should cache the count in order to avoid out-of-bounds errors - return m_members[idx].m_name ; + // we should cache the count in order to avoid out-of-bounds errors + return m_members[idx].m_name ; } // ---------------------------------------------------------------------------- // Type Information // ---------------------------------------------------------------------------- +// ---------------------------------------------------------------------------- +// value streaming +// ---------------------------------------------------------------------------- -template<> const wxTypeInfo* wxGetTypeInfo( void * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; -} +// streamer specializations +// for all built-in types -template<> const wxTypeInfo* wxGetTypeInfo( bool * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_BOOL ) ; - return &s_typeInfo ; -} +// bool -template<> const wxTypeInfo* wxGetTypeInfo( char * ) +template<> void wxStringReadValue(const wxString &s , bool &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_CHAR ) ; - return &s_typeInfo ; + int intdata ; + wxSscanf(s, _T("%d"), &intdata ) ; + data = (bool)intdata ; } -template<> const wxTypeInfo* wxGetTypeInfo( unsigned char * ) +template<> void wxStringWriteValue(wxString &s , const bool &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_UCHAR ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ) ; } -template<> const wxTypeInfo* wxGetTypeInfo( int * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_CHAR ) ; - return &s_typeInfo ; -} +// char -template<> const wxTypeInfo* wxGetTypeInfo( unsigned int * ) +template<> void wxStringReadValue(const wxString &s , char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_UCHAR ) ; - return &s_typeInfo ; + int intdata ; + wxSscanf(s, _T("%d"), &intdata ) ; + data = char(intdata) ; } -template<> const wxTypeInfo* wxGetTypeInfo( long * ) +template<> void wxStringWriteValue(wxString &s , const char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_CHAR ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ) ; } -template<> const wxTypeInfo* wxGetTypeInfo( unsigned long * ) +// unsigned char + +template<> void wxStringReadValue(const wxString &s , unsigned char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_UCHAR ) ; - return &s_typeInfo ; + int intdata ; + wxSscanf(s, _T("%d"), &intdata ) ; + data = (unsigned char)(intdata) ; } -template<> const wxTypeInfo* wxGetTypeInfo( float * ) +template<> void wxStringWriteValue(wxString &s , const unsigned char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_FLOAT ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ) ; } -template<> const wxTypeInfo* wxGetTypeInfo( double * ) +// int + +template<> void wxStringReadValue(const wxString &s , int &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_DOUBLE ) ; - return &s_typeInfo ; + wxSscanf(s, _T("%d"), &data ) ; } -template<> const wxTypeInfo* wxGetTypeInfo( wxString * ) +template<> void wxStringWriteValue(wxString &s , const int &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_STRING ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ) ; } -// this are compiler induced specialization which are never used anywhere - -// char const * +// unsigned int -template<> const wxTypeInfo* wxGetTypeInfo( char const ** ) +template<> void wxStringReadValue(const wxString &s , unsigned int &data ) { - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; + wxSscanf(s, _T("%d"), &data ) ; } -template<> void wxStringReadValue(const wxString & , const char* & ) +template<> void wxStringWriteValue(wxString &s , const unsigned int &data ) { - assert(0) ; + s = wxString::Format(_T("%d"), data ) ; } -template<> void wxStringWriteValue(wxString & , char const * const & ) +// long + +template<> void wxStringReadValue(const wxString &s , long &data ) { - assert(0) ; + wxSscanf(s, _T("%ld"), &data ) ; } -// char * - -template<> const wxTypeInfo* wxGetTypeInfo( char ** ) +template<> void wxStringWriteValue(wxString &s , const long &data ) { - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%ld"), data ) ; } -template<> void wxStringReadValue(const wxString & , char* & ) +// unsigned long + +template<> void wxStringReadValue(const wxString &s , unsigned long &data ) { - assert(0) ; + wxSscanf(s, _T("%ld"), &data ) ; } -template<> void wxStringWriteValue(wxString & , char * const & ) +template<> void wxStringWriteValue(wxString &s , const unsigned long &data ) { - assert(0) ; + s = wxString::Format(_T("%ld"), data ) ; } -// unsigned char * +// float -template<> const wxTypeInfo* wxGetTypeInfo( unsigned char ** ) +template<> void wxStringReadValue(const wxString &s , float &data ) { - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; + wxSscanf(s, _T("%f"), &data ) ; } -template<> void wxStringReadValue(const wxString & , unsigned char* & ) +template<> void wxStringWriteValue(wxString &s , const float &data ) { - assert(0) ; + s = wxString::Format(_T("%f"), data ) ; } -template<> void wxStringWriteValue(wxString & , unsigned char * const & ) +// double + +template<> void wxStringReadValue(const wxString &s , double &data ) { - assert(0) ; + wxSscanf(s, _T("%lf"), &data ) ; } -// int * - -template<> const wxTypeInfo* wxGetTypeInfo( int ** ) +template<> void wxStringWriteValue(wxString &s , const double &data ) { - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%lf"), data ) ; } -template<> void wxStringReadValue(const wxString & , int* & ) +// wxString + +template<> void wxStringReadValue(const wxString &s , wxString &data ) { - assert(0) ; + data = s ; } -template<> void wxStringWriteValue(wxString & , int * const & ) +template<> void wxStringWriteValue(wxString &s , const wxString &data ) { - assert(0) ; + s = data ; } -// bool * +// built-ins +// -template<> const wxTypeInfo* wxGetTypeInfo( bool ** ) -{ - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; -} +#if wxUSE_FUNC_TEMPLATE_POINTER +#define wxBUILTIN_TYPE_INFO( element , type ) \ + wxBuiltInTypeInfo s_typeInfo##type(element , &wxToStringConverter , &wxFromStringConverter , typeid(type).name()) ; +#else +#define wxBUILTIN_TYPE_INFO( element , type ) \ + void _toString##element( const wxxVariant& data , wxString &result ) { wxToStringConverter(data, result); } \ + void _fromString##element( const wxString& data , wxxVariant &result ) { wxFromStringConverter(data, result); } \ + wxBuiltInTypeInfo s_typeInfo##type(element , &_toString##element , &_fromString##element , typeid(type).name()) ; +#endif -template<> void wxStringReadValue(const wxString & , bool* & ) -{ - assert(0) ; -} +typedef unsigned char unsigned_char; +typedef unsigned int unsigned_int; +typedef unsigned long unsigned_long; -template<> void wxStringWriteValue(wxString & , bool * const & ) -{ - assert(0) ; -} +wxBuiltInTypeInfo s_typeInfovoid( wxT_VOID , NULL , NULL , typeid(void).name()); +wxBUILTIN_TYPE_INFO( wxT_BOOL , bool); +wxBUILTIN_TYPE_INFO( wxT_CHAR , char); +wxBUILTIN_TYPE_INFO( wxT_UCHAR , unsigned_char); +wxBUILTIN_TYPE_INFO( wxT_INT , int); +wxBUILTIN_TYPE_INFO( wxT_UINT , unsigned_int); +wxBUILTIN_TYPE_INFO( wxT_LONG , long); +wxBUILTIN_TYPE_INFO( wxT_ULONG , unsigned_long); +wxBUILTIN_TYPE_INFO( wxT_FLOAT , float); +wxBUILTIN_TYPE_INFO( wxT_DOUBLE , double); +wxBUILTIN_TYPE_INFO( wxT_STRING , wxString); -// long * -template<> const wxTypeInfo* wxGetTypeInfo( long ** ) -{ - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; -} +// this are compiler induced specialization which are never used anywhere + +wxILLEGAL_TYPE_SPECIALIZATION( char const * ) +wxILLEGAL_TYPE_SPECIALIZATION( char * ) +wxILLEGAL_TYPE_SPECIALIZATION( unsigned char * ) +wxILLEGAL_TYPE_SPECIALIZATION( int * ) +wxILLEGAL_TYPE_SPECIALIZATION( bool * ) +wxILLEGAL_TYPE_SPECIALIZATION( long * ) +wxILLEGAL_TYPE_SPECIALIZATION( wxString * ) -template<> void wxStringReadValue(const wxString & , long* & ) +wxCOLLECTION_TYPE_INFO( wxString , wxArrayString ) ; + +template<> void wxCollectionToVariantArray( wxArrayString const &theArray, wxxVariantArray &value) { - assert(0) ; + wxArrayCollectionToVariantArray( theArray , value ) ; } -template<> void wxStringWriteValue(wxString & , long * const & ) +wxTypeInfoMap *wxTypeInfo::ms_typeTable = NULL ; + +wxTypeInfo *wxTypeInfo::FindType(const wxChar *typeName) { - assert(0) ; + wxTypeInfoMap::iterator iter = ms_typeTable->find(typeName) ; + wxASSERT_MSG( iter != ms_typeTable->end() , wxT("lookup for a non-existent type-info") ) ; + return (wxTypeInfo *)iter->second; } -// wxString * +#if wxUSE_UNICODE +wxClassTypeInfo::wxClassTypeInfo( wxTypeKind kind , wxClassInfo* classInfo , converterToString_t to , converterFromString_t from , const char *name) : +wxTypeInfo( kind , to , from , name) +{ wxASSERT_MSG( kind == wxT_OBJECT_PTR || kind == wxT_OBJECT , wxT("Illegal Kind for Enum Type")) ; m_classInfo = classInfo ;} +#endif + +wxClassTypeInfo::wxClassTypeInfo( wxTypeKind kind , wxClassInfo* classInfo , converterToString_t to , converterFromString_t from , const wxString &name) : +wxTypeInfo( kind , to , from , name) +{ wxASSERT_MSG( kind == wxT_OBJECT_PTR || kind == wxT_OBJECT , wxT("Illegal Kind for Enum Type")) ; m_classInfo = classInfo ;} + +wxDelegateTypeInfo::wxDelegateTypeInfo( int eventType , wxClassInfo* eventClass , converterToString_t to , converterFromString_t from ) : +wxTypeInfo ( wxT_DELEGATE , to , from , wxEmptyString ) +{ m_eventClass = eventClass ; m_eventType = eventType ; m_lastEventType = -1 ;} + +wxDelegateTypeInfo::wxDelegateTypeInfo( int eventType , int lastEventType , wxClassInfo* eventClass , converterToString_t to , converterFromString_t from ) : +wxTypeInfo ( wxT_DELEGATE , to , from , wxEmptyString ) +{ m_eventClass = eventClass ; m_eventType = eventType ; m_lastEventType = lastEventType; } -template<> const wxTypeInfo* wxGetTypeInfo( wxString ** ) +void wxTypeInfo::Register() { - assert(0) ; - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; + if ( ms_typeTable == NULL ) + ms_typeTable = new wxTypeInfoMap() ; + + if( !m_name.empty() ) + (*ms_typeTable)[m_name] = this ; } -template<> void wxStringReadValue(const wxString & , wxString* & ) +void wxTypeInfo::Unregister() { - assert(0) ; + if( !m_name.empty() ) + ms_typeTable->erase(m_name); } -template<> void wxStringWriteValue(wxString & , wxString * const & ) +// removing header dependancy on string tokenizer + +void wxSetStringToArray( const wxString &s , wxArrayString &array ) { - assert(0) ; + wxStringTokenizer tokenizer(s, wxT("| \t\n"), wxTOKEN_STRTOK); + wxString flag; + array.Clear() ; + while (tokenizer.HasMoreTokens()) + { + array.Add(tokenizer.GetNextToken()) ; + } } - // ---------------------------------------------------------------------------- -// value streaming +// wxClassInfo // ---------------------------------------------------------------------------- -// convenience function (avoids including xml headers in users code) - -void wxXmlAddContentToNode( wxXmlNode* node , const wxString& data ) +wxPropertyInfo::~wxPropertyInfo() { - node->AddChild(new wxXmlNode(wxXML_TEXT_NODE, "value", data ) ); + if ( this == m_itsClass->m_firstProperty ) + { + m_itsClass->m_firstProperty = m_next; + } + else + { + wxPropertyInfo *info = m_itsClass->m_firstProperty; + while (info) + { + if ( info->m_next == this ) + { + info->m_next = m_next; + break; + } + + info = info->m_next; + } + } } -wxString wxXmlGetContentFromNode( wxXmlNode *node ) +wxHandlerInfo::~wxHandlerInfo() { - if ( node->GetChildren() ) - return node->GetChildren()->GetContent() ; - else - return wxEmptyString ; + if ( this == m_itsClass->m_firstHandler ) + { + m_itsClass->m_firstHandler = m_next; + } + else + { + wxHandlerInfo *info = m_itsClass->m_firstHandler; + while (info) + { + if ( info->m_next == this ) + { + info->m_next = m_next; + break; + } + + info = info->m_next; + } + } } -// streamer specializations -// for all built-in types +const wxPropertyAccessor *wxClassInfo::FindAccessor(const wxChar *PropertyName) const +{ + const wxPropertyInfo* info = FindPropertyInfo( PropertyName ) ; -// bool + if ( info ) + return info->GetAccessor() ; -template<> void wxStringReadValue(const wxString &s , bool &data ) -{ - int intdata ; - wxSscanf(s, _T("%d"), &intdata ) ; - data = bool(intdata) ; + return NULL ; } -template<> void wxStringWriteValue(wxString &s , const bool &data ) +wxPropertyInfo *wxClassInfo::FindPropertyInfoInThisClass (const wxChar *PropertyName) const { - s = wxString::Format("%d", data ) ; -} + wxPropertyInfo* info = m_firstProperty ; -// char + while( info ) + { + if ( wxStrcmp( info->GetName() , PropertyName ) == 0 ) + return info ; + info = info->GetNext() ; + } -template<> void wxStringReadValue(const wxString &s , char &data ) -{ - int intdata ; - wxSscanf(s, _T("%d"), &intdata ) ; - data = char(intdata) ; + return 0; } -template<> void wxStringWriteValue(wxString &s , const char &data ) +const wxPropertyInfo *wxClassInfo::FindPropertyInfo (const wxChar *PropertyName) const { - s = wxString::Format("%d", data ) ; -} + const wxPropertyInfo* info = FindPropertyInfoInThisClass( PropertyName ) ; + if ( info ) + return info ; -// unsigned char + const wxClassInfo** parents = GetParents() ; + for ( int i = 0 ; parents[i] ; ++ i ) + { + if ( ( info = parents[i]->FindPropertyInfo( PropertyName ) ) != NULL ) + return info ; + } -template<> void wxStringReadValue(const wxString &s , unsigned char &data ) -{ - int intdata ; - wxSscanf(s, _T("%d"), &intdata ) ; - data = (unsigned char)(intdata) ; + return 0; } -template<> void wxStringWriteValue(wxString &s , const unsigned char &data ) +wxHandlerInfo *wxClassInfo::FindHandlerInfoInThisClass (const wxChar *PropertyName) const { - s = wxString::Format("%d", data ) ; -} + wxHandlerInfo* info = m_firstHandler ; -// int + while( info ) + { + if ( wxStrcmp( info->GetName() , PropertyName ) == 0 ) + return info ; + info = info->GetNext() ; + } -template<> void wxStringReadValue(const wxString &s , int &data ) -{ - wxSscanf(s, _T("%d"), &data ) ; + return 0; } -template<> void wxStringWriteValue(wxString &s , const int &data ) +const wxHandlerInfo *wxClassInfo::FindHandlerInfo (const wxChar *PropertyName) const { - s = wxString::Format("%d", data ) ; -} + const wxHandlerInfo* info = FindHandlerInfoInThisClass( PropertyName ) ; -// unsigned int + if ( info ) + return info ; -template<> void wxStringReadValue(const wxString &s , unsigned int &data ) -{ - wxSscanf(s, _T("%d"), &data ) ; + const wxClassInfo** parents = GetParents() ; + for ( int i = 0 ; parents[i] ; ++ i ) + { + if ( ( info = parents[i]->FindHandlerInfo( PropertyName ) ) != NULL ) + return info ; + } + + return 0; } -template<> void wxStringWriteValue(wxString &s , const unsigned int &data ) +wxObjectStreamingCallback wxClassInfo::GetStreamingCallback() const { - s = wxString::Format("%d", data ) ; -} + if ( m_streamingCallback ) + return m_streamingCallback ; -// long + wxObjectStreamingCallback retval = NULL ; + const wxClassInfo** parents = GetParents() ; + for ( int i = 0 ; parents[i] && retval == NULL ; ++ i ) + { + retval = parents[i]->GetStreamingCallback() ; + } + return retval ; +} -template<> void wxStringReadValue(const wxString &s , long &data ) +bool wxClassInfo::BeforeWriteObject( const wxObject *obj, wxWriter *streamer , wxPersister *persister , wxxVariantArray &metadata) const { - wxSscanf(s, _T("%ld"), &data ) ; + wxObjectStreamingCallback sb = GetStreamingCallback() ; + if ( sb ) + return (*sb)(obj , streamer , persister , metadata ) ; + + return true ; } -template<> void wxStringWriteValue(wxString &s , const long &data ) +void wxClassInfo::SetProperty(wxObject *object, const wxChar *propertyName, const wxxVariant &value) const { - s = wxString::Format("%ld", data ) ; -} + const wxPropertyAccessor *accessor; -// unsigned long + accessor = FindAccessor(propertyName); + wxASSERT(accessor->HasSetter()); + accessor->SetProperty( object , value ) ; +} -template<> void wxStringReadValue(const wxString &s , unsigned long &data ) +wxxVariant wxClassInfo::GetProperty(wxObject *object, const wxChar *propertyName) const { - wxSscanf(s, _T("%ld"), &data ) ; + const wxPropertyAccessor *accessor; + + accessor = FindAccessor(propertyName); + wxASSERT(accessor->HasGetter()); + wxxVariant result ; + accessor->GetProperty(object,result); + return result ; } -template<> void wxStringWriteValue(wxString &s , const unsigned long &data ) +wxxVariantArray wxClassInfo::GetPropertyCollection(wxObject *object, const wxChar *propertyName) const { - s = wxString::Format("%ld", data ) ; -} + const wxPropertyAccessor *accessor; -// float + accessor = FindAccessor(propertyName); + wxASSERT(accessor->HasGetter()); + wxxVariantArray result ; + accessor->GetPropertyCollection(object,result); + return result ; +} -template<> void wxStringReadValue(const wxString &s , float &data ) +void wxClassInfo::AddToPropertyCollection(wxObject *object, const wxChar *propertyName , const wxxVariant& value) const { - wxSscanf(s, _T("%f"), &data ) ; + const wxPropertyAccessor *accessor; + + accessor = FindAccessor(propertyName); + wxASSERT(accessor->HasAdder()); + accessor->AddToPropertyCollection( object , value ) ; } -template<> void wxStringWriteValue(wxString &s , const float &data ) +// void wxClassInfo::GetProperties( wxPropertyInfoMap &map ) const +// The map parameter (the name map that is) seems something special +// to MSVC and so we use a other name. +void wxClassInfo::GetProperties( wxPropertyInfoMap &infomap ) const { - s = wxString::Format("%f", data ) ; + const wxPropertyInfo *pi = GetFirstProperty() ; + while( pi ) + { + if ( infomap.find( pi->GetName() ) == infomap.end() ) + infomap[pi->GetName()] = (wxPropertyInfo*) pi ; + + pi = pi->GetNext() ; + } + + const wxClassInfo** parents = GetParents() ; + for ( int i = 0 ; parents[i] ; ++ i ) + { + parents[i]->GetProperties( infomap ) ; + } } -// double +/* +VARIANT TO OBJECT +*/ -template<> void wxStringReadValue(const wxString &s , double &data ) +wxObject* wxxVariant::GetAsObject() { - wxSscanf(s, _T("%lf"), &data ) ; + const wxClassTypeInfo *ti = dynamic_cast( m_data->GetTypeInfo() ) ; + if ( ti ) + return ti->GetClassInfo()->VariantToInstance(*this) ; + else + return NULL ; } -template<> void wxStringWriteValue(wxString &s , const double &data ) +// ---------------------------------------------------------------------------- +// wxDynamicObject support +// ---------------------------------------------------------------------------- +// +// Dynamic Objects are objects that have a real superclass instance and carry their +// own attributes in a hash map. Like this it is possible to create the objects and +// stream them, as if their class information was already available from compiled data + +struct wxDynamicObject::wxDynamicObjectInternal { - s = wxString::Format("%lf", data ) ; -} + wxDynamicObjectInternal() {} -// wxString +#if wxUSE_UNICODE + map m_properties ; +#else + map m_properties ; +#endif +} ; -template<> void wxStringReadValue(const wxString &s , wxString &data ) +typedef list< wxDynamicObject* > wxDynamicObjectList ; + +struct wxDynamicClassInfo::wxDynamicClassInfoInternal { - data = s ; -} + wxDynamicObjectList m_dynamicObjects ; +} ; -template<> void wxStringWriteValue(wxString &s , const wxString &data ) +// instantiates this object with an instance of its superclass +wxDynamicObject::wxDynamicObject(wxObject* superClassInstance, const wxDynamicClassInfo *info) { - s = data ; + m_superClassInstance = superClassInstance ; + m_classInfo = info ; + m_data = new wxDynamicObjectInternal ; } -/* - Custom Data Streaming / Type Infos - we will have to add this for all wx non object types, but it is also an example - for custom data structures -*/ - -// wxPoint +wxDynamicObject::~wxDynamicObject() +{ + dynamic_cast(m_classInfo)->m_data->m_dynamicObjects.remove( this ) ; + delete m_data ; + delete m_superClassInstance ; +} -template<> void wxStringReadValue(const wxString &s , wxPoint &data ) +void wxDynamicObject::SetProperty (const wxChar *propertyName, const wxxVariant &value) { - wxSscanf(s, _T("%d,%d"), &data.x , &data.y ) ; + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName),wxT("Accessing Unknown Property in a Dynamic Object") ) ; + m_data->m_properties[propertyName] = value ; } -template<> void wxStringWriteValue(wxString &s , const wxPoint &data ) +wxxVariant wxDynamicObject::GetProperty (const wxChar *propertyName) const { - s = wxString::Format("%d,%d", data.x , data.y ) ; + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName),wxT("Accessing Unknown Property in a Dynamic Object") ) ; + return m_data->m_properties[propertyName] ; } -template<> void wxStringReadValue(const wxString & , wxPoint* & ) +void wxDynamicObject::RemoveProperty( const wxChar *propertyName ) { - assert(0) ; + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName),wxT("Removing Unknown Property in a Dynamic Object") ) ; + m_data->m_properties.erase( propertyName ) ; } -template<> void wxStringWriteValue(wxString & , wxPoint* const & ) +void wxDynamicObject::RenameProperty( const wxChar *oldPropertyName , const wxChar *newPropertyName ) { - assert(0) ; + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(oldPropertyName),wxT("Renaming Unknown Property in a Dynamic Object") ) ; + wxxVariant value = m_data->m_properties[oldPropertyName] ; + m_data->m_properties.erase( oldPropertyName ) ; + m_data->m_properties[newPropertyName] = value ; } -WX_CUSTOM_TYPE_INFO(wxPoint) -template<> void wxStringReadValue(const wxString &s , wxSize &data ) +// ---------------------------------------------------------------------------- +// wxDynamiClassInfo +// ---------------------------------------------------------------------------- + +wxDynamicClassInfo::wxDynamicClassInfo( const wxChar *unitName, const wxChar *className , const wxClassInfo* superClass ) : +wxClassInfo( unitName, className , new const wxClassInfo*[2]) { - wxSscanf(s, _T("%d,%d"), &data.x , &data.y ) ; + GetParents()[0] = superClass ; + GetParents()[1] = NULL ; + m_data = new wxDynamicClassInfoInternal ; } -template<> void wxStringWriteValue(wxString &s , const wxSize &data ) +wxDynamicClassInfo::~wxDynamicClassInfo() { - s = wxString::Format("%d,%d", data.x , data.y ) ; + delete[] GetParents() ; + delete m_data ; } -template<> void wxStringReadValue(const wxString & , wxSize* & ) +wxObject *wxDynamicClassInfo::AllocateObject() const { - assert(0) ; + wxObject* parent = GetParents()[0]->AllocateObject() ; + wxDynamicObject *obj = new wxDynamicObject( parent , this ) ; + m_data->m_dynamicObjects.push_back( obj ) ; + return obj ; } -template<> void wxStringWriteValue(wxString & , wxSize * const & ) +void wxDynamicClassInfo::Create (wxObject *object, int paramCount, wxxVariant *params) const { - assert(0) ; + wxDynamicObject *dynobj = dynamic_cast< wxDynamicObject *>( object ) ; + wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::Create on an object other than wxDynamicObject") ) ; + GetParents()[0]->Create( dynobj->GetSuperClassInstance() , paramCount , params ) ; } -WX_CUSTOM_TYPE_INFO(wxSize) - -/* - -template<> void wxStringReadValue(const wxString &s , wxColour &data ) +// get number of parameters for constructor +int wxDynamicClassInfo::GetCreateParamCount() const { - // copied from VS xrc - unsigned long tmp = 0; - - if (s.Length() != 7 || s[0u] != wxT('#') || - wxSscanf(s.c_str(), wxT("#%lX"), &tmp) != 1) - { - wxLogError(_("String To Colour : Incorrect colour specification : %s"), - s.c_str() ); - data = wxNullColour; - } - else - { - data = wxColour((unsigned char) ((tmp & 0xFF0000) >> 16) , - (unsigned char) ((tmp & 0x00FF00) >> 8), - (unsigned char) ((tmp & 0x0000FF))); - } + return GetParents()[0]->GetCreateParamCount() ; } -template<> void wxStringWriteValue(wxString &s , const wxColour &data ) +// get i-th constructor parameter +const wxChar* wxDynamicClassInfo::GetCreateParamName(int i) const { - s = wxString::Format("#%2X%2X%2X", data.Red() , data.Green() , data.Blue() ) ; + return GetParents()[0]->GetCreateParamName( i ) ; } -WX_CUSTOM_TYPE_INFO(wxColour) - -*/ - -// removing header dependancy on string tokenizer - -void wxSetStringToArray( const wxString &s , wxArrayString &array ) +void wxDynamicClassInfo::SetProperty(wxObject *object, const wxChar *propertyName, const wxxVariant &value) const { - wxStringTokenizer tokenizer(s, wxT("| \t\n"), wxTOKEN_STRTOK); - wxString flag; - array.Clear() ; - while (tokenizer.HasMoreTokens()) - { - array.Add(tokenizer.GetNextToken()) ; - } + wxDynamicObject* dynobj = dynamic_cast< wxDynamicObject * >( object ) ; + wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; + if ( FindPropertyInfoInThisClass(propertyName) ) + dynobj->SetProperty( propertyName , value ) ; + else + GetParents()[0]->SetProperty( dynobj->GetSuperClassInstance() , propertyName , value ) ; } -// ---------------------------------------------------------------------------- -// wxClassInfo -// ---------------------------------------------------------------------------- - - -void wxClassInfo::Register(const char *WXUNUSED(name), wxClassInfo *WXUNUSED(info)) +wxxVariant wxDynamicClassInfo::GetProperty(wxObject *object, const wxChar *propertyName) const { - /* - if (!ExtendedTypeMap) - ExtendedTypeMap = new ClassMap; - (*ExtendedTypeMap)[string(Name)] = Info; - */ + wxDynamicObject* dynobj = dynamic_cast< wxDynamicObject * >( object ) ; + wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; + if ( FindPropertyInfoInThisClass(propertyName) ) + return dynobj->GetProperty( propertyName ) ; + else + return GetParents()[0]->GetProperty( dynobj->GetSuperClassInstance() , propertyName ) ; } -void wxClassInfo::Unregister(const char *WXUNUSED(name)) +void wxDynamicClassInfo::AddProperty( const wxChar *propertyName , const wxTypeInfo* typeInfo ) { - /* - assert(ExtendedTypeMap); - ExtendedTypeMap->erase(Name); - */ + new wxPropertyInfo( m_firstProperty , this , propertyName , typeInfo->GetTypeName() , new wxGenericPropertyAccessor( propertyName ) , wxxVariant() ) ; } -const wxPropertyAccessor *wxClassInfo::FindAccessor(const char *PropertyName) +void wxDynamicClassInfo::AddHandler( const wxChar *handlerName , wxObjectEventFunction address , const wxClassInfo* eventClassInfo ) { - const wxPropertyInfo* info = FindPropertyInfo( PropertyName ) ; - - if ( info ) - return info->GetAccessor() ; - - return NULL ; + new wxHandlerInfo( m_firstHandler , this , handlerName , address , eventClassInfo ) ; } -const wxPropertyInfo *wxClassInfo::FindPropertyInfo (const char *PropertyName) const +// removes an existing runtime-property +void wxDynamicClassInfo::RemoveProperty( const wxChar *propertyName ) { - const wxPropertyInfo* info = GetFirstProperty() ; - - while( info ) - { - if ( strcmp( info->GetName() , PropertyName ) == 0 ) - return info ; - info = info->GetNext() ; - } - - const wxClassInfo** parents = GetParents() ; - for ( int i = 0 ; parents[i] ; ++ i ) - { - if ( ( info = parents[i]->FindPropertyInfo( PropertyName ) ) != NULL ) - return info ; - } - - return 0; + for ( wxDynamicObjectList::iterator iter = m_data->m_dynamicObjects.begin() ; iter != m_data->m_dynamicObjects.end() ; ++iter ) + (*iter)->RemoveProperty( propertyName ) ; + delete FindPropertyInfoInThisClass(propertyName) ; } -const wxHandlerInfo *wxClassInfo::FindHandlerInfo (const char *PropertyName) const +// removes an existing runtime-handler +void wxDynamicClassInfo::RemoveHandler( const wxChar *handlerName ) { - const wxHandlerInfo* info = GetFirstHandler() ; - - while( info ) - { - if ( strcmp( info->GetName() , PropertyName ) == 0 ) - return info ; - info = info->GetNext() ; - } + delete FindHandlerInfoInThisClass(handlerName) ; +} - const wxClassInfo** parents = GetParents() ; - for ( int i = 0 ; parents[i] ; ++ i ) - { - if ( ( info = parents[i]->FindHandlerInfo( PropertyName ) ) != NULL ) - return info ; - } +// renames an existing runtime-property +void wxDynamicClassInfo::RenameProperty( const wxChar *oldPropertyName , const wxChar *newPropertyName ) +{ + wxPropertyInfo* pi = FindPropertyInfoInThisClass(oldPropertyName) ; + wxASSERT_MSG( pi ,wxT("not existing property") ) ; + pi->m_name = newPropertyName ; + dynamic_cast(pi->GetAccessor())->RenameProperty( oldPropertyName , newPropertyName ) ; + for ( wxDynamicObjectList::iterator iter = m_data->m_dynamicObjects.begin() ; iter != m_data->m_dynamicObjects.end() ; ++iter ) + (*iter)->RenameProperty( oldPropertyName , newPropertyName ) ; +} - return 0; +// renames an existing runtime-handler +void wxDynamicClassInfo::RenameHandler( const wxChar *oldHandlerName , const wxChar *newHandlerName ) +{ + wxASSERT_MSG(FindHandlerInfoInThisClass(oldHandlerName),wxT("not existing handler") ) ; + FindHandlerInfoInThisClass(oldHandlerName)->m_name = newHandlerName ; } +// ---------------------------------------------------------------------------- +// wxGenericPropertyAccessor +// ---------------------------------------------------------------------------- -void wxClassInfo::SetProperty(wxObject *object, const char *propertyName, const wxxVariant &value) +struct wxGenericPropertyAccessor::wxGenericPropertyAccessorInternal { - const wxPropertyAccessor *accessor; + char filler ; +} ; - accessor = FindAccessor(propertyName); - wxASSERT(accessor->HasSetter()); - accessor->SetProperty( object , value ) ; +wxGenericPropertyAccessor::wxGenericPropertyAccessor( const wxString& propertyName ) +: wxPropertyAccessor( NULL , NULL , NULL , NULL ) +{ + m_data = new wxGenericPropertyAccessorInternal ; + m_propertyName = propertyName ; + m_getterName = wxT("Get")+propertyName ; + m_setterName = wxT("Set")+propertyName ; } -wxxVariant wxClassInfo::GetProperty(wxObject *object, const char *propertyName) +wxGenericPropertyAccessor::~wxGenericPropertyAccessor() { - const wxPropertyAccessor *accessor; - - accessor = FindAccessor(propertyName); - wxASSERT(accessor->HasGetter()); - return accessor->GetProperty(object); + delete m_data ; } - -/* -VARIANT TO OBJECT -*/ - -wxObject* wxxVariant::GetAsObject() +void wxGenericPropertyAccessor::SetProperty(wxObject *object, const wxxVariant &value) const { - const wxClassTypeInfo *ti = dynamic_cast( m_data->GetTypeInfo() ) ; - if ( ti ) - return ti->GetClassInfo()->VariantToInstance(*this) ; - else - return NULL ; + wxDynamicObject* dynobj = dynamic_cast< wxDynamicObject * >( object ) ; + wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; + dynobj->SetProperty(m_propertyName , value ) ; } +void wxGenericPropertyAccessor::GetProperty(const wxObject *object, wxxVariant& value) const +{ + const wxDynamicObject* dynobj = dynamic_cast< const wxDynamicObject * >( object ) ; + wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; + value = dynobj->GetProperty( m_propertyName ) ; +} -#endif +#endif // wxUSE_EXTENDED_RTTI