Bump to version 1.22.1
[platform/upstream/busybox.git] / libpwdgrp / pwd_grp.c
index fcf6eaf..2060d78 100644 (file)
@@ -1,64 +1,92 @@
 /* vi: set sw=4 ts=4: */
-/*  Copyright (C) 2003     Manuel Novoa III
+/* Copyright (C) 2003     Manuel Novoa III
  *
- *  Licensed under GPL v2, or later.  See file LICENSE in this tarball.
+ * Licensed under GPLv2 or later, see file LICENSE in this source tree.
  */
 
-/*  Nov 6, 2003  Initial version.
+/* Nov 6, 2003  Initial version.
  *
- *  NOTE: This implementation is quite strict about requiring all
+ * NOTE: This implementation is quite strict about requiring all
  *    field seperators.  It also does not allow leading whitespace
  *    except when processing the numeric fields.  glibc is more
  *    lenient.  See the various glibc difference comments below.
  *
- *  TODO:
+ * TODO:
  *    Move to dynamic allocation of (currently statically allocated)
  *      buffers; especially for the group-related functions since
  *      large group member lists will cause error returns.
- *
  */
 
 #include "libbb.h"
-#include <features.h>
 #include <assert.h>
 
-#ifndef _PATH_SHADOW
-#define        _PATH_SHADOW    "/etc/shadow"
-#endif
-#ifndef _PATH_PASSWD
-#define        _PATH_PASSWD    "/etc/passwd"
-#endif
-#ifndef _PATH_GROUP
-#define        _PATH_GROUP     "/etc/group"
-#endif
-
 /**********************************************************************/
 /* Sizes for statically allocated buffers. */
 
-/* If you change these values, also change _SC_GETPW_R_SIZE_MAX and
- * _SC_GETGR_R_SIZE_MAX in libc/unistd/sysconf.c to match */
 #define PWD_BUFFER_SIZE 256
 #define GRP_BUFFER_SIZE 256
 
 /**********************************************************************/
 /* Prototypes for internal functions. */
 
-static int __pgsreader(int (*parserfunc)(void *d, char *line), void *data,
-               char *__restrict line_buff, size_t buflen, FILE *f);
+static int bb__pgsreader(
+               int FAST_FUNC (*parserfunc)(void *d, char *line),
+               void *data,
+               char *__restrict line_buff,
+               size_t buflen,
+               FILE *f);
 
-static int __parsepwent(void *pw, char *line);
-static int __parsegrent(void *gr, char *line);
+static int FAST_FUNC bb__parsepwent(void *pw, char *line);
+static int FAST_FUNC bb__parsegrent(void *gr, char *line);
 #if ENABLE_USE_BB_SHADOW
-static int __parsespent(void *sp, char *line);
+static int FAST_FUNC bb__parsespent(void *sp, char *line);
 #endif
 
 /**********************************************************************/
+/* We avoid having big global data. */
+
+struct statics {
+       /* Smaller things first */
+       /* It's ok to use one buffer for getpwuid and getpwnam. Manpage says:
+        * "The return value may point to a static area, and may be overwritten
+        * by subsequent calls to getpwent(), getpwnam(), or getpwuid()."
+        */
+       struct passwd getpw_resultbuf;
+       struct group getgr_resultbuf;
+
+       char getpw_buffer[PWD_BUFFER_SIZE];
+       char getgr_buffer[GRP_BUFFER_SIZE];
+#if 0 //ENABLE_USE_BB_SHADOW
+       struct spwd getsp_resultbuf;
+       char getsp_buffer[PWD_BUFFER_SIZE];
+#endif
+// Not converted - too small to bother
+//pthread_mutex_t mylock = PTHREAD_MUTEX_INITIALIZER;
+//FILE *pwf /*= NULL*/;
+//FILE *grf /*= NULL*/;
+//FILE *spf /*= NULL*/;
+};
+
+static struct statics *ptr_to_statics;
+
+static struct statics *get_S(void)
+{
+       if (!ptr_to_statics)
+               ptr_to_statics = xzalloc(sizeof(*ptr_to_statics));
+       return ptr_to_statics;
+}
+
+/* Always use in this order, get_S() must be called first */
+#define RESULTBUF(name) &((S = get_S())->name##_resultbuf)
+#define BUFFER(name)    (S->name##_buffer)
+
+/**********************************************************************/
 /* For the various fget??ent_r funcs, return
  *
  *  0: success
  *  ENOENT: end-of-file encountered
  *  ERANGE: buflen too small
- *  other error values possible. See __pgsreader.
+ *  other error values possible. See bb__pgsreader.
  *
  * Also, *result == resultbuf on success and NULL on failure.
  *
@@ -76,7 +104,7 @@ int fgetpwent_r(FILE *__restrict stream, struct passwd *__restrict resultbuf,
 
        *result = NULL;
 
-       rv = __pgsreader(__parsepwent, resultbuf, buffer, buflen, stream);
+       rv = bb__pgsreader(bb__parsepwent, resultbuf, buffer, buflen, stream);
        if (!rv) {
                *result = resultbuf;
        }
@@ -92,7 +120,7 @@ int fgetgrent_r(FILE *__restrict stream, struct group *__restrict resultbuf,
 
        *result = NULL;
 
-       rv = __pgsreader(__parsegrent, resultbuf, buffer, buflen, stream);
+       rv = bb__pgsreader(bb__parsegrent, resultbuf, buffer, buflen, stream);
        if (!rv) {
                *result = resultbuf;
        }
@@ -101,6 +129,7 @@ int fgetgrent_r(FILE *__restrict stream, struct group *__restrict resultbuf,
 }
 
 #if ENABLE_USE_BB_SHADOW
+#ifdef UNUSED_FOR_NOW
 int fgetspent_r(FILE *__restrict stream, struct spwd *__restrict resultbuf,
                                char *__restrict buffer, size_t buflen,
                                struct spwd **__restrict result)
@@ -109,7 +138,7 @@ int fgetspent_r(FILE *__restrict stream, struct spwd *__restrict resultbuf,
 
        *result = NULL;
 
-       rv = __pgsreader(__parsespent, resultbuf, buffer, buflen, stream);
+       rv = bb__pgsreader(bb__parsespent, resultbuf, buffer, buflen, stream);
        if (!rv) {
                *result = resultbuf;
        }
@@ -117,44 +146,53 @@ int fgetspent_r(FILE *__restrict stream, struct spwd *__restrict resultbuf,
        return rv;
 }
 #endif
+#endif
 
 /**********************************************************************/
 /* For the various fget??ent funcs, return NULL on failure and a
  * pointer to the appropriate struct (statically allocated) on success.
- */
+ * TODO: audit & stop using these in bbox, they pull in static buffers */
 /**********************************************************************/
 
