File: tcp_point

package info (click to toggle)
zsh-beta 4.3.17-dev-0%2B20120621-1
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 19,804 kB
  • sloc: ansic: 95,966; sh: 5,899; makefile: 845; perl: 745; awk: 383; sed: 16
file content (29 lines) | stat: -rw-r--r-- 443 bytes parent folder | download | duplicates (16)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
emulate -L zsh
setopt extendedglob cbases


if [[ $# -ne 1 ]]; then
    print "Usage: $0 port
Listen on the given port; send anything that arrives to standard output." >&2
    return 1
fi

local REPLY lfd afd
if ! ztcp -l $1; then
    print "Failed to listen on port $1" >&2
    return 1
fi

lfd=$REPLY

if ! ztcp -a $lfd; then
    print "Failed to accept on fd $lfd" >&2
    ztcp -c $lfd
fi

afd=$REPLY

cat <&$afd

ztcp -c $lfd
ztcp -c $afd