2017-03-30 15:17:37 +03:00
|
|
|
::
|
2016-02-11 03:41:28 +03:00
|
|
|
:::: /hoon/talk/sur
|
2015-01-26 20:44:09 +03:00
|
|
|
!:
|
2014-12-05 23:14:00 +03:00
|
|
|
|%
|
2017-04-21 14:43:17 +03:00
|
|
|
::
|
|
|
|
::> ||
|
2017-05-13 01:05:49 +03:00
|
|
|
::> || %query-models
|
|
|
|
::> ||
|
|
|
|
::> models relating to queries, their results and updates.
|
|
|
|
::+|
|
|
|
|
::
|
|
|
|
++ query ::> query paths
|
|
|
|
$% {$reader $~} ::< shared ui state
|
|
|
|
{$friend $~} ::< publicly joined
|
2017-06-13 04:09:00 +03:00
|
|
|
{$burden who/ship} ::< duties to share
|
2017-06-13 01:19:45 +03:00
|
|
|
{$report $~} ::< duty reports
|
2017-05-13 01:05:49 +03:00
|
|
|
{$circle nom/knot ran/range} ::< story query
|
|
|
|
== ::
|
2017-06-13 01:19:45 +03:00
|
|
|
++ range (unit {hed/place tal/(unit place)}) ::< msg range, @ud/@da
|
|
|
|
++ place $%({$da @da} {$ud @ud}) ::< point for range
|
2017-05-13 01:05:49 +03:00
|
|
|
++ prize ::> query result
|
|
|
|
$% $: $reader ::< /reader
|
|
|
|
gys/(jug char (set partner)) ::< glyph bindings
|
|
|
|
nis/(map ship cord) ::< nicknames
|
|
|
|
== ::
|
|
|
|
{$friend cis/(set circle)} ::< /friend
|
2017-06-13 01:19:45 +03:00
|
|
|
{$burden sos/(map knot burden)} ::< /burden
|
|
|
|
{$circle burden} ::< /circle
|
2017-05-13 01:05:49 +03:00
|
|
|
== ::
|
|
|
|
++ rumor ::< query result change
|
|
|
|
$% $: $reader ::< /reader
|
|
|
|
$= dif ::
|
|
|
|
$% {$glyph diff-glyph} ::
|
|
|
|
{$nick diff-nick} ::
|
|
|
|
== ::
|
|
|
|
== ::
|
|
|
|
{$friend add/? cir/circle} ::< /friend
|
2017-06-13 01:19:45 +03:00
|
|
|
{$burden nom/knot dif/diff-story} ::< /burden
|
2017-05-13 01:05:49 +03:00
|
|
|
{$circle dif/diff-story} ::< /circle
|
|
|
|
== ::
|
2017-06-13 01:19:45 +03:00
|
|
|
++ burden ::< full story state
|
|
|
|
$: gaz/(list telegram) ::< all messages
|
|
|
|
cos/lobby ::< loc & rem configs
|
|
|
|
pes/crowd ::< loc & rem presences
|
|
|
|
== ::
|
2017-05-13 01:05:49 +03:00
|
|
|
::TODO deltas into app
|
|
|
|
++ delta ::
|
|
|
|
$% ::TODO no more %more, just produce/take list instead!
|
|
|
|
{$more mor/(list delta)} ::< multiple changes
|
|
|
|
:: messaging state ::
|
|
|
|
{$out cir/circle out/(list thought)} ::< msgs into outbox
|
2017-06-13 21:14:13 +03:00
|
|
|
{$done num/@ud} ::< msgs delivered
|
2017-05-13 01:05:49 +03:00
|
|
|
:: shared ui state ::
|
|
|
|
{$glyph diff-glyph} ::< un/bound glyph
|
|
|
|
{$nick diff-nick} ::< changed nickname
|
|
|
|
:: story state ::
|
|
|
|
{$story nom/knot dif/diff-story} ::< change to story
|
|
|
|
:: side-effects ::
|
2017-06-13 01:19:45 +03:00
|
|
|
{$init $~} ::< initialize
|
|
|
|
{$observe who/ship} ::< watch burden bearer
|
2017-05-13 01:05:49 +03:00
|
|
|
{$react ost/bone rac/reaction} ::TODO ost.bol? ::< reaction to action
|
|
|
|
{$quit ost/bone} ::< force unsubscribe
|
|
|
|
== ::
|
|
|
|
++ diff-glyph {bin/? gyf/char pas/(set partner)} ::< un/bound glyph
|
|
|
|
++ diff-nick {who/ship nic/cord} ::< changed nickname
|
|
|
|
++ diff-story ::
|
2017-06-14 03:28:16 +03:00
|
|
|
$% {$new cof/config} ::< new story
|
2017-06-13 01:19:45 +03:00
|
|
|
{$bear bur/burden} ::< new inherited story
|
2017-06-14 03:28:16 +03:00
|
|
|
{$burden bur/?} ::< burden flag
|
2017-05-13 01:05:49 +03:00
|
|
|
{$grams gaz/(list telegram)} ::< new/changed msgs
|
|
|
|
{$config cir/circle dif/diff-config} ::< new/changed config
|
|
|
|
{$status pan/partner who/ship dif/diff-status} ::< new/changed status
|
2017-06-13 01:19:45 +03:00
|
|
|
{$follow sub/? pas/(set partner)} ::TODO range ::< un/subscribe
|
2017-05-13 01:05:49 +03:00
|
|
|
{$remove $~} ::< removed story
|
|
|
|
== ::
|
|
|
|
++ diff-config ::> config change
|
2017-06-14 03:28:16 +03:00
|
|
|
$% {$full cof/config} ::< set w/o side-effects
|
2017-06-13 01:19:45 +03:00
|
|
|
::TODO maybe just single partner, since we prob always do that
|
2017-06-16 04:53:47 +03:00
|
|
|
{$source add/? pas/(set partner)} ::< add/rem sources
|
2017-05-13 01:05:49 +03:00
|
|
|
{$caption cap/cord} ::< changed description
|
|
|
|
{$filter fit/filter} ::< changed filter
|
|
|
|
{$secure sec/security} ::< changed security
|
2017-06-14 04:06:38 +03:00
|
|
|
{$permit add/? sis/(set ship)} ::< add/rem to b/w-list
|
2017-05-13 01:05:49 +03:00
|
|
|
{$remove $~} ::< removed config
|
|
|
|
== ::
|
|
|
|
++ diff-status ::> status change
|
|
|
|
$% {$full sat/status} ::< fully changed status
|
|
|
|
{$presence pec/presence} ::< changed presence
|
|
|
|
{$human dif/diff-human} ::< changed name
|
|
|
|
{$remove $~} ::< removed config
|
|
|
|
== ::
|
|
|
|
++ diff-human ::> name change
|
|
|
|
$% {$full man/human} ::< fully changed name
|
|
|
|
{$true tru/(unit (trel cord (unit cord) cord))} ::< changed true name
|
|
|
|
{$handle han/(unit cord)} ::< changed handle
|
|
|
|
== ::
|
|
|
|
::
|
|
|
|
::> ||
|
2017-04-21 14:43:17 +03:00
|
|
|
::> || %reader-communication
|
|
|
|
::> ||
|
|
|
|
::> broker interfaces for readers.
|
|
|
|
::+|
|
|
|
|
::
|
|
|
|
++ action ::> user action
|
2017-04-24 21:17:56 +03:00
|
|
|
$% :: circle configuration ::
|
2017-04-27 00:33:25 +03:00
|
|
|
{$create nom/knot des/cord sec/security} ::< create circle
|
2017-05-03 19:38:41 +03:00
|
|
|
{$delete nom/knot ano/(unit cord)} ::< delete + announce
|
2017-04-24 21:17:56 +03:00
|
|
|
{$depict nom/knot des/cord} ::< change description
|
2017-05-09 22:43:42 +03:00
|
|
|
{$filter nom/knot fit/filter} ::< change message rules
|
2017-04-24 21:17:56 +03:00
|
|
|
{$permit nom/knot inv/? sis/(set ship)} ::< invite/banish
|
2017-05-03 19:38:41 +03:00
|
|
|
{$source nom/knot sub/? src/(set partner)} ::< un/sub to/from src
|
2017-04-14 00:40:53 +03:00
|
|
|
:: messaging ::
|
2017-04-24 21:17:56 +03:00
|
|
|
{$convey tos/(list thought)} ::< post exact
|
|
|
|
{$phrase aud/(set partner) ses/(list speech)} ::< post easy
|
2017-04-11 14:00:13 +03:00
|
|
|
:: personal metadata ::
|
2017-04-24 21:17:56 +03:00
|
|
|
::TODO change to target partners, not only our circles.
|
|
|
|
{$status nos/(set knot) sat/status} ::< our status update
|
2017-04-11 14:00:13 +03:00
|
|
|
:: changing shared ui ::
|
2017-04-24 21:17:56 +03:00
|
|
|
{$glyph gyf/char pas/(set partner) bin/?} ::< un/bind a glyph
|
2017-05-13 01:05:49 +03:00
|
|
|
{$nick who/ship nic/knot} ::< new identity
|
2017-04-10 23:24:25 +03:00
|
|
|
== ::
|
2017-04-21 14:43:17 +03:00
|
|
|
++ reaction ::> user information
|
2017-04-24 21:17:56 +03:00
|
|
|
$: res/?($info $fail) ::< result
|
2017-05-01 20:34:05 +03:00
|
|
|
wat/cord ::< explain
|
2017-04-21 14:43:17 +03:00
|
|
|
why/(unit action) ::< cause
|
2017-04-10 23:24:25 +03:00
|
|
|
== ::
|
2017-04-21 14:43:17 +03:00
|
|
|
::
|
|
|
|
::> ||
|
|
|
|
::> || %broker-communication
|
|
|
|
::> ||
|
|
|
|
::> structures for communicating between brokers.
|
|
|
|
::+|
|
|
|
|
::
|
|
|
|
++ command ::> effect on story
|
2017-06-13 01:19:45 +03:00
|
|
|
$% {$publish tos/(list thought)} ::< deliver
|
|
|
|
{$bearing $~} ::< prompt to listen
|
2015-01-01 23:43:50 +03:00
|
|
|
== ::
|
2017-04-21 14:43:17 +03:00
|
|
|
::
|
|
|
|
::> ||
|
|
|
|
::> || %circles
|
|
|
|
::> ||
|
|
|
|
::> messaging targets and their metadata.
|
|
|
|
::+|
|
|
|
|
::
|
2017-04-24 21:17:56 +03:00
|
|
|
++ partner (each circle passport) ::< message target
|
|
|
|
++ circle {hos/ship nom/knot} ::< native target
|
2017-04-21 14:43:17 +03:00
|
|
|
++ passport ::> foreign target
|
2017-05-01 20:34:05 +03:00
|
|
|
$% {$twitter p/cord} ::< twitter handle
|
2014-12-05 23:14:00 +03:00
|
|
|
== ::
|
2017-04-25 22:09:20 +03:00
|
|
|
:: circle configurations. ::
|
2017-04-27 00:33:25 +03:00
|
|
|
++ lobby {loc/config rem/(map circle config)} ::< our & srcs configs
|
2017-04-24 21:17:56 +03:00
|
|
|
++ config ::> circle config
|
2017-06-16 04:53:47 +03:00
|
|
|
$: src/(set partner) ::< active sources
|
2017-04-24 21:17:56 +03:00
|
|
|
cap/cord ::< description
|
2017-05-09 22:43:42 +03:00
|
|
|
fit/filter ::< message rules
|
2017-04-24 21:17:56 +03:00
|
|
|
con/control ::< restrictions
|
2015-01-26 20:44:09 +03:00
|
|
|
== ::
|
2017-05-09 22:43:42 +03:00
|
|
|
++ filter ::> content filters
|
2017-06-16 06:29:35 +03:00
|
|
|
$: cas/? ::< dis/allow capitals
|
2017-05-09 22:43:42 +03:00
|
|
|
utf/? ::< dis/allow non-ascii
|
|
|
|
== ::
|
2017-04-27 00:33:25 +03:00
|
|
|
++ control {sec/security ses/(set ship)} ::< access control
|
2017-06-13 01:19:45 +03:00
|
|
|
++ security ::> security mode
|
2017-04-21 14:43:17 +03:00
|
|
|
$? $black ::< channel, blacklist
|
|
|
|
$white ::< village, whitelist
|
|
|
|
$green ::< journal, author list
|
|
|
|
$brown ::< mailbox, our r, bl w
|
2017-03-24 23:10:27 +03:00
|
|
|
== ::
|
2017-04-25 22:09:20 +03:00
|
|
|
:: participant metadata. ::
|
2017-04-27 00:33:25 +03:00
|
|
|
++ crowd {loc/group rem/(map partner group)} ::< our & srcs presences
|
|
|
|
++ group (map ship status) ::< presence map
|
2017-04-24 21:17:56 +03:00
|
|
|
++ status {pec/presence man/human} ::< participant
|
|
|
|
++ presence ::> status type
|
2017-06-21 23:48:47 +03:00
|
|
|
$? $gone ::< absent
|
2017-04-24 21:17:56 +03:00
|
|
|
$idle ::< idle
|
|
|
|
$hear ::< present
|
|
|
|
$talk ::< typing
|
2017-04-25 22:09:20 +03:00
|
|
|
== ::
|
2017-04-21 14:43:17 +03:00
|
|
|
++ human ::> human identifier
|
2017-06-21 23:48:47 +03:00
|
|
|
$: tru/(unit (trel cord (unit cord) cord)) ::< true name
|
2017-05-01 20:34:05 +03:00
|
|
|
han/(unit cord) ::< handle
|
2014-12-05 23:14:00 +03:00
|
|
|
== ::
|
2017-04-21 14:43:17 +03:00
|
|
|
::
|
|
|
|
::> ||
|
|
|
|
::> || %message-data
|
|
|
|
::> ||
|
|
|
|
::> structures for containing main message data.
|
|
|
|
::+|
|
|
|
|
::
|
2017-04-24 21:17:56 +03:00
|
|
|
++ telegram {aut/ship tot/thought} ::< who thought
|
2017-06-21 23:48:47 +03:00
|
|
|
++ thought {uid/serial aud/audience sam/statement} ::< which whom this
|
|
|
|
++ statement {wen/@da boq/bouquet sep/speech} ::< when what body
|
|
|
|
++ speech ::> content body
|
2017-04-21 14:43:17 +03:00
|
|
|
$% {$non $~} ::< no content (yo)
|
2017-05-01 20:34:05 +03:00
|
|
|
{$lin pat/? msg/cord} ::< no/@ text line
|
2017-04-24 21:17:56 +03:00
|
|
|
{$ire tos/serial sep/speech} ::< in-reply-to
|
|
|
|
{$url url/purf} ::< parsed url
|
2017-05-01 20:34:05 +03:00
|
|
|
{$exp exp/cord} ::< hoon line
|
2017-04-27 00:33:25 +03:00
|
|
|
{$fat tac/attache sep/speech} ::< attachment
|
2017-05-01 20:34:05 +03:00
|
|
|
{$lan nom/knot msg/cord} ::< local announce
|
2017-04-25 22:18:14 +03:00
|
|
|
{$inv inv/? cir/circle} ::< inv/ban for circle
|
2017-04-24 21:17:56 +03:00
|
|
|
{$mor ses/(list speech)} ::< multiplex
|
2017-05-01 20:34:05 +03:00
|
|
|
{$ext nom/term dat/*} ::< extended action
|
|
|
|
{$app app/term msg/cord} ::< app message
|
2017-04-21 14:43:17 +03:00
|
|
|
$: $api ::< api message
|
2017-05-01 20:34:05 +03:00
|
|
|
service/term ::< service name
|
|
|
|
id/cord ::< id on the service
|
2017-04-21 14:43:17 +03:00
|
|
|
id-url/purf ::< link to id
|
2017-05-01 20:34:05 +03:00
|
|
|
summary/cord ::< summary of event
|
|
|
|
body/cord ::< body of event
|
2017-04-21 14:43:17 +03:00
|
|
|
url/purf ::< link to event
|
|
|
|
meta/json ::< other data for web
|
2016-03-26 03:47:22 +03:00
|
|
|
== ::
|
2015-01-01 23:43:50 +03:00
|
|
|
== ::
|
2017-04-27 00:33:25 +03:00
|
|
|
++ attache ::> attachment
|
2017-05-01 20:34:05 +03:00
|
|
|
$% {$name nom/cord tac/attache} ::< named attachment
|
|
|
|
{$text (list cord)} ::< text lines
|
2017-04-21 14:43:17 +03:00
|
|
|
{$tank (list tank)} ::< tank list
|
|
|
|
== ::
|
|
|
|
::
|
|
|
|
::> ||
|
|
|
|
::> || %message-metadata
|
|
|
|
::> ||
|
|
|
|
:: structures for containing message metadata.
|
|
|
|
::+|
|
|
|
|
::
|
|
|
|
++ serial @uvH ::< unique identifier
|
|
|
|
++ audience (map partner (pair envelope delivery)) ::< destination + state
|
2017-04-24 21:17:56 +03:00
|
|
|
++ envelope {vis/? sen/(unit partner)} ::< visible sender
|
2017-04-21 14:43:17 +03:00
|
|
|
++ delivery ::> delivery state
|
|
|
|
$? $pending ::< undelivered
|
|
|
|
$received ::< delivered
|
|
|
|
$rejected ::< undeliverable
|
|
|
|
$released ::< sent one-way
|
|
|
|
$accepted ::< fully processed
|
2015-01-06 23:31:36 +03:00
|
|
|
== ::
|
2017-04-21 14:43:17 +03:00
|
|
|
++ bouquet (set flavor) ::< complete aroma
|
|
|
|
++ flavor path ::< content flavor
|
2014-12-05 23:14:00 +03:00
|
|
|
--
|