- Add Compromised claim to test my new definition of freshness in combination
with key compromise (appears to be working pretty well)
This commit is contained in:
parent
4c224dc6f4
commit
658f4f392a
@ -15,6 +15,8 @@ secret k: Function;
|
||||
const dec,inc: Function;
|
||||
inversekeys(dec,inc);
|
||||
usertype SessionKey;
|
||||
const Fresh: Function;
|
||||
const Compromised: Function;
|
||||
|
||||
protocol needhamschroederSessionKeyCompromise(C)
|
||||
{
|
||||
@ -33,6 +35,7 @@ protocol needhamschroederSessionKeyCompromise(C)
|
||||
{{Nr}dec}Kir,
|
||||
Kir
|
||||
);
|
||||
claim_C3(C,Empty, (Compromised,Kir));
|
||||
}
|
||||
}
|
||||
|
||||
@ -52,6 +55,7 @@ protocol needhamschroedersk(I,R,S)
|
||||
send_5(I,R,{{Nr}dec}Kir);
|
||||
claim_I2(I,Secret,Kir);
|
||||
claim_I3(I,Nisynch);
|
||||
claim_I4(I,Empty,(Fresh,Kir));
|
||||
}
|
||||
|
||||
role R
|
||||
@ -64,6 +68,7 @@ protocol needhamschroedersk(I,R,S)
|
||||
read_5(I,R,{{Nr}dec}Kir);
|
||||
claim_R1(R,Secret,Kir);
|
||||
claim_R3(R,Nisynch);
|
||||
claim_R4(R,Empty,(Fresh,Kir));
|
||||
}
|
||||
|
||||
role S
|
||||
|
Loading…
Reference in New Issue
Block a user