From edb22c72e50d0ccf518173d54b8721ee6b1c7c3f Mon Sep 17 00:00:00 2001
From: Nico Schottelius <nico@denkbrett.schottelius.org>
Date: Thu, 24 Jul 2008 11:37:33 +0200
Subject: [PATCH] display memory map

Signed-off-by: Nico Schottelius <nico@denkbrett.schottelius.org>
---
 tux-memory-map.sh | 56 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 56 insertions(+)
 create mode 100755 tux-memory-map.sh

diff --git a/tux-memory-map.sh b/tux-memory-map.sh
new file mode 100755
index 0000000..accf3c2
--- /dev/null
+++ b/tux-memory-map.sh
@@ -0,0 +1,56 @@
+#!/bin/sh
+
+pid=$$
+
+file=/proc/$pid/maps
+
+awk '
+      function todec(str)
+      {
+         hstr = "1234567890abdcef";
+         res  = 0;
+         n    = split(str, digit, "");
+
+         for(i=1; i<=n; i++) {
+            num = index(hstr, digit[i])-1;
+            res = res + (num*16^(n-i));
+         }
+         return res;
+      }
+      # hex numbers are big, do substract of small numbers!
+      function hexsub(a, b)
+      {
+         hstr = "0123456789abdcef";
+         an = split(a, aa, "");
+         bn = split(b, ba, "");
+
+         max = an > bn ? an : bn;
+         i = 1;
+         res = 0;
+
+         while(i <= max) {
+            if(an < i) aa[i] = 0;
+            else if(bn < i) ba[i] = 0;
+
+            da = index(hstr, aa[i]) -1;
+            db = index(hstr, ba[i]) -1;
+
+            diff = (da - db) * 16^i;
+            res = res + diff;
+         }
+      }
+
+   {
+      memory=$1;
+      file=$6;
+      ele = split(memory, memreg, "-");
+      start =memreg[1];
+      end  = memreg[2];
+      start_dec = todec(start);
+      end_dec   = todec(end);
+      len  = end_dec - start_dec;
+
+      print len "\t" start_dec " " end_dec " "  memory ": " file
+   }
+   ' < "$file"
+   #' < "$file" | sort -g