fixed exit codes

[unix-history] / usr / src / usr.sbin / vipw / vipw.c

#ifndef lint
static char sccsid[] = "@(#)vipw.c      4.3 (Berkeley) %G%";
#endif

#include <sys/types.h>
#include <sys/stat.h>
#include <sys/file.h>

#include <stdio.h>
#include <errno.h>
#include <signal.h>

/*
* Password file editor with locking.
*/
char    *temp = "/etc/ptmp";
char    *passwd = "/etc/passwd";
char    buf[BUFSIZ];
char    *getenv();
char    *index();
extern  int errno;

main(argc, argv)
       char *argv[];
{
       int fd;
       FILE *ft, *fp;
       char *editor;

       signal(SIGINT, SIG_IGN);
       signal(SIGQUIT, SIG_IGN);
       signal(SIGHUP, SIG_IGN);
       setbuf(stderr, NULL);
       umask(0);
       fd = open(temp, O_WRONLY|O_CREAT|O_EXCL, 0644);
       if (fd < 0) {
               if (errno == EEXIST) {
                       fprintf(stderr, "vipw: password file busy\n");
                       exit(1);
               }
               fprintf(stderr, "vipw: "); perror(temp);
               exit(1);
       }
       ft = fdopen(fd, "w");
       if (ft == NULL) {
               fprintf(stderr, "vipw: "); perror(temp);
               goto bad;
       }
       fp = fopen(passwd, "r");
       if (fp == NULL) {
               fprintf(stderr, "vipw: "); perror(passwd);
               goto bad;
       }
       while (fgets(buf, sizeof (buf) - 1, fp) != NULL)
               fputs(buf, ft);
       fclose(ft); fclose(fp);
       editor = getenv("EDITOR");
       if (editor == 0)
               editor = "vi";
       sprintf(buf, "%s %s", editor, temp);
       if (system(buf) == 0) {
               struct stat sbuf;
               int ok;

               /* sanity checks */
               if (stat(temp, &sbuf) < 0) {
                       fprintf(stderr,
                           "vipw: can't stat temp file, %s unchanged\n",
                           passwd);
                       goto bad;
               }
               if (sbuf.st_size == 0) {
                       fprintf(stderr, "vipw: bad temp file, %s unchanged\n",
                           passwd);
                       goto bad;
               }
               ft = fopen(temp, "r");
               if (ft == NULL) {
                       fprintf(stderr,
                           "vipw: can't reopen temp file, %s unchanged\n",
                           passwd);
                       goto bad;
               }
               ok = 0;
               while (fgets(buf, sizeof (buf) - 1, ft) != NULL) {
                       register char *cp;

                       cp = index(buf, '\n');
                       if (cp == 0)
                               continue;
                       *cp = '\0';
                       cp = index(buf, ':');
                       if (cp == 0)
                               continue;
                       *cp = '\0';
                       if (strcmp(buf, "root"))
                               continue;
                       /* password */
                       cp = index(cp + 1, ':');
                       if (cp == 0)
                               break;
                       /* uid */
                       if (atoi(cp + 1) != 0)
                               break;
                       cp = index(cp + 1, ':');
                       if (cp == 0)
                               break;
                       /* gid */
                       cp = index(cp + 1, ':');
                       if (cp == 0)
                               break;
                       /* gecos */
                       cp = index(cp + 1, ':');
                       if (cp == 0)
                               break;
                       /* login directory */
                       if (strncmp(++cp, "/:"))
                               break;
                       cp += 2;
                       if (*cp && strcmp(cp, "/bin/sh") &&
                           strcmp(cp, "/bin/csh"))
                               break;
                       ok++;
               }
               fclose(ft);
               if (ok) {
                       if (rename(temp, passwd) < 0)
                               fprintf(stderr, "vipw: "), perror("rename");
                       else
                               exit(0);
               } else
                       fprintf(stderr,
                           "vipw: you mangled the temp file, %s unchanged\n",
                           passwd);
       }
bad:
       unlink(temp);
       exit(1);
}