3 files changed, 104 insertions, 0 deletions
diff --git a/Makefile b/Makefile
new file mode 100644
index 0000000..c8484f9
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,14 @@
+CC=gcc
+CFLAGS = -c -Wall -I/usr/local/include -I/usr/local/include -DBROCCOLI 
+LDFLAGS =  -L/usr/local/lib -lbroccoli
+
+all: pasad
+
+pasad: pasad.o
+	$(CC) pasad.o -o pasad $(LDFLAGS) 
+
+pasad.o: pasad.c
+	$(CC) $(CFLAGS) pasad.c
+
+clean:
+	rm *.o pasad
diff --git a/pasad.c b/pasad.c
new file mode 100644
index 0000000..f75a336
--- /dev/null
+++ b/pasad.c
@@ -0,0 +1,64 @@
+#ifdef BROCCOLI
+#include <broccoli.h>
+#endif
+
+char *host_default = "127.0.0.1";
+char *port_default = "47760";
+
+    static void
+bro_pasad_response(BroConn *conn, void *data, uint64* registers, uint64* uid)
+{
+    printf("Received value %"PRIu64" from uid=%"PRIu64"\n",*registers,*uid);
+
+    conn = NULL;
+    data = NULL;
+}
+
+    int
+main(int argc, char **argv)
+{
+    BroConn *bc;
+    char hostname[512];
+    int fd = -1;
+
+    bro_init(NULL);
+
+    bro_debug_calltrace = 0;
+    bro_debug_messages  = 0;
+
+    snprintf(hostname, 512, "%s:%s", host_default, port_default);
+
+    if (! (bc = bro_conn_new_str(hostname, BRO_CFLAG_RECONNECT | BRO_CFLAG_ALWAYS_QUEUE)))
+    {
+        printf("Could not get Bro connection handle.\n");
+        exit(-1);
+    }
+    bro_event_registry_add(bc, "response",(BroEventFunc) bro_pasad_response, NULL);
+
+    if (! bro_conn_connect(bc))
+    {
+        printf("Could not connect to Bro at %s:%s.\n", host_default,
+                port_default);
+        exit(-1);
+    }
+
+    fd = bro_conn_get_fd(bc);
+    fd_set rfds;
+    setbuf(stdout,NULL);
+
+    while(1)
+    {
+        FD_ZERO(&rfds);
+        FD_SET(fd,&rfds);
+        if(select(fd+1,&rfds,NULL,NULL,NULL) == -1){
+            perror("select()");
+            break;
+        }
+
+        bro_conn_process_input(bc);
+    }
+
+    bro_conn_delete(bc);
+
+    return 0;
+}
diff --git a/pasad_bro.bro b/pasad_bro.bro
new file mode 100644
index 0000000..c324856
--- /dev/null
+++ b/pasad_bro.bro
@@ -0,0 +1,26 @@
+@load frameworks/communication/listen
+module Pasad;
+
+redef Communication::listen_port = 47760/tcp;
+
+redef Communication::listen_ssl = F;
+
+global response: event(register: count, uid: count);
+
+redef Communication::nodes += {
+	["pasad"] = [$host = 127.0.0.1, $events = /pasad/, $connect=F, $ssl=F]
+};
+
+event modbus_read_holding_registers_request(c: connection, headers: ModbusHeaders, start_adress: count, quantity: count)
+
+{
+    print fmt("Request: %d", quantity);
+}
+
+event modbus_read_holding_registers_response(c: connection, headers: ModbusHeaders, registers: ModbusRegisters)
+
+{
+    print fmt("Response: %d", registers[0]);
+    event response(registers[0],headers$uid);
+}
+