blob: 3eb9a037bcecdce20a4ab5e4793517c042607864 (
plain)
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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
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
}
|
