This commit was manufactured by cvs2svn to create tag 'ZZ-cygwin_daemon_merge-new_HEAD

-cygwin_daemon_merge-new_HEAD'.

Sprout from cygwin_daemon 2002-01-02 00:06:36 UTC cvs2svn 'This commit was manufactured by cvs2svn to create branch 'cygwin_daemon'.'
Cherrypick from cygwin_daemon 2002-02-25 17:47:52 UTC cvs2svn 'This commit was manufactured by cvs2svn to create branch 'cygwin_daemon'.':
    winsup/cygwin/how-spawn-works.txt
    winsup/cygwin/wsock_event.h
Cherrypick from cygwin_daemon 2002-06-06 15:35:10 UTC cvs2svn 'This commit was manufactured by cvs2svn to create branch 'cygwin_daemon'.':
    winsup/cygwin/include/netinet/udp.h
    winsup/cygwin/stackdump.sgml
Cherrypick from cygwin_daemon 2002-01-17 10:39:38 UTC cvs2svn 'This commit was manufactured by cvs2svn to create branch 'cygwin_daemon'.':
    winsup/cygwin/libc/fnmatch.c
Cherrypick from cygwin_daemon 2002-07-03 20:31:40 UTC cvs2svn 'This commit was manufactured by cvs2svn to create branch 'cygwin_daemon'.':
    winsup/cygwin/include/sys/statfs.h
Cherrypick from cygwin_daemon 2002-09-04 15:17:25 UTC cvs2svn 'This commit was manufactured by cvs2svn to create branch 'cygwin_daemon'.':
    winsup/cygwin/how-autoload-works.txt
