loginutils/adduser.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * adduser - add users to /etc/passwd and /etc/shadow
   4  *
   5  * Copyright (C) 1999 by Lineo, inc. and John Beppu
   6  * Copyright (C) 1999,2000,2001 by John Beppu <beppu@codepoet.org>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16  * General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  21  *
  22  */
  23
  24 #include <errno.h>
  25 #include <fcntl.h>
  26 #include <stdarg.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <string.h>
  30 #include <time.h>
  31 #include <unistd.h>
  32 #include <sys/param.h>
  33 #include <sys/stat.h>
  34 #include <sys/types.h>
  35 #include "busybox.h"
  36
  37
  38
  39 /* structs __________________________ */
  40
  41 typedef struct {
  42         uid_t u;
  43         gid_t g;
  44 } Id;
  45
  46 /* data _____________________________ */
  47
  48 /* defaults : should this be in an external file? */
  49 static const char default_passwd[] = "x";
  50 static const char default_gecos[] = "Linux User,,,";
  51 static const char default_home_prefix[] = "/home";
  52 static const char default_shell[] = "/bin/sh";
  53
  54 #ifdef CONFIG_FEATURE_SHADOWPASSWDS
  55 /* shadow in use? */
  56 static int shadow_enabled = 0;
  57 #endif
  58
  59 /* remix */
  60 /* EDR recoded such that the uid may be passed in *p */
  61 static int passwd_study(const char *filename, struct passwd *p)
  62 {
  63         struct passwd *pw;
  64         FILE *passwd;
  65
  66         const int min = 500;
  67         const int max = 65000;
  68
  69         passwd = wfopen(filename, "r");
  70         if (!passwd)
  71                 return 4;
  72
  73         /* EDR if uid is out of bounds, set to min */
  74         if ((p->pw_uid > max) || (p->pw_uid < min))
  75                 p->pw_uid = min;
  76
  77         /* stuff to do:
  78          * make sure login isn't taken;
  79          * find free uid and gid;
  80          */
  81         while ((pw = fgetpwent(passwd))) {
  82                 if (strcmp(pw->pw_name, p->pw_name) == 0) {
  83                         /* return 0; */
  84                         return 1;
  85                 }
  86                 if ((pw->pw_uid >= p->pw_uid) && (pw->pw_uid < max)
  87                         && (pw->pw_uid >= min)) {
  88                         p->pw_uid = pw->pw_uid + 1;
  89                 }
  90         }
  91
  92         /* EDR check for an already existing gid */
  93         while (getgrgid(p->pw_uid) != NULL)
  94                 p->pw_uid++;
  95
  96         /* EDR also check for an existing group definition */
  97         if (getgrnam(p->pw_name) != NULL)
  98                 return 3;
  99
 100         /* EDR bounds check */
 101         if ((p->pw_uid > max) || (p->pw_uid < min))
 102                 return 2;
 103
 104         /* EDR create new gid always = uid */
 105         p->pw_gid = p->pw_uid;
 106
 107         /* return 1; */
 108         return 0;
 109 }
 110
 111 static void addgroup_wrapper(const char *login, gid_t gid)
 112 {
 113         char *cmd = xmalloc(strlen(login)+32);
 114
 115         sprintf(cmd, "addgroup -g %d %s", gid, login);
 116         system(cmd);
 117         free(cmd);
 118 }
 119
 120 static void passwd_wrapper(const char *login)
 121 {
 122         static const char prog[] = "passwd";
 123         execlp(prog, prog, login, NULL);
 124         error_msg_and_die("Failed to execute 'passwd', you must set the password for '%s' manually", login);
 125 }
 126
 127 /* putpwent(3) remix */
 128 static int adduser(const char *filename, struct passwd *p)
 129 {
 130         FILE *passwd;
 131         int r;
 132 #ifdef CONFIG_FEATURE_SHADOWPASSWDS
 133         FILE *shadow;
 134         struct spwd *sp;
 135 #endif
 136
 137         /* make sure everything is kosher and setup uid && gid */
 138         passwd = wfopen(filename, "a");
 139         if (passwd == NULL) {
 140                 /* return -1; */
 141                 return 1;
 142         }
 143         fseek(passwd, 0, SEEK_END);
 144
 145         /* if (passwd_study(filename, p) == 0) { */
 146         r = passwd_study(filename, p);
 147         if (r) {
 148                 if (r == 1)
 149                         error_msg("%s: login already in use", p->pw_name);
 150                 else if (r == 2)
 151                         error_msg("illegal uid or no uids left");
 152                 else if (r == 3)
 153                         error_msg("group name %s already in use", p->pw_name);
 154                 else
 155                         error_msg("generic error.");
 156                 /* return -1; */
 157                 return 1;
 158         }
 159
 160         /* add to passwd */
 161         if (putpwent(p, passwd) == -1) {
 162                 /* return -1; */
 163                 return 1;
 164         }
 165         fclose(passwd);
 166
 167 #ifdef CONFIG_FEATURE_SHADOWPASSWDS
 168         /* add to shadow if necessary */
 169         if (shadow_enabled) {
 170                 shadow = wfopen(shadow_file, "a");
 171                 if (shadow == NULL) {
 172                         /* return -1; */
 173                         return 1;
 174                 }
 175                 fseek(shadow, 0, SEEK_END);
 176                 sp = pwd_to_spwd(p);
 177                 sp->sp_max = 99999;             /* debianish */
 178                 sp->sp_warn = 7;
 179                 fprintf(shadow, "%s:!:%ld:%ld:%ld:%ld:::\n",
 180                                 sp->sp_namp, sp->sp_lstchg, sp->sp_min, sp->sp_max,
 181                                 sp->sp_warn);
 182                 fclose(shadow);
 183         }
 184 #endif
 185
 186         /* add to group */
 187         /* addgroup should be responsible for dealing w/ gshadow */
 188         addgroup_wrapper(p->pw_name, p->pw_gid);
 189
 190         /* Clear the umask for this process so it doesn't
 191          * * screw up the permissions on the mkdir and chown. */
 192         umask(0);
 193
 194         /* mkdir */
 195         if (mkdir(p->pw_dir, 0755)) {
 196                 perror_msg("%s", p->pw_dir);
 197         }
 198         /* Set the owner and group so it is owned by the new user. */
 199         if (chown(p->pw_dir, p->pw_uid, p->pw_gid)) {
 200                 perror_msg("%s", p->pw_dir);
 201         }
 202         /* Now fix up the permissions to 2755. Can't do it before now
 203          * since chown will clear the setgid bit */
 204         if (chmod(p->pw_dir, 02755)) {
 205                 perror_msg("%s", p->pw_dir);
 206         }
 207         /* interactively set passwd */
 208         passwd_wrapper(p->pw_name);
 209
 210         return 0;
 211 }
 212
 213
 214 /* return current uid (root is always uid == 0, right?) */
 215 static inline uid_t i_am_not_root(void)
 216 {
 217         return geteuid();
 218 }
 219
 220 /*
 221  * adduser will take a login_name as its first parameter.
 222  *
 223  * home
 224  * shell
 225  * gecos
 226  *
 227  * can be customized via command-line parameters.
 228  * ________________________________________________________________________ */
 229 int adduser_main(int argc, char **argv)
 230 {
 231         int opt;
 232         const char *login;
 233         const char *gecos;
 234         const char *home = NULL;
 235         const char *shell;
 236
 237         struct passwd pw;
 238
 239         /* init */
 240         if (argc < 2) {
 241                 show_usage();
 242         }
 243         gecos = default_gecos;
 244         shell = default_shell;
 245
 246         /* get args */
 247         while ((opt = getopt (argc, argv, "h:g:s:")) != -1)
 248                 switch (opt) {
 249                         case 'h':
 250                                 home = optarg;
 251                                 break;
 252                         case 'g':
 253                                 gecos = optarg;
 254                                 break;
 255                         case 's':
 256                                 shell = optarg;
 257                                 break;
 258                         default:
 259                                 show_usage ();
 260                                 break;
 261                 }
 262
 263         /* got root? */
 264         if (i_am_not_root()) {
 265                 error_msg_and_die( "Only root may add a user or group to the system.");
 266         }
 267
 268         /* get login */
 269         if (optind >= argc) {
 270                 error_msg_and_die( "no user specified");
 271         }
 272         login = argv[optind];
 273
 274         /* create string for $HOME if not specified already */
 275         if (!home) {
 276                 home = concat_path_file(default_home_prefix, login);
 277         }
 278 #ifdef CONFIG_FEATURE_SHADOWPASSWDS
 279         /* is /etc/shadow in use? */
 280         shadow_enabled = (0 == access(shadow_file, F_OK));
 281 #endif
 282
 283         /* create a passwd struct */
 284         pw.pw_name = (char *)login;
 285         pw.pw_passwd = (char *)default_passwd;
 286         pw.pw_uid = 0;
 287         pw.pw_gid = 0;
 288         pw.pw_gecos = (char *)gecos;
 289         pw.pw_dir = (char *)home;
 290         pw.pw_shell = (char *)shell;
 291
 292         /* grand finale */
 293         return adduser(passwd_file, &pw);
 294 }
 295
 296 /* $Id: adduser.c,v 1.3 2002/07/16 23:50:05 sandman Exp $ */