*
* This generates a master /etc/passwd containing all active (status != 0)
* accounts.
+ *
+ * (c) Copyright 1988 by the Massachusetts Institute of Technology.
+ * For copying and distribution information, please see the file
+ * <mit-copyright.h>.
*/
+#include <mit-copyright.h>
#include <stdio.h>
+#include <sms.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/time.h>
extern int errno;
+char *ingres_date_and_time();
+char *whoami = "passwd.gen";
+
main(argc, argv)
int argc;
char **argv;
{
-## char login[9], shell[33], fullname[33], oa[17], op[13], hp[17];
-## int uid, error;
FILE *out = stdout;
+ char *outf, outft[64];
+ struct stat sb;
+## char login[9], shell[33], fullname[33], oa[17], op[13], hp[17], *filetime;
+## char nickname[17];
+## int uid, error, flag;
+ int ingerr();
+
+ IIseterr(ingerr);
+## ingres sms
if (argc == 2) {
- if ((out = fopen(argv[1], "w")) == NULL) {
- fprintf(stderr, "unable to open %s for output\n", argv[1]);
- exit(errno);
+ if (stat(argv[1], &sb) == 0) {
+ filetime = ingres_date_and_time(sb.st_mtime);
+## retrieve (flag = int4(interval("min", tblstats.modtime - filetime)))
+## where tblstats.table = "users"
+ if (flag < 0) {
+ fprintf(stderr, "File %s does not need to be rebuilt.\n",
+ argv[1]);
+ exit(SMS_NO_CHANGE);
+ }
+ }
+ outf = argv[1];
+ sprintf(outft, "%s~", outf);
+ if ((out = fopen(outft, "w")) == NULL) {
+ fprintf(stderr, "unable to open %s for output\n", outf);
+ exit(SMS_OCONFIG);
}
} else if (argc != 1) {
fprintf(stderr, "usage: %s [outfile]\n", argv[0]);
- exit(-1);
+ exit(SMS_ARGS);
+ } else {
+ outf = NULL;
}
-## ingres sms
## set lockmode on users where readlock = nolock
## range of u is users
## retrieve (login = u.#login, uid = u.#uid, shell = u.#shell,
## fullname = u.#fullname, oa = u.office_addr,
+## nickname = u.#nickname,
## op = u.office_phone, hp = u.home_phone)
-## where u.status != 0 sort by #login {
- trim(login);
- trim(fullname);
- trim(oa);
- trim(op);
- trim(hp);
- trim(shell);
- fprintf(out, "%s:*:%d:101:%s,%s,%s,%s:/mit/%s:%s\n",
- login, uid, fullname, oa, op, hp, login, shell);
+## where u.status = 1 {
+ strtrim(login);
+ strtrim(fullname);
+ strtrim(nickname);
+ strtrim(oa);
+ strtrim(op);
+ strtrim(hp);
+ strtrim(shell);
+ fprintf(out, "%s:*:%d:101:%s,%s,%s,%s,%s:/mit/%s:%s\n",
+ login, uid, fullname, nickname, oa, op, hp, login, shell);
## }
## inquire_equel(error = "errorno")
if (error) {
fprintf(out, "Ingres error %d\n", error);
- exit(error);
+ exit(SMS_INGRES_ERR);
}
## exit
if (fclose(out)) {
perror("close failed");
- exit(errno);
+ exit(SMS_CCONFIG);
}
- exit(0);
+ if (outf)
+ fix_file(outf);
+ exit(SMS_SUCCESS);
}
-trim(s)
-register char *s;
+
+/*
+ * ingerr: (supposedly) called when Ingres indicates an error.
+ * I have not yet been able to get this to work to intercept a
+ * database open error.
+ */
+#define INGRES_DEADLOCK 4700
+
+static int ingerr(num)
+ int *num;
{
- register char *p;
+ char buf[256];
+ int ingres_errno;
- for (p = s; *s; s++)
- if (*s != ' ')
- p = s;
- if (p != s) {
- if (*p == ' ')
- *p = 0;
- else
- p[1] = 0;
+ switch (*num) {
+ case INGRES_DEADLOCK:
+ ingres_errno = SMS_DEADLOCK;
+ break;
+ default:
+ ingres_errno = SMS_INGRES_ERR;
}
+ com_err(whoami, SMS_INGRES_ERR, " code %d\n", *num);
+ critical_alert("DCM", "Passwd build encountered INGRES ERROR %d", *num);
+ exit(ingres_errno);
}