meta/config/simplex.pr

; <require-service <daemon simplex_bot_actor>>
<depends-on <daemon simplex_bot_actor> <service-state <daemon syndesizer> started>>
<depends-on <daemon simplex_bot_actor> <service-state <daemon simplex-chat> started>>

 # $config <require-service <daemon base64_decoder>>

let ?websocket = dataspace
<bind <ref { oid: "websocket" key: #x"" }> $websocket #f>
let ?websocketUrl = "ws://127.0.0.1:5225/"

<bind <ref { oid: "syndicate" key: #x"" }> $config #f>

? <service-state <daemon simplex-chat> ready> [
  ? <service-object <daemon syndesizer> ?cap> [
    $cap <websocket { dataspace: $websocket url: $websocketUrl }>
  ]
]

? <simplex ?simplexSpace> [

  $websocket ? <connected $websocketUrl> [
    ? <service-object <daemon simplex_bot_actor> ?cap> [
      $cap {
        dataspace: $simplexSpace
        websocket: $websocket
      }
    ]
  ]

  ? <notifications ?notifyspace> [ ? <socketspace ?socketspace> [

    $simplexSpace ? <chat {chatInfo: { groupInfo: { groupId: ?id } } chatItems: [{content: {msgContent: {text: ?text}}}] }> [
      $simplexSpace ? <group { groupId: $id localDisplayName: ?name image: ?image }> [
        $socketspace ? <shaviliterate $text ?trans> [
          $notifyspace ! <notify $name { body: $trans icon: $image }>
        ]
      ]
    ]
    $simplexSpace ? <chat {chatInfo: { groupInfo: { groupId: ?id } } chatItem: {content: {msgContent: {text: ?text}}} }> [
      $simplexSpace ? <group { groupId: $id localDisplayName: ?name image: ?image }> [
        $socketspace ? <shaviliterate $text ?trans> [
          $notifyspace ! <notify $name { body: $trans icon: $image }>
        ]
      ]
    ]

    $simplexSpace ? <chat {chatInfo: { contact: { contactId: ?id } } chatItems: [{content: {msgContent: {text: ?text}}}] }> [
      $config ? <socketspace ?beepSpace> $beepSpace [
        ! <beep private-message>
      ]
      $simplexSpace ? <contact { contactId: $id localDisplayName: ?name image: ?image }> [
        $socketspace ? <shaviliterate $text ?trans> [
          $notifyspace ! <notify $name { body: $trans icon: $image }>
        ]
      ]
    ]

    $simplexSpace ? <chat {chatInfo: { contact: { contactId: ?id } } chatItem: {content: {msgContent: {text: ?text}}} }> [
      $config ? <socketspace ?beepSpace> $beepSpace [
        ! <beep private-message>
      ]
      $simplexSpace ? <contact { contactId: $id localDisplayName: ?name image: ?image }> [
        $socketspace ? <shaviliterate $text ?trans> [
          $notifyspace ! <notify $name { body: $trans icon: $image }>
        ]
      ]
    ]

    $simplexSpace ? <contact ?id { profile: {displayName: ?displayName }}> [
      $notifyspace ! <notify $displayName { }>
      $simplexSpace ? <icon $id ?path> [
        $notifyspace ! <notify $displayName {icon: $path}>
      ]
    ]
  ] ]

]