- Add freshness claims to the protocols that should guarantee freshness

2005-06-23 12:45:32 +00:00
parent 464920907b
commit 4c224dc6f4
23 changed files with 134 additions and 51 deletions
--- a/spdl/SPORE/yahalom-ban.spdl
+++ b/spdl/SPORE/yahalom-ban.spdl
@@ -11,6 +11,7 @@
 secret k : Function;

 usertype Key;
+const Fresh: Function;


 protocol yahalomBAN(I,R,S)
@@ -28,6 +29,7 @@ protocol yahalomBAN(I,R,S)

        claim_I1(I, Secret,Kir);
        claim_I2(I, Nisynch);
+        claim_I3(I, Empty, (Fresh,Kir));
    }

    role R
@@ -43,6 +45,7 @@ protocol yahalomBAN(I,R,S)

        claim_R1(R, Secret,Kir);
        claim_R2(R, Nisynch);
+        claim_R3(R, Empty, (Fresh,Kir));
    }

    role S