Initial revision

3 files changed, 193 insertions, 0 deletions

diff --git a/libshouldbeinlibc/canon-host.c b/libshouldbeinlibc/canon-host.c
new file mode 100644
index 00000000..ea6c7195
--- /dev/null
+++ b/libshouldbeinlibc/canon-host.c
@@ -0,0 +1,58 @@
+/* Host name canonicalization
+
+   Copyright (C) 1995, 1996 Free Software Foundation, Inc.
+
+   Written by Miles Bader <miles@gnu.ai.mit.edu>
+
+   [This file is from sh-utils/lib; maybe something can be done to share them.]
+
+   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 <unistd.h>
+#include <string.h>
+#include <netdb.h>
+#include <netinet/in.h>
+#include <arpa/inet.h>
+
+/* Returns the canonical hostname associated with HOST (allocated in a static
+   buffer), or 0 if it can't be determined.  */
+char *
+canon_host (char *host)
+{
+  struct hostent *he = gethostbyname (host);
+
+  if (he)
+    {
+      char *addr = 0;
+
+      /* Try and get an ascii version of the numeric host address.  */
+      switch (he->h_addrtype)
+	{
+	case AF_INET:
+	  addr = inet_ntoa (*(struct in_addr *)he->h_addr);
+	  break;
+	}
+
+      if (addr && strcmp (he->h_name, addr) == 0)
+	/* gethostbyname() cheated!  Lookup the host name via the address
+	   this time to get the actual host name.  */
+	he = gethostbyaddr (he->h_addr, he->h_length, he->h_addrtype);
+
+      if (he)
+	return he->h_name;
+    }
+
+  return 0;
+}
diff --git a/libshouldbeinlibc/maptime.c b/libshouldbeinlibc/maptime.c
new file mode 100644
index 00000000..d8cf22f7
--- /dev/null
+++ b/libshouldbeinlibc/maptime.c
@@ -0,0 +1,89 @@
+/* Support for mach's mapped time
+
+   Copyright (C) 1996 Free Software Foundation, Inc.
+
+   Written by Miles Bader <miles@gnu.ai.mit.edu>
+
+   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 <hurd.h>
+#include <mach.h>
+#include <device/device.h>
+
+#include "maptime.h"
+
+/* Return the mach mapped time page in MTIME.  If USE_MACH_DEV is false, then
+   the hurd time device DEV_NAME, or "/dev/time" if DEV_NAME is 0, is
+   used.  If USE_MACH_DEV is true, the mach device DEV_NAME, or "time" if
+   DEV_NAME is 0, is used; this is a privileged operation.  The mapped time
+   may be converted to a struct timeval at any time using maptime_read.  */
+error_t
+maptime_map (int use_mach_dev, char *dev_name,
+	     volatile struct mapped_time_value **mtime)
+{
+  error_t err;
+  device_t device;  
+  mach_port_t mobj;
+
+  if (use_mach_dev)
+    {
+      mach_port_t device_master;
+
+      err = get_privileged_ports (0, &device_master);
+      if (! err)
+	{
+	  err = device_open (device_master, 0, dev_name ?: "time", &device);
+	  mach_port_deallocate (mach_task_self (), device_master);
+	}
+    }
+  else
+    {
+      string_t name;
+      int class, flags = 0;
+      size_t block_size;
+      off_t *runs = 0;
+      char *misc = 0;
+      size_t runs_len = 0, misc_len = 0;
+      file_t node = file_name_lookup (dev_name ?: "/dev/time", 0, 0);
+
+      if (node == MACH_PORT_NULL)
+	return errno;
+
+      err = file_get_storage_info (node, &class, &runs, &runs_len, &block_size,
+				   name, &device, &misc, &misc_len, &flags);
+      if (!err && runs_len)
+	vm_deallocate (mach_task_self (), (vm_address_t)runs, runs_len);
+      if (!err && misc_len)
+	vm_deallocate (mach_task_self (), (vm_address_t)misc, misc_len);
+
+      mach_port_deallocate (mach_task_self (), node);
+    }
+
+  if (err)
+    return err;
+
+  err = device_map (device, VM_PROT_READ, 0, sizeof *mtime, &mobj, 0);
+  if (! err)
+    {
+      err =
+	vm_map (mach_task_self (), (vm_address_t *)mtime, sizeof *mtime, 0, 1,
+		mobj, 0, 0, VM_PROT_READ, VM_PROT_READ, VM_INHERIT_NONE);
+      mach_port_deallocate (mach_task_self (), mobj);
+    }
+
+  mach_port_deallocate (mach_task_self (), device);
+
+  return err;
+}
diff --git a/libshouldbeinlibc/maptime.h b/libshouldbeinlibc/maptime.h
new file mode 100644
index 00000000..244cbcf1
--- /dev/null
+++ b/libshouldbeinlibc/maptime.h
@@ -0,0 +1,46 @@
+/* Support for mach's mapped time
+
+   Copyright (C) 1996 Free Software Foundation, Inc.
+
+   Written by Miles Bader <miles@gnu.ai.mit.edu>
+
+   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. */
+
+#ifndef __MAPTIME_H__
+#define __MAPTIME_H__
+
+#include <mach/time_value.h>
+
+/* Return the mach mapped time page in MTIME.  If USE_MACH_DEV is false, then
+   the hurd uptime device DEV_NAME, or "/dev/uptime" if DEV_NAME is 0, is
+   used.  If USE_MACH_DEV is true, the mach device DEV_NAME, or "time" if
+   DEV_NAME is 0, is used; this is a privileged operation.  The mapped uptime
+   may be converted to a struct timeval at any time using read_uptime.  */
+error_t maptime_map (int use_mach_dev, char *dev_name,
+		     volatile struct mapped_time_value **mtime);
+
+/* Read the current time from MTIME into TV.  This should be very fast.  */
+static inline void
+maptime_read (volatile struct mapped_time_value *mtime, struct timeval *tv)
+{
+  do
+    {
+      tv->tv_sec = mtime->seconds;
+      tv->tv_usec = mtime->microseconds;
+    }
+  while (tv->tv_sec != mtime->check_seconds);
+}
+
+#endif /* __MAPTIME_H__ */