Add 'afb_service_call_sync' function
[src/app-framework-binder.git] / src / afb-ws-json1.c
1 /*
2  * Copyright (C) 2016, 2017 "IoT.bzh"
3  * Author: José Bollo <jose.bollo@iot.bzh>
4  *
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
8  *
9  *   http://www.apache.org/licenses/LICENSE-2.0
10  *
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.
16  */
17
18 #define _GNU_SOURCE
19
20 #include <stdlib.h>
21 #include <unistd.h>
22 #include <assert.h>
23 #include <errno.h>
24 #include <string.h>
25
26 #include <json-c/json.h>
27
28 #include <afb/afb-req-itf.h>
29
30 #include "afb-wsj1.h"
31 #include "afb-ws-json1.h"
32 #include "afb-common.h"
33 #include "afb-msg-json.h"
34 #include "afb-session.h"
35 #include "afb-cred.h"
36 #include "afb-apiset.h"
37 #include "afb-xreq.h"
38 #include "afb-context.h"
39 #include "afb-evt.h"
40 #include "verbose.h"
41
42 /* predeclaration of structures */
43 struct afb_ws_json1;
44 struct afb_wsreq;
45
46 /* predeclaration of websocket callbacks */
47 static void aws_on_hangup(struct afb_ws_json1 *ws, struct afb_wsj1 *wsj1);
48 static void aws_on_call(struct afb_ws_json1 *ws, const char *api, const char *verb, struct afb_wsj1_msg *msg);
49 static void aws_on_event(struct afb_ws_json1 *ws, const char *event, int eventid, struct json_object *object);
50
51 /* predeclaration of wsreq callbacks */
52 static void wsreq_destroy(struct afb_xreq *xreq);
53 static void wsreq_reply(struct afb_xreq *xreq, int iserror, json_object *obj);
54
55 /* declaration of websocket structure */
56 struct afb_ws_json1
57 {
58         int refcount;
59         void (*cleanup)(void*);
60         void *cleanup_closure;
61         struct afb_session *session;
62         struct afb_evt_listener *listener;
63         struct afb_wsj1 *wsj1;
64         struct afb_cred *cred;
65         struct afb_apiset *apiset;
66         int new_session;
67 };
68
69 /* declaration of wsreq structure */
70 struct afb_wsreq
71 {
72         struct afb_xreq xreq;
73         struct afb_ws_json1 *aws;
74         struct afb_wsreq *next;
75         struct afb_wsj1_msg *msgj1;
76 };
77
78 /* interface for afb_ws_json1 / afb_wsj1 */
79 static struct afb_wsj1_itf wsj1_itf = {
80         .on_hangup = (void*)aws_on_hangup,
81         .on_call = (void*)aws_on_call
82 };
83
84 /* interface for xreq */
85 const struct afb_xreq_query_itf afb_ws_json1_xreq_itf = {
86         .reply = wsreq_reply,
87         .unref = wsreq_destroy
88 };
89
90 /* the interface for events */
91 static const struct afb_evt_itf evt_itf = {
92         .broadcast = (void*)aws_on_event,
93         .push = (void*)aws_on_event
94 };
95
96 /***************************************************************
97 ****************************************************************
98 **
99 **  functions of afb_ws_json1 / afb_wsj1
100 **
101 ****************************************************************
102 ***************************************************************/
103
104 struct afb_ws_json1 *afb_ws_json1_create(int fd, struct afb_apiset *apiset, struct afb_context *context, void (*cleanup)(void*), void *cleanup_closure)
105 {
106         struct afb_ws_json1 *result;
107
108         assert(fd >= 0);
109         assert(context != NULL);
110
111         result = malloc(sizeof * result);
112         if (result == NULL)
113                 goto error;
114
115         result->refcount = 1;
116         result->cleanup = cleanup;
117         result->cleanup_closure = cleanup_closure;
118         result->session = afb_session_addref(context->session);
119         result->new_session = context->created != 0;
120         if (result->session == NULL)
121                 goto error2;
122
123         result->wsj1 = afb_wsj1_create(afb_common_get_event_loop(), fd, &wsj1_itf, result);
124         if (result->wsj1 == NULL)
125                 goto error3;
126
127         result->listener = afb_evt_listener_create(&evt_itf, result);
128         if (result->listener == NULL)
129                 goto error4;
130
131         result->cred = afb_cred_create_for_socket(fd);
132         if (!result->cred)
133                 result->cred = afb_cred_current();
134         result->apiset = afb_apiset_addref(apiset);
135         return result;
136
137 error4:
138         afb_wsj1_unref(result->wsj1);
139 error3:
140         afb_session_unref(result->session);
141 error2:
142         free(result);
143 error:
144         close(fd);
145         return NULL;
146 }
147
148 static struct afb_ws_json1 *aws_addref(struct afb_ws_json1 *ws)
149 {
150         ws->refcount++;
151         return ws;
152 }
153
154 static void aws_unref(struct afb_ws_json1 *ws)
155 {
156         if (--ws->refcount == 0) {
157                 afb_evt_listener_unref(ws->listener);
158                 afb_wsj1_unref(ws->wsj1);
159                 if (ws->cleanup != NULL)
160                         ws->cleanup(ws->cleanup_closure);
161                 afb_session_unref(ws->session);
162                 afb_cred_unref(ws->cred);
163                 afb_apiset_unref(ws->apiset);
164                 free(ws);
165         }
166 }
167
168 static void aws_on_hangup(struct afb_ws_json1 *ws, struct afb_wsj1 *wsj1)
169 {
170         aws_unref(ws);
171 }
172
173 static void aws_on_call(struct afb_ws_json1 *ws, const char *api, const char *verb, struct afb_wsj1_msg *msg)
174 {
175         struct afb_wsreq *wsreq;
176
177         DEBUG("received websocket request for %s/%s: %s", api, verb, afb_wsj1_msg_object_s(msg));
178
179         /* allocate */
180         wsreq = calloc(1, sizeof *wsreq);
181         if (wsreq == NULL) {
182                 afb_wsj1_close(ws->wsj1, 1008, NULL);
183                 return;
184         }
185
186         /* init the context */
187         afb_xreq_init(&wsreq->xreq, &afb_ws_json1_xreq_itf);
188         afb_context_init(&wsreq->xreq.context, ws->session, afb_wsj1_msg_token(msg));
189         if (!wsreq->xreq.context.invalidated)
190                 wsreq->xreq.context.validated = 1;
191         if (ws->new_session != 0) {
192                 wsreq->xreq.context.created = 1;
193                 ws->new_session = 0;
194         }
195
196         /* fill and record the request */
197         afb_wsj1_msg_addref(msg);
198         wsreq->msgj1 = msg;
199         wsreq->xreq.cred = afb_cred_addref(ws->cred);
200         wsreq->xreq.api = api;
201         wsreq->xreq.verb = verb;
202         wsreq->xreq.json = afb_wsj1_msg_object_j(wsreq->msgj1);
203         wsreq->aws = aws_addref(ws);
204         wsreq->xreq.listener = wsreq->aws->listener;
205
206         /* emits the call */
207         afb_xreq_process(&wsreq->xreq, ws->apiset);
208 }
209
210 static void aws_on_event(struct afb_ws_json1 *aws, const char *event, int eventid, struct json_object *object)
211 {
212         afb_wsj1_send_event_j(aws->wsj1, event, afb_msg_json_event(event, object));
213 }
214
215 /***************************************************************
216 ****************************************************************
217 **
218 **  functions of wsreq / afb_req
219 **
220 ****************************************************************
221 ***************************************************************/
222
223 static void wsreq_destroy(struct afb_xreq *xreq)
224 {
225         struct afb_wsreq *wsreq = CONTAINER_OF_XREQ(struct afb_wsreq, xreq);
226
227         afb_context_disconnect(&wsreq->xreq.context);
228         afb_wsj1_msg_unref(wsreq->msgj1);
229         afb_cred_unref(wsreq->xreq.cred);
230         aws_unref(wsreq->aws);
231         free(wsreq);
232 }
233
234 static void wsreq_reply(struct afb_xreq *xreq, int iserror, json_object *obj)
235 {
236         struct afb_wsreq *wsreq = CONTAINER_OF_XREQ(struct afb_wsreq, xreq);
237         int rc;
238
239         rc = (iserror ? afb_wsj1_reply_error_j : afb_wsj1_reply_ok_j)(
240                         wsreq->msgj1, obj, afb_context_sent_token(&wsreq->xreq.context));
241         if (rc)
242                 ERROR("Can't send reply: %m");
243 }
244