bool COrgOp::Load( CStr &roSrc, unsigned int uiIDOffset ) { CStr oStrLine; CStr oStrToken; CList<COp *> oLstPatch; unsigned int uiIDIn = 0; unsigned int uiIdxIn = 0; unsigned int uiCountIn = 0; unsigned int uiPortIn = 0; unsigned int uiIndexIn = 0; unsigned int uiCountOut = 0; unsigned int uiPortOut = 0; unsigned int uiInteralInt = 0; unsigned int uiInteralUInt = 0; unsigned int uiInteralFlt = 0; unsigned int i = 0; unsigned int uiMaxIPortIn = 0; unsigned int uiMaxIPortOut = 0; unsigned int uiMaxIInternalInt = 0; unsigned int uiMaxIInternalUInt = 0; unsigned int uiMaxIInternalFlt = 0; COp *poOp = 0; // <mod date="2010-12-07"> CList<CArray<unsigned int> *> oLstArrID; CArray<unsigned int> * poArrID = 0; // </mod> // Alle Operatoren einlesen, erstellen und pseudo-patchen. while( 1 ) { if( !Decode_GetNextLine( oStrLine, roSrc ) ) break; i = 0; while( 1 ) { if( !Decode_GetNextToken( oStrToken, oStrLine ) ) break; if( !oStrToken.GetSize() ) { if( i > 1 ) // Komprimierung :: -> :0: oStrToken = '0'; else if( i == 0 ) ORG_OP_LOG( "Fehler: Klassen-Name nicht vorhanden." ); } // class if( i == 0 ) { poOp = Create( oStrToken ); if( poOp == 0 ) { ORG_OP_LOG( "Fehler: Unbekannte Klasse: %s\n", oStrToken.GetData() ); return false; } oLstPatch.Append( poOp ); } // instance else if( i == 1 ) { #ifdef OP_USE_RUNTIME_INFO poOp->SetNameInstance( oStrToken ); #endif // OP_USE_RUNTIME_INFO } // id else if( i == 2 ) { unsigned int uiID; ORG_OP_SSCANF( oStrToken, "%x", &uiID ); poOp->SetID( uiID + uiIDOffset ); // Um keinen Konflikt zu erzeugen. } // flags else if( i == 3 ) { unsigned int uiFlags; ORG_OP_SSCANF( oStrToken, "%x", &uiFlags ); poOp->SetFlags( uiFlags ); } // count_input else if ( i == 4 ) { ORG_OP_SSCANF( oStrToken, "%x", &uiCountIn ); if( poOp->GetFlags() & OP_FLAG_DYNAMIC_INPUTS ) { poOp->SetCountIn( uiCountIn ); } else if( poOp->GetCountIn() != uiCountIn ) { #ifdef OP_USE_RUNTIME_INFO ORG_OP_LOG( "Fehler: Von Klasse %s werden nicht %d Inputs unterstuetzt! " "Keine dynamischen Inputs!\n", poOp->GetNameClass(), uiCountIn ); #endif // OP_USE_RUNTIME_INFO return false; } uiPortIn = 0; uiIndexIn = 0; uiMaxIPortIn = 3 * uiCountIn + 4 + 1; // <mod date="2010-12-07"> poArrID = new CArray<unsigned int>( uiCountIn ); oLstArrID.Append( poArrID ); // </mod> } // inputs else if( i < uiMaxIPortIn ) { unsigned int uiVal; ORG_OP_SSCANF( oStrToken.GetData(), "%x", &uiVal ); switch( uiIndexIn ) { case 0: // id uiIDIn = uiVal; break; case 1: // port uiIdxIn = uiVal; break; case 2: // flags if( uiIDIn ) uiIDIn += uiIDOffset; // Um keinen Konflikt zu erzeugen. // <mod date="2010-12-07"> poArrID->At( uiPortIn ) = uiIDIn; poOp->In( uiPortIn ) = COp::CLink( 0, uiIdxIn, uiVal ); //poOp->In( uiPortIn ) = COp::CLink( reinterpret_cast<COp *>( uiIDIn ), uiIdxIn, uiVal ); // </mod> ++uiPortIn; break; } ++uiIndexIn; if( uiIndexIn == 3 ) uiIndexIn = 0; } // count_output else if( i == uiMaxIPortIn ) { ORG_OP_SSCANF( oStrToken, "%x", &uiCountOut ); if( poOp->GetFlags() & OP_FLAG_DYNAMIC_OUTPUTS ) { poOp->SetCountOut( uiCountOut ); } else if( poOp->GetCountOut() != uiCountOut ) { #ifdef OP_USE_RUNTIME_INFO ORG_OP_LOG( "Fehler: Von Klasse %s werden nicht %d Outputs unterstuetzt! " "Keine dynamischen Outputs!\n", poOp->GetNameClass(), uiCountOut ); #endif // OP_USE_RUNTIME_INFO return false; } uiPortOut = 0; uiMaxIPortOut = uiCountOut + uiMaxIPortIn + 1; } // outputs else if( i < uiMaxIPortOut ) { double dVal; ORG_OP_SSCANF( oStrToken.GetData(), "%lf", &dVal ); poOp->Out( uiPortOut ) = dVal; ++uiPortOut; } // int internal count else if( i == uiMaxIPortOut ) { unsigned int uiCountInternalInt; ORG_OP_SSCANF( oStrToken, "%x", &uiCountInternalInt ); if( poOp->GetCountInternalInt() != uiCountInternalInt ) { #ifdef OP_USE_RUNTIME_INFO ORG_OP_LOG( "Fehler: Von Klasse %s werden nicht %d Int-Interals unterstuetzt!\n", poOp->GetNameClass(), uiCountIn ); #endif // OP_USE_RUNTIME_INFO return false; } uiInteralInt = 0; uiMaxIInternalInt = uiMaxIPortOut + uiCountInternalInt + 1; } // int internals else if( i < uiMaxIInternalInt ) { int iVal; ORG_OP_SSCANF( oStrToken.GetData(), "%d", &iVal ); poOp->SetValueInternalInt( uiInteralInt, iVal ); ++uiInteralInt; } // uint internal count else if( i == uiMaxIInternalInt ) { unsigned int uiCountInternalUInt; ORG_OP_SSCANF( oStrToken, "%x", &uiCountInternalUInt ); if( poOp->GetCountInternalUInt() != uiCountInternalUInt ) { #ifdef OP_USE_RUNTIME_INFO ORG_OP_LOG( "Fehler: Von Klasse %s werden nicht %d UInt-Interals unterstuetzt!\n", poOp->GetNameClass(), uiCountIn ); #endif // OP_USE_RUNTIME_INFO return false; } uiInteralUInt = 0; uiMaxIInternalUInt = uiMaxIInternalInt + uiCountInternalUInt + 1; } // uint internals else if( i < uiMaxIInternalUInt ) { unsigned int uiVal; ORG_OP_SSCANF( oStrToken.GetData(), "%u", &uiVal ); poOp->SetValueInternalUInt( uiInteralUInt, uiVal ); ++uiInteralUInt; } // flt internal count else if( i == uiMaxIInternalUInt ) { unsigned int uiCountInternalFlt; ORG_OP_SSCANF( oStrToken, "%x", &uiCountInternalFlt ); if( poOp->GetCountInternalFlt() != uiCountInternalFlt ) { #ifdef OP_USE_RUNTIME_INFO ORG_OP_LOG( "Fehler: Von Klasse %s werden nicht %d Float-Interals unterstuetzt!\n", poOp->GetNameClass(), uiCountIn ); #endif // OP_USE_RUNTIME_INFO return false; } uiInteralFlt = 0; uiMaxIInternalFlt = uiMaxIInternalUInt + uiCountInternalFlt + 1; } // flt internals else if( i < uiMaxIInternalFlt ) { double dVal; ORG_OP_SSCANF( oStrToken.GetData(), "%lf", &dVal ); poOp->SetValueInternalFlt( uiInteralFlt, dVal ); ++uiInteralFlt; } else break; ++i; } } // Pseudo-Patch nun mit echten Verbindungen versehen. i = oLstPatch.GetSize(); /* if( i < 2 ) { ORG_OP_LOG( "Fehler: Weniger als 2 Operatoren eingelesen!\n" ); return false; } */ // Altes Patch löschen. //Clear(); //m_poOpRootL_ = 0; //m_poOpRootR_ = 0; // <mod date="2010-12-07"> oLstArrID.MoveToBack(); // </mod> while( i ) { --i; poOp = oLstPatch[i]; // <mod date="2010-12-07"> oLstArrID.GetPrev( &poArrID ); // </mod> if( poOp ) { unsigned int uiIn = poOp->GetCountIn(); while( uiIn ) { --uiIn; // <mod date="2010-12-07"> const unsigned int uiTmpIDNext = poArrID->At( uiIn ); //unsigned int uiTmpIDNext = // reinterpret_cast<unsigned int>( poOp->In( uiIn ).GetOp() ); // </mod> if( !uiTmpIDNext ) // ID 0 ist ungültig. continue; // Ganze Liste durchiterieren, und nach der ID aus dem aktuellen // Input-Array Ausschau halten! COp *poOpNext; oLstPatch.MoveToFront(); while( oLstPatch.GetNext( &poOpNext ) ) { if( poOpNext->GetID() == uiTmpIDNext ) { poOp->In( uiIn ).SetOp( poOpNext ); } } } } //if( i == 0 ) // m_poOpRootL_ = poOp; //else if ( i == 1 ) // m_poOpRootR_ = poOp; } // <mod date="2010-12-07"> LIST_DELETE( oLstArrID, CArray<unsigned int> ); // </mod> // Alle aufglösten Operatoren in die echte Liste einfügen... oLstPatch.MoveToFront(); while( oLstPatch.GetNext( &poOp ) ) { #ifdef OP_USE_USER_DATA poOp->m_pvData = 0; #endif // OP_USE_USER_DATA m_oLstOp.Append( poOp ); } //UpdateAll(); ValidateAll(); return true; }