#if defined(_DEBUG) && !defined(AC_FULL_DEBUG)
#error _DEBUG should not be defined except in internal Adesk debug builds
#endif
#include <adslib.h>
#include <dbelipse.h>
#include <gemat3d.h>
#include <dbsymtb.h>
#include <dbapserv.h>
#include <aced.h>
#include <actrans.h>
#include <dbidmap.h>
#include <acestext.h>
#include "tchar.h"
#include <atlstr.h>
#include "dbobjptr.h"
#include "dbobjptr2.h"
#include "acutmem.h"
#include "dbxutil.h"
#include "dbcfilrs.h"
#define acdbCurDwg acdbHostApplicationServices()->workingDatabase
#define ASCL_LIB ACRX_T("Libraries")
#define ASCL_LIB_PROP ACRX_T("Libraries>>Properties")
#define ASCL_LIB_PROP_PROP1 ACRX_T("Libraries>>Properties>>Prop_1")
class AsclPropComponentII : public AcDbObject {
public:
ACRX_DECLARE_MEMBERS(AsclPropComponentII) ;
protected:
static Adesk::UInt32 kCurrentVersionNumber ;
public:
AsclPropComponentII () ;
virtual ~AsclPropComponentII () ;
virtual Acad::ErrorStatus dwgOutFields (AcDbDwgFiler *pFiler) const ;
virtual Acad::ErrorStatus dwgInFields (AcDbDwgFiler *pFiler) ;
double radius() const;
Acad::ErrorStatus setRadius(double radius);
private:
double m_radius;
} ;
class MyEntity : public AcDbEntity{
public:
ACRX_DECLARE_MEMBERS(MyEntity);
MyEntity() {};
MyEntity(AcGePoint3d stPos, AcGePoint3d enPos, const AcDbObjectId propertyId): m_propertyId(propertyId), m_start(stPos), m_end(enPos) {};
virtual ~MyEntity () {};
AcDbObjectId componentPropertyId() const;
void setComponentPropertyId(const AcDbObjectId& newPropId);
virtual Acad::ErrorStatus dwgInFields(AcDbDwgFiler* filer);
virtual Acad::ErrorStatus dwgOutFields(AcDbDwgFiler* filer) const;
virtual void modified (const AcDbObject *pDbObj) ;
protected:
virtual void subViewportDraw (AcGiViewportDraw *mode) ;
virtual Adesk::Boolean subWorldDraw (AcGiWorldDraw *mode) ;
virtual Acad::ErrorStatus subTransformBy(const AcGeMatrix3d& xform);
protected:
virtual Acad::ErrorStatus subDeepClone (AcDbObject* pOwnerObject, AcDbObject*& pClonedObject, AcDbIdMapping &idMap, Adesk::Boolean isPrimary = true) const ;
virtual Acad::ErrorStatus subWblockClone(AcRxObject* pOwnerObject, AcDbObject*& pClonedObject, AcDbIdMapping &idMap, Adesk::Boolean isPrimary = Adesk::kTrue) const;
private:
AcDbObjectId m_propertyId;
AcGePoint3d m_start, m_end;
AcDbObjectIdArray mEllipseIds;
};
ACRX_DXF_DEFINE_MEMBERS(MyEntity, AcDbEllipse,
AcDb::kDHL_CURRENT, AcDb::kMReleaseCurrent,
0,\
MyEntity, REFERENC)
void MyEntity::modified (const AcDbObject *pDbObj)
{
assertReadEnabled();
if(pDbObj->isKindOf(AsclPropComponentII::desc())){
AcDbSmartObjectPointer<MyEntity> thisPtr(objectId(), AcDb::kForWrite);
if(thisPtr.openStatus() == Acad::eOk){
assertWriteEnabled();
}
}
AcDbEntity::modified (pDbObj) ;
}
//-----------------------------------------------------------------------------
//----- AcDbEntity protocols
Adesk::Boolean MyEntity::subWorldDraw (AcGiWorldDraw *mode) {
assertReadEnabled();
double radius = 10;
AcDbSmartObjectPointer<AsclPropComponentII> prop(componentPropertyId(), AcDb::kForRead);
Acad::ErrorStatus es = prop.openStatus();
if(es == Acad::eOk){
radius = prop->radius();
}
mode->geometry().circle(m_start,radius,AcGeVector3d(0,0,1));
return (Adesk::kTrue) ;
}
void MyEntity::subViewportDraw (AcGiViewportDraw *mode) {
assertReadEnabled();
AcDbEntity::subViewportDraw (mode) ;
}
Acad::ErrorStatus MyEntity::subTransformBy(const AcGeMatrix3d& xform){
assertWriteEnabled();
m_start.transformBy(xform);
return Acad::eOk;
}
Acad::ErrorStatus MyEntity::dwgInFields(AcDbDwgFiler* filer){
assertWriteEnabled();
AcDbEntity::dwgInFields(filer);
filer->readPoint3d (&m_start) ;
AcDbHardPointerId hardPointerId;
filer->readHardPointerId(&hardPointerId);
m_propertyId = hardPointerId;
return filer->filerStatus();
}
Acad::ErrorStatus MyEntity::dwgOutFields(AcDbDwgFiler* filer) const{
assertReadEnabled();
AcDbEntity::dwgOutFields(filer);
filer->writePoint3d (m_start);
filer->writeHardPointerId(m_propertyId);
return filer->filerStatus();
}
Acad::ErrorStatus MyEntity::subDeepClone(AcDbObject* pOwner, AcDbObject*& pClonedObject,AcDbIdMapping& idMap,Adesk::Boolean isPrimary) const{
pClonedObject = NULL;
bool isPrim = false;
if (isPrimary)
isPrim = true;
AcDbIdPair idPair(objectId(), (AcDbObjectId)NULL,
false, isPrim);
if (idMap.compute(idPair) && (idPair.value() != NULL))
return Acad::eOk;
MyEntity *pClone = (MyEntity*)isA()->create();
if (pClone != NULL)
pClonedObject = pClone; // set the return value
else
return Acad::eOutOfMemory;
AcDbDeepCloneFiler filer;
dwgOut(&filer);
filer.seek(0L, AcDb::kSeekFromStart);
pClone->dwgIn(&filer);
bool bOwnerXlated = false;
if (isPrimary)
{
AcDbBlockTableRecord *pBTR =
AcDbBlockTableRecord::cast(pOwner);
if (pBTR != NULL)
{
pBTR->appendAcDbEntity(pClone);
bOwnerXlated = true;
}
else
{
pOwner->database()->addAcDbObject(pClone);
}
} else {
pOwner->database()->addAcDbObject(pClone);
pClone->setOwnerId(pOwner->objectId());
bOwnerXlated = true;
}
pClone->setAcDbObjectIdsInFlux();
pClone->disableUndoRecording(true);
idPair.setValue(pClonedObject->objectId());
idPair.setIsCloned(Adesk::kTrue);
idPair.setIsOwnerXlated(bOwnerXlated);
idMap.assign(idPair);
AcDbObjectId id;
while (filer.getNextOwnedObject(id)) {
AcDbObject *pSubObject;
AcDbObject *pClonedSubObject;
if (id == NULL)
continue;
acdbOpenAcDbObject(pSubObject, id, AcDb::kForRead);
pClonedSubObject = NULL;
pSubObject->deepClone(pClonedObject,
pClonedSubObject,
idMap, Adesk::kFalse);
if (pSubObject != pClonedSubObject)
pSubObject->close();
if (pClonedSubObject != NULL)
pClonedSubObject->close();
}
return Acad::eOk;
}
Acad::ErrorStatus MyEntity::subWblockClone(AcRxObject* pOwner,AcDbObject*& pClonedObject,AcDbIdMapping& idMap, Adesk::Boolean isPrimary) const{
assertReadEnabled();
pClonedObject = NULL;
AcDbDatabase *pDest, *pOrig;
idMap.destDb(pDest);
idMap.origDb(pOrig);
if (pDest == pOrig)
return AcDbEntity::subWblockClone(pOwner, pClonedObject,
idMap, isPrimary);
AcDbObjectId pspace;
AcDbBlockTable *pTable;
database()->getSymbolTable(pTable, AcDb::kForRead);
pTable->getAt(ACDB_PAPER_SPACE, pspace);
pTable->close();
if ( idMap.deepCloneContext() == AcDb::kDcXrefBind
&& ownerId() == pspace)
return Acad::eOk;
bool isPrim = false;
if (isPrimary)
isPrim = true;
AcDbIdPair idPair(objectId(), (AcDbObjectId)NULL,
false, isPrim);
if (idMap.compute(idPair) && (idPair.value() != NULL))
return Acad::eOk;
AcDbObject *pOwn = AcDbObject::cast(pOwner);
AcDbDatabase *pDb = AcDbDatabase::cast(pOwner);
if (pDb == NULL)
pDb = pOwn->database();
// STEP 1:
// Create the clone
//
MyEntity *pClone = (MyEntity*)isA()->create();
if (pClone != NULL)
pClonedObject = pClone; // set the return value
else
return Acad::eOutOfMemory;
AcDbBlockTableRecord *pBTR = NULL;
if (pOwn != NULL)
pBTR = AcDbBlockTableRecord::cast(pOwn);
if (pBTR != NULL && isPrimary) {
pBTR->appendAcDbEntity(pClone);
} else {
pDb->addAcDbObject(pClonedObject);
}
AcDbWblockCloneFiler filer;
dwgOut(&filer);
filer.seek(0L, AcDb::kSeekFromStart);
pClone->dwgIn(&filer);
idMap.assign(AcDbIdPair(objectId(), pClonedObject->objectId(), Adesk::kTrue,
isPrim, (Adesk::Boolean)(pOwn != NULL) ));
pClonedObject->setOwnerId((pOwn != NULL) ?
pOwn->objectId() : ownerId());
pClone->setAcDbObjectIdsInFlux();
AcDbObjectId id;
while (filer.getNextHardObject(id)) {
AcDbObject *pSubObject;
AcDbObject *pClonedSubObject;
if (id == NULL)
continue;
acdbOpenAcDbObject(pSubObject, id, AcDb::kForRead);
if (pSubObject->database() != database()) {
pSubObject->close();
continue;
}
pClonedSubObject = NULL;
if (pSubObject->ownerId() == objectId()) {
pSubObject->wblockClone(pClone,pClonedSubObject,idMap, Adesk::kFalse);
} else {
pSubObject->wblockClone(pClone->database(),pClonedSubObject,idMap, Adesk::kFalse);
}
pSubObject->close();
if (pClonedSubObject != NULL)
pClonedSubObject->close();
}
return Acad::eOk;
}
AcDbObjectId MyEntity::componentPropertyId() const{
assertReadEnabled();
return m_propertyId;
}
void MyEntity::setComponentPropertyId(const AcDbObjectId& newPropId){
assertWriteEnabled();
m_propertyId = newPropId;
}
ACRX_DXF_DEFINE_MEMBERS(AsclPropComponentII, AcDbObject,
AcDb::kDHL_CURRENT, AcDb::kMReleaseCurrent,
0,\
ASCLPROPCOMPONENTII, REFERENC)
//-----------------------------------------------------------------------------
AsclPropComponentII::AsclPropComponentII () : AcDbObject () {
}
AsclPropComponentII::~AsclPropComponentII () {
}
//-----------------------------------------------------------------------------
//----- AcDbObject protocols
Acad::ErrorStatus AsclPropComponentII::dwgInFields(AcDbDwgFiler* filer){
assertWriteEnabled();
Acad::ErrorStatus es =AcDbObject::dwgInFields (filer) ;
if ( es != Acad::eOk )
return (es) ;
filer->readItem (&m_radius) ;
return filer->filerStatus();
}
Acad::ErrorStatus AsclPropComponentII::dwgOutFields(AcDbDwgFiler* filer) const{
assertReadEnabled();
Acad::ErrorStatus es =AcDbObject::dwgOutFields (filer) ;
if ( es != Acad::eOk )
return (es) ;
filer->writeItem (m_radius) ;
return filer->filerStatus();
}
double AsclPropComponentII::radius(void) const{
assertReadEnabled();
return (m_radius) ;
}
Acad::ErrorStatus AsclPropComponentII::setRadius(double newVal){
assertWriteEnabled();
m_radius = newVal ;
return (Acad::eOk) ;
}
//Helper functions//////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
AcDbObjectId entryAtPath(const CString& path){
CString resToken;
int curPos = 0;
AcArray<CString> dictNamesTree;
resToken = path.Tokenize(L">>", curPos);
while (resToken != L"")
{
dictNamesTree.append(resToken);
resToken = path.Tokenize(L">>", curPos);
};
if(dictNamesTree.length() == 0)
return AcDbObjectId::kNull;
//The first parent will always be the name objects dictionary
//this value will change as we iterate through the items
AcDbObjectId currParentDictId = acdbCurDwg()->namedObjectsDictionaryId();
const int numItems = dictNamesTree.length();
const int lastItem = numItems - 1;
//Iterate through the tree names
for(int i=0; i< dictNamesTree.length(); i++)
{
AcDbDictionaryPointer currParent(currParentDictId, AcDb::kForRead);
Acad::ErrorStatus es = currParent.openStatus();
if(es != Acad::eOk)
return AcDbObjectId::kNull;
AcDbObjectId subObjId;
es = currParent->getAt(dictNamesTree[i].AllocSysString(), subObjId);
if((es == Acad::eKeyNotFound) && (i != lastItem))
{
return AcDbObjectId::kNull;
}
if((es == Acad::eKeyNotFound) && (i == lastItem))
{
return AcDbObjectId::kNull;
}
else if ((es == Acad::eOk) && (i == lastItem))
{
//This is the object we are looking for open to verify
AcDbSmartObjectPointer<AcDbObject> subObject(subObjId, AcDb::kForRead);
es = subObject.openStatus();
if(es != Acad::eOk){
return AcDbObjectId::kNull;
}
else return subObjId;
}
else if(es != Acad::eOk){
return AcDbObjectId::kNull;
}
currParentDictId = subObjId;
}
return AcDbObjectId();
}
AcDbObjectId setAtPath(const CString& path, AcDbObject* ptr, bool createIfNotFound)
{
if(!ptr)
return AcDbObjectId();
CString resToken;
int curPos = 0;
AcArray<CString> dictNamesTree;
resToken = path.Tokenize(L">>", curPos);
while (resToken != L"")
{
dictNamesTree.append(resToken);
resToken = path.Tokenize(L">>", curPos);
};
if(dictNamesTree.length() == 0)
return AcDbObjectId::kNull;
//The first parent will always be the name objects dictionary
//this value will change as we iterate through the items
AcDbObjectId currParentDictId = acdbCurDwg()->namedObjectsDictionaryId();
const int numItems = dictNamesTree.length();
const int lastItem = numItems - 1;
//Iterate through the tree names
for(int i=0; i< dictNamesTree.length(); i++)
{
AcDbDictionaryPointer currParent(currParentDictId, AcDb::kForRead);
Acad::ErrorStatus es = currParent.openStatus();
if(es != Acad::eOk)
return AcDbObjectId::kNull;
AcDbObjectId subObjId;
es = currParent->getAt(dictNamesTree[i].AllocSysString(), subObjId);
if((es == Acad::eKeyNotFound) && (i != lastItem) && createIfNotFound)
{
if(!createIfNotFound)
return AcDbObjectId::kNull;
//Our dictionary does not exist! So create it
AcDbSmartObjectPointer<AcDbDictionary> subDictionary;
subDictionary.create();
currParent.open(currParentDictId, AcDb::kForWrite);
es = currParent.openStatus();
if(es != Acad::eOk)
return AcDbObjectId::kNull;
es = currParent->setAt(dictNamesTree[i].AllocSysString(), (AcDbObject*)subDictionary, subObjId);
}
if((es == Acad::eKeyNotFound) && (i == lastItem))
{
//Open parent for write
currParent.open(currParentDictId, AcDb::kForWrite);
es = currParent.openStatus();
if(es != Acad::eOk)
return AcDbObjectId::kNull;
//Add the object to path !!!!!!!!!!!!!!!!!!!
//Should check for existing???????
es = currParent->setAt(dictNamesTree[i].AllocSysString(), (AcDbObject*)ptr, subObjId);
if(es != Acad::eOk){
delete ptr;
ptr = NULL;
return AcDbObjectId::kNull;
}
else return subObjId;
}
else if ((es == Acad::eOk) && (i == lastItem))
{
//This is the object we are looking for open to verify
AcDbSmartObjectPointer<AcDbObject> subObject(subObjId, AcDb::kForRead);
es = subObject.openStatus();
if(es != Acad::eOk){
return AcDbObjectId::kNull;
}
else return subObjId;
}
else if(es != Acad::eOk){
return AcDbObjectId::kNull;
}
currParentDictId = subObjId;
}
return AcDbObjectId();
}
AcDbBlockTableRecord* openCurrentSpaceBlock(AcDb::OpenMode mode, AcDbDatabase* db){
AcDbBlockTableRecord* blkRec;
Acad::ErrorStatus es = acdbOpenObject(blkRec, db->currentSpaceId(), mode);
if (es == Acad::eOk)
return blkRec;
else
return NULL;
}
Acad::ErrorStatus addToCurrentSpace(AcDbEntity* newEnt, AcDbDatabase* db){
AcDbBlockTableRecord* blkRec = openCurrentSpaceBlock(AcDb::kForWrite, db);
if (blkRec == NULL)
return Acad::eInvalidInput;
Acad::ErrorStatus es = blkRec->appendAcDbEntity(newEnt);
blkRec->close();
return es;
}
Acad::ErrorStatus dictionaryEntryId(const AcDbObjectId &dictId, int at, AcDbObjectId& entryId) {
Acad::ErrorStatus es = Acad::eInvalidInput;
AcDbSmartObjectPointer<AcDbDictionary> dict(dictId, AcDb::kForRead);
es = dict.openStatus();
if(es != Acad::eOk)
return es;
AcDbDictionaryIterator* itr = NULL;
itr = dict->newIterator();
if( itr == NULL )
return Acad::eNullIterator;
AcDbObjectIdArray list;
for(; !itr->done(); itr->next())
{
list.append(itr->objectId());
}
delete itr;
if(at > -1 && at < list.length())
entryId = list.at(at);
return Acad::eOk;
}
//Commands//////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
void AddEntity(){
//create property
AsclPropComponentII *entity = new AsclPropComponentII();
entity->setRadius(54);
setAtPath(ASCL_LIB_PROP_PROP1, entity, true);
entity->close();
//Get Property Id from NOD
AcDbObjectId propertyId;
dictionaryEntryId(entryAtPath(ASCL_LIB_PROP), 0, propertyId);
//Create custom entity
AcGePoint3d stPos = AcGePoint3d(0,0,0),enPos = AcGePoint3d(100,0,0);
MyEntity *theEntity = new MyEntity(stPos, enPos, propertyId);
addToCurrentSpace(theEntity, acdbHostApplicationServices()->workingDatabase());
theEntity->close();
}
void ChangeProp(){
Acad::ErrorStatus es = Acad::eInvalidInput;
AcDbObjectId propertyId;
dictionaryEntryId(entryAtPath(ASCL_LIB_PROP), 0, propertyId);
AcDbSmartObjectPointer<AsclPropComponentII> prop(propertyId, AcDb::kForWrite);
es = prop.openStatus();
if(es != Acad::eOk)
return;
prop->setRadius(prop->radius()+10);
}
void initApp(){
acedRegCmds->addCommand(_T("ASDK_MYCOMMANDS"), _T("ASDK_MYENTITY"), _T("MYENTITY"),ACRX_CMD_MODAL, AddEntity);
acedRegCmds->addCommand(_T("ASDK_MYCOMMANDS"), _T("ASDK_MYPROP"), _T("MYPROP"),ACRX_CMD_MODAL, ChangeProp);
MyEntity::rxInit();
acrxBuildClassHierarchy();
}
void unloadApp()
{
acedRegCmds->removeGroup(_T("ASDK_MYCOMMANDS"));
deleteAcRxClass(MyEntity::desc());
}
extern "C" AcRx::AppRetCode acrxEntryPoint(AcRx::AppMsgCode msg, void* appId){
switch (msg) {
case AcRx::kInitAppMsg:
acrxDynamicLinker->unlockApplication(appId);
acrxDynamicLinker->registerAppMDIAware(appId);
initApp();
break;
case AcRx::kUnloadAppMsg:
unloadApp();
}
return AcRx::kRetOK;
} The above code reproduce the problem.
I created 2 command:
MYENTITY to create custom entity (circle) with property object. Property objec stores radius of the circle.
MYPROP to change radius of the circle by 10. Please Regenrate the drawing after MYPROP to see change of the custom entities.
The code works fine when copy function of autocad is used but not working for copy/paste for both same file and new file. Can someone help to resolve te problem.
Thanks
Michal
![Autodesk Design & Make Report](https://forums.autodesk.com/t5/image/serverpage/image-id/1350519iCB55845EBFC43016/image-size/large?v=v2&px=999" "Autodesk Design & Make Report")
