ptrinfo.cpp
上传用户:yhdzpy8989
上传日期:2007-06-13
资源大小:13604k
文件大小:13k
- /*
- * ===========================================================================
- * PRODUCTION $Log: ptrinfo.cpp,v $
- * PRODUCTION Revision 1000.3 2004/06/01 19:41:34 gouriano
- * PRODUCTION PRODUCTION: UPGRADED [GCC34_MSVC7] Dev-tree R1.35
- * PRODUCTION
- * ===========================================================================
- */
- /* $Id: ptrinfo.cpp,v 1000.3 2004/06/01 19:41:34 gouriano Exp $
- * ===========================================================================
- *
- * PUBLIC DOMAIN NOTICE
- * National Center for Biotechnology Information
- *
- * This software/database is a "United States Government Work" under the
- * terms of the United States Copyright Act. It was written as part of
- * the author's official duties as a United States Government employee and
- * thus cannot be copyrighted. This software/database is freely available
- * to the public for use. The National Library of Medicine and the U.S.
- * Government have not placed any restriction on its use or reproduction.
- *
- * Although all reasonable efforts have been taken to ensure the accuracy
- * and reliability of the software and data, the NLM and the U.S.
- * Government do not and cannot warrant the performance or results that
- * may be obtained by using this software or data. The NLM and the U.S.
- * Government disclaim all warranties, express or implied, including
- * warranties of performance, merchantability or fitness for any particular
- * purpose.
- *
- * Please cite the author in any work or product based on this material.
- *
- * ===========================================================================
- *
- * Author: Eugene Vasilchenko
- *
- * File Description:
- * !!! PUT YOUR DESCRIPTION HERE !!!
- *
- * ---------------------------------------------------------------------------
- * $Log: ptrinfo.cpp,v $
- * Revision 1000.3 2004/06/01 19:41:34 gouriano
- * PRODUCTION: UPGRADED [GCC34_MSVC7] Dev-tree R1.35
- *
- * Revision 1.35 2004/05/17 21:03:03 gorelenk
- * Added include of PCH ncbi_pch.hpp
- *
- * Revision 1.34 2004/03/25 15:57:08 gouriano
- * Added possibility to copy and compare serial object non-recursively
- *
- * Revision 1.33 2003/11/24 14:10:05 grichenk
- * Changed base class for CAliasTypeInfo to CPointerTypeInfo
- *
- * Revision 1.32 2003/08/14 20:03:58 vasilche
- * Avoid memory reallocation when reading over preallocated object.
- * Simplified CContainerTypeInfo iterators interface.
- *
- * Revision 1.31 2003/03/20 20:42:36 vasilche
- * Reuse old object in CRef<> reader.
- *
- * Revision 1.30 2000/10/17 18:45:36 vasilche
- * Added possibility to turn off object cross reference detection in
- * CObjectIStream and CObjectOStream.
- *
- * Revision 1.29 2000/10/13 16:28:40 vasilche
- * Reduced header dependency.
- * Avoid use of templates with virtual methods.
- * Reduced amount of different maps used.
- * All this lead to smaller compiled code size (libraries and programs).
- *
- * Revision 1.28 2000/09/18 20:00:25 vasilche
- * Separated CVariantInfo and CMemberInfo.
- * Implemented copy hooks.
- * All hooks now are stored in CTypeInfo/CMemberInfo/CVariantInfo.
- * Most type specific functions now are implemented via function pointers instead of virtual functions.
- *
- * Revision 1.27 2000/09/13 15:10:15 vasilche
- * Fixed type detection in type iterators.
- *
- * Revision 1.26 2000/09/01 13:16:20 vasilche
- * Implemented class/container/choice iterators.
- * Implemented CObjectStreamCopier for copying data without loading into memory.
- *
- * Revision 1.25 2000/08/15 19:44:51 vasilche
- * Added Read/Write hooks:
- * CReadObjectHook/CWriteObjectHook for objects of specified type.
- * CReadClassMemberHook/CWriteClassMemberHook for specified members.
- * CReadChoiceVariantHook/CWriteChoiceVariant for specified choice variants.
- * CReadContainerElementHook/CWriteContainerElementsHook for containers.
- *
- * Revision 1.24 2000/07/03 18:42:47 vasilche
- * Added interface to typeinfo via CObjectInfo and CConstObjectInfo.
- * Reduced header dependency.
- *
- * Revision 1.23 2000/06/16 16:31:22 vasilche
- * Changed implementation of choices and classes info to allow use of the same classes in generated and user written classes.
- *
- * Revision 1.22 2000/06/07 19:46:00 vasilche
- * Some code cleaning.
- * Macros renaming in more clear way.
- * BEGIN_NAMED_*_INFO, ADD_*_MEMBER, ADD_NAMED_*_MEMBER.
- *
- * Revision 1.21 2000/05/24 20:08:49 vasilche
- * Implemented XML dump.
- *
- * Revision 1.20 2000/04/10 21:01:49 vasilche
- * Fixed Erase for map/set.
- * Added iteratorbase.hpp header for basic internal classes.
- *
- * Revision 1.19 2000/04/06 16:11:00 vasilche
- * Fixed bug with iterators in choices.
- * Removed unneeded calls to ReadExternalObject/WriteExternalObject.
- * Added output buffering to text ASN.1 data.
- *
- * Revision 1.18 2000/03/29 15:55:29 vasilche
- * Added two versions of object info - CObjectInfo and CConstObjectInfo.
- * Added generic iterators by class -
- * CTypeIterator<class>, CTypeConstIterator<class>,
- * CStdTypeIterator<type>, CStdTypeConstIterator<type>,
- * CObjectsIterator and CObjectsConstIterator.
- *
- * Revision 1.17 2000/03/07 14:06:23 vasilche
- * Added stream buffering to ASN.1 binary input.
- * Optimized class loading/storing.
- * Fixed bugs in processing OPTIONAL fields.
- * Added generation of reference counted objects.
- *
- * Revision 1.16 2000/02/17 20:02:45 vasilche
- * Added some standard serialization exceptions.
- * Optimized text/binary ASN.1 reading.
- * Fixed wrong encoding of StringStore in ASN.1 binary format.
- * Optimized logic of object collection.
- *
- * Revision 1.15 1999/12/28 18:55:52 vasilche
- * Reduced size of compiled object files:
- * 1. avoid inline or implicit virtual methods (especially destructors).
- * 2. avoid std::string's methods usage in inline methods.
- * 3. avoid string literals ("xxx") in inline methods.
- *
- * Revision 1.14 1999/12/17 19:05:04 vasilche
- * Simplified generation of GetTypeInfo methods.
- *
- * Revision 1.13 1999/10/28 15:37:41 vasilche
- * Fixed null choice pointers handling.
- * Cleaned enumertion interface.
- *
- * Revision 1.12 1999/10/25 19:07:15 vasilche
- * Fixed coredump on non initialized choices.
- * Fixed compilation warning.
- *
- * Revision 1.11 1999/09/14 18:54:20 vasilche
- * Fixed bugs detected by gcc & egcs.
- * Removed unneeded includes.
- *
- * Revision 1.10 1999/08/31 17:50:09 vasilche
- * Implemented several macros for specific data types.
- * Added implicit members.
- * Added multimap and set.
- *
- * Revision 1.9 1999/08/13 15:53:52 vasilche
- * C++ analog of asntool: datatool
- *
- * Revision 1.8 1999/07/20 18:23:13 vasilche
- * Added interface to old ASN.1 routines.
- * Added fixed choice of subclasses to use for pointers.
- *
- * Revision 1.7 1999/07/13 20:18:22 vasilche
- * Changed types naming.
- *
- * Revision 1.6 1999/07/07 19:59:08 vasilche
- * Reduced amount of data allocated on heap
- * Cleaned ASN.1 structures info
- *
- * Revision 1.5 1999/06/30 16:05:04 vasilche
- * Added support for old ASN.1 structures.
- *
- * Revision 1.4 1999/06/24 14:45:01 vasilche
- * Added binary ASN.1 output.
- *
- * Revision 1.3 1999/06/15 16:19:52 vasilche
- * Added ASN.1 object output stream.
- *
- * Revision 1.2 1999/06/07 20:42:58 vasilche
- * Fixed compilation under MS VS
- *
- * Revision 1.1 1999/06/04 20:51:48 vasilche
- * First compilable version of serialization.
- *
- * ===========================================================================
- */
- #include <ncbi_pch.hpp>
- #include <serial/ptrinfo.hpp>
- #include <serial/objostr.hpp>
- #include <serial/objistr.hpp>
- #include <serial/objcopy.hpp>
- #include <serial/serialutil.hpp>
- BEGIN_NCBI_SCOPE
- CPointerTypeInfo::CPointerTypeInfo(TTypeInfo type)
- : CParent(eTypeFamilyPointer, sizeof(TObjectPtr)), m_DataTypeRef(type)
- {
- InitPointerTypeInfoFunctions();
- }
- CPointerTypeInfo::CPointerTypeInfo(const CTypeRef& typeRef)
- : CParent(eTypeFamilyPointer, sizeof(TObjectPtr)), m_DataTypeRef(typeRef)
- {
- InitPointerTypeInfoFunctions();
- }
- CPointerTypeInfo::CPointerTypeInfo(size_t size, TTypeInfo type)
- : CParent(eTypeFamilyPointer, size), m_DataTypeRef(type)
- {
- InitPointerTypeInfoFunctions();
- }
- CPointerTypeInfo::CPointerTypeInfo(size_t size, const CTypeRef& typeRef)
- : CParent(eTypeFamilyPointer, size), m_DataTypeRef(typeRef)
- {
- InitPointerTypeInfoFunctions();
- }
- CPointerTypeInfo::CPointerTypeInfo(const string& name, TTypeInfo type)
- : CParent(eTypeFamilyPointer, sizeof(TObjectPtr), name),
- m_DataTypeRef(type)
- {
- InitPointerTypeInfoFunctions();
- }
- CPointerTypeInfo::CPointerTypeInfo(const string& name, size_t size, TTypeInfo type)
- : CParent(eTypeFamilyPointer, size, name),
- m_DataTypeRef(type)
- {
- InitPointerTypeInfoFunctions();
- }
- void CPointerTypeInfo::InitPointerTypeInfoFunctions(void)
- {
- SetCreateFunction(&CreatePointer);
- SetReadFunction(&ReadPointer);
- SetWriteFunction(&WritePointer);
- SetCopyFunction(&CopyPointer);
- SetSkipFunction(&SkipPointer);
- SetFunctions(&GetPointer, &SetPointer);
- }
- void CPointerTypeInfo::SetFunctions(TGetDataFunction getFunc,
- TSetDataFunction setFunc)
- {
- m_GetData = getFunc;
- m_SetData = setFunc;
- }
- TTypeInfo CPointerTypeInfo::GetTypeInfo(TTypeInfo base)
- {
- return new CPointerTypeInfo(base);
- }
- bool CPointerTypeInfo::MayContainType(TTypeInfo type) const
- {
- return GetPointedType()->IsOrMayContainType(type);
- }
- TTypeInfo CPointerTypeInfo::GetRealDataTypeInfo(TConstObjectPtr object) const
- {
- TTypeInfo dataTypeInfo = GetPointedType();
- if ( object )
- dataTypeInfo = dataTypeInfo->GetRealTypeInfo(object);
- return dataTypeInfo;
- }
- TObjectPtr CPointerTypeInfo::GetPointer(const CPointerTypeInfo* /*objectType*/,
- TObjectPtr objectPtr)
- {
- return CTypeConverter<TObjectPtr>::Get(objectPtr);
- }
- void CPointerTypeInfo::SetPointer(const CPointerTypeInfo* /*objectType*/,
- TObjectPtr objectPtr,
- TObjectPtr dataPtr)
- {
- CTypeConverter<TObjectPtr>::Get(objectPtr) = dataPtr;
- }
- TObjectPtr CPointerTypeInfo::CreatePointer(TTypeInfo /*objectType*/)
- {
- return new void*(0);
- }
- bool CPointerTypeInfo::IsDefault(TConstObjectPtr object) const
- {
- return GetObjectPointer(object) == 0;
- }
- bool CPointerTypeInfo::Equals(TConstObjectPtr object1, TConstObjectPtr object2,
- ESerialRecursionMode how) const
- {
- TConstObjectPtr data1 = GetObjectPointer(object1);
- TConstObjectPtr data2 = GetObjectPointer(object2);
- if ( how != eRecursive ) {
- return how == eShallow ? (data1 == data2) : (data1 == 0 || data2 == 0);
- }
- else if ( data1 == 0 ) {
- return data2 == 0;
- }
- else {
- if ( data2 == 0 )
- return false;
- TTypeInfo type1 = GetRealDataTypeInfo(data1);
- TTypeInfo type2 = GetRealDataTypeInfo(data2);
- return type1 == type2 && type1->Equals(data1, data2, how);
- }
- }
- void CPointerTypeInfo::SetDefault(TObjectPtr dst) const
- {
- SetObjectPointer(dst, 0);
- }
- void CPointerTypeInfo::Assign(TObjectPtr dst, TConstObjectPtr src,
- ESerialRecursionMode how) const
- {
- TConstObjectPtr data = GetObjectPointer(src);
- if ( how != eRecursive ) {
- SetObjectPointer(dst, how == eShallow ? (const_cast<void*>(data)) : 0);
- }
- else if ( data == 0) {
- SetObjectPointer(dst, 0);
- }
- else {
- TTypeInfo type = GetRealDataTypeInfo(data);
- TObjectPtr object = type->Create();
- type->Assign(object, data, how);
- SetObjectPointer(dst, object);
- }
- }
- void CPointerTypeInfo::ReadPointer(CObjectIStream& in,
- TTypeInfo objectType,
- TObjectPtr objectPtr)
- {
- const CPointerTypeInfo* pointerType =
- CTypeConverter<CPointerTypeInfo>::SafeCast(objectType);
- TTypeInfo pointedType = pointerType->GetPointedType();
- TObjectPtr pointedPtr = pointerType->GetObjectPointer(objectPtr);
- if ( pointedPtr ) {
- //pointedType->SetDefault(pointedPtr);
- in.ReadObject(pointedPtr, pointedType);
- }
- else {
- pointerType->SetObjectPointer(objectPtr,
- in.ReadPointer(pointedType).first);
- }
- }
- void CPointerTypeInfo::WritePointer(CObjectOStream& out,
- TTypeInfo objectType,
- TConstObjectPtr objectPtr)
- {
- const CPointerTypeInfo* pointerType =
- CTypeConverter<CPointerTypeInfo>::SafeCast(objectType);
- out.WritePointer(pointerType->GetObjectPointer(objectPtr),
- pointerType->GetPointedType());
- }
- void CPointerTypeInfo::CopyPointer(CObjectStreamCopier& copier,
- TTypeInfo objectType)
- {
- const CPointerTypeInfo* pointerType =
- CTypeConverter<CPointerTypeInfo>::SafeCast(objectType);
- copier.CopyPointer(pointerType->GetPointedType());
- }
- void CPointerTypeInfo::SkipPointer(CObjectIStream& in,
- TTypeInfo objectType)
- {
- const CPointerTypeInfo* pointerType =
- CTypeConverter<CPointerTypeInfo>::SafeCast(objectType);
- in.SkipPointer(pointerType->GetPointedType());
- }
- END_NCBI_SCOPE