shithub: riscv

ref: 8ea31ae7b21e9f0c8991b2b861bc51ea3d67c3cd
dir: /sys/src/cmd/auth/status/

View raw version
#!/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
}