ubus.c

   1 /*
   2  * Copyright (C) 2014 John Crispin <blogic@openwrt.org>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU Lesser General Public License version 2.1
   6  * as published by the Free Software Foundation
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  */
  13
  14 #include <sys/types.h>
  15 #include <arpa/inet.h>
  16
  17 #include <stdio.h>
  18
  19 #include <libubus.h>
  20 #include <libubox/vlist.h>
  21 #include <libubox/uloop.h>
  22
  23 #include "util.h"
  24 #include "ubus.h"
  25 #include "cache.h"
  26 #include "service.h"
  27 #include "interface.h"
  28
  29 static struct ubus_auto_conn conn;
  30 static struct blob_buf b;
  31
  32 static int
  33 mdns_reload(struct ubus_context *ctx, struct ubus_object *obj,
  34                 struct ubus_request_data *req, const char *method,
  35                 struct blob_attr *msg)
  36 {
  37         service_init(1);
  38         return 0;
  39 }
  40
  41 static int
  42 mdns_scan(struct ubus_context *ctx, struct ubus_object *obj,
  43                 struct ubus_request_data *req, const char *method,
  44                 struct blob_attr *msg)
  45 {
  46         cache_scan();
  47         return 0;
  48 }
  49
  50 static int
  51 mdns_browse(struct ubus_context *ctx, struct ubus_object *obj,
  52                 struct ubus_request_data *req, const char *method,
  53                 struct blob_attr *msg)
  54 {
  55         struct cache_service *s, *q;
  56         char *buffer = (char *) mdns_buf;
  57         void *c1 = NULL, *c2;
  58
  59         blob_buf_init(&b, 0);
  60         avl_for_each_element(&services, s, avl) {
  61                 char *local;
  62                 if (*((char *) s->avl.key) != '_')
  63                         continue;
  64                 snprintf(buffer, MAX_NAME_LEN, "%s", (const char *) s->avl.key);
  65                 local = strstr(buffer, ".local");
  66                 if (local)
  67                         *local = '\0';
  68                 if (!strcmp(buffer, "_tcp") || !strcmp(buffer, "_udp"))
  69                         continue;
  70
  71                 if (!c1) {
  72                         c1 = blobmsg_open_table(&b, buffer);
  73                 }
  74                 snprintf(buffer, MAX_NAME_LEN, "%s", (const char *) s->entry);
  75                 local = strstr(buffer, "._");
  76                 if (local)
  77                         *local = '\0';
  78                 c2 = blobmsg_open_table(&b, buffer);
  79                 strncat(buffer, ".local", MAX_NAME_LEN);
  80                 cache_dump_records(&b, buffer);
  81                 cache_dump_records(&b, s->entry);
  82                 blobmsg_close_table(&b, c2);
  83                 q = avl_next_element(s, avl);
  84                 if (!q || avl_is_last(&services, &s->avl) || strcmp(s->avl.key, q->avl.key)) {
  85                         blobmsg_close_table(&b, c1);
  86                         c1 = NULL;
  87                 }
  88         }
  89         ubus_send_reply(ctx, req, b.head);
  90
  91         return UBUS_STATUS_OK;
  92 }
  93
  94 static int
  95 mdns_hosts(struct ubus_context *ctx, struct ubus_object *obj,
  96                 struct ubus_request_data *req, const char *method,
  97                 struct blob_attr *msg)
  98 {
  99         struct cache_service *s;
 100         char *buffer = (char *) mdns_buf;
 101         void *c;
 102
 103         blob_buf_init(&b, 0);
 104         avl_for_each_element(&services, s, avl) {
 105                 char *local;
 106                 if (*((char *) s->avl.key) == '_')
 107                         continue;
 108                 snprintf(buffer, MAX_NAME_LEN, "%s", (const char *) s->entry);
 109                 local = strstr(buffer, "._");
 110                 if (local)
 111                         *local = '\0';
 112                 c = blobmsg_open_table(&b, buffer);
 113                 strncat(buffer, ".local", MAX_NAME_LEN);
 114                 cache_dump_records(&b, buffer);
 115                 cache_dump_records(&b, s->entry);
 116                 blobmsg_close_table(&b, c);
 117         }
 118         ubus_send_reply(ctx, req, b.head);
 119
 120         return UBUS_STATUS_OK;
 121 }
 122
 123 static const struct blobmsg_policy config_policy[] = {
 124         { "interfaces", BLOBMSG_TYPE_ARRAY },
 125 };
 126
 127 static int
 128 mdns_set_config(struct ubus_context *ctx, struct ubus_object *obj,
 129                     struct ubus_request_data *req, const char *method,
 130                     struct blob_attr *msg)
 131 {
 132         struct blob_attr *data, *cur;
 133         int rem;
 134
 135         blobmsg_parse(config_policy, 1, &data, blob_data(msg), blob_len(msg));
 136         if (!data)
 137                 return UBUS_STATUS_INVALID_ARGUMENT;
 138
 139         if (!blobmsg_check_attr_list(data, BLOBMSG_TYPE_STRING))
 140                 return UBUS_STATUS_INVALID_ARGUMENT;
 141
 142         vlist_update(&interfaces);
 143         blobmsg_for_each_attr(cur, data, rem)
 144                 interface_add(blobmsg_data(cur));
 145         vlist_flush(&interfaces);
 146
 147         return 0;
 148 }
 149
 150 enum query_attr {
 151         QUERY_QUESTION,
 152         QUERY_IFACE,
 153         QUERY_TYPE,
 154         QUERY_MAX
 155 };
 156
 157 static const struct blobmsg_policy query_policy[QUERY_MAX] = {
 158         [QUERY_QUESTION]= { "question", BLOBMSG_TYPE_STRING },
 159         [QUERY_IFACE]   = { "interface", BLOBMSG_TYPE_STRING },
 160         [QUERY_TYPE]    = { "type", BLOBMSG_TYPE_INT32 },
 161 };
 162
 163 static int
 164 mdns_query(struct ubus_context *ctx, struct ubus_object *obj,
 165                     struct ubus_request_data *req, const char *method,
 166                     struct blob_attr *msg)
 167 {
 168         struct blob_attr *tb[QUERY_MAX], *c;
 169         const char *question = "_services._dns-sd._udp.local";
 170         const char *ifname;
 171         int type = TYPE_ANY;
 172
 173         blobmsg_parse(query_policy, QUERY_MAX, tb, blob_data(msg), blob_len(msg));
 174
 175         if (!(c = tb[QUERY_IFACE]))
 176                 return UBUS_STATUS_INVALID_ARGUMENT;
 177
 178         ifname = blobmsg_get_string(c);
 179
 180         if ((c = tb[QUERY_QUESTION]))
 181                 question = blobmsg_get_string(c);
 182
 183         if ((c = tb[QUERY_TYPE]))
 184                 type = blobmsg_get_u32(c);
 185
 186         struct interface *iface_v4 = interface_get(ifname, 0, 1);
 187         struct interface *iface_v6 = interface_get(ifname, 1, 1);
 188
 189         if (!iface_v4 && !iface_v6)
 190                 return UBUS_STATUS_NOT_FOUND;
 191
 192         if (!strcmp(method, "query")) {
 193                 if (iface_v4)
 194                         dns_send_question(iface_v4, question, type, 0);
 195
 196                 if (iface_v6)
 197                         dns_send_question(iface_v6, question, type, 0);
 198
 199                 return UBUS_STATUS_OK;
 200         } else if (!strcmp(method, "fetch")) {
 201                 blob_buf_init(&b, 0);
 202                 void *k = blobmsg_open_array(&b, "records");
 203                 cache_dump_recursive(&b, question, type, iface_v4 ? iface_v4 : iface_v6);
 204                 blobmsg_close_array(&b, k);
 205                 ubus_send_reply(ctx, req, b.head);
 206                 return UBUS_STATUS_OK;
 207         } else {
 208                 return UBUS_STATUS_INVALID_ARGUMENT;
 209         }
 210 }
 211
 212
 213 static const struct ubus_method mdns_methods[] = {
 214         UBUS_METHOD("set_config", mdns_set_config, config_policy),
 215         UBUS_METHOD("query", mdns_query, query_policy),
 216         UBUS_METHOD("fetch", mdns_query, query_policy),
 217         UBUS_METHOD_NOARG("scan", mdns_scan),
 218         UBUS_METHOD_NOARG("browse", mdns_browse),
 219         UBUS_METHOD_NOARG("hosts", mdns_hosts),
 220         UBUS_METHOD_NOARG("reload", mdns_reload),
 221 };
 222
 223 static struct ubus_object_type mdns_object_type =
 224         UBUS_OBJECT_TYPE("mdns", mdns_methods);
 225
 226 static struct ubus_object mdns_object = {
 227         .name = "mdns",
 228         .type = &mdns_object_type,
 229         .methods = mdns_methods,
 230         .n_methods = ARRAY_SIZE(mdns_methods),
 231 };
 232
 233 static void
 234 ubus_connect_handler(struct ubus_context *ctx)
 235 {
 236         int ret;
 237
 238         ret = ubus_add_object(ctx, &mdns_object);
 239         if (ret)
 240                 fprintf(stderr, "Failed to add object: %s\n", ubus_strerror(ret));
 241 }
 242
 243 void
 244 ubus_startup(void)
 245 {
 246         conn.cb = ubus_connect_handler;
 247         ubus_auto_connect(&conn);
 248 }
 249
 250 int ubus_service_list(ubus_data_handler_t cb)
 251 {
 252         uint32_t id;
 253         int ret;
 254
 255         blob_buf_init(&b, 0);
 256         ret = ubus_lookup_id(&conn.ctx, "service", &id);
 257         if (ret)
 258                 return ret;
 259
 260         return ubus_invoke(&conn.ctx, id, "list", b.head, cb, NULL, 5 * 1000);
 261 }