From 6ebf9b5ac7803f146ac40261fa7f0756046acf12 Mon Sep 17 00:00:00 2001
From: Matthias Jung <jungma@eit.uni-kl.de>
Date: Tue, 20 Jun 2017 00:34:42 +0200
Subject: [PATCH] added a script for generating the memory hog traces

---
 .../simulator/resources/scripts/memoryHog.pl  | 21 +++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 DRAMSys/simulator/resources/scripts/memoryHog.pl

diff --git a/DRAMSys/simulator/resources/scripts/memoryHog.pl b/DRAMSys/simulator/resources/scripts/memoryHog.pl
new file mode 100644
index 00000000..29e68597
--- /dev/null
+++ b/DRAMSys/simulator/resources/scripts/memoryHog.pl
@@ -0,0 +1,21 @@
+#!/usr/bin/perl -w
+use warnings;
+use strict;
+
+open(LINEAR, "> ../traces/linear.stl");
+open(RANDOM, "> ../traces/random.stl");
+
+my $length = shift || die ("please give length of traces");
+my $size = 0x40;
+
+for(my $i=0; $i < $length; $i++)
+{
+    my $r = int(rand($length));
+    #print $r." ".($size*$r)."\n";
+    print LINEAR "$i: read ".sprintf("0x%x",($size*$i))."\n";
+    print RANDOM "$i: read ".sprintf("0x%x",($size*$r))."\n";
+}
+
+
+close(LINEAR);
+close(RANDOM);