1 files changed, 133 insertions, 0 deletions
diff --git a/libpager/object-terminate.c b/libpager/object-terminate.c
new file mode 100644
index 00000000..4315cbbb
--- /dev/null
+++ b/libpager/object-terminate.c
@@ -0,0 +1,133 @@
+/* Implementation of memory_object_terminate for pager library
+   Copyright (C) 1994, 1995, 1996, 1999 Free Software Foundation
+
+   This program 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.
+
+   This program 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. */
+
+#include "priv.h"
+#include "memory_object_S.h"
+#include <stdio.h>
+
+/* Implement the object termination call from the kernel as described
+   in <mach/memory_object.defs>. */
+kern_return_t
+_pager_seqnos_memory_object_terminate (mach_port_t object, 
+				       mach_port_seqno_t seqno,
+				       mach_port_t control,
+				       mach_port_t name)
+{
+  struct pager *p;
+  
+  p = ports_lookup_port (0, object, _pager_class);
+  if (!p)
+    return EOPNOTSUPP;
+
+  mutex_lock (&p->interlock);
+  _pager_wait_for_seqno (p, seqno);
+  
+  if (control != p->memobjcntl)
+    {
+      printf ("incg terminate: wrong control port");
+      goto out;
+    }
+  if (name != p->memobjname)
+    {
+      printf ("incg terminate: wrong name port");
+      goto out;
+    }
+
+  while (p->noterm)
+    {
+      p->termwaiting = 1;
+      condition_wait (&p->wakeup, &p->interlock);
+    }
+
+  /* Destry the ports we received; mark that in P so that it doesn't bother
+     doing it again. */
+  mach_port_destroy (mach_task_self (), control);
+  mach_port_destroy (mach_task_self (), name);
+  p->memobjcntl = p->memobjname = MACH_PORT_NULL;
+
+  _pager_free_structure (p);
+
+#ifdef KERNEL_INIT_RACE
+  if (p->init_head)
+    {
+      struct pending_init *i = p->init_head;
+      p->init_head = i->next;
+      if (!i->next)
+	p->init_tail = 0;
+      p->memobjcntl = i->control;
+      p->memobjname = i->name;
+      memory_object_ready (i->control, p->may_cache, p->copy_strategy);
+      p->pager_state = NORMAL;
+      free (i);
+    }
+#endif
+
+ out:
+  _pager_release_seqno (p, seqno);
+  mutex_unlock (&p->interlock);
+  ports_port_deref (p);
+
+  return 0;
+}
+
+/* Shared code for termination from memory_object_terminate and
+   no-senders.  The pager must be locked.  This routine will
+   deallocate all the ports and memory that pager P references.  */
+void
+_pager_free_structure (struct pager *p)
+{
+  int wakeup;
+  struct lock_request *lr;
+  struct attribute_request *ar;
+
+  wakeup = 0;
+  for (lr = p->lock_requests; lr; lr = lr->next)
+    {
+      lr->locks_pending = 0;
+      if (!lr->pending_writes)
+	wakeup = 1;
+    }
+  for (ar = p->attribute_requests; ar; ar = ar->next)
+    {
+      ar->attrs_pending = 0;
+      wakeup = 1;
+    }
+
+  if (wakeup)
+    condition_broadcast (&p->wakeup);
+
+  if (p->memobjcntl != MACH_PORT_NULL)
+    {
+      mach_port_deallocate (mach_task_self (), p->memobjcntl);
+      p->memobjcntl = MACH_PORT_NULL;
+    }
+  if (p->memobjname != MACH_PORT_NULL)
+    {
+      mach_port_deallocate (mach_task_self (), p->memobjname);
+      p->memobjname = MACH_PORT_NULL;
+    }
+
+  /* Free the pagemap */
+  if (p->pagemapsize)
+    {
+      munmap (p->pagemap, p->pagemapsize);
+      p->pagemapsize = 0;
+      p->pagemap = 0;
+    }
+  
+  p->pager_state = NOTINIT;
+}