- 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/woo-lam.spdl
+++ b/spdl/SPORE/woo-lam.spdl
@@ -12,6 +12,7 @@
 usertype Key;

 secret k: Function;
+const Fresh: Function;

 protocol woolam(I,R,S)
 {
@@ -30,6 +31,7 @@ protocol woolam(I,R,S)

        claim_I1(I,Secret,Kir);
        claim_I2(I,Nisynch);
+        claim_I3(I,Empty,(Fresh,Kir));
    }    
    
    role R
@@ -49,6 +51,7 @@ protocol woolam(I,R,S)
        
        claim_R1(R,Secret,Kir);
        claim_R2(R,Nisynch);
+        claim_R3(R,Empty,(Fresh,Kir));
    }

    role S