1 files changed, 106 insertions, 0 deletions
diff --git a/libgupc/portals4/gupcr_node_mem_posix.c b/libgupc/portals4/gupcr_node_mem_posix.c
new file mode 100644
index 00000000000..704107d980c
--- /dev/null
+++ b/libgupc/portals4/gupcr_node_mem_posix.c
@@ -0,0 +1,106 @@
+/* Copyright (C) 2012-2016 Free Software Foundation, Inc.
+   This file is part of the UPC runtime Library.
+   Written by Gary Funck <gary@intrepid.com>
+   and Nenad Vukicevic <nenad@intrepid.com>
+
+This file is part of GCC.
+
+GCC is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 3, or (at your option)
+any later version.
+
+GCC is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+/**
+ * @file gupcr_node_mem_posix.c
+ * GUPC Node Local Memory - POSIX Shared Memory.
+ */
+
+/**
+ * @addtogroup NODE GUPCR Node Local Memory
+ * @{
+ */
+
+#include <stdio.h>
+#include <sys/time.h>
+#include "gupcr_config.h"
+#include "gupcr_defs.h"
+#include "gupcr_utils.h"
+#include "gupcr_portals.h"
+#include "gupcr_runtime.h"
+#include "gupcr_node.h"
+
+/** Thread's node local memory shared space.  */
+static char gupcr_thread_local_name[FILENAME_MAX];
+
+/**
+ * Map specified thread's shared memory into the current
+ * thread's memory.
+ *
+ * @param [in] thread Thread ID
+ * @param [in] size Shared object size
+ * @retval Memory address.
+ */
+char *
+gupcr_mem_local_map (int thread, size_t size)
+{
+  int fd;
+  char fname[FILENAME_MAX];
+  char *maddr;
+  /* Create shared object name.  */
+  gupcr_unique_local_name (fname, GUPCR_LOCAL_NAME_PREFIX, thread, 0);
+  if (thread == MYTHREAD)
+    {
+      strcpy (gupcr_thread_local_name, fname);
+      gupcr_log (FC_MEM, "node local memory shared object: %s", fname);
+    }
+  fd = shm_open (fname, O_RDWR | O_CREAT, S_IRUSR | S_IWUSR);
+  if (fd < 0)
+    gupcr_fatal_error ("cannot create POSIX shared object %s", fname);
+  if (ftruncate (fd, size))
+    gupcr_fatal_error ("cannot resize POSIX shared object %s 0x%lx",
+		       fname, (long unsigned) size);
+  maddr = mmap (NULL, size, PROT_READ | PROT_WRITE,
+		MAP_SHARED, fd, OFFSET_ZERO);
+  if (!maddr || maddr == MAP_ERROR)
+    gupcr_fatal_error ("cannot map POSIX shared object: 0x%lx bytes of %s",
+		       (long unsigned) size, fname);
+  return maddr;
+}
+
+/**
+ * Remove the file used for the shared object.
+ *
+ * On Unix systems, this removes the file name, but since
+ * the file is open, the underlying file storage will remain
+ * until the program terminates.
+ */
+void
+gupcr_mem_local_unlink (void)
+{
+  shm_unlink (gupcr_thread_local_name);
+}
+
+/**
+ * Initialize the POSIX shared node local memory support.
+ */
+void
+gupcr_mem_local_init (void)
+{
+  gupcr_log (FC_MEM, "Using node local POSIX shared memory");
+}
+
+/** @} */