727e813c77
Not everything is fixed yet. However, we fixed: - 'const' -> 'fresh' - Removed lines specifying 'runs' - Removed some specifications of compromised Eve and its long-term keys being compromised.
39 lines
503 B
Plaintext
39 lines
503 B
Plaintext
/*
|
|
* f5.spdl
|
|
*
|
|
* Tailored protocol to show that any number of runs can be required to
|
|
* find an attack.
|
|
*
|
|
* For this version, -m2 and -r5 are needed.
|
|
*
|
|
* April 2005, Cas Cremers
|
|
*/
|
|
|
|
const pk: Function;
|
|
secret sk: Function;
|
|
inversekeys (pk,sk);
|
|
|
|
protocol f5(I,R)
|
|
{
|
|
role I
|
|
{
|
|
var nr: Nonce;
|
|
|
|
read_!1(R,I, nr );
|
|
send_!2(I,R, { nr }sk(I) );
|
|
read_!3(R,I, {{{{{ nr }sk(R)}sk(R)}sk(R)}sk(R)}sk(R) );
|
|
|
|
claim_i1(I,Reachable);
|
|
}
|
|
|
|
role R
|
|
{
|
|
fresh nr: Nonce;
|
|
send_!1(R,I, nr );
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|