dol: initial dol commit
[jump.git] / dol / examples / example1 / src / square.c
diff --git a/dol/examples/example1/src/square.c b/dol/examples/example1/src/square.c
new file mode 100644 (file)
index 0000000..126378b
--- /dev/null
@@ -0,0 +1,27 @@
+#include <stdio.h>
+
+#include "square.h"
+
+void square_init(DOLProcess *p) {
+    p->local->index = 0;
+    p->local->len = LENGTH;
+}
+
+int square_fire(DOLProcess *p) {
+    float i;
+
+    if (p->local->index < p->local->len) {
+        DOL_read((void*)PORT_IN, &i, sizeof(float), p);
+        i = i*i;
+        DOL_write((void*)PORT_OUT, &i, sizeof(float), p);
+        p->local->index++;
+    }
+
+    if (p->local->index >= p->local->len) {
+        DOL_detach(p);
+        return -1;
+    }
+
+    return 0;
+}
+