1 | |
---|
2 | # alumni_rt1_typed |
---|
3 | |
---|
4 | pwd=`pwd` |
---|
5 | eloc=`which abac_prover_yap | sed 's/\/abac_prover_yap//'` |
---|
6 | if [ "$eloc" = "" ]; then |
---|
7 | echo "ERROR: abac_prover_yap is not in the search path!!!" |
---|
8 | exit 1 |
---|
9 | fi |
---|
10 | keyloc=$pwd |
---|
11 | |
---|
12 | stateU=`creddy --keyid --cert $keyloc/StateU_ID.pem` |
---|
13 | bob=`creddy --keyid --cert $keyloc/Bob_ID.pem` |
---|
14 | maryann=`creddy --keyid --cert $keyloc/Maryann_ID.pem` |
---|
15 | joe=`creddy --keyid --cert $keyloc/Joe_ID.pem` |
---|
16 | |
---|
17 | stateU_foundingAlumni="[keyid:$stateU].role:foundingAlumni" |
---|
18 | bob_prin="[keyid:$bob]" |
---|
19 | maryann_prin="[keyid:$maryann]" |
---|
20 | joe_prin="[keyid:$joe]" |
---|
21 | |
---|
22 | # [keyid:stateU].role:foundingAlumni <-?- [keyid:Bob] (no) |
---|
23 | # [keyid:stateU].role:foundingAlumni <-?- [keyid:Maryann] (yes) |
---|
24 | |
---|
25 | ## dump all credentials |
---|
26 | $eloc/abac_prover_yap --keystore $keyloc --dump creds_dump |
---|
27 | |
---|
28 | # [keyid:stateU].role:foundingAlumni <-?- [keyid:Bob] (no) |
---|
29 | echo " " |
---|
30 | echo "===bad============ stateU.foundingAlumni <- Bob" |
---|
31 | $eloc/abac_prover_yap --keystore $keyloc --role "$stateU_foundingAlumni" --principal "$bob_prin" |
---|
32 | |
---|
33 | # [keyid:stateU].role:foundingAlumni <-?- [keyid:Maryann] (yes) |
---|
34 | # asking, isMember(pMaryann,role(pStateU,foundingAlumni),C). |
---|
35 | echo " " |
---|
36 | echo "===good============ stateU.foundingAlumni <- Maryann" |
---|
37 | $eloc/abac_prover_yap --keystore $keyloc --role "$stateU_foundingAlumni" --principal "$maryann_prin" |
---|
38 | |
---|
39 | |
---|
40 | # [keyid:stateU].role:foundingAlumni <-?- [keyid:Joe] (yes) |
---|
41 | echo " " |
---|
42 | echo "===good============ stateU.foundingAlumni <- Joe" |
---|
43 | $eloc/abac_prover_yap --keystore $keyloc --role "$stateU_foundingAlumni" --principal "$joe_prin" |
---|
44 | |
---|