version 1.25, 2000/11/16 15:15:58 |
version 1.26, 2001/01/26 16:25:34 |
|
|
/* $OpenBSD$ */ |
/* $OpenBSD$ */ |
/* $NetBSD: skeyinit.c,v 1.6 1995/06/05 19:50:48 pk Exp $ */ |
|
|
|
/* S/KEY v1.1b (skeyinit.c) |
/* S/KEY v1.1b (skeyinit.c) |
* |
* |
|
|
err(1, "gethostname"); |
err(1, "gethostname"); |
for (i = 0, p = defaultseed; hostname[i] && i < SKEY_NAMELEN; i++) { |
for (i = 0, p = defaultseed; hostname[i] && i < SKEY_NAMELEN; i++) { |
if (isalpha(hostname[i])) { |
if (isalpha(hostname[i])) { |
if (isupper(*p)) |
if (isupper(hostname[i])) |
*p++ = tolower(hostname[i]); |
hostname[i] = tolower(hostname[i]); |
|
*p++ = hostname[i]; |
} else if (isdigit(hostname[i])) |
} else if (isdigit(hostname[i])) |
*p++ = hostname[i]; |
*p++ = hostname[i]; |
} |
} |