+#ifdef UNUSED_SINCE_WE_AVOID_STATIC_BUFS
 struct passwd *fgetpwent(FILE *stream)
 {
-       static char buffer[PWD_BUFFER_SIZE];
-       static struct passwd resultbuf;
+       struct statics *S;
+       struct passwd *resultbuf = RESULTBUF(getpw);
+       char *buffer = BUFFER(getpw);
        struct passwd *result;
 
-       fgetpwent_r(stream, &resultbuf, buffer, sizeof(buffer), &result);
+       fgetpwent_r(stream, resultbuf, buffer, sizeof(BUFFER(getpw)), &result);
        return result;
 }
 
 struct group *fgetgrent(FILE *stream)
 {
-       static char buffer[GRP_BUFFER_SIZE];
-       static struct group resultbuf;
+       struct statics *S;
+       struct group *resultbuf = RESULTBUF(getgr);
+       char *buffer = BUFFER(getgr);
        struct group *result;
 
-       fgetgrent_r(stream, &resultbuf, buffer, sizeof(buffer), &result);
+       fgetgrent_r(stream, resultbuf, buffer, sizeof(BUFFER(getgr)), &result);
        return result;
 }
+#endif
 
 #if ENABLE_USE_BB_SHADOW
+#ifdef UNUSED_SINCE_WE_AVOID_STATIC_BUFS
 struct spwd *fgetspent(FILE *stream)
 {
-       static char buffer[PWD_BUFFER_SIZE];
-       static struct spwd resultbuf;
+       struct statics *S;
+       struct spwd *resultbuf = RESULTBUF(getsp);
+       char *buffer = BUFFER(getsp);
        struct spwd *result;
 
-       fgetspent_r(stream, &resultbuf, buffer, sizeof(buffer), &result);
+       fgetspent_r(stream, resultbuf, buffer, sizeof(BUFFER(getsp)), &result);
        return result;
 }
+#endif
 
