}END_TEST
START_TEST(ReadSingleAttributeDataTypeWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_DATATYPE;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_NodeId* respval;
respval = (UA_NodeId*) resp.value.data;
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_NODEID], resp.value.type);
ck_assert_int_eq(respval->namespaceIndex,0);
ck_assert_int_eq(respval->identifier.numeric,UA_NS0ID_INT32);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeMinimumSamplingIntervalWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId =
UA_ATTRIBUTEID_MINIMUMSAMPLINGINTERVAL;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_Double* respval;
respval = (UA_Double*) resp.value.data;
UA_VariableNode *compNode = makeCompareSequence();
UA_Double comp;
comp = (UA_Double) compNode->minimumSamplingInterval;
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_DOUBLE], resp.value.type);
ck_assert(*respval == comp);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeNodeIdWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_NODEID;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_NodeId* respval;
respval = (UA_NodeId*) resp.value.data;
const UA_NodeId myIntegerNodeId = UA_NODEID_STRING(1, "the.answer");
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_NODEID], resp.value.type);
ck_assert_int_eq(1, respval->namespaceIndex);
for (int var = 0; var < respval->identifier.string.length; ++var) {
ck_assert_int_eq(myIntegerNodeId.identifier.string.data[var],
respval->identifier.string.data[var]);
}
UA_free(respval);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeInverseNameWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId.identifier.numeric = UA_NS0ID_ORGANIZES;
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_INVERSENAME;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_LocalizedText* respval;
respval = (UA_LocalizedText*) resp.value.data;
const UA_LocalizedText comp = UA_LOCALIZEDTEXT("en_US", "OrganizedBy");
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_LOCALIZEDTEXT],resp.value.type);
ck_assert_int_eq(comp.text.length, respval->text.length);
for (int var = 0; var < respval->text.length - 1; ++var) {
ck_assert_int_eq(comp.text.data[var], respval->text.data[var]);
}
ck_assert_int_eq(comp.locale.length, respval->locale.length);
for (int var = 0; var < respval->locale.length - 1; ++var) {
ck_assert_int_eq(comp.locale.data[var], respval->locale.data[var]);
}
UA_free(respval);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeUserWriteMaskWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_USERWRITEMASK;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_UInt32* respval;
respval = (UA_UInt32*) resp.value.data;
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_UINT32], resp.value.type);
ck_assert_int_eq(0,*respval);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeDescriptionWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_DESCRIPTION;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_LocalizedText* respval;
respval = (UA_LocalizedText*) resp.value.data;
UA_VariableNode* compNode = makeCompareSequence();
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_LOCALIZEDTEXT], resp.value.type);
ck_assert_int_eq(compNode->description.locale.length, respval->locale.length);
for (int var = 0; var < respval->locale.length - 1; ++var) {
ck_assert_int_eq(compNode->description.locale.data[var], respval->locale.data[var]);
}
ck_assert_int_eq(compNode->description.text.length, respval->text.length);
for (int var = 0; var < respval->text.length - 1; ++var) {
ck_assert_int_eq(compNode->description.text.data[var], respval->text.data[var]);
}
UA_free(respval);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeBrowseNameWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_BROWSENAME;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
UA_QualifiedName* respval;
respval = (UA_QualifiedName*) resp.value.data;
const UA_QualifiedName myIntegerName = UA_QUALIFIEDNAME(1,
"the answer");
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_QUALIFIEDNAME], resp.value.type);
ck_assert_int_eq(1, respval->namespaceIndex);
ck_assert_int_eq(myIntegerName.name.length, respval->name.length);
for (int var = 0; var < respval->name.length - 1; ++var) {
ck_assert_int_eq(myIntegerName.name.data[var],
respval->name.data[var]);
}
UA_free(respval);
}END_TEST
void FORTE_OPC_UA_READ::executeEvent(int pa_nEIID){
switch(pa_nEIID){
case scm_nEventREQID:
UA_Int32 value = 0;
OUT() = value;
UA_Client *client = UA_Client_new(UA_ClientConfig_standard, Logger_Stdout_new());
UA_StatusCode connected = UA_Client_connect(client, ClientNetworkLayerTCP_connect, SERVER());
if(connected != UA_STATUSCODE_GOOD) {
UA_Client_delete(client);
sendOutputEvent(scm_nEventCNFID);
}
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING_ALLOC(1, NODE()); /* assume this node exists */
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_VALUE;
UA_ReadResponse rResp = UA_Client_read(client, &rReq);
if(rResp.responseHeader.serviceResult == UA_STATUSCODE_GOOD &&
rResp.resultsSize > 0 && rResp.results[0].hasValue &&
UA_Variant_isScalar(&rResp.results[0].value) &&
rResp.results[0].value.type == &UA_TYPES[UA_TYPES_INT32]) {
value = *(UA_Int32*)rResp.results[0].value.data;
OUT() = value;
}else{
sendOutputEvent(scm_nEventCNFID);
}
UA_ReadRequest_deleteMembers(&rReq);
UA_ReadResponse_deleteMembers(&rResp);
UA_Client_disconnect(client);
UA_Client_delete(client);
sendOutputEvent(scm_nEventCNFID);
break;
break;
}
}
}END_TEST
START_TEST(WriteSingleAttributeValue)
{
UA_Server *server = makeTestSequence();
UA_WriteValue wValue;
UA_WriteValue_init(&wValue);
UA_Variant *myIntegerVariant = UA_Variant_new();
UA_Int32 myInteger = 20;
UA_Variant_setScalarCopy(myIntegerVariant, &myInteger,
&UA_TYPES[UA_TYPES_INT32]);
wValue.nodeId = UA_NODEID_STRING(1, "the.answer");
wValue.attributeId = UA_ATTRIBUTEID_VALUE;
wValue.value.hasValue = UA_TRUE;
wValue.value.value = *myIntegerVariant;
UA_StatusCode retval = writeValue(server, &wValue);
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_VALUE;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
ck_assert_int_eq(retval, UA_STATUSCODE_GOOD);
ck_assert(wValue.value.hasValue);
const UA_Node *node = UA_NodeStore_get(server->nodestore, &wValue.nodeId);
ck_assert_int_eq(node->nodeClass, UA_NODECLASS_VARIABLE);
const UA_VariableNode *vn = (const UA_VariableNode*)node;
const UA_Variant *oldV = &vn->value.variant.value;
ck_assert_ptr_eq(&oldV->type->typeId, &wValue.value.value.type->typeId);
ck_assert_int_eq(20, *(UA_Int32* )resp.value.data);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeExecutableWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId.identifier.numeric = UA_NS0ID_METHODNODE;
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_EXECUTABLE;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0], &resp);
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_BOOLEAN], resp.value.type);
ck_assert(*(UA_Boolean*)resp.value.data==UA_FALSE);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeHistorizingWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_HISTORIZING;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_BOOLEAN], resp.value.type);
ck_assert(*(UA_Boolean* )resp.value.data==UA_FALSE);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeAccessLevelWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_ACCESSLEVEL;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_BYTE], resp.value.type);
ck_assert_int_eq(*(UA_Byte*)resp.value.data, 0);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeEventNotifierWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_NUMERIC(1, 50);
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_EVENTNOTIFIER;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_BYTE],resp.value.type);
ck_assert_int_eq(*(UA_Byte*)resp.value.data, 0);
}END_TEST
}END_TEST
START_TEST(ReadSingleAttributeArrayDimensionsWithoutTimestamp)
{
UA_Server *server = makeTestSequence();
UA_DataValue resp;
UA_DataValue_init(&resp);
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING(1, "the.answer");
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_ARRAYDIMENSIONS;
readValue(server, UA_TIMESTAMPSTORETURN_NEITHER, &rReq.nodesToRead[0],
&resp);
ck_assert_int_eq(-1, resp.value.arrayLength);
ck_assert_ptr_eq(&UA_TYPES[UA_TYPES_INT32], resp.value.type);
ck_assert_ptr_eq((UA_Int32*)resp.value.data,0);
}END_TEST
int main(int argc, char *argv[]) {
UA_Client *client = UA_Client_new(UA_ClientConfig_standard, Logger_Stdout_new());
UA_StatusCode retval = UA_Client_connect(client, ClientNetworkLayerTCP_connect,
"opc.tcp://localhost:16664");
if(retval != UA_STATUSCODE_GOOD) {
UA_Client_delete(client);
return retval;
}
// Browse some objects
printf("Browsing nodes in objects folder:\n");
UA_BrowseRequest bReq;
UA_BrowseRequest_init(&bReq);
bReq.requestedMaxReferencesPerNode = 0;
bReq.nodesToBrowse = UA_BrowseDescription_new();
bReq.nodesToBrowseSize = 1;
bReq.nodesToBrowse[0].nodeId = UA_NODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER); //browse objects folder
bReq.nodesToBrowse[0].resultMask = UA_BROWSERESULTMASK_ALL; //return everything
UA_BrowseResponse bResp = UA_Client_browse(client, &bReq);
printf("%-9s %-16s %-16s %-16s\n", "NAMESPACE", "NODEID", "BROWSE NAME", "DISPLAY NAME");
for (int i = 0; i < bResp.resultsSize; ++i) {
for (int j = 0; j < bResp.results[i].referencesSize; ++j) {
UA_ReferenceDescription *ref = &(bResp.results[i].references[j]);
if(ref->nodeId.nodeId.identifierType == UA_NODEIDTYPE_NUMERIC) {
printf("%-9d %-16d %-16.*s %-16.*s\n", ref->browseName.namespaceIndex,
ref->nodeId.nodeId.identifier.numeric, ref->browseName.name.length,
ref->browseName.name.data, ref->displayName.text.length, ref->displayName.text.data);
} else if(ref->nodeId.nodeId.identifierType == UA_NODEIDTYPE_STRING) {
printf("%-9d %-16.*s %-16.*s %-16.*s\n", ref->browseName.namespaceIndex,
ref->nodeId.nodeId.identifier.string.length, ref->nodeId.nodeId.identifier.string.data,
ref->browseName.name.length, ref->browseName.name.data, ref->displayName.text.length,
ref->displayName.text.data);
}
//TODO: distinguish further types
}
}
UA_BrowseRequest_deleteMembers(&bReq);
UA_BrowseResponse_deleteMembers(&bResp);
#ifdef ENABLE_SUBSCRIPTIONS
// Create a subscription with interval 0 (immediate)...
UA_Int32 subId = UA_Client_newSubscription(client, 0);
if (subId)
printf("Create subscription succeeded, id %u\n", subId);
// .. and monitor TheAnswer
UA_NodeId monitorThis;
monitorThis = UA_NODEID_STRING_ALLOC(1, "the.answer");
UA_UInt32 monId = UA_Client_monitorItemChanges(client, subId, monitorThis, UA_ATTRIBUTEID_VALUE, &handler_TheAnswerChanged );
if (monId)
printf("Monitoring 'the.answer', id %u\n", subId);
UA_NodeId_deleteMembers(&monitorThis);
// First Publish always generates data (current value) and call out handler.
UA_Client_doPublish(client);
// This should not generate anything
UA_Client_doPublish(client);
#endif
UA_Int32 value = 0;
// Read node's value
printf("\nReading the value of node (1, \"the.answer\"):\n");
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING_ALLOC(1, "the.answer"); /* assume this node exists */
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_VALUE;
UA_ReadResponse rResp = UA_Client_read(client, &rReq);
if(rResp.responseHeader.serviceResult == UA_STATUSCODE_GOOD &&
rResp.resultsSize > 0 && rResp.results[0].hasValue &&
UA_Variant_isScalar(&rResp.results[0].value) &&
rResp.results[0].value.type == &UA_TYPES[UA_TYPES_INT32]) {
value = *(UA_Int32*)rResp.results[0].value.data;
printf("the value is: %i\n", value);
}
UA_ReadRequest_deleteMembers(&rReq);
UA_ReadResponse_deleteMembers(&rResp);
value++;
// Write node's value
printf("\nWriting a value of node (1, \"the.answer\"):\n");
UA_WriteRequest wReq;
UA_WriteRequest_init(&wReq);
wReq.nodesToWrite = UA_WriteValue_new();
wReq.nodesToWriteSize = 1;
wReq.nodesToWrite[0].nodeId = UA_NODEID_STRING_ALLOC(1, "the.answer"); /* assume this node exists */
wReq.nodesToWrite[0].attributeId = UA_ATTRIBUTEID_VALUE;
wReq.nodesToWrite[0].value.hasValue = UA_TRUE;
wReq.nodesToWrite[0].value.value.type = &UA_TYPES[UA_TYPES_INT32];
wReq.nodesToWrite[0].value.value.storageType = UA_VARIANT_DATA_NODELETE; //do not free the integer on deletion
wReq.nodesToWrite[0].value.value.data = &value;
UA_WriteResponse wResp = UA_Client_write(client, &wReq);
if(wResp.responseHeader.serviceResult == UA_STATUSCODE_GOOD)
printf("the new value is: %i\n", value);
UA_WriteRequest_deleteMembers(&wReq);
UA_WriteResponse_deleteMembers(&wResp);
#ifdef ENABLE_SUBSCRIPTIONS
// Take another look at the.answer... this should call the handler.
UA_Client_doPublish(client);
// Delete our subscription (which also unmonitors all items)
if(!UA_Client_removeSubscription(client, subId))
printf("Subscription removed\n");
#endif
#ifdef ENABLE_METHODCALLS
/* Note: This example requires Namespace 0 Node 11489 (ServerType -> GetMonitoredItems)
FIXME: Provide a namespace 0 independant example on the server side
*/
UA_Variant input;
UA_String argString = UA_STRING("Hello Server");
UA_Variant_init(&input);
UA_Variant_setScalarCopy(&input, &argString, &UA_TYPES[UA_TYPES_STRING]);
UA_Int32 outputSize;
UA_Variant *output;
retval = UA_Client_CallServerMethod(client, UA_NODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(1, 62541), 1, &input, &outputSize, &output);
if(retval == UA_STATUSCODE_GOOD) {
printf("Method call was successfull, and %i returned values available.\n", outputSize);
UA_Array_delete(output, &UA_TYPES[UA_TYPES_VARIANT], outputSize);
} else {
printf("Method call was unsuccessfull, and %x returned values available.\n", retval);
}
UA_Variant_deleteMembers(&input);
#endif
#ifdef ENABLE_ADDNODES
/* Create a new object type node */
// New ReferenceType
UA_AddNodesResponse *adResp = UA_Client_createReferenceTypeNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 12133), // Assign this NodeId (will fail if client is called multiple times)
UA_QUALIFIEDNAME(0, "NewReference"),
UA_LOCALIZEDTEXT("en_US", "TheNewReference"),
UA_LOCALIZEDTEXT("en_US", "References something that might or might not exist."),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_LOCALIZEDTEXT("en_US", "IsNewlyReferencedBy"));
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewReference' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
UA_AddNodesResponse_deleteMembers(adResp);
free(adResp);
// New ObjectType
adResp = UA_Client_createObjectTypeNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 12134), // Assign this NodeId (will fail if client is called multiple times)
UA_QUALIFIEDNAME(0, "NewObjectType"),
UA_LOCALIZEDTEXT("en_US", "TheNewObjectType"),
UA_LOCALIZEDTEXT("en_US", "Put innovative description here."),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER));
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewObjectType' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
// New Object
adResp = UA_Client_createObjectNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 0), // Assign new/random NodeID
UA_QUALIFIEDNAME(0, "TheNewGreatNodeBrowseName"),
UA_LOCALIZEDTEXT("en_US", "TheNewGreatNode"),
UA_LOCALIZEDTEXT("de_DE", "Hier koennte Ihre Webung stehen!"),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER));
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewObject' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
UA_AddNodesResponse_deleteMembers(adResp);
free(adResp);
// New Integer Variable
UA_Variant *theValue = UA_Variant_new();
UA_Int32 *theValueDate = UA_Int32_new();
*theValueDate = 1234;
theValue->type = &UA_TYPES[UA_TYPES_INT32];
theValue->data = theValueDate;
adResp = UA_Client_createVariableNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 0), // Assign new/random NodeID
UA_QUALIFIEDNAME(0, "VariableNode"),
UA_LOCALIZEDTEXT("en_US", "TheNewVariableNode"),
UA_LOCALIZEDTEXT("en_US", "This integer is just amazing - it has digits and everything."),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_INT32),
theValue);
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewVariable' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
UA_AddNodesResponse_deleteMembers(adResp);
free(adResp);
free(theValue);
/* Done creating a new node*/
#endif
UA_Client_disconnect(client);
UA_Client_delete(client);
return UA_STATUSCODE_GOOD;
}
OV_DLLFNCEXPORT OV_RESULT opcuafb_Read_Execute_set(
OV_INSTPTR_opcuafb_Read pinst,
const OV_BOOL value
) {
OV_INSTPTR_opcuafb_Connect pConnect = NULL;
OV_INSTPTR_opcuafb_NodeGetHandle pNodeGetHandle = NULL;
UA_ReadRequest ReadRequest;
UA_ReadResponse ReadResponse;
unsigned long int tempulong = 0;
char *endPtr = NULL;
if(value == FALSE || pinst->v_Execute == TRUE){
//only react on the rising edge
pinst->v_Execute = value;
return OV_ERR_OK;
}
pConnect = Ov_DynamicPtrCast(opcuafb_Connect, fb_connection_getFirstConnectedObject(Ov_PtrUpCast(fb_object, pinst), FALSE, TRUE, "ConnectionHdl"));
if(pConnect == NULL){
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
return OV_ERR_BADVALUE;
}
if(pConnect->v_ConnectionHdl == 0){
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
return OV_ERR_BADVALUE;
}
if(pConnect->v_Client == NULL){
//internal error
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
return OV_ERR_BADVALUE;
}
pNodeGetHandle = Ov_DynamicPtrCast(opcuafb_NodeGetHandle, fb_connection_getFirstConnectedObject(Ov_PtrUpCast(fb_object, pinst), FALSE, TRUE, "NodeHdl"));
if(pNodeGetHandle == NULL){
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
return OV_ERR_BADVALUE;
}
if(pNodeGetHandle->v_NodeHdl == 0){
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
return OV_ERR_BADVALUE;
}
//free memory of old ANY variable
if(pinst->v_Variable.value.vartype == OV_VT_STRING){
ov_string_setvalue(&pinst->v_Variable.value.valueunion.val_string, NULL);
pinst->v_Variable.value.vartype = OV_VT_VOID;
}else if(pinst->v_Variable.value.vartype & OV_VT_ISVECTOR){
Ov_SetAnyValue(&pinst->v_Variable, NULL);
}
UA_ReadRequest_init(&ReadRequest);
ReadRequest.nodesToRead = UA_ReadValueId_new();
ReadRequest.nodesToReadSize = 1;
ReadRequest.nodesToRead[0].attributeId = UA_ATTRIBUTEID_VALUE;
if(pNodeGetHandle->v_NodeID.IdentifierType == UA_IDTYPE_STRING){
ReadRequest.nodesToRead[0].nodeId = UA_NODEID_STRING_ALLOC(pNodeGetHandle->v_NodeID.NamespaceIndex, pNodeGetHandle->v_NodeID.Identifier);
}else if(pNodeGetHandle->v_NodeID.IdentifierType == UA_IDTYPE_NUMERIC){
tempulong = strtoul(pNodeGetHandle->v_NodeID.Identifier, &endPtr, 10);
if (ERANGE != errno &&
tempulong < UINT16_MAX &&
endPtr != pNodeGetHandle->v_NodeID.Identifier)
{
ReadRequest.nodesToRead[0].nodeId = UA_NODEID_NUMERIC(pNodeGetHandle->v_NodeID.NamespaceIndex, (UA_UInt16)tempulong);
}
// }else if(pNodeGetHandle->v_NodeID.IdentifierType == UA_IDTYPE_GUID){
//todo
//ReadRequest.nodesToRead[0].nodeId = UA_NODEID_GUID(pNodeGetHandle->v_NodeID.NamespaceIndex, pNodeGetHandle->v_NodeID.Identifier);
}else{
UA_ReadRequest_deleteMembers(&ReadRequest);
return OV_ERR_BADVALUE;
}
ReadResponse = UA_Client_Service_read(pConnect->v_Client, ReadRequest);
if(ReadResponse.responseHeader.serviceResult == UA_STATUSCODE_GOOD &&
ReadResponse.resultsSize > 0 && ReadResponse.results[0].hasValue){
pinst->v_Error = FALSE;
pinst->v_ErrorID = 0;
pinst->v_Done = TRUE;
if(UA_Variant_isScalar(&ReadResponse.results[0].value)){
if(ReadResponse.results[0].hasSourceTimestamp){
pinst->v_TimeStamp = ov_1601nsTimeToOvTime(ReadResponse.results[0].sourceTimestamp);
//todo }else if(ReadResponse.results[0].hasSourcePicoseconds){
}else if(ReadResponse.results[0].hasServerTimestamp){
pinst->v_TimeStamp = ov_1601nsTimeToOvTime(ReadResponse.results[0].sourceTimestamp);
//todo }else if(ReadResponse.results[0].hasServerPicoseconds){
}else{
ov_time_gettime(&pinst->v_TimeStamp);
}
if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_INT32]){
pinst->v_Variable.value.vartype = OV_VT_INT;
pinst->v_Variable.value.valueunion.val_int = (OV_INT)*(UA_Int32*)ReadResponse.results[0].value.data;
}else if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_UINT32]){
pinst->v_Variable.value.vartype = OV_VT_UINT;
pinst->v_Variable.value.valueunion.val_uint = (OV_UINT)*(UA_UInt32*)ReadResponse.results[0].value.data;
}else if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_FLOAT]){
pinst->v_Variable.value.vartype = OV_VT_SINGLE;
pinst->v_Variable.value.valueunion.val_single = (OV_SINGLE)*(UA_Float*)ReadResponse.results[0].value.data;
}else if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_DOUBLE]){
pinst->v_Variable.value.vartype = OV_VT_DOUBLE;
pinst->v_Variable.value.valueunion.val_double = (OV_DOUBLE)*(UA_Double*)ReadResponse.results[0].value.data;
}else if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_STRING]){
pinst->v_Variable.value.vartype = OV_VT_STRING;
pinst->v_Variable.value.valueunion.val_string = Ov_DbMalloc(((UA_String*)ReadResponse.results[0].value.data)->length);
if(pinst->v_Variable.value.valueunion.val_string != NULL){
memcpy(((UA_String*)ReadResponse.results[0].value.data)->data, pinst->v_Variable.value.valueunion.val_string, ((UA_String*)ReadResponse.results[0].value.data)->length);
}
}else if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_DATETIME]){
pinst->v_Variable.value.vartype = OV_VT_TIME;
pinst->v_Variable.value.valueunion.val_time = ov_1601nsTimeToOvTime((OV_INT64)*(UA_DateTime*)ReadResponse.results[0].value.data);
}else{
if(ReadResponse.results[0].value.type == &UA_TYPES[UA_TYPES_STRING]){
//free memory
Ov_SetAnyValue(&pinst->v_Variable, NULL);
//set length and type
Ov_SetDynamicVectorLength(&pinst->v_Variable.value.valueunion.val_string_vec, ReadResponse.results[0].value.arrayLength, STRING);
for(size_t iterator = 0; iterator < ReadResponse.results[0].value.arrayLength;iterator++){
pinst->v_Variable.value.valueunion.val_string = Ov_DbMalloc(((UA_String*)ReadResponse.results[0].value.data)[iterator].length);
if(pinst->v_Variable.value.valueunion.val_string != NULL){
memcpy(((UA_String*)ReadResponse.results[0].value.data)[iterator].data, pinst->v_Variable.value.valueunion.val_string_vec.value[iterator], ((UA_String*)ReadResponse.results[0].value.data)[iterator].length);
}
}
}else{
//not implemented
pinst->v_Done = TRUE;
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
}
}
}else{
//not implemented
pinst->v_Done = TRUE;
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
}
}else{
pinst->v_Done = FALSE;
pinst->v_Error = TRUE;
pinst->v_ErrorID = 1; //todo
}
UA_ReadResponse_deleteMembers(&ReadResponse);
UA_ReadRequest_deleteMembers(&ReadRequest);
pinst->v_Execute = value;
return OV_ERR_OK;
}
int main(int argc, char *argv[]) {
UA_Client *client = UA_Client_new(UA_ClientConfig_standard, Logger_Stdout_new());
UA_StatusCode retval = UA_Client_connect(client, ClientNetworkLayerTCP_connect,
"opc.tcp://localhost:16664");
if(retval != UA_STATUSCODE_GOOD) {
UA_Client_delete(client);
return retval;
}
// Browse some objects
printf("Browsing nodes in objects folder:\n");
UA_BrowseRequest bReq;
UA_BrowseRequest_init(&bReq);
bReq.requestedMaxReferencesPerNode = 0;
bReq.nodesToBrowse = UA_BrowseDescription_new();
bReq.nodesToBrowseSize = 1;
bReq.nodesToBrowse[0].nodeId = UA_NODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER); //browse objects folder
bReq.nodesToBrowse[0].resultMask = UA_BROWSERESULTMASK_ALL; //return everything
UA_BrowseResponse bResp = UA_Client_browse(client, &bReq);
printf("%-9s %-16s %-16s %-16s\n", "NAMESPACE", "NODEID", "BROWSE NAME", "DISPLAY NAME");
for (int i = 0; i < bResp.resultsSize; ++i) {
for (int j = 0; j < bResp.results[i].referencesSize; ++j) {
UA_ReferenceDescription *ref = &(bResp.results[i].references[j]);
if(ref->nodeId.nodeId.identifierType == UA_NODEIDTYPE_NUMERIC) {
printf("%-9d %-16d %-16.*s %-16.*s\n", ref->browseName.namespaceIndex,
ref->nodeId.nodeId.identifier.numeric, ref->browseName.name.length,
ref->browseName.name.data, ref->displayName.text.length, ref->displayName.text.data);
} else if(ref->nodeId.nodeId.identifierType == UA_NODEIDTYPE_STRING) {
printf("%-9d %-16.*s %-16.*s %-16.*s\n", ref->browseName.namespaceIndex,
ref->nodeId.nodeId.identifier.string.length, ref->nodeId.nodeId.identifier.string.data,
ref->browseName.name.length, ref->browseName.name.data, ref->displayName.text.length,
ref->displayName.text.data);
}
//TODO: distinguish further types
}
}
UA_BrowseRequest_deleteMembers(&bReq);
UA_BrowseResponse_deleteMembers(&bResp);
UA_Int32 value = 0;
// Read node's value
printf("\nReading the value of node (1, \"the.answer\"):\n");
UA_ReadRequest rReq;
UA_ReadRequest_init(&rReq);
rReq.nodesToRead = UA_ReadValueId_new();
rReq.nodesToReadSize = 1;
rReq.nodesToRead[0].nodeId = UA_NODEID_STRING_ALLOC(1, "the.answer"); /* assume this node exists */
rReq.nodesToRead[0].attributeId = UA_ATTRIBUTEID_VALUE;
UA_ReadResponse rResp = UA_Client_read(client, &rReq);
if(rResp.responseHeader.serviceResult == UA_STATUSCODE_GOOD &&
rResp.resultsSize > 0 && rResp.results[0].hasValue &&
UA_Variant_isScalar(&rResp.results[0].value) &&
rResp.results[0].value.type == &UA_TYPES[UA_TYPES_INT32]) {
value = *(UA_Int32*)rResp.results[0].value.data;
printf("the value is: %i\n", value);
}
UA_ReadRequest_deleteMembers(&rReq);
UA_ReadResponse_deleteMembers(&rResp);
value++;
// Write node's value
printf("\nWriting a value of node (1, \"the.answer\"):\n");
UA_WriteRequest wReq;
UA_WriteRequest_init(&wReq);
wReq.nodesToWrite = UA_WriteValue_new();
wReq.nodesToWriteSize = 1;
wReq.nodesToWrite[0].nodeId = UA_NODEID_STRING_ALLOC(1, "the.answer"); /* assume this node exists */
wReq.nodesToWrite[0].attributeId = UA_ATTRIBUTEID_VALUE;
wReq.nodesToWrite[0].value.hasValue = UA_TRUE;
wReq.nodesToWrite[0].value.value.type = &UA_TYPES[UA_TYPES_INT32];
wReq.nodesToWrite[0].value.value.storageType = UA_VARIANT_DATA_NODELETE; //do not free the integer on deletion
wReq.nodesToWrite[0].value.value.data = &value;
UA_WriteResponse wResp = UA_Client_write(client, &wReq);
if(wResp.responseHeader.serviceResult == UA_STATUSCODE_GOOD)
printf("the new value is: %i\n", value);
UA_WriteRequest_deleteMembers(&wReq);
UA_WriteResponse_deleteMembers(&wResp);
#ifdef ENABLE_ADDNODES
/* Create a new object type node */
// New ReferenceType
UA_AddNodesResponse *adResp = UA_Client_createReferenceTypeNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 12133), // Assign this NodeId (will fail if client is called multiple times)
UA_QUALIFIEDNAME(0, "NewReference"),
UA_LOCALIZEDTEXT("en_US", "TheNewReference"),
UA_LOCALIZEDTEXT("en_US", "References something that might or might not exist."),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_LOCALIZEDTEXT("en_US", "IsNewlyReferencedBy"));
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewReference' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
UA_AddNodesResponse_deleteMembers(adResp);
free(adResp);
// New ObjectType
adResp = UA_Client_createObjectTypeNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 12134), // Assign this NodeId (will fail if client is called multiple times)
UA_QUALIFIEDNAME(0, "NewObjectType"),
UA_LOCALIZEDTEXT("en_US", "TheNewObjectType"),
UA_LOCALIZEDTEXT("en_US", "Put innovative description here."),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER));
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewObjectType' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
// New Object
adResp = UA_Client_createObjectNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 0), // Assign new/random NodeID
UA_QUALIFIEDNAME(0, "TheNewGreatNodeBrowseName"),
UA_LOCALIZEDTEXT("en_US", "TheNewGreatNode"),
UA_LOCALIZEDTEXT("de_DE", "Hier koennte Ihre Webung stehen!"),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER));
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewObject' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
UA_AddNodesResponse_deleteMembers(adResp);
free(adResp);
// New Integer Variable
UA_Variant *theValue = UA_Variant_new();
UA_Int32 *theValueDate = UA_Int32_new();
*theValueDate = 1234;
theValue->type = &UA_TYPES[UA_TYPES_INT32];
theValue->data = theValueDate;
adResp = UA_Client_createVariableNode(client,
UA_EXPANDEDNODEID_NUMERIC(1, 0), // Assign new/random NodeID
UA_QUALIFIEDNAME(0, "VariableNode"),
UA_LOCALIZEDTEXT("en_US", "TheNewVariableNode"),
UA_LOCALIZEDTEXT("en_US", "This integer is just amazing - it has digits and everything."),
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_ORGANIZES),
(UA_UInt32) 0, (UA_UInt32) 0,
UA_EXPANDEDNODEID_NUMERIC(0, UA_NS0ID_OBJECTSFOLDER),
UA_NODEID_NUMERIC(0, UA_NS0ID_INT32),
theValue);
if (adResp->resultsSize > 0 && adResp->results[0].statusCode == UA_STATUSCODE_GOOD ) {
printf("Created 'NewVariable' with numeric NodeID %u\n", adResp->results[0].addedNodeId.identifier.numeric );
}
UA_AddNodesResponse_deleteMembers(adResp);
free(adResp);
free(theValue);
/* Done creating a new node*/
#endif
UA_Client_disconnect(client);
UA_Client_delete(client);
return UA_STATUSCODE_GOOD;
}
