Implemented mmap_file().

diff --git a/lib/lib.h b/lib/lib.h
index e0613eddf1733376c9de66985167d852077d9fcc..e6ffb2b6cc1be5dd1b9492a7e3664c21f3ade25e 100644 (file)
--- a/lib/lib.h
+++ b/lib/lib.h
@@ -162,4 +162,8 @@ void scan_obj_tree(byte *, void (*)(ulg, byte *));
 
 uns random_max(uns);
 
+/* mmap.c */
+
+void *mmap_file(byte *name, unsigned *len);
+
 #endif

diff --git a/lib/mmap.c b/lib/mmap.c
new file mode 100644 (file)
index 0000000..4714731
--- /dev/null
+++ b/lib/mmap.c
@@ -0,0 +1,36 @@
+/*
+ *     Sherlock Library -- Mapping of Files
+ *
+ *     (c) 1999 Martin Mares, <mj@atrey.karlin.mff.cuni.cz>
+ */
+
+#include <stdio.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <sys/stat.h>
+#include <sys/mman.h>
+
+#include "lib.h"
+
+void *
+mmap_file(byte *name, unsigned *len)
+{
+  int fd = open(name, O_RDONLY);
+  struct stat st;
+  void *x;
+
+  if (fd < 0)
+    return NULL;
+  if (fstat(fd, &st) < 0)
+    x = NULL;
+  else
+    {
+      if (len)
+       *len = st.st_size;
+      x = mmap(NULL, st.st_size, PROT_READ, MAP_SHARED, fd, 0);
+      if (x == MAP_FAILED)
+       x = NULL;
+    }
+  close(fd);
+  return x;
+}