Annotation of src/usr.bin/skeyinit/skeyinit.c, Revision 1.17
1.17 ! millert 1: /* $OpenBSD: skeyinit.c,v 1.16 1996/10/23 18:09:27 millert Exp $ */
1.1 deraadt 2: /* $NetBSD: skeyinit.c,v 1.6 1995/06/05 19:50:48 pk Exp $ */
3:
4: /* S/KEY v1.1b (skeyinit.c)
5: *
6: * Authors:
7: * Neil M. Haller <nmh@thumper.bellcore.com>
8: * Philip R. Karn <karn@chicago.qualcomm.com>
9: * John S. Walden <jsw@thumper.bellcore.com>
10: * Scott Chasin <chasin@crimelab.com>
11: *
12: * S/KEY initialization and seed update
13: */
14:
15: #include <sys/param.h>
16: #include <sys/time.h>
17: #include <sys/resource.h>
18:
19: #include <stdio.h>
20: #include <stdlib.h>
21: #include <string.h>
22: #include <err.h>
23: #include <pwd.h>
24: #include <unistd.h>
25: #include <time.h>
1.6 millert 26: #include <utmp.h>
1.1 deraadt 27: #include <ctype.h>
1.4 millert 28: #include <skey.h>
1.1 deraadt 29:
1.4 millert 30: #ifndef SKEY_NAMELEN
1.17 ! millert 31: #define SKEY_NAMELEN 4
1.4 millert 32: #endif
1.1 deraadt 33:
1.8 millert 34: void usage __P((char *));
35:
1.1 deraadt 36: int
37: main(argc, argv)
38: int argc;
39: char *argv[];
40: {
1.17 ! millert 41: int rval, nn, i, l, n=0, defaultsetup=1, zerokey=0, hexmode=0;
1.1 deraadt 42: time_t now;
43: char hostname[MAXHOSTNAMELEN];
1.17 ! millert 44: char passwd[SKEY_MAX_PW_LEN+2], passwd2[SKEY_MAX_PW_LEN+2];
! 45: char seed[SKEY_MAX_SEED_LEN+2], defaultseed[SKEY_MAX_SEED_LEN+1];
! 46: char tbuf[27], buf[80], key[SKEY_BINKEY_SIZE];
1.8 millert 47: char lastc, me[UT_NAMESIZE+1], *salt, *p, *pw, *ht=NULL;
1.1 deraadt 48: struct skey skey;
49: struct passwd *pp;
50: struct tm *tm;
51:
1.4 millert 52: if (geteuid() != 0)
53: errx(1, "must be setuid root.");
54:
1.1 deraadt 55: if (gethostname(hostname, sizeof(hostname)) < 0)
56: err(1, "gethostname");
1.4 millert 57: (void)strncpy(defaultseed, hostname, sizeof(defaultseed) - 1);
58: defaultseed[SKEY_NAMELEN] = '\0';
1.17 ! millert 59: (void)time(&now);
! 60: (void)sprintf(tbuf, "%05ld", (long) (now % 100000));
1.4 millert 61: (void)strncat(defaultseed, tbuf, sizeof(defaultseed) - 5);
1.1 deraadt 62:
63: if ((pp = getpwuid(getuid())) == NULL)
64: err(1, "no user with uid %d", getuid());
1.4 millert 65: (void)strcpy(me, pp->pw_name);
1.1 deraadt 66:
67: if ((pp = getpwnam(me)) == NULL)
68: err(1, "Who are you?");
1.16 millert 69: salt = pp->pw_passwd;
1.1 deraadt 70:
1.8 millert 71: for (i = 1; i < argc && argv[i][0] == '-' && strcmp(argv[i], "--");) {
72: if (argv[i][2] == '\0') {
73: /* Single character switch */
74: switch (argv[i][1]) {
1.4 millert 75: case 's':
76: defaultsetup = 0;
77: break;
78: case 'x':
79: hexmode = 1;
80: break;
81: case 'z':
82: zerokey = 1;
83: break;
1.17 ! millert 84: case 'n':
! 85: if (argv[++i][0] == '\0')
! 86: usage(argv[0]);
! 87: if ((n = atoi(argv[i])) < 1 || n >= SKEY_MAX_SEQ)
! 88: errx(1, "count must be > 0 and < %d",
! 89: SKEY_MAX_SEQ);
! 90: break;
1.8 millert 91: default:
92: usage(argv[0]);
93: }
94: } else {
95: /* Multi character switches are hash types */
96: if ((ht = skey_set_algorithm(&argv[i][1])) == NULL) {
97: warnx("Unknown hash algorithm %s", &argv[i][1]);
98: usage(argv[0]);
99: }
1.7 millert 100: }
1.8 millert 101: i++;
1.7 millert 102: }
103:
104: /* check for optional user string */
1.8 millert 105: if (argc - i > 1) {
106: usage(argv[0]);
107: } else if (argv[i]) {
1.16 millert 108: if ((pp = getpwnam(argv[i])) == NULL) {
109: if (getuid() == 0) {
110: static struct passwd _pp;
111:
112: _pp.pw_name = argv[i];
113: pp = &_pp;
114: warnx("Warning, user unknown: %s", argv[i]);
115: } else {
116: errx(1, "User unknown: %s", argv[i]);
117: }
118: } else if (strcmp(pp->pw_name, me) != 0) {
1.4 millert 119: if (getuid() != 0) {
120: /* Only root can change other's passwds */
121: errx(1, "Permission denied.");
122: }
1.1 deraadt 123: }
124: }
125:
126: if (getuid() != 0) {
1.11 millert 127: pw = getpass("Password (or `s/key'):");
1.10 millert 128: if (strcasecmp(pw, "s/key") == 0) {
129: if (skey_haskey(me))
130: exit(1);
131: if (skey_authenticate(me))
132: errx(1, "Password incorrect.");
133: } else {
134: p = crypt(pw, salt);
135: if (strcmp(p, pp->pw_passwd))
136: errx(1, "Password incorrect.");
137: }
138: }
1.1 deraadt 139:
1.10 millert 140: (void)setpriority(PRIO_PROCESS, 0, -4);
1.4 millert 141:
1.1 deraadt 142: rval = skeylookup(&skey, pp->pw_name);
143: switch (rval) {
1.4 millert 144: case -1:
145: err(1, "cannot open database");
146: case 0:
147: /* comment out user if asked to */
148: if (zerokey)
149: exit(skeyzero(&skey, pp->pw_name));
150:
151: (void)printf("[Updating %s]\n", pp->pw_name);
1.12 millert 152: (void)printf("Old key: [%s] %s\n", skey_get_algorithm(),
153: skey.seed);
1.4 millert 154:
155: /*
1.17 ! millert 156: * Let's be nice if they have an skey.seed that
1.4 millert 157: * ends in 0-8 just add one
158: */
159: l = strlen(skey.seed);
160: if (l > 0) {
161: lastc = skey.seed[l - 1];
162: if (isdigit(lastc) && lastc != '9') {
163: (void)strcpy(defaultseed, skey.seed);
164: defaultseed[l - 1] = lastc + 1;
165: }
166: if (isdigit(lastc) && lastc == '9' && l < 16) {
167: (void)strcpy(defaultseed, skey.seed);
168: defaultseed[l - 1] = '0';
169: defaultseed[l] = '0';
170: defaultseed[l + 1] = '\0';
171: }
1.1 deraadt 172: }
1.4 millert 173: break;
174: case 1:
175: if (zerokey)
176: errx(1, "You have no entry to zero.");
177: (void)printf("[Adding %s]\n", pp->pw_name);
178: break;
1.1 deraadt 179: }
1.17 ! millert 180: if (n == 0)
! 181: n = 99;
1.1 deraadt 182:
1.8 millert 183: /* Set hash type if asked to */
1.13 millert 184: if (ht) {
185: /* Need to zero out old key when changing algorithm */
186: if (strcmp(ht, skey_get_algorithm()) && skey_set_algorithm(ht))
187: zerokey = 1;
188: }
1.4 millert 189:
1.1 deraadt 190: if (!defaultsetup) {
1.4 millert 191: (void)printf("You need the 6 english words generated from the \"skey\" command.\n");
1.17 ! millert 192: for (i = 0; ; i++) {
1.1 deraadt 193: if (i >= 2)
194: exit(1);
1.10 millert 195:
1.4 millert 196: (void)printf("Enter sequence count from 1 to %d: ",
1.17 ! millert 197: SKEY_MAX_SEQ);
! 198: (void)fgets(buf, sizeof(buf), stdin);
! 199: n = atoi(buf);
! 200: if (n > 0 && n < SKEY_MAX_SEQ)
1.1 deraadt 201: break; /* Valid range */
1.10 millert 202: (void)printf("Error: Count must be > 0 and < %d\n",
1.17 ! millert 203: SKEY_MAX_SEQ);
1.1 deraadt 204: }
1.4 millert 205:
1.10 millert 206: for (i = 0;; i++) {
207: if (i >= 2)
208: exit(1);
209:
210: (void)printf("Enter new key [default %s]: ",
211: defaultseed);
212: (void)fgets(seed, sizeof(seed), stdin);
213: rip(seed);
214: for (p = seed; *p; p++) {
215: if (isalpha(*p)) {
216: if (isupper(*p))
217: *p = tolower(*p);
218: } else if (!isdigit(*p)) {
219: (void)puts("Error: seed may only contain alpha numeric characters");
220: break;
221: }
222: }
223: if (*p == '\0')
224: break; /* Valid seed */
225: }
1.17 ! millert 226: if (strlen(seed) > SKEY_MAX_SEED_LEN) {
! 227: (void)printf("Notice: Seed truncated to %d characters.\n",
! 228: SKEY_MAX_SEED_LEN);
! 229: seed[SKEY_MAX_SEED_LEN] = '\0';
! 230: } else if (seed[0] == '\0')
1.4 millert 231: (void)strcpy(seed, defaultseed);
1.1 deraadt 232:
233: for (i = 0;; i++) {
234: if (i >= 2)
235: exit(1);
236:
1.10 millert 237: (void)printf("otp-%s %d %s\nS/Key access password: ",
238: skey_get_algorithm(), n, seed);
1.17 ! millert 239: (void)fgets(buf, sizeof(buf), stdin);
! 240: rip(buf);
! 241: backspace(buf);
1.1 deraadt 242:
1.17 ! millert 243: if (buf[0] == '?') {
1.4 millert 244: (void)puts("Enter 6 English words from secure S/Key calculation.");
1.1 deraadt 245: continue;
1.17 ! millert 246: } else if (buf[0] == '\0')
1.1 deraadt 247: exit(1);
1.17 ! millert 248: if (etob(key, buf) == 1 || atob8(key, buf) == 0)
1.1 deraadt 249: break; /* Valid format */
1.4 millert 250: (void)puts("Invalid format - try again with 6 English words.");
1.1 deraadt 251: }
252: } else {
253: /* Get user's secret password */
1.4 millert 254: fputs("Reminder - Only use this method if you are directly connected\n or have an encrypted channel. If you are using telnet\n or rlogin, exit with no password and use keyinit -s.\n", stderr);
255:
1.1 deraadt 256: for (i = 0;; i++) {
1.4 millert 257: if (i > 2)
1.1 deraadt 258: exit(1);
259:
1.4 millert 260: (void)fputs("Enter secret password: ", stderr);
1.1 deraadt 261: readpass(passwd, sizeof(passwd));
262: if (passwd[0] == '\0')
263: exit(1);
264:
1.4 millert 265: if (strlen(passwd) < SKEY_MIN_PW_LEN) {
266: (void)fputs("Your password must be longer.\n",
267: stderr);
268: continue;
269: }
270:
271: (void)fputs("Again secret password: ", stderr);
1.1 deraadt 272: readpass(passwd2, sizeof(passwd));
273:
274: if (strcmp(passwd, passwd2) == 0)
275: break;
276:
1.4 millert 277: (void)fputs("Passwords do not match.\n", stderr);
1.1 deraadt 278: }
279:
280: /* Crunch seed and password into starting key */
1.4 millert 281: (void)strcpy(seed, defaultseed);
1.1 deraadt 282: if (keycrunch(key, seed, passwd) != 0)
283: err(2, "key crunch failed");
1.4 millert 284:
1.1 deraadt 285: nn = n;
286: while (nn-- != 0)
287: f(key);
288: }
1.4 millert 289: (void)time(&now);
1.1 deraadt 290: tm = localtime(&now);
1.4 millert 291: (void)strftime(tbuf, sizeof(tbuf), " %b %d,%Y %T", tm);
1.1 deraadt 292:
1.4 millert 293: if ((skey.val = (char *)malloc(16 + 1)) == NULL)
294: err(1, "Can't allocate memory");
1.1 deraadt 295:
1.13 millert 296: /* Zero out old key if necesary (entry would change size) */
297: if (zerokey) {
298: (void)skeyzero(&skey, pp->pw_name);
299: /* Re-open keys file and seek to the end */
300: if (skeylookup(&skey, pp->pw_name) == -1)
301: err(1, "cannot open database");
302: }
303:
1.1 deraadt 304: btoa8(skey.val, key);
305:
1.12 millert 306: /* Don't save algorithm type for md4 (keep record length same) */
307: if (strcmp(skey_get_algorithm(), "md4") == 0)
1.13 millert 308: (void)fprintf(skey.keyfile, "%s %04d %-16s %s %-21s\n",
1.12 millert 309: pp->pw_name, n, seed, skey.val, tbuf);
310: else
311: (void)fprintf(skey.keyfile, "%s %s %04d %-16s %s %-21s\n",
312: pp->pw_name, skey_get_algorithm(), n, seed, skey.val, tbuf);
1.4 millert 313: (void)fclose(skey.keyfile);
1.10 millert 314:
315: (void)setpriority(PRIO_PROCESS, 0, 0);
316:
1.12 millert 317: (void)printf("\nID %s skey is otp-%s %d %s\n", pp->pw_name,
318: skey_get_algorithm(), n, seed);
1.10 millert 319: (void)printf("Next login password: %s\n\n",
320: hexmode ? put8(buf, key) : btoe(buf, key));
1.4 millert 321: exit(0);
1.8 millert 322: }
323:
324: void
325: usage(s)
326: char *s;
327: {
328: (void)fprintf(stderr,
1.17 ! millert 329: "Usage: %s [-s] [-x] [-z] [-n count] [-md4|-md5|-sha1] [user]\n", s);
1.8 millert 330: exit(1);
1.1 deraadt 331: }