? <mpv ?mpv> $mpv [

  ?? <play-file ?file> [
    ! <send-json { "command": ["loadfile" $file "append-play"] }>
  ]

  ?? <recv-json ?js> [ $log ! <log "-" { mpv: $js }> ]

]

<require-service <daemon mpv-translator>>
<depends-on <daemon mpv-translator> <service-state <daemon mpv> ready>>

let ?socketPath = "/run/user/1000/mpv.sock"

<daemon mpv {
  argv: [
    "/run/current-system/sw/bin/mpv"
    "--really-quiet"
    "--idle=yes"
    "--no-audio-display"
    "--input-ipc-server=/run/user/1000/mpv.sock"
  ]
  protocol: none
}>

<daemon mpv-translator {
  argv: "/home/emery/src/bin/json_socket_translator"
  protocol: application/syndicate
}>

let ?mpvSpace = dataspace
? <service-object <daemon mpv-translator> ?cap> [
  $cap {
    dataspace: $mpvSpace
    socket: $socketPath
  }
  <mpv $mpvSpace>
]