house/tracking/tracking.pr

18 lines
368 B
Plaintext

<require-service <daemon tracking>>
<daemon tracking {
argv: ". ./.envrc && exec ./track.py cam1"
dir: "./tracking"
protocol: application/syndicate
}>
? <MainDataspace ?ds> [
? <service-object <daemon tracking> ?t> [
$t {
mainDataspace: $ds
}
]
; $ds ?? <marker "cam1" ?id ?r ?t ?ti> [
; $log ! <log $ti {line: [$id $r $t]}>
; ]
[]
]