/////////////////////////////////////////////////////////////////////////////
// Name: src/common/xtistrm.cpp
-// Purpose: streaming runtime metadata information
+// Purpose: streaming runtime metadata information
// Author: Stefan Csomor
-// Modified by:
+// Modified by:
// Created: 27/07/03
-// RCS-ID: $Id$
// Copyright: (c) 2003 Stefan Csomor
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "xtistrm.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
+
+#include "wx/xtistrm.h"
+
#ifndef WX_PRECOMP
- #include "wx/hash.h"
#include "wx/object.h"
+ #include "wx/hash.h"
+ #include "wx/event.h"
#endif
-#include "wx/xml/xml.h"
#include "wx/tokenzr.h"
-#include "wx/xtistrm.h"
#include "wx/txtstrm.h"
-#if wxUSE_EXTENDED_RTTI
+// STL headers:
+
+#include "wx/beforestd.h"
#include <map>
#include <vector>
#include <string>
+#include "wx/afterstd.h"
+using namespace std;
-using namespace std ;
// ----------------------------------------------------------------------------
-// streaming xml out
+// wxObjectWriter
// ----------------------------------------------------------------------------
-void WriteComponent(wxObject *Object, const wxClassInfo *classInfo, wxXmlNode *parent, const wxString& nodeName , int &nextId, bool embeddedObject, map< wxObject* , int > &writtenObjects ) ;
-
-void WriteComponentProperties( wxObject* obj , const wxClassInfo* ci , wxXmlNode *onode , int &nextId, map< wxObject* , int > &writtenObjects, map< string , int > &writtenProperties)
-{
- const wxPropertyInfo *pi = ci->GetFirstProperty() ;
- while( pi )
- {
- if ( writtenProperties.find( pi->GetName() ) == writtenProperties.end() )
- {
- writtenProperties[ pi->GetName() ] = 1 ;
- const wxClassTypeInfo* cti = dynamic_cast< const wxClassTypeInfo* > ( pi->GetTypeInfo() ) ;
- if ( cti )
- {
- const wxClassInfo* pci = cti->GetClassInfo() ;
- wxxVariant value = pi->GetAccessor()->GetProperty(obj) ;
- WriteComponent( pci->VariantToInstance( value ) , pci , onode , pi->GetName() , nextId ,
- ( cti->GetKind() == wxT_OBJECT ) , writtenObjects ) ;
- }
- else
- {
- const wxDelegateTypeInfo* dti = dynamic_cast< const wxDelegateTypeInfo* > ( pi->GetTypeInfo() ) ;
- if ( dti )
- {
- // in which form should we stream out these ?
- }
- else
- {
- wxXmlNode *pnode;
- pnode = new wxXmlNode(wxXML_ELEMENT_NODE, pi->GetName() );
- pi->GetAccessor()->WriteValue(pnode, obj ) ;
- onode->AddChild(pnode);
- }
- }
- }
- pi = pi->GetNext() ;
- }
- const wxClassInfo** parents = ci->GetParents() ;
- for ( int i = 0 ; parents[i] ; ++ i )
- {
- WriteComponentProperties( obj , parents[i] , onode , nextId , writtenObjects , writtenProperties ) ;
- }
+struct wxObjectWriter::wxObjectWriterInternal
+{
+ map< const wxObject*, int > m_writtenObjects;
+ int m_nextId;
+};
+
+wxObjectWriter::wxObjectWriter()
+{
+ m_data = new wxObjectWriterInternal;
+ m_data->m_nextId = 0;
}
-/*
- Writing Components does have to take inheritance into account, that's why we are iterating
- over our parents as well
- */
+wxObjectWriter::~wxObjectWriter()
+{
+ delete m_data;
+}
+
+struct wxObjectWriter::wxObjectWriterInternalPropertiesData
+{
+ char nothing;
+};
-void WriteComponent(wxObject *obj, const wxClassInfo *classInfo, wxXmlNode *parent, const wxString &nodeName)
+void wxObjectWriter::ClearObjectContext()
{
- int nextid = 0 ; // 0 is the root element
- map< wxObject* , int > writtenobjects ;
- WriteComponent( obj , classInfo, parent, nodeName , nextid , false , writtenobjects ) ;
+ delete m_data;
+ m_data = new wxObjectWriterInternal();
+ m_data->m_nextId = 0;
}
-void WriteComponent(wxObject *obj, const wxClassInfo *classInfo, wxXmlNode *parent, const wxString& nodeName , int &nextId, bool embeddedObject, map< wxObject* , int > &writtenObjects )
-{
- map< string , int > writtenProperties ;
- wxXmlNode *onode;
-
- onode = new wxXmlNode(wxXML_ELEMENT_NODE, nodeName);
-
- onode->AddProperty(wxString("class"), wxString(classInfo->GetClassName()));
- if ( obj == NULL )
- {
- wxXmlNode* nullnode = new wxXmlNode(wxXML_TEXT_NODE, wxEmptyString, "null");
- onode->AddChild(nullnode);
- }
- else
- {
- // if we have already written this object, just insert an id
- // embedded objects have to be written out fully always, their address will be reused and is not a valid key
- if ( !embeddedObject && (writtenObjects.find( obj ) != writtenObjects.end()) )
- {
- onode->AddProperty(wxString("id"), wxString::Format( "%d" , writtenObjects[obj] ) );
- }
- else
- {
- int id = nextId++ ;
- if ( !embeddedObject )
- writtenObjects[obj] = id ;
- onode->AddProperty(wxString("id"), wxString::Format( "%d" , id ) );
- WriteComponentProperties( obj , classInfo , onode , nextId , writtenObjects, writtenProperties) ;
- }
- }
-
- parent->AddChild(onode);
+void wxObjectWriter::WriteObject(const wxObject *object, const wxClassInfo *classInfo,
+ wxObjectWriterCallback *writercallback, const wxString &name,
+ const wxStringToAnyHashMap &metadata )
+{
+ DoBeginWriteTopLevelEntry( name );
+ WriteObject( object, classInfo, writercallback, false, metadata);
+ DoEndWriteTopLevelEntry( name );
}
-// ----------------------------------------------------------------------------
-// reading objects in
-// ----------------------------------------------------------------------------
+void wxObjectWriter::WriteObject(const wxObject *object, const wxClassInfo *classInfo,
+ wxObjectWriterCallback *writercallback, bool isEmbedded,
+ const wxStringToAnyHashMap &metadata )
+{
+ if ( !classInfo->BeforeWriteObject( object, this, writercallback, metadata) )
+ return;
+
+ if ( writercallback->BeforeWriteObject( this, object, classInfo, metadata) )
+ {
+ if ( object == NULL )
+ DoWriteNullObject();
+ else if ( IsObjectKnown( object ) )
+ DoWriteRepeatedObject( GetObjectID(object) );
+ else
+ {
+ int oid = m_data->m_nextId++;
+ if ( !isEmbedded )
+ m_data->m_writtenObjects[object] = oid;
+
+ // in case this object is a wxDynamicObject we also have to insert is superclass
+ // instance with the same id, so that object relations are streamed out correctly
+ const wxDynamicObject* dynobj = wx_dynamic_cast(const wxDynamicObject*, object);
+ if ( !isEmbedded && dynobj )
+ m_data->m_writtenObjects[dynobj->GetSuperClassInstance()] = oid;
+
+ DoBeginWriteObject( object, classInfo, oid, metadata );
+ wxObjectWriterInternalPropertiesData data;
+ WriteAllProperties( object, classInfo, writercallback, &data );
+ DoEndWriteObject( object, classInfo, oid );
+ }
+ writercallback->AfterWriteObject( this,object, classInfo );
+ }
+}
-struct wxReader::wxReaderInternal
+void wxObjectWriter::FindConnectEntry(const wxEvtHandler * evSource,
+ const wxEventSourceTypeInfo* dti,
+ const wxObject* &sink,
+ const wxHandlerInfo *&handler)
{
- map<int,wxClassInfo*> m_classInfos;
-};
+ wxList *dynamicEvents = evSource->GetDynamicEventTable();
-wxReader::wxReader()
+ if ( dynamicEvents )
+ {
+ for ( wxList::const_iterator node = dynamicEvents->begin(); node != dynamicEvents->end(); ++node )
+ {
+ wxDynamicEventTableEntry *entry = (wxDynamicEventTableEntry*)(*node);
+
+ // find the match
+ if ( entry->m_fn &&
+ (dti->GetEventType() == entry->m_eventType) &&
+ (entry->m_id == -1 ) &&
+ (entry->m_fn->GetEvtHandler() != NULL ) )
+ {
+ sink = entry->m_fn->GetEvtHandler();
+ const wxClassInfo* sinkClassInfo = sink->GetClassInfo();
+ const wxHandlerInfo* sinkHandler = sinkClassInfo->GetFirstHandler();
+ while ( sinkHandler )
+ {
+ if ( sinkHandler->GetEventFunction() == entry->m_fn->GetEvtMethod() )
+ {
+ handler = sinkHandler;
+ break;
+ }
+ sinkHandler = sinkHandler->GetNext();
+ }
+ break;
+ }
+ }
+ }
+}
+void wxObjectWriter::WriteAllProperties( const wxObject * obj, const wxClassInfo* ci,
+ wxObjectWriterCallback *writercallback,
+ wxObjectWriterInternalPropertiesData * data )
{
- m_data = new wxReaderInternal;
+ wxPropertyInfoMap map;
+ ci->GetProperties( map );
+ for ( int i = 0; i < ci->GetCreateParamCount(); ++i )
+ {
+ wxString name = ci->GetCreateParamName(i);
+ wxPropertyInfoMap::const_iterator iter = map.find(name);
+ const wxPropertyInfo* prop = iter == map.end() ? NULL : iter->second;
+ if ( prop )
+ {
+ WriteOneProperty( obj, prop->GetDeclaringClass(), prop, writercallback, data );
+ }
+ else
+ {
+ wxLogError( _("Create Parameter %s not found in declared RTTI Parameters"), name.c_str() );
+ }
+ map.erase( name );
+ }
+ { // Extra block for broken compilers
+ for( wxPropertyInfoMap::iterator iter = map.begin(); iter != map.end(); ++iter )
+ {
+ const wxPropertyInfo* prop = iter->second;
+ if ( prop->GetFlags() & wxPROP_OBJECT_GRAPH )
+ {
+ WriteOneProperty( obj, prop->GetDeclaringClass(), prop, writercallback, data );
+ }
+ }
+ }
+ { // Extra block for broken compilers
+ for( wxPropertyInfoMap::iterator iter = map.begin(); iter != map.end(); ++iter )
+ {
+ const wxPropertyInfo* prop = iter->second;
+ if ( !(prop->GetFlags() & wxPROP_OBJECT_GRAPH) )
+ {
+ WriteOneProperty( obj, prop->GetDeclaringClass(), prop, writercallback, data );
+ }
+ }
+ }
}
-wxReader::~wxReader()
+class WXDLLIMPEXP_BASE wxObjectPropertyWriter: public wxObjectWriterFunctor
{
- delete m_data;
-}
+public:
+ wxObjectPropertyWriter(const wxClassTypeInfo* cti,
+ wxObjectWriterCallback *writercallback,
+ wxObjectWriter* writer,
+ wxStringToAnyHashMap &props) :
+ m_cti(cti),m_persister(writercallback),m_writer(writer),m_props(props)
+ {}
+
+ virtual void operator()(const wxObject *vobj)
+ {
+ m_writer->WriteObject( vobj, (vobj ? vobj->GetClassInfo() : m_cti->GetClassInfo() ),
+ m_persister, m_cti->GetKind()== wxT_OBJECT, m_props );
+ }
+private:
+ const wxClassTypeInfo* m_cti;
+ wxObjectWriterCallback *m_persister;
+ wxObjectWriter* m_writer;
+ wxStringToAnyHashMap& m_props;
+};
-wxClassInfo* wxReader::GetObjectClassInfo(int objectID)
+void wxObjectWriter::WriteOneProperty( const wxObject *obj, const wxClassInfo* ci,
+ const wxPropertyInfo* pi, wxObjectWriterCallback *writercallback,
+ wxObjectWriterInternalPropertiesData *WXUNUSED(data) )
{
- assert( m_data->m_classInfos.find(objectID) != m_data->m_classInfos.end() );
- return m_data->m_classInfos[objectID] ;
+ if ( pi->GetFlags() & wxPROP_DONT_STREAM )
+ return;
+
+ // make sure that we are picking the correct object for accessing the property
+ const wxDynamicObject* dynobj = wx_dynamic_cast(const wxDynamicObject*, obj );
+ if ( dynobj && (wx_dynamic_cast(const wxDynamicClassInfo*, ci) == NULL) )
+ obj = dynobj->GetSuperClassInstance();
+
+ if ( pi->GetTypeInfo()->GetKind() == wxT_COLLECTION )
+ {
+ wxAnyList data;
+ pi->GetAccessor()->GetPropertyCollection(obj, data);
+ const wxTypeInfo * elementType =
+ wx_dynamic_cast( const wxCollectionTypeInfo*, pi->GetTypeInfo() )->GetElementType();
+ if ( !data.empty() )
+ {
+ DoBeginWriteProperty( pi );
+ for ( wxAnyList::const_iterator iter = data.begin(); iter != data.end(); ++iter )
+ {
+ DoBeginWriteElement();
+ const wxAny* valptr = *iter;
+ if ( writercallback->BeforeWriteProperty( this, obj, pi, *valptr ) )
+ {
+ const wxClassTypeInfo* cti =
+ wx_dynamic_cast( const wxClassTypeInfo*, elementType );
+ if ( cti )
+ {
+ wxStringToAnyHashMap md;
+ wxObjectPropertyWriter pw(cti,writercallback,this, md);
+
+ const wxClassInfo* pci = cti->GetClassInfo();
+ pci->CallOnAny( *valptr, &pw);
+ }
+ else
+ {
+ DoWriteSimpleType( *valptr );
+ }
+ }
+ DoEndWriteElement();
+ }
+ DoEndWriteProperty( pi );
+ }
+ }
+ else
+ {
+ const wxEventSourceTypeInfo* dti =
+ wx_dynamic_cast( const wxEventSourceTypeInfo* , pi->GetTypeInfo() );
+ if ( dti )
+ {
+ const wxObject* sink = NULL;
+ const wxHandlerInfo *handler = NULL;
+
+ const wxEvtHandler * evSource = wx_dynamic_cast(const wxEvtHandler *, obj);
+ if ( evSource )
+ {
+ FindConnectEntry( evSource, dti, sink, handler );
+ if ( writercallback->BeforeWriteDelegate( this, obj, ci, pi, sink, handler ) )
+ {
+ if ( sink != NULL && handler != NULL )
+ {
+ DoBeginWriteProperty( pi );
+ if ( IsObjectKnown( sink ) )
+ {
+ DoWriteDelegate( obj, ci, pi, sink, GetObjectID( sink ),
+ sink->GetClassInfo(), handler );
+ DoEndWriteProperty( pi );
+ }
+ else
+ {
+ wxLogError( wxT("Streaming delegates for not already ")
+ wxT("streamed objects not yet supported") );
+ }
+ }
+ }
+ }
+ else
+ {
+ wxLogError(_("Illegal Object Class (Non-wxEvtHandler) as Event Source") );
+ }
+ }
+ else
+ {
+ wxAny value;
+ pi->GetAccessor()->GetProperty(obj, value);
+
+ // avoid streaming out void objects
+ // TODO Verify
+ if( value.IsNull() )
+ return;
+
+ if ( pi->GetFlags() & wxPROP_ENUM_STORE_LONG )
+ {
+ const wxEnumTypeInfo *eti =
+ wx_dynamic_cast(const wxEnumTypeInfo*, pi->GetTypeInfo() );
+ if ( eti )
+ {
+ eti->ConvertFromLong( wxANY_AS(value, long ), value );
+ }
+ else
+ {
+ wxLogError( _("Type must have enum - long conversion") );
+ }
+ }
+
+ // avoid streaming out default values
+ if ( pi->GetTypeInfo()->HasStringConverters() &&
+ !pi->GetDefaultValue().IsNull() ) // TODO Verify
+ {
+ if ( wxAnyGetAsString(value) == wxAnyGetAsString(pi->GetDefaultValue()) )
+ return;
+ }
+
+ // avoid streaming out null objects
+ const wxClassTypeInfo* cti =
+ wx_dynamic_cast( const wxClassTypeInfo* , pi->GetTypeInfo() );
+
+ if ( cti && cti->GetKind() == wxT_OBJECT_PTR && wxAnyGetAsObjectPtr(value) == NULL )
+ return;
+
+ if ( writercallback->BeforeWriteProperty( this, obj, pi, value ) )
+ {
+ DoBeginWriteProperty( pi );
+ if ( cti )
+ {
+ if ( cti->HasStringConverters() )
+ {
+ wxString stringValue;
+ cti->ConvertToString( value, stringValue );
+ wxAny convertedValue(stringValue);
+ DoWriteSimpleType( convertedValue );
+ }
+ else
+ {
+ wxStringToAnyHashMap md;
+ wxObjectPropertyWriter pw(cti,writercallback,this, md);
+
+ const wxClassInfo* pci = cti->GetClassInfo();
+ pci->CallOnAny(value, &pw);
+ }
+ }
+ else
+ {
+ DoWriteSimpleType( value );
+ }
+ DoEndWriteProperty( pi );
+ }
+ }
+ }
}
-void wxReader::SetObjectClassInfo(int objectID, wxClassInfo *classInfo )
+int wxObjectWriter::GetObjectID(const wxObject *obj)
{
- assert( m_data->m_classInfos.find(objectID) == m_data->m_classInfos.end() ) ;
- m_data->m_classInfos[objectID] = classInfo ;
+ if ( !IsObjectKnown( obj ) )
+ return wxInvalidObjectID;
+
+ return m_data->m_writtenObjects[obj];
}
-bool wxReader::HasObjectClassInfo( int objectID )
+bool wxObjectWriter::IsObjectKnown( const wxObject *obj )
{
- return m_data->m_classInfos.find(objectID) != m_data->m_classInfos.end() ;
+ return m_data->m_writtenObjects.find( obj ) != m_data->m_writtenObjects.end();
}
// ----------------------------------------------------------------------------
-// reading xml in
+// wxObjectReader
// ----------------------------------------------------------------------------
-/*
- Reading components has not to be extended for components
- as properties are always sought by typeinfo over all levels
- and create params are always toplevel class only
-*/
+struct wxObjectReader::wxObjectReaderInternal
+{
+ map<int,wxClassInfo*> m_classInfos;
+};
-int wxXmlReader::ReadComponent(wxXmlNode *node, wxDepersister *callbacks)
+wxObjectReader::wxObjectReader()
{
- wxString className;
- wxClassInfo *classInfo;
+ m_data = new wxObjectReaderInternal;
+}
- wxxVariant *createParams ;
- int *createParamOids ;
- const wxClassInfo** createClassInfos ;
- wxXmlNode *children;
- int objectID;
+wxObjectReader::~wxObjectReader()
+{
+ delete m_data;
+}
- children = node->GetChildren();
- if (!node->GetPropVal("class", &className))
+wxClassInfo* wxObjectReader::GetObjectClassInfo(int objectID)
+{
+ if ( objectID == wxNullObjectID || objectID == wxInvalidObjectID )
{
- // No class name. Eek. FIXME: error handling
- return wxInvalidObjectID;
+ wxLogError( _("Invalid or Null Object ID passed to GetObjectClassInfo" ) );
+ return NULL;
}
- classInfo = wxClassInfo::FindClass(className);
- if (children && children->GetType() == wxXML_TEXT_NODE)
+ if ( m_data->m_classInfos.find(objectID) == m_data->m_classInfos.end() )
{
- assert( wxXmlGetContentFromNode(node) == "null" ) ;
- // this must be a NULL component reference. We just bail out
- return wxNullObjectID;
- }
-
- wxString ObjectIdString ;
- if (!node->GetPropVal("id", &ObjectIdString))
- {
- // No object id. Eek. FIXME: error handling
- return wxInvalidObjectID;
+ wxLogError( _("Unknown Object passed to GetObjectClassInfo" ) );
+ return NULL;
}
-
- objectID = atoi( ObjectIdString.c_str() ) ;
- // is this object already has been streamed in, return it here
- if ( HasObjectClassInfo( objectID ) )
- return objectID ;
-
- // new object, start with allocation
- // first make the object know to our internal registry
- SetObjectClassInfo( objectID , classInfo ) ;
-
- callbacks->AllocateObject(objectID, classInfo);
-
- //
- // stream back the Create parameters first
- createParams = new wxxVariant[ classInfo->GetCreateParamCount() ] ;
- createParamOids = new int[classInfo->GetCreateParamCount() ] ;
- createClassInfos = new const wxClassInfo*[classInfo->GetCreateParamCount() ] ;
-
- typedef map<string, wxXmlNode *> PropertyNodes ;
- typedef vector<string> PropertyNames ;
-
- PropertyNodes propertyNodes ;
- PropertyNames propertyNames ;
-
- while( children )
- {
- propertyNames.push_back( children->GetName().c_str() ) ;
- propertyNodes[children->GetName().c_str()] = children ;
- children = children->GetNext() ;
- }
-
- for ( int i = 0 ; i <classInfo->GetCreateParamCount() ; ++i )
- {
- const wxChar* paramName = classInfo->GetCreateParamName(i) ;
- PropertyNodes::iterator propiter = propertyNodes.find( paramName ) ;
- const wxPropertyInfo* pi = classInfo->FindPropertyInfo( paramName ) ;
- // if we don't have the value of a create param set in the xml
- // we use the default value
- if ( propiter != propertyNodes.end() )
- {
- wxXmlNode* prop = propiter->second ;
- if ( pi->GetTypeInfo()->IsObjectType() )
- {
- createParamOids[i] = ReadComponent( prop , callbacks ) ;
- createClassInfos[i] = dynamic_cast<const wxClassTypeInfo*>(pi->GetTypeInfo())->GetClassInfo() ;
- }
- else
- {
- createParamOids[i] = wxInvalidObjectID ;
- createParams[i] = ReadValue( prop , pi->GetAccessor() ) ;
- createClassInfos[i] = NULL ;
- }
-
- for ( size_t j = 0 ; j < propertyNames.size() ; ++j )
- {
- if ( propertyNames[j] == paramName )
- {
- propertyNames[j] = "" ;
- break ;
- }
- }
- }
- else
- {
- createParams[i] = pi->GetDefaultValue() ;
- }
- }
-
- // got the parameters. Call the Create method
- callbacks->CreateObject(objectID, classInfo,
- classInfo->GetCreateParamCount(),
- createParams, createParamOids, createClassInfos);
-
- // now stream in the rest of the properties, in the sequence their properties were written in the xml
- for ( size_t j = 0 ; j < propertyNames.size() ; ++j )
- {
- if ( propertyNames[j].length() )
- {
- PropertyNodes::iterator propiter = propertyNodes.find( propertyNames[j] ) ;
- if ( propiter != propertyNodes.end() )
- {
- wxXmlNode* prop = propiter->second ;
- const wxPropertyInfo* pi = classInfo->FindPropertyInfo( propertyNames[j].c_str() ) ;
- if ( pi->GetTypeInfo()->IsObjectType() )
- {
- int valueId = ReadComponent( prop , callbacks ) ;
- if ( callbacks )
- {
- if ( valueId != wxInvalidObjectID )
- {
- callbacks->SetPropertyAsObject( objectID , classInfo , pi , valueId ) ;
- if ( pi->GetTypeInfo()->GetKind() == wxT_OBJECT && valueId != wxNullObjectID )
- callbacks->DestroyObject( valueId , GetObjectClassInfo( valueId ) ) ;
- }
- }
- }
- else if ( pi->GetTypeInfo()->IsDelegateType() )
- {
- wxString resstring = wxXmlGetContentFromNode(prop) ;
- wxInt32 pos = resstring.Find('.') ;
- assert( pos != wxNOT_FOUND ) ;
- int sinkOid = atol(resstring.Left(pos)) ;
- wxString handlerName = resstring.Mid(pos+1) ;
- wxClassInfo* sinkClassInfo = GetObjectClassInfo( sinkOid ) ;
-
- if (callbacks)
- callbacks->SetConnect( objectID , classInfo , dynamic_cast<const wxDelegateTypeInfo*>(pi->GetTypeInfo()) , sinkClassInfo ,
- sinkClassInfo->FindHandlerInfo(handlerName) , sinkOid ) ;
-
- }
- else
- {
- if ( callbacks )
- callbacks->SetProperty( objectID, classInfo ,pi , ReadValue( prop , pi->GetAccessor() ) ) ;
- }
- }
- }
- }
-
- delete[] createParams ;
- delete[] createParamOids ;
- delete[] createClassInfos ;
-
- return objectID;
+ return m_data->m_classInfos[objectID];
}
-wxxVariant wxXmlReader::ReadValue(wxXmlNode *node,
- wxPropertyAccessor *accessor )
+void wxObjectReader::SetObjectClassInfo(int objectID, wxClassInfo *classInfo )
{
- return accessor->ReadValue(node) ;
+ if ( objectID == wxNullObjectID || objectID == wxInvalidObjectID )
+ {
+ wxLogError( _("Invalid or Null Object ID passed to GetObjectClassInfo" ) );
+ return;
+ }
+ if ( m_data->m_classInfos.find(objectID) != m_data->m_classInfos.end() )
+ {
+ wxLogError( _("Already Registered Object passed to SetObjectClassInfo" ) );
+ return;
+ }
+ m_data->m_classInfos[objectID] = classInfo;
}
-int wxXmlReader::ReadObject(wxDepersister *callbacks)
+bool wxObjectReader::HasObjectClassInfo( int objectID )
{
- return ReadComponent( m_parent , callbacks ) ;
+ if ( objectID == wxNullObjectID || objectID == wxInvalidObjectID )
+ {
+ wxLogError( _("Invalid or Null Object ID passed to HasObjectClassInfo" ) );
+ return false;
+ }
+ return m_data->m_classInfos.find(objectID) != m_data->m_classInfos.end();
}
+
+// ----------------------------------------------------------------------------
+// reading xml in
+// ----------------------------------------------------------------------------
+
+/*
+Reading components has not to be extended for components
+as properties are always sought by typeinfo over all levels
+and create params are always toplevel class only
+*/
+
+
// ----------------------------------------------------------------------------
-// depersisting to memory
+// wxObjectRuntimeReaderCallback - depersisting to memory
// ----------------------------------------------------------------------------
-struct wxRuntimeDepersister::wxRuntimeDepersisterInternal
+struct wxObjectRuntimeReaderCallback::wxObjectRuntimeReaderCallbackInternal
{
map<int,wxObject *> m_objects;
- void SetObject(int objectID, wxObject *obj )
- {
- assert( m_objects.find(objectID) == m_objects.end() ) ;
- m_objects[objectID] = obj ;
- }
- wxObject* GetObject( int objectID )
- {
- if ( objectID == wxNullObjectID )
- return NULL ;
-
- assert( m_objects.find(objectID) != m_objects.end() ) ;
- return m_objects[objectID] ;
- }
-} ;
+ void SetObject(int objectID, wxObject *obj )
+ {
+ if ( m_objects.find(objectID) != m_objects.end() )
+ {
+ wxLogError( _("Passing a already registered object to SetObject") );
+ return ;
+ }
+ m_objects[objectID] = obj;
+ }
+ wxObject* GetObject( int objectID )
+ {
+ if ( objectID == wxNullObjectID )
+ return NULL;
+ if ( m_objects.find(objectID) == m_objects.end() )
+ {
+ wxLogError( _("Passing an unknown object to GetObject") );
+ return NULL;
+ }
+
+ return m_objects[objectID];
+ }
+};
-wxRuntimeDepersister::wxRuntimeDepersister()
+wxObjectRuntimeReaderCallback::wxObjectRuntimeReaderCallback()
{
- m_data = new wxRuntimeDepersisterInternal() ;
+ m_data = new wxObjectRuntimeReaderCallbackInternal();
}
-wxRuntimeDepersister::~wxRuntimeDepersister()
+wxObjectRuntimeReaderCallback::~wxObjectRuntimeReaderCallback()
{
- delete m_data ;
+ delete m_data;
}
-void wxRuntimeDepersister::AllocateObject(int objectID, wxClassInfo *classInfo)
+void wxObjectRuntimeReaderCallback::AllocateObject(int objectID, wxClassInfo *classInfo,
+ wxStringToAnyHashMap &WXUNUSED(metadata))
{
wxObject *O;
O = classInfo->CreateObject();
m_data->SetObject(objectID, O);
}
-void wxRuntimeDepersister::CreateObject(int objectID,
- const wxClassInfo *classInfo,
- int paramCount,
- wxxVariant *params,
- int *objectIdValues,
- const wxClassInfo **objectClassInfos)
+void wxObjectRuntimeReaderCallback::CreateObject(int objectID,
+ const wxClassInfo *classInfo,
+ int paramCount,
+ wxAny *params,
+ int *objectIdValues,
+ const wxClassInfo **objectClassInfos,
+ wxStringToAnyHashMap &WXUNUSED(metadata))
{
wxObject *o;
o = m_data->GetObject(objectID);
- for ( int i = 0 ; i < paramCount ; ++i )
- {
- if ( objectIdValues[i] != wxInvalidObjectID )
- {
- wxObject *o;
- o = m_data->GetObject(objectIdValues[i]);
- params[i] = objectClassInfos[i]->InstanceToVariant(o) ;
- }
- }
+ for ( int i = 0; i < paramCount; ++i )
+ {
+ if ( objectIdValues[i] != wxInvalidObjectID )
+ {
+ wxObject *o;
+ o = m_data->GetObject(objectIdValues[i]);
+ // if this is a dynamic object and we are asked for another class
+ // than wxDynamicObject we cast it down manually.
+ wxDynamicObject *dyno = wx_dynamic_cast( wxDynamicObject *, o);
+ if ( dyno!=NULL && (objectClassInfos[i] != dyno->GetClassInfo()) )
+ {
+ o = dyno->GetSuperClassInstance();
+ }
+ params[i] = objectClassInfos[i]->ObjectPtrToAny(o);
+ }
+ }
classInfo->Create(o, paramCount, params);
}
-void wxRuntimeDepersister::DestroyObject(int objectID, wxClassInfo *WXUNUSED(classInfo))
+void wxObjectRuntimeReaderCallback::ConstructObject(int objectID,
+ const wxClassInfo *classInfo,
+ int paramCount,
+ wxAny *params,
+ int *objectIdValues,
+ const wxClassInfo **objectClassInfos,
+ wxStringToAnyHashMap &WXUNUSED(metadata))
+{
+ wxObject *o;
+ for ( int i = 0; i < paramCount; ++i )
+ {
+ if ( objectIdValues[i] != wxInvalidObjectID )
+ {
+ wxObject *o;
+ o = m_data->GetObject(objectIdValues[i]);
+ // if this is a dynamic object and we are asked for another class
+ // than wxDynamicObject we cast it down manually.
+ wxDynamicObject *dyno = wx_dynamic_cast( wxDynamicObject *, o);
+ if ( dyno!=NULL && (objectClassInfos[i] != dyno->GetClassInfo()) )
+ {
+ o = dyno->GetSuperClassInstance();
+ }
+ params[i] = objectClassInfos[i]->ObjectPtrToAny(o);
+ }
+ }
+ o = classInfo->ConstructObject(paramCount, params);
+ m_data->SetObject(objectID, o);
+}
+
+
+void wxObjectRuntimeReaderCallback::DestroyObject(int objectID, wxClassInfo *WXUNUSED(classInfo))
{
wxObject *o;
o = m_data->GetObject(objectID);
- delete o ;
+ delete o;
}
-void wxRuntimeDepersister::SetProperty(int objectID,
- const wxClassInfo *WXUNUSED(classInfo),
- const wxPropertyInfo* propertyInfo,
- const wxxVariant &value)
+void wxObjectRuntimeReaderCallback::SetProperty(int objectID,
+ const wxClassInfo *classInfo,
+ const wxPropertyInfo* propertyInfo,
+ const wxAny &value)
{
wxObject *o;
o = m_data->GetObject(objectID);
- propertyInfo->GetAccessor()->SetProperty( o , value ) ;
+ classInfo->SetProperty( o, propertyInfo->GetName().c_str(), value );
}
-void wxRuntimeDepersister::SetPropertyAsObject(int objectID,
- const wxClassInfo *WXUNUSED(classInfo),
- const wxPropertyInfo* propertyInfo,
- int valueObjectId)
+void wxObjectRuntimeReaderCallback::SetPropertyAsObject(int objectID,
+ const wxClassInfo *classInfo,
+ const wxPropertyInfo* propertyInfo,
+ int valueObjectId)
{
wxObject *o, *valo;
o = m_data->GetObject(objectID);
valo = m_data->GetObject(valueObjectId);
- propertyInfo->GetAccessor()->SetProperty( o ,
- (dynamic_cast<const wxClassTypeInfo*>(propertyInfo->GetTypeInfo()))->GetClassInfo()->InstanceToVariant(valo) ) ;
-}
+ const wxClassInfo* valClassInfo =
+ (wx_dynamic_cast(const wxClassTypeInfo*,propertyInfo->GetTypeInfo()))->GetClassInfo();
-void wxRuntimeDepersister::SetConnect(int eventSourceObjectID,
- const wxClassInfo *WXUNUSED(eventSourceClassInfo),
- const wxDelegateTypeInfo *delegateInfo ,
- const wxClassInfo *WXUNUSED(eventSinkClassInfo) ,
- const wxHandlerInfo* handlerInfo ,
- int eventSinkObjectID )
-{
- wxWindow *ehsource = dynamic_cast< wxWindow* >( m_data->GetObject( eventSourceObjectID ) ) ;
- wxEvtHandler *ehsink = dynamic_cast< wxEvtHandler *>(m_data->GetObject(eventSinkObjectID) ) ;
-
- if ( ehsource && ehsink )
- {
- ehsource->Connect( ehsource->GetId() , delegateInfo->GetEventType() ,
- handlerInfo->GetEventFunction() , NULL /*user data*/ ,
- ehsink ) ;
- }
-}
+ // if this is a dynamic object and we are asked for another class
+ // than wxDynamicObject we cast it down manually.
+ wxDynamicObject *dynvalo = wx_dynamic_cast( wxDynamicObject *, valo);
+ if ( dynvalo!=NULL && (valClassInfo != dynvalo->GetClassInfo()) )
+ {
+ valo = dynvalo->GetSuperClassInstance();
+ }
-wxObject *wxRuntimeDepersister::GetObject(int objectID)
-{
- return m_data->GetObject( objectID ) ;
+ classInfo->SetProperty( o, propertyInfo->GetName().c_str(),
+ valClassInfo->ObjectPtrToAny(valo) );
}
-
-// ----------------------------------------------------------------------------
-// depersisting to code
-// ----------------------------------------------------------------------------
-
-struct wxCodeDepersister::wxCodeDepersisterInternal
+void wxObjectRuntimeReaderCallback::SetConnect(int eventSourceObjectID,
+ const wxClassInfo *WXUNUSED(eventSourceClassInfo),
+ const wxPropertyInfo *delegateInfo,
+ const wxClassInfo *WXUNUSED(eventSinkClassInfo),
+ const wxHandlerInfo* handlerInfo,
+ int eventSinkObjectID )
{
- map<int,string> m_objectNames ;
-
- void SetObjectName(int objectID, const wxString &name )
- {
- assert( m_objectNames.find(objectID) == m_objectNames.end() ) ;
- m_objectNames[objectID] = (const char *)name;
- }
- wxString GetObjectName( int objectID )
- {
- if ( objectID == wxNullObjectID )
- return "NULL" ;
-
- assert( m_objectNames.find(objectID) != m_objectNames.end() ) ;
- return wxString( m_objectNames[objectID].c_str() ) ;
- }
-} ;
+ wxEvtHandler *ehsource =
+ wx_dynamic_cast( wxEvtHandler* , m_data->GetObject( eventSourceObjectID ) );
+ wxEvtHandler *ehsink =
+ wx_dynamic_cast( wxEvtHandler *,m_data->GetObject(eventSinkObjectID) );
-wxCodeDepersister::wxCodeDepersister(wxTextOutputStream *out)
- : m_fp(out)
-{
- m_data = new wxCodeDepersisterInternal ;
+ if ( ehsource && ehsink )
+ {
+ const wxEventSourceTypeInfo *delegateTypeInfo =
+ wx_dynamic_cast(const wxEventSourceTypeInfo*,delegateInfo->GetTypeInfo());
+ if( delegateTypeInfo && delegateTypeInfo->GetLastEventType() == -1 )
+ {
+ ehsource->Connect( -1, delegateTypeInfo->GetEventType(),
+ handlerInfo->GetEventFunction(), NULL /*user data*/,
+ ehsink );
+ }
+ else
+ {
+ for ( wxEventType iter = delegateTypeInfo->GetEventType();
+ iter <= delegateTypeInfo->GetLastEventType(); ++iter )
+ {
+ ehsource->Connect( -1, iter,
+ handlerInfo->GetEventFunction(), NULL /*user data*/,
+ ehsink );
+ }
+ }
+ }
}
-wxCodeDepersister::~wxCodeDepersister()
+wxObject *wxObjectRuntimeReaderCallback::GetObject(int objectID)
{
- delete m_data ;
+ return m_data->GetObject( objectID );
}
-void wxCodeDepersister::AllocateObject(int objectID, wxClassInfo *classInfo)
+void wxObjectRuntimeReaderCallback::AddToPropertyCollection( int objectID,
+ const wxClassInfo *classInfo,
+ const wxPropertyInfo* propertyInfo,
+ const wxAny &value)
{
- wxString objectName = wxString::Format( "LocalObject_%d" , objectID ) ;
- m_fp->WriteString( wxString::Format( "\t%s *%s = new %s;\n",
- classInfo->GetClassName(),
- objectName,
- classInfo->GetClassName()) );
- m_data->SetObjectName( objectID , objectName ) ;
+ wxObject *o;
+ o = m_data->GetObject(objectID);
+ classInfo->AddToPropertyCollection( o, propertyInfo->GetName().c_str(), value );
}
-void wxCodeDepersister::DestroyObject(int objectID, wxClassInfo *WXUNUSED(classInfo))
+void wxObjectRuntimeReaderCallback::AddToPropertyCollectionAsObject(int objectID,
+ const wxClassInfo *classInfo,
+ const wxPropertyInfo* propertyInfo,
+ int valueObjectId)
{
- m_fp->WriteString( wxString::Format( "\tdelete %s;\n",
- m_data->GetObjectName( objectID) ) );
-}
-
-wxString wxCodeDepersister::ValueAsCode( const wxxVariant ¶m )
-{
- wxString value ;
- const wxTypeInfo* type = param.GetTypeInfo() ;
- if ( type->GetKind() == wxT_CUSTOM )
- {
- const wxCustomTypeInfo* cti = dynamic_cast<const wxCustomTypeInfo*>(type) ;
- wxASSERT_MSG( cti , wxT("Internal error, illegal wxCustomTypeInfo") ) ;
- value.Printf( "%s(%s)",cti->GetTypeName(),param.GetAsString() );
- }
- else if ( type->GetKind() == wxT_STRING )
- {
- value.Printf( "\"%s\"",param.GetAsString() );
- }
- else
- {
- value.Printf( "%s", param.GetAsString() );
- }
- return value ;
-}
-
-void wxCodeDepersister::CreateObject(int objectID,
- const wxClassInfo *WXUNUSED(classInfo),
- int paramCount,
- wxxVariant *params,
- int *objectIDValues,
- const wxClassInfo **WXUNUSED(objectClassInfos)
- )
-{
- int i;
- m_fp->WriteString( wxString::Format( "\t%s->Create(", m_data->GetObjectName(objectID) ) );
- for (i = 0; i < paramCount; i++)
+ wxObject *o, *valo;
+ o = m_data->GetObject(objectID);
+ valo = m_data->GetObject(valueObjectId);
+ const wxCollectionTypeInfo * collectionTypeInfo =
+ wx_dynamic_cast( const wxCollectionTypeInfo *, propertyInfo->GetTypeInfo() );
+ const wxClassInfo* valClassInfo =
+ (wx_dynamic_cast(const wxClassTypeInfo*,collectionTypeInfo->GetElementType()))->GetClassInfo();
+
+ // if this is a dynamic object and we are asked for another class
+ // than wxDynamicObject we cast it down manually.
+ wxDynamicObject *dynvalo = wx_dynamic_cast( wxDynamicObject *, valo);
+ if ( dynvalo!=NULL && (valClassInfo != dynvalo->GetClassInfo()) )
{
- if ( objectIDValues[i] != wxInvalidObjectID )
- m_fp->WriteString( wxString::Format( "%s", m_data->GetObjectName( objectIDValues[i] ) ) );
- else
- {
- m_fp->WriteString( wxString::Format( "%s", ValueAsCode(params[i]) ) );
- }
- if (i < paramCount - 1)
- m_fp->WriteString( ", ");
+ valo = dynvalo->GetSuperClassInstance();
}
- m_fp->WriteString( ");\n");
-}
-
-void wxCodeDepersister::SetProperty(int objectID,
- const wxClassInfo *WXUNUSED(classInfo),
- const wxPropertyInfo* propertyInfo,
- const wxxVariant &value)
-{
- m_fp->WriteString( wxString::Format( "\t%s->%s(%s);\n",
- m_data->GetObjectName(objectID),
- propertyInfo->GetAccessor()->GetSetterName(),
- ValueAsCode(value)) );
-}
-void wxCodeDepersister::SetPropertyAsObject(int objectID,
- const wxClassInfo *WXUNUSED(classInfo),
- const wxPropertyInfo* propertyInfo,
- int valueObjectId)
-{
- if ( propertyInfo->GetTypeInfo()->GetKind() == wxT_OBJECT )
- m_fp->WriteString( wxString::Format( "\t%s->%s(*%s);\n",
- m_data->GetObjectName(objectID),
- propertyInfo->GetAccessor()->GetSetterName(),
- m_data->GetObjectName( valueObjectId) ) );
- else
- m_fp->WriteString( wxString::Format( "\t%s->%s(%s);\n",
- m_data->GetObjectName(objectID),
- propertyInfo->GetAccessor()->GetSetterName(),
- m_data->GetObjectName( valueObjectId) ) );
+ classInfo->AddToPropertyCollection( o, propertyInfo->GetName().c_str(),
+ valClassInfo->ObjectPtrToAny(valo) );
}
-void wxCodeDepersister::SetConnect(int eventSourceObjectID,
- const wxClassInfo *WXUNUSED(eventSourceClassInfo),
- const wxDelegateTypeInfo *delegateInfo ,
- const wxClassInfo *eventSinkClassInfo ,
- const wxHandlerInfo* handlerInfo ,
- int eventSinkObjectID )
-{
- wxString ehsource = m_data->GetObjectName( eventSourceObjectID ) ;
- wxString ehsink = m_data->GetObjectName(eventSinkObjectID) ;
- wxString ehsinkClass = eventSinkClassInfo->GetClassName() ;
- int eventType = delegateInfo->GetEventType() ;
- wxString handlerName = handlerInfo->GetName() ;
-
- m_fp->WriteString( wxString::Format( "\t%s->Connect( %s->GetId() , %d , (wxObjectEventFunction)(wxEventFunction) & %s::%s , NULL , %s ) ;" ,
- ehsource , ehsource , eventType , ehsinkClass , handlerName , ehsink ) );
-}
-
-#endif
+#endif // wxUSE_EXTENDED_RTTI
projects / wxWidgets.git / blobdiff