Cherrypick from master 2002-09-22 12:04:15 UTC Conrad Scott <conrad.scott@dsl.pipex.com> '2002-09-22  Conrad Scott  <conrad.scott@dsl.pipex.com>':
    winsup/cygserver/threaded_queue.cc
    winsup/cygserver/woutsup.h
    winsup/cygwin/CYGWIN_LICENSE
    winsup/cygwin/ChangeLog
    winsup/cygwin/ChangeLog-1998
    winsup/cygwin/ChangeLog-1999
    winsup/cygwin/ChangeLog-2000
    winsup/cygwin/Makefile.in
    winsup/cygwin/assert.cc
    winsup/cygwin/autoload.cc
    winsup/cygwin/child_info.h
    winsup/cygwin/configure
    winsup/cygwin/configure.in
    winsup/cygwin/cygerrno.h
    winsup/cygwin/cygheap.cc
    winsup/cygwin/cygheap.h
    winsup/cygwin/cygmagic
    winsup/cygwin/cygmalloc.h
    winsup/cygwin/cygrun.c
    winsup/cygwin/cygserver.cc
    winsup/cygwin/cygserver_client.cc
    winsup/cygwin/cygserver_ipc.h
    winsup/cygwin/cygserver_process.cc
    winsup/cygwin/cygserver_shm.cc
    winsup/cygwin/cygserver_shm.h
    winsup/cygwin/cygserver_transport.cc
    winsup/cygwin/cygserver_transport_pipes.cc
    winsup/cygwin/cygserver_transport_sockets.cc
    winsup/cygwin/cygthread.cc
    winsup/cygwin/cygthread.h
    winsup/cygwin/cygwin.din
    winsup/cygwin/cygwin.sc
    winsup/cygwin/dcrt0.cc
    winsup/cygwin/debug.cc
    winsup/cygwin/debug.h
    winsup/cygwin/dir.cc
    winsup/cygwin/dlfcn.cc
    winsup/cygwin/dll_init.cc
    winsup/cygwin/dll_init.h
    winsup/cygwin/dlmalloc.c
    winsup/cygwin/dtable.cc
    winsup/cygwin/dtable.h
    winsup/cygwin/environ.cc
    winsup/cygwin/environ.h
    winsup/cygwin/errno.cc
    winsup/cygwin/exceptions.cc
    winsup/cygwin/exec.cc
    winsup/cygwin/external.cc
    winsup/cygwin/fcntl.cc
    winsup/cygwin/fhandler.cc
    winsup/cygwin/fhandler.h
    winsup/cygwin/fhandler_clipboard.cc
    winsup/cygwin/fhandler_console.cc
    winsup/cygwin/fhandler_disk_file.cc
    winsup/cygwin/fhandler_dsp.cc
    winsup/cygwin/fhandler_floppy.cc
    winsup/cygwin/fhandler_mem.cc
    winsup/cygwin/fhandler_proc.cc
    winsup/cygwin/fhandler_process.cc
    winsup/cygwin/fhandler_random.cc
    winsup/cygwin/fhandler_raw.cc
    winsup/cygwin/fhandler_registry.cc
    winsup/cygwin/fhandler_serial.cc
    winsup/cygwin/fhandler_socket.cc
    winsup/cygwin/fhandler_tape.cc
    winsup/cygwin/fhandler_termios.cc
    winsup/cygwin/fhandler_tty.cc
    winsup/cygwin/fhandler_virtual.cc
    winsup/cygwin/fhandler_windows.cc
    winsup/cygwin/fhandler_zero.cc
    winsup/cygwin/fork.cc
    winsup/cygwin/glob.c
    winsup/cygwin/gmon.c
    winsup/cygwin/grp.cc
    winsup/cygwin/heap.cc
    winsup/cygwin/heap.h
    winsup/cygwin/hires.h
    winsup/cygwin/how-cygheap-works.txt
    winsup/cygwin/how-fhandlers-work.txt
    winsup/cygwin/how-signals-work.txt
    winsup/cygwin/how-to-debug-cygwin.txt
    winsup/cygwin/include/cygwin/acl.h
    winsup/cygwin/include/cygwin/cygserver.h
    winsup/cygwin/include/cygwin/cygserver_process.h
    winsup/cygwin/include/cygwin/cygserver_transport.h
    winsup/cygwin/include/cygwin/cygserver_transport_pipes.h
    winsup/cygwin/include/cygwin/cygserver_transport_sockets.h
    winsup/cygwin/include/cygwin/grp.h
    winsup/cygwin/include/cygwin/if.h
    winsup/cygwin/include/cygwin/ipc.h
    winsup/cygwin/include/cygwin/msg.h
    winsup/cygwin/include/cygwin/mtio.h
    winsup/cygwin/include/cygwin/sem.h
    winsup/cygwin/include/cygwin/shm.h
    winsup/cygwin/include/cygwin/socket.h
    winsup/cygwin/include/cygwin/stat.h
    winsup/cygwin/include/cygwin/types.h
    winsup/cygwin/include/cygwin/version.h
    winsup/cygwin/include/fnmatch.h
    winsup/cygwin/include/getopt.h
    winsup/cygwin/include/glob.h
    winsup/cygwin/include/limits.h
    winsup/cygwin/include/netdb.h
    winsup/cygwin/include/netinet/ip.h
    winsup/cygwin/include/netinet/tcp.h
    winsup/cygwin/include/pthread.h
    winsup/cygwin/include/sys/cygwin.h
    winsup/cygwin/include/sys/ioctl.h
    winsup/cygwin/include/sys/mount.h
    winsup/cygwin/include/sys/resource.h
    winsup/cygwin/include/sys/socket.h
    winsup/cygwin/include/sys/soundcard.h
    winsup/cygwin/include/sys/strace.h
    winsup/cygwin/include/sys/sysmacros.h
    winsup/cygwin/include/sys/termios.h
    winsup/cygwin/include/sys/uio.h
    winsup/cygwin/include/sys/un.h
    winsup/cygwin/include/sys/vfs.h
    winsup/cygwin/init.cc
    winsup/cygwin/ioctl.cc
    winsup/cygwin/ipc.cc
    winsup/cygwin/lib/cygwin_crt0.c
    winsup/cygwin/lib/dll_main.cc
    winsup/cygwin/lib/getopt.c
    winsup/cygwin/localtime.cc
    winsup/cygwin/malloc.cc
    winsup/cygwin/malloc_wrapper.cc
    winsup/cygwin/miscfuncs.cc
    winsup/cygwin/mkvers.sh
    winsup/cygwin/mmap.cc
    winsup/cygwin/msg.cc
    winsup/cygwin/net.cc
    winsup/cygwin/ntdll.h
    winsup/cygwin/ntea.cc
    winsup/cygwin/passwd.cc
    winsup/cygwin/path.cc
    winsup/cygwin/path.h
    winsup/cygwin/perthread.h
    winsup/cygwin/pinfo.cc
    winsup/cygwin/pinfo.h
    winsup/cygwin/pipe.cc
    winsup/cygwin/poll.cc
    winsup/cygwin/pthread.cc
    winsup/cygwin/pwdgrp.h
    winsup/cygwin/regex/regcomp.c
    winsup/cygwin/registry.cc
    winsup/cygwin/resource.cc
    winsup/cygwin/safe_memory.h
    winsup/cygwin/sched.cc
    winsup/cygwin/sec_acl.cc
    winsup/cygwin/sec_helper.cc
    winsup/cygwin/security.cc
    winsup/cygwin/security.h
    winsup/cygwin/select.cc
    winsup/cygwin/sem.cc
    winsup/cygwin/shared.cc
    winsup/cygwin/shared_info.h
    winsup/cygwin/shm.cc
    winsup/cygwin/signal.cc
    winsup/cygwin/sigproc.cc
    winsup/cygwin/sigproc.h
    winsup/cygwin/smallprint.c
    winsup/cygwin/spawn.cc
    winsup/cygwin/speclib
    winsup/cygwin/strace.cc
    winsup/cygwin/sync.cc
    winsup/cygwin/sync.h
    winsup/cygwin/syscalls.cc
    winsup/cygwin/sysconf.cc
    winsup/cygwin/syslog.cc
    winsup/cygwin/termios.cc
    winsup/cygwin/thread.cc
    winsup/cygwin/thread.h
    winsup/cygwin/threaded_queue.cc
    winsup/cygwin/threaded_queue.h
    winsup/cygwin/times.cc
    winsup/cygwin/tty.cc
    winsup/cygwin/tty.h
    winsup/cygwin/uinfo.cc
    winsup/cygwin/uname.cc
    winsup/cygwin/wait.cc
    winsup/cygwin/winbase.h
    winsup/cygwin/wincap.cc
    winsup/cygwin/wincap.h
    winsup/cygwin/window.cc
    winsup/cygwin/winsup.h
    winsup/cygwin/winver.rc
    winsup/cygwin/woutsup.h
