svc.doservice (507B)
1 #!/usr/bin/execlineb -S2 2 # BASENAME - $0 3 # service - $1 4 # cmd - $2 5 ifelse { eltest -z $1 } 6 #backtick services { ls -1 run } 7 #forx s { $services } 8 9 { # then 10 forx s { ls -1 run } { 11 svc.runservice "${s}" run "${2}" 12 printf "%s: '%s' %s" $0 $2 $1 13 } 14 } 15 # else 16 ifelse { eltest -x avail/$1 } 17 { # nested then 18 svc.runservice "${1}" avail "${2}" 19 printf "%s: '%s' %s" $BASENAME $2 $1 20 } # nested else 21 foreground { printf "%s: '%s' is not available/executable.\n" $0 $1 } 22 exit 1