1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/input/mail-agents.pic	Wed Jul 11 15:51:28 2012 +0200
     1.3 @@ -0,0 +1,66 @@
     1.4 +.PS 3.5
     1.5 +arrowhead = 18
     1.6 +
     1.7 +define disk {
     1.8 +Disk: [
     1.9 +	ellipsewid=ellipsewid/2
    1.10 +	ellipseht=ellipseht/2
    1.11 +	ellipse
    1.12 +	spline down ellipseht*4/3 from last ellipse.w \
    1.13 +		then right ellipsewid \
    1.14 +		then up ellipseht*4/3 to last ellipse.e
    1.15 +]
    1.16 +}
    1.17 +
    1.18 +define machine {
    1.19 +	box wid $1.wid+.3 ht $1.ht+.3 dashed at $1
    1.20 +}
    1.21 +
    1.22 +up
    1.23 +Sender: [
    1.24 +ellipse "\fBMUA\fP"
    1.25 +ellipse "MSA"
    1.26 +]
    1.27 +machine(Sender)
    1.28 +
    1.29 +arrow 3*linewid from Sender.n
    1.30 +
    1.31 +right
    1.32 +Server1: [
    1.33 +ellipse "MTA"
    1.34 +] with .s at last arrow.end
    1.35 +machine(Server1)
    1.36 +
    1.37 +arrow 2*linewid from Server1.e
    1.38 +box invis ". . ."
    1.39 +arrow 2*linewid
    1.40 +
    1.41 +Server2: [
    1.42 +ellipse "MTA"
    1.43 +ellipse "MDA"
    1.44 +arrow linewid/2
    1.45 +disk
    1.46 +move to Disk.s - (0,.05)
    1.47 +]
    1.48 +machine(Server2)
    1.49 +
    1.50 +down
    1.51 +arrow <- 3*linewid dashed from Server2.s+(.86,0)
    1.52 +arrow 3*linewid from Server2.s+(.9,0)
    1.53 +
    1.54 +Recipient: [
    1.55 +ellipse "MRA"
    1.56 +ellipse "MDA"
    1.57 +move to last ellipse.w
    1.58 +left
    1.59 +arrow linewid/2
    1.60 +disk
    1.61 +arrow <-> linewid/2
    1.62 +#arrow <-> linewid/2 from Disk.w+(0,.03)
    1.63 +#arrow linewid/2 from Disk.w+(0,-.03)
    1.64 +ellipse "\fBMUA\fP"
    1.65 +] with .n at last arrow.end-(.8,0)
    1.66 +machine(Recipient)
    1.67 +
    1.68 +line from .5 <Sender.nw,Server1.sw> to .5 <Server2.se,Recipient.ne> dotted
    1.69 +.PE