Move the DIS benchmarks up a directory and update hardcoded paths

Note that this repo does not attempt to keep a copy of the original
DIS benchmark distributions. UNC real-time has another repo for that.

2 files changed, 321 insertions, 0 deletions

diff --git a/dis/Transitive/DISstressmarkRNG.h b/dis/Transitive/DISstressmarkRNG.h
new file mode 100644
index 0000000..4aa2620
--- /dev/null
+++ b/dis/Transitive/DISstressmarkRNG.h
@@ -0,0 +1,190 @@
+#include <math.h>
+
+#define IA 16807
+#define IM 2147483647
+#define AM (1.0/IM)
+#define IQ 127773
+#define IR 2836
+#define NTAB 32
+#define NDIV (1+(IM-1)/NTAB)
+#define EPS 1.2e-7
+#define RNMX (1.0-EPS)
+
+static long iy=0;
+static long iv[NTAB];
+static long iseed;
+
+int ABS(int x){
+  if (x>= 0) return x;
+  else
+    return (-x);
+}
+
+int sign(int x){
+  if (x >= 0) return 1;
+  else
+    return (-1);
+}
+
+int MAX(int x, int y){
+  if (x>= y) return x;
+  else
+    return y;
+}
+
+int MIN(int x, int y){
+  if (x<= y) return x;
+  else
+    return y;
+}
+
+void randInit(long idum)
+{
+  long j;
+  long k;
+
+  assert (idum <= 0);
+  assert (iy == 0);
+
+  iseed = idum;
+  if (-(iseed)<1){
+    iseed = 1;
+  }
+  else {
+    iseed = -(iseed);
+  }
+  for (j=NTAB+7; j>=0; j--){
+    k = (iseed)/IQ;
+    iseed = IA*(iseed-k*IQ)-IR*k;
+    if (iseed < 0){
+      iseed += IM;
+    }
+    if (j < NTAB){
+      iv[j] = iseed;
+    }
+  }
+  iy = iv[0];
+}
+
+float randNum()
+{
+  long j;
+  long k;
+  float temp;
+
+  assert (iy != 0);
+  
+  k = (iseed)/IQ;
+  iseed = IA*(iseed-k*IQ)-IR*k;
+
+  if (iseed < 0){
+    iseed += IM;
+  }
+  j = iy/NDIV; 
+  iy = iv[j];
+  iv[j] = iseed;
+
+  temp = AM * iy;
+
+  if (temp > RNMX){
+    return RNMX;
+  }
+  else {
+    return temp;
+  }
+}
+
+
+float randomFloat(float lowest_float, float highest_float)
+{
+ float value;
+ float range;
+
+assert (lowest_float < highest_float);
+
+range = highest_float - lowest_float;
+value = randNum()*(highest_float - lowest_float) + lowest_float;
+assert(value >= lowest_float);
+assert(value <= highest_float);
+
+return value;
+
+}
+
+float randomNonZeroFloat(float lowest_float, float highest_float, float epsilon)
+{
+
+  double range;
+  float value;
+
+
+  assert (lowest_float < 0);
+  assert (highest_float > 0);
+  assert (epsilon > 0);
+  assert ((epsilon < -lowest_float) && (epsilon < highest_float));
+  
+  range = highest_float - lowest_float;
+  value = (randNum() * range)+lowest_float;
+  
+  if (ABS(value) < epsilon) 
+    {
+      if (value > 0) value = value + epsilon;
+      else if (value < 0) value = value - epsilon;
+      
+    }
+
+  assert (value >= lowest_float);
+  assert (value <= highest_float);
+
+  return value;
+}
+
+unsigned int randomUInt(int lowest_uint, int highest_uint)
+{
+  float range;
+  unsigned int value;
+  float temp;
+
+  range =(float)(highest_uint - lowest_uint + 1);
+  temp = randNum();
+  value =(unsigned int)( floor(temp * range) + lowest_uint); 
+
+  assert (value >= lowest_uint);
+  assert (value <= highest_uint);
+
+  return value;
+}
+
+unsigned int randomNonZeroUInt(int lowest_uint, int highest_uint)
+{
+  float range;
+  unsigned int value;
+  float temp;
+
+  range =(float)(highest_uint - lowest_uint + 1);
+  value = 0;
+  while(value == 0){
+  temp = randNum();
+
+  value =(unsigned int)( floor(temp * range) + lowest_uint); 
+  }
+  
+  assert (value >= lowest_uint);
+  assert (value <= highest_uint);
+
+  return value;
+}
+
+int randInt(int lowest_uint,  int highest_uint)
+{
+  float range;
+  int value;
+  
+  range = highest_uint - lowest_uint + 1;
+  value = (int)(floor(randNum() * range) + lowest_uint);
+  
+  assert (value >= lowest_uint);
+  assert (value <= highest_uint);
+
+  return value;
+}                            
diff --git a/dis/Transitive/transitive.c b/dis/Transitive/transitive.c
new file mode 100644
index 0000000..5fa52e8
--- /dev/null
+++ b/dis/Transitive/transitive.c
@@ -0,0 +1,131 @@
+/*
+ *  Sample code for the DIS Transitive Stressmark
+ *
+ * This source code is the completely correct source code based on 
+ * the example codes provided by Atlantic Aerospace Division, Titan 
+ * Systems Corporation, 2000.
+ * 
+ * If you just compile and generate the executables from this source 
+ * code, this code would be enough. However, if you wish to get a complete 
+ * understanding of this stressmark, it is strongly suggested that you
+ * read the Benchmark Analysis and Specifications Document Version 1.0
+ * before going on since the detailed comments are given in this documents.
+ * the comments are not repeated here.
+ *
+ * CHANGELOG:
+ * Joshua Bakita, 05/30/2020: Fixed out-of-bounds randInt call
+ */
+
+#include <stdio.h>
+#include <time.h>
+#include <assert.h>
+#include <stdlib.h>
+#include "DISstressmarkRNG.h"
+#include "extra.h"
+
+#define MIN_VERTICES 8
+#define MAX_VERTICES 16384
+#define MIN_EDGES 0
+#define MAX_EDGES 268435456
+#define MIN_SEED -2147483647
+#define MAX_SEED -1
+#define NO_PATH 2147483647
+
+#define MIN_EDGS 0
+#define MAX_EDGE 255
+
+/* 
+ * main()
+ */
+
+int main(int argc, char** argv){
+  unsigned int *din, *dout;
+  unsigned int n;
+  unsigned int m;
+  unsigned int i, j, k;
+  int seed;
+
+  time_t startTime;
+  unsigned int sum;
+   
+  fscanf(stdin,"%d %d %d", &n, &m, &seed);
+
+  assert((n >= MIN_VERTICES) && (n <= MAX_VERTICES));
+  assert((m >= MIN_EDGES) && (m <= MAX_EDGES));
+  assert (m <= n*n);
+  assert ((seed >= MIN_SEED) && (seed <= MAX_SEED));
+
+ if ((din = (unsigned int *)malloc(n*n*sizeof(unsigned int))) == NULL)
+    return (-1);
+ if ((dout = (unsigned int *)malloc(n*n*sizeof(unsigned int))) == NULL)
+    return (-1);
+
+ for (i=0; i<n*n; i++){
+   *(din + i) = NO_PATH;
+   *(dout + i) = NO_PATH;
+ }
+
+  randInit(seed);
+  for (k=0; k<m; k++){
+    i = randInt(0, n-1);
+    j = randInt(0, n-1);
+    *(din + j*n + i) = randInt(MIN_EDGES, MAX_EDGES);
+  }
+  
+  SET_UP
+  startTime = time(NULL);
+
+  for (k=0; k<n; k++){
+  unsigned int old;
+  unsigned int new1;
+  unsigned int *dtemp;
+    START_LOOP
+    
+    for (i=0; i<n; i++){
+      for (j=0; j<n; j++){
+        old = *(din + j*n + i);
+        new1 = *(din + j*n + k) + *(din + k*n + i);
+        *(dout + j*n + i) = (new1 < old ? new1: old);
+        assert (*(dout + j*n + i) <= NO_PATH);
+        assert (*(dout + j*n + i) <= *(din + j*n + i));
+      }
+    }
+      dtemp = dout;
+      dout = din;
+      din = dtemp;
+      STOP_LOOP
+    }
+
+    startTime = time(NULL) - startTime;
+    
+    for (j=0; j<n; j++){
+      sum = 0;
+      for (i=0; i<n; i++){
+        if (*(din + j*n + i) != NO_PATH)
+          sum += *(din + j*n + i);
+      }
+    fprintf(stdout, "%u\n", sum);
+    }
+    for (i=0; i<n; i++){
+      sum = 0;
+      for (j=0; j<n; j++){
+        if (*(din + j*n + i) != NO_PATH)
+            sum += *(din+j*n+i);
+      }
+      
+      fprintf(stdout, "%u\n", sum);
+    }
+
+    fprintf(stdout, " total time = %u seconds. \n", (unsigned int)startTime);
+    free(din);
+    free(dout);
+    WRITE_TO_FILE
+    return(0);
+  }
+    
+
+        
+
+    
+ 
+