Reintoduce the old builtin plugin

We use only one function of two from the plugin which could
be called from the LUA script to be able to set a signal
value from a LUA callback.

Change-Id: Ic7a0fcd3d8c4c2370828c1d09fff9ed88a0dc15b
Signed-off-by: Romain Forlot <romain.forlot@iot.bzh>

1 files changed, 63 insertions, 0 deletions

diff --git a/plugins/builtin.cpp b/plugins/builtin.cpp
new file mode 100644
index 0000000..b42bd1d
--- /dev/null
+++ b/plugins/builtin.cpp
@@ -0,0 +1,63 @@
+/*
+ * Copyright (C) 2016 "IoT.bzh"
+ * Author Romain Forlot <romain.forlot@iot.bzh>
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *   http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ *
+*/
+
+#define AFB_BINDING_VERSION 2
+#include <afb/afb-binding.h>
+#include <systemd/sd-event.h>
+#include <json-c/json_object.h>
+#include <stdbool.h>
+#include <string.h>
+
+#include "signal-composer.hpp"
+#include "wrap-json.h"
+
+extern "C"
+{
+CTLP_LUA_REGISTER("builtin");
+
+CTLP_LUA2C (setSignalValueWrap, source, argsJ, responseJ)
+{
+	const char* name = nullptr;
+	double resultNum;
+	uint64_t timestamp;
+
+	struct signalCBT* ctx = (struct signalCBT*)source->context;
+
+	if(! wrap_json_unpack(argsJ, "{ss, sF, sI? !}",
+		"name", &name,
+		"value", &resultNum,
+		"timestamp", &timestamp))
+	{
+		*responseJ = json_object_new_string("Fail to unpack JSON arguments value");
+		return -1;
+	}
+	*responseJ = json_object_new_string(json_object_to_json_string(argsJ));
+
+	struct signalValue result = resultNum;
+
+	if(ctx->aSignal)
+		{ctx->setSignalValue(ctx->aSignal, timestamp*NANO, result);}
+	else
+		{ctx->searchNsetSignalValue(name, timestamp*NANO, result);}
+
+	return 0;
+}
+
+// extern "C" closure
+}
+