Delete:
    winsup/cygwin/include/cygwin/ip.h
    winsup/cygwin/include/sys/ipc.h
    winsup/cygwin/include/sys/shm.h
    winsup/cygwin/include/wchar.h
    winsup/cygwin/lib/_cygwin_S_IEXEC.cc
    winsup/cygwin/regexp/regerror.c
    winsup/cygwin/regexp/regexp.3
    winsup/cygwin/regexp/regexp.c
    winsup/cygwin/regexp/regsub.c
    winsup/cygwin/shortcut.c
    winsup/cygwin/shortcut.h
    winsup/cygwin/test.c

1 files changed, 743 insertions, 0 deletions

diff --git a/winsup/cygwin/fhandler_process.cc b/winsup/cygwin/fhandler_process.cc
new file mode 100644
index 000000000..0633b0ebc
--- /dev/null
+++ b/winsup/cygwin/fhandler_process.cc
@@ -0,0 +1,743 @@
+/* fhandler_process.cc: fhandler for /proc/<pid> virtual filesystem
+
+   Copyright 2002 Red Hat, Inc.
+
+This file is part of Cygwin.
+
+This software is a copyrighted work licensed under the terms of the
+Cygwin license.  Please consult the file "CYGWIN_LICENSE" for
+details. */
+
+#include "winsup.h"
+#include <errno.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <sys/cygwin.h>
+#include <ntdef.h>
+#include "cygerrno.h"
+#include "security.h"
+#include "fhandler.h"
+#include "pinfo.h"
+#include "path.h"
+#include "shared_info.h"
+#include "dtable.h"
+#include "cygheap.h"
+#include "ntdll.h"
+#include <sys/param.h>
+#include <assert.h>
+
+#define _COMPILING_NEWLIB
+#include <dirent.h>
+
+static const int PROCESS_PPID = 2;
+static const int PROCESS_EXENAME = 3;
+static const int PROCESS_WINPID = 4;
+static const int PROCESS_WINEXENAME = 5;
+static const int PROCESS_STATUS = 6;
+static const int PROCESS_UID = 7;
+static const int PROCESS_GID = 8;
+static const int PROCESS_PGID = 9;
+static const int PROCESS_SID = 10;
+static const int PROCESS_CTTY = 11;
+static const int PROCESS_STAT = 12;
+static const int PROCESS_STATM = 13;
+
+static const char * const process_listing[] =
+{
+  ".",
+  "..",
+  "ppid",
+  "exename",
+  "winpid",
+  "winexename",
+  "status",
+  "uid",
+  "gid",
+  "pgid",
+  "sid",
+  "ctty",
+  "stat",
+  "statm",
+  NULL
+};
+
+static const int PROCESS_LINK_COUNT =
+  (sizeof(process_listing) / sizeof(const char *)) - 1;
+
+static off_t format_process_stat (_pinfo *p, char *destbuf, size_t maxsize);
+static off_t format_process_status (_pinfo *p, char *destbuf, size_t maxsize);
+static off_t format_process_statm (_pinfo *p, char *destbuf, size_t maxsize);
+static int get_process_state (DWORD dwProcessId);
+static bool get_mem_values (DWORD dwProcessId, unsigned long *vmsize,
+			    unsigned long *vmrss, unsigned long *vmtext,
+			    unsigned long *vmdata, unsigned long *vmlib,
+			    unsigned long *vmshare);
+
+/* Returns 0 if path doesn't exist, >0 if path is a directory,
+ * <0 if path is a file.
+ */
+int
+fhandler_process::exists ()
+{
+  const char *path = get_name ();
+  debug_printf ("exists (%s)", path);
+  path += proc_len + 1;
+  while (*path != 0 && !SLASH_P (*path))
+    path++;
+  if (*path == 0)
+    return 2;
+
+  for (int i = 0; process_listing[i]; i++)
+    if (pathmatch (path + 1, process_listing[i]))
+      return -1;
+  return 0;
+}
+
+fhandler_process::fhandler_process ():
+  fhandler_proc (FH_PROCESS)
+{
+}
+
+int
+fhandler_process::fstat (struct __stat64 *buf, path_conv *pc)
+{
+  const char *path = get_name ();
+  int file_type = exists ();
+  (void) fhandler_base::fstat (buf, pc);
+  path += proc_len + 1;
+  pid = atoi (path);
+  pinfo p (pid);
+  if (!p)
+    {
+      set_errno (ENOENT);
+      return -1;
+    }
+
+  buf->st_mode &= ~_IFMT & NO_W;
+
+  switch (file_type)
+    {
+    case 0:
+      set_errno (ENOENT);
+      return -1;
+    case 1:
+      buf->st_mode |= S_IFDIR | S_IXUSR | S_IXGRP | S_IXOTH;
+      return 0;
+    case 2:
+      buf->st_ctime = buf->st_mtime = p->start_time;
+      buf->st_ctim.tv_nsec = buf->st_mtim.tv_nsec = 0;
+      time_as_timestruc_t (&buf->st_atim);
+      buf->st_uid = p->uid;
+      buf->st_gid = p->gid;
+      buf->st_mode |= S_IFDIR | S_IXUSR | S_IXGRP | S_IXOTH;
+      buf->st_nlink = PROCESS_LINK_COUNT;
+      return 0;
+    default:
+    case -1:
+      buf->st_uid = p->uid;
+      buf->st_gid = p->gid;
+      buf->st_mode |= S_IFREG | S_IRUSR | S_IRGRP | S_IROTH;
+      return 0;
+    }
+}
+
+struct dirent *
+fhandler_process::readdir (DIR * dir)
+{
+  if (dir->__d_position >= PROCESS_LINK_COUNT)
+    {
+      set_errno (ENMFILE);
+      return NULL;
+    }
+  strcpy (dir->__d_dirent->d_name, process_listing[dir->__d_position++]);
+  syscall_printf ("%p = readdir (%p) (%s)", &dir->__d_dirent, dir,
+		  dir->__d_dirent->d_name);
+  return dir->__d_dirent;
+}
+
+int
+fhandler_process::open (path_conv *pc, int flags, mode_t mode)
+{
+  int process_file_no = -1;
+
+  int res = fhandler_virtual::open (pc, flags, mode);
+  if (!res)
+    goto out;
+
+  set_nohandle (true);
+
+  const char *path;
+  path = get_name () + proc_len + 1;
+  pid = atoi (path);
+  while (*path != 0 && !SLASH_P (*path))
+    path++;
+
+  if (*path == 0)
+    {
+      if ((flags & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL))
+	{
+	  set_errno (EEXIST);
+	  res = 0;
+	  goto out;
+	}
+      else if (flags & O_WRONLY)
+	{
+	  set_errno (EISDIR);
+	  res = 0;
+	  goto out;
+	}
+      else
+	{
+	  flags |= O_DIROPEN;
+	  goto success;
+	}
+    }
+
+  process_file_no = -1;
+  for (int i = 0; process_listing[i]; i++)
+    {
+      if (path_prefix_p
+	  (process_listing[i], path + 1, strlen (process_listing[i])))
+	process_file_no = i;
+    }
+  if (process_file_no == -1)
+    {
+      if (flags & O_CREAT)
+	{
+	  set_errno (EROFS);
+	  res = 0;
+	  goto out;
+	}
+      else
+	{
+	  set_errno (ENOENT);
+	  res = 0;
+	  goto out;
+	}
+    }
+  if (flags & O_WRONLY)
+    {
+      set_errno (EROFS);
+      res = 0;
+      goto out;
+    }
+
+  fileid = process_file_no;
+  if (!fill_filebuf ())
+	{
+	  res = 0;
+	  goto out;
+	}
+
+  if (flags & O_APPEND)
+    position = filesize;
+  else
+    position = 0;
+
+success:
+  res = 1;
+  set_flags ((flags & ~O_TEXT) | O_BINARY);
+  set_open_status ();
+out:
+  syscall_printf ("%d = fhandler_proc::open (%p, %d)", res, flags, mode);
+  return res;
+}
+
+bool
+fhandler_process::fill_filebuf ()
+{
+  pinfo p (pid);
+
+  if (!p)
+    {
+      set_errno (ENOENT);
+      return false;
+    }
+
+  switch (fileid)
+    {
+    case PROCESS_UID:
+    case PROCESS_GID:
+    case PROCESS_PGID:
+    case PROCESS_SID:
+    case PROCESS_CTTY:
+    case PROCESS_PPID:
+      {
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = 40);
+	int num;
+	switch (fileid)
+	  {
+	  case PROCESS_PPID:
+	    num = p->ppid;
+	    break;
+	  case PROCESS_UID:
+	    num = p->uid;
+	    break;
+	  case PROCESS_PGID:
+	    num = p->pgid;
+	    break;
+	  case PROCESS_SID:
+	    num = p->sid;
+	    break;
+	  case PROCESS_GID:
+	    num = p->gid;
+	    break;
+	  case PROCESS_CTTY:
+	    num = p->ctty;
+	    break;
+	  default: // what's this here for?
+	    num = 0;
+	    break;
+	  }
+	__small_sprintf (filebuf, "%d\n", num);
+	filesize = strlen (filebuf);
+	break;
+      }
+    case PROCESS_EXENAME:
+      {
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = MAX_PATH);
+	if (p->process_state & (PID_ZOMBIE | PID_EXITED))
+	  strcpy (filebuf, "<defunct>");
+	else
+	  {
+	    mount_table->conv_to_posix_path (p->progname, filebuf, 1);
+	    int len = strlen (filebuf);
+	    if (len > 4)
+	      {
+		char *s = filebuf + len - 4;
+		if (strcasecmp (s, ".exe") == 0)
+		  *s = 0;
+	      }
+	  }
+	filesize = strlen (filebuf);
+	break;
+      }
+    case PROCESS_WINPID:
+      {
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = 40);
+	__small_sprintf (filebuf, "%d\n", p->dwProcessId);
+	filesize = strlen (filebuf);
+	break;
+      }
+    case PROCESS_WINEXENAME:
+      {
+	int len = strlen (p->progname);
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = (len + 2));
+	strcpy (filebuf, p->progname);
+	filebuf[len] = '\n';
+	filesize = len + 1;
+	break;
+      }
+    case PROCESS_STATUS:
+      {
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = 2048);
+	filesize = format_process_status (*p, filebuf, bufalloc);
+	break;
+      }
+    case PROCESS_STAT:
+      {
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = 2048);
+	filesize = format_process_stat (*p, filebuf, bufalloc);
+	break;
+      }
+    case PROCESS_STATM:
+      {
+	if (!filebuf)
+	  filebuf = (char *) cmalloc (HEAP_BUF, bufalloc = 2048);
+	filesize = format_process_statm (*p, filebuf, bufalloc);
+	break;
+      }
+    }
+
+  return true;
+}
+
+static
+off_t
+format_process_stat (_pinfo *p, char *destbuf, size_t maxsize)
+{
+  char cmd[MAX_PATH];
+  int state = 'R';
+  unsigned long fault_count = 0UL,
+		utime = 0UL, stime = 0UL,
+		start_time = 0UL,
+		vmsize = 0UL, vmrss = 0UL, vmmaxrss = 0UL;
+  int priority = 0;
+  if (p->process_state & (PID_ZOMBIE | PID_EXITED))
+    strcpy (cmd, "<defunct>");
+  else
+    {
+      strcpy (cmd, p->progname);
+      char *last_slash = strrchr (cmd, '\\');
+      if (last_slash != NULL)
+	strcpy (cmd, last_slash + 1);
+      int len = strlen (cmd);
+      if (len > 4)
+	{
+	  char *s = cmd + len - 4;
+	  if (strcasecmp (s, ".exe") == 0)
+	    *s = 0;
+	 }
+    }
+  /*
+   * Note: under Windows, a _process_ is always running - it's only _threads_
+   * that get suspended. Therefore the default state is R (runnable).
+   */
+  if (p->process_state & PID_ZOMBIE)
+    state = 'Z';
+  else if (p->process_state & PID_STOPPED)
+    state = 'T';
+  else if (wincap.is_winnt ())
+    state = get_process_state (p->dwProcessId);
+ if (wincap.is_winnt ())
+    {
+      NTSTATUS ret;
+      HANDLE hProcess;
+      VM_COUNTERS vmc;
+      KERNEL_USER_TIMES put;
+      PROCESS_BASIC_INFORMATION pbi;
+      QUOTA_LIMITS ql;
+      SYSTEM_TIME_OF_DAY_INFORMATION stodi;
+      SYSTEM_PROCESSOR_TIMES spt;
+      hProcess = OpenProcess (PROCESS_VM_READ | PROCESS_QUERY_INFORMATION,
+			      FALSE, p->dwProcessId);
+      if (hProcess != NULL)
+	{
+	  ret = NtQueryInformationProcess (hProcess,
+					   ProcessVmCounters,
+					   (PVOID) &vmc,
+					   sizeof vmc, NULL);
+	  if (ret == STATUS_SUCCESS)
+	    ret = NtQueryInformationProcess (hProcess,
+					     ProcessTimes,
+					     (PVOID) &put,
+					     sizeof put, NULL);
+	  if (ret == STATUS_SUCCESS)
+	    ret = NtQueryInformationProcess (hProcess,
+					     ProcessBasicInformation,
+					     (PVOID) &pbi,
+					     sizeof pbi, NULL);
+	  if (ret == STATUS_SUCCESS)
+	    ret = NtQueryInformationProcess (hProcess,
+					     ProcessQuotaLimits,
+					     (PVOID) &ql,
+					     sizeof ql, NULL);
+	  CloseHandle (hProcess);
+	}
+      else
+	{
+	  DWORD error = GetLastError ();
+	  __seterrno_from_win_error (error);
+	  debug_printf ("OpenProcess: ret = %d",
+			error);
+	  return 0;
+	}
+      if (ret == STATUS_SUCCESS)
+	ret = NtQuerySystemInformation (SystemTimeOfDayInformation,
+					(PVOID) &stodi,
+					sizeof stodi, NULL);
+      if (ret == STATUS_SUCCESS)
+	ret = NtQuerySystemInformation (SystemProcessorTimes,
+					(PVOID) &spt,
+					sizeof spt, NULL);
+      if (ret != STATUS_SUCCESS)
+	{
+	  __seterrno_from_win_error (RtlNtStatusToDosError (ret));
+	  debug_printf ("NtQueryInformationProcess: ret = %d, "
+		       "Dos(ret) = %d",
+		       ret, RtlNtStatusToDosError (ret));
+	  return 0;
+	}
+       fault_count = vmc.PageFaultCount;
+       utime = put.UserTime.QuadPart * HZ / 10000000ULL;
+       stime = put.KernelTime.QuadPart * HZ / 10000000ULL;
+       if (stodi.CurrentTime.QuadPart > put.CreateTime.QuadPart)
+	 start_time = (spt.KernelTime.QuadPart + spt.UserTime.QuadPart -
+		       stodi.CurrentTime.QuadPart + put.CreateTime.QuadPart) * HZ / 10000000ULL;
+       else
+	 /*
+	  * sometimes stodi.CurrentTime is a bit behind
+	  * Note: some older versions of procps are broken and can't cope
+	  * with process start times > time(NULL).
+	  */
+	 start_time = (spt.KernelTime.QuadPart + spt.UserTime.QuadPart) * HZ / 10000000ULL;
+       priority = pbi.BasePriority;
+       unsigned page_size = getpagesize ();
+       vmsize = vmc.VirtualSize;
+       vmrss = vmc.WorkingSetSize / page_size;
+       vmmaxrss = ql.MaximumWorkingSetSize / page_size;
+    }
+  else
+    {
+      start_time = (GetTickCount() / 1000 - time(NULL) + p->start_time) * HZ;
+    }
+  return __small_sprintf (destbuf, "%d (%s) %c "
+				   "%d %d %d %d %d "
+				   "%lu %lu %lu %lu %lu %lu %lu "
+				   "%ld %ld %ld %ld %ld %ld "
+				   "%lu %lu "
+				   "%ld "
+				   "%lu",
+			  p->pid, cmd,
+			  state,
+			  p->ppid, p->pgid, p->sid, p->ctty, -1,
+			  0, fault_count, fault_count, 0, 0, utime, stime,
+			  utime, stime, priority, 0, 0, 0,
+			  start_time, vmsize,
+			  vmrss, vmmaxrss
+			  );
+}
+
+static
+off_t
+format_process_status (_pinfo *p, char *destbuf, size_t maxsize)
+{
+  char cmd[MAX_PATH];
+  int state = 'R';
+  const char *state_str = "unknown";
+  unsigned long vmsize = 0UL, vmrss = 0UL, vmdata = 0UL, vmlib = 0UL, vmtext = 0UL,
+		vmshare = 0UL;
+  if (p->process_state & (PID_ZOMBIE | PID_EXITED))
+    strcpy (cmd, "<defunct>");
+  else
+    {
+      strcpy (cmd, p->progname);
+      char *last_slash = strrchr (cmd, '\\');
+      if (last_slash != NULL)
+	strcpy (cmd, last_slash + 1);
+      int len = strlen (cmd);
+      if (len > 4)
+	{
+	  char *s = cmd + len - 4;
+	  if (strcasecmp (s, ".exe") == 0)
+	    *s = 0;
+	 }
+    }
+  /*
+   * Note: under Windows, a _process_ is always running - it's only _threads_
+   * that get suspended. Therefore the default state is R (runnable).
+   */
+  if (p->process_state & PID_ZOMBIE)
+    state = 'Z';
+  else if (p->process_state & PID_STOPPED)
+    state = 'T';
+  else if (wincap.is_winnt ())
+    state = get_process_state (p->dwProcessId);
+  switch (state)
+    {
+    case 'O':
+      state_str = "running";
+      break;
+    case 'D':
+    case 'S':
+      state_str = "sleeping";
+      break;
+    case 'R':
+      state_str = "runnable";
+      break;
+    case 'Z':
+      state_str = "zombie";
+      break;
+    case 'T':
+      state_str = "stopped";
+      break;
+    }
+  if (wincap.is_winnt ())
+    {
+      if (!get_mem_values (p->dwProcessId, &vmsize, &vmrss, &vmtext, &vmdata, &vmlib, &vmshare))
+	return 0;
+      unsigned page_size = getpagesize ();
+      vmsize *= page_size; vmrss *= page_size; vmdata *= page_size;
+      vmtext *= page_size; vmlib *= page_size;
+    }
+  return __small_sprintf (destbuf, "Name:   %s\n"
+				   "State:  %c (%s)\n"
+				   "Tgid:   %d\n"
+				   "Pid:    %d\n"
+				   "PPid:   %d\n"
+				   "Uid:    %d %d %d %d\n"
+				   "Gid:    %d %d %d %d\n"
+				   "VmSize: %8d kB\n"
+				   "VmLck:  %8d kB\n"
+				   "VmRSS:  %8d kB\n"
+				   "VmData: %8d kB\n"
+				   "VmStk:  %8d kB\n"
+				   "VmExe:  %8d kB\n"
+				   "VmLib:  %8d kB\n"
+				   "SigPnd: %016x\n"
+				   "SigBlk: %016x\n"
+				   "SigIgn: %016x\n",
+			  cmd,
+			  state, state_str,
+			  p->pgid,
+			  p->pid,
+			  p->ppid,
+			  p->uid, cygheap->user.real_uid, cygheap->user.real_uid, p->uid,
+			  p->gid, cygheap->user.real_gid, cygheap->user.real_gid, p->gid,
+			  vmsize >> 10, 0, vmrss >> 10, vmdata >> 10, 0, vmtext >> 10, vmlib >> 10,
+			  0, 0, p->getsigmask ()
+			  );
+}
+
+static
+off_t
+format_process_statm (_pinfo *p, char *destbuf, size_t maxsize)
+{
+  unsigned long vmsize = 0UL, vmrss = 0UL, vmtext = 0UL, vmdata = 0UL,
+		vmlib = 0UL, vmshare = 0UL;
+  if (wincap.is_winnt ())
+    {
+      if (!get_mem_values (p->dwProcessId, &vmsize, &vmrss, &vmtext, &vmdata,
+			   &vmlib, &vmshare))
+	return 0;
+    }
+  return __small_sprintf (destbuf, "%ld %ld %ld %ld %ld %ld %ld",
+			  vmsize, vmrss, vmshare, vmtext, vmlib, vmdata, 0
+			  );
+}
+
+static
+int
+get_process_state (DWORD dwProcessId)
+{
+  /*
+   * This isn't really heavy magic - just go through the processes'
+   * threads one by one and return a value accordingly
+   * Errors are silently ignored.
+   */
+  NTSTATUS ret;
+  SYSTEM_PROCESSES *sp;
+  ULONG n = 0x1000;
+  PULONG p = new ULONG[n];
+  int state =' ';
+  while (STATUS_INFO_LENGTH_MISMATCH ==
+	 (ret = NtQuerySystemInformation (SystemProcessesAndThreadsInformation,
+					 (PVOID) p,
+					 n * sizeof *p, NULL)))
+    delete [] p, p = new ULONG[n *= 2];
+  if (ret != STATUS_SUCCESS)
+    {
+      debug_printf ("NtQuerySystemInformation: ret = %d, "
+		   "Dos(ret) = %d",
+		   ret, RtlNtStatusToDosError (ret));
+      goto out;
+    }
+  state = 'Z';
+  sp = (SYSTEM_PROCESSES *) p;
+  for (;;)
+    {
+      if (sp->ProcessId == dwProcessId)
+	{
+	  SYSTEM_THREADS *st;
+	  if (wincap.has_process_io_counters ())
+	    /*
+	     * Windows 2000 and XP have an extra member in SYSTEM_PROCESSES
+	     * which means the offset of the first SYSTEM_THREADS entry is
+	     * different on these operating systems compared to NT 4.
+	     */
+	    st = &sp->Threads[0];
+	  else
+	    /*
+	     * 136 is the offset of the first SYSTEM_THREADS entry on
+	     * Windows NT 4.
+	     */
+	    st = (SYSTEM_THREADS *) ((char *) sp + 136);
+	  state = 'S';
+	  for (unsigned i = 0; i < sp->ThreadCount; i++)
+	    {
+	      if (st->State == StateRunning ||
+		  st->State == StateReady)
+		{
+		  state = 'R';
+		  goto out;
+		}
+	      st++;
+	    }
+	  break;
+	}
+      if (!sp->NextEntryDelta)
+	 break;
+      sp = (SYSTEM_PROCESSES *) ((char *) sp + sp->NextEntryDelta);
+    }
+out:
+  delete [] p;
+  return state;
+}
+
+static
+bool
+get_mem_values (DWORD dwProcessId, unsigned long *vmsize, unsigned long *vmrss,
+		unsigned long *vmtext, unsigned long *vmdata,
+		unsigned long *vmlib, unsigned long *vmshare)
+{
+  bool res = true;
+  NTSTATUS ret;
+  HANDLE hProcess;
+  VM_COUNTERS vmc;
+  MEMORY_WORKING_SET_LIST *mwsl;
+  ULONG n = 0x1000, length;
+  PULONG p = new ULONG[n];
+  unsigned page_size = getpagesize ();
+  hProcess = OpenProcess (PROCESS_QUERY_INFORMATION,
+			  FALSE, dwProcessId);
+  if (hProcess == NULL)
+    {
+      DWORD error = GetLastError ();
+      __seterrno_from_win_error (error);
+      debug_printf ("OpenProcess: ret = %d",
+		    error);
+      return false;
+    }
+  while ((ret = NtQueryVirtualMemory (hProcess, 0,
+				      MemoryWorkingSetList,
+				      (PVOID) p,
+				      n * sizeof *p, &length)),
+	 (ret == STATUS_SUCCESS || ret == STATUS_INFO_LENGTH_MISMATCH) &&
+	 length >= n * sizeof *p)
+    delete [] p, p = new ULONG[n *= 2];
+  if (ret != STATUS_SUCCESS)
+    {
+      debug_printf ("NtQueryVirtualMemory: ret = %d, "
+		   "Dos(ret) = %d",
+		   ret, RtlNtStatusToDosError (ret));
+      res = false;
+      goto out;
+    }
+  mwsl = (MEMORY_WORKING_SET_LIST *) p;
+  for (unsigned long i = 0; i < mwsl->NumberOfPages; i++)
+    {
+      ++*vmrss;
+      unsigned flags = mwsl->WorkingSetList[i] & 0x0FFF;
+      if (flags & (WSLE_PAGE_EXECUTE | WSLE_PAGE_SHAREABLE) == (WSLE_PAGE_EXECUTE | WSLE_PAGE_SHAREABLE))
+	  ++*vmlib;
+      else if (flags & WSLE_PAGE_SHAREABLE)
+	  ++*vmshare;
+      else if (flags & WSLE_PAGE_EXECUTE)
+	  ++*vmtext;
+      else
+	  ++*vmdata;
+    }
+  ret = NtQueryInformationProcess (hProcess,
+				   ProcessVmCounters,
+				   (PVOID) &vmc,
+				   sizeof vmc, NULL);
+  if (ret != STATUS_SUCCESS)
+    {
+      debug_printf ("NtQueryInformationProcess: ret = %d, "
+		    "Dos(ret) = %d",
+		    ret, RtlNtStatusToDosError (ret));
+      res = false;
+      goto out;
+    }
+  *vmsize = vmc.VirtualSize / page_size;
+out:
+  delete [] p;
+  CloseHandle (hProcess);
+  return res;
+}