2 * Copyright (C) 2016, 2017 "IoT.bzh"
3 * Author José Bollo <jose.bollo@iot.bzh>
5 * Licensed under the Apache License, Version 2.0 (the "License");
6 * you may not use this file except in compliance with the License.
7 * You may obtain a copy of the License at
9 * http://www.apache.org/licenses/LICENSE-2.0
11 * Unless required by applicable law or agreed to in writing, software
12 * distributed under the License is distributed on an "AS IS" BASIS,
13 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 * See the License for the specific language governing permissions and
15 * limitations under the License.
27 #include <sys/types.h>
28 #include <sys/socket.h>
31 #include <systemd/sd-event.h>
32 #include <systemd/sd-daemon.h>
34 #include <uuid/uuid.h>
35 #include <json-c/json.h>
36 #include <afb/afb-binding-v2.h>
38 #include "afs-supervision.h"
39 #include "afb-systemd.h"
40 #include "afb-session.h"
42 #include "afb-stub-ws.h"
45 #include "afb-api-so-v2.h"
46 #include "afb-api-ws.h"
47 #include "afb-apiset.h"
51 #include "wrap-json.h"
53 extern void afs_discover(const char *pattern, void (*callback)(void *closure, pid_t pid), void *closure);
55 /* supervised items */
58 /* link to the next supervised */
59 struct supervised *next;
61 /* credentials of the supervised */
62 struct afb_cred *cred;
64 /* connection with the supervised */
65 struct afb_stub_ws *stub;
68 /* api and apiset name */
69 static const char supervision_apiname[] = AFS_SURPERVISION_APINAME_INTERNAL;
70 static const char supervisor_apiname[] = "supervisor";
73 struct afb_apiset *main_apiset;
75 /* the empty apiset */
76 static struct afb_apiset *empty_apiset;
78 /* supervision socket path */
79 static const char supervision_socket_path[] = AFS_SURPERVISION_SOCKET;
82 static pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER;
84 /* list of supervised daemons */
85 static struct supervised *superviseds;
87 /*************************************************************************************/
89 static int afb_init_supervision_api();
91 /*************************************************************************************/
94 * Creates the supervisor socket for 'path' and return it
95 * return -1 in case of failure
97 static int create_supervision_socket(const char *path)
100 struct sockaddr_un addr;
103 /* check the path's length */
104 length = strlen(path);
106 ERROR("Path name of supervision socket too long: %d", (int)length);
107 errno = ENAMETOOLONG;
111 /* create a socket */
112 fd = socket(AF_UNIX, SOCK_STREAM, 0);
114 ERROR("Can't create socket: %m");
118 /* setup the bind to a path */
119 memset(&addr, 0, sizeof addr);
120 addr.sun_family = AF_UNIX;
121 strcpy(addr.sun_path, path);
122 if (addr.sun_path[0] == '@')
123 addr.sun_path[0] = 0; /* abstract sockets */
127 /* binds the socket to the path */
128 rc = bind(fd, (struct sockaddr *) &addr, (socklen_t)(sizeof addr));
130 ERROR("can't bind socket to %s", path);
138 * send on 'fd' an initiator with 'command'
139 * return 0 on success or -1 on failure
141 static int send_initiator(int fd, const char *command)
145 struct afs_supervision_initiator asi;
148 memset(&asi, 0, sizeof asi);
149 strcpy(asi.interface, AFS_SURPERVISION_INTERFACE_1);
151 strncpy(asi.extra, command, sizeof asi.extra - 1);
153 /* send the initiator */
154 swr = write(fd, &asi, sizeof asi);
156 ERROR("Can't send initiator: %m");
158 } else if (swr < sizeof asi) {
159 ERROR("Sending incomplete initiator: %m");
167 * checks whether the incomming supervised represented by its creds
168 * is to be accepted or not.
169 * return 1 if yes or 0 otherwise.
171 static int should_accept(struct afb_cred *cred)
173 return cred && cred->pid != getpid(); /* not me! */
176 static void on_supervised_hangup(struct afb_stub_ws *stub)
178 struct supervised *s, **ps;
179 pthread_mutex_lock(&mutex);
181 while ((s = *ps) && s->stub != stub)
185 afb_stub_ws_unref(stub);
187 pthread_mutex_unlock(&mutex);
191 * create a supervised for socket 'fd' and 'cred'
192 * return 0 in case of success or -1 in case of error
194 static int make_supervised(int fd, struct afb_cred *cred)
196 struct supervised *s;
199 s = malloc(sizeof *s);
203 fdev = afb_fdev_create(fd);
210 s->stub = afb_stub_ws_create_client(fdev, supervision_apiname, empty_apiset);
215 pthread_mutex_lock(&mutex);
216 s->next = superviseds;
218 pthread_mutex_unlock(&mutex);
219 afb_stub_ws_on_hangup(s->stub, on_supervised_hangup);
224 * Search the supervised of 'pid', return it or NULL.
226 static struct supervised *supervised_of_pid(pid_t pid)
228 struct supervised *s;
230 pthread_mutex_lock(&mutex);
232 while (s && pid != s->cred->pid)
234 pthread_mutex_unlock(&mutex);
240 * handles incoming connection on 'sock'
242 static void accept_supervision_link(int sock)
245 struct sockaddr addr;
247 struct afb_cred *cred;
249 lenaddr = (socklen_t)sizeof addr;
250 fd = accept(sock, &addr, &lenaddr);
252 cred = afb_cred_create_for_socket(fd);
253 rc = should_accept(cred);
255 rc = send_initiator(fd, NULL);
257 rc = make_supervised(fd, cred);
262 afb_cred_unref(cred);
268 * handle even on server socket
270 static int listening(sd_event_source *src, int fd, uint32_t revents, void *closure)
272 if ((revents & EPOLLIN) != 0)
273 accept_supervision_link(fd);
274 if ((revents & EPOLLHUP) != 0) {
275 ERROR("supervision socket closed");
283 static void discovered_cb(void *closure, pid_t pid)
285 struct supervised *s;
287 s = supervised_of_pid(pid);
294 static int discover_supervised()
297 afs_discover("afb-daemon", discovered_cb, &n);
302 * initalize the supervision
304 static int init(const char *spec)
310 ERROR("invalid socket spec");
314 rc = afb_session_init(100, 600, "");
315 /* TODO check that value */
317 /* create the apisets */
318 main_apiset = afb_apiset_create(supervisor_apiname, 0);
320 ERROR("Can't create supervisor's apiset");
323 empty_apiset = afb_apiset_create(supervision_apiname, 0);
325 ERROR("Can't create supervision apiset");
330 /* init the main apiset */
331 rc = afb_init_supervision_api();
333 ERROR("Can't create supervision's apiset: %m");
337 /* create the supervision socket */
338 fd = create_supervision_socket(supervision_socket_path);
342 /* listen the socket */
345 ERROR("refused to listen on socket");
349 /* integrate the socket to the loop */
350 rc = sd_event_add_io(afb_systemd_get_event_loop(),
354 ERROR("handling socket event isn't possible");
358 /* adds the server socket */
359 rc = afb_api_ws_add_server(spec, main_apiset);
361 ERROR("can't start the server socket");
367 /* start should not be null but */
368 static void start(int signum, void *arg)
380 sd_notify(1, "READY=1");
382 discover_supervised();
386 * initalize the supervision
388 int main(int ac, char **av)
390 verbosity = Verbosity_Level_Debug;
391 /* enter job processing */
392 jobs_start(3, 0, 10, start, av[1]);
393 WARNING("hoops returned from jobs_enter! [report bug]");
397 /*********************************************************************************************************/
399 static struct afb_binding_data_v2 datav2;
401 static void f_list(struct afb_req req)
404 struct json_object *resu, *item;
405 struct supervised *s;
407 resu = json_object_new_object();
410 sprintf(pid, "%d", (int)s->cred->pid);
412 wrap_json_pack(&item, "{si si si ss ss ss}",
413 "pid", (int)s->cred->pid,
414 "uid", (int)s->cred->uid,
415 "gid", (int)s->cred->gid,
417 "label", s->cred->label,
418 "user", s->cred->user
420 json_object_object_add(resu, pid, item);
423 afb_req_success(req, resu, NULL);
426 static void f_discover(struct afb_req req)
428 discover_supervised();
429 afb_req_success(req, NULL, NULL);
432 static void propagate(struct afb_req req, const char *verb)
434 struct afb_xreq *xreq;
435 struct json_object *args, *item;
436 struct supervised *s;
440 xreq = xreq_from_request(req.closure);
441 args = afb_xreq_json(xreq);
442 if (!json_object_object_get_ex(args, "pid", &item)) {
443 afb_xreq_fail(xreq, "no-pid", NULL);
447 p = json_object_get_int(item);
449 afb_xreq_fail(xreq, "bad-pid", NULL);
452 s = supervised_of_pid((pid_t)p);
454 afb_req_fail(req, "unknown-pid", NULL);
457 json_object_object_del(args, "pid");
459 xreq->request.verb = verb;
460 api = afb_stub_ws_client_api(s->stub);
461 api.itf->call(api.closure, xreq);
464 static void f_do(struct afb_req req)
466 propagate(req, NULL);
469 static void f_config(struct afb_req req)
471 propagate(req, NULL);
474 static void f_trace(struct afb_req req)
476 propagate(req, NULL);
479 static void f_sessions(struct afb_req req)
481 propagate(req, "slist");
484 static void f_session_close(struct afb_req req)
486 propagate(req, "sclose");
489 static void f_exit(struct afb_req req)
491 propagate(req, NULL);
494 static void f_debug_wait(struct afb_req req)
496 propagate(req, "wait");
499 static void f_debug_break(struct afb_req req)
501 propagate(req, "break");
504 static const struct afb_auth _afb_auths_v2_supervision[] = {
507 .type = afb_auth_Permission,
508 .text = "urn:AGL:permission:#supervision:platform:access"
512 static const struct afb_verb_v2 _afb_verbs_v2_supervision[] = {
516 .auth = &_afb_auths_v2_supervision[0],
518 .session = AFB_SESSION_NONE_V2
522 .callback = f_config,
523 .auth = &_afb_auths_v2_supervision[0],
525 .session = AFB_SESSION_NONE_V2
530 .auth = &_afb_auths_v2_supervision[0],
532 .session = AFB_SESSION_NONE_V2
537 .auth = &_afb_auths_v2_supervision[0],
539 .session = AFB_SESSION_NONE_V2
543 .callback = f_sessions,
544 .auth = &_afb_auths_v2_supervision[0],
546 .session = AFB_SESSION_NONE_V2
549 .verb = "session-close",
550 .callback = f_session_close,
551 .auth = &_afb_auths_v2_supervision[0],
553 .session = AFB_SESSION_NONE_V2
558 .auth = &_afb_auths_v2_supervision[0],
560 .session = AFB_SESSION_NONE_V2
563 .verb = "debug-wait",
564 .callback = f_debug_wait,
565 .auth = &_afb_auths_v2_supervision[0],
567 .session = AFB_SESSION_NONE_V2
570 .verb = "debug-break",
571 .callback = f_debug_break,
572 .auth = &_afb_auths_v2_supervision[0],
574 .session = AFB_SESSION_NONE_V2
578 .callback = f_discover,
579 .auth = &_afb_auths_v2_supervision[0],
581 .session = AFB_SESSION_NONE_V2
586 static const struct afb_binding_v2 _afb_binding_v2_supervision = {
587 .api = supervisor_apiname,
588 .specification = NULL,
590 .verbs = _afb_verbs_v2_supervision,
597 static int afb_init_supervision_api()
599 return afb_api_so_v2_add_binding(&_afb_binding_v2_supervision, NULL, main_apiset, &datav2);