diff options
| author | Charles.Forsyth <devnull@localhost> | 2006-12-22 17:07:39 +0000 |
|---|---|---|
| committer | Charles.Forsyth <devnull@localhost> | 2006-12-22 17:07:39 +0000 |
| commit | 37da2899f40661e3e9631e497da8dc59b971cbd0 (patch) | |
| tree | cbc6d4680e347d906f5fa7fca73214418741df72 /appl/alphabet/setup | |
| parent | 54bc8ff236ac10b3eaa928fd6bcfc0cdb2ba46ae (diff) | |
20060303a
Diffstat (limited to 'appl/alphabet/setup')
| -rw-r--r-- | appl/alphabet/setup | 63 |
1 files changed, 63 insertions, 0 deletions
diff --git a/appl/alphabet/setup b/appl/alphabet/setup new file mode 100644 index 00000000..3eb9a037 --- /dev/null +++ b/appl/alphabet/setup @@ -0,0 +1,63 @@ +/appl/alphabet/rexecsrv.sh tcp!rogero {typeset /fs; import /fs/unbundle /fs/entries /fs/print} + +#################### +addr=tcp!rogero!1234 +run /appl/alphabet/declare.sh +/appl/alphabet/mkendpoint.sh $addr +echo ${rewrite { + /echo hello | + /grid/remote | + /grid/rexec tcp!rogero!1235 "{(/fd);/filter $1 "{wc}} + } +} +- { + /echo hello | + /grid/remote | + /grid/rexec tcp!rogero!1235 "{(/fd);/filter $1 "{wc}} | + /grid/local + } +# - {remote /n/local/lib/words | farm rogero!1235 "{tr -d e} } | /grid/local} +###################### + +/appl/alphabet/mkendpoint.sh tcp!rogero!9998 +load alphabet +run /appl/alphabet/declare.sh +- { + /fs/walk /tmp | + /fs/bundle | + /grid/remote | + /grid/rexec tcp!rogero!1235 "{ + (/fd) + /fs/unbundle $1 | + /fs/entries | + /fs/print + } +} + +- { + /fs/walk /tmp | + /fs/bundle | + /grid/remote | + /grid/local | + /fs/unbundle | + /fs/print +} + +############### + +the below script generates: + +alphabet: 2. bundle: write error: i/o on hungup channel +and a much truncated file. + +-{ + /fs/walk /tmp | + /fs/bundle | + /grid/remote | + /grid/rexec tcp!127.1!1235 "{ + (/fd) + /fs/unbundle $1 | + /fs/filter -d {/fs/match '*.b'} | + /fs/bundle + } | /create xx +} |