1 files changed, 103 insertions, 0 deletions

diff --git a/openbsd-compat/getgrouplist.c b/openbsd-compat/getgrouplist.c
new file mode 100644
index 000000000..f7a27c339
--- /dev/null
+++ b/openbsd-compat/getgrouplist.c
@@ -0,0 +1,103 @@
+/*
+ * Copyright (c) 1991, 1993
+ *      The Regents of the University of California.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *      This product includes software developed by the University of
+ *      California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include "includes.h"
+
+#ifndef HAVE_GETGROUPLIST
+
+#if defined(LIBC_SCCS) && !defined(lint)
+static char rcsid[] = "$OpenBSD: getgrouplist.c,v 1.7 1997/08/19 19:13:27 deraadt Exp $";
+#endif /* LIBC_SCCS and not lint */
+
+/*
+ * get credential
+ */
+#include <sys/types.h>
+#include <string.h>
+#include <grp.h>
+
+int
+getgrouplist(uname, agroup, groups, grpcnt)
+        const char *uname;
+        gid_t agroup;
+        register gid_t *groups;
+        int *grpcnt;
+{
+        register struct group *grp;
+        register int i, ngroups;
+        int ret, maxgroups;
+        int bail;
+
+        ret = 0;
+        ngroups = 0;
+        maxgroups = *grpcnt;
+
+        /*
+         * install primary group
+         */
+        if (ngroups >= maxgroups) {
+                *grpcnt = ngroups;
+                return (-1);
+        }
+        groups[ngroups++] = agroup;
+
+        /*
+         * Scan the group file to find additional groups.
+         */
+        setgrent();
+        while ((grp = getgrent())) {
+                if (grp->gr_gid == agroup)
+                        continue;
+                for (bail = 0, i = 0; bail == 0 && i < ngroups; i++)
+                        if (groups[i] == grp->gr_gid)
+                                bail = 1;
+                if (bail)
+                        continue;
+                for (i = 0; grp->gr_mem[i]; i++) {
+                        if (!strcmp(grp->gr_mem[i], uname)) {
+                                if (ngroups >= maxgroups) {
+                                        ret = -1;
+                                        goto out;
+                                }
+                                groups[ngroups++] = grp->gr_gid;
+                                break;
+                        }
+                }
+        }
+out:
+        endgrent();
+        *grpcnt = ngroups;
+        return (ret);
+}
+
+#endif /* HAVE_GETGROUPLIST */