ref: f6706e1759c3e16f6f710ac897b7aa1cb5e22fa4
dir: /bin/secretz/
#!/bin/rc # secretz - a local replacement for secstore rfork en enc=$home/lib/factotum fn usage { >[1=2] echo 'secretz [-c | -e | -l]' exit usage } ramfs -p fn secretz {@{ echo -n 'secret: ' </dev/cons >/dev/consctl { echo rawon read >/tmp/secret } echo switch($1){ case -c sam /tmp/factotum </tmp/factotum >$enc <[3]/tmp/secret auth/aescbc -i -e || exit auth case -e <$enc >/tmp/factotum <[3]/tmp/secret auth/aescbc -i -d || exit auth sam /tmp/factotum </tmp/factotum >$enc <[3]/tmp/secret auth/aescbc -i -e echo -n 'load? ' if(~ `{read} y yes) read -m /tmp/factotum >/mnt/factotum/ctl case -l * <$enc >/tmp/factotum <[3]/tmp/secret auth/aescbc -i -d || exit auth read -m /tmp/factotum >/mnt/factotum/ctl } exit '' }} while(! secretz $1) ;