X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/16a45a23d9f72eee32690f7c56e8febbc1e76965..f239a20092359e3c914adb79bd39f3f5d2b2e06f:/src/common/xti.cpp diff --git a/src/common/xti.cpp b/src/common/xti.cpp index 38ed197501..f207253ad7 100644 --- a/src/common/xti.cpp +++ b/src/common/xti.cpp @@ -1,6 +1,6 @@ ///////////////////////////////////////////////////////////////////////////// // Name: src/common/xti.cpp -// Purpose: runtime metadata information (extended class info +// Purpose: runtime metadata information (extended class info) // Author: Stefan Csomor // Modified by: // Created: 27/07/03 @@ -10,645 +10,898 @@ // Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA) -#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 "wx/range.h" #include -#if wxUSE_EXTENDED_RTTI - #include "wx/beforestd.h" #include #include +#include #include "wx/afterstd.h" -using namespace std ; +using namespace std; // ---------------------------------------------------------------------------- -// Enum Support +// wxEnumData // ---------------------------------------------------------------------------- wxEnumData::wxEnumData( wxEnumMemberData* data ) { - m_members = data ; - for ( m_count = 0; m_members[m_count].m_name ; m_count++) - {} ; + 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 ; + for (i = 0; m_members[i].m_name; i++ ) + { + 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; - } - } - return 0 ; + for (i = 0; m_members[i].m_name; i++ ) + { + 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; + for (i = 0; m_members[i].m_name; i++) + 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 // ---------------------------------------------------------------------------- -template<> const wxTypeInfo* wxGetTypeInfo( void * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_VOID ) ; - return &s_typeInfo ; -} +// ---------------------------------------------------------------------------- +// value streaming +// ---------------------------------------------------------------------------- -template<> const wxTypeInfo* wxGetTypeInfo( bool * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_BOOL ) ; - return &s_typeInfo ; -} +// streamer specializations +// for all built-in types -template<> const wxTypeInfo* wxGetTypeInfo( char * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_CHAR ) ; - return &s_typeInfo ; -} +// bool -template<> const wxTypeInfo* wxGetTypeInfo( unsigned char * ) +template<> void wxStringReadValue(const wxString &s, bool &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_UCHAR ) ; - return &s_typeInfo ; + int intdata; + wxSscanf(s, _T("%d"), &intdata ); + data = (bool)(intdata != 0); } -template<> const wxTypeInfo* wxGetTypeInfo( int * ) +template<> void wxStringWriteValue(wxString &s, const bool &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_CHAR ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ); } -template<> const wxTypeInfo* wxGetTypeInfo( unsigned int * ) -{ - static wxBuiltInTypeInfo s_typeInfo( wxT_UCHAR ) ; - return &s_typeInfo ; -} +// char -template<> const wxTypeInfo* wxGetTypeInfo( long * ) +template<> void wxStringReadValue(const wxString &s, char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_CHAR ) ; - return &s_typeInfo ; + int intdata; + wxSscanf(s, _T("%d"), &intdata ); + data = char(intdata); } -template<> const wxTypeInfo* wxGetTypeInfo( unsigned long * ) +template<> void wxStringWriteValue(wxString &s, const char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_UCHAR ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ); } -template<> const wxTypeInfo* wxGetTypeInfo( float * ) +// unsigned char + +template<> void wxStringReadValue(const wxString &s, unsigned char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_FLOAT ) ; - return &s_typeInfo ; + int intdata; + wxSscanf(s, _T("%d"), &intdata ); + data = (unsigned char)(intdata); } -template<> const wxTypeInfo* wxGetTypeInfo( double * ) +template<> void wxStringWriteValue(wxString &s, const unsigned char &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_DOUBLE ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ); } -template<> const wxTypeInfo* wxGetTypeInfo( wxString * ) +// int + +template<> void wxStringReadValue(const wxString &s, int &data ) { - static wxBuiltInTypeInfo s_typeInfo( wxT_STRING ) ; - return &s_typeInfo ; + wxSscanf(s, _T("%d"), &data ); } -template<> const wxTypeInfo* wxGetTypeInfo( wxWindowList * ) +template<> void wxStringWriteValue(wxString &s, const int &data ) { - static wxCollectionTypeInfo s_typeInfo( (wxTypeInfo*) wxGetTypeInfo( (wxWindow **) NULL) ) ; - return &s_typeInfo ; + s = wxString::Format(_T("%d"), data ); } -// this are compiler induced specialization which are never used anywhere - -WX_ILLEGAL_TYPE_SPECIALIZATION( char const * ) -WX_ILLEGAL_TYPE_SPECIALIZATION( char * ) -WX_ILLEGAL_TYPE_SPECIALIZATION( unsigned char * ) -WX_ILLEGAL_TYPE_SPECIALIZATION( int * ) -WX_ILLEGAL_TYPE_SPECIALIZATION( bool * ) -WX_ILLEGAL_TYPE_SPECIALIZATION( long * ) -WX_ILLEGAL_TYPE_SPECIALIZATION( wxString * ) - -// ---------------------------------------------------------------------------- -// value streaming -// ---------------------------------------------------------------------------- - -// streamer specializations -// for all built-in types - -// bool +// unsigned int -template<> void wxStringReadValue(const wxString &s , bool &data ) +template<> void wxStringReadValue(const wxString &s, unsigned int &data ) { - int intdata ; - wxSscanf(s, _T("%d"), &intdata ) ; - data = bool(intdata) ; + wxSscanf(s, _T("%d"), &data ); } -template<> void wxStringWriteValue(wxString &s , const bool &data ) +template<> void wxStringWriteValue(wxString &s, const unsigned int &data ) { - s = wxString::Format("%d", data ) ; + s = wxString::Format(_T("%d"), data ); } -// char +// long -template<> void wxStringReadValue(const wxString &s , char &data ) +template<> void wxStringReadValue(const wxString &s, long &data ) { - int intdata ; - wxSscanf(s, _T("%d"), &intdata ) ; - data = char(intdata) ; + wxSscanf(s, _T("%ld"), &data ); } -template<> void wxStringWriteValue(wxString &s , const char &data ) +template<> void wxStringWriteValue(wxString &s, const long &data ) { - s = wxString::Format("%d", data ) ; + s = wxString::Format(_T("%ld"), data ); } -// unsigned char +// unsigned long -template<> void wxStringReadValue(const wxString &s , unsigned char &data ) +template<> void wxStringReadValue(const wxString &s, unsigned long &data ) { - int intdata ; - wxSscanf(s, _T("%d"), &intdata ) ; - data = (unsigned char)(intdata) ; + wxSscanf(s, _T("%ld"), &data ); } -template<> void wxStringWriteValue(wxString &s , const unsigned char &data ) +template<> void wxStringWriteValue(wxString &s, const unsigned long &data ) { - s = wxString::Format("%d", data ) ; + s = wxString::Format(_T("%ld"), data ); } -// int - -template<> void wxStringReadValue(const wxString &s , int &data ) +#ifdef wxLongLong_t +template<> void wxStringReadValue(const wxString &s, wxLongLong_t &data ) { - wxSscanf(s, _T("%d"), &data ) ; + wxSscanf(s, _T("%lld"), &data ); } -template<> void wxStringWriteValue(wxString &s , const int &data ) +template<> void wxStringWriteValue(wxString &s, const wxLongLong_t &data ) { - s = wxString::Format("%d", data ) ; + s = wxString::Format(_T("%lld"), data ); } -// unsigned int - -template<> void wxStringReadValue(const wxString &s , unsigned int &data ) +template<> void wxStringReadValue(const wxString &s, wxULongLong_t &data ) { - wxSscanf(s, _T("%d"), &data ) ; + wxSscanf(s, _T("%lld"), &data ); } -template<> void wxStringWriteValue(wxString &s , const unsigned int &data ) +template<> void wxStringWriteValue(wxString &s, const wxULongLong_t &data ) { - s = wxString::Format("%d", data ) ; + s = wxString::Format(_T("%lld"), data ); } +#endif +// float -// long - -template<> void wxStringReadValue(const wxString &s , long &data ) +template<> void wxStringReadValue(const wxString &s, float &data ) { - wxSscanf(s, _T("%ld"), &data ) ; + wxSscanf(s, _T("%f"), &data ); } -template<> void wxStringWriteValue(wxString &s , const long &data ) +template<> void wxStringWriteValue(wxString &s, const float &data ) { - s = wxString::Format("%ld", data ) ; + s = wxString::Format(_T("%f"), data ); } -// unsigned long +// double -template<> void wxStringReadValue(const wxString &s , unsigned long &data ) +template<> void wxStringReadValue(const wxString &s, double &data ) { - wxSscanf(s, _T("%ld"), &data ) ; + wxSscanf(s, _T("%lf"), &data ); } -template<> void wxStringWriteValue(wxString &s , const unsigned long &data ) +template<> void wxStringWriteValue(wxString &s, const double &data ) { - s = wxString::Format("%ld", data ) ; + s = wxString::Format(_T("%lf"), data ); } -// float +// wxString -template<> void wxStringReadValue(const wxString &s , float &data ) +template<> void wxStringReadValue(const wxString &s, wxString &data ) { - wxSscanf(s, _T("%f"), &data ) ; + data = s; } -template<> void wxStringWriteValue(wxString &s , const float &data ) +template<> void wxStringWriteValue(wxString &s, const wxString &data ) { - s = wxString::Format("%f", data ) ; + s = data; } -// double -template<> void wxStringReadValue(const wxString &s , double &data ) +// built-ins +// + +#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 wxAny& data, wxString &result ) \ + { wxToStringConverter void wxStringReadValue(const wxString &s , wxRange &data) { - wxSscanf(s, _T("%lf"), &data ) ; + int minValue, maxValue; + wxSscanf(s, wxT("%d,%d"), &minValue , &maxValue); + data = wxRange(minValue, maxValue); } -template<> void wxStringWriteValue(wxString &s , const double &data ) +template<> void wxStringWriteValue(wxString &s , const wxRange &data) { - s = wxString::Format("%lf", data ) ; + s = wxString::Format(wxT("%d,%d"), data.GetMin() , data.GetMax()); } -// wxString +wxCUSTOM_TYPE_INFO(wxRange, wxToStringConverter , wxFromStringConverter) + +// other types + +wxCOLLECTION_TYPE_INFO( wxString, wxArrayString ); -template<> void wxStringReadValue(const wxString &s , wxString &data ) +template<> void wxCollectionToVariantArray( wxArrayString const &theArray, + wxAnyList &value) { - data = s ; + wxArrayCollectionToVariantArray( theArray, value ); } -template<> void wxStringWriteValue(wxString &s , const wxString &data ) +wxTypeInfoMap *wxTypeInfo::ms_typeTable = NULL; + +wxTypeInfo *wxTypeInfo::FindType(const wxString& typeName) { - s = data ; + wxTypeInfoMap::iterator iter = ms_typeTable->find(typeName); + + if (iter == ms_typeTable->end()) + return NULL; + + return (wxTypeInfo *)iter->second; } -/* - 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 -*/ +wxClassTypeInfo::wxClassTypeInfo( wxTypeKind kind, wxClassInfo* classInfo, + wxVariant2StringFnc to, + wxString2VariantFnc 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; +} -// wxPoint +wxEventSourceTypeInfo::wxEventSourceTypeInfo( int eventType, wxClassInfo* eventClass, + wxVariant2StringFnc to, + wxString2VariantFnc from ) : + wxTypeInfo ( wxT_DELEGATE, to, from, wxEmptyString ) +{ + m_eventClass = eventClass; + m_eventType = eventType; + m_lastEventType = -1; +} -template<> void wxStringReadValue(const wxString &s , wxPoint &data ) -{ - wxSscanf(s, _T("%d,%d"), &data.x , &data.y ) ; +wxEventSourceTypeInfo::wxEventSourceTypeInfo( int eventType, int lastEventType, + wxClassInfo* eventClass, + wxVariant2StringFnc to, + wxString2VariantFnc from ) : + wxTypeInfo ( wxT_DELEGATE, to, from, wxEmptyString ) +{ + m_eventClass = eventClass; + m_eventType = eventType; + m_lastEventType = lastEventType; } -template<> void wxStringWriteValue(wxString &s , const wxPoint &data ) +void wxTypeInfo::Register() { - s = wxString::Format("%d,%d", data.x , data.y ) ; + if ( ms_typeTable == NULL ) + ms_typeTable = new wxTypeInfoMap(); + + if( !m_name.empty() ) + (*ms_typeTable)[m_name] = this; } -template<> void wxStringReadValue(const wxString & , wxPoint* & ) +void wxTypeInfo::Unregister() { - assert(0) ; + if( !m_name.empty() ) + ms_typeTable->erase(m_name); } -template<> void wxStringWriteValue(wxString & , wxPoint* 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()); + } } -WX_CUSTOM_TYPE_INFO(wxPoint) +// ---------------------------------------------------------------------------- +// wxPropertyInfo +// ---------------------------------------------------------------------------- -template<> void wxStringReadValue(const wxString &s , wxSize &data ) +void wxPropertyInfo::Insert(wxPropertyInfo* &iter) { - wxSscanf(s, _T("%d,%d"), &data.x , &data.y ) ; + m_next = NULL; + if ( iter == NULL ) + iter = this; + else + { + wxPropertyInfo* i = iter; + while( i->m_next ) + i = i->m_next; + + i->m_next = this; + } } -template<> void wxStringWriteValue(wxString &s , const wxSize &data ) +void wxPropertyInfo::Remove() { - s = wxString::Format("%d,%d", data.x , data.y ) ; + 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; + } + } + } -template<> void wxStringReadValue(const wxString & , wxSize* & ) +// ---------------------------------------------------------------------------- +// wxHandlerInfo +// ---------------------------------------------------------------------------- + +void wxHandlerInfo::Insert(wxHandlerInfo* &iter) { - assert(0) ; + m_next = NULL; + if ( iter == NULL ) + iter = this; + else + { + wxHandlerInfo* i = iter; + while( i->m_next ) + i = i->m_next; + + i->m_next = this; + } } -template<> void wxStringWriteValue(wxString & , wxSize * const & ) +void wxHandlerInfo::Remove() { - assert(0) ; + 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; + } + } } -WX_CUSTOM_TYPE_INFO(wxSize) -/* +// ---------------------------------------------------------------------------- +// wxClassInfo +// ---------------------------------------------------------------------------- -template<> void wxStringReadValue(const wxString &s , wxColour &data ) +bool wxClassInfo::Create(wxObject *object, int ParamCount, wxAny *Params) const { - // copied from VS xrc - unsigned long tmp = 0; - - if (s.Length() != 7 || s[0u] != wxT('#') || - wxSscanf(s.c_str(), wxT("#%lX"), &tmp) != 1) + if ( ParamCount != m_constructorPropertiesCount ) { - wxLogError(_("String To Colour : Incorrect colour specification : %s"), - s.c_str() ); - data = wxNullColour; + // FIXME: shouldn't we just return false and let the caller handle it? + wxLogError( _("Illegal Parameter Count for Create Method") ); + return false; } - else - { - data = wxColour((unsigned char) ((tmp & 0xFF0000) >> 16) , - (unsigned char) ((tmp & 0x00FF00) >> 8), - (unsigned char) ((tmp & 0x0000FF))); - } -} -template<> void wxStringWriteValue(wxString &s , const wxColour &data ) -{ - s = wxString::Format("#%2X%2X%2X", data.Red() , data.Green() , data.Blue() ) ; + return m_constructor->Create( object, Params ); } -WX_CUSTOM_TYPE_INFO(wxColour) - -*/ +wxObject *wxClassInfo::ConstructObject(int ParamCount, wxAny *Params) const +{ + if ( ParamCount != m_constructorPropertiesCount ) + { + // FIXME: shouldn't we just return NULL and let the caller handle this case? + wxLogError( _("Illegal Parameter Count for ConstructObject Method") ); + return NULL; + } -// removing header dependancy on string tokenizer + wxObject *object = NULL; + if (!m_constructor->Create( object, Params )) + return NULL; + return object; +} -void wxSetStringToArray( const wxString &s , wxArrayString &array ) +bool wxClassInfo::IsKindOf(const wxClassInfo *info) const { - wxStringTokenizer tokenizer(s, wxT("| \t\n"), wxTOKEN_STRTOK); - wxString flag; - array.Clear() ; - while (tokenizer.HasMoreTokens()) + if ( info != 0 ) { - array.Add(tokenizer.GetNextToken()) ; - } + if ( info == this ) + return true; + + for ( int i = 0; m_parents[i]; ++ i ) + { + if ( m_parents[i]->IsKindOf( info ) ) + return true; + } + } + return false; } -// ---------------------------------------------------------------------------- -// wxClassInfo -// ---------------------------------------------------------------------------- - -const wxPropertyAccessor *wxClassInfo::FindAccessor(const char *PropertyName) const +const wxPropertyAccessor *wxClassInfo::FindAccessor(const wxChar *PropertyName) const { - const wxPropertyInfo* info = FindPropertyInfo( PropertyName ) ; + const wxPropertyInfo* info = FindPropertyInfo( PropertyName ); - if ( info ) - return info->GetAccessor() ; + if ( info ) + return info->GetAccessor(); - return NULL ; + return NULL; } -const wxPropertyInfo *wxClassInfo::FindPropertyInfoInThisClass (const char *PropertyName) const +wxPropertyInfo *wxClassInfo::FindPropertyInfoInThisClass (const wxChar *PropertyName) const { - const wxPropertyInfo* info = GetFirstProperty() ; + wxPropertyInfo* info = GetFirstProperty(); - while( info ) - { - if ( strcmp( info->GetName() , PropertyName ) == 0 ) - return info ; - info = info->GetNext() ; - } + while( info ) + { + if ( wxStrcmp( info->GetName(), PropertyName ) == 0 ) + return info; + info = info->GetNext(); + } return 0; } -const wxPropertyInfo *wxClassInfo::FindPropertyInfo (const char *PropertyName) const +const wxPropertyInfo *wxClassInfo::FindPropertyInfo (const wxChar *PropertyName) const { - const wxPropertyInfo* info = FindPropertyInfoInThisClass( PropertyName ) ; + const wxPropertyInfo* info = FindPropertyInfoInThisClass( PropertyName ); if ( info ) - return info ; + return info; - const wxClassInfo** parents = GetParents() ; - for ( int i = 0 ; parents[i] ; ++ i ) - { - if ( ( info = parents[i]->FindPropertyInfo( PropertyName ) ) != NULL ) - return info ; - } + const wxClassInfo** parents = GetParents(); + for ( int i = 0; parents[i]; ++ i ) + { + if ( ( info = parents[i]->FindPropertyInfo( PropertyName ) ) != NULL ) + return info; + } return 0; } -const wxHandlerInfo *wxClassInfo::FindHandlerInfoInThisClass (const char *PropertyName) const +wxHandlerInfo *wxClassInfo::FindHandlerInfoInThisClass (const wxChar *PropertyName) const { - const wxHandlerInfo* info = GetFirstHandler() ; + wxHandlerInfo* info = GetFirstHandler(); - while( info ) - { - if ( strcmp( info->GetName() , PropertyName ) == 0 ) - return info ; - info = info->GetNext() ; - } + while( info ) + { + if ( wxStrcmp( info->GetName(), PropertyName ) == 0 ) + return info; + info = info->GetNext(); + } return 0; } -const wxHandlerInfo *wxClassInfo::FindHandlerInfo (const char *PropertyName) const +const wxHandlerInfo *wxClassInfo::FindHandlerInfo (const wxChar *PropertyName) const { - const wxHandlerInfo* info = FindHandlerInfoInThisClass( PropertyName ) ; + const wxHandlerInfo* info = FindHandlerInfoInThisClass( PropertyName ); if ( info ) - return info ; + return info; - const wxClassInfo** parents = GetParents() ; - for ( int i = 0 ; parents[i] ; ++ i ) - { - if ( ( info = parents[i]->FindHandlerInfo( PropertyName ) ) != NULL ) - return info ; - } + const wxClassInfo** parents = GetParents(); + for ( int i = 0; parents[i]; ++ i ) + { + if ( ( info = parents[i]->FindHandlerInfo( PropertyName ) ) != NULL ) + return info; + } return 0; } +wxObjectStreamingCallback wxClassInfo::GetStreamingCallback() const +{ + if ( m_streamingCallback ) + return m_streamingCallback; + + wxObjectStreamingCallback retval = NULL; + const wxClassInfo** parents = GetParents(); + for ( int i = 0; parents[i] && retval == NULL; ++ i ) + { + retval = parents[i]->GetStreamingCallback(); + } + return retval; +} + +bool wxClassInfo::BeforeWriteObject( const wxObject *obj, wxObjectWriter *streamer, + wxObjectWriterCallback *writercallback, const wxStringToAnyHashMap &metadata) const +{ + wxObjectStreamingCallback sb = GetStreamingCallback(); + if ( sb ) + return (*sb)(obj, streamer, writercallback, metadata ); + + return true; +} -void wxClassInfo::SetProperty(wxObject *object, const char *propertyName, const wxxVariant &value) const +void wxClassInfo::SetProperty(wxObject *object, const wxChar *propertyName, + const wxAny &value) const { const wxPropertyAccessor *accessor; accessor = FindAccessor(propertyName); wxASSERT(accessor->HasSetter()); - accessor->SetProperty( object , value ) ; + accessor->SetProperty( object, value ); } -wxxVariant wxClassInfo::GetProperty(wxObject *object, const char *propertyName) const +wxAny wxClassInfo::GetProperty(wxObject *object, const wxChar *propertyName) const { const wxPropertyAccessor *accessor; accessor = FindAccessor(propertyName); wxASSERT(accessor->HasGetter()); - return accessor->GetProperty(object); + wxAny result; + accessor->GetProperty(object,result); + return result; } -wxxVariantArray wxClassInfo::GetPropertyCollection(wxObject *object, const wxChar *propertyName) const +wxAnyList wxClassInfo::GetPropertyCollection(wxObject *object, + const wxChar *propertyName) const { const wxPropertyAccessor *accessor; accessor = FindAccessor(propertyName); wxASSERT(accessor->HasGetter()); - return accessor->GetPropertyCollection(object); + wxAnyList result; + accessor->GetPropertyCollection(object,result); + return result; } -void wxClassInfo::AddToPropertyCollection(wxObject *object, const wxChar *propertyName , const wxxVariant& value) const +void wxClassInfo::AddToPropertyCollection(wxObject *object, const wxChar *propertyName, + const wxAny& value) const { const wxPropertyAccessor *accessor; accessor = FindAccessor(propertyName); wxASSERT(accessor->HasAdder()); - accessor->AddToPropertyCollection( object , value ) ; + accessor->AddToPropertyCollection( object, value ); +} + +// 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 +{ + 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 ); + } } -/* -VARIANT TO OBJECT -*/ +wxObject* wxClassInfo::AnyToObjectPtr( const wxAny &data) const +{ + return m_variantOfPtrToObjectConverter(data); +} + +void wxClassInfo::CallOnAny( const wxAny &data, wxObjectFunctor* functor ) const +{ + if ( data.GetTypeInfo()->GetKind() == wxT_OBJECT ) + return m_variantToObjectConverter(data, functor); + else + return (*functor)(m_variantOfPtrToObjectConverter(data)); +} -wxObject* wxxVariant::GetAsObject() +wxAny wxClassInfo::ObjectPtrToAny( wxObject* obj) const { - const wxClassTypeInfo *ti = dynamic_cast( m_data->GetTypeInfo() ) ; - if ( ti ) - return ti->GetClassInfo()->VariantToInstance(*this) ; - else - return NULL ; + return m_objectToVariantConverter(obj); +} + +bool wxClassInfo::NeedsDirectConstruction() const +{ + return wx_dynamic_cast(wxObjectAllocator*, m_constructor) != NULL; } // ---------------------------------------------------------------------------- // 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 { - map m_properties ; -} ; + wxDynamicObjectInternal() {} + + wxStringToAnyHashMap m_properties; +}; + +typedef list< wxDynamicObject* > wxDynamicObjectList; + +struct wxDynamicClassInfo::wxDynamicClassInfoInternal +{ + wxDynamicObjectList m_dynamicObjects; +}; // instantiates this object with an instance of its superclass -wxDynamicObject::wxDynamicObject(wxObject* superClassInstance, const wxDynamicClassInfo *info) +wxDynamicObject::wxDynamicObject(wxObject* superClassInstance, const wxDynamicClassInfo *info) { - m_superClassInstance = superClassInstance ; - m_classInfo = info ; - m_data = new wxDynamicObjectInternal ; + m_superClassInstance = superClassInstance; + m_classInfo = info; + m_data = new wxDynamicObjectInternal; } wxDynamicObject::~wxDynamicObject() { - delete m_data ; - delete m_superClassInstance ; + wx_dynamic_cast(const wxDynamicClassInfo*, m_classInfo)-> + m_data->m_dynamicObjects.remove( this ); + delete m_data; + delete m_superClassInstance; } -void wxDynamicObject::SetProperty (const wxChar *propertyName, const wxxVariant &value) +void wxDynamicObject::SetProperty (const wxChar *propertyName, const wxAny &value) { - wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName),wxT("Accessing Unknown Property in a Dynamic Object") ) ; - m_data->m_properties[propertyName] = value ; + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName), + wxT("Accessing Unknown Property in a Dynamic Object") ); + m_data->m_properties[propertyName] = value; } -wxxVariant wxDynamicObject::GetProperty (const wxChar *propertyName) const +wxAny wxDynamicObject::GetProperty (const wxChar *propertyName) const { - wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName),wxT("Accessing Unknown Property in a Dynamic Object") ) ; - return m_data->m_properties[propertyName] ; + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName), + wxT("Accessing Unknown Property in a Dynamic Object") ); + return m_data->m_properties[propertyName]; } +void wxDynamicObject::RemoveProperty( const wxChar *propertyName ) +{ + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(propertyName), + wxT("Removing Unknown Property in a Dynamic Object") ); + m_data->m_properties.erase( propertyName ); +} + +void wxDynamicObject::RenameProperty( const wxChar *oldPropertyName, + const wxChar *newPropertyName ) +{ + wxASSERT_MSG(m_classInfo->FindPropertyInfoInThisClass(oldPropertyName), + wxT("Renaming Unknown Property in a Dynamic Object") ); + + wxAny value = m_data->m_properties[oldPropertyName]; + m_data->m_properties.erase( oldPropertyName ); + m_data->m_properties[newPropertyName] = value; +} + + // ---------------------------------------------------------------------------- -// wxDynamiClassInfo +// wxDynamicClassInfo // ---------------------------------------------------------------------------- -wxDynamicClassInfo::wxDynamicClassInfo( const wxChar *unitName, const wxChar *className , const wxClassInfo* superClass ) : - wxClassInfo( unitName, className , new const wxClassInfo*[2]) +wxDynamicClassInfo::wxDynamicClassInfo( const wxChar *unitName, + const wxChar *className, + const wxClassInfo* superClass ) : + wxClassInfo( unitName, className, new const wxClassInfo*[2]) { - GetParents()[0] = superClass ; - GetParents()[1] = NULL ; + GetParents()[0] = superClass; + GetParents()[1] = NULL; + m_data = new wxDynamicClassInfoInternal; } wxDynamicClassInfo::~wxDynamicClassInfo() { - delete[] GetParents() ; + delete[] GetParents(); + delete m_data; } -wxObject *wxDynamicClassInfo::AllocateObject() const +wxObject *wxDynamicClassInfo::AllocateObject() const { - wxObject* parent = GetParents()[0]->AllocateObject() ; - return new wxDynamicObject( parent , this ) ; + wxObject* parent = GetParents()[0]->AllocateObject(); + wxDynamicObject *obj = new wxDynamicObject( parent, this ); + m_data->m_dynamicObjects.push_back( obj ); + return obj; } -void wxDynamicClassInfo::Create (wxObject *object, int paramCount, wxxVariant *params) const +bool wxDynamicClassInfo::Create (wxObject *object, int paramCount, wxAny *params) const { - 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 ) ; + wxDynamicObject *dynobj = wx_dynamic_cast( wxDynamicObject *, object ); + wxASSERT_MSG( dynobj, + wxT("cannot call wxDynamicClassInfo::Create on ") + wxT("an object other than wxDynamicObject") ); + + return GetParents()[0]->Create( dynobj->GetSuperClassInstance(), paramCount, params ); } // get number of parameters for constructor -int wxDynamicClassInfo::GetCreateParamCount() const +int wxDynamicClassInfo::GetCreateParamCount() const { - return GetParents()[0]->GetCreateParamCount() ; + return GetParents()[0]->GetCreateParamCount(); } // get i-th constructor parameter -const wxChar* wxDynamicClassInfo::GetCreateParamName(int i) const +const wxChar* wxDynamicClassInfo::GetCreateParamName(int i) const { - return GetParents()[0]->GetCreateParamName( i ) ; + return GetParents()[0]->GetCreateParamName( i ); } -void wxDynamicClassInfo::SetProperty(wxObject *object, const char *propertyName, const wxxVariant &value) const +void wxDynamicClassInfo::SetProperty(wxObject *object, const wxChar *propertyName, const wxAny &value) const { - wxDynamicObject* dynobj = dynamic_cast< wxDynamicObject * >( object ) ; - wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; + wxDynamicObject* dynobj = wx_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 ) ; + dynobj->SetProperty( propertyName, value ); else - GetParents()[0]->SetProperty( dynobj->GetSuperClassInstance() , propertyName , value ) ; + GetParents()[0]->SetProperty( dynobj->GetSuperClassInstance(), propertyName, value ); } -wxxVariant wxDynamicClassInfo::GetProperty(wxObject *object, const char *propertyName) const +wxAny wxDynamicClassInfo::GetProperty(wxObject *object, const wxChar *propertyName) const { - wxDynamicObject* dynobj = dynamic_cast< wxDynamicObject * >( object ) ; - wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; + wxDynamicObject* dynobj = wx_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 ) ; + return dynobj->GetProperty( propertyName ); else - return GetParents()[0]->GetProperty( dynobj->GetSuperClassInstance() , propertyName ) ; + return GetParents()[0]->GetProperty( dynobj->GetSuperClassInstance(), propertyName ); } -void wxDynamicClassInfo::AddProperty( const wxChar *propertyName , const wxTypeInfo* typeInfo ) +void wxDynamicClassInfo::AddProperty( const wxChar *propertyName, const wxTypeInfo* typeInfo ) { - new wxPropertyInfo( m_firstProperty , propertyName , typeInfo , new wxGenericPropertyAccessor( propertyName ) , wxxVariant() ) ; + EnsureInfosInited(); + new wxPropertyInfo( m_firstProperty, this, propertyName, typeInfo->GetTypeName(), new wxGenericPropertyAccessor( propertyName ), wxAny() ); } -void wxDynamicClassInfo::AddHandler( const wxChar *handlerName , wxObjectEventFunction address , const wxClassInfo* eventClassInfo ) +void wxDynamicClassInfo::AddHandler( const wxChar *handlerName, wxObjectEventFunction address, const wxClassInfo* eventClassInfo ) { - new wxHandlerInfo( m_firstHandler , handlerName , address , eventClassInfo ) ; + EnsureInfosInited(); + new wxHandlerInfo( m_firstHandler, this, handlerName, address, eventClassInfo ); +} + +// removes an existing runtime-property +void wxDynamicClassInfo::RemoveProperty( const wxChar *propertyName ) +{ + for ( wxDynamicObjectList::iterator iter = m_data->m_dynamicObjects.begin(); iter != m_data->m_dynamicObjects.end(); ++iter ) + (*iter)->RemoveProperty( propertyName ); + delete FindPropertyInfoInThisClass(propertyName); +} + +// removes an existing runtime-handler +void wxDynamicClassInfo::RemoveHandler( const wxChar *handlerName ) +{ + delete FindHandlerInfoInThisClass(handlerName); +} + +// 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; + wx_dynamic_cast(wxGenericPropertyAccessor*, 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 ); +} + +// 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; } // ---------------------------------------------------------------------------- @@ -657,44 +910,63 @@ void wxDynamicClassInfo::AddHandler( const wxChar *handlerName , wxObjectEventFu struct wxGenericPropertyAccessor::wxGenericPropertyAccessorInternal { - wxString m_propertyName ; -} ; + char filler; +}; -wxGenericPropertyAccessor::wxGenericPropertyAccessor( const wxChar* propertyName ) +wxGenericPropertyAccessor::wxGenericPropertyAccessor( const wxString& propertyName ) +: wxPropertyAccessor( NULL, NULL, NULL, NULL ) { - m_data = new wxGenericPropertyAccessorInternal ; - m_data->m_propertyName = propertyName ; + m_data = new wxGenericPropertyAccessorInternal; + m_propertyName = propertyName; + m_getterName = wxT("Get")+propertyName; + m_setterName = wxT("Set")+propertyName; } wxGenericPropertyAccessor::~wxGenericPropertyAccessor() { - delete m_data ; + delete m_data; } -void wxGenericPropertyAccessor::SetProperty(wxObject *object, const wxxVariant &value) const + +void wxGenericPropertyAccessor::SetProperty(wxObject *object, const wxAny &value) const { - wxDynamicObject* dynobj = dynamic_cast< wxDynamicObject * >( object ) ; - wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; - dynobj->SetProperty(m_data->m_propertyName , value ) ; + wxDynamicObject* dynobj = wx_dynamic_cast(wxDynamicObject*, object); + wxASSERT_MSG( dynobj, wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ); + dynobj->SetProperty(m_propertyName.c_str(), value ); } -wxxVariant wxGenericPropertyAccessor::GetProperty(const wxObject *object) const +void wxGenericPropertyAccessor::GetProperty(const wxObject *object, wxAny& value) const { - const wxDynamicObject* dynobj = dynamic_cast< const wxDynamicObject * >( object ) ; - wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; - return dynobj->GetProperty( m_data->m_propertyName ) ; + const wxDynamicObject* dynobj = wx_dynamic_cast( const wxDynamicObject * , object ); + wxASSERT_MSG( dynobj, wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ); + value = dynobj->GetProperty( m_propertyName.c_str() ); } -wxxVariant wxGenericPropertyAccessor::ReadValue( const wxString &value ) const +// ---------------------------------------------------------------------------- +// wxGenericPropertyAccessor +// ---------------------------------------------------------------------------- + +wxString wxAnyGetAsString( const wxAny& data) { - return wxxVariant(value) ; + if ( data.IsNull() || data.GetTypeInfo()==NULL ) + return wxEmptyString; + + wxString s; + data.GetTypeInfo()->ConvertToString(data,s); + return s; } -void wxGenericPropertyAccessor::WriteValue( wxString& value , const wxObject *object ) const +const wxObject* wxAnyGetAsObjectPtr( const wxAny& data) { - const wxDynamicObject* dynobj = dynamic_cast< const wxDynamicObject * >( object ) ; - wxASSERT_MSG( dynobj , wxT("cannot call wxDynamicClassInfo::SetProperty on an object other than wxDynamicObject") ) ; - wxxVariant val = dynobj->GetProperty( m_data->m_propertyName ) ; - value = val.GetAsString() ; + if ( !data.IsNull() ) + { + const wxClassTypeInfo* ti = wx_dynamic_cast(const wxClassTypeInfo*, data.GetTypeInfo()); + if( ti ) + return ti->GetClassInfo()->AnyToObjectPtr(data); + } + return NULL; } -#endif +wxObjectFunctor::~wxObjectFunctor() +{}; + +#endif // wxUSE_EXTENDED_RTTI