- Add names to WMF messages so that the system property described in SPORE
(agents will not accepted messages they have created them selves) can be modelled.
This commit is contained in:
parent
12b5d96ddb
commit
92356a2d43
@ -3,6 +3,10 @@
|
|||||||
# Modelled after the description in the SPORE library
|
# Modelled after the description in the SPORE library
|
||||||
# http://www.lsv.ens-cachan.fr/spore/wideMouthedFrog.html
|
# http://www.lsv.ens-cachan.fr/spore/wideMouthedFrog.html
|
||||||
#
|
#
|
||||||
|
# Note
|
||||||
|
# The name of the party that has generated a message was added in order
|
||||||
|
# to model the property described in SPORE that an agent can identify
|
||||||
|
# its own messages and will reject them.
|
||||||
|
|
||||||
usertype SessionKey;
|
usertype SessionKey;
|
||||||
usertype TimeStamp;
|
usertype TimeStamp;
|
||||||
@ -22,8 +26,8 @@ protocol wmfSessionKeyCompromise(C)
|
|||||||
var I,R,S: Agent;
|
var I,R,S: Agent;
|
||||||
|
|
||||||
read_C1(C,C, I,R,S);
|
read_C1(C,C, I,R,S);
|
||||||
send_C2(C,C, I, {Ti,R,Kir}k(I,S),
|
send_C2(C,C, I, {I,Ti,R,Kir}k(I,S),
|
||||||
{Ts,I,Kir}k(R,S),
|
{S,Ts,I,Kir}k(R,S),
|
||||||
Kir
|
Kir
|
||||||
);
|
);
|
||||||
claim_C3(C,Empty, (Compromised,Kir));
|
claim_C3(C,Empty, (Compromised,Kir));
|
||||||
@ -38,7 +42,7 @@ protocol wmf(I,R,S)
|
|||||||
const Ti: TimeStamp;
|
const Ti: TimeStamp;
|
||||||
var Kr: SessionKey;
|
var Kr: SessionKey;
|
||||||
|
|
||||||
send_1(I,S, I, {Ti, R, Kir}k(I,S));
|
send_1(I,S, I, {I, Ti, R, Kir}k(I,S));
|
||||||
|
|
||||||
claim_I1(I,Secret,Kir);
|
claim_I1(I,Secret,Kir);
|
||||||
claim_I2(I,Empty,(Fresh,Kir));
|
claim_I2(I,Empty,(Fresh,Kir));
|
||||||
@ -49,7 +53,7 @@ protocol wmf(I,R,S)
|
|||||||
var Ts: TimeStamp;
|
var Ts: TimeStamp;
|
||||||
var Kir: SessionKey;
|
var Kir: SessionKey;
|
||||||
|
|
||||||
read_2(S,R, {Ts, I, Kir}k(R,S) );
|
read_2(S,R, {S, Ts, I, Kir}k(R,S) );
|
||||||
|
|
||||||
claim_R1(R,Secret,Kir);
|
claim_R1(R,Secret,Kir);
|
||||||
claim_R2(R,Nisynch);
|
claim_R2(R,Nisynch);
|
||||||
@ -62,8 +66,8 @@ protocol wmf(I,R,S)
|
|||||||
const Ts: TimeStamp;
|
const Ts: TimeStamp;
|
||||||
var Ti: TimeStamp;
|
var Ti: TimeStamp;
|
||||||
|
|
||||||
read_1(I,S, I,{Ti, R, Kir}k(I,S) );
|
read_1(I,S, I,{I, Ti, R, Kir}k(I,S) );
|
||||||
send_2(S,R, {Ts, I, Kir}k(R,S));
|
send_2(S,R, {S, Ts, I, Kir}k(R,S));
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user