- Added andrew-ban and made the naming more consistent.
This commit is contained in:
parent
0df4662a4a
commit
46e46abb84
@ -6,13 +6,13 @@ protocol andrewBan(I,R)
|
|||||||
role I
|
role I
|
||||||
{
|
{
|
||||||
const ni: Nonce;
|
const ni: Nonce;
|
||||||
var nr: Nonce;
|
var nr,nr2: Nonce;
|
||||||
var kir: SessionKey;
|
var kir: SessionKey;
|
||||||
|
|
||||||
send_1(I,R, I,ni );
|
send_1(I,R, I,{ni}k(I,R) );
|
||||||
read_2(R,I, {ni,kir,I}k(I,R) );
|
read_2(R,I, {ni,nr}k(I,R) );
|
||||||
send_3(I,R, {ni}kir );
|
send_3(I,R, {nr}k(I,R) );
|
||||||
read_4(R,I, nr );
|
read_4(R,I, {kir,nr2,ni}k(I,R) );
|
||||||
claim_5(I,Nisynch);
|
claim_5(I,Nisynch);
|
||||||
claim_6(I,Secret, kir);
|
claim_6(I,Secret, kir);
|
||||||
claim_7(I,Secret, k(I,R));
|
claim_7(I,Secret, k(I,R));
|
||||||
@ -21,13 +21,13 @@ protocol andrewBan(I,R)
|
|||||||
role R
|
role R
|
||||||
{
|
{
|
||||||
var ni: Nonce;
|
var ni: Nonce;
|
||||||
const nr: Nonce;
|
const nr,nr2: Nonce;
|
||||||
const kir: SessionKey;
|
const kir: SessionKey;
|
||||||
|
|
||||||
read_1(I,R, I,ni );
|
read_1(I,R, I,{ni}k(I,R) );
|
||||||
send_2(R,I, {ni,kir,I}k(I,R) );
|
send_2(R,I, {ni,nr}k(I,R) );
|
||||||
read_3(I,R, {ni}kir );
|
read_3(I,R, {nr}k(I,R) );
|
||||||
send_4(R,I, nr );
|
send_4(R,I, {kir,nr2,ni}k(I,R) );
|
||||||
claim_8(R,Nisynch);
|
claim_8(R,Nisynch);
|
||||||
claim_9(R,Secret, kir);
|
claim_9(R,Secret, kir);
|
||||||
claim_10(R,Secret, k(I,R));
|
claim_10(R,Secret, k(I,R));
|
||||||
|
51
spdl/andrew-lowe-ban.spdl
Normal file
51
spdl/andrew-lowe-ban.spdl
Normal file
@ -0,0 +1,51 @@
|
|||||||
|
usertype SessionKey;
|
||||||
|
secret k: Function;
|
||||||
|
|
||||||
|
protocol andrewLoweBan(I,R)
|
||||||
|
{
|
||||||
|
role I
|
||||||
|
{
|
||||||
|
const ni: Nonce;
|
||||||
|
var nr: Nonce;
|
||||||
|
var kir: SessionKey;
|
||||||
|
|
||||||
|
send_1(I,R, I,ni );
|
||||||
|
read_2(R,I, {ni,kir,I}k(I,R) );
|
||||||
|
send_3(I,R, {ni}kir );
|
||||||
|
read_4(R,I, nr );
|
||||||
|
claim_5(I,Nisynch);
|
||||||
|
claim_6(I,Secret, kir);
|
||||||
|
claim_7(I,Secret, k(I,R));
|
||||||
|
}
|
||||||
|
|
||||||
|
role R
|
||||||
|
{
|
||||||
|
var ni: Nonce;
|
||||||
|
const nr: Nonce;
|
||||||
|
const kir: SessionKey;
|
||||||
|
|
||||||
|
read_1(I,R, I,ni );
|
||||||
|
send_2(R,I, {ni,kir,I}k(I,R) );
|
||||||
|
read_3(I,R, {ni}kir );
|
||||||
|
send_4(R,I, nr );
|
||||||
|
claim_8(R,Nisynch);
|
||||||
|
claim_9(R,Secret, kir);
|
||||||
|
claim_10(R,Secret, k(I,R));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
const Alice,Bob,Eve: Agent;
|
||||||
|
|
||||||
|
untrusted Eve;
|
||||||
|
const ne: Nonce;
|
||||||
|
const kee: SessionKey;
|
||||||
|
compromised k(Eve,Eve);
|
||||||
|
compromised k(Eve,Alice);
|
||||||
|
compromised k(Eve,Bob);
|
||||||
|
compromised k(Alice,Eve);
|
||||||
|
compromised k(Bob,Eve);
|
||||||
|
|
||||||
|
run andrewLoweBan.I(Agent,Agent);
|
||||||
|
run andrewLoweBan.R(Agent,Agent);
|
||||||
|
run andrewLoweBan.I(Agent,Agent);
|
||||||
|
run andrewLoweBan.R(Agent,Agent);
|
Loading…
Reference in New Issue
Block a user