Files
neuron/plugins/ekuiper/read_write.c
T
2026-06-02 08:03:05 +00:00

411 lines
14 KiB
C

/**
* NEURON IIoT System for Industry 4.0
* Copyright (C) 2020-2022 EMQ Technologies Co., Ltd All rights reserved.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 3 of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public License
* along with this program; if not, write to the Free Software Foundation,
* Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
**/
#include <nng/nng.h>
#include "neuron.h"
#include "otel/otel_manager.h"
#include "json/neu_json_fn.h"
#include "json/neu_json_rw.h"
#include "json_rw.h"
#include "read_write.h"
static int send_write_tag_req(neu_plugin_t *plugin, neu_json_write_req_t *req,
char *playload, bool trace_flag,
uint8_t *trace_id, uint8_t *span_id);
static int send_write_tags_req(neu_plugin_t * plugin,
neu_json_write_tags_req_t *req, char *playload,
bool trace_flag, uint8_t *trace_id,
uint8_t *span_id);
static int hex_char_to_int(char c)
{
if (c >= '0' && c <= '9')
return c - '0';
if (c >= 'a' && c <= 'f')
return c - 'a' + 10;
if (c >= 'A' && c <= 'F')
return c - 'A' + 10;
return -1;
}
static int hex_string_to_binary(const char * hex_string,
unsigned char *binary_array, int max_length)
{
int length = strlen(hex_string);
if (length % 2 != 0 || length <= 0)
return -1;
int binary_length = length / 2;
if (binary_length > max_length)
return -1;
for (int i = 0; i < binary_length; i++) {
int high_nibble = hex_char_to_int(hex_string[2 * i]);
int low_nibble = hex_char_to_int(hex_string[2 * i + 1]);
if (high_nibble == -1 || low_nibble == -1)
return -1;
binary_array[i] = (high_nibble << 4) | low_nibble;
}
return binary_length;
}
static void byte_to_hex(unsigned char byte, char *hex)
{
static const char hex_chars[] = "0123456789ABCDEF";
hex[0] = hex_chars[(byte >> 4) & 0x0F];
hex[1] = hex_chars[byte & 0x0F];
}
static void binary_to_hex(const unsigned char *binary, size_t length, char *hex)
{
for (size_t i = 0; i < length; i++) {
byte_to_hex(binary[i], &hex[i * 2]);
}
}
void send_data(neu_plugin_t *plugin, neu_reqresp_trans_data_t *trans_data)
{
int rv = 0;
char * json_str = NULL;
json_read_resp_t resp = {
.plugin = plugin,
.trans_data = trans_data,
};
neu_otel_trace_ctx trans_trace = NULL;
neu_otel_scope_ctx trans_scope = NULL;
uint8_t * trace_id = NULL;
char new_span_id[36] = { 0 };
if (neu_otel_data_is_started() && trans_data->trace_ctx) {
trans_trace = neu_otel_find_trace(trans_data->trace_ctx);
if (trans_trace) {
neu_otel_new_span_id(new_span_id);
trans_scope =
neu_otel_add_span2(trans_trace, "ekuiper send", new_span_id);
neu_otel_scope_add_span_attr_int(trans_scope, "thread id",
(int64_t)(pthread_self()));
neu_otel_scope_set_span_start_time(trans_scope, neu_time_ns());
}
}
do {
rv = neu_json_encode_by_fn(&resp, json_encode_read_resp, &json_str);
if (0 != rv || json_str == NULL) {
plog_error(plugin, "fail encode trans data to json");
break;
}
nng_msg *msg = NULL;
size_t json_len = strlen(json_str);
size_t trace_header_len = 0;
if (neu_otel_data_is_started() && trans_data->trace_ctx &&
trans_trace) {
trace_header_len = 26;
}
rv = nng_msg_alloc(&msg, json_len + trace_header_len);
if (0 != rv) {
plog_error(plugin, "nng cannot allocate msg");
free(json_str);
break;
}
if (trans_trace) {
trace_id = neu_otel_get_trace_id(trans_trace);
uint8_t span_id[8] = { 0 };
hex_string_to_binary(new_span_id, span_id, 8);
uint16_t tarce_header_magic = 0xCE0A;
memcpy(nng_msg_body(msg), &tarce_header_magic, 2);
memcpy(nng_msg_body(msg) + 2, trace_id, 16);
memcpy(nng_msg_body(msg) + 2 + 16, span_id, 8);
}
memcpy(nng_msg_body(msg) + trace_header_len, json_str,
json_len); // no null byte
plog_debug(plugin, ">> %s", json_str);
free(json_str);
rv = nng_sendmsg(plugin->sock, msg,
NNG_FLAG_NONBLOCK); // TODO: use aio to send message
if (0 == rv) {
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_SEND_MSGS_TOTAL, 1,
NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_SEND_BYTES_5S, json_len,
NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_SEND_BYTES_30S,
json_len, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_SEND_BYTES_60S,
json_len, NULL);
} else {
plog_error(plugin, "nng cannot send msg: %s", nng_strerror(rv));
nng_msg_free(msg);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_SEND_MSG_ERRORS_TOTAL,
1, NULL);
}
} while (0);
if (trans_trace) {
if (rv == 0) {
neu_otel_scope_set_status_code2(trans_scope, NEU_OTEL_STATUS_OK, 0);
} else {
neu_otel_scope_set_status_code(trans_scope, NEU_OTEL_STATUS_ERROR,
nng_strerror(rv));
}
neu_otel_scope_set_span_end_time(trans_scope, neu_time_ns());
neu_otel_trace_set_final(trans_trace);
}
}
void recv_data_callback(void *arg)
{
int rv = 0;
neu_plugin_t * plugin = arg;
nng_msg * msg = NULL;
size_t body_len = 0;
size_t json_len = 0;
char * body_str = NULL;
char * json_str = NULL;
neu_json_write_t *req = NULL;
bool trace_flag = false;
uint8_t * trace_id = NULL;
uint8_t * span_id = NULL;
rv = nng_aio_result(plugin->recv_aio);
if (0 != rv) {
plog_error(plugin, "nng_recv error: %s", nng_strerror(rv));
nng_mtx_lock(plugin->mtx);
plugin->receiving = false;
nng_mtx_unlock(plugin->mtx);
return;
}
msg = nng_aio_get_msg(plugin->recv_aio);
body_str = nng_msg_body(msg);
body_len = nng_msg_len(msg);
if (*(uint8_t *) body_str == 0x0A && *(uint8_t *) (body_str + 1) == 0xCE) {
// trace
trace_id = (uint8_t *) (body_str + 2);
span_id = (uint8_t *) (body_str + 18);
trace_flag = true;
json_str = body_str + 26;
json_len = body_len - 26;
} else {
// no trace flag
json_str = body_str;
json_len = body_len;
}
plog_debug(plugin, "<< %.*s", (int) json_len, json_str);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_MSGS_TOTAL, 1, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_BYTES_5S, json_len, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_BYTES_30S, json_len, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_BYTES_60S, json_len, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_MSGS_5S, 1, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_MSGS_30S, 1, NULL);
NEU_PLUGIN_UPDATE_METRIC(plugin, NEU_METRIC_RECV_MSGS_60S, 1, NULL);
if (json_decode_write_req(json_str, json_len, &req) < 0) {
plog_error(plugin, "fail decode write request json: %.*s",
(int) nng_msg_len(msg), json_str);
goto recv_data_callback_end;
}
if (req->singular) {
rv = send_write_tag_req(plugin, &req->single, json_str, trace_flag,
trace_id, span_id);
if (rv == 0) {
plog_notice(plugin, "write tag %s.%s on node %s", req->single.group,
req->single.tag, req->single.node);
}
} else {
rv = send_write_tags_req(plugin, &req->plural, json_str, trace_flag,
trace_id, span_id);
if (rv == 0) {
if (req->plural.n_tag == 0) {
plog_warn(plugin, "no tags to write on node %s",
req->plural.node);
} else {
plog_notice(plugin, "write %d tags on node %s",
req->plural.n_tag, req->plural.node);
}
}
}
if (0 != rv) {
plog_error(plugin, "failed to write data");
goto recv_data_callback_end;
}
recv_data_callback_end:
nng_msg_free(msg);
neu_json_decode_write_free(req);
nng_recv_aio(plugin->sock, plugin->recv_aio);
}
static int json_value_to_tag_value(union neu_json_value *req,
enum neu_json_type t, neu_dvalue_t *value)
{
switch (t) {
case NEU_JSON_INT:
value->type = NEU_TYPE_INT64;
value->value.u64 = req->val_int;
break;
case NEU_JSON_STR:
value->type = NEU_TYPE_STRING;
strncpy(value->value.str, req->val_str, sizeof(value->value.str));
break;
case NEU_JSON_DOUBLE:
value->type = NEU_TYPE_DOUBLE;
value->value.d64 = req->val_double;
break;
case NEU_JSON_BOOL:
value->type = NEU_TYPE_BOOL;
value->value.boolean = req->val_bool;
break;
case NEU_JSON_ARRAY_BOOL:
value->type = NEU_TYPE_ARRAY_BOOL;
value->value.bools.length = req->val_array_bool.length;
value->value.bools.bools =
calloc(req->val_array_bool.length, sizeof(bool));
memcpy(value->value.bools.bools, req->val_array_bool.bools,
sizeof(bool) * req->val_array_bool.length);
break;
case NEU_JSON_ARRAY_INT64:
value->type = NEU_TYPE_ARRAY_INT64;
value->value.i64s.length = req->val_array_int64.length;
value->value.i64s.i64s =
calloc(req->val_array_int64.length, sizeof(int64_t));
memcpy(value->value.i64s.i64s, req->val_array_int64.i64s,
sizeof(int64_t) * req->val_array_int64.length);
break;
case NEU_JSON_ARRAY_DOUBLE:
value->type = NEU_TYPE_ARRAY_DOUBLE;
value->value.f64s.length = req->val_array_double.length;
value->value.f64s.f64s =
calloc(req->val_array_double.length, sizeof(double));
memcpy(value->value.f64s.f64s, req->val_array_double.f64s,
sizeof(double) * req->val_array_double.length);
break;
default:
return -1;
}
return 0;
}
static int send_write_tag_req(neu_plugin_t *plugin, neu_json_write_req_t *req,
char *playload, bool trace_flag,
uint8_t *trace_id, uint8_t *span_id)
{
neu_reqresp_head_t header = {
.type = NEU_REQ_WRITE_TAG,
};
if (trace_flag) {
header.otel_trace_type = NEU_OTEL_TRACE_TYPE_EKUIPER;
header.ctx = calloc(1, 48 + strlen(playload) + 1);
binary_to_hex(trace_id, 16, header.ctx);
binary_to_hex(span_id, 8, header.ctx + 32);
strncpy(header.ctx + 48, playload, strlen(playload));
}
neu_req_write_tag_t cmd = {
.driver = req->node,
.group = req->group,
.tag = req->tag,
};
if (0 != json_value_to_tag_value(&req->value, req->t, &cmd.value)) {
plog_error(plugin, "invalid tag value type: %d", req->t);
return -1;
}
if (0 != neu_plugin_op(plugin, header, &cmd)) {
plog_error(plugin, "neu_plugin_op(NEU_REQ_WRITE_TAG) fail");
return -1;
}
req->node = NULL; // ownership moved
req->group = NULL; // ownership moved
req->tag = NULL; // ownership moved
return 0;
}
static int send_write_tags_req(neu_plugin_t * plugin,
neu_json_write_tags_req_t *req, char *playload,
bool trace_flag, uint8_t *trace_id,
uint8_t *span_id)
{
for (int i = 0; i < req->n_tag; i++) {
if (req->tags[i].t == NEU_JSON_STR) {
if (strlen(req->tags[i].value.val_str) >= NEU_VALUE_SIZE) {
return -1;
}
}
}
neu_reqresp_head_t header = {
.type = NEU_REQ_WRITE_TAGS,
};
if (trace_flag) {
header.otel_trace_type = NEU_OTEL_TRACE_TYPE_EKUIPER;
header.ctx = calloc(1, 48 + strlen(playload) + 1);
binary_to_hex(trace_id, 16, header.ctx);
binary_to_hex(span_id, 8, header.ctx + 32);
strncpy(header.ctx + 48, playload, strlen(playload));
}
neu_req_write_tags_t cmd = { 0 };
cmd.driver = req->node;
cmd.group = req->group;
cmd.n_tag = req->n_tag;
cmd.tags = calloc(cmd.n_tag, sizeof(neu_resp_tag_value_t));
if (NULL == cmd.tags) {
return -1;
}
for (int i = 0; i < cmd.n_tag; i++) {
strncpy(cmd.tags[i].tag, req->tags[i].tag, NEU_TAG_NAME_LEN - 1);
if (0 !=
json_value_to_tag_value(&req->tags[i].value, req->tags[i].t,
&cmd.tags[i].value)) {
plog_error(plugin, "invalid tag value type: %d", req->tags[i].t);
free(cmd.tags);
return -1;
}
}
if (0 != neu_plugin_op(plugin, header, &cmd)) {
plog_error(plugin, "neu_plugin_op(NEU_REQ_WRITE_TAGS) fail");
free(cmd.tags);
return -1;
}
req->node = NULL; // ownership moved
req->group = NULL; // ownership moved
return 0;
}