Adding agreement etc. to NS/NSL protocol.
This commit is contained in:
parent
9b0915441f
commit
98dd606404
24
gui/ns3.spdl
24
gui/ns3.spdl
@ -13,13 +13,15 @@ protocol ns3(I,R)
|
|||||||
|
|
||||||
send_1(I,R, {ni,I}pk(R) );
|
send_1(I,R, {ni,I}pk(R) );
|
||||||
recv_2(R,I, {ni,nr}pk(I) );
|
recv_2(R,I, {ni,nr}pk(I) );
|
||||||
|
claim(I,Running,R,ni,nr);
|
||||||
send_3(I,R, {nr}pk(R) );
|
send_3(I,R, {nr}pk(R) );
|
||||||
|
|
||||||
claim_i1(I,Secret,ni);
|
claim(I,Secret,ni);
|
||||||
claim_i2(I,Secret,nr);
|
claim(I,Secret,nr);
|
||||||
claim_i3(I,Alive);
|
claim(I,Alive);
|
||||||
claim_i4(I,Niagree);
|
claim(I,Commit,R,ni,nr);
|
||||||
claim_i5(I,Nisynch);
|
claim(I,Niagree);
|
||||||
|
claim(I,Nisynch);
|
||||||
}
|
}
|
||||||
|
|
||||||
role R
|
role R
|
||||||
@ -28,14 +30,16 @@ protocol ns3(I,R)
|
|||||||
fresh nr: Nonce;
|
fresh nr: Nonce;
|
||||||
|
|
||||||
recv_1(I,R, {ni,I}pk(R) );
|
recv_1(I,R, {ni,I}pk(R) );
|
||||||
|
claim(R,Running,I,ni,nr);
|
||||||
send_2(R,I, {ni,nr}pk(I) );
|
send_2(R,I, {ni,nr}pk(I) );
|
||||||
recv_3(I,R, {nr}pk(R) );
|
recv_3(I,R, {nr}pk(R) );
|
||||||
|
|
||||||
claim_r1(R,Secret,ni);
|
claim(R,Secret,ni);
|
||||||
claim_r2(R,Secret,nr);
|
claim(R,Secret,nr);
|
||||||
claim_r3(R,Alive);
|
claim(R,Alive);
|
||||||
claim_r4(R,Niagree);
|
claim(R,Commit,I,ni,nr);
|
||||||
claim_r5(R,Nisynch);
|
claim(R,Niagree);
|
||||||
|
claim(R,Nisynch);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -13,12 +13,15 @@ protocol nsl3(I,R)
|
|||||||
|
|
||||||
send_1(I,R, {ni,I}pk(R) );
|
send_1(I,R, {ni,I}pk(R) );
|
||||||
recv_2(R,I, {ni,nr,R}pk(I) );
|
recv_2(R,I, {ni,nr,R}pk(I) );
|
||||||
|
claim(I,Running,R,ni,nr);
|
||||||
send_3(I,R, {nr}pk(R) );
|
send_3(I,R, {nr}pk(R) );
|
||||||
|
|
||||||
claim_i1(I,Secret,ni);
|
claim(I,Secret,ni);
|
||||||
claim_i2(I,Secret,nr);
|
claim(I,Secret,nr);
|
||||||
claim_i3(I,Niagree);
|
claim(I,Alive);
|
||||||
claim_i4(I,Nisynch);
|
claim(I,Commit,R,ni,nr);
|
||||||
|
claim(I,Niagree);
|
||||||
|
claim(I,Nisynch);
|
||||||
}
|
}
|
||||||
|
|
||||||
role R
|
role R
|
||||||
@ -27,13 +30,16 @@ protocol nsl3(I,R)
|
|||||||
fresh nr: Nonce;
|
fresh nr: Nonce;
|
||||||
|
|
||||||
recv_1(I,R, {ni,I}pk(R) );
|
recv_1(I,R, {ni,I}pk(R) );
|
||||||
|
claim(R,Running,I,ni,nr);
|
||||||
send_2(R,I, {ni,nr,R}pk(I) );
|
send_2(R,I, {ni,nr,R}pk(I) );
|
||||||
recv_3(I,R, {nr}pk(R) );
|
recv_3(I,R, {nr}pk(R) );
|
||||||
|
|
||||||
claim_r1(R,Secret,ni);
|
claim(R,Secret,ni);
|
||||||
claim_r2(R,Secret,nr);
|
claim(R,Secret,nr);
|
||||||
claim_r3(R,Niagree);
|
claim(R,Alive);
|
||||||
claim_r4(R,Nisynch);
|
claim(R,Commit,I,ni,nr);
|
||||||
|
claim(R,Niagree);
|
||||||
|
claim(R,Nisynch);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user