diff options
Diffstat (limited to 'awklib/eg')
-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) } |