Large pass on protocol specification files to get rid of deprecated constructions.

This commit is contained in:
Cas Cremers
2012-04-23 15:53:28 +02:00
parent 30006b732a
commit 755c4519c6
83 changed files with 165 additions and 940 deletions

View File

@@ -11,7 +11,6 @@ usertype Key;
usertype SessionKey;
usertype TimeStamp;
usertype ExpiredTimeStamp;
secret k: Function;
usertype PseudoFunction;
const dec: PseudoFunction;
const Fresh: Function;
@@ -41,7 +40,7 @@ protocol denningSacco-Lowe(I,R,S)
{
var Kir: SessionKey;
var T: TimeStamp;
const Nr: Nonce;
fresh Nr: Nonce;
read_3(I,R, {Kir,I,T}k(R,S));
send_4(R,I, {Nr}Kir);
@@ -55,20 +54,11 @@ protocol denningSacco-Lowe(I,R,S)
role S
{
var W: Ticket;
const Kir: SessionKey;
const T: TimeStamp;
fresh Kir: SessionKey;
fresh T: TimeStamp;
read_1(I,S, I,R );
send_2(S,I, {R, Kir, T, {Kir, I,T}k(R,S)}k(I,S));
}
}
const Alice,Bob,Simon,Eve: Agent;
untrusted Eve;
const kee: SessionKey;
const tee: TimeStamp;
compromised k(Eve,Simon);