From d17b33131c14864bd1eae275f49a3f148e21cf29 Mon Sep 17 00:00:00 2001
From: Leo Chan <leochanj@live.unc.edu>
Date: Thu, 22 Oct 2020 01:53:21 -0400
Subject: Squashed commit of the sb-vbs branch.

Includes the SD-VBS benchmarks modified to:
- Use libextra to loop as realtime jobs
- Preallocate memory before starting their main computation
- Accept input via stdin instead of via argc

Does not include the SD-VBS matlab code.

Fixes libextra execution in LITMUS^RT.
---
 SD-VBS/common/c/randnWrapper.c | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 SD-VBS/common/c/randnWrapper.c

(limited to 'SD-VBS/common/c/randnWrapper.c')

diff --git a/SD-VBS/common/c/randnWrapper.c b/SD-VBS/common/c/randnWrapper.c
new file mode 100644
index 0000000..4701b0e
--- /dev/null
+++ b/SD-VBS/common/c/randnWrapper.c
@@ -0,0 +1,40 @@
+/********************************
+Author: Sravanthi Kota Venkata
+********************************/
+
+#include "sdvbs_common.h"
+#include <math.h>
+F2D* randnWrapper(int m, int n)
+{
+    F2D *out;
+    float seed;
+    int i,j;
+
+    out = fSetArray(m, n, 0);
+    seed = 0.9;
+
+    for(i=0; i<m; i++)
+    {
+        for(j=0; j<n; j++)
+        {
+            if(i<j)
+                subsref(out,i,j) = seed * ((i+1.0)/(j+1.0));
+            else
+                subsref(out,i,j) = seed * ((j+1.0)/(i+1.0));
+        }
+    }
+
+    for(i=0; i<m ;i++)
+    {
+        for(j=0; j<n; j++)
+        {
+            float w;
+            w = subsref(out,i,j);
+            w = ((-2.0 * log(w))/w);
+            subsref(out,i,j) = w;
+        }
+    }
+
+    return out;
+}
+
-- 
cgit v1.2.2