1 files changed, 366 insertions, 0 deletions

diff --git a/adduser.c b/adduser.c
new file mode 100644
index 000000000..6bd2c253e
--- /dev/null
+++ b/adduser.c
@@ -0,0 +1,366 @@
+/* vi: set sw=4 ts=4: */
+/*
+ * adduser - add users to /etc/passwd and /etc/shadow
+ *
+ *
+ * Copyright (C) 1999 by Lineo, inc.
+ * Written by John Beppu <beppu@lineo.com>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ *
+ */
+
+#include <errno.h>
+#include <fcntl.h>
+#include <stdarg.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <shadow.h>
+#include <time.h>
+#include <unistd.h>
+#include <sys/param.h>
+#include <sys/stat.h>
+#include <sys/types.h>
+#include "busybox.h"
+#include "pwd_grp/pwd.h"
+#include "pwd_grp/grp.h"
+
+#define PASSWD_FILE     "/etc/passwd"
+#define SHADOW_FILE             "/etc/gshadow"
+
+#if 0
+#  define PASSWD_FILE "passwd"
+#  define SHADOW_FILE "shadow"
+#endif
+
+/* structs __________________________ */
+
+typedef struct {
+        uid_t u;
+        gid_t g;
+} Id;
+
+/* data _____________________________ */
+
+/* defaults : should this be in an external file? */
+static char *default_passwd = "x";
+static char *default_gecos = "Embedix User,,,";
+static char *default_home_prefix = "/home";
+static char *default_shell = "/bin/sh";
+
+/* shadow in use? */
+static int shadow_enabled = 0;
+
+/* I was doing this all over the place */
+static FILE *fopen_wrapper(const char *filename, const char *mode)
+{
+        FILE *f;
+
+        f = fopen(filename, mode);
+        if (f == NULL) {
+                fprintf(stderr, "adduser: %s: %s\n", filename, strerror(errno));
+        }
+        return f;
+}
+
+/* remix */
+/* EDR recoded such that the uid may be passed in *p */
+static int passwd_study(const char *filename, struct passwd *p)
+{
+        struct passwd *pw;
+        FILE *passwd;
+
+        const int min = 500;
+        const int max = 65000;
+
+        passwd = fopen_wrapper(filename, "r");
+        if (!passwd)
+                return 4;
+
+        /* EDR if uid is out of bounds, set to min */
+        if ((p->pw_uid > max) || (p->pw_uid < min))
+                p->pw_uid = min;
+
+        /* stuff to do:  
+         * make sure login isn't taken;
+         * find free uid and gid;
+         */
+        while ((pw = fgetpwent(passwd))) {
+                if (strcmp(pw->pw_name, p->pw_name) == 0) {
+                        /* return 0; */
+                        return 1;
+                }
+                if ((pw->pw_uid >= p->pw_uid) && (pw->pw_uid < max)
+                        && (pw->pw_uid >= min)) {
+                        p->pw_uid = pw->pw_uid + 1;
+                }
+        }
+
+        /* EDR check for an already existing gid */
+        while (getgrgid(p->pw_uid) != NULL)
+                p->pw_uid++;
+
+        /* EDR also check for an existing group definition */
+        if (getgrnam(p->pw_name) != NULL)
+                return 3;
+
+        /* EDR bounds check */
+        if ((p->pw_uid > max) || (p->pw_uid < min))
+                return 2;
+
+        /* EDR create new gid always = uid */
+        p->pw_gid = p->pw_uid;
+
+        /* return 1; */
+        return 0;
+}
+
+static void addgroup_wrapper(const char *login, gid_t gid)
+{
+        int argc = 4;
+        char *argv[] = { "addgroup", "-g", NULL, NULL };
+        char group_id[8];
+        char group_name[32];
+
+        strncpy(group_name, login, 32);
+        argv[3] = group_name;
+        sprintf(group_id, "%d", gid);
+        argv[2] = group_id;
+        addgroup_main(argc, argv);
+}
+
+static void passwd_wrapper(const char *login)
+{
+        char *prog = "passwd";
+        execlp(prog, prog, login, NULL);
+        error_msg_and_die("Failed to execute 'passwd', you must set the password for '%s' manually\n", login);
+}
+
+/*
+ * pwd_to_spwd - create entries for new spwd structure
+ *
+ *      pwd_to_spwd() creates a new (struct spwd) containing the
+ *      information in the pointed-to (struct passwd).
+ */
+#define DAY (24L*3600L)
+#define WEEK (7*DAY)
+#define SCALE DAY
+static struct spwd *pwd_to_spwd(const struct passwd *pw)
+{
+        static struct spwd sp;
+
+        /*
+         * Nice, easy parts first.  The name and passwd map directly
+         * from the old password structure to the new one.
+         */
+        sp.sp_namp = pw->pw_name;
+        sp.sp_pwdp = pw->pw_passwd;
+
+        /*
+         * Defaults used if there is no pw_age information.
+         */
+        sp.sp_min = 0;
+        sp.sp_max = (10000L * DAY) / SCALE;
+        sp.sp_lstchg = time((time_t *) 0) / SCALE;
+
+        /*
+         * These fields have no corresponding information in the password
+         * file.  They are set to uninitialized values.
+         */
+        sp.sp_warn = -1;
+        sp.sp_expire = -1;
+        sp.sp_inact = -1;
+        sp.sp_flag = -1;
+
+        return &sp;
+}
+
+/* putpwent(3) remix */
+static int adduser(const char *filename, struct passwd *p)
+{
+        FILE *passwd;
+        int r;
+        FILE *shadow;
+        struct spwd *sp;
+
+        /* make sure everything is kosher and setup uid && gid */
+        passwd = fopen_wrapper(filename, "a");
+        if (passwd == NULL) {
+                /* return -1; */
+                return 1;
+        }
+        fseek(passwd, 0, SEEK_END);
+
+        /* if (passwd_study(filename, p) == 0) { */
+        r = passwd_study(filename, p);
+        if (r) {
+                if (r == 1)
+                        error_msg("%s: login already in use\n", p->pw_name);
+                else if (r == 2)
+                        error_msg("illegal uid or no uids left\n");
+                else if (r == 3)
+                        error_msg("group name %s already in use\n", p->pw_name);
+                else
+                        error_msg("generic error.\n");
+                /* return -1; */
+                return 1;
+        }
+
+        /* add to passwd */
+        if (putpwent(p, passwd) == -1) {
+                /* return -1; */
+                return 1;
+        }
+        fclose(passwd);
+
+        /* add to shadow if necessary */
+        if (shadow_enabled) {
+                shadow = fopen_wrapper(SHADOW_FILE, "a");
+                if (shadow == NULL) {
+                        /* return -1; */
+                        return 1;
+                }
+                fseek(shadow, 0, SEEK_END);
+                sp = pwd_to_spwd(p);
+                sp->sp_max = 99999;             /* debianish */
+                sp->sp_warn = 7;
+                fprintf(shadow, "%s:!:%ld:%ld:%ld:%ld:::\n",
+                                sp->sp_namp, sp->sp_lstchg, sp->sp_min, sp->sp_max,
+                                sp->sp_warn);
+                fclose(shadow);
+        }
+
+        /* add to group */
+        /* addgroup should be responsible for dealing w/ gshadow */
+        addgroup_wrapper(p->pw_name, p->pw_gid);
+
+        /* Clear the umask for this process so it doesn't
+         * * screw up the permissions on the mkdir and chown. */
+        umask(0);
+
+        /* mkdir */
+        if (mkdir(p->pw_dir, 0755)) {
+                perror_msg("%s", p->pw_dir);
+        }
+        /* Set the owner and group so it is owned by the new user. */
+        if (chown(p->pw_dir, p->pw_uid, p->pw_gid)) {
+                perror_msg("%s", p->pw_dir);
+        }
+        /* Now fix up the permissions to 2755. Can't do it before now
+         * since chown will clear the setgid bit */
+        if (chmod(p->pw_dir, 02755)) {
+                perror_msg("%s", p->pw_dir);
+        }
+        /* interactively set passwd */
+        passwd_wrapper(p->pw_name);
+
+        return 0;
+}
+
+
+/* return current uid (root is always uid == 0, right?) */
+static uid_t i_am_not_root()
+{
+        return geteuid();
+}
+
+/*
+ * adduser will take a login_name as its first parameter.
+ *
+ * home
+ * shell
+ * gecos 
+ *
+ * can be customized via command-line parameters.
+ * ________________________________________________________________________ */
+int adduser_main(int argc, char **argv)
+{
+        int i;
+        char opt;
+        char *login;
+        char *gecos;
+        char *home = NULL;
+        char *shell;
+        char path[MAXPATHLEN];
+
+        struct passwd pw;
+
+        /* init */
+        if (argc < 2) {
+                show_usage();
+        }
+        gecos = default_gecos;
+        shell = default_shell;
+
+        /* get args */
+        for (i = 1; i < argc; i++) {
+                if (argv[i][0] == '-') {
+                        opt = argv[i][1];
+                        switch (opt) {
+                        case 'h':
+                                home = argv[++i];
+                                break;
+                        case 'g':
+                                gecos = argv[++i];
+                                break;
+                        case 's':
+                                shell = argv[++i];
+                                break;
+                        default:
+                                error_msg("invalid option -- %c\n", opt);
+                                break;
+                        }
+                } else {
+                        break;
+                }
+        }
+
+        /* got root? */
+        if (i_am_not_root()) {
+                error_msg_and_die( "Only root may add a user or group to the system.\n");
+        }
+
+        /* get login */
+        if (i >= argc) {
+                error_msg_and_die( "adduser: no user specified\n");
+        }
+        login = argv[i];
+
+        /* create string for $HOME if not specified already */
+        if (!home) {
+                snprintf(path, MAXPATHLEN, "%s/%s", default_home_prefix, login);
+                path[MAXPATHLEN - 1] = 0;
+                home = path;
+        }
+        /* is /etc/shadow in use? */
+        shadow_enabled = (0 == access(SHADOW_FILE, F_OK));
+
+        /* create a passwd struct */
+        pw.pw_name = login;
+        pw.pw_passwd = default_passwd;
+        pw.pw_uid = 0;
+        pw.pw_gid = 0;
+        pw.pw_gecos = gecos;
+        pw.pw_dir = home;
+        pw.pw_shell = shell;
+
+        /* grand finale */
+        i = adduser(PASSWD_FILE, &pw);
+
+        return (i);
+}
+
+/* $Id: adduser.c,v 1.1 2001/08/21 16:18:59 andersen Exp $ */