diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2020-12-27 21:44:25 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2020-12-27 21:44:25 +0200 |
| commit | ce2fcf704aac494b44c78a34c714732685dfc1ad (patch) | |
| tree | 2b299a1e61dafbf9dc0f37344693a20d8be770b8 /awklib | |
| parent | e4f1018b3b4ff27d109832210a2e5914e62f9bf9 (diff) | |
| download | egawk-ce2fcf704aac494b44c78a34c714732685dfc1ad.tar.gz egawk-ce2fcf704aac494b44c78a34c714732685dfc1ad.tar.bz2 egawk-ce2fcf704aac494b44c78a34c714732685dfc1ad.zip | |
More updates to gawkinet.texi.
Diffstat (limited to 'awklib')
| -rw-r--r-- | awklib/eg/network/catpipeclient.awk | 7 | ||||
| -rw-r--r-- | awklib/eg/network/catpipeserver.awk | 8 | ||||
| -rw-r--r-- | awklib/eg/network/daytimeserver.awk | 4 | ||||
| -rw-r--r-- | awklib/eg/network/fingerclient.awk | 9 |
4 files changed, 24 insertions, 4 deletions
diff --git a/awklib/eg/network/catpipeclient.awk b/awklib/eg/network/catpipeclient.awk new file mode 100644 index 00000000..c129a1ec --- /dev/null +++ b/awklib/eg/network/catpipeclient.awk @@ -0,0 +1,7 @@ +BEGIN { + NetService = "/inet/tcp/0/localhost/8888" + print "README" |& NetService + while ((NetService |& getline) > 0) + print $0 + close(NetService) +} diff --git a/awklib/eg/network/catpipeserver.awk b/awklib/eg/network/catpipeserver.awk new file mode 100644 index 00000000..f3ab0c1e --- /dev/null +++ b/awklib/eg/network/catpipeserver.awk @@ -0,0 +1,8 @@ +BEGIN { + NetService = "/inet/tcp/8888/0/0" + NetService |& getline # sets $0 and the fields + CatPipe = ("cat " $1) + while ((CatPipe | getline) > 0) + print $0 |& NetService + close(NetService) +} diff --git a/awklib/eg/network/daytimeserver.awk b/awklib/eg/network/daytimeserver.awk new file mode 100644 index 00000000..f2ed76e9 --- /dev/null +++ b/awklib/eg/network/daytimeserver.awk @@ -0,0 +1,4 @@ +BEGIN { + print strftime() |& "/inet/tcp/8888/0/0" + close("/inet/tcp/8888/0/0") +} diff --git a/awklib/eg/network/fingerclient.awk b/awklib/eg/network/fingerclient.awk index bcc2c94c..d2ed9fd0 100644 --- a/awklib/eg/network/fingerclient.awk +++ b/awklib/eg/network/fingerclient.awk @@ -1,7 +1,8 @@ BEGIN { - NetService = "/inet/tcp/0/localhost/finger" - print "var{name}" |& NetService - while ((NetService |& getline) > 0) + finger_server = "andrew.cmu.edu" + finger_connection = "/inet/tcp/0/" finger_server "/finger" + print "wnace" |& finger_connection + while ((finger_connection |& getline) > 0) print $0 - close(NetService) + close(finger_connection) } |