288 lines
7.0 KiB
C
288 lines
7.0 KiB
C
/****************************************************************************
|
|
* This file is part of the project AqHome.
|
|
* AqHome (c) by 2023 Martin Preuss, all rights reserved.
|
|
*
|
|
* The license for this file can be found in the file COPYING which you
|
|
* should have received along with this file.
|
|
****************************************************************************/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include <config.h>
|
|
#endif
|
|
|
|
|
|
#include "./utils.h"
|
|
|
|
#include "aqhome/ipc/endpoint_ipc.h"
|
|
#include "aqhome/ipc/nodes/msg_ipc_setaccmsggrps.h"
|
|
#include "aqhome/ipc/nodes/msg_ipc_forward.h"
|
|
#include "aqhome/ipc/data/ipc_data.h"
|
|
#include "aqhome/ipc/data/msg_data_connect.h"
|
|
#include "aqhome/ipc/msg_ipc_result.h"
|
|
|
|
#include <gwenhywfar/endpoint_tcpc.h>
|
|
#include <gwenhywfar/debug.h>
|
|
|
|
#include <time.h>
|
|
#include <unistd.h>
|
|
|
|
|
|
#define UTILS_IPC_ENDPOINT_DEFAULT_MSGSIZE 4096
|
|
|
|
|
|
|
|
GWEN_MSG_ENDPOINT *Utils_SetupIpcEndpoint(GWEN_DB_NODE *dbArgs)
|
|
{
|
|
GWEN_MSG_ENDPOINT *epTcp;
|
|
const char *tcpAddress;
|
|
int tcpPort;
|
|
int rv;
|
|
|
|
tcpAddress=GWEN_DB_GetCharValue(dbArgs, "tcpAddress", 0, "127.0.0.1");
|
|
tcpPort=GWEN_DB_GetIntValue(dbArgs, "tcpPort", 0, 45454);
|
|
|
|
DBG_INFO(NULL, "Setup tcp client endpoint to %s:%d", tcpAddress, tcpPort);
|
|
epTcp=AQH_IpcEndpoint_CreateIpcTcpClient(tcpAddress, tcpPort, "aqhome-tool-IPC", 0);
|
|
if (epTcp==NULL) {
|
|
DBG_ERROR(NULL, "Error creating endpoint TCPc");
|
|
return NULL;
|
|
}
|
|
GWEN_MsgEndpoint_SetDefaultMessageSize(epTcp, UTILS_IPC_ENDPOINT_DEFAULT_MSGSIZE);
|
|
rv=GWEN_TcpcEndpoint_StartConnect(epTcp);
|
|
if (rv<0 && rv!=GWEN_ERROR_IN_PROGRESS) {
|
|
DBG_ERROR(NULL, "Error connecting (%d)", rv);
|
|
GWEN_MsgEndpoint_free(epTcp);
|
|
return NULL;
|
|
}
|
|
|
|
return epTcp;
|
|
}
|
|
|
|
|
|
|
|
GWEN_MSG *Utils_WaitForSpecificNodeMessage(GWEN_MSG_ENDPOINT *epTcp,
|
|
int msgCode,
|
|
int nodeAddr,
|
|
int timeoutInSeconds)
|
|
{
|
|
time_t startTime;
|
|
|
|
startTime=time(NULL);
|
|
|
|
for (;;) {
|
|
GWEN_MSG *msg;
|
|
time_t now;
|
|
|
|
GWEN_MsgEndpoint_IoLoop(epTcp, 2000); /* 2000 ms */
|
|
msg=GWEN_MsgEndpoint_TakeFirstReceivedMessage(epTcp);
|
|
if (msg) {
|
|
if (GWEN_IpcMsg_GetCode(msg)==AQH_MSGTYPE_IPC_NODES_FORWARD) {
|
|
GWEN_MSG *nodeMsg;
|
|
|
|
DBG_INFO(NULL, "Received IPC FORWARD message");
|
|
nodeMsg=AQH_ForwardIpcMsg_GetCopyOfNodeMsg(msg);
|
|
if (nodeMsg) {
|
|
DBG_INFO(AQH_LOGDOMAIN,
|
|
"Received node msg from %d (%d)",
|
|
AQH_NodeMsg_GetSourceAddress(nodeMsg),
|
|
AQH_NodeMsg_GetMsgType(nodeMsg));
|
|
if (AQH_NodeMsg_GetMsgType(nodeMsg)==msgCode && (nodeAddr==0 || AQH_NodeMsg_GetSourceAddress(nodeMsg)==nodeAddr)) {
|
|
GWEN_Msg_free(msg);
|
|
return nodeMsg;
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
DBG_INFO(NULL, "Received IPC message %d, ignoring", GWEN_IpcMsg_GetCode(msg));
|
|
}
|
|
GWEN_Msg_free(msg);
|
|
}
|
|
now=time(NULL);
|
|
if (now-startTime>timeoutInSeconds) {
|
|
DBG_INFO(NULL, "Timeout");
|
|
break;
|
|
}
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
|
|
|
|
GWEN_MSG *Utils_WaitForSpecificIpcMessage(GWEN_MSG_ENDPOINT *epTcp,
|
|
int msgCode,
|
|
int timeoutInSeconds)
|
|
{
|
|
time_t startTime;
|
|
|
|
startTime=time(NULL);
|
|
|
|
for (;;) {
|
|
GWEN_MSG *msg;
|
|
time_t now;
|
|
|
|
GWEN_MsgEndpoint_IoLoop(epTcp, 2000); /* 2000 ms */
|
|
msg=GWEN_MsgEndpoint_TakeFirstReceivedMessage(epTcp);
|
|
if (msg) {
|
|
uint16_t code;
|
|
|
|
code=GWEN_IpcMsg_GetCode(msg);
|
|
if (code==msgCode) {
|
|
DBG_INFO(NULL, "Received expected IPC message");
|
|
return msg;
|
|
}
|
|
else if (code==AQH_MSGTYPE_IPC_DATA_RESULT) {
|
|
DBG_INFO(NULL, "Received IPC result message");
|
|
return msg;
|
|
}
|
|
else {
|
|
DBG_INFO(NULL, "Received unexpected message %d (%x)", code, code);
|
|
}
|
|
GWEN_Msg_free(msg);
|
|
}
|
|
now=time(NULL);
|
|
if (now-startTime>timeoutInSeconds) {
|
|
DBG_INFO(NULL, "Timeout");
|
|
break;
|
|
}
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
|
|
|
|
int Utils_FlushOutMessageQueue(GWEN_MSG_ENDPOINT *epTcp, int timeoutInSeconds)
|
|
{
|
|
time_t startTime;
|
|
|
|
startTime=time(NULL);
|
|
|
|
while(GWEN_MsgEndpoint_HaveMessageToSend(epTcp)) {
|
|
time_t now;
|
|
|
|
GWEN_MsgEndpoint_IoLoop(epTcp, 2000); /* 2000 ms */
|
|
now=time(NULL);
|
|
if (now-startTime>timeoutInSeconds) {
|
|
DBG_INFO(NULL, "Timeout");
|
|
return GWEN_ERROR_TIMEOUT;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
int Utils_SendAcceptedMsgGroups(GWEN_MSG_ENDPOINT *epTcp, uint32_t groups)
|
|
{
|
|
GWEN_MSG *msgOut;
|
|
|
|
msgOut=AQH_SetAcceptedMsgGroupsIpcMsg_new(AQH_MSGTYPE_IPC_NODES_SETACCMSGGRPS, groups);
|
|
if (msgOut==NULL) {
|
|
DBG_ERROR(NULL, "Error creating message");
|
|
return GWEN_ERROR_GENERIC;
|
|
}
|
|
GWEN_MsgEndpoint_AddSendMessage(epTcp, msgOut);
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
GWEN_MSG_ENDPOINT *Utils_OpenConnection(GWEN_DB_NODE *dbArgs, uint32_t flags, int timeoutInSeconds)
|
|
{
|
|
GWEN_MSG_ENDPOINT *epTcp;
|
|
GWEN_MSG *msgOut;
|
|
GWEN_MSG *msgIn;
|
|
uint32_t result;
|
|
const char *clientId;
|
|
const char *userId;
|
|
const char *password;
|
|
|
|
clientId=GWEN_DB_GetCharValue(dbArgs, "clientId", 0, NULL);
|
|
userId=GWEN_DB_GetCharValue(dbArgs, "userId", 0, NULL);
|
|
password=GWEN_DB_GetCharValue(dbArgs, "password", 0, NULL);
|
|
|
|
epTcp=Utils_SetupIpcEndpoint(dbArgs);
|
|
if (epTcp==NULL) {
|
|
DBG_ERROR(NULL, "ERROR creating TCP connection");
|
|
return NULL;
|
|
}
|
|
|
|
msgOut=AQH_ConnectDataIpcMsg_new(AQH_MSGTYPE_IPC_DATA_CONNECT_REQ, clientId, userId, password, flags);
|
|
if (msgOut==NULL) {
|
|
DBG_ERROR(NULL, "Error creating message");
|
|
GWEN_MsgEndpoint_free(epTcp);
|
|
return NULL;
|
|
}
|
|
GWEN_MsgEndpoint_AddSendMessage(epTcp, msgOut);
|
|
|
|
msgIn=Utils_WaitForSpecificIpcMessage(epTcp, AQH_MSGTYPE_IPC_DATA_RESULT, timeoutInSeconds);
|
|
if (msgIn==NULL) {
|
|
DBG_ERROR(NULL, "No response received");
|
|
GWEN_MsgEndpoint_free(epTcp);
|
|
return NULL;
|
|
}
|
|
|
|
result=AQH_ResultIpcMsg_GetResultCode(msgIn);
|
|
GWEN_Msg_free(msgIn);
|
|
|
|
if (result!=AQH_MSG_IPC_SUCCESS) {
|
|
DBG_ERROR(NULL, "Response: %d", result);
|
|
GWEN_MsgEndpoint_free(epTcp);
|
|
return NULL;
|
|
}
|
|
|
|
return epTcp;
|
|
}
|
|
|
|
|
|
|
|
void Utils_PrintDataPoints(const uint64_t *dataPoints, uint32_t numValues, const char *valueUnits)
|
|
{
|
|
uint32_t i;
|
|
|
|
for(i=0; i<numValues; i++) {
|
|
uint64_t timestamp;
|
|
union {double f; uint64_t i;} u;
|
|
|
|
timestamp=*(dataPoints++);
|
|
u.i=*(dataPoints++);
|
|
|
|
Utils_PrintSingleDataPoint(timestamp, u.f, valueUnits);
|
|
}
|
|
}
|
|
|
|
|
|
|
|
void Utils_PrintSingleDataPoint(uint64_t timestamp, double data, const char *valueUnits)
|
|
{
|
|
fprintf(stdout, "%lu\t%lf\t%s\n", (unsigned long int) timestamp, data, valueUnits?valueUnits:"");
|
|
}
|
|
|
|
|
|
|
|
void Utils_PrintMeanData(const uint64_t *dataPoints, uint32_t numValues, const char *valueUnits)
|
|
{
|
|
if (numValues) {
|
|
uint32_t i;
|
|
uint64_t timestamp=0;
|
|
double total=0.0;
|
|
|
|
for(i=0; i<numValues; i++) {
|
|
union {double f; uint64_t i;} u;
|
|
|
|
timestamp=*(dataPoints++); /* use last timestamp encountered */
|
|
u.i=*(dataPoints++);
|
|
total+=u.f;
|
|
}
|
|
total=total/(double)numValues;
|
|
Utils_PrintSingleDataPoint(timestamp, total, valueUnits);
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|