cpsa-3.4.0: doc/examples/blanchet.xhtml
<?xml version="1.0"?>
<!-- CPSA 3.4.0 -->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Blanchet's Simple Example Protocol</title>
<meta http-equiv="content-type" content="application/xhtml+xml; charset=UTF-8" />
<style>
svg.diagram { border-width: 1px; border-style: solid }
</style>
</head>
<body>
<pre>(herald "Blanchet's Simple Example Protocol"
(comment "There is a flaw in this protocol by design"))
(comment "CPSA 3.4.0")
(comment "All input read from blanchet.scm")</pre>
<p id="top">Trees: <a href="#t0">0</a> <a href="#t4">4</a> <a href="#t6">6</a> <a href="#t11">11</a> <a href="#t14">14</a> <a href="#t18">18</a> <a href="#t23">23</a> <a href="#t25">25</a>.</p>
<p id="t0">Tree <a href="#top">0</a>.</p>
<div>
<svg
class='diagram' width='179.760pt' height='154.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.760 154.920' font-size='12.000'>
<text
x='89.880' y='101.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k2", "_self")'>2</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='139.800' y='26.040'
style='font-weight: bold; text-anchor: middle; fill: blue;'
onclick='window.open("#k3", "_self")'>3</text>
<line
x1='89.880' y1='39.960' x2='139.800' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='89.880' y='26.040' style='text-anchor: middle; fill: black;'
onclick='window.open("#k1", "_self")'>1</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='63.540' style='text-anchor: middle; fill: black;'
onclick='window.open("#k0", "_self")'>0</text>
</svg></div>
<pre>(defprotocol blanchet basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Blanchet's protocol"))</pre>
<p id="k0">Item <a href="#t0">0</a>, Children: <a href="#k1">1</a> <a href="#k2">2</a>.</p>
<div>
<svg
class='diagram' width='79.920pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 79.920 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>(enc d s)</title>
<circle style='fill: red;' cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='39.960' y='39.960' style='text-anchor: middle;'>blanchet 0</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(non-orig (invk b))
(uniq-orig s)
(comment "Analyze from the initiator's perspective")
(label 0)
(unrealized (0 1))
(origs (s (0 0)))
(comment "2 in cohort - 2 not yet seen"))</pre>
<p id="k1">Item <a href="#t0">1</a>, Parent: <a href="#k0">0</a>, Child: <a href="#k3">3</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 189.960 Q 92.940 189.960 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a-0)) b-0)</title>
<circle style='fill: red;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 86.940 114.960 133.920 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a-0) (b b-0))</title>
<text x='139.920' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960' style='text-anchor: middle;'>blanchet 1</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b a-0 b-0 akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(defstrand resp 2 (d d) (s s) (a a-0) (b b-0))
(precedes ((0 0) (1 0)) ((1 1) (0 1)))
(non-orig (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand resp 2) (enc d s) (0 1))
(label 1)
(parent 0)
(unrealized (1 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k2">Item <a href="#t0">2</a>, Parent: <a href="#k0">0</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 189.960 Q 92.940 189.960 45.960 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 86.940 114.960 133.920 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960' style='text-anchor: middle;'>blanchet 2</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener s)
(precedes ((0 0) (1 0)) ((1 1) (0 1)))
(non-orig (invk b))
(uniq-orig s)
(operation encryption-test (added-listener s) (enc d s) (0 1))
(label 2)
(parent 0)
(unrealized (1 0))
(comment "empty cohort"))</pre>
<p id="k3">Item <a href="#t0">3</a>, Parent: <a href="#k1">1</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 189.960 Q 92.940 189.960 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: blue;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 86.940 114.960 133.920 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='139.920' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet 3 (realized)</text></svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(precedes ((0 0) (1 0)) ((1 1) (0 1)))
(non-orig (invk b))
(uniq-orig d s)
(operation nonce-test (contracted (a-0 a) (b-0 b)) s (1 0)
(enc (enc s (invk a)) b))
(label 3)
(parent 1)
(unrealized)
(shape)
(maps ((0) ((a a) (b b) (s s) (d d))))
(origs (d (1 1)) (s (0 0))))</pre>
<p id="t4">Tree <a href="#top">4</a>.</p>
<div>
<svg
class='diagram' width='129.840pt' height='79.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 129.840 79.920' font-size='12.000'>
<text
x='89.880' y='26.040'
style='font-weight: bold; text-anchor: middle; fill: blue;'
onclick='window.open("#k5", "_self")'>5</text>
<line
x1='39.960' y1='39.960' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='26.040' style='text-anchor: middle; fill: black;'
onclick='window.open("#k4", "_self")'>4</text>
</svg></div>
<pre>(defprotocol blanchet basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Blanchet's protocol"))</pre>
<p id="k4">Item <a href="#t4">4</a>, Child: <a href="#k5">5</a>.</p>
<div>
<svg
class='diagram' width='79.920pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 79.920 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: red;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='39.960' y='39.960' style='text-anchor: middle;'>blanchet 4</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(non-orig (invk a) (invk b))
(uniq-orig d)
(comment "Analyze from the responder's perspective")
(label 4)
(unrealized (0 0))
(origs (d (0 1)))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k5">Item <a href="#t4">5</a>, Parent: <a href="#k4">4</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 114.960 Q 92.940 114.960 45.960 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b-0)</title>
<circle cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: blue;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((s s) (a a) (b b-0))</title>
<text x='139.920' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet 5 (realized)</text></svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b b-0 akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(defstrand init 1 (s s) (a a) (b b-0))
(precedes ((1 0) (0 0)))
(non-orig (invk a) (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand init 1) (enc s (invk a))
(0 0))
(label 5)
(parent 4)
(unrealized)
(shape)
(maps ((0) ((a a) (b b) (s s) (d d))))
(origs (s (1 0)) (d (0 1))))</pre>
<p id="t6">Tree <a href="#top">6</a>.</p>
<div>
<svg
class='diagram' width='229.680pt' height='154.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 229.680 154.920' font-size='12.000'>
<text
x='89.880' y='101.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k8", "_self")'>8</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='189.720' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k10", "_self")'>10</text>
<line
x1='139.800' y1='39.960' x2='189.720' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='139.800' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k9", "_self")'>9</text>
<line
x1='89.880' y1='39.960' x2='139.800' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='89.880' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k7", "_self")'>7</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='63.540' style='text-anchor: middle; fill: red;'
onclick='window.open("#k6", "_self")'>6</text>
</svg></div>
<pre>(defprotocol blanchet basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Blanchet's protocol"))</pre>
<p id="k6">Item <a href="#t6">6</a>, Children: <a href="#k7">7</a> <a href="#k8">8</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>d</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: red;' cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960' style='text-anchor: middle;'>blanchet 6</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(non-orig (invk b))
(uniq-orig s)
(comment "From the initiator's perspective, is the secret leaked?")
(label 6)
(unrealized (0 1))
(origs (s (0 0)))
(comment "2 in cohort - 2 not yet seen"))</pre>
<p id="k7">Item <a href="#t6">7</a>, Parent: <a href="#k6">6</a>, Child: <a href="#k9">9</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 189.960 Q 192.900 189.960 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a-0)) b-0)</title>
<circle style='fill: red;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a-0) (b b-0))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='139.920' y='39.960' style='text-anchor: middle;'>blanchet 7</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b a-0 b-0 akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand resp 2 (d d) (s s) (a a-0) (b b-0))
(precedes ((0 0) (2 0)) ((2 1) (0 1)) ((2 1) (1 0)))
(non-orig (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand resp 2) (enc d s) (0 1))
(label 7)
(parent 6)
(unrealized (1 0) (2 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k8">Item <a href="#t6">8</a>, Parent: <a href="#k6">6</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='139.920' y='39.960' style='text-anchor: middle;'>blanchet 8</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(deflistener s)
(precedes ((0 0) (2 0)) ((2 1) (0 1)))
(non-orig (invk b))
(uniq-orig s)
(operation encryption-test (added-listener s) (enc d s) (0 1))
(label 8)
(parent 6)
(unrealized (2 0))
(comment "empty cohort"))</pre>
<p id="k9">Item <a href="#t6">9</a>, Parent: <a href="#k7">7</a>, Child: <a href="#k10">10</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 189.960 Q 192.900 189.960 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: blue;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='139.920' y='39.960' style='text-anchor: middle;'>blanchet 9</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand resp 2 (d d) (s s) (a a) (b b))
(precedes ((0 0) (2 0)) ((2 1) (0 1)) ((2 1) (1 0)))
(non-orig (invk b))
(uniq-orig d s)
(operation nonce-test (contracted (a-0 a) (b-0 b)) s (2 0)
(enc (enc s (invk a)) b))
(label 9)
(parent 7)
(unrealized (1 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k10">Item <a href="#t6">10</a>, Parent: <a href="#k9">9</a>.</p>
<div>
<svg
class='diagram' width='379.800pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 379.800 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='339.840' y1='114.960' x2='339.840' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 339.840 189.960 Q 242.880 152.460 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='339.840' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='339.840' cy='114.960' r='6.000'/></g>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 189.960 Q 192.900 189.960 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: blue;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 39.960 114.960 Q 186.900 77.460 333.840 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='189.900' y='39.960'
style='text-anchor: middle;'>blanchet 10</text></svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener s)
(precedes ((0 0) (2 0)) ((0 0) (3 0)) ((2 1) (0 1)) ((2 1) (1 0))
((3 1) (1 0)))
(non-orig (invk b))
(uniq-orig d s)
(operation nonce-test (added-listener s) d (1 0) (enc d s))
(label 10)
(parent 9)
(unrealized (3 0))
(comment "empty cohort"))</pre>
<p id="t11">Tree <a href="#top">11</a>.</p>
<div>
<svg
class='diagram' width='179.760pt' height='79.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.760 79.920' font-size='12.000'>
<text
x='139.800' y='26.040'
style='font-weight: bold; text-anchor: middle; fill: blue;'
onclick='window.open("#k13", "_self")'>13</text>
<line
x1='89.880' y1='39.960' x2='139.800' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='89.880' y='26.040' style='text-anchor: middle; fill: black;'
onclick='window.open("#k12", "_self")'>12</text>
<line
x1='39.960' y1='39.960' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='26.040' style='text-anchor: middle; fill: black;'
onclick='window.open("#k11", "_self")'>11</text>
</svg></div>
<pre>(defprotocol blanchet basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Blanchet's protocol"))</pre>
<p id="k11">Item <a href="#t11">11</a>, Child: <a href="#k12">12</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>d</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: red;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='89.940' y='39.960' style='text-anchor: middle;'>blanchet 11</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(non-orig (invk a) (invk b))
(uniq-orig d)
(comment "From the responders's perspective, is the secret leaked?")
(label 11)
(unrealized (0 0) (1 0))
(preskeleton)
(comment "Not a skeleton"))</pre>
<p id="k12">Item <a href="#t11">12</a>, Parent: <a href="#k11">11</a>, Child: <a href="#k13">13</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 189.960 Q 86.940 189.960 133.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: red;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='89.940' y='39.960' style='text-anchor: middle;'>blanchet 12</text>
</svg></div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(precedes ((0 1) (1 0)))
(non-orig (invk a) (invk b))
(uniq-orig d)
(comment "From the responders's perspective, is the secret leaked?")
(label 12)
(parent 11)
(unrealized (0 0))
(origs (d (0 1)))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k13">Item <a href="#t11">13</a>, Parent: <a href="#k12">12</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 114.960 Q 142.920 77.460 45.960 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s (invk a)) b-0)</title>
<circle cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 189.960 Q 86.940 189.960 133.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s (invk a)) b)</title>
<circle style='fill: blue;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((s s) (a a) (b b-0))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='139.920' y='39.960'
style='text-anchor: middle;'>blanchet 13 (realized)</text></svg>
</div>
<pre>(defskeleton blanchet
(vars (d data) (s skey) (a b b-0 akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand init 1 (s s) (a a) (b b-0))
(precedes ((0 1) (1 0)) ((2 0) (0 0)))
(non-orig (invk a) (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand init 1) (enc s (invk a))
(0 0))
(label 13)
(parent 12)
(unrealized)
(shape)
(maps ((0 1) ((a a) (b b) (s s) (d d))))
(origs (s (2 0)) (d (0 1))))</pre>
<p id="t14">Tree <a href="#top">14</a>.</p>
<div>
<svg
class='diagram' width='179.760pt' height='154.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.760 154.920' font-size='12.000'>
<text
x='89.880' y='101.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k16", "_self")'>16</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='139.800' y='26.040'
style='font-weight: bold; text-anchor: middle; fill: blue;'
onclick='window.open("#k17", "_self")'>17</text>
<line
x1='89.880' y1='39.960' x2='139.800' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='89.880' y='26.040' style='text-anchor: middle; fill: black;'
onclick='window.open("#k15", "_self")'>15</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='63.540' style='text-anchor: middle; fill: black;'
onclick='window.open("#k14", "_self")'>14</text>
</svg></div>
<pre>(defprotocol blanchet-corrected basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s b (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s b (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Corrected Blanchet's protocol"))</pre>
<p id="k14">Item <a href="#t14">14</a>, Children: <a href="#k15">15</a> <a href="#k16">16</a>.</p>
<div>
<svg
class='diagram' width='79.920pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 79.920 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>(enc d s)</title>
<circle style='fill: red;' cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='39.960' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 14</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(non-orig (invk b))
(uniq-orig s)
(comment "Analyze from the initiator's perspective")
(label 14)
(unrealized (0 1))
(origs (s (0 0)))
(comment "2 in cohort - 2 not yet seen"))</pre>
<p id="k15">Item <a href="#t14">15</a>, Parent: <a href="#k14">14</a>, Child: <a href="#k17">17</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 189.960 Q 92.940 189.960 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b-0 (invk a-0)) b-0)</title>
<circle style='fill: red;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 86.940 114.960 133.920 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a-0) (b b-0))</title>
<text x='139.920' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 15</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b a-0 b-0 akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(defstrand resp 2 (d d) (s s) (a a-0) (b b-0))
(precedes ((0 0) (1 0)) ((1 1) (0 1)))
(non-orig (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand resp 2) (enc d s) (0 1))
(label 15)
(parent 14)
(unrealized (1 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k16">Item <a href="#t14">16</a>, Parent: <a href="#k14">14</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 189.960 Q 92.940 189.960 45.960 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 86.940 114.960 133.920 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 16</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener s)
(precedes ((0 0) (1 0)) ((1 1) (0 1)))
(non-orig (invk b))
(uniq-orig s)
(operation encryption-test (added-listener s) (enc d s) (0 1))
(label 16)
(parent 14)
(unrealized (1 0))
(comment "empty cohort"))</pre>
<p id="k17">Item <a href="#t14">17</a>, Parent: <a href="#k15">15</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 189.960 Q 92.940 189.960 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: blue;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 86.940 114.960 133.920 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='139.920' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 17 (realized)</text>
</svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(precedes ((0 0) (1 0)) ((1 1) (0 1)))
(non-orig (invk b))
(uniq-orig d s)
(operation nonce-test (contracted (a-0 a) (b-0 b)) s (1 0)
(enc (enc s b (invk a)) b))
(label 17)
(parent 15)
(unrealized)
(shape)
(maps ((0) ((a a) (b b) (s s) (d d))))
(origs (d (1 1)) (s (0 0))))</pre>
<p id="t18">Tree <a href="#top">18</a>.</p>
<div>
<svg
class='diagram' width='229.680pt' height='154.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 229.680 154.920' font-size='12.000'>
<text
x='89.880' y='101.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k20", "_self")'>20</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='189.720' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k22", "_self")'>22</text>
<line
x1='139.800' y1='39.960' x2='189.720' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='139.800' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k21", "_self")'>21</text>
<line
x1='89.880' y1='39.960' x2='139.800' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='89.880' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k19", "_self")'>19</text>
<line
x1='39.960' y1='77.460' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='63.540' style='text-anchor: middle; fill: red;'
onclick='window.open("#k18", "_self")'>18</text>
</svg></div>
<pre>(defprotocol blanchet-corrected basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s b (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s b (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Corrected Blanchet's protocol"))</pre>
<p id="k18">Item <a href="#t18">18</a>, Children: <a href="#k19">19</a> <a href="#k20">20</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>d</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: red;' cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 18</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(non-orig (invk b))
(uniq-orig s)
(comment "From the initiator's perspective, is the secret leaked?")
(label 18)
(unrealized (0 1))
(origs (s (0 0)))
(comment "2 in cohort - 2 not yet seen"))</pre>
<p id="k19">Item <a href="#t18">19</a>, Parent: <a href="#k18">18</a>, Child: <a href="#k21">21</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 189.960 Q 192.900 189.960 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b-0 (invk a-0)) b-0)</title>
<circle style='fill: red;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a-0) (b b-0))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='139.920' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 19</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b a-0 b-0 akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand resp 2 (d d) (s s) (a a-0) (b b-0))
(precedes ((0 0) (2 0)) ((2 1) (0 1)) ((2 1) (1 0)))
(non-orig (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand resp 2) (enc d s) (0 1))
(label 19)
(parent 18)
(unrealized (1 0) (2 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k20">Item <a href="#t18">20</a>, Parent: <a href="#k18">18</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='139.920' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 20</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(deflistener s)
(precedes ((0 0) (2 0)) ((2 1) (0 1)))
(non-orig (invk b))
(uniq-orig s)
(operation encryption-test (added-listener s) (enc d s) (0 1))
(label 20)
(parent 18)
(unrealized (2 0))
(comment "empty cohort"))</pre>
<p id="k21">Item <a href="#t18">21</a>, Parent: <a href="#k19">19</a>, Child: <a href="#k22">22</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 189.960 Q 192.900 189.960 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: blue;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='139.920' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 21</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand resp 2 (d d) (s s) (a a) (b b))
(precedes ((0 0) (2 0)) ((2 1) (0 1)) ((2 1) (1 0)))
(non-orig (invk b))
(uniq-orig d s)
(operation nonce-test (contracted (a-0 a) (b-0 b)) s (2 0)
(enc (enc s b (invk a)) b))
(label 21)
(parent 19)
(unrealized (1 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k22">Item <a href="#t18">22</a>, Parent: <a href="#k21">21</a>.</p>
<div>
<svg
class='diagram' width='379.800pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 379.800 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='339.840' y1='114.960' x2='339.840' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='239.880' y1='114.960' x2='239.880' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 339.840 189.960 Q 242.880 152.460 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='339.840' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='339.840' cy='114.960' r='6.000'/></g>
<path
d='M 239.880 189.960 Q 142.920 152.460 45.960 189.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 189.960 Q 192.900 189.960 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='239.880' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: blue;' cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle style='fill: blue;' cx='39.960' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 114.960 Q 136.920 77.460 233.880 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 39.960 114.960 Q 186.900 77.460 333.840 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<text
x='189.900' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 22</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand init 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener s)
(precedes ((0 0) (2 0)) ((0 0) (3 0)) ((2 1) (0 1)) ((2 1) (1 0))
((3 1) (1 0)))
(non-orig (invk b))
(uniq-orig d s)
(operation nonce-test (added-listener s) d (1 0) (enc d s))
(label 22)
(parent 21)
(unrealized (3 0))
(comment "empty cohort"))</pre>
<p id="t23">Tree <a href="#top">23</a>.</p>
<div>
<svg
class='diagram' width='129.840pt' height='79.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 129.840 79.920' font-size='12.000'>
<text
x='89.880' y='26.040'
style='font-weight: bold; text-anchor: middle; fill: blue;'
onclick='window.open("#k24", "_self")'>24</text>
<line
x1='39.960' y1='39.960' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='26.040' style='text-anchor: middle; fill: black;'
onclick='window.open("#k23", "_self")'>23</text>
</svg></div>
<pre>(defprotocol blanchet-corrected basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s b (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s b (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Corrected Blanchet's protocol"))</pre>
<p id="k23">Item <a href="#t23">23</a>, Child: <a href="#k24">24</a>.</p>
<div>
<svg
class='diagram' width='79.920pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 79.920 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: red;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='39.960' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 23</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(non-orig (invk a) (invk b))
(uniq-orig d)
(comment "Analyze from the responder's perspective")
(label 23)
(unrealized (0 0))
(origs (d (0 1)))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k24">Item <a href="#t23">24</a>, Parent: <a href="#k23">23</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 139.920 114.960 Q 92.940 114.960 45.960 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: blue;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((s s) (a a) (b b))</title>
<text x='139.920' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 24 (realized)</text>
</svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(defstrand init 1 (s s) (a a) (b b))
(precedes ((1 0) (0 0)))
(non-orig (invk a) (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand init 1) (enc s b (invk a))
(0 0))
(label 24)
(parent 23)
(unrealized)
(shape)
(maps ((0) ((a a) (b b) (s s) (d d))))
(origs (s (1 0)) (d (0 1))))</pre>
<p id="t25">Tree <a href="#top">25</a>.</p>
<div>
<svg
class='diagram' width='229.680pt' height='79.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 229.680 79.920' font-size='12.000'>
<text
x='189.720' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k28", "_self")'>28</text>
<line
x1='139.800' y1='39.960' x2='189.720' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='139.800' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k27", "_self")'>27</text>
<line
x1='89.880' y1='39.960' x2='139.800' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='89.880' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k26", "_self")'>26</text>
<line
x1='39.960' y1='39.960' x2='89.880' y2='39.960'
style='stroke-width: 0.960; stroke: gray;'/>
<text
x='39.960' y='26.040' style='text-anchor: middle; fill: red;'
onclick='window.open("#k25", "_self")'>25</text>
</svg></div>
<pre>(defprotocol blanchet-corrected basic
(defrole init
(vars (a b akey) (s skey) (d data))
(trace (send (enc (enc s b (invk a)) b)) (recv (enc d s)))
(uniq-orig s))
(defrole resp
(vars (a b akey) (s skey) (d data))
(trace (recv (enc (enc s b (invk a)) b)) (send (enc d s)))
(uniq-orig d))
(comment "Corrected Blanchet's protocol"))</pre>
<p id="k25">Item <a href="#t25">25</a>, Child: <a href="#k26">26</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='229.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 229.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='114.960' x2='139.920' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>d</title><circle cx='139.920' cy='189.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='114.960' r='6.000'/></g>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: red;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 25</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(non-orig (invk a) (invk b))
(uniq-orig d)
(comment "From the responders's perspective, is the secret leaked?")
(label 25)
(unrealized (0 0) (1 0))
(preskeleton)
(comment "Not a skeleton"))</pre>
<p id="k26">Item <a href="#t25">26</a>, Parent: <a href="#k25">25</a>, Child: <a href="#k27">27</a>.</p>
<div>
<svg
class='diagram' width='179.880pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 179.880 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 189.960 Q 86.940 189.960 133.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: red;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='89.940' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 26</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(precedes ((0 1) (1 0)))
(non-orig (invk a) (invk b))
(uniq-orig d)
(comment "From the responders's perspective, is the secret leaked?")
(label 26)
(parent 25)
(unrealized (0 0))
(origs (d (0 1)))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k27">Item <a href="#t25">27</a>, Parent: <a href="#k26">26</a>, Child: <a href="#k28">28</a>.</p>
<div>
<svg
class='diagram' width='279.840pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 279.840 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='239.880' y1='114.960' x2='239.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 239.880 114.960 Q 142.920 77.460 45.960 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: red;' cx='139.920' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 189.960 Q 86.940 189.960 133.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: blue;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((s s) (a a) (b b))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='139.920' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 27</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand init 1 (s s) (a a) (b b))
(precedes ((0 1) (1 0)) ((2 0) (0 0)))
(non-orig (invk a) (invk b))
(uniq-orig d s)
(operation encryption-test (added-strand init 1) (enc s b (invk a))
(0 0))
(label 27)
(parent 26)
(unrealized (1 0))
(comment "1 in cohort - 1 not yet seen"))</pre>
<p id="k28">Item <a href="#t25">28</a>, Parent: <a href="#k27">27</a>.</p>
<div>
<svg
class='diagram' width='379.800pt' height='304.920pt'
xmlns='http://www.w3.org/2000/svg' version='1.1'
viewBox='0 0 379.800 304.920' font-size='12.000'>
<defs>
<marker
id='arrow' orient='auto' markerWidth='5' markerHeight='10' refX='5'
refY='5'>
<path
d='M 0 0 5 5 0 10'
style='stroke-width: 2; fill: none; stroke: black;'/></marker>
</defs>
<line
x1='339.840' y1='114.960' x2='339.840' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='239.880' y1='114.960' x2='239.880' y2='114.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='139.920' y1='189.960' x2='139.920' y2='264.960'
style='stroke-width: 0.960; stroke: gray;'/>
<line
x1='39.960' y1='114.960' x2='39.960' y2='189.960'
style='stroke-width: 0.960; stroke: gray;'/>
<path
d='M 339.840 189.960 Q 242.880 152.460 145.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>s</title><circle cx='339.840' cy='189.960' r='6.000'/></g>
<g><title>s</title>
<circle style='fill: red;' cx='339.840' cy='114.960' r='6.000'/></g>
<path
d='M 239.880 114.960 Q 142.920 77.460 45.960 114.960'
style='stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<path
d='M 239.880 114.960 Q 286.860 114.960 333.840 114.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle cx='239.880' cy='114.960' r='6.000'/></g>
<g><title>d</title><circle cx='139.920' cy='264.960' r='6.000'/></g>
<g><title>d</title>
<circle style='fill: blue;' cx='139.920' cy='189.960' r='6.000'/></g>
<path
d='M 39.960 189.960 Q 86.940 189.960 133.920 189.960'
style='stroke-dasharray: 6.000,2.400; stroke-width: 0.960; stroke: black; marker-end: url(#arrow); fill: none;'/>
<g><title>(enc d s)</title>
<circle cx='39.960' cy='189.960' r='6.000'/></g>
<g><title>(enc (enc s b (invk a)) b)</title>
<circle style='fill: blue;' cx='39.960' cy='114.960' r='6.000'/></g>
<g><title>((s s) (a a) (b b))</title>
<text x='239.880' y='77.460' style='text-anchor: middle;'>init</text>
</g>
<g><title>((d d) (s s) (a a) (b b))</title>
<text x='39.960' y='77.460' style='text-anchor: middle;'>resp</text>
</g>
<text
x='189.900' y='39.960'
style='text-anchor: middle;'>blanchet-corrected 28</text></svg></div>
<pre>(defskeleton blanchet-corrected
(vars (d data) (s skey) (a b akey))
(defstrand resp 2 (d d) (s s) (a a) (b b))
(deflistener d)
(defstrand init 1 (s s) (a a) (b b))
(deflistener s)
(precedes ((0 1) (1 0)) ((2 0) (0 0)) ((2 0) (3 0)) ((3 1) (1 0)))
(non-orig (invk a) (invk b))
(uniq-orig d s)
(operation nonce-test (added-listener s) d (1 0) (enc d s))
(label 28)
(parent 27)
(unrealized (3 0))
(comment "empty cohort"))</pre>
</body>
</html>