22 lines
480 B
Plaintext
22 lines
480 B
Plaintext
|
<require-service <daemon http_translator>>
|
||
|
|
||
|
<daemon http_translator {
|
||
|
argv: "/home/repo/syndicate/syndicate_utils/src/http_translator"
|
||
|
protocol: text/syndicate
|
||
|
}>
|
||
|
|
||
|
let ?other = dataspace
|
||
|
|
||
|
$other [
|
||
|
? <http ?handle GET ?headers ?path ?body> [
|
||
|
<http $handle 200 {} "get handler invoked">
|
||
|
]
|
||
|
]
|
||
|
|
||
|
? <service-object <daemon http_translator> ?cap> [
|
||
|
$cap [
|
||
|
; publish GET requests with prefix "/foo/bar" to other dataspace
|
||
|
<handler #{GET} ["foo" "bar" ] $other>
|
||
|
]
|
||
|
]
|