13e12c5d1SDavid du Colombier#!/bin/rc 2*84cb9422SDavid du Colombier 3*84cb9422SDavid du Colombierflagfmt='c,d,p,r,t,u,v,x' 4*84cb9422SDavid du Colombierargs='archive [files ...]' 5*84cb9422SDavid du Colombier 6*84cb9422SDavid du Colombierif(! ifs=() eval `{aux/getflags $*} || ~ $#* 0) { 7*84cb9422SDavid du Colombier aux/usage 8*84cb9422SDavid du Colombier exit usage 9*84cb9422SDavid du Colombier} 103e12c5d1SDavid du Colombier 113e12c5d1SDavid du Colombierkey='' 12*84cb9422SDavid du Colombierfor(i in c d p r t x u v) 13*84cb9422SDavid du Colombier if(f=flag$i ~ $#$f 1) 14*84cb9422SDavid du Colombier key=$key$i 157dd7cddfSDavid du Colombierexec /$cputype/bin/ar $key $* 16