.PS
picwid = 5i
boxwid = 1.5i
boxht = 1i
ellipsewid = boxwid/2-0.1i
ellipseht = boxht/2-0.1i

Host1: box
Host2: box at Host1 + (picwid-boxwid,0)
Host3: box at Host1 - (0,boxht*2)
Host4: box at Host3 + (picwid-boxwid,0)
"host1" at Host1.n above
"host2" at Host2.n above
"host3" at Host3.n above
"host4" at Host4.n above
Serv1: ellipse at Host1+(boxwid/4,0) "server"
Prog:  ellipse at Host2-(boxwid/4,0) "rcopy"
Serv3: ellipse at Host3+(boxwid/4,boxht/4) "server"
Serv4: ellipse at Host4-(boxwid/4,-boxht/4) "server"
User:  ellipse invis at Host1-(boxwid/4,0) "user"
File1: ellipse invis at Host3+(boxwid/4,-boxht/4) "file1"
File2: ellipse invis at Host4-(boxwid/4,boxht/4) "file2"
line from User.e to Serv1.w
line from Serv3.s to File1.n
line from Serv4.s to File2.n
line from Serv1.e to (Host1.e,Serv1.e)
line from Serv1.s to (Serv1.s,Host1.s)
line from Prog.w to (Host2.w,Prog.w)
line from Serv3.n to (Serv3.n,Host3.n)
line from Serv4.w to (Host4.w,Serv4.w)
arrow <-> from (Host1.e,Serv1.e) to (Host2.w,Prog.w)
arrow from (Serv3.n,Host3.n) to (Serv1.s,Host1.s)
arrow from Serv1.se to (Host4.w,Serv4.w)
.PE