cleanup, pass both data and status messages on to other clients
[project/ubus.git] / ubusd_proto.c
1 #include <arpa/inet.h>
2 #include "ubusd.h"
3
4 static struct blob_buf b;
5 static struct ubus_msg_buf *retmsg;
6 static int *retmsg_data;
7
8 static struct blob_attr *attrbuf[UBUS_ATTR_MAX];
9
10 typedef int (*ubus_cmd_cb)(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr);
11
12 static const struct blob_attr_info ubus_policy[UBUS_ATTR_MAX] = {
13         [UBUS_ATTR_SIGNATURE] = { .type = BLOB_ATTR_NESTED },
14         [UBUS_ATTR_OBJTYPE] = { .type = BLOB_ATTR_INT32 },
15         [UBUS_ATTR_OBJPATH] = { .type = BLOB_ATTR_STRING },
16         [UBUS_ATTR_OBJID] = { .type = BLOB_ATTR_INT32 },
17         [UBUS_ATTR_STATUS] = { .type = BLOB_ATTR_INT32 },
18 };
19
20 struct blob_attr **ubus_parse_msg(struct blob_attr *msg)
21 {
22         blob_parse(msg, attrbuf, ubus_policy, UBUS_ATTR_MAX);
23         return attrbuf;
24 }
25
26 static void ubus_msg_init(struct ubus_msg_buf *ub, uint8_t type, uint16_t seq, uint32_t peer)
27 {
28         ub->hdr.version = 0;
29         ub->hdr.type = type;
30         ub->hdr.seq = seq;
31         ub->hdr.peer = peer;
32 }
33
34 static struct ubus_msg_buf *ubus_msg_from_blob(bool shared)
35 {
36         return ubus_msg_new(b.head, blob_raw_len(b.head), shared);
37 }
38
39 static struct ubus_msg_buf *ubus_reply_from_blob(struct ubus_msg_buf *ub, bool shared)
40 {
41         struct ubus_msg_buf *new;
42
43         new = ubus_msg_new(b.head, blob_raw_len(b.head), shared);
44         if (!new)
45                 return NULL;
46
47         ubus_msg_init(new, UBUS_MSG_DATA, ub->hdr.seq, ub->hdr.peer);
48         return new;
49 }
50
51 bool ubusd_send_hello(struct ubus_client *cl)
52 {
53         struct ubus_msg_buf *ub;
54
55         blob_buf_init(&b, 0);
56         ub = ubus_msg_from_blob(true);
57         if (!ub)
58                 return false;
59
60         ubus_msg_init(ub, UBUS_MSG_HELLO, 0, cl->id.id);
61         ubus_msg_send(cl, ub);
62         return true;
63 }
64
65 static int ubusd_send_pong(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
66 {
67         ub->hdr.type = UBUS_MSG_DATA;
68         ubus_msg_send(cl, ubus_msg_ref(ub));
69         return 0;
70 }
71
72 static int ubusd_handle_publish(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
73 {
74         struct ubus_object *obj;
75
76         obj = ubusd_create_object(cl, attr);
77         if (!obj)
78                 return UBUS_STATUS_INVALID_ARGUMENT;
79
80         blob_buf_init(&b, 0);
81         blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
82         if (attr[UBUS_ATTR_SIGNATURE])
83                 blob_put_int32(&b, UBUS_ATTR_OBJTYPE, obj->type->id.id);
84
85         ub = ubus_reply_from_blob(ub, true);
86         if (!ub)
87                 return UBUS_STATUS_NO_DATA;
88
89         ubus_msg_send(cl, ub);
90         return 0;
91 }
92
93 static void ubusd_send_obj(struct ubus_client *cl, struct ubus_msg_buf *ub, struct ubus_object *obj)
94 {
95         struct ubus_method *m;
96         void *s;
97
98         blob_buf_init(&b, 0);
99
100         if (obj->path.key)
101                 blob_put_string(&b, UBUS_ATTR_OBJPATH, obj->path.key);
102         blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
103
104         s = blob_nest_start(&b, UBUS_ATTR_SIGNATURE);
105         list_for_each_entry(m, &obj->type->methods, list)
106                 blob_put(&b, blob_id(m->data), blob_data(m->data), blob_len(m->data));
107         blob_nest_end(&b, s);
108
109         ub = ubus_reply_from_blob(ub, true);
110         if (!ub)
111                 return;
112
113         ubus_msg_send(cl, ub);
114 }
115
116 static int ubusd_handle_lookup(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
117 {
118         struct ubus_object *obj;
119         char *objpath;
120         bool wildcard = false;
121         bool found = false;
122         int len;
123
124         if (!attr[UBUS_ATTR_OBJPATH]) {
125                 avl_for_each_element(&path, obj, path)
126                         ubusd_send_obj(cl, ub, obj);
127                 return 0;
128         }
129
130         objpath = blob_data(attr[UBUS_ATTR_OBJPATH]);
131         len = strlen(objpath);
132         if (objpath[len - 1] != '*') {
133                 obj = avl_find_element(&path, objpath, obj, path);
134                 if (!obj)
135                         return UBUS_STATUS_NOT_FOUND;
136
137                 ubusd_send_obj(cl, ub, obj);
138                 return 0;
139         }
140
141         objpath[--len] = 0;
142         wildcard = true;
143
144         obj = avl_find_ge_element(&path, objpath, obj, path);
145         if (!obj)
146                 return UBUS_STATUS_NOT_FOUND;
147
148         while (!strncmp(objpath, obj->path.key, len)) {
149                 found = true;
150                 ubusd_send_obj(cl, ub, obj);
151                 if (obj == avl_last_element(&path, obj, path))
152                         break;
153                 obj = avl_next_element(obj, path);
154         }
155
156         if (!found)
157                 return UBUS_STATUS_NOT_FOUND;
158
159         return 0;
160 }
161
162 static int ubusd_handle_invoke(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
163 {
164         struct ubus_object *obj = NULL;
165         struct ubus_id *id;
166         const char *method;
167
168         if (!attr[UBUS_ATTR_METHOD] || !attr[UBUS_ATTR_OBJID])
169                 return UBUS_STATUS_INVALID_ARGUMENT;
170
171         id = ubus_find_id(&objects, blob_get_int32(attr[UBUS_ATTR_OBJID]));
172         if (!id)
173                 return UBUS_STATUS_NOT_FOUND;
174
175         obj = container_of(id, struct ubus_object, id);
176
177         method = blob_data(attr[UBUS_ATTR_METHOD]);
178         blob_buf_init(&b, 0);
179         blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
180         blob_put_string(&b, UBUS_ATTR_METHOD, method);
181         if (attr[UBUS_ATTR_DATA])
182                 blob_put(&b, UBUS_ATTR_DATA, blob_data(attr[UBUS_ATTR_DATA]),
183                          blob_len(attr[UBUS_ATTR_DATA]));
184
185         ubus_msg_free(ub);
186
187         ub = ubus_reply_from_blob(ub, true);
188         if (!ub)
189                 return UBUS_STATUS_NO_DATA;
190
191         ub->hdr.type = UBUS_MSG_INVOKE;
192         ub->hdr.peer = cl->id.id;
193         ubus_msg_send(obj->client, ub);
194
195         return -1;
196 }
197
198 static int ubusd_handle_response(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
199 {
200         struct ubus_object *obj;
201         struct ubus_id *id;
202
203         if (!attr[UBUS_ATTR_OBJID] ||
204             (ub->hdr.type == UBUS_MSG_STATUS && !attr[UBUS_ATTR_STATUS]) ||
205             (ub->hdr.type == UBUS_MSG_DATA && !attr[UBUS_ATTR_DATA]))
206                 goto error;
207
208         id = ubus_find_id(&objects, blob_get_int32(attr[UBUS_ATTR_OBJID]));
209         if (!id)
210                 goto error;
211
212         obj = container_of(id, struct ubus_object, id);
213         if (cl != obj->client)
214                 goto error;
215
216         cl = ubusd_get_client_by_id(ub->hdr.peer);
217         if (!cl)
218                 goto error;
219
220         ub->hdr.peer = blob_get_int32(attr[UBUS_ATTR_OBJID]);
221         ubus_msg_send(cl, ub);
222         return -1;
223
224 error:
225         ubus_msg_free(ub);
226         return -1;
227 }
228
229 static const ubus_cmd_cb handlers[__UBUS_MSG_LAST] = {
230         [UBUS_MSG_PING] = ubusd_send_pong,
231         [UBUS_MSG_PUBLISH] = ubusd_handle_publish,
232         [UBUS_MSG_LOOKUP] = ubusd_handle_lookup,
233         [UBUS_MSG_INVOKE] = ubusd_handle_invoke,
234         [UBUS_MSG_STATUS] = ubusd_handle_response,
235         [UBUS_MSG_DATA] = ubusd_handle_response,
236 };
237
238 void ubusd_receive_message(struct ubus_client *cl, struct ubus_msg_buf *ub)
239 {
240         ubus_cmd_cb cb = NULL;
241         int ret;
242
243         retmsg->hdr.seq = ub->hdr.seq;
244         retmsg->hdr.peer = ub->hdr.peer;
245
246         if (ub->hdr.type < __UBUS_MSG_LAST)
247                 cb = handlers[ub->hdr.type];
248
249         if (cb)
250                 ret = cb(cl, ub, ubus_parse_msg(ub->data));
251         else
252                 ret = UBUS_STATUS_INVALID_COMMAND;
253
254         if (ret == -1)
255                 return;
256
257         ubus_msg_free(ub);
258
259         *retmsg_data = htonl(ret);
260         ubus_msg_send(cl, ubus_msg_ref(retmsg));
261 }
262
263 static void __init ubusd_proto_init(void)
264 {
265         blob_buf_init(&b, 0);
266         blob_put_int32(&b, UBUS_ATTR_STATUS, 0);
267
268         retmsg = ubus_msg_from_blob(false);
269         if (!retmsg)
270                 exit(1);
271
272         retmsg->hdr.type = UBUS_MSG_STATUS;
273         retmsg_data = blob_data(blob_data(retmsg->data));
274 }