sylv/scyther
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

20
gui/Protocols/ksl-lowe.spdl
View File

@@ -9,24 +9,15 @@
usertype Server, SessionKey, TimeStamp, TicketKey;
usertype ExpiredTimeStamp;
secret k: Function;
const a, b, e: Agent;
const s: Server;
const Fresh: Function;
const Compromised: Function;
const ne: Nonce;
const kee: SessionKey;
untrusted e;
compromised k(e,s);
protocol ksl-Lowe(I,R,S)
{
role I
{
const Ni, Mi: Nonce;
fresh Ni, Mi: Nonce;
var Nc, Mr: Nonce;
var T: Ticket;
var Kir: SessionKey;
@@ -48,10 +39,10 @@ protocol ksl-Lowe(I,R,S)
role R
{
var Ni,Mi: Nonce;
const Nr,Nc,Mr: Nonce;
fresh Nr,Nc,Mr: Nonce;
var Kir: SessionKey;
const Kbb: TicketKey;
const Tr: TimeStamp;
fresh Kbb: TicketKey;
fresh Tr: TimeStamp;
var T: Ticket;
read_1(I,R, Ni, I);
@@ -73,11 +64,10 @@ protocol ksl-Lowe(I,R,S)
role S
{
var Ni, Nr: Nonce;
const Kir: SessionKey;
fresh Kir: SessionKey;
read_2(R,S, Ni, I, Nr, R );
send_3(S,R, { I, Nr, Kir }k(R,S), { Ni,R,Kir }k(I,S) );
}
}