blob: 86e6eafda9730ed71a506dbaf726d18e7faa4c6a [file] [log] [blame]
/*******************************************************************************
* Copyright (c) 2023 Martin Erich Jobst
*
* This program and the accompanying materials are made available under the
* terms of the Eclipse Public License 2.0 which is available at
* http://www.eclipse.org/legal/epl-2.0.
*
* SPDX-License-Identifier: EPL-2.0
*
* Contributors:
* Martin Jobst
* - initial API and implementation and/or initial documentation
*******************************************************************************/
#include "WORD2WORD.h"
#ifdef FORTE_ENABLE_GENERATED_SOURCE_CPP
#include "WORD2WORD_gen.cpp"
#endif
#include "criticalregion.h"
#include "resource.h"
#include "forte_word.h"
#include "iec61131_functions.h"
#include "forte_array_common.h"
#include "forte_array.h"
#include "forte_array_fixed.h"
#include "forte_array_variable.h"
DEFINE_FIRMWARE_FB(FORTE_WORD2WORD, g_nStringIdWORD2WORD)
const CStringDictionary::TStringId FORTE_WORD2WORD::scmDataInputNames[] = {g_nStringIdIN};
const CStringDictionary::TStringId FORTE_WORD2WORD::scmDataInputTypeIds[] = {g_nStringIdWORD};
const CStringDictionary::TStringId FORTE_WORD2WORD::scmDataOutputNames[] = {g_nStringIdOUT};
const CStringDictionary::TStringId FORTE_WORD2WORD::scmDataOutputTypeIds[] = {g_nStringIdWORD};
const TDataIOID FORTE_WORD2WORD::scmEIWith[] = {0, scmWithListDelimiter};
const TForteInt16 FORTE_WORD2WORD::scmEIWithIndexes[] = {0};
const CStringDictionary::TStringId FORTE_WORD2WORD::scmEventInputNames[] = {g_nStringIdREQ};
const TDataIOID FORTE_WORD2WORD::scmEOWith[] = {0, scmWithListDelimiter};
const TForteInt16 FORTE_WORD2WORD::scmEOWithIndexes[] = {0};
const CStringDictionary::TStringId FORTE_WORD2WORD::scmEventOutputNames[] = {g_nStringIdCNF};
const SFBInterfaceSpec FORTE_WORD2WORD::scmFBInterfaceSpec = {
1, scmEventInputNames, scmEIWith, scmEIWithIndexes,
1, scmEventOutputNames, scmEOWith, scmEOWithIndexes,
1, scmDataInputNames, scmDataInputTypeIds,
1, scmDataOutputNames, scmDataOutputTypeIds,
0, nullptr,
0, nullptr
};
FORTE_WORD2WORD::FORTE_WORD2WORD(CStringDictionary::TStringId paInstanceNameId, forte::core::CFBContainer &paContainer) :
CSimpleFB(paContainer, &scmFBInterfaceSpec, paInstanceNameId, nullptr),
var_IN(CIEC_WORD(0)),
var_OUT(CIEC_WORD(0)),
var_conn_OUT(var_OUT),
conn_CNF(this, 0),
conn_IN(nullptr),
conn_OUT(this, 0, &var_conn_OUT) {
}
void FORTE_WORD2WORD::alg_REQ(void) {
var_OUT = var_IN;
}
void FORTE_WORD2WORD::executeEvent(TEventID paEIID, CEventChainExecutionThread *const paECET) {
switch(paEIID) {
case scmEventREQID:
alg_REQ();
break;
default:
break;
}
sendOutputEvent(scmEventCNFID, paECET);
}
void FORTE_WORD2WORD::readInputData(TEventID paEIID) {
switch(paEIID) {
case scmEventREQID: {
readData(0, var_IN, conn_IN);
break;
}
default:
break;
}
}
void FORTE_WORD2WORD::writeOutputData(TEventID paEIID) {
switch(paEIID) {
case scmEventCNFID: {
writeData(0, var_OUT, conn_OUT);
break;
}
default:
break;
}
}
CIEC_ANY *FORTE_WORD2WORD::getDI(size_t paIndex) {
switch(paIndex) {
case 0: return &var_IN;
}
return nullptr;
}
CIEC_ANY *FORTE_WORD2WORD::getDO(size_t paIndex) {
switch(paIndex) {
case 0: return &var_OUT;
}
return nullptr;
}
CEventConnection *FORTE_WORD2WORD::getEOConUnchecked(TPortId paIndex) {
switch(paIndex) {
case 0: return &conn_CNF;
}
return nullptr;
}
CDataConnection **FORTE_WORD2WORD::getDIConUnchecked(TPortId paIndex) {
switch(paIndex) {
case 0: return &conn_IN;
}
return nullptr;
}
CDataConnection *FORTE_WORD2WORD::getDOConUnchecked(TPortId paIndex) {
switch(paIndex) {
case 0: return &conn_OUT;
}
return nullptr;
}
CIEC_ANY *FORTE_WORD2WORD::getVarInternal(size_t) {
return nullptr;
}