243d1c5d4bbefbe82b0b0839ff06faeb19c279be
[olsrd.git] / lib / jsoninfo / src / olsrd_jsoninfo.c
1
2 /*
3  * The olsr.org Optimized Link-State Routing daemon(olsrd)
4  * Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org)
5  *                     includes code by Bruno Randolf
6  *                     includes code by Andreas Lopatic
7  *                     includes code by Sven-Ola Tuecke
8  *                     includes code by Lorenz Schori
9  *                     includes bugs by Markus Kittenberger
10  *                     includes bugs by Hans-Christoph Steiner
11  * All rights reserved.
12  *
13  * Redistribution and use in source and binary forms, with or without
14  * modification, are permitted provided that the following conditions
15  * are met:
16  *
17  * * Redistributions of source code must retain the above copyright
18  *   notice, this list of conditions and the following disclaimer.
19  * * Redistributions in binary form must reproduce the above copyright
20  *   notice, this list of conditions and the following disclaimer in
21  *   the documentation and/or other materials provided with the
22  *   distribution.
23  * * Neither the name of olsr.org, olsrd nor the names of its
24  *   contributors may be used to endorse or promote products derived
25  *   from this software without specific prior written permission.
26  *
27  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
28  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
29  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
30  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
31  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
32  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
33  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
34  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
35  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
37  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
38  * POSSIBILITY OF SUCH DAMAGE.
39  *
40  * Visit http://www.olsr.org for more information.
41  *
42  * If you find this software useful feel free to make a donation
43  * to the project. For more information see the website or contact
44  * the copyright holders.
45  *
46  */
47
48 /*
49  * Dynamic linked library for the olsr.org olsr daemon
50  */
51
52
53 #include <sys/types.h>
54 #include <sys/socket.h>
55 #ifndef _WIN32
56 #include <sys/select.h>
57 #endif
58 #include <netinet/in.h>
59 #include <arpa/inet.h>
60 #include <sys/time.h>
61 #include <time.h>
62 #include <math.h>
63 #include <stdio.h>
64 #include <string.h>
65 #include <stdlib.h>
66 #include <unistd.h>
67 #include <errno.h>
68
69 #include "ipcalc.h"
70 #include "olsr.h"
71 #include "olsr_types.h"
72 #include "neighbor_table.h"
73 #include "two_hop_neighbor_table.h"
74 #include "mpr_selector_set.h"
75 #include "tc_set.h"
76 #include "hna_set.h"
77 #include "mid_set.h"
78 #include "link_set.h"
79 #include "net_olsr.h"
80 #include "lq_plugin.h"
81 #include "common/autobuf.h"
82 #include "gateway.h"
83
84 #include "olsrd_jsoninfo.h"
85 #include "olsrd_plugin.h"
86
87 #ifdef _WIN32
88 #define close(x) closesocket(x)
89 #endif
90
91 static int ipc_socket;
92
93 /* IPC initialization function */
94 static int plugin_ipc_init(void);
95
96 static void abuf_json_open_object(struct autobuf *abuf, const char* header);
97 static void abuf_json_close_object(struct autobuf *abuf);
98 static void abuf_json_open_array(struct autobuf *abuf, const char* header);
99 static void abuf_json_close_array(struct autobuf *abuf);
100 static void abuf_json_open_array_entry(struct autobuf *abuf);
101 static void abuf_json_close_array_entry(struct autobuf *abuf);
102 static void abuf_json_boolean(struct autobuf *abuf, const char* key, int value);
103 static void abuf_json_string(struct autobuf *abuf, const char* key, const char* value);
104 static void abuf_json_int(struct autobuf *abuf, const char* key, long value);
105 static void abuf_json_float(struct autobuf *abuf, const char* key, float value);
106
107 static void send_info(unsigned int /*send_what*/, int /*socket*/);
108 static void ipc_action(int, void *, unsigned int);
109 static void ipc_print_neighbors(struct autobuf *);
110 static void ipc_print_links(struct autobuf *);
111 static void ipc_print_routes(struct autobuf *);
112 static void ipc_print_topology(struct autobuf *);
113 static void ipc_print_hna(struct autobuf *);
114 static void ipc_print_mid(struct autobuf *);
115 static void ipc_print_gateways(struct autobuf *);
116 static void ipc_print_config(struct autobuf *);
117 static void ipc_print_interfaces(struct autobuf *);
118 static void ipc_print_plugins(struct autobuf *);
119 static void ipc_print_olsrd_conf(struct autobuf *abuf);
120
121 #define TXT_IPC_BUFSIZE 256
122
123 #define SIW_NEIGHBORS 0x0001
124 #define SIW_LINKS 0x0002
125 #define SIW_ROUTES 0x0004
126 #define SIW_HNA 0x0008
127 #define SIW_MID 0x0010
128 #define SIW_TOPOLOGY 0x0020
129 #define SIW_GATEWAYS 0x0040
130 #define SIW_INTERFACES 0x0080
131 #define SIW_CONFIG 0x0100
132 #define SIW_ALL 0x00FF
133
134 /* these don't change at runtime, so they are not part of ALL/status */
135 #define SIW_PLUGINS 0x0200
136 #define SIW_OLSRD_CONF 0x0400
137
138 #define MAX_CLIENTS 3
139
140 static char *outbuffer[MAX_CLIENTS];
141 static size_t outbuffer_size[MAX_CLIENTS];
142 static size_t outbuffer_written[MAX_CLIENTS];
143 static int outbuffer_socket[MAX_CLIENTS];
144 static int outbuffer_count;
145
146 static struct timeval start_time;
147 static struct timer_entry *writetimer_entry;
148
149
150 /* JSON support functions */
151
152
153 /* JSON does not tolerate commas dangling at the end of arrays, so we need to
154  * count which entry number we're at in order to make sure we don't tack a
155  * dangling comma on at the end */
156 static int entrynumber = 0;
157 static int arrayentrynumber = 0;
158
159 static void
160 abuf_json_open_object(struct autobuf *abuf, const char* header)
161 {
162   entrynumber = 0;
163   abuf_appendf(abuf, "{\"%s\": {", header);
164 }
165
166 static void
167 abuf_json_close_object(struct autobuf *abuf)
168 {
169   abuf_appendf(abuf, "\t}\n}\n");
170 }
171
172 static void
173 abuf_json_open_array(struct autobuf *abuf, const char* header)
174 {
175   arrayentrynumber = 0;
176   abuf_appendf(abuf, "{\"%s\": [\n", header);
177 }
178
179 static void
180 abuf_json_close_array(struct autobuf *abuf)
181 {
182   abuf_appendf(abuf, "]}\n");
183 }
184
185 static void
186 abuf_json_open_array_entry(struct autobuf *abuf)
187 {
188   entrynumber = 0;
189   if (arrayentrynumber)
190     abuf_appendf(abuf, ",\n{");
191   else
192     abuf_appendf(abuf, "{");
193   arrayentrynumber++;
194 }
195
196 static void
197 abuf_json_close_array_entry(struct autobuf *abuf)
198 {
199   abuf_appendf(abuf, "}");
200 }
201
202 static void
203 abuf_json_boolean(struct autobuf *abuf, const char* key, int value)
204 {
205   if (entrynumber)
206     abuf_appendf(abuf, ",\n");
207   else
208     abuf_appendf(abuf, "\n");
209   abuf_appendf(abuf, "\t\"%s\": %s", key, value ? "true" : "false");
210   entrynumber++;
211 }
212
213 static void
214 abuf_json_string(struct autobuf *abuf, const char* key, const char* value)
215 {
216   if (entrynumber)
217     abuf_appendf(abuf, ",\n");
218   else
219     abuf_appendf(abuf, "\n");
220   abuf_appendf(abuf, "\t\"%s\": \"%s\"", key, value);
221   entrynumber++;
222 }
223
224 static void
225 abuf_json_int(struct autobuf *abuf, const char* key, long value)
226 {
227   if (entrynumber)
228     abuf_appendf(abuf, ",\n");
229   else
230     abuf_appendf(abuf, "\n");
231   abuf_appendf(abuf, "\t\"%s\": %li", key, value);
232   entrynumber++;
233 }
234
235 static void
236 abuf_json_float(struct autobuf *abuf, const char* key, float value)
237 {
238   if (entrynumber)
239     abuf_appendf(abuf, ",\n");
240   else
241     abuf_appendf(abuf, "\n");
242   abuf_appendf(abuf, "\t\"%s\": %.03f", key, value);
243   entrynumber++;
244 }
245
246
247 /**
248  *Do initialization here
249  *
250  *This function is called by the my_init
251  *function in uolsrd_plugin.c
252  */
253 int
254 olsrd_plugin_init(void)
255 {
256   /* Initial IPC value */
257   ipc_socket = -1;
258
259   /* Get start time */
260   gettimeofday(&start_time, NULL);
261
262   plugin_ipc_init();
263   return 1;
264 }
265
266 /**
267  * destructor - called at unload
268  */
269 void
270 olsr_plugin_exit(void)
271 {
272   if (ipc_socket != -1)
273     close(ipc_socket);
274 }
275
276 static int
277 plugin_ipc_init(void)
278 {
279   union olsr_sockaddr sst;
280   uint32_t yes = 1;
281   socklen_t addrlen;
282
283   /* Init ipc socket */
284   if ((ipc_socket = socket(olsr_cnf->ip_version, SOCK_STREAM, 0)) == -1) {
285 #ifndef NODEBUG
286     olsr_printf(1, "(JSONINFO) socket()=%s\n", strerror(errno));
287 #endif
288     return 0;
289   } else {
290     if (setsockopt(ipc_socket, SOL_SOCKET, SO_REUSEADDR, (char *)&yes, sizeof(yes)) < 0) {
291 #ifndef NODEBUG
292       olsr_printf(1, "(JSONINFO) setsockopt()=%s\n", strerror(errno));
293 #endif
294       return 0;
295     }
296 #if (defined __FreeBSD__ || defined __FreeBSD_kernel__) && defined SO_NOSIGPIPE
297     if (setsockopt(ipc_socket, SOL_SOCKET, SO_NOSIGPIPE, (char *)&yes, sizeof(yes)) < 0) {
298       perror("SO_REUSEADDR failed");
299       return 0;
300     }
301 #endif
302     /* Bind the socket */
303
304     /* complete the socket structure */
305     memset(&sst, 0, sizeof(sst));
306     if (olsr_cnf->ip_version == AF_INET) {
307       sst.in4.sin_family = AF_INET;
308       addrlen = sizeof(struct sockaddr_in);
309 #ifdef SIN6_LEN
310       sst.in4.sin_len = addrlen;
311 #endif
312       sst.in4.sin_addr.s_addr = jsoninfo_listen_ip.v4.s_addr;
313       sst.in4.sin_port = htons(ipc_port);
314     } else {
315       sst.in6.sin6_family = AF_INET6;
316       addrlen = sizeof(struct sockaddr_in6);
317 #ifdef SIN6_LEN
318       sst.in6.sin6_len = addrlen;
319 #endif
320       sst.in6.sin6_addr = jsoninfo_listen_ip.v6;
321       sst.in6.sin6_port = htons(ipc_port);
322     }
323
324     /* bind the socket to the port number */
325     if (bind(ipc_socket, &sst.in, addrlen) == -1) {
326 #ifndef NODEBUG
327       olsr_printf(1, "(JSONINFO) bind()=%s\n", strerror(errno));
328 #endif
329       return 0;
330     }
331
332     /* show that we are willing to listen */
333     if (listen(ipc_socket, 1) == -1) {
334 #ifndef NODEBUG
335       olsr_printf(1, "(JSONINFO) listen()=%s\n", strerror(errno));
336 #endif
337       return 0;
338     }
339
340     /* Register with olsrd */
341     add_olsr_socket(ipc_socket, &ipc_action, NULL, NULL, SP_PR_READ);
342
343 #ifndef NODEBUG
344     olsr_printf(2, "(JSONINFO) listening on port %d\n", ipc_port);
345 #endif
346   }
347   return 1;
348 }
349
350 static void
351 ipc_action(int fd, void *data __attribute__ ((unused)), unsigned int flags __attribute__ ((unused)))
352 {
353   union olsr_sockaddr pin;
354
355   char addr[INET6_ADDRSTRLEN];
356   fd_set rfds;
357   struct timeval tv;
358   unsigned int send_what = 0;
359   int ipc_connection;
360
361   socklen_t addrlen = sizeof(pin);
362
363   if ((ipc_connection = accept(fd, &pin.in, &addrlen)) == -1) {
364 #ifndef NODEBUG
365     olsr_printf(1, "(JSONINFO) accept()=%s\n", strerror(errno));
366 #endif
367     return;
368   }
369
370   tv.tv_sec = tv.tv_usec = 0;
371   if (olsr_cnf->ip_version == AF_INET) {
372     if (inet_ntop(olsr_cnf->ip_version, &pin.in4.sin_addr, addr, INET6_ADDRSTRLEN) == NULL)
373       addr[0] = '\0';
374     if (!ip4equal(&pin.in4.sin_addr, &jsoninfo_accept_ip.v4) && jsoninfo_accept_ip.v4.s_addr != INADDR_ANY) {
375 #ifdef JSONINFO_ALLOW_LOCALHOST
376       if (pin.in4.sin_addr.s_addr != INADDR_LOOPBACK) {
377 #endif
378         olsr_printf(1, "(JSONINFO) From host(%s) not allowed!\n", addr);
379         close(ipc_connection);
380         return;
381 #ifdef JSONINFO_ALLOW_LOCALHOST
382       }
383 #endif
384     }
385   } else {
386     if (inet_ntop(olsr_cnf->ip_version, &pin.in6.sin6_addr, addr, INET6_ADDRSTRLEN) == NULL)
387       addr[0] = '\0';
388     /* Use in6addr_any (::) in olsr.conf to allow anybody. */
389     if (!ip6equal(&in6addr_any, &jsoninfo_accept_ip.v6) && !ip6equal(&pin.in6.sin6_addr, &jsoninfo_accept_ip.v6)) {
390       olsr_printf(1, "(JSONINFO) From host(%s) not allowed!\n", addr);
391       close(ipc_connection);
392       return;
393     }
394   }
395
396 #ifndef NODEBUG
397   olsr_printf(2, "(JSONINFO) Connect from %s\n", addr);
398 #endif
399
400   /* purge read buffer to prevent blocking on linux */
401   FD_ZERO(&rfds);
402   FD_SET((unsigned int)ipc_connection, &rfds);  /* Win32 needs the cast here */
403   if (0 <= select(ipc_connection + 1, &rfds, NULL, NULL, &tv)) {
404     char requ[128];
405     ssize_t s = recv(ipc_connection, (void *)&requ, sizeof(requ), 0);   /* Win32 needs the cast here */
406     if (0 < s) {
407       requ[s] = 0;
408       /* print out the requested tables */
409       if (0 != strstr(requ, "/status")) send_what = SIW_ALL;
410       else { /* included in /status */
411         if (0 != strstr(requ, "/neighbors")) send_what |= SIW_NEIGHBORS;
412         if (0 != strstr(requ, "/links")) send_what |= SIW_LINKS;
413         if (0 != strstr(requ, "/routes")) send_what |= SIW_ROUTES;
414         if (0 != strstr(requ, "/hna")) send_what |= SIW_HNA;
415         if (0 != strstr(requ, "/mid")) send_what |= SIW_MID;
416         if (0 != strstr(requ, "/topology")) send_what |= SIW_TOPOLOGY;
417         if (0 != strstr(requ, "/gateways")) send_what |= SIW_GATEWAYS;
418         if (0 != strstr(requ, "/interfaces")) send_what |= SIW_INTERFACES;
419       }
420       /* these don't change during runtime, so leave them out of ALL */
421       if (0 != strstr(requ, "/config")) send_what |= SIW_CONFIG;
422       if (0 != strstr(requ, "/plugins")) send_what |= SIW_PLUGINS;
423       if (0 != strstr(requ, "/olsrd.conf")) send_what |= SIW_OLSRD_CONF;
424     }
425     if ( send_what == 0 ) send_what = SIW_ALL;
426   }
427
428   send_info(send_what, ipc_connection);
429 }
430
431 static void
432 ipc_print_neighbors(struct autobuf *abuf)
433 {
434   struct ipaddr_str buf1;
435   struct neighbor_entry *neigh;
436   struct neighbor_2_list_entry *list_2;
437   int thop_cnt;
438
439   abuf_json_open_array(abuf, "neighbors");
440
441   /* Neighbors */
442   OLSR_FOR_ALL_NBR_ENTRIES(neigh) {
443     abuf_json_open_array_entry(abuf);
444     abuf_json_string(abuf, "ipv4Address",
445                      olsr_ip_to_string(&buf1, &neigh->neighbor_main_addr));
446     abuf_json_boolean(abuf, "symmetric", (neigh->status == SYM));
447     abuf_json_boolean(abuf, "multiPointRelay", neigh->is_mpr);
448     abuf_json_boolean(abuf, "multiPointRelaySelector",
449                       olsr_lookup_mprs_set(&neigh->neighbor_main_addr) != NULL);
450     abuf_json_int(abuf, "willingness", neigh->willingness);
451     abuf_appendf(abuf, ",\n");
452
453     thop_cnt = 0;
454     if (neigh->neighbor_2_list.next) {
455       abuf_appendf(abuf, "\t\"twoHopNeighbors\": [");
456       for (list_2 = neigh->neighbor_2_list.next; list_2 != &neigh->neighbor_2_list; list_2 = list_2->next) {
457         if (thop_cnt)
458           abuf_appendf(abuf, ", ");
459         abuf_appendf(abuf,
460                      "\"%s\"",
461                      olsr_ip_to_string(&buf1, &list_2->neighbor_2->neighbor_2_addr));
462         thop_cnt++;
463       }
464     }
465     abuf_appendf(abuf, "]");
466     abuf_json_int(abuf, "twoHopNeighborCount", thop_cnt);
467     abuf_json_close_array_entry(abuf);
468   }
469   OLSR_FOR_ALL_NBR_ENTRIES_END(neigh);
470   abuf_json_close_array(abuf);
471 }
472
473 static void
474 ipc_print_links(struct autobuf *abuf)
475 {
476   struct ipaddr_str buf1, buf2;
477   struct lqtextbuffer lqbuffer1;
478
479   struct link_entry *my_link = NULL;
480
481   abuf_json_open_array(abuf, "links");
482   OLSR_FOR_ALL_LINK_ENTRIES(my_link) {
483     const char* lqs;
484     int diff = (unsigned int)(my_link->link_timer->timer_clock - now_times);
485
486     abuf_json_open_array_entry(abuf);
487     abuf_json_string(abuf, "localIP",
488                      olsr_ip_to_string(&buf1, &my_link->local_iface_addr));
489     abuf_json_string(abuf, "remoteIP",
490                      olsr_ip_to_string(&buf2, &my_link->neighbor_iface_addr));
491     abuf_json_int(abuf, "validityTime", diff);
492     lqs = get_link_entry_text(my_link, '\t', &lqbuffer1);
493     abuf_json_float(abuf, "linkQuality", atof(lqs));
494     abuf_json_float(abuf, "neighborLinkQuality", atof(strrchr(lqs, '\t')));
495     if (my_link->linkcost >= LINK_COST_BROKEN)
496       abuf_json_int(abuf, "linkCost", LINK_COST_BROKEN);
497     else
498       abuf_json_int(abuf, "linkCost", my_link->linkcost);
499     abuf_json_close_array_entry(abuf);
500   }
501   OLSR_FOR_ALL_LINK_ENTRIES_END(my_link);
502   abuf_json_close_array(abuf);
503 }
504
505 static void
506 ipc_print_routes(struct autobuf *abuf)
507 {
508   struct ipaddr_str buf1, buf2;
509   struct rt_entry *rt;
510
511   //abuf_puts(abuf, "Table: Routes\nDestination\tGateway IP\tMetric\tETX\tInterface\n");
512   abuf_json_open_array(abuf, "routes");
513
514   /* Walk the route table */
515   OLSR_FOR_ALL_RT_ENTRIES(rt) {
516     abuf_json_open_array_entry(abuf);
517     abuf_json_string(abuf, "destination",
518                      olsr_ip_to_string(&buf1, &rt->rt_dst.prefix));
519     abuf_json_int(abuf, "genmask", rt->rt_dst.prefix_len);
520     abuf_json_string(abuf, "gateway",
521                      olsr_ip_to_string(&buf2, &rt->rt_best->rtp_nexthop.gateway));
522     abuf_json_int(abuf, "metric", rt->rt_best->rtp_metric.hops);
523     if (rt->rt_best->rtp_metric.cost >= ROUTE_COST_BROKEN)
524       abuf_json_int(abuf, "rtpMetricCost", ROUTE_COST_BROKEN);
525     else
526       abuf_json_int(abuf, "rtpMetricCost", rt->rt_best->rtp_metric.cost);
527     abuf_json_string(abuf, "interface",
528                      if_ifwithindex_name(rt->rt_best->rtp_nexthop.iif_index));
529     abuf_json_close_array_entry(abuf);
530   }
531   OLSR_FOR_ALL_RT_ENTRIES_END(rt);
532
533   abuf_json_close_array(abuf);
534 }
535
536 static void
537 ipc_print_topology(struct autobuf *abuf)
538 {
539   struct tc_entry *tc;
540
541   abuf_json_open_array(abuf, "topology");
542   //abuf_puts(abuf, "Table: Topology\nDest. IP\tLast hop IP\tLQ\tNLQ\tCost\tVTime\n");
543
544   /* Topology */
545   OLSR_FOR_ALL_TC_ENTRIES(tc) {
546     struct tc_edge_entry *tc_edge;
547     OLSR_FOR_ALL_TC_EDGE_ENTRIES(tc, tc_edge) {
548       if (tc_edge->edge_inv) {
549         struct ipaddr_str dstbuf, addrbuf;
550         struct lqtextbuffer lqbuffer1;
551         uint32_t vt = tc->validity_timer != NULL ? (tc->validity_timer->timer_clock - now_times) : 0;
552         int diff = (int)(vt);
553         const char* lqs;
554         abuf_json_open_array_entry(abuf);
555         abuf_json_string(abuf, "destinationIP",
556                          olsr_ip_to_string(&dstbuf, &tc_edge->T_dest_addr));
557         abuf_json_string(abuf, "lastHopIP",
558                          olsr_ip_to_string(&addrbuf, &tc->addr));
559         lqs = get_tc_edge_entry_text(tc_edge, '\t', &lqbuffer1);
560         abuf_json_float(abuf, "linkQuality", atof(lqs));
561         abuf_json_float(abuf, "neighborLinkQuality", atof(strrchr(lqs, '\t')));
562         if (tc_edge->cost >= LINK_COST_BROKEN)
563           abuf_json_int(abuf, "tcEdgeCost", LINK_COST_BROKEN);
564         else
565           abuf_json_int(abuf, "tcEdgeCost", tc_edge->cost);
566         abuf_json_int(abuf, "validityTime", diff);
567         abuf_json_close_array_entry(abuf);
568       }
569     }
570     OLSR_FOR_ALL_TC_EDGE_ENTRIES_END(tc, tc_edge);
571   }
572   OLSR_FOR_ALL_TC_ENTRIES_END(tc);
573
574   abuf_json_close_array(abuf);
575 }
576
577 static void
578 ipc_print_hna(struct autobuf *abuf)
579 {
580   struct ip_prefix_list *hna;
581   struct hna_entry *tmp_hna;
582   struct hna_net *tmp_net;
583   struct ipaddr_str buf, mainaddrbuf;
584
585   abuf_json_open_array(abuf, "hna");
586
587   /* Announced HNA entries */
588   if (olsr_cnf->ip_version == AF_INET) {
589     for (hna = olsr_cnf->hna_entries; hna != NULL; hna = hna->next) {
590       abuf_json_open_array_entry(abuf);
591       abuf_json_string(abuf, "destination",
592                        olsr_ip_to_string(&buf, &hna->net.prefix));
593       abuf_json_int(abuf, "genmask", hna->net.prefix_len);
594       abuf_json_string(abuf, "gateway",
595                        olsr_ip_to_string(&mainaddrbuf, &olsr_cnf->main_addr));
596       abuf_json_close_array_entry(abuf);
597     }
598   } else {
599     for (hna = olsr_cnf->hna_entries; hna != NULL; hna = hna->next) {
600       abuf_json_open_array_entry(abuf);
601       abuf_json_string(abuf, "destination",
602                        olsr_ip_to_string(&buf, &hna->net.prefix));
603       abuf_json_int(abuf, "genmask", hna->net.prefix_len);
604       abuf_json_string(abuf, "gateway",
605                        olsr_ip_to_string(&mainaddrbuf, &olsr_cnf->main_addr));
606       abuf_json_close_array_entry(abuf);
607     }
608   }
609
610   /* HNA entries */
611   OLSR_FOR_ALL_HNA_ENTRIES(tmp_hna) {
612
613     /* Check all networks */
614     for (tmp_net = tmp_hna->networks.next; tmp_net != &tmp_hna->networks; tmp_net = tmp_net->next) {
615       uint32_t vt = tmp_net->hna_net_timer != NULL ? (tmp_net->hna_net_timer->timer_clock - now_times) : 0;
616       int diff = (int)(vt);
617       abuf_json_open_array_entry(abuf);
618       abuf_json_string(abuf, "destination",
619                        olsr_ip_to_string(&buf, &tmp_net->hna_prefix.prefix)),
620       abuf_json_int(abuf, "genmask", tmp_net->hna_prefix.prefix_len);
621       abuf_json_string(abuf, "gateway",
622                        olsr_ip_to_string(&mainaddrbuf, &tmp_hna->A_gateway_addr));
623       abuf_json_int(abuf, "validityTime", diff);
624       abuf_json_close_array_entry(abuf);
625     }
626   }
627   OLSR_FOR_ALL_HNA_ENTRIES_END(tmp_hna);
628
629   abuf_json_close_array(abuf);
630 }
631
632 static void
633 ipc_print_mid(struct autobuf *abuf)
634 {
635   int idx;
636   struct mid_entry *entry;
637   struct mid_address *alias;
638
639   abuf_json_open_array(abuf, "mid");
640
641   /* MID */
642   for (idx = 0; idx < HASHSIZE; idx++) {
643     entry = mid_set[idx].next;
644
645     while (entry != &mid_set[idx]) {
646       struct ipaddr_str buf, buf2;
647       alias = entry->aliases;
648
649       while (alias) {
650         uint32_t vt = alias->vtime - now_times;
651         int diff = (int)(vt);
652
653         abuf_json_open_array_entry(abuf);
654         abuf_json_string(abuf, "ipv4Address",
655                          olsr_ip_to_string(&buf, &entry->main_addr));
656         abuf_json_string(abuf, "alias",
657                          olsr_ip_to_string(&buf2, &alias->alias));
658         abuf_json_open_array_entry(abuf);
659         abuf_json_int(abuf, "validityTime", diff);
660         abuf_json_close_array_entry(abuf);
661         alias = alias->next_alias;
662       }
663       entry = entry->next;
664     }
665   }
666   abuf_json_close_array(abuf);
667 }
668
669 static void
670 ipc_print_gateways(struct autobuf *abuf)
671 {
672 #ifndef linux
673   abuf_json_string(abuf, "error", "Gateway mode is only supported in Linux");
674 #else
675
676   struct ipaddr_str buf;
677   struct gateway_entry *gw;
678
679   abuf_json_open_array(abuf, "gateways");
680   OLSR_FOR_ALL_GATEWAY_ENTRIES(gw) {
681     const char *v4 = "", *v6 = "";
682     bool autoV4 = false, autoV6 = false;
683     const char *ipType = "";
684     struct tc_entry *tc;
685
686     if ((tc = olsr_lookup_tc_entry(&gw->originator)) == NULL) {
687       continue;
688     }
689
690     if (gw == olsr_get_ipv4_inet_gateway(&autoV4)) {
691       v4 = autoV4 ? "auto" : "s";
692     } else if (gw->ipv4 && (olsr_cnf->ip_version == AF_INET || olsr_cnf->use_niit)
693                && (olsr_cnf->smart_gw_allow_nat || !gw->ipv4nat)) {
694       v4 = "u";
695     }
696
697     if (gw == olsr_get_ipv6_inet_gateway(&autoV6)) {
698       v6 = autoV6 ? "auto" : "s";
699     } else if (gw->ipv6 && olsr_cnf->ip_version == AF_INET6) {
700       v6 = "u";
701     }
702
703     abuf_json_open_array_entry(abuf);
704     if (gw->ipv4) {
705       ipType = "ipv4";
706       abuf_json_string(abuf, "ipv4Status", v4);
707     } else if (gw->ipv6) {
708       ipType = "ipv6";
709       abuf_json_string(abuf, "ipv6Status", v6);
710     }
711     abuf_json_string(abuf, "ipType", ipType);
712     abuf_json_boolean(abuf, "ipv4", gw->ipv4);
713     abuf_json_boolean(abuf, "ipv4Nat", gw->ipv4nat);
714     abuf_json_boolean(abuf, "ipv6", gw->ipv6);
715     abuf_json_boolean(abuf, "autoIpv4", autoV4);
716     abuf_json_boolean(abuf, "autoIpv6", autoV6);
717     abuf_json_string(abuf, "ipAddress",
718                      olsr_ip_to_string(&buf, &gw->originator));
719     if (tc->path_cost >= ROUTE_COST_BROKEN)
720       abuf_json_int(abuf, "tcPathCost", ROUTE_COST_BROKEN);
721     else
722       abuf_json_int(abuf, "tcPathCost", tc->path_cost);
723     abuf_json_int(abuf, "hopCount", tc->hops);
724     abuf_json_int(abuf, "uplinkSpeed", gw->uplink);
725     abuf_json_int(abuf, "downlinkSpeed", gw->downlink);
726     if(gw->external_prefix.prefix_len == 0)
727       abuf_json_string(abuf, "externalPrefix",
728                        olsr_ip_prefix_to_string(&gw->external_prefix));
729     abuf_json_close_array_entry(abuf);
730   }
731   OLSR_FOR_ALL_GATEWAY_ENTRIES_END(gw)
732   abuf_json_close_array(abuf);
733 #endif
734 }
735
736
737 static void
738 ipc_print_plugins(struct autobuf *abuf)
739 {
740   struct plugin_entry *pentry;
741   struct plugin_param *pparam;
742   abuf_json_open_array(abuf, "plugins");
743   if (olsr_cnf->plugins)
744     for (pentry = olsr_cnf->plugins; pentry; pentry = pentry->next) {
745       abuf_json_open_array_entry(abuf);
746       abuf_json_string(abuf, "plugin", pentry->name);
747       for (pparam = pentry->params; pparam; pparam = pparam->next) {
748        abuf_json_string(abuf, pparam->key, pparam->value);
749       }
750       abuf_json_close_array_entry(abuf);
751     }
752   abuf_json_close_array(abuf);
753 }
754
755
756 static void
757 ipc_print_config(struct autobuf *abuf)
758 {
759   struct ipaddr_str mainaddrbuf;
760   struct ip_prefix_list *ipcn;
761
762   abuf_json_open_object(abuf, "config");
763
764   abuf_json_int(abuf, "olsrPort", olsr_cnf->olsrport);
765   abuf_json_int(abuf, "debugLevel", olsr_cnf->debug_level);
766   abuf_json_int(abuf, "noFork", olsr_cnf->no_fork);
767   abuf_json_boolean(abuf, "hostEmulation", olsr_cnf->host_emul);
768   abuf_json_int(abuf, "ipVersion", olsr_cnf->ip_version);
769   abuf_json_boolean(abuf, "allowNoInterfaces", olsr_cnf->allow_no_interfaces);
770   abuf_json_int(abuf, "typeOfService", olsr_cnf->tos);
771   abuf_json_int(abuf, "rtProto", olsr_cnf->rt_proto);
772   abuf_json_int(abuf, "rtTable", olsr_cnf->rt_table);
773   abuf_json_int(abuf, "rtTableDefault", olsr_cnf->rt_table_default);
774   abuf_json_int(abuf, "rtTableTunnel", olsr_cnf->rt_table_tunnel);
775   abuf_json_int(abuf, "rtTablePriority", olsr_cnf->rt_table_pri);
776   abuf_json_int(abuf, "rtTableTunnelPriority", olsr_cnf->rt_table_tunnel_pri);
777   abuf_json_int(abuf, "rtTableDefauiltOlsrPriority", olsr_cnf->rt_table_defaultolsr_pri);
778   abuf_json_int(abuf, "rtTableDefaultPriority", olsr_cnf->rt_table_default_pri);
779   abuf_json_int(abuf, "willingness", olsr_cnf->willingness);
780   abuf_json_boolean(abuf, "willingnessAuto", olsr_cnf->willingness_auto);
781
782   abuf_json_int(abuf, "brokenLinkCost", LINK_COST_BROKEN);
783   abuf_json_int(abuf, "brokenRouteCost", ROUTE_COST_BROKEN);
784
785   abuf_json_string(abuf, "fibMetrics", FIB_METRIC_TXT[olsr_cnf->fib_metric]);
786   /*
787   struct if_config_options *interface_defaults;
788   */
789   abuf_json_int(abuf, "ipcConnections", olsr_cnf->ipc_connections);
790   if (olsr_cnf->ipc_connections)
791     for (ipcn = olsr_cnf->ipc_nets; ipcn != NULL; ipcn = ipcn->next) {
792       abuf_json_string(abuf, "ipcAllowedAddress",
793                        olsr_ip_to_string(&mainaddrbuf, &ipcn->net.prefix));
794       abuf_json_int(abuf, "ipcAllowedAddressMask", ipcn->net.prefix_len);
795     }
796
797   // keep all time in ms, so convert these two, which are in seconds
798   abuf_json_int(abuf, "pollRate", olsr_cnf->pollrate * 1000);
799   abuf_json_int(abuf, "nicChangePollInterval", olsr_cnf->nic_chgs_pollrate * 1000);
800   abuf_json_boolean(abuf, "clearScreen", olsr_cnf->clear_screen);
801   abuf_json_int(abuf, "tcRedundancy", olsr_cnf->tc_redundancy);
802   abuf_json_int(abuf, "mprCoverage", olsr_cnf->mpr_coverage);
803
804   if (olsr_cnf->lq_level == 0) {
805     abuf_json_boolean(abuf, "useHysteresis", olsr_cnf->use_hysteresis);
806     if (olsr_cnf->use_hysteresis) {
807       abuf_json_float(abuf, "hysteresisScaling", olsr_cnf->hysteresis_param.scaling);
808       abuf_json_float(abuf, "hysteresisLowThreshold", olsr_cnf->hysteresis_param.thr_low);
809       abuf_json_float(abuf, "hysteresisHighThreshold", olsr_cnf->hysteresis_param.thr_high);
810     }
811   }
812   abuf_json_int(abuf, "linkQualityLevel", olsr_cnf->lq_level);
813   abuf_json_int(abuf, "linkQualityFisheye", olsr_cnf->lq_fish);
814   abuf_json_float(abuf, "linkQualityAging", olsr_cnf->lq_aging);
815   abuf_json_string(abuf, "linkQualityAlgorithm", olsr_cnf->lq_algorithm);
816   // keep all time in ms, so convert this from seconds
817   abuf_json_int(abuf, "minTcValidTime", olsr_cnf->min_tc_vtime * 1000);
818   abuf_json_boolean(abuf, "setIpForward", olsr_cnf->set_ip_forward);
819   abuf_json_string(abuf, "lockFile", olsr_cnf->lock_file);
820   abuf_json_boolean(abuf, "useNiit", olsr_cnf->use_niit);
821
822   abuf_json_boolean(abuf, "smartGateway", olsr_cnf->smart_gw_active);
823   if (olsr_cnf->smart_gw_active) {
824     abuf_json_boolean(abuf, "smartGatewayAllowNat", olsr_cnf->smart_gw_allow_nat);
825     abuf_json_boolean(abuf, "smartGatewayUplinkNat", olsr_cnf->smart_gw_uplink_nat);
826     abuf_json_int(abuf, "smartGatewayPeriod", olsr_cnf->smart_gw_period);
827     abuf_json_int(abuf, "smartGatewayStableCount", olsr_cnf->smart_gw_stablecount);
828     abuf_json_int(abuf, "smartGatewayThreshold", olsr_cnf->smart_gw_thresh);
829     abuf_json_int(abuf, "smartGatewayUplink", olsr_cnf->smart_gw_uplink);
830     abuf_json_int(abuf, "smartGatewayDownlink", olsr_cnf->smart_gw_downlink);
831     abuf_json_int(abuf, "smartGatewayType", olsr_cnf->smart_gw_type);
832     abuf_json_string(abuf, "smartGatewayPrefix",
833                      olsr_ip_to_string(&mainaddrbuf, &olsr_cnf->smart_gw_prefix.prefix));
834     abuf_json_int(abuf, "smartGatewayPrefixLength", olsr_cnf->smart_gw_prefix.prefix_len);
835   }
836
837   abuf_json_string(abuf, "mainIpAddress",
838                    olsr_ip_to_string(&mainaddrbuf, &olsr_cnf->main_addr));
839   abuf_json_string(abuf, "unicastSourceIpAddress",
840                    olsr_ip_to_string(&mainaddrbuf, &olsr_cnf->unicast_src_ip));
841
842   abuf_json_boolean(abuf, "useSourceIpRoutes", olsr_cnf->use_src_ip_routes);
843
844   abuf_json_int(abuf, "maxPrefixLength", olsr_cnf->maxplen);
845   abuf_json_int(abuf, "ipSize", olsr_cnf->ipsize);
846   abuf_json_boolean(abuf, "deleteInternetGatewaysAtStartup", olsr_cnf->del_gws);
847   // keep all time in ms, so convert this from seconds
848   abuf_json_int(abuf, "willingnessUpdateInterval", olsr_cnf->will_int * 1000);
849   abuf_json_float(abuf, "maxSendMessageJitter", olsr_cnf->max_jitter);
850   abuf_json_int(abuf, "exitValue", olsr_cnf->exit_value);
851   // keep all time in ms, so convert this from seconds
852   abuf_json_int(abuf, "maxTcValidTime", olsr_cnf->max_tc_vtime * 1000);
853
854   abuf_json_int(abuf, "niit4to6InterfaceIndex", olsr_cnf->niit4to6_if_index);
855   abuf_json_int(abuf, "niit6to4InterfaceIndex", olsr_cnf->niit6to4_if_index);
856
857   abuf_json_boolean(abuf, "hasIpv4Gateway", olsr_cnf->has_ipv4_gateway);
858   abuf_json_boolean(abuf, "hasIpv6Gateway", olsr_cnf->has_ipv6_gateway);
859
860   abuf_json_int(abuf, "ioctlSocket", olsr_cnf->ioctl_s);
861 #ifdef __linux__
862   abuf_json_int(abuf, "routeNetlinkSocket", olsr_cnf->rtnl_s);
863   abuf_json_int(abuf, "routeMonitorSocket", olsr_cnf->rt_monitor_socket);
864 #endif
865
866 #if defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __APPLE__ || defined __NetBSD__ || defined __OpenBSD__
867   abuf_json_int(abuf, "routeChangeSocket", olsr_cnf->rts);
868 #endif
869   abuf_json_float(abuf, "linkQualityNatThreshold", olsr_cnf->lq_nat_thresh);
870
871   abuf_json_string(abuf, "olsrdVersion", olsrd_version);
872   abuf_json_string(abuf, "olsrdBuildDate", build_date);
873   abuf_json_string(abuf, "olsrdBuildHost", build_host);
874
875 #if defined _WIN32 || defined _WIN64
876   abuf_json_string(abuf, "os", "Windows");
877 #elif defined __gnu_linux__
878   abuf_json_string(abuf, "os", "GNU/Linux");
879 #elif defined __ANDROID__
880   abuf_json_string(abuf, "os", "Android");
881 #elif defined __APPLE__
882   abuf_json_string(abuf, "os", "Mac OS X");
883 #elif defined __NetBSD__
884   abuf_json_string(abuf, "os", "NetBSD");
885 #elif defined __OpenBSD__
886   abuf_json_string(abuf, "os", "OpenBSD");
887 #elif defined __FreeBSD__ || defined __FreeBSD_kernel__
888   abuf_json_string(abuf, "os", "FreeBSD");
889 #else
890   abuf_json_string(abuf, "os", "Undefined");
891 #endif
892
893   abuf_json_int(abuf, "systemTime", time(NULL));
894   abuf_json_int(abuf, "startTime", start_time.tv_sec);
895
896   abuf_json_close_object(abuf);
897 }
898
899 static void
900 ipc_print_interfaces(struct autobuf *abuf)
901 {
902   const struct olsr_if *ifs;
903   abuf_json_open_array(abuf, "interfaces");
904   //abuf_puts(abuf, "Table: Interfaces\nName\tState\tMTU\tWLAN\tSrc-Adress\tMask\tDst-Adress\n");
905   for (ifs = olsr_cnf->interfaces; ifs != NULL; ifs = ifs->next) {
906     const struct interface *const rifs = ifs->interf;
907     abuf_json_open_array_entry(abuf);
908     abuf_json_string(abuf, "name", ifs->name);
909     if (!rifs) {
910       abuf_json_string(abuf, "state", "down");
911     } else {
912       abuf_json_string(abuf, "state", "up");
913       abuf_json_int(abuf, "mtu", rifs->int_mtu);
914       abuf_json_boolean(abuf, "wireless", rifs->is_wireless);
915
916       if (olsr_cnf->ip_version == AF_INET) {
917         struct ipaddr_str addrbuf, maskbuf, bcastbuf;
918         abuf_json_string(abuf, "ipv4Address",
919                              ip4_to_string(&addrbuf, rifs->int_addr.sin_addr));
920         abuf_json_string(abuf, "netmask",
921                              ip4_to_string(&maskbuf, rifs->int_netmask.sin_addr));
922         abuf_json_string(abuf, "broadcast",
923                              ip4_to_string(&bcastbuf, rifs->int_broadaddr.sin_addr));
924       } else {
925         struct ipaddr_str addrbuf, maskbuf;
926         abuf_json_string(abuf, "ipv6Address",
927                              ip6_to_string(&addrbuf, &rifs->int6_addr.sin6_addr));
928         abuf_json_string(abuf, "multicast",
929                              ip6_to_string(&maskbuf, &rifs->int6_multaddr.sin6_addr));
930       }
931     }
932     abuf_json_close_array_entry(abuf);
933   }
934   abuf_json_close_array(abuf);
935 }
936
937
938 static void
939 ipc_print_olsrd_conf(struct autobuf *abuf)
940 {
941   olsrd_write_cnf_autobuf(abuf, olsr_cnf);
942 }
943
944
945 static void
946 jsoninfo_write_data(void *foo __attribute__ ((unused)))
947 {
948   fd_set set;
949   int result, i, j, max;
950   struct timeval tv;
951
952   FD_ZERO(&set);
953   max = 0;
954   for (i=0; i<outbuffer_count; i++) {
955     /* And we cast here since we get a warning on Win32 */
956     FD_SET((unsigned int)(outbuffer_socket[i]), &set);
957
958     if (outbuffer_socket[i] > max) {
959       max = outbuffer_socket[i];
960     }
961   }
962
963   tv.tv_sec = 0;
964   tv.tv_usec = 0;
965
966   result = select(max + 1, NULL, &set, NULL, &tv);
967   if (result <= 0) {
968     return;
969   }
970
971   for (i=0; i<outbuffer_count; i++) {
972     if (FD_ISSET(outbuffer_socket[i], &set)) {
973       result = send(outbuffer_socket[i],
974                     outbuffer[i] + outbuffer_written[i],
975                     outbuffer_size[i] - outbuffer_written[i],
976                     0);
977       if (result > 0) {
978         outbuffer_written[i] += result;
979       }
980
981       if (result <= 0 || outbuffer_written[i] == outbuffer_size[i]) {
982         /* close this socket and cleanup*/
983         close(outbuffer_socket[i]);
984         free (outbuffer[i]);
985
986         for (j=i+1; j<outbuffer_count; j++) {
987           outbuffer[j-1] = outbuffer[j];
988           outbuffer_size[j-1] = outbuffer_size[j];
989           outbuffer_socket[j-1] = outbuffer_socket[j];
990           outbuffer_written[j-1] = outbuffer_written[j];
991         }
992         outbuffer_count--;
993       }
994     }
995   }
996   if (outbuffer_count == 0) {
997     olsr_stop_timer(writetimer_entry);
998   }
999 }
1000
1001 static void
1002 send_info(unsigned int send_what, int the_socket)
1003 {
1004   struct autobuf abuf;
1005
1006   abuf_init(&abuf, 32768);
1007
1008   /* wrap everything in a JSON array to handle multiple elements*/
1009   abuf_puts(&abuf, "\n[\n");
1010
1011   /* Print tables to IPC socket */
1012
1013   if ((send_what & SIW_LINKS) == SIW_LINKS) {
1014     ipc_print_links(&abuf);
1015     // if this is being output with others, then include commas
1016     if (send_what != SIW_LINKS) abuf_puts(&abuf, ",");
1017   }
1018   if ((send_what & SIW_NEIGHBORS) == SIW_NEIGHBORS) {
1019     ipc_print_neighbors(&abuf);
1020     if (send_what != SIW_NEIGHBORS) abuf_puts(&abuf, ",");
1021   }
1022   if ((send_what & SIW_TOPOLOGY) == SIW_TOPOLOGY) {
1023     ipc_print_topology(&abuf);
1024     if (send_what != SIW_TOPOLOGY) abuf_puts(&abuf, ",");
1025   }
1026   if ((send_what & SIW_HNA) == SIW_HNA) {
1027     ipc_print_hna(&abuf);
1028     if (send_what != SIW_HNA) abuf_puts(&abuf, ",");
1029   }
1030   if ((send_what & SIW_MID) == SIW_MID) {
1031     ipc_print_mid(&abuf);
1032     if (send_what != SIW_MID) abuf_puts(&abuf, ",");
1033   }
1034   if ((send_what & SIW_ROUTES) == SIW_ROUTES) {
1035     ipc_print_routes(&abuf);
1036     if (send_what != SIW_ROUTES) abuf_puts(&abuf, ",");
1037   }
1038   if ((send_what & SIW_GATEWAYS) == SIW_GATEWAYS) {
1039     ipc_print_gateways(&abuf);
1040     if (send_what != SIW_GATEWAYS) abuf_puts(&abuf, ",");
1041   }
1042   if ((send_what & SIW_INTERFACES) == SIW_INTERFACES) {
1043     ipc_print_interfaces(&abuf);
1044     if (send_what != SIW_INTERFACES) abuf_puts(&abuf, ",");
1045   }
1046   if ((send_what & SIW_CONFIG) == SIW_CONFIG) {
1047     ipc_print_config(&abuf);
1048     if (send_what != SIW_CONFIG) abuf_puts(&abuf, ",");
1049   }
1050   if ((send_what & SIW_PLUGINS) == SIW_PLUGINS) {
1051     ipc_print_plugins(&abuf);
1052   }
1053
1054   /* end of JSON array for status */
1055   abuf_puts(&abuf, "]\n");
1056
1057   /* this outputs the olsrd.conf text directly, not JSON */
1058   if ((send_what & SIW_OLSRD_CONF) == SIW_OLSRD_CONF) {
1059     ipc_print_olsrd_conf(&abuf);
1060   }
1061
1062   outbuffer[outbuffer_count] = olsr_malloc(abuf.len, "txt output buffer");
1063   outbuffer_size[outbuffer_count] = abuf.len;
1064   outbuffer_written[outbuffer_count] = 0;
1065   outbuffer_socket[outbuffer_count] = the_socket;
1066
1067   memcpy(outbuffer[outbuffer_count], abuf.buf, abuf.len);
1068   outbuffer_count++;
1069
1070   if (outbuffer_count == 1) {
1071     writetimer_entry = olsr_start_timer(100,
1072                                         0,
1073                                         OLSR_TIMER_PERIODIC,
1074                                         &jsoninfo_write_data,
1075                                         NULL,
1076                                         0);
1077   }
1078
1079   abuf_free(&abuf);
1080 }
1081
1082 /*
1083  * Local Variables:
1084  * mode: c
1085  * style: linux
1086  * c-basic-offset: 2
1087  * indent-tabs-mode: nil
1088  * End:
1089  */