From: Steve Chamberlain <sac@cygnus>
Date: Wed, 9 Jun 1993 00:52:13 +0000 (+0000)
Subject: (read_memory_unsigned_integer): New function.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=86a5593e9ca49ebe907da6371ec90e95377cd45f;p=binutils-gdb.git

(read_memory_unsigned_integer): New function.
---

diff --git a/gdb/core.c b/gdb/core.c
index 21aa76b48b8..51ffb420211 100644
--- a/gdb/core.c
+++ b/gdb/core.c
@@ -244,6 +244,44 @@ read_memory_integer (memaddr, len)
   error ("Cannot handle integers of %d bytes.", len);
   return -1;	/* for lint */
 }
+
+
+unsigned long
+read_memory_unsigned_integer (memaddr, len)
+     CORE_ADDR memaddr;
+     int len;
+{
+  unsigned char cbuf;
+  unsigned short sbuf;
+  unsigned int ibuf;
+  unsigned long lbuf;
+
+  if (len == sizeof (char))
+    {
+      read_memory (memaddr, &cbuf, len);
+      return cbuf;
+    }
+  if (len == sizeof (short))
+    {
+      read_memory (memaddr, (char *)&sbuf, len);
+      SWAP_TARGET_AND_HOST (&sbuf, sizeof (short));
+      return sbuf;
+    }
+  if (len == sizeof (int))
+    {
+      read_memory (memaddr, (char *)&ibuf, len);
+      SWAP_TARGET_AND_HOST (&ibuf, sizeof (int));
+      return ibuf;
+    }
+  if (len == sizeof (lbuf))
+    {
+      read_memory (memaddr, (char *)&lbuf, len);
+      SWAP_TARGET_AND_HOST (&lbuf, sizeof (lbuf));
+      return lbuf;
+    }
+  error ("Cannot handle unsigned integers of %d bytes.", len);
+  return -1;	/* for lint */
+}
 
 void
 _initialize_core()