1 files changed, 111 insertions, 0 deletions
diff --git a/defpager/wiring.c b/defpager/wiring.c
new file mode 100644
index 00000000..dda5d9d5
--- /dev/null
+++ b/defpager/wiring.c
@@ -0,0 +1,111 @@
+/* Memory wiring functions for default pager
+   Copyright (C) 1996 Free Software Foundation, Inc.
+   Written by Thomas Bushnell, n/BSG.
+
+   This file is part of the GNU Hurd.
+
+   The GNU Hurd 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 2, or (at
+   your option) any later version.
+
+   The GNU Hurd 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.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
+
+
+/* This file uses the "wrap" feature of GNU ld.  See the GNU ld
+   documentation for more information on how this works.  
+   The list of functions we wrap is specified in Makefile as
+   $(subst-functions). */
+
+
+error_t
+__wrap___syscall_vm_allocate (task_t target_task,
+			      vm_address_t *address,
+			      vm_size_t size,
+			      boolean_t anywhere)
+{
+  error_t err;
+  
+  err = __real___syscall_vm_allocate (target_task, address, size, anywhere);
+  if (!err && target_task == mach_task_self ())
+    wire_segment (*address, size);
+  return err;
+}
+
+error_t
+__wrap___vm_allocate_rpc (task_t target_task,
+			  vm_address_t *address,
+			  vm_size_t size,
+			  boolean_t anywhere)
+{
+  error_t err;
+  
+  err = __real___vm_allocate_rpc (target_task, address, size, anywhere);
+  if (!err && target_task == mach_task_self ())
+    wire_segment (*address, size);
+  return err;
+}
+
+error_t 
+__wrap___syscall_vm_map (mach_port_t target_task,
+			 vm_address_t *address,
+			 vm_size_t size,
+			 vm_address_t mask,
+			 boolean_t anywhere,
+			 mach_port_t memory_object,
+			 vm_offset_t offset,
+			 boolean_t copy,
+			 vm_prot_t cur_protection,
+			 vm_prot_t max_protection,
+			 vm_inherit_t inheritance)
+{
+  error_t err;
+  
+  err = __real___syscall_vm_map (target_task, address, size, mask, anywhere,
+				 memory_object, offset, copy, cur_protection,
+				 max_protection, inheritance);
+  if (!err && target_task == mach_task_self ())
+    wire_segment (*address, size);
+  return err;
+}
+
+
+error_t 
+__wrap___vm_map_rpc (mach_port_t target_task,
+		     vm_address_t *address,
+		     vm_size_t size,
+		     vm_address_t mask,
+		     boolean_t anywhere,
+		     mach_port_t memory_object,
+		     vm_offset_t offset,
+		     boolean_t copy,
+		     vm_prot_t cur_protection,
+		     vm_prot_t max_protection,
+		     vm_inherit_t inheritance)
+{
+  error_t err;
+  
+  err = __real___vm_map_rpc (target_task, address, size, mask, anywhere,
+			     memory_object, offset, copy, cur_protection,
+			     mak_protection, inheritance);
+  if (!err && target_task == mach_task_self ())
+    wire_segment (*address, size);
+  return err;
+}
+
+/* And the non-__ versions too. */
+
+#define weak_alias(name,aliasname) \
+  extern typeof (name) aliasname __attribute__ ((weak, alias (#name)));
+
+weak_alias (__wrap___vm_map_rpc, __wrap_vm_map_rpc)
+weak_alias (__wrap___syscall_vm_map, __wrap_syscall_vm_map)
+weak_alias (__wrap___vm_allocate_rpc, __wrap_vm_allocate_rpc)
+weak_alias (__wrap___syscall_vm_allocate, __wrap_syscall_vm_allocate)