+#ifdef UNUSED_FOR_NOW
 int sgetspent_r(const char *string, struct spwd *result_buf,
                                char *buffer, size_t buflen, struct spwd **result)
 {
@@ -163,8 +201,8 @@ int sgetspent_r(const char *string, struct spwd *result_buf,
        *result = NULL;
 
        if (buflen < PWD_BUFFER_SIZE) {
      DO_ERANGE:
-               errno=rv;
+ DO_ERANGE:
+               errno = rv;
                goto DONE;
        }
 
@@ -175,7 +213,7 @@ int sgetspent_r(const char *string, struct spwd *result_buf,
                strcpy(buffer, string);
        }
 
-       rv = __parsespent(result_buf, buffer);
+       rv = bb__parsespent(result_buf, buffer);
        if (!rv) {
                *result = result_buf;
        }
@@ -184,74 +222,76 @@ int sgetspent_r(const char *string, struct spwd *result_buf,
        return rv;
 }
 #endif
+#endif /* ENABLE_USE_BB_SHADOW */
 
 /**********************************************************************/
 
-#ifdef GETXXKEY_R_FUNC
-#error GETXXKEY_R_FUNC is already defined!
-#endif
-
-#define GETXXKEY_R_FUNC         getpwnam_R
-#define GETXXKEY_R_PARSER       __parsepwent
+#define GETXXKEY_R_FUNC         getpwnam_r
+#define GETXXKEY_R_PARSER       bb__parsepwent
 #define GETXXKEY_R_ENTTYPE      struct passwd
 #define GETXXKEY_R_TEST(ENT)    (!strcmp((ENT)->pw_name, key))
-#define DO_GETXXKEY_R_KEYTYPE   const char *__restrict
-#define DO_GETXXKEY_R_PATHNAME  _PATH_PASSWD
+#define GETXXKEY_R_KEYTYPE      const char *__restrict
+#define GETXXKEY_R_PATHNAME     _PATH_PASSWD
 #include "pwd_grp_internal.c"
 
-#define GETXXKEY_R_FUNC         getgrnam_R
-#define GETXXKEY_R_PARSER       __parsegrent
+#define GETXXKEY_R_FUNC         getgrnam_r
+#define GETXXKEY_R_PARSER       bb__parsegrent
 #define GETXXKEY_R_ENTTYPE      struct group
 #define GETXXKEY_R_TEST(ENT)    (!strcmp((ENT)->gr_name, key))
-#define DO_GETXXKEY_R_KEYTYPE   const char *__restrict
-#define DO_GETXXKEY_R_PATHNAME  _PATH_GROUP
+#define GETXXKEY_R_KEYTYPE      const char *__restrict
+#define GETXXKEY_R_PATHNAME     _PATH_GROUP
 #include "pwd_grp_internal.c"
 
 #if ENABLE_USE_BB_SHADOW
-#define GETXXKEY_R_FUNC         getspnam_R
-#define GETXXKEY_R_PARSER       __parsespent
+#define GETXXKEY_R_FUNC         getspnam_r
+#define GETXXKEY_R_PARSER       bb__parsespent
 #define GETXXKEY_R_ENTTYPE      struct spwd
 #define GETXXKEY_R_TEST(ENT)    (!strcmp((ENT)->sp_namp, key))
-#define DO_GETXXKEY_R_KEYTYPE   const char *__restrict
-#define DO_GETXXKEY_R_PATHNAME  _PATH_SHADOW
+#define GETXXKEY_R_KEYTYPE      const char *__restrict
+#define GETXXKEY_R_PATHNAME     _PATH_SHADOW
 #include "pwd_grp_internal.c"
 #endif
 
-#define GETXXKEY_R_FUNC         getpwuid_R
-#define GETXXKEY_R_PARSER       __parsepwent
+#define GETXXKEY_R_FUNC         getpwuid_r
+#define GETXXKEY_R_PARSER       bb__parsepwent
 #define GETXXKEY_R_ENTTYPE      struct passwd
 #define GETXXKEY_R_TEST(ENT)    ((ENT)->pw_uid == key)
-#define DO_GETXXKEY_R_KEYTYPE   uid_t
-#define DO_GETXXKEY_R_PATHNAME  _PATH_PASSWD
+#define GETXXKEY_R_KEYTYPE      uid_t
+#define GETXXKEY_R_PATHNAME     _PATH_PASSWD
 #include "pwd_grp_internal.c"
 
-#define GETXXKEY_R_FUNC         getgrgid_R
-#define GETXXKEY_R_PARSER       __parsegrent
+#define GETXXKEY_R_FUNC         getgrgid_r
+#define GETXXKEY_R_PARSER       bb__parsegrent
 #define GETXXKEY_R_ENTTYPE      struct group
 #define GETXXKEY_R_TEST(ENT)    ((ENT)->gr_gid == key)
-#define DO_GETXXKEY_R_KEYTYPE   gid_t
-#define DO_GETXXKEY_R_PATHNAME  _PATH_GROUP
+#define GETXXKEY_R_KEYTYPE      gid_t
+#define GETXXKEY_R_PATHNAME     _PATH_GROUP
 #include "pwd_grp_internal.c"
 
 /**********************************************************************/
+/* TODO: audit & stop using these in bbox, they pull in static buffers */
 
+/* This one has many users */
 struct passwd *getpwuid(uid_t uid)
 {
-       static char buffer[PWD_BUFFER_SIZE];
-       static struct passwd resultbuf;
+       struct statics *S;
+       struct passwd *resultbuf = RESULTBUF(getpw);
+       char *buffer = BUFFER(getpw);
        struct passwd *result;
 
-       getpwuid_r(uid, &resultbuf, buffer, sizeof(buffer), &result);
+       getpwuid_r(uid, resultbuf, buffer, sizeof(BUFFER(getpw)), &result);
        return result;
 }
 
+/* This one has many users */
 struct group *getgrgid(gid_t gid)
 {
-       static char buffer[GRP_BUFFER_SIZE];
-       static struct group resultbuf;
+       struct statics *S;
+       struct group *resultbuf = RESULTBUF(getgr);
+       char *buffer = BUFFER(getgr);
        struct group *result;
 
-       getgrgid_r(gid, &resultbuf, buffer, sizeof(buffer), &result);
+       getgrgid_r(gid, resultbuf, buffer, sizeof(BUFFER(getgr)), &result);
        return result;
 }
 
@@ -260,8 +300,8 @@ struct group *getgrgid(gid_t gid)
  * to have been created as a reentrant version of the non-standard
  * functions getspuid.  Why getspuid was added, I do not know. */
 int getspuid_r(uid_t uid, struct spwd *__restrict resultbuf,
-                      char *__restrict buffer, size_t buflen,
-                      struct spwd **__restrict result)
+                       char *__restrict buffer, size_t buflen,
+                       struct spwd **__restrict result)
 {
        int rv;
        struct passwd *pp;
@@ -281,72 +321,57 @@ int getspuid_r(uid_t uid, struct spwd *__restrict resultbuf,
  * Why it was added, I do not know. */
 struct spwd *getspuid(uid_t uid)
 {
-       static char buffer[PWD_BUFFER_SIZE];
-       static struct spwd resultbuf;
+       struct statics *S;
+       struct spwd *resultbuf = RESULTBUF(getsp);
+       char *buffer = BUFFER(getsp);
        struct spwd *result;
 
-       getspuid_r(uid, &resultbuf, buffer, sizeof(buffer), &result);
+       getspuid_r(uid, resultbuf, buffer, sizeof(BUFFER(getsp)), &result);
        return result;
 }
 #endif
 
+/* This one has many users */
 struct passwd *getpwnam(const char *name)
 {
-       static char buffer[PWD_BUFFER_SIZE];
-       static struct passwd resultbuf;
+       struct statics *S;
+       struct passwd *resultbuf = RESULTBUF(getpw);
+       char *buffer = BUFFER(getpw);
        struct passwd *result;
 
-       getpwnam_r(name, &resultbuf, buffer, sizeof(buffer), &result);
+       getpwnam_r(name, resultbuf, buffer, sizeof(BUFFER(getpw)), &result);
        return result;
 }
 
+/* This one has many users */
 struct group *getgrnam(const char *name)
 {
-       static char buffer[GRP_BUFFER_SIZE];
-       static struct group resultbuf;
+       struct statics *S;
+       struct group *resultbuf = RESULTBUF(getgr);
+       char *buffer = BUFFER(getgr);
        struct group *result;
 
-       getgrnam_r(name, &resultbuf, buffer, sizeof(buffer), &result);
+       getgrnam_r(name, resultbuf, buffer, sizeof(BUFFER(getgr)), &result);
        return result;
 }
 
-#if ENABLE_USE_BB_SHADOW
+#if 0 //ENABLE_USE_BB_SHADOW
 struct spwd *getspnam(const char *name)
 {
-       static char buffer[PWD_BUFFER_SIZE];
-       static struct spwd resultbuf;
+       struct statics *S;
+       struct spwd *resultbuf = RESULTBUF(getsp);
+       char *buffer = BUFFER(getsp);
        struct spwd *result;
 
-       getspnam_r(name, &resultbuf, buffer, sizeof(buffer), &result);
+       getspnam_r(name, resultbuf, buffer, sizeof(BUFFER(getsp)), &result);
        return result;
 }
 #endif
 
-int getpw(uid_t uid, char *buf)
-{
-       struct passwd resultbuf;
-       struct passwd *result;
-       char buffer[PWD_BUFFER_SIZE];
-
-       if (!buf) {
-               errno=EINVAL;
-       } else if (!getpwuid_r(uid, &resultbuf, buffer, sizeof(buffer), &result)) {
-               if (sprintf(buf, "%s:%s:%lu:%lu:%s:%s:%s\n",
-                                       resultbuf.pw_name, resultbuf.pw_passwd,
-                                       (unsigned long)(resultbuf.pw_uid),
-                                       (unsigned long)(resultbuf.pw_gid),
-                                       resultbuf.pw_gecos, resultbuf.pw_dir,
-                                       resultbuf.pw_shell) >= 0
-                       ) {
-                       return 0;
-               }
-       }
-
-       return -1;
-}
-
 /**********************************************************************/
 
+/* FIXME: we don't have such CONFIG_xx - ?! */
+
 #if defined CONFIG_USE_BB_THREADSAFE_SHADOW && defined PTHREAD_MUTEX_INITIALIZER
 static pthread_mutex_t mylock = PTHREAD_MUTEX_INITIALIZER;
 # define LOCK          pthread_mutex_lock(&mylock)
@@ -378,8 +403,8 @@ void endpwent(void)
 
 
 int getpwent_r(struct passwd *__restrict resultbuf,
-                          char *__restrict buffer, size_t buflen,
-                          struct passwd **__restrict result)
+                       char *__restrict buffer, size_t buflen,
+                       struct passwd **__restrict result)
 {
        int rv;
 
@@ -387,14 +412,15 @@ int getpwent_r(struct passwd *__restrict resultbuf,
        *result = NULL;                         /* In case of error... */
 
        if (!pwf) {
-               pwf = fopen(_PATH_PASSWD, "r");
+               pwf = fopen_for_read(_PATH_PASSWD);
                if (!pwf) {
                        rv = errno;
                        goto ERR;
                }
+               close_on_exec_on(fileno(pwf));
        }
 
-       rv = __pgsreader(__parsepwent, resultbuf, buffer, buflen, pwf);
+       rv = bb__pgsreader(bb__parsepwent, resultbuf, buffer, buflen, pwf);
        if (!rv) {
                *result = resultbuf;
        }
@@ -425,8 +451,8 @@ void endgrent(void)
 }
 
 int getgrent_r(struct group *__restrict resultbuf,
-                          char *__restrict buffer, size_t buflen,
-                          struct group **__restrict result)
+                       char *__restrict buffer, size_t buflen,
+                       struct group **__restrict result)
 {
        int rv;
 
@@ -434,14 +460,15 @@ int getgrent_r(struct group *__restrict resultbuf,
        *result = NULL;                         /* In case of error... */
 
        if (!grf) {
-               grf = fopen(_PATH_GROUP, "r");
+               grf = fopen_for_read(_PATH_GROUP);
                if (!grf) {
                        rv = errno;
                        goto ERR;
                }
+               close_on_exec_on(fileno(grf));
        }
 
-       rv = __pgsreader(__parsegrent, resultbuf, buffer, buflen, grf);
+       rv = bb__pgsreader(bb__parsegrent, resultbuf, buffer, buflen, grf);
        if (!rv) {
                *result = resultbuf;
        }
@@ -451,6 +478,7 @@ int getgrent_r(struct group *__restrict resultbuf,
        return rv;
 }
 
+#ifdef UNUSED_FOR_NOW
 #if ENABLE_USE_BB_SHADOW
 static FILE *spf /*= NULL*/;
 void setspent(void)
@@ -473,7 +501,7 @@ void endspent(void)
 }
 
 int getspent_r(struct spwd *resultbuf, char *buffer,
-                          size_t buflen, struct spwd **result)
+                       size_t buflen, struct spwd **result)
 {
        int rv;
 
@@ -481,14 +509,15 @@ int getspent_r(struct spwd *resultbuf, char *buffer,
        *result = NULL;                         /* In case of error... */
 
        if (!spf) {
-               spf = fopen(_PATH_SHADOW, "r");
+               spf = fopen_for_read(_PATH_SHADOW);
                if (!spf) {
                        rv = errno;
                        goto ERR;
                }
+               close_on_exec_on(fileno(spf));
        }
 
-       rv = __pgsreader(__parsespent, resultbuf, buffer, buflen, spf);
+       rv = bb__pgsreader(bb__parsespent, resultbuf, buffer, buflen, spf);
        if (!rv) {
                *result = resultbuf;
        }
@@ -498,7 +527,9 @@ int getspent_r(struct spwd *resultbuf, char *buffer,
        return rv;
 }
 #endif
+#endif /* UNUSED_FOR_NOW */
 
+#ifdef UNUSED_SINCE_WE_AVOID_STATIC_BUFS
 struct passwd *getpwent(void)
 {
        static char line_buff[PWD_BUFFER_SIZE];
@@ -540,75 +571,88 @@ struct spwd *sgetspent(const char *string)
        return result;
 }
 #endif
+#endif /* UNUSED_SINCE_WE_AVOID_STATIC_BUFS */
 
-int initgroups(const char *user, gid_t gid)
+static gid_t *getgrouplist_internal(int *ngroups_ptr, const char *user, gid_t gid)
 {
        FILE *grfile;
        gid_t *group_list;
-       int num_groups, rv;
-       char **m;
+       int ngroups;
        struct group group;
        char buff[PWD_BUFFER_SIZE];
 
-       rv = -1;
-
        /* We alloc space for 8 gids at a time. */
-       group_list = (gid_t *) malloc(8*sizeof(gid_t *));
-       if (group_list
-        && ((grfile = fopen(_PATH_GROUP, "r")) != NULL)
-       ) {
-               *group_list = gid;
-               num_groups = 1;
-
-               while (!__pgsreader(__parsegrent, &group, buff, sizeof(buff), grfile)) {
+       group_list = xmalloc(8 * sizeof(group_list[0]));
+       group_list[0] = gid;
+       ngroups = 1;
+
+       grfile = fopen_for_read(_PATH_GROUP);
+       if (grfile) {
+               while (!bb__pgsreader(bb__parsegrent, &group, buff, sizeof(buff), grfile)) {
+                       char **m;
                        assert(group.gr_mem); /* Must have at least a NULL terminator. */
-                       if (group.gr_gid != gid) {
-                               for (m=group.gr_mem ; *m ; m++) {
-                                       if (!strcmp(*m, user)) {
-                                               if (!(num_groups & 7)) {
-                                                       gid_t *tmp = (gid_t *)
-                                                               realloc(group_list,
-                                                                               (num_groups+8) * sizeof(gid_t *));
-                                                       if (!tmp) {
-                                                               rv = -1;
-                                                               goto DO_CLOSE;
-                                                       }
-                                                       group_list = tmp;
-                                               }
-                                               group_list[num_groups++] = group.gr_gid;
-                                               break;
-                                       }
-                               }
+                       if (group.gr_gid == gid)
+                               continue;
+                       for (m = group.gr_mem; *m; m++) {
+                               if (strcmp(*m, user) != 0)
+                                       continue;
+                               group_list = xrealloc_vector(group_list, /*8=2^3:*/ 3, ngroups);
+                               group_list[ngroups++] = group.gr_gid;
+                               break;
                        }
                }
-
-               rv = setgroups(num_groups, group_list);
-       DO_CLOSE:
                fclose(grfile);
        }
+       *ngroups_ptr = ngroups;
+       return group_list;
+}
 
-       /* group_list will be NULL if initial malloc failed, which may trigger
-        * warnings from various malloc debuggers. */
+int initgroups(const char *user, gid_t gid)
+{
+       int ngroups;
+       gid_t *group_list = getgrouplist_internal(&ngroups, user, gid);
+
+       ngroups = setgroups(ngroups, group_list);
        free(group_list);
-       return rv;
+       return ngroups;
+}
+
+int getgrouplist(const char *user, gid_t gid, gid_t *groups, int *ngroups)
+{
+       int ngroups_old = *ngroups;
+       gid_t *group_list = getgrouplist_internal(ngroups, user, gid);
+
+       if (*ngroups <= ngroups_old) {
+               ngroups_old = *ngroups;
+               memcpy(groups, group_list, ngroups_old * sizeof(groups[0]));
+       } else {
+               ngroups_old = -1;
+       }
+       free(group_list);
+       return ngroups_old;
 }
 
+#ifdef UNUSED_SINCE_WE_AVOID_STATIC_BUFS
 int putpwent(const struct passwd *__restrict p, FILE *__restrict f)
 {
        int rv = -1;
 
+#if 0
+       /* glibc does this check */
        if (!p || !f) {
-               errno=EINVAL;
-       } else {
-               /* No extra thread locking is needed above what fprintf does. */
-               if (fprintf(f, "%s:%s:%lu:%lu:%s:%s:%s\n",
-                                       p->pw_name, p->pw_passwd,
-                                       (unsigned long)(p->pw_uid),
-                                       (unsigned long)(p->pw_gid),
-                                       p->pw_gecos, p->pw_dir, p->pw_shell) >= 0
-                       ) {
-                       rv = 0;
-               }
+               errno = EINVAL;
+               return rv;
+       }
+#endif
+
+       /* No extra thread locking is needed above what fprintf does. */
+       if (fprintf(f, "%s:%s:%lu:%lu:%s:%s:%s\n",
+                               p->pw_name, p->pw_passwd,
+                               (unsigned long)(p->pw_uid),
+                               (unsigned long)(p->pw_gid),
+                               p->pw_gecos, p->pw_dir, p->pw_shell) >= 0
+               ) {
+               rv = 0;
        }
 
        return rv;
@@ -616,60 +660,64 @@ int putpwent(const struct passwd *__restrict p, FILE *__restrict f)
 
 int putgrent(const struct group *__restrict p, FILE *__restrict f)
 {
-       static const char format[] = ",%s";
-       char **m;
-       const char *fmt;
        int rv = -1;
 
-       if (!p || !f) {                         /* Sigh... glibc checks. */
-               errno=EINVAL;
-       } else {
-               if (fprintf(f, "%s:%s:%lu:",
-                                       p->gr_name, p->gr_passwd,
-                                       (unsigned long)(p->gr_gid)) >= 0
-                       ) {
+#if 0
+       /* glibc does this check */
+       if (!p || !f) {
+               errno = EINVAL;
+               return rv;
+       }
+#endif
 
-                       fmt = format + 1;
+       if (fprintf(f, "%s:%s:%lu:",
+                               p->gr_name, p->gr_passwd,
+                               (unsigned long)(p->gr_gid)) >= 0
+       ) {
+               static const char format[] ALIGN1 = ",%s";
 
-                       assert(p->gr_mem);
-                       m = p->gr_mem;
+               char **m;
+               const char *fmt;
 
-                       do {
-                               if (!*m) {
-                                       if (fputc('\n', f) >= 0) {
-                                               rv = 0;
-                                       }
-                                       break;
-                               }
-                               if (fprintf(f, fmt, *m) < 0) {
-                                       break;
-                               }
-                               ++m;
-                               fmt = format;
-                       } while (1);
+               fmt = format + 1;
 
-               }
+               assert(p->gr_mem);
+               m = p->gr_mem;
 
+               while (1) {
+                       if (!*m) {
+                               if (fputc('\n', f) >= 0) {
+                                       rv = 0;
+                               }
+                               break;
+                       }
+                       if (fprintf(f, fmt, *m) < 0) {
+                               break;
+                       }
+                       m++;
+                       fmt = format;
+               }
        }
 
        return rv;
 }
+#endif
 
 #if ENABLE_USE_BB_SHADOW
-static const unsigned char _sp_off[] = {
-       offsetof(struct spwd, sp_lstchg),       /* 2 - not a char ptr */
-       offsetof(struct spwd, sp_min),          /* 3 - not a char ptr */
-       offsetof(struct spwd, sp_max),          /* 4 - not a char ptr */
-       offsetof(struct spwd, sp_warn),         /* 5 - not a char ptr */
-       offsetof(struct spwd, sp_inact),        /* 6 - not a char ptr */
-       offsetof(struct spwd, sp_expire),       /* 7 - not a char ptr */
+#ifdef UNUSED_FOR_NOW
+static const unsigned char put_sp_off[] ALIGN1 = {
+       offsetof(struct spwd, sp_lstchg),       /* 2 - not a char ptr */
+       offsetof(struct spwd, sp_min),          /* 3 - not a char ptr */
+       offsetof(struct spwd, sp_max),          /* 4 - not a char ptr */
+       offsetof(struct spwd, sp_warn),         /* 5 - not a char ptr */
+       offsetof(struct spwd, sp_inact),        /* 6 - not a char ptr */
+       offsetof(struct spwd, sp_expire)        /* 7 - not a char ptr */
 };
 
 int putspent(const struct spwd *p, FILE *stream)
 {
-       static const char ld_format[] = "%ld:";
-       const char *f;
-       long int x;
+       const char *fmt;
+       long x;
        int i;
        int rv = -1;
 
@@ -680,13 +728,13 @@ int putspent(const struct spwd *p, FILE *stream)
                goto DO_UNLOCK;
        }
 
-       for (i=0 ; i < sizeof(_sp_off) ; i++) {
-               f = ld_format;
-               x = *(const long int *)(((const char *) p) + _sp_off[i]);
+       for (i = 0; i < sizeof(put_sp_off); i++) {
+               fmt = "%ld:";
+               x = *(long *)((char *)p + put_sp_off[i]);
                if (x == -1) {
-                       f += 3;
+                       fmt += 3;
                }
-               if (fprintf(stream, f, x) < 0) {
+               if (fprintf(stream, fmt, x) < 0) {
                        goto DO_UNLOCK;
                }
        }
@@ -699,38 +747,39 @@ int putspent(const struct spwd *p, FILE *stream)
                rv = 0;
        }
 
-DO_UNLOCK:
+ DO_UNLOCK:
        return rv;
 }
 #endif
+#endif /* USE_BB_SHADOW */
 
 /**********************************************************************/
-/* Internal uClibc functions.                                   */
+/* Internal functions                                                 */
 /**********************************************************************/
 
-static const unsigned char pw_off[] = {
-       offsetof(struct passwd, pw_name),       /* 0 */
-       offsetof(struct passwd, pw_passwd),     /* 1 */
-       offsetof(struct passwd, pw_uid),        /* 2 - not a char ptr */
-       offsetof(struct passwd, pw_gid),        /* 3 - not a char ptr */
-       offsetof(struct passwd, pw_gecos),      /* 4 */
-       offsetof(struct passwd, pw_dir),        /* 5 */
-       offsetof(struct passwd, pw_shell)       /* 6 */
+static const unsigned char pw_off[] ALIGN1 = {
+       offsetof(struct passwd, pw_name),       /* 0 */
+       offsetof(struct passwd, pw_passwd),     /* 1 */
+       offsetof(struct passwd, pw_uid),        /* 2 - not a char ptr */
+       offsetof(struct passwd, pw_gid),        /* 3 - not a char ptr */
+       offsetof(struct passwd, pw_gecos),      /* 4 */
+       offsetof(struct passwd, pw_dir),        /* 5 */
+       offsetof(struct passwd, pw_shell)       /* 6 */
 };
 
-static int __parsepwent(void *data, char *line)
+static int FAST_FUNC bb__parsepwent(void *data, char *line)
 {
        char *endptr;
        char *p;
        int i;
 
        i = 0;
-       do {
-               p = ((char *) ((struct passwd *) data)) + pw_off[i];
+       while (1) {
+               p = (char *) data + pw_off[i];
 
-               if ((i & 6) ^ 2) {      /* i!=2 and i!=3 */
+               if (i < 2 || i > 3) {
                        *((char **) p) = line;
-                       if (i==6) {
+                       if (i == 6) {
                                return 0;
                        }
                        /* NOTE: glibc difference - glibc allows omission of
@@ -757,22 +806,22 @@ static int __parsepwent(void *data, char *line)
                        }
                }
 
-               *line++ = 0;
-               ++i;
-       } while (1);
+               *line++ = '\0';
+               i++;
+       } /* while (1) */
 
        return -1;
 }
 
 /**********************************************************************/
 
-static const unsigned char gr_off[] = {
-       offsetof(struct group, gr_name),        /* 0 */
-       offsetof(struct group, gr_passwd),      /* 1 */
-       offsetof(struct group, gr_gid)          /* 2 - not a char ptr */
+static const unsigned char gr_off[] ALIGN1 = {
+       offsetof(struct group, gr_name),        /* 0 */
+       offsetof(struct group, gr_passwd),      /* 1 */
+       offsetof(struct group, gr_gid)          /* 2 - not a char ptr */
 };
 
-static int __parsegrent(void *data, char *line)
+static int FAST_FUNC bb__parsegrent(void *data, char *line)
 {
        char *endptr;
        char *p;
@@ -782,8 +831,8 @@ static int __parsegrent(void *data, char *line)
 
        end_of_buf = ((struct group *) data)->gr_name; /* Evil hack! */
        i = 0;
-       do {
-               p = ((char *) ((struct group *) data)) + gr_off[i];
+       while (1) {
+               p = (char *) data + gr_off[i];
 
                if (i < 2) {
                        *((char **) p) = line;
@@ -791,8 +840,8 @@ static int __parsegrent(void *data, char *line)
                        if (!line) {
                                break;
                        }
-                       *line++ = 0;
-                       ++i;
+                       *line++ = '\0';
+                       i++;
                } else {
                        *((gid_t *) p) = strtoul(line, &endptr, 10);
 
@@ -812,9 +861,9 @@ static int __parsegrent(void *data, char *line)
 
                        if (p[1]) { /* We have a member list to process. */
                                /* Overwrite the last ':' with a ',' before counting.
-                                * This allows us to test for initial ',' and adds
-                                * one ',' so that the ',' count equals the member
-                                * count. */
+                                * This allows us to (1) test for initial ','
+                                * and (2) adds one ',' so that the number of commas
+                                * equals the member count. */
                                *p = ',';
                                do {
                                        /* NOTE: glibc difference - glibc allows and trims leading
@@ -845,76 +894,73 @@ static int __parsegrent(void *data, char *line)
 
                        if (--i) {
                                p = endptr;     /* Pointing to char prior to first member. */
-                               do {
+                               while (1) {
                                        *members++ = ++p;
-                                       if (!--i) break;
-                                       while (*++p) {}
-                               } while (1);
+                                       if (!--i)
+                                               break;
+                                       while (*++p)
+                                               continue;
+                               }
                        }
                        *members = NULL;
 
                        return 0;
                }
-       } while (1);
+       } /* while (1) */
 
  ERR:
        return -1;
 }
 
 /**********************************************************************/
+
 #if ENABLE_USE_BB_SHADOW
-static const unsigned char sp_off[] = {
-       offsetof(struct spwd, sp_namp),         /* 0 */
-       offsetof(struct spwd, sp_pwdp),         /* 1 */
-       offsetof(struct spwd, sp_lstchg),       /* 2 - not a char ptr */
-       offsetof(struct spwd, sp_min),          /* 3 - not a char ptr */
-       offsetof(struct spwd, sp_max),          /* 4 - not a char ptr */
-       offsetof(struct spwd, sp_warn),         /* 5 - not a char ptr */
-       offsetof(struct spwd, sp_inact),        /* 6 - not a char ptr */
-       offsetof(struct spwd, sp_expire),       /* 7 - not a char ptr */
-       offsetof(struct spwd, sp_flag)          /* 8 - not a char ptr */
+static const unsigned char sp_off[] ALIGN1 = {
+       offsetof(struct spwd, sp_namp),         /* 0: char* */
+       offsetof(struct spwd, sp_pwdp),         /* 1: char* */
+       offsetof(struct spwd, sp_lstchg),       /* 2: long */
+       offsetof(struct spwd, sp_min),          /* 3: long */
+       offsetof(struct spwd, sp_max),          /* 4: long */
+       offsetof(struct spwd, sp_warn),         /* 5: long */
+       offsetof(struct spwd, sp_inact),        /* 6: long */
+       offsetof(struct spwd, sp_expire),       /* 7: long */
+       offsetof(struct spwd, sp_flag)          /* 8: unsigned long */
 };
 
-static int __parsespent(void *data, char * line)
+static int FAST_FUNC bb__parsespent(void *data, char *line)
 {
        char *endptr;
        char *p;
        int i;
 
        i = 0;
-       do {
-               p = ((char *) ((struct spwd *) data)) + sp_off[i];
+       while (1) {
+               p = (char *) data + sp_off[i];
                if (i < 2) {
                        *((char **) p) = line;
                        line = strchr(line, ':');
                        if (!line) {
-                               break;
+                               break; /* error */
                        }
                } else {
-                       *((long *) p) = (long) strtoul(line, &endptr, 10);
-
+                       *((long *) p) = strtoul(line, &endptr, 10);
                        if (endptr == line) {
-                               *((long *) p) = ((i != 8) ? -1L : ((long)(~0UL)));
+                               *((long *) p) = -1L;
                        }
-
                        line = endptr;
-
                        if (i == 8) {
-                               if (!*endptr) {
-                                       return 0;
+                               if (*line != '\0') {
+                                       break; /* error */
                                }
-                               break;
+                               return 0; /* all ok */
                        }
-
-                       if (*endptr != ':') {
-                               break;
+                       if (*line != ':') {
+                               break; /* error */
                        }
-
                }
-
-               *line++ = 0;
-               ++i;
-       } while (1);
+               *line++ = '\0';
+               i++;
+       }
 
        return EINVAL;
 }
@@ -922,65 +968,72 @@ static int __parsespent(void *data, char * line)
 
 /**********************************************************************/
 
-/* Reads until if EOF, or until if finds a line which fits in the buffer
+/* Reads until EOF, or until it finds a line which fits in the buffer
  * and for which the parser function succeeds.
  *
- * Returns 0 on success and ENOENT for end-of-file (glibc concession).
+ * Returns 0 on success and ENOENT for end-of-file (glibc convention).
  */
-
-static int __pgsreader(int (*parserfunc)(void *d, char *line), void *data,
-                               char *__restrict line_buff, size_t buflen, FILE *f)
+static int bb__pgsreader(
+               int FAST_FUNC (*parserfunc)(void *d, char *line),
+               void *data,
+               char *__restrict line_buff,
+               size_t buflen,
+               FILE *f)
 {
-       int line_len;
        int skip;
        int rv = ERANGE;
 
        if (buflen < PWD_BUFFER_SIZE) {
                errno = rv;
-       } else {
-               skip = 0;
-               do {
-                       if (!fgets(line_buff, buflen, f)) {
-                               if (feof(f)) {
-                                       rv = ENOENT;
-                               }
-                               break;
-                       }
+               return rv;
+       }
 
-                       line_len = strlen(line_buff) - 1; /* strlen() must be > 0. */
-                       if (line_buff[line_len] == '\n') {
-                               line_buff[line_len] = 0;
-                       } else if (line_len + 2 == buflen) { /* line too long */
-                               ++skip;
-                               continue;
+       skip = 0;
+       while (1) {
+               if (!fgets(line_buff, buflen, f)) {
+                       if (feof(f)) {
+                               rv = ENOENT;
                        }
+                       break;
+               }
 
-                       if (skip) {
-                               --skip;
+               {
+                       int line_len = strlen(line_buff) - 1;
+                       if (line_len >= 0 && line_buff[line_len] == '\n') {
+                               line_buff[line_len] = '\0';
+                       } else
+                       if (line_len + 2 == buflen) {
+                               /* A start (or continuation) of overlong line */
+                               skip = 1;
                                continue;
-                       }
+                       } /* else: a last line in the file, and it has no '\n' */
+               }
 
-                       /* NOTE: glibc difference - glibc strips leading whitespace from
-                        * records.  We do not allow leading whitespace. */
-
-                       /* Skip empty lines, comment lines, and lines with leading
-                        * whitespace. */
-                       if (*line_buff && (*line_buff != '#') && !isspace(*line_buff)) {
-                               if (parserfunc == __parsegrent) {       /* Do evil group hack. */
-                                       /* The group entry parsing function needs to know where
-                                        * the end of the buffer is so that it can construct the
-                                        * group member ptr table. */
-                                       ((struct group *) data)->gr_name = line_buff + buflen;
-                               }
+               if (skip) {
+                       /* This "line" is a remainder of overlong line, ignore */
+                       skip = 0;
+                       continue;
+               }
 
-                               if (!parserfunc(data, line_buff)) {
-                                       rv = 0;
-                                       break;
-                               }
+               /* NOTE: glibc difference - glibc strips leading whitespace from
+                * records.  We do not allow leading whitespace. */
+
+               /* Skip empty lines, comment lines, and lines with leading
+                * whitespace. */
+               if (line_buff[0] != '\0' && line_buff[0] != '#' && !isspace(line_buff[0])) {
+                       if (parserfunc == bb__parsegrent) {
+                               /* Do evil group hack:
+                                * The group entry parsing function needs to know where
+                                * the end of the buffer is so that it can construct the
+                                * group member ptr table. */
+                               ((struct group *) data)->gr_name = line_buff + buflen;
                        }
-               } while (1);
-
-       }
+                       if (parserfunc(data, line_buff) == 0) {
+                               rv = 0;
+                               break;
+                       }
+               }
+       } /* while (1) */
 
        return rv;
 }