c52ad654a0fb2eff8ab0b9799331d53dfe644381
[src/app-framework-binder.git] / src / afb-svc.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
22 #include <json-c/json.h>
23
24 #include <afb/afb-req-itf.h>
25 #include <afb/afb-service-itf.h>
26
27 #include "afb-session.h"
28 #include "afb-context.h"
29 #include "afb-evt.h"
30 #include "afb-subcall.h"
31 #include "afb-svc.h"
32
33 /*
34  * Structure for recording service
35  */
36 struct afb_svc
37 {
38         /* session of the service */
39         struct afb_session *session;
40
41         /* event listener of the service or NULL */
42         struct afb_evt_listener *listener;
43
44         /* on event callback for the service */
45         void (*on_event)(const char *event, struct json_object *object);
46 };
47
48 /*
49  * Structure for requests initiated by the service
50  */
51 struct svc_req
52 {
53         /*
54          * CAUTION: 'context' field should be the first because there
55          * is an implicit convertion to struct afb_context
56          */
57         struct afb_context context;
58
59         /* the service */
60         struct afb_svc *svc;
61
62         /* the count of references to the request */
63         int refcount;
64 };
65
66 /* functions for services */
67 static void svc_on_event(struct afb_svc *svc, const char *event, int eventid, struct json_object *object);
68 static void svc_call(struct afb_svc *svc, const char *api, const char *verb, struct json_object *args,
69                                 void (*callback)(void*, int, struct json_object*), void *closure);
70
71 /* the interface for services */
72 static const struct afb_service_itf service_itf = {
73         .call = (void*)svc_call
74 };
75
76 /* the interface for events */
77 static const struct afb_evt_itf evt_itf = {
78         .broadcast = (void*)svc_on_event,
79         .push = (void*)svc_on_event
80 };
81
82 /* functions for requests of services */
83 static void svcreq_addref(struct svc_req *svcreq);
84 static void svcreq_unref(struct svc_req *svcreq);
85 static int svcreq_subscribe(struct svc_req *svcreq, struct afb_event event);
86 static int svcreq_unsubscribe(struct svc_req *svcreq, struct afb_event event);
87 static void svcreq_subcall(struct svc_req *svcreq, const char *api, const char *verb, struct json_object *args,
88                                 void (*callback)(void*, int, struct json_object*), void *closure);
89
90 /* interface for requests of services */
91 const struct afb_req_itf afb_svc_req_itf = {
92         .addref = (void*)svcreq_addref,
93         .unref = (void*)svcreq_unref,
94         .context_get = (void*)afb_context_get,
95         .context_set = (void*)afb_context_set,
96         .session_close = (void*)afb_context_close,
97         .session_set_LOA = (void*)afb_context_change_loa,
98         .subscribe = (void*)svcreq_subscribe,
99         .unsubscribe = (void*)svcreq_unsubscribe,
100         .subcall = (void*)svcreq_subcall
101 };
102
103 /* the common session for services sharing their session */
104 static struct afb_session *common_session;
105
106 /*
107  * Creates a new service
108  */
109 struct afb_svc *afb_svc_create(int share_session, int (*init)(struct afb_service service), void (*on_event)(const char *event, struct json_object *object))
110 {
111         int rc;
112         struct afb_svc *svc;
113
114         /* allocates the svc handler */
115         svc = malloc(sizeof * svc);
116         if (svc == NULL)
117                 goto error;
118
119         /* instanciate the session */
120         if (share_session) {
121                 /* session shared with other svcs */
122                 if (common_session == NULL) {
123                         common_session = afb_session_create (NULL, 0);
124                         if (common_session == NULL)
125                                 goto error2;
126                 }
127                 svc->session = afb_session_addref(common_session);
128         } else {
129                 /* session dedicated to the svc */
130                 svc->session = afb_session_create (NULL, 0);
131                 if (svc->session == NULL)
132                         goto error2;
133         }
134
135         /* initialises the listener if needed */
136         svc->on_event = on_event;
137         if (on_event == NULL)
138                 svc->listener = NULL;
139         else {
140                 svc->listener = afb_evt_listener_create(&evt_itf, svc);
141                 if (svc->listener == NULL)
142                         goto error3;
143         }
144
145         /* initialises the svc now */
146         rc = init((struct afb_service){ .itf = &service_itf, .closure = svc });
147         if (rc < 0)
148                 goto error4;
149
150         return svc;
151
152 error4:
153         if (svc->listener != NULL)
154                 afb_evt_listener_unref(svc->listener);
155 error3:
156         afb_session_unref(svc->session);
157 error2:
158         free(svc);
159 error:
160         return NULL;
161 }
162
163 /*
164  * Propagates the event to the service
165  */
166 static void svc_on_event(struct afb_svc *svc, const char *event, int eventid, struct json_object *object)
167 {
168         svc->on_event(event, object);
169         json_object_put(object);
170 }
171
172 /*
173  * Initiates a call for the service
174  */
175 static void svc_call(struct afb_svc *svc, const char *api, const char *verb, struct json_object *args, void (*callback)(void*, int, struct json_object*), void *closure)
176 {
177         struct svc_req *svcreq;
178
179         /* allocates the request */
180         svcreq = malloc(sizeof *svcreq);
181         if (svcreq == NULL)
182                 return afb_subcall_internal_error(callback, closure);
183
184         /* initialises the request */
185         afb_context_init(&svcreq->context, svc->session, NULL);
186         svcreq->context.validated = 1;
187         svcreq->svc = svc;
188         svcreq->refcount = 1;
189
190         /* makes the call */
191         afb_subcall(&svcreq->context, api, verb, args, callback, closure, (struct afb_req){ .itf = &afb_svc_req_itf, .closure = svcreq });
192
193         /* terminates and frees ressources if needed */
194         svcreq_unref(svcreq);
195 }
196
197 static void svcreq_addref(struct svc_req *svcreq)
198 {
199         svcreq->refcount++;
200 }
201
202 static void svcreq_unref(struct svc_req *svcreq)
203 {
204         if (0 == --svcreq->refcount) {
205                 afb_context_disconnect(&svcreq->context);
206                 free(svcreq);
207         }
208 }
209
210 static int svcreq_subscribe(struct svc_req *svcreq, struct afb_event event)
211 {
212         if (svcreq->svc->listener == NULL)
213                 return -1;
214         return afb_evt_add_watch(svcreq->svc->listener, event);
215 }
216
217 static int svcreq_unsubscribe(struct svc_req *svcreq, struct afb_event event)
218 {
219         if (svcreq->svc->listener == NULL)
220                 return -1;
221         return afb_evt_remove_watch(svcreq->svc->listener, event);
222 }
223
224 static void svcreq_subcall(struct svc_req *svcreq, const char *api, const char *verb, struct json_object *args, void (*callback)(void*, int, struct json_object*), void *closure)
225 {
226         afb_subcall(&svcreq->context, api, verb, args, callback, closure, (struct afb_req){ .itf = &afb_svc_req_itf, .closure = svcreq });
227 }
228