1 files changed, 81 insertions, 0 deletions
diff --git a/ufs-utils/dlabel.c b/ufs-utils/dlabel.c
new file mode 100644
index 00000000..dbae0457
--- /dev/null
+++ b/ufs-utils/dlabel.c
@@ -0,0 +1,81 @@
+/* Get the disklabel from a device node
+
+   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 <errno.h>
+#include <hurd.h>
+#include <mach.h>
+#include <string.h>
+#include <device/device.h>
+#include <mach/sa/sys/ioctl.h>	/* Ick */
+#include <device/disk_status.h>
+
+static error_t
+fd_get_device (int fd, device_t *device)
+{
+  error_t err;
+  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 = getdport (fd);
+
+  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)
+    {
+      if (runs_len != 2 || runs[0] != 0 || class != STORAGE_DEVICE)
+	/* This doesn't seem to be a handle on the whole device; be picky.  */
+	err = ENODEV;
+      if (runs_len)
+	vm_deallocate (mach_task_self (), (vm_address_t)runs, runs_len);
+      if (misc_len)
+	vm_deallocate (mach_task_self (), (vm_address_t)misc, misc_len);
+    }
+
+  mach_port_deallocate (mach_task_self (), node);
+
+  return err;
+}
+
+error_t
+fd_get_disklabel (int fd, struct disklabel *label)
+{
+  device_t device;
+  error_t err = fd_get_device (fd, &device);
+
+  if (! err)
+    {
+      mach_msg_type_number_t label_len = sizeof *label / sizeof (integer_t);
+
+      err = device_get_status (device, DIOCGDINFO,
+			       (dev_status_t)label, &label_len);
+      if (!err && label_len != sizeof *label / sizeof (integer_t))
+	err = ERANGE;
+
+      mach_port_deallocate (mach_task_self (), device);
+    }
+
+  return err;
+}