add network json editor written in ucode
[project/unetd.git] / scripts / unet-cli
1 #!/usr/bin/env ucode
2
3 let fs = require("fs");
4
5 let script_dir = sourcepath(0, true);
6 if (fs.basename(script_dir) == "scripts") {
7 unet_tool = fs.dirname(script_dir) + "/unet-tool";
8 if (!fs.access(unet_tool, "x")) {
9 warn("unet-tool missing\n");
10 exit(1);
11 }
12 } else {
13 unet_tool = "unet-tool";
14 }
15
16 args = {};
17
18 defaults = {
19 port: 51830,
20 pex_port: 51831,
21 keepalive: 10,
22 };
23
24 function usage() {
25 warn("Usage: ",fs.basename(sourcepath())," [<flags>] <file> <command> [<args>] [<option>=<value> ...]\n",
26 "\n",
27 "Commands:\n",
28 " - create: Create a new network file\n",
29 " - set-config: Change network config parameters\n",
30 " - add-host <name>: Add a host\n",
31 " - add-ssh-host <name> <host>: Add a remote OpenWrt host via SSH\n",
32 " (<host> can contain SSH options as well)\n",
33 " - set-host <name>: Change host settings\n",
34 " - set-ssh-host <name> <host>: Update local and remote host settings\n",
35 " - add-service <name>: Add a service\n",
36 " - set-service <name>: Change service settings\n",
37 " - sign Sign network data\n",
38 "\n",
39 "Flags:\n",
40 " -p: Print modified JSON instead of updating file\n",
41 "\n",
42 "Options:\n",
43 " - config options (create, set-config):\n",
44 " port=<val> set tunnel port (default: ", defaults.port, ")\n",
45 " pex_port=<val> set peer-exchange port (default: ", defaults.pex_port, ")\n",
46 " keepalive=<val> set keepalive interval (seconds, 0: off, default: ", defaults.keepalive,")\n",
47 " host options (add-host, add-ssh-host, set-host):\n",
48 " key=<val> set host public key (required for add-host)\n",
49 " port=<val> set host tunnel port number\n",
50 " groups=[+|-]<val>[,<val>...] set/add/remove groups that the host is a member of\n",
51 " ipaddr=[+|-]<val>[,<val>...] set/add/remove host ip addresses\n",
52 " subnet=[+|-]<val>[,<val>...] set/add/remove host announced subnets\n",
53 " endpoint=<val> set host endpoint address\n",
54 " ssh host options (add-ssh-host, set-ssh-host)\n",
55 " auth_key=<key> use <key> as public auth key on the remote host\n",
56 " priv_key=<key> use <key> as private host key on the remote host (default: generate a new key)\n",
57 " interface=<name> use <name> as interface in /etc/config/network on the remote host\n",
58 " connect=<val>[,<val>...] set IP addresses that the host will contact for network updates\n",
59 " tunnels=<ifname>:<service>[,...] set active tunnel devices\n",
60 " service options (add-service, set-service):\n",
61 " type=<val> set service type (required for add-service)\n",
62 " members=[+|-]<val>[,<val>...] set/add/remove service member hosts/groups\n",
63 " vxlan service options (add-service, set-service):\n",
64 " id=<val> set VXLAN ID\n",
65 " port=<val> set VXLAN port\n",
66 " mtu=<val> set VXLAN device MTU\n",
67 " forward_ports=[+|-]<val>[,<val>...] set members allowed to receive broadcast/multicast/unknown-unicast\n",
68 " sign options:\n",
69 " upload=<ip>[,<ip>...] upload signed file to hosts\n",
70 "\n");
71 return 1;
72 }
73
74 if (length(ARGV) < 2)
75 exit(usage());
76
77 file = shift(ARGV);
78 command = shift(ARGV);
79
80 field_types = {
81 int: function(object, name, val) {
82 object[name] = int(val);
83 },
84 string: function(object, name, val) {
85 object[name] = val;
86 },
87 array: function(object, name, val) {
88 let op = substr(val, 0, 1);
89
90 if (op == "+" || op == "-") {
91 val = substr(val, 1);
92 object[name] ??= [];
93 } else {
94 op = "=";
95 object[name] = [];
96 }
97
98 let vals = split(val, ",");
99 for (val in vals) {
100 object[name] = filter(object[name], function(v) {
101 return v != val
102 });
103 if (op != "-")
104 push(object[name], val);
105 }
106
107 if (!length(object[name]))
108 delete object[name];
109 },
110 };
111
112 service_field_types = {
113 vxlan: {
114 id: "int",
115 port: "int",
116 mtu: "int",
117 forward_ports: "array",
118 },
119 };
120
121 ssh_script = '
122
123 set_list() {
124 local field="$1"
125 local val="$2"
126
127 first=1
128 for cur in $val; do
129 if [ -n "$first" ]; then
130 cmd=set
131 else
132 cmd=add_list
133 fi
134 uci $cmd "network.$INTERFACE.$field=$cur"
135 first=
136 done
137 }
138 set_interface_attrs() {
139 [ -n "$AUTH_KEY" ] && uci set "network.$INTERFACE.auth_key=$AUTH_KEY"
140 set_list connect "$CONNECT"
141 set_list tunnels "$TUNNELS"
142 }
143
144 check_interface() {
145 [ "$(uci -q get "network.$INTERFACE")" = "interface" -a "$(uci -q get "network.$INTERFACE.proto")" = "unet" ] && return 0
146 uci batch <<EOF
147 set network.$INTERFACE=interface
148 set network.$INTERFACE.proto=unet
149 set network.$INTERFACE.device=$INTERFACE
150 set network.$INTERFACE.domain=unet
151 EOF
152 }
153
154 check_interface_key() {
155 key="$(uci -q get "network.$INTERFACE.key" | unet-tool -q -H -K -)"
156 [ -n "$key" ] || {
157 uci set "network.$INTERFACE.key=$(unet-tool -G)"
158 key="$(uci get "network.$INTERFACE.key" | unet-tool -H -K -)"
159 }
160 echo "key=$key"
161 }
162
163 check_interface
164 check_interface_key
165 set_interface_attrs
166 uci commit
167 reload_config
168 ';
169
170 args = {};
171 print_only = false;
172
173 function fetch_args() {
174 for (arg in ARGV) {
175 vals = match(arg, /^(.[[:alnum:]_-]*)=(.*)$/);
176 if (!vals) {
177 warn("Invalid argument: ", arg, "\n");
178 exit(1);
179 }
180 args[vals[1]] = vals[2]
181 }
182 }
183
184 function set_field(typename, object, name, val) {
185 if (!field_types[typename]) {
186 warn("Invalid type ", type, "\n");
187 return;
188 }
189
190 if (type(val) != "string")
191 return;
192
193 if (val == "") {
194 delete object[name];
195 return;
196 }
197
198 field_types[typename](object, name, val);
199 }
200
201 function set_fields(object, list) {
202 for (f in list)
203 set_field(list[f], object, f, args[f]);
204 }
205
206 function set_host(name) {
207 let host = net_data.hosts[name];
208
209 set_fields(host, {
210 key: "string",
211 endpoint: "string",
212 port: "int",
213 ipaddr: "array",
214 subnet: "array",
215 groups: "array",
216 });
217 }
218
219 function set_service(name) {
220 let service = net_data.services[name];
221
222 set_fields(service, {
223 type: "string",
224 members: "array",
225 });
226
227 if (service_field_types[service.type])
228 set_fields(service.config, service_field_types[service.type]);
229 }
230
231 function sync_ssh_host(host) {
232 let interface = args.interface ?? "unet";
233 let connect = replace(args.connect ?? "", ",", " ");
234 let auth_key = args.auth_key;
235 let tunnels = replace(replace(args.tunnels ?? "", ",", " "), ":", "=");
236
237 if (!auth_key) {
238 let fh = fs.mkstemp();
239 system(unet_tool + " -q -P -K " + file + ".key >&" + fh.fileno());
240 fh.seek();
241 auth_key = fh.read("line");
242 fh.close();
243 auth_key = replace(auth_key, "\n", "");
244 if (auth_key == "") {
245 warn("Could not read auth key\n");
246 exit(1);
247 }
248 }
249
250 let fh = fs.mkstemp();
251 fh.write("INTERFACE='" + interface + "'\n");
252 fh.write("CONNECT='" + connect + "'\n");
253 fh.write("AUTH_KEY='" + auth_key + "'\n");
254 fh.write("TUNNELS='" + tunnels + "'\n");
255 fh.write(ssh_script);
256 fh.flush();
257 fh.seek();
258
259 fh2 = fs.mkstemp();
260 system(sprintf("ssh "+host+" sh <&%d >&%d", fh.fileno(), fh2.fileno()));
261 fh.close();
262
263 data = {};
264
265 fh2.seek();
266 while (line = fh2.read("line")) {
267 let vals = match(line, /^(.[[:alnum:]_-]*)=(.*)\n$/);
268 if (!vals) {
269 warn("Invalid argument: ", arg, "\n");
270 exit(1);
271 }
272 data[vals[1]] = vals[2]
273 }
274 fh2.close();
275
276 if (!data.key) {
277 warn("Could not read host key from SSH host\n");
278 exit(1);
279 }
280
281 args.key = data.key;
282 }
283
284 while (substr(ARGV[0], 0, 1) == "-") {
285 opt = shift(ARGV);
286 if (opt == "--")
287 break;
288 else if (opt == "-p")
289 print_only = true;
290 else
291 exit(usage());
292 }
293
294 if (command == "add-host" || command == "set-host" ||
295 command == "add-ssh-host" || command == "set-ssh-host") {
296 hostname = shift(ARGV);
297 if (!hostname) {
298 warn("Missing host name argument\n");
299 exit(1);
300 }
301 }
302
303 if (command == "add-ssh-host" || command == "set-ssh-host") {
304 ssh_host = shift(ARGV);
305 if (!ssh_host) {
306 warn("Missing SSH host/user argument\n");
307 exit(1);
308 }
309 }
310
311 if (command == "add-service" || command == "set-service") {
312 servicename = shift(ARGV);
313 if (!servicename) {
314 warn("Missing service name argument\n");
315 exit(1);
316 }
317 }
318
319 fetch_args();
320
321 if (command == "add-ssh-host" || command == "set-ssh-host") {
322 sync_ssh_host(ssh_host);
323 command = replace(command, "ssh-", "");
324 }
325
326 if (command == "create") {
327 net_data = {
328 config: {},
329 hosts: {},
330 services: {}
331 };
332 } else {
333 fh = fs.open(file);
334 if (!fh) {
335 warn("Could not open input file ", file, "\n");
336 exit(1);
337 }
338 try {
339 net_data = json(fh);
340 } catch(e) {
341 warn("Could not parse input file ", file, "\n");
342 exit(1);
343 }
344 }
345
346 if (command == "create") {
347 for (key in keys(defaults))
348 args[key] ??= "" + defaults[key];
349 if (!fs.access(file + ".key"))
350 system(unet_tool + " -G > " + file + ".key");
351 }
352
353 if (command == "sign") {
354 ret = system(unet_tool + " -S -K " + file + ".key -o " + file + ".bin " + file);
355 if (ret != 0)
356 exit(ret);
357
358 if (args.upload) {
359 hosts = split(args.upload, ",");
360 for (host in hosts) {
361 warn("Uploading " + file + ".bin to " + host + "\n");
362 ret = system(unet_tool + " -U " + host + " -K "+ file + ".key " + file + ".bin");
363 if (ret)
364 warn("Upload failed\n");
365 }
366 }
367 exit(0);
368 }
369
370 if (command == "create" || command == "set-config") {
371 set_fields(net_data.config, {
372 port: "int",
373 keepalive: "int",
374 });
375 set_field("int", net_data.config, "peer-exchange-port", args.pex_port);
376 } else if (command == "add-host") {
377 net_data.hosts[hostname] = {};
378 if (!args.key) {
379 warn("Missing host key\n");
380 exit(1);
381 }
382 set_host(hostname);
383 } else if (command == "set-host") {
384 if (!net_data.hosts[hostname]) {
385 warn("Host '", hostname, "' does not exist\n");
386 exit(1);
387 }
388 set_host(hostname);
389 } else if (command == "add-service") {
390 net_data.services[servicename] = {
391 config: {},
392 members: [],
393 };
394 if (!args.type) {
395 warn("Missing service type\n");
396 exit(1);
397 }
398 set_service(servicename);
399 } else if (command == "set-service") {
400 if (!net_data.services[servicename]) {
401 warn("Service '", servicename, "' does not exist\n");
402 exit(1);
403 }
404 set_service(servicename);
405 } else {
406 warn("Unknown command\n");
407 exit(1);
408 }
409
410 net_data_json = sprintf("%.J\n", net_data);
411 if (print_only)
412 print(net_data_json);
413 else
414 fs.writefile(file, net_data_json);