Import Dev86src-0.0.11.tar.gzv0.0.11

20 files changed, 1338 insertions, 0 deletions

diff --git a/libc/getent/Config b/libc/getent/Config
new file mode 100644
index 0000000..0349aba
--- /dev/null
+++ b/libc/getent/Config
@@ -0,0 +1 @@
+getent:	Managment for /etc/passwd /etc/group /etc/utmp
diff --git a/libc/getent/Makefile b/libc/getent/Makefile
new file mode 100644
index 0000000..9321ced
--- /dev/null
+++ b/libc/getent/Makefile
@@ -0,0 +1,36 @@
+# Copyright (C) 1996 Nat Friedman <ndf@aleph1.mit.edu>
+# This file is part of the Linux-8086 C library and is distributed
+# under the GNU Library General Public License.
+
+ifeq ($(PLATFORM),i386-ELKS)
+CFLAGS=$(ARCH) $(WALL) $(CCFLAGS) $(DEFS)
+else
+CFLAGS=$(ARCH) -ansi $(CCFLAGS) $(DEFS)
+endif
+
+PSRC=__getpwent.c pwent.c getpwnam.c getpwuid.c putpwent.c getpw.c fgetpwent.c
+GSRC=__getgrent.c grent.c getgrnam.c getgrgid.c fgetgrent.c initgroups.c \
+	config-grp.h
+USRC=utent.c
+
+POBJ=__getpwent.o pwent.o getpwnam.o getpwuid.o putpwent.o getpw.o fgetpwent.o
+GOBJ=__getgrent.o grent.o getgrnam.o getgrgid.o fgetgrent.o initgroups.o 
+UOBJ=utent.o
+
+ifeq ($(LIB_OS),ELKS)
+
+OBJ=$(POBJ) $(GOBJ) $(UOBJ)
+
+all: $(LIBC)($(OBJ))
+	@:
+
+$(LIBC)($(GOBJ)): config-grp.h
+
+else
+all:
+	@:
+endif
+
+clean:
+	rm -f *.o libc.a
+
diff --git a/libc/getent/__getgrent.c b/libc/getent/__getgrent.c
new file mode 100644
index 0000000..612f112
--- /dev/null
+++ b/libc/getent/__getgrent.c
@@ -0,0 +1,168 @@
+/*
+ * __getgrent.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <stdlib.h>
+#include <string.h>
+#include <grp.h>
+#include "config.h"
+
+/*
+ * This is the core group-file read function.  It behaves exactly like
+ * getgrent() except that it is passed a file descriptor.  getgrent()
+ * is just a wrapper for this function.
+ */
+struct group *
+__getgrent(int grp_fd)
+{
+#ifndef GR_SCALE_DYNAMIC  
+  static char line_buff[GR_MAX_LINE_LEN];
+  static char * members[GR_MAX_MEMBERS];
+#else
+  static char * line_buff = NULL;
+  static char ** members = NULL;
+  short line_index;
+  short buff_size;
+#endif
+  static struct group group;
+  register char * ptr;
+  char * field_begin;
+  short member_num;
+  char * endptr;
+  int line_len;
+
+
+  /* We use the restart label to handle malformatted lines */
+restart:
+#ifdef GR_SCALE_DYNAMIC
+  line_index=0;
+  buff_size=256;
+#endif
+
+#ifndef GR_SCALE_DYNAMIC
+  /* Read the line into the static buffer */
+  if ((line_len=read(grp_fd, line_buff, GR_MAX_LINE_LEN))<=0)
+    return NULL;
+  field_begin=strchr(line_buff, '\n');
+  if (field_begin!=NULL)
+    lseek(grp_fd, (long) (1+field_begin-(line_buff+line_len)), SEEK_CUR);
+  else /* The line is too long - skip it :-\ */
+    {
+      do { if ((line_len=read(grp_fd, line_buff, GR_MAX_LINE_LEN))<=0)
+	return NULL;
+      } while (!(field_begin=strchr(line_buff, '\n')));
+      lseek(grp_fd, (long) ((field_begin-line_buff)-line_len+1), SEEK_CUR);
+      goto restart;
+    }
+  if (*line_buff=='#' || *line_buff==' ' || *line_buff=='\n' ||
+      *line_buff=='\t')
+    goto restart;
+  *field_begin='\0';
+
+#else /* !GR_SCALE_DYNAMIC */
+  line_buff=realloc(line_buff, buff_size);
+  while (1)
+    {
+      if ((line_len=read(grp_fd, line_buff+line_index,
+			 buff_size-line_index))<=0)
+	  return NULL;
+      field_begin=strchr(line_buff, '\n');
+      if (field_begin!=NULL)
+	{
+	  lseek(grp_fd, (long) (1+field_begin-(line_len+line_index+line_buff)),
+		SEEK_CUR);
+	  *field_begin='\0';
+	  if (*line_buff=='#' || *line_buff==' ' || *line_buff=='\n' ||
+	      *line_buff=='\t')
+	    goto restart;
+	  break;
+	}
+      else /* Allocate some more space */
+	{
+	  line_index=buff_size;
+	  buff_size+=256;
+	  line_buff=realloc(line_buff, buff_size);
+	}
+    }
+#endif /* GR_SCALE_DYNAMIC */
+
+  /* Now parse the line */
+  group.gr_name=line_buff;
+  ptr=strchr(line_buff, ':');
+  if (ptr==NULL) goto restart;
+  *ptr++='\0';
+
+  group.gr_passwd=ptr;
+  ptr=strchr(ptr, ':');
+  if (ptr==NULL) goto restart;
+  *ptr++='\0';
+
+  field_begin=ptr;
+  ptr=strchr(ptr, ':');
+  if (ptr==NULL) goto restart;
+  *ptr++='\0';
+
+  group.gr_gid=(gid_t) strtoul(field_begin, &endptr, 10);
+  if (*endptr!='\0') goto restart;
+
+  member_num=0;
+  field_begin=ptr;
+
+#ifndef GR_SCALE_DYNAMIC
+  while ((ptr=strchr(ptr, ','))!=NULL)
+    {
+      *ptr='\0';
+      ptr++;
+      members[member_num]=field_begin;
+      field_begin=ptr;
+      member_num++;
+    }
+  if (*field_begin=='\0')
+    members[member_num]=NULL;
+  else
+    {
+      members[member_num]=field_begin;
+      members[member_num+1]=NULL;
+    }
+#else /* !GR_SCALE_DYNAMIC */
+  if (members!=NULL)
+    free (members);
+  members=(char **) malloc(1*sizeof(char *));
+  while ((ptr=strchr(ptr, ','))!=NULL)
+    {
+      *ptr='\0';
+      ptr++;
+      members[member_num]=field_begin;
+      field_begin=ptr;
+      member_num++;
+      members=(char **)realloc((void *)members, (member_num+1)*sizeof(char *));
+    }
+  if (*field_begin=='\0')
+      members[member_num]=NULL;
+  else
+    {
+      members[member_num]=field_begin;
+      members[member_num+1]=NULL;
+    }
+#endif /* GR_SCALE_DYNAMIC */
+
+  group.gr_mem=members;
+  return &group;
+}
diff --git a/libc/getent/__getpwent.c b/libc/getent/__getpwent.c
new file mode 100644
index 0000000..9836ca7
--- /dev/null
+++ b/libc/getent/__getpwent.c
@@ -0,0 +1,99 @@
+/*
+ * __getpwent.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <fcntl.h>
+#include <pwd.h>
+
+#define PWD_BUFFER_SIZE 256
+
+/* This isn't as flash as my previous version -- it doesn't dynamically
+  scale down the gecos on too-long lines, but it also makes fewer syscalls,
+  so it's probably nicer.  Write me if you want the old version.  Maybe I
+  should include it as a build-time option... ?
+  -Nat <ndf@linux.mit.edu> */
+   
+struct passwd *
+__getpwent(int pwd_fd)
+{
+  static char line_buff[PWD_BUFFER_SIZE];
+  static struct passwd passwd;
+  char * field_begin;
+  char * endptr;
+  char * gid_ptr;
+  char * uid_ptr;
+  int line_len;
+  int i;
+
+  /* We use the restart label to handle malformatted lines */
+restart:
+  /* Read the passwd line into the static buffer using a minimal of
+     syscalls. */
+  if ((line_len=read(pwd_fd, line_buff, PWD_BUFFER_SIZE))<=0)
+    return NULL;
+  field_begin=strchr(line_buff, '\n');
+  if (field_begin!=NULL)
+    lseek(pwd_fd, (long) (1+field_begin-(line_buff+line_len)), SEEK_CUR);
+  else /* The line is too long - skip it. :-\ */
+    {
+      do { if ((line_len=read(pwd_fd, line_buff, PWD_BUFFER_SIZE))<=0)
+	return NULL;
+      } while (!(field_begin=strchr(line_buff, '\n')));
+      lseek(pwd_fd, (long) (field_begin-line_buff)-line_len+1, SEEK_CUR);
+      goto restart;
+    }
+  if (*line_buff=='#' || *line_buff==' ' || *line_buff=='\n' ||
+      *line_buff=='\t')
+      goto restart;
+  *field_begin='\0';
+
+  /* We've read the line; now parse it. */
+  field_begin=line_buff;
+  for (i=0;i<7;i++)
+    {
+      switch(i)
+	{
+	case 0: passwd.pw_name=field_begin; break;
+	case 1: passwd.pw_passwd=field_begin; break;
+	case 2: uid_ptr=field_begin; break;
+	case 3: gid_ptr=field_begin; break;
+	case 4: passwd.pw_gecos=field_begin; break;
+	case 5: passwd.pw_dir=field_begin; break;
+	case 6: passwd.pw_shell=field_begin; break;
+	}
+      if (i<6)
+	{
+	  field_begin=strchr(field_begin, ':');
+	  if (field_begin==NULL) goto restart;
+	  *field_begin++='\0';
+	}
+    }
+  passwd.pw_gid=(gid_t) strtoul(gid_ptr, &endptr, 10);
+  if (*endptr!='\0') goto restart;
+  
+  passwd.pw_uid=(uid_t) strtoul(uid_ptr, &endptr, 10);
+  if (*endptr!='\0') goto restart;
+
+  return &passwd;
+}
+
+
diff --git a/libc/getent/config-grp.h b/libc/getent/config-grp.h
new file mode 100644
index 0000000..337d54b
--- /dev/null
+++ b/libc/getent/config-grp.h
@@ -0,0 +1,65 @@
+/*
+ * config-grp.h - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+
+#ifndef _CONFIG_GRP_H
+#define _CONFIG_GRP_H
+
+/*
+ * Define GR_SCALE_DYNAMIC if you want grp to dynamically scale its read buffer
+ * so that lines of any length can be used.  On very very small systems,
+ * you may want to leave this undefined becasue it will make the grp functions
+ * somewhat larger (because of the inclusion of malloc and the code necessary).
+ * On larger systems, you will want to define this, because grp will _not_
+ * deal with long lines gracefully (they will be skipped).
+ */
+#define GR_SCALE_DYNAMIC
+
+#ifndef GR_SCALE_DYNAMIC
+/*
+ * If scaling is not dynamic, the buffers will be statically allocated, and
+ * maximums must be chosen.  GR_MAX_LINE_LEN is the maximum number of
+ * characters per line in the group file.  GR_MAX_MEMBERS is the maximum
+ * number of members of any given group.
+ */
+#define GR_MAX_LINE_LEN 128
+/* GR_MAX_MEMBERS = (GR_MAX_LINE_LEN-(24+3+6))/9 */
+#define GR_MAX_MEMBERS 11
+
+#endif /* !GR_SCALE_DYNAMIC */
+
+
+/*
+ * Define GR_DYNAMIC_GROUP_LIST to make initgroups() dynamically allocate
+ * space for it's GID array before calling setgroups().  This is probably
+ * unnecessary scalage, so it's undefined by default.
+ */
+#undef GR_DYNAMIC_GROUP_LIST
+
+#ifndef GR_DYNAMIC_GROUP_LIST
+/*
+ * GR_MAX_GROUPS is the size of the static array initgroups() uses for
+ * its static GID array if GR_DYNAMIC_GROUP_LIST isn't defined.
+ */
+#define GR_MAX_GROUPS 64
+
+#endif /* !GR_DYNAMIC_GROUP_LIST */
+
+#endif /* !_CONFIG_GRP_H */
diff --git a/libc/getent/config.h b/libc/getent/config.h
new file mode 100644
index 0000000..337d54b
--- /dev/null
+++ b/libc/getent/config.h
@@ -0,0 +1,65 @@
+/*
+ * config-grp.h - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+
+#ifndef _CONFIG_GRP_H
+#define _CONFIG_GRP_H
+
+/*
+ * Define GR_SCALE_DYNAMIC if you want grp to dynamically scale its read buffer
+ * so that lines of any length can be used.  On very very small systems,
+ * you may want to leave this undefined becasue it will make the grp functions
+ * somewhat larger (because of the inclusion of malloc and the code necessary).
+ * On larger systems, you will want to define this, because grp will _not_
+ * deal with long lines gracefully (they will be skipped).
+ */
+#define GR_SCALE_DYNAMIC
+
+#ifndef GR_SCALE_DYNAMIC
+/*
+ * If scaling is not dynamic, the buffers will be statically allocated, and
+ * maximums must be chosen.  GR_MAX_LINE_LEN is the maximum number of
+ * characters per line in the group file.  GR_MAX_MEMBERS is the maximum
+ * number of members of any given group.
+ */
+#define GR_MAX_LINE_LEN 128
+/* GR_MAX_MEMBERS = (GR_MAX_LINE_LEN-(24+3+6))/9 */
+#define GR_MAX_MEMBERS 11
+
+#endif /* !GR_SCALE_DYNAMIC */
+
+
+/*
+ * Define GR_DYNAMIC_GROUP_LIST to make initgroups() dynamically allocate
+ * space for it's GID array before calling setgroups().  This is probably
+ * unnecessary scalage, so it's undefined by default.
+ */
+#undef GR_DYNAMIC_GROUP_LIST
+
+#ifndef GR_DYNAMIC_GROUP_LIST
+/*
+ * GR_MAX_GROUPS is the size of the static array initgroups() uses for
+ * its static GID array if GR_DYNAMIC_GROUP_LIST isn't defined.
+ */
+#define GR_MAX_GROUPS 64
+
+#endif /* !GR_DYNAMIC_GROUP_LIST */
+
+#endif /* !_CONFIG_GRP_H */
diff --git a/libc/getent/fgetgrent.c b/libc/getent/fgetgrent.c
new file mode 100644
index 0000000..800236f
--- /dev/null
+++ b/libc/getent/fgetgrent.c
@@ -0,0 +1,35 @@
+/*
+ * fgetgrent.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <stdio.h>
+#include <errno.h>
+#include <grp.h>
+
+struct group *
+fgetgrent(FILE * file)
+{
+  if (file==NULL)
+    {
+      errno=EINTR;
+      return NULL;
+    }
+  
+  return __getgrent(fileno(file));
+}
diff --git a/libc/getent/fgetpwent.c b/libc/getent/fgetpwent.c
new file mode 100644
index 0000000..e12b890
--- /dev/null
+++ b/libc/getent/fgetpwent.c
@@ -0,0 +1,35 @@
+/*
+ * fgetpwent.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <errno.h>
+#include <stdio.h>
+#include <pwd.h>
+
+struct passwd *
+fgetpwent(FILE * file)
+{
+  if (file==NULL)
+    {
+      errno=EINTR;
+      return NULL;
+    }
+
+  return __getpwent(fileno(file));
+}
diff --git a/libc/getent/getgrgid.c b/libc/getent/getgrgid.c
new file mode 100644
index 0000000..c1dd20e
--- /dev/null
+++ b/libc/getent/getgrgid.c
@@ -0,0 +1,48 @@
+/*
+ * getgrgid.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <sys/types.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <grp.h>
+
+struct group *
+getgrgid(const gid_t gid)
+{
+  struct group * group;
+  int grp_fd;
+
+  if ((grp_fd=open("/etc/group", O_RDONLY))<0)
+    return NULL;
+
+  while ((group=__getgrent(grp_fd))!=NULL)
+    if (group->gr_gid==gid)
+      {
+	close(grp_fd);
+	return group;
+      }
+
+  close(grp_fd);
+  return NULL;
+}
+
+
+
+
diff --git a/libc/getent/getgrnam.c b/libc/getent/getgrnam.c
new file mode 100644
index 0000000..e6c27fc
--- /dev/null
+++ b/libc/getent/getgrnam.c
@@ -0,0 +1,51 @@
+/*
+ * getgrnam.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <string.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <grp.h>
+
+struct group *
+getgrnam(const char * name)
+{
+  int grp_fd;
+  struct group * group;
+
+  if (name==NULL)
+    {
+      errno=EINVAL;
+      return NULL;
+    }
+
+  if ((grp_fd=open("/etc/group", O_RDONLY))<0)
+    return NULL;
+
+  while ((group=__getgrent(grp_fd))!=NULL)
+    if (!strcmp(group->gr_name, name))
+      {
+	close(grp_fd);
+	return group;
+      }
+
+  close(grp_fd);
+  return NULL;
+}
diff --git a/libc/getent/getpw.c b/libc/getent/getpw.c
new file mode 100644
index 0000000..4f4e390
--- /dev/null
+++ b/libc/getent/getpw.c
@@ -0,0 +1,51 @@
+/*
+ * getpw.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <sys/types.h>
+#include <errno.h>
+#include <stdio.h>
+#include <pwd.h>
+
+int
+getpw(uid_t uid, char *buf)
+{
+  struct passwd * passwd;
+
+  if (buf==NULL)
+    {
+      errno=EINVAL;
+      return -1;
+    }
+  if ((passwd=getpwuid(uid))==NULL)
+    return -1;
+
+  if (sprintf(buf, "%s:%s:%u:%u:%s:%s:%s", passwd->pw_name, passwd->pw_passwd,
+	  passwd->pw_gid, passwd->pw_uid, passwd->pw_gecos,
+	  passwd->pw_dir, passwd->pw_shell)<0)
+    {
+      errno=ENOBUFS;
+      return -1;
+    }
+
+  return 0;
+}  
+
+
+
diff --git a/libc/getent/getpwnam.c b/libc/getent/getpwnam.c
new file mode 100644
index 0000000..85dbc8e
--- /dev/null
+++ b/libc/getent/getpwnam.c
@@ -0,0 +1,52 @@
+/*
+ * getpwnam.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <string.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <pwd.h>
+
+
+struct passwd *
+getpwnam(const char * name)
+{
+  int passwd_fd;
+  struct passwd * passwd;
+
+  if (name==NULL)
+    {
+      errno=EINVAL;
+      return NULL;
+    }
+
+  if ((passwd_fd=open("/etc/passwd", O_RDONLY))<0)
+    return NULL;
+
+  while ((passwd=__getpwent(passwd_fd))!=NULL)
+    if (!strcmp(passwd->pw_name, name))
+      {
+	close(passwd_fd);
+	return passwd;
+      }	  
+
+  close(passwd_fd);
+  return NULL;
+}
diff --git a/libc/getent/getpwuid.c b/libc/getent/getpwuid.c
new file mode 100644
index 0000000..ffd58c1
--- /dev/null
+++ b/libc/getent/getpwuid.c
@@ -0,0 +1,44 @@
+/*
+ * getpwuid.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <pwd.h>
+
+struct passwd *
+getpwuid(uid_t uid)
+{
+  int passwd_fd;
+  struct passwd * passwd;
+
+  if ((passwd_fd=open("/etc/passwd", O_RDONLY))<0)
+    return NULL;
+
+  while ((passwd=__getpwent(passwd_fd))!=NULL)
+    if (passwd->pw_uid==uid)
+      {
+	close(passwd_fd);
+	return passwd;
+      }
+
+  close (passwd_fd);
+  return NULL;
+}
diff --git a/libc/getent/grent.c b/libc/getent/grent.c
new file mode 100644
index 0000000..19d618b
--- /dev/null
+++ b/libc/getent/grent.c
@@ -0,0 +1,57 @@
+/*
+ * grent.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+/*
+ * setgrent(), endgrent(), and getgrent() are mutually-dependent functions,
+ * so they are all included in the same object file, and thus all linked
+ * in together.
+ */
+
+#include <unistd.h>
+#include <fcntl.h>
+#include <grp.h>
+
+static int grp_fd=-1;
+
+void
+setgrent(void)
+{
+  if (grp_fd!=-1)
+    close(grp_fd);
+  grp_fd=open("/etc/group", O_RDONLY);
+}
+
+void
+endgrent(void)
+{
+ if (grp_fd!=-1)
+   close(grp_fd);
+ grp_fd=-1;
+}
+
+struct group *
+getgrent(void)
+{
+  if (grp_fd==-1)
+    return NULL;
+  return __getgrent(grp_fd);
+}
+
+
diff --git a/libc/getent/initgroups.c b/libc/getent/initgroups.c
new file mode 100644
index 0000000..35e1d03
--- /dev/null
+++ b/libc/getent/initgroups.c
@@ -0,0 +1,80 @@
+/*
+ * initgroups.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <string.h>
+#include <fcntl.h>
+#include <grp.h>
+#include "config.h"
+
+int
+initgroups(__const char * user, gid_t gid)
+{
+  register struct group * group;
+#ifndef GR_DYNAMIC_GROUP_LIST
+  gid_t group_list[GR_MAX_GROUPS];
+#else
+  gid_t * group_list=NULL;
+#endif
+  register char ** tmp_mem;
+  int num_groups;
+  int grp_fd;
+
+
+  if ((grp_fd=open("/etc/group", O_RDONLY))<0)
+    return -1;
+
+  num_groups=0;
+#ifdef GR_DYNAMIC_GROUP_LIST
+  group_list=(gid_t *) realloc(group_list, 1);
+#endif
+  group_list[num_groups]=gid;
+#ifndef GR_DYNAMIC_GROUP_LIST
+  while (num_groups<GR_MAX_GROUPS &&
+	 (group=__getgrent(grp_fd))!=NULL)
+#else
+  while ((group=__getgrent(grp_fd))!=NULL)
+#endif      
+    {
+      if (group->gr_gid!=gid);
+        {
+	  tmp_mem=group->gr_mem;
+	  while(*tmp_mem!=NULL)
+	    {
+	      if (!strcmp(*tmp_mem, user))
+		{
+		  num_groups++;
+#ifdef GR_DYNAMIC_GROUP_LIST  
+		  group_list=(gid_t *)realloc(group_list,
+					      num_groups*sizeof(gid_t *));
+#endif		  
+		  group_list[num_groups]=group->gr_gid;
+		}
+	      tmp_mem++;
+	    }
+	}
+    }
+  close(grp_fd);
+  return setgroups(num_groups, group_list);
+}
+
+
+
+
diff --git a/libc/getent/putpwent.c b/libc/getent/putpwent.c
new file mode 100644
index 0000000..a0035ea
--- /dev/null
+++ b/libc/getent/putpwent.c
@@ -0,0 +1,39 @@
+/*
+ * putpwent.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <stdio.h>
+#include <errno.h>
+#include <pwd.h>
+
+int
+putpwent(const struct passwd * passwd, FILE * f)
+{
+  if (passwd == NULL || f == NULL)
+    {
+      errno=EINVAL;
+      return -1;
+    }
+  if (fprintf(f, "%s:%s:%u:%u:%s:%s:%s\n", passwd->pw_name, passwd->pw_passwd,
+	  passwd->pw_gid, passwd->pw_uid, passwd->pw_gecos,
+	  passwd->pw_dir, passwd->pw_shell)<0)
+      return -1;
+
+  return 0;
+}
diff --git a/libc/getent/pwent.c b/libc/getent/pwent.c
new file mode 100644
index 0000000..fd65db2
--- /dev/null
+++ b/libc/getent/pwent.c
@@ -0,0 +1,62 @@
+/*
+ * pwent.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <stdlib.h>
+#include <errno.h>
+#include <pwd.h>
+#include <fcntl.h>
+
+/*
+ * setpwent(), endpwent(), and getpwent() are included in the same object
+ * file, since one cannot be used without the other two, so it makes sense to
+ * link them all in together.
+ */
+
+/* file descriptor for the password file currently open */
+static int pw_fd = -1;
+
+void
+setpwent(void)
+{
+  if (pw_fd!=-1)
+    close(pw_fd);
+
+  pw_fd=open("/etc/passwd", O_RDONLY);
+}
+
+void
+endpwent(void)
+{
+  if (pw_fd!=-1)
+    close(pw_fd);
+  pw_fd=-1;
+}
+
+struct passwd *
+getpwent(void)
+{
+  if (pw_fd!=-1)
+    return __getpwent(pw_fd);
+  return NULL;  
+}
+
+
+ 
diff --git a/libc/getent/test_grp.c b/libc/getent/test_grp.c
new file mode 100644
index 0000000..b5ecd36
--- /dev/null
+++ b/libc/getent/test_grp.c
@@ -0,0 +1,107 @@
+/*
+ * test_grp.c - This file is part of the libc-8086/grp package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <stdio.h>
+#include <fcntl.h>
+#include <grp.h>
+
+int
+main(int argc, char ** argv)
+{
+  struct group * group;
+  char ** tmp_mem;
+  int test_gid;
+
+  fprintf(stderr, "Beginning test of libc/grp...\n");
+
+  fprintf(stderr, "=> Testing setgrent(), getgrent(), endgrent()...\n");
+  fprintf(stderr, "-> setgrent()...\n");
+  setgrent();
+  fprintf(stderr, "-> getgrent()...\n");
+  printf("********************************************************************************\n");
+  while ((group=getgrent())!=NULL)
+    {
+      printf("gr_name\t\t: %s\n", group->gr_name);
+      printf("gr_passwd\t: %s\n", group->gr_passwd);
+      printf("gr_gid\t\t: %d\n", (int) group->gr_gid);
+      printf("gr_mem\t\t: ");
+      fflush(stdout);
+      tmp_mem=group->gr_mem;
+      while(*tmp_mem!=NULL)
+	{
+	  printf("%s, ", *tmp_mem);
+	  tmp_mem++;
+	}
+      printf("\n********************************************************************************\n");
+    }
+  fprintf(stderr, "-> endgrent()...\n");
+  endgrent();
+  fprintf(stderr, "=> Test of setgrent(), getgrent(), endgrent() complete.\n");
+  fprintf(stderr, "=> Testing getgrid(), getgrnam()...\n");
+  fprintf(stderr, "-> getgrgid()...\n");
+  printf("********************************************************************************\n");
+  for(test_gid=0;test_gid<100;test_gid++)
+    {
+      fprintf(stderr, "-> getgrgid(%d)...\n", test_gid);
+      group=getgrgid((gid_t) test_gid);
+      if (group!=NULL)
+	{
+	  printf("gr_name\t: %s\n", group->gr_name);
+	  printf("gr_passwd\t: %s\n", group->gr_passwd);
+	  printf("gr_gid\t: %d\n", (int) group->gr_gid);
+	  printf("gr_mem\t\t: ");
+	  fflush(stdout);
+	  tmp_mem=group->gr_mem;
+	  while(*tmp_mem!=NULL)
+	    {
+	      printf("%s, ", *tmp_mem);
+	      tmp_mem++;
+	    }
+	}
+      printf("\n********************************************************************************\n");
+    }
+  fprintf(stderr, "-> getgrnam()...\n");
+  group=getgrnam("root");
+  if (group==NULL)
+    {
+      printf(">NULL<\n");
+    }
+  else
+    {
+      printf("gr_name\t: %s\n", group->gr_name);
+      printf("gr_passwd\t: %s\n", group->gr_passwd);
+      printf("gr_gid\t: %d\n", (int) group->gr_gid);
+      printf("gr_mem\t\t: ");
+      fflush(stdout);
+      tmp_mem=group->gr_mem;
+      while(*tmp_mem!=NULL)
+	{
+	  printf("%s, ", *tmp_mem);
+	  tmp_mem++;
+	}
+      printf("\n");
+    }
+  
+
+  return 0;
+}
+
+
diff --git a/libc/getent/test_pwd.c b/libc/getent/test_pwd.c
new file mode 100644
index 0000000..74f7657
--- /dev/null
+++ b/libc/getent/test_pwd.c
@@ -0,0 +1,91 @@
+/*
+ * test_pwd.c - This file is part of the libc-8086/pwd package for ELKS,
+ * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>.
+ * 
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+#include <unistd.h>
+#include <stdio.h>
+#include <fcntl.h>
+#include <pwd.h>
+
+int
+main(int argc, char ** argv)
+{
+  struct passwd * passwd;
+  int test_uid;
+
+  fprintf(stderr, "Beginning test of libc/pwd...\n");
+
+  fprintf(stderr, "=> Testing setpwent(), getpwent(), endpwent()...\n");
+  fprintf(stderr, "-> setpwent()...\n");
+  setpwent();
+  fprintf(stderr, "-> getpwent()...\n");
+  printf("********************************************************************************\n");
+  while ((passwd=getpwent())!=NULL)
+    {
+      printf("pw_name\t\t: %s\n", passwd->pw_name);
+      printf("pw_passwd\t: %s\n", passwd->pw_passwd);
+      printf("pw_uid\t\t: %d\n", (int) passwd->pw_uid);
+      printf("pw_gid\t\t: %d\n", (int) passwd->pw_gid);
+      printf("pw_gecos\t: %s\n", passwd->pw_gecos);
+      printf("pw_dir\t\t: %s\n", passwd->pw_dir);
+      printf("pw_shell\t: %s\n", passwd->pw_shell);
+      printf("********************************************************************************\n");
+    }
+  fprintf(stderr, "-> endpwent()...\n");
+  endpwent();
+  fprintf(stderr, "=> Test of setpwent(), getpwent(), endpwent() complete.\n");
+  fprintf(stderr, "=> Testing getpwuid(), getpwnam()...\n");
+  fprintf(stderr, "-> getpwuid()...\n");
+  printf("********************************************************************************\n");
+  for(test_uid=0;test_uid<1000;test_uid++)
+    {
+      fprintf(stderr, "-> getpwuid(%d)...\n", test_uid);
+      passwd=getpwuid((uid_t) test_uid);
+      if (passwd!=NULL)
+	{
+	  printf("pw_name\t\t: %s\n", passwd->pw_name);
+	  printf("pw_passwd\t: %s\n", passwd->pw_passwd);
+	  printf("pw_uid\t\t: %d\n", (int) passwd->pw_uid);
+	  printf("pw_gid\t\t: %d\n", (int) passwd->pw_gid);
+	  printf("pw_gecos\t: %s\n", passwd->pw_gecos);
+	  printf("pw_dir\t\t: %s\n", passwd->pw_dir);
+	  printf("pw_shell\t: %s\n", passwd->pw_shell);
+      printf("********************************************************************************\n");
+	}
+    }
+  fprintf(stderr, "-> getpwnam()...\n");
+  passwd=getpwnam("root");
+  if (passwd==NULL)
+    {
+      printf(">NULL<\n");
+    }
+  else
+    {
+      printf("pw_name\t\t: %s\n", passwd->pw_name);
+      printf("pw_passwd\t: %s\n", passwd->pw_passwd);
+      printf("pw_uid\t\t: %d\n", (int) passwd->pw_uid);
+      printf("pw_gid\t\t: %d\n", (int) passwd->pw_gid);
+      printf("pw_gecos\t: %s\n", passwd->pw_gecos);
+      printf("pw_dir\t\t: %s\n", passwd->pw_dir);
+      printf("pw_shell\t: %s\n", passwd->pw_shell);
+    }
+  return 0;
+}
+
+
diff --git a/libc/getent/utent.c b/libc/getent/utent.c
new file mode 100644
index 0000000..7f9e19a
--- /dev/null
+++ b/libc/getent/utent.c
@@ -0,0 +1,152 @@
+/* utent.c <ndf@linux.mit.edu> */
+/* Let it be known that this is very possibly the worst standard ever.  HP-UX
+   does one thing, someone else does another, linux another... If anyone
+   actually has the standard, please send it to me.
+
+   Note that because of the way this stupid stupid standard works, you
+   have to call endutent() to close the file even if you've not called
+   setutent -- getutid and family use the same file descriptor. */
+
+#include <unistd.h>
+#include <fcntl.h>
+#include <paths.h>
+#include <errno.h>
+#include <string.h>
+#include <utmp.h>
+
+static const char * ut_name=_PATH_UTMP;
+
+static int ut_fd=-1;
+
+struct utmp *
+__getutent(int utmp_fd)
+{
+  static struct utmp utmp;
+  if (read(utmp_fd, (char *) &utmp, sizeof(struct utmp))!=sizeof(struct utmp))
+    return NULL;
+  return &utmp;
+}
+
+void
+setutent(void)
+{
+  if (ut_fd!=-1)
+    close(ut_fd);
+  if ((ut_fd=open(ut_name, O_RDONLY))<0)
+    {
+      perror("setutent: Can't open utmp file");
+      ut_fd=-1;
+    }
+}
+
+void
+endutent(void)
+{
+  if (ut_fd!=-1)
+    close(ut_fd);
+  ut_fd=-1;
+}
+
+struct utmp *
+getutent(void)
+{
+  if (ut_fd==-1)
+    setutent();
+  if (ut_fd==-1)
+    return NULL;
+  return __getutent(ut_fd);
+}
+
+struct utmp *
+getutid(struct utmp * utmp_entry)
+{
+  struct utmp * utmp;
+  
+  if (ut_fd==-1)
+    setutent();
+  if (ut_fd==-1)
+    return NULL;
+
+  while ((utmp=__getutent(ut_fd))!=NULL)
+    {
+      if ((utmp_entry->ut_type==RUN_LVL   ||
+	   utmp_entry->ut_type==BOOT_TIME ||
+	   utmp_entry->ut_type==NEW_TIME  ||
+	   utmp_entry->ut_type==OLD_TIME) &&
+	  utmp->ut_type==utmp_entry->ut_type)
+	return utmp;
+      if ((utmp_entry->ut_type==INIT_PROCESS ||
+	   utmp_entry->ut_type==DEAD_PROCESS ||
+	   utmp_entry->ut_type==LOGIN_PROCESS ||
+	   utmp_entry->ut_type==USER_PROCESS) &&
+	  !strcmp(utmp->ut_id, utmp_entry->ut_id))
+	return utmp;
+    }
+
+  return NULL;
+}
+
+struct utmp *
+getutline(struct utmp * utmp_entry)
+{
+  struct utmp * utmp;
+
+  if (ut_fd==-1)
+    setutent();
+  if (ut_fd==-1)
+    return NULL;
+
+#if 0 /* This is driving me nuts.  It's not an implementation problem -
+	 it's a matter of how things _SHOULD_ behave.  Groan. */
+  lseek(ut_fd, SEEK_CUR, -sizeof(struct utmp));
+#endif
+
+  while ((utmp=__getutent(ut_fd))!=NULL)
+    {
+      if ((utmp->ut_type==USER_PROCESS  ||
+	   utmp->ut_type==LOGIN_PROCESS) &&
+	  !strcmp(utmp->ut_line, utmp_entry->ut_line))
+	return utmp;
+    }
+
+  return NULL;
+}
+
+struct utmp *
+pututline(struct utmp * utmp_entry)
+{
+  struct utmp * ut;
+
+  /* Ignore the return value.  That way, if they've already positioned
+     the file pointer where they want it, everything will work out. */
+  (void) lseek(ut_fd, (off_t) -sizeof(utmp_entry), SEEK_CUR);
+
+  if ((ut=getutid(utmp_entry))!=NULL)
+    {
+      lseek(ut_fd, (off_t) -sizeof(utmp_entry), SEEK_CUR);
+      if (write(ut_fd, (char *) utmp_entry, sizeof(utmp_entry))
+	  != sizeof(utmp_entry))
+	return NULL;
+    }
+  else
+    {
+      lseek(ut_fd, (off_t) 0, SEEK_END);
+      if (write(ut_fd, (char *) utmp_entry, sizeof(utmp_entry))
+	  != sizeof(utmp_entry))
+	return NULL;
+    }
+
+  return utmp_entry;
+}
+
+void
+utmpname(const char * new_ut_name)
+{
+  if (new_ut_name!=NULL)
+    ut_name=new_ut_name;
+
+  if (ut_fd!=-1)
+    close(ut_fd);
+}
+
+