sim-lib-view-bridge 0.1.1

Reversible BRIDGE packet review surface for SIM Web.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155

use sim_codec_bridge::BridgePacket;
use sim_kernel::{Expr, Symbol};
use sim_value::build::{int, list, text};

pub(super) fn collaboration_controls(packet: &BridgePacket) -> Expr {
    let target = packet_target(packet);
    let packet_path = default_packet_path(packet);
    sim_lib_scene::box_(
        "bridge-collab",
        vec![
            action_form(
                "patch",
                target.clone(),
                vec![
                    field_node(
                        "target",
                        "Patch target",
                        &packet_path,
                        vec![text("target")],
                        "string",
                    ),
                    field_node(
                        "replacement",
                        "Replacement",
                        "",
                        vec![text("replacement")],
                        "string",
                    ),
                ],
            ),
            action_form(
                "review",
                target.clone(),
                vec![
                    field_node(
                        "target",
                        "Review target",
                        &packet_path,
                        vec![text("target")],
                        "string",
                    ),
                    field_node("body", "Review", "", vec![text("body")], "string"),
                ],
            ),
            action_form(
                "vote",
                target.clone(),
                vec![
                    field_node(
                        "target",
                        "Vote target",
                        &packet_path,
                        vec![text("target")],
                        "string",
                    ),
                    field_node(
                        "axis",
                        "Score axis",
                        "correctness",
                        vec![text("scores"), int(0), text("axis")],
                        "symbol",
                    ),
                    field_node(
                        "value",
                        "Score",
                        "1",
                        vec![text("scores"), int(0), text("value")],
                        "number",
                    ),
                    field_node(
                        "reason",
                        "Score reason",
                        "",
                        vec![text("scores"), int(0), text("reason")],
                        "string",
                    ),
                ],
            ),
            action_form(
                "receipt",
                target,
                vec![
                    field_node(
                        "status",
                        "Receipt status",
                        "accepted",
                        vec![text("status")],
                        "symbol",
                    ),
                    field_node(
                        "ref",
                        "Receipt ref",
                        &packet_path,
                        vec![text("refs"), int(0)],
                        "string",
                    ),
                ],
            ),
        ],
    )
}

fn packet_target(packet: &BridgePacket) -> Expr {
    packet
        .header
        .cid
        .as_ref()
        .map(text)
        .unwrap_or_else(|| Expr::Symbol(Symbol::new("bridge-packet")))
}

fn default_packet_path(packet: &BridgePacket) -> String {
    format!("body/{}/payload", packet.header.output.as_qualified_str())
}

fn action_form(action: &str, target: Expr, children: Vec<Expr>) -> Expr {
    let mut nodes = children;
    nodes.push(sim_lib_scene::node(
        "button",
        vec![
            ("label", text(format!("Create {action}"))),
            ("control", text("submit")),
        ],
    ));
    sim_lib_scene::node(
        "box",
        vec![
            ("role", Expr::Symbol(Symbol::new("edit-form"))),
            ("target", target),
            ("path", list(vec![text("bridge-collab"), text(action)])),
            ("value-codec", text("codec:bridge")),
            ("children", list(nodes)),
        ],
    )
}

fn field_node(
    name: &str,
    label: &str,
    value: &str,
    value_path: Vec<Expr>,
    value_kind: &str,
) -> Expr {
    sim_lib_scene::node(
        "field",
        vec![
            ("name", text(name)),
            ("label", text(label)),
            ("value", text(value)),
            ("value-path", list(value_path)),
            ("value-kind", text(value_kind)),
            ("required", Expr::Bool(true)),
        ],
    )
}