scyther/testing/woolam-pi-f.spdl

50 lines
664 B
Plaintext
Raw Normal View History

2006-11-21 13:40:50 +00:00
/*
* Woo-lam version from Spore, Pi f
*
* Only one-way verification version
*/
usertype Server, SessionKey, Ticket;
secret k: Function;
const Simon: Server;
const ke: SessionKey;
protocol woolampif(A,B,S)
{
role A
{
var Nb: Nonce;
send_1(A,B, A);
2012-05-02 22:26:41 +01:00
recv_2(B,A, Nb);
2006-11-21 13:40:50 +00:00
send_3(A,B, { A,B,Nb }k(A,S) );
}
role B
{
fresh Nb: Nonce;
2006-11-21 13:40:50 +00:00
var T: Ticket;
2012-05-02 22:26:41 +01:00
recv_1(A,B, A);
2006-11-21 13:40:50 +00:00
send_2(B,A, Nb);
2012-05-02 22:26:41 +01:00
recv_3(A,B, T);
2006-11-21 13:40:50 +00:00
send_4(B,S, { A,B,Nb, T }k(B,S) );
2012-05-02 22:26:41 +01:00
recv_5(S,B, { A,B,Nb }k(B,S) );
2006-11-21 13:40:50 +00:00
claim_6(B,Niagree);
claim_7(B,Nisynch);
}
role S
{
var Nb: Nonce;
2012-05-02 22:26:41 +01:00
recv_4(B,S, { A,B,Nb, { A,B,Nb }k(A,S) }k(B,S) );
2006-11-21 13:40:50 +00:00
send_5(S,B, { A,B,Nb }k(B,S) );
}
}