37 lines
738 B
Plaintext
37 lines
738 B
Plaintext
|
#!/bin/rc
|
||
|
|
cd /mnt/keys/$1 > /dev/null >[2=1] && {
|
||
|
|
stat=`{cat status}
|
||
|
|
exp=`{cat expire}
|
||
|
|
switch($exp){
|
||
|
|
case never 0
|
||
|
|
exp='never expires'
|
||
|
|
case *
|
||
|
|
exp=(expires on `{date $exp})
|
||
|
|
}
|
||
|
|
switch($stat){
|
||
|
|
case expired
|
||
|
|
echo user $1: plan 9 key has expired
|
||
|
|
case *
|
||
|
|
echo user $1: plan 9 key status is $stat and $exp
|
||
|
|
}
|
||
|
|
grep '^'$1'[ ]' /adm/keys.who | tail -1
|
||
|
|
}
|
||
|
|
cd /mnt/netkeys/$1 > /dev/null >[2=1] && {
|
||
|
|
stat=`{cat status}
|
||
|
|
exp=`{cat expire}
|
||
|
|
switch($exp){
|
||
|
|
case never 0
|
||
|
|
exp='never expires'
|
||
|
|
case *
|
||
|
|
exp=(expires on `{date $exp})
|
||
|
|
}
|
||
|
|
switch($stat){
|
||
|
|
case expired
|
||
|
|
echo user $1: network key has expired
|
||
|
|
case *
|
||
|
|
echo user $1: network key status is $stat and $exp
|
||
|
|
auth/printnetkey $1
|
||
|
|
}
|
||
|
|
grep '^'$1'[ ]' /adm/netkeys.who | tail -1
|
||
|
|
}
|