2 * Copyright (C) 2015, 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.
19 #define NO_PLUGIN_VERBOSE_MACRO
29 #include <sys/types.h>
30 #include <sys/socket.h>
33 #include <systemd/sd-event.h>
35 #include "afb-apiset.h"
36 #include "afb-systemd.h"
37 #include "afb-stub-ws.h"
42 char *path; /* path of the object for the API */
43 char *api; /* api name of the interface */
44 int fd; /* file descriptor */
45 sd_event_source *listensrc; /**< systemd source for server socket */
46 struct afb_apiset *apiset;
49 /******************************************************************************/
52 * create a structure api_ws not connected to the 'path'.
54 static struct api_ws *api_ws_make(const char *path)
59 /* allocates the structure */
60 length = strlen(path);
61 api = calloc(1, sizeof *api + 1 + length);
67 /* path is copied after the struct */
68 api->path = (char*)(api+1);
69 memcpy(api->path, path, length + 1);
71 /* api name is at the end of the path */
72 while (length && path[length - 1] != '/' && path[length - 1] != ':')
74 api->api = &api->path[length];
75 if (api->api == NULL || !afb_api_is_valid_name(api->api, 1)) {
89 static int api_ws_socket_unix(const char *path, int server)
92 struct sockaddr_un addr;
95 length = strlen(path);
101 if (server && path[0] != '@')
104 fd = socket(AF_UNIX, SOCK_STREAM, 0);
108 memset(&addr, 0, sizeof addr);
109 addr.sun_family = AF_UNIX;
110 strcpy(addr.sun_path, path);
111 if (addr.sun_path[0] == '@')
112 addr.sun_path[0] = 0; /* implement abstract sockets */
114 rc = bind(fd, (struct sockaddr *) &addr, (socklen_t)(sizeof addr));
116 rc = connect(fd, (struct sockaddr *) &addr, (socklen_t)(sizeof addr));
125 static int api_ws_socket_inet(const char *path, int server)
128 const char *service, *host, *api;
129 struct addrinfo hint, *rai, *iai;
132 api = strrchr(path, '/');
133 service = strrchr(path, ':');
134 if (api == NULL || service == NULL || api < service) {
138 host = strndupa(path, service++ - path);
139 service = strndupa(service, api - service);
142 memset(&hint, 0, sizeof hint);
143 hint.ai_family = AF_INET;
144 hint.ai_socktype = SOCK_STREAM;
145 rc = getaddrinfo(host, service, &hint, &rai);
153 while (iai != NULL) {
154 fd = socket(iai->ai_family, iai->ai_socktype, iai->ai_protocol);
157 rc = bind(fd, iai->ai_addr, iai->ai_addrlen);
159 rc = connect(fd, iai->ai_addr, iai->ai_addrlen);
173 static int api_ws_socket(const char *path, int server)
177 /* check for systemd socket */
178 if (0 == strncmp(path, "sd:", 3))
179 fd = systemd_fds_for(path + 3);
181 /* check for unix socket */
182 if (0 == strncmp(path, "unix:", 5))
184 fd = api_ws_socket_unix(path + 5, server);
187 fd = api_ws_socket_inet(path, server);
189 if (fd >= 0 && server) {
191 setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &rc, sizeof rc);
195 /* configure the socket */
197 fcntl(fd, F_SETFD, FD_CLOEXEC);
198 fcntl(fd, F_SETFL, O_NONBLOCK);
203 /**********************************************************************************/
205 int afb_api_ws_add_client(const char *path, struct afb_apiset *apiset, int strong)
207 struct api_ws *apiws;
208 struct afb_stub_ws *stubws;
210 /* create the ws client api */
211 apiws = api_ws_make(path);
215 /* connect to the service */
216 apiws->fd = api_ws_socket(apiws->path, 0);
218 ERROR("can't connect to ws service %s", apiws->path);
222 stubws = afb_stub_ws_create_client(apiws->fd, apiws->api, apiset);
224 ERROR("can't setup client ws service to %s", apiws->path);
227 if (afb_stub_ws_client_add(stubws, apiset) < 0) {
228 ERROR("can't add the client to the apiset for service %s", apiws->path);
234 afb_stub_ws_unref(stubws);
243 int afb_api_ws_add_client_strong(const char *path, struct afb_apiset *apiset)
245 return afb_api_ws_add_client(path, apiset, 1);
248 int afb_api_ws_add_client_weak(const char *path, struct afb_apiset *apiset)
250 return afb_api_ws_add_client(path, apiset, 0);
253 static int api_ws_server_accept_client(struct api_ws *apiws, int fd)
255 return -!afb_stub_ws_create_server(fd, apiws->api, apiws->apiset);
258 static void api_ws_server_accept(struct api_ws *apiws)
261 struct sockaddr addr;
264 lenaddr = (socklen_t)sizeof addr;
265 fd = accept(apiws->fd, &addr, &lenaddr);
267 rc = api_ws_server_accept_client(apiws, fd);
274 static int api_ws_server_connect(struct api_ws *apiws);
276 static int api_ws_server_listen_callback(sd_event_source *src, int fd, uint32_t revents, void *closure)
278 struct api_ws *apiws = closure;
280 if ((revents & EPOLLIN) != 0)
281 api_ws_server_accept(apiws);
282 if ((revents & EPOLLHUP) != 0)
283 api_ws_server_connect(apiws);
287 static void api_ws_server_disconnect(struct api_ws *apiws)
289 if (apiws->listensrc != NULL) {
290 sd_event_source_unref(apiws->listensrc);
291 apiws->listensrc = NULL;
293 if (apiws->fd >= 0) {
299 static int api_ws_server_connect(struct api_ws *apiws)
303 /* ensure disconnected */
304 api_ws_server_disconnect(apiws);
306 /* request the service object name */
307 apiws->fd = api_ws_socket(apiws->path, 1);
309 ERROR("can't create socket %s", apiws->path);
311 /* listen for service */
312 rc = sd_event_add_io(afb_systemd_get_event_loop(),
313 &apiws->listensrc, apiws->fd, EPOLLIN,
314 api_ws_server_listen_callback, apiws);
319 ERROR("can't add ws object %s", apiws->path);
324 /* create the service */
325 int afb_api_ws_add_server(const char *path, struct afb_apiset *apiset)
328 struct api_ws *apiws;
330 /* creates the ws api object */
331 apiws = api_ws_make(path);
336 if (!afb_apiset_lookup(apiset, apiws->api, 1)) {
337 ERROR("Can't provide ws-server for %s: API %s doesn't exist", path, apiws->api);
341 /* connect for serving */
342 rc = api_ws_server_connect(apiws);
346 apiws->apiset = afb_apiset_addref(apiset);