src/libsystemd-network/test-ndisc-ra.c

   1 /***
   2   This file is part of systemd.
   3
   4   Copyright (C) 2017 Intel Corporation. All rights reserved.
   5
   6   systemd is free software; you can redistribute it and/or modify it
   7   under the terms of the GNU Lesser General Public License as published by
   8   the Free Software Foundation; either version 2.1 of the License, or
   9   (at your option) any later version.
  10
  11   systemd is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with systemd; If not, see <http://www.gnu.org/licenses/>.
  18 ***/
  19
  20 #include <netinet/icmp6.h>
  21 #include <arpa/inet.h>
  22
  23 #include "sd-radv.h"
  24
  25 #include "alloc-util.h"
  26 #include "hexdecoct.h"
  27 #include "icmp6-util.h"
  28 #include "socket-util.h"
  29 #include "strv.h"
  30
  31 static struct ether_addr mac_addr = {
  32         .ether_addr_octet = { 0x78, 0x2b, 0xcb, 0xb3, 0x6d, 0x53 }
  33 };
  34
  35 static uint8_t advertisement[] = {
  36         /* ICMPv6 Router Advertisement, no checksum */
  37         0x86, 0x00, 0x00, 0x00,  0x40, 0xc0, 0x00, 0xb4,
  38         0x00, 0x00, 0x00, 0x00,  0x00, 0x00, 0x00, 0x00,
  39         /* Source Link Layer Address Option */
  40         0x01, 0x01, 0x78, 0x2b,  0xcb, 0xb3, 0x6d, 0x53,
  41         /* Prefix Information Option */
  42         0x03, 0x04, 0x40, 0xc0,  0x00, 0x00, 0x01, 0xf4,
  43         0x00, 0x00, 0x01, 0xb8,  0x00, 0x00, 0x00, 0x00,
  44         0x20, 0x01, 0x0d, 0xb8,  0xde, 0xad, 0xbe, 0xef,
  45         0x00, 0x00, 0x00, 0x00,  0x00, 0x00, 0x00, 0x00,
  46         /* Prefix Information Option */
  47         0x03, 0x04, 0x40, 0xc0,  0x00, 0x27, 0x8d, 0x00,
  48         0x00, 0x09, 0x3a, 0x80,  0x00, 0x00, 0x00, 0x00,
  49         0x20, 0x01, 0x0d, 0xb8,  0x0b, 0x16, 0xd0, 0x0d,
  50         0x00, 0x00, 0x00, 0x00,  0x00, 0x00, 0x00, 0x00,
  51         /* Prefix Information Option */
  52         0x03, 0x04, 0x30, 0xc0,  0x00, 0x27, 0x8d, 0x00,
  53         0x00, 0x09, 0x3a, 0x80,  0x00, 0x00, 0x00, 0x00,
  54         0x20, 0x01, 0x0d, 0xb8,  0xc0, 0x01, 0x0d, 0xad,
  55         0x00, 0x00, 0x00, 0x00,  0x00, 0x00, 0x00, 0x00,
  56         /* Recursive DNS Server Option */
  57         0x19, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x3c,
  58         0x20, 0x01, 0x0d, 0xb8, 0xde, 0xad, 0xbe, 0xef,
  59         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01,
  60         /* DNS Search List Option */
  61         0x1f, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x3c,
  62         0x03, 0x6c, 0x61, 0x62, 0x05, 0x69, 0x6e, 0x74,
  63         0x72, 0x61, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  64 };
  65
  66 static sd_event_source *test_hangcheck;
  67 static bool test_stopped;
  68 static int test_fd[2];
  69 static sd_event_source *recv_router_advertisement;
  70 static struct {
  71         struct in6_addr address;
  72         unsigned char prefixlen;
  73         uint32_t valid;
  74         uint32_t preferred;
  75         bool succesful;
  76 } prefix[] = {
  77         { { { { 0x20, 0x01, 0x0d, 0xb8, 0xde, 0xad, 0xbe, 0xef,
  78                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 64,
  79           500, 440, true },
  80         { { { { 0x20, 0x01, 0x0d, 0xb8, 0x0b, 0x16, 0xd0, 0x0d,
  81                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 64,
  82           /* indicate default valid and preferred lifetimes for the test code */
  83           0, 0, true },
  84         { { { { 0x20, 0x01, 0x0d, 0xb8, 0x0b, 0x16, 0xd0, 0x0d,
  85                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 58,
  86           0, 0,
  87           /* indicate that this prefix already exists */
  88           false },
  89         { { { { 0x20, 0x01, 0x0d, 0xb8, 0x0b, 0x16, 0xd0, 0x0d,
  90                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 120,
  91           0, 0,
  92           /* indicate that this prefix already exists */
  93           false },
  94         { { { { 0x20, 0x01, 0x0d, 0xb8, 0x0b, 0x16, 0xd0, 0x0d,
  95                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 12,
  96           0, 0,
  97           /* indicate that this prefix already exists */
  98           false },
  99         { { { { 0x20, 0x01, 0x0d, 0xb8, 0xc0, 0x01, 0x0d, 0xad,
 100                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 48,
 101           0, 0, true },
 102         { { { { 0x20, 0x01, 0x0d, 0xb8, 0xc0, 0x01, 0x0d, 0xad,
 103                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 } } }, 60,
 104           0, 0,
 105           /* indicate that this prefix already exists */
 106           false },
 107 };
 108
 109 static const struct in6_addr test_rdnss = { { { 0x20, 0x01, 0x0d, 0xb8,
 110                                                 0xde, 0xad, 0xbe, 0xef,
 111                                                 0x00, 0x00, 0x00, 0x00,
 112                                                 0x00, 0x00, 0x00, 0x01 } } };
 113 static const char *test_dnssl[] = { "lab.intra",
 114                                     NULL };
 115
 116 static int test_rs_hangcheck(sd_event_source *s, uint64_t usec,
 117                              void *userdata) {
 118         assert_se(false);
 119
 120         return 0;
 121 }
 122
 123 static void test_radv_prefix(void) {
 124         sd_radv_prefix *p;
 125
 126         printf("* %s\n", __FUNCTION__);
 127
 128         assert_se(sd_radv_prefix_new(&p) >= 0);
 129
 130         assert_se(sd_radv_prefix_set_onlink(NULL, true) < 0);
 131         assert_se(sd_radv_prefix_set_onlink(p, true) >= 0);
 132         assert_se(sd_radv_prefix_set_onlink(p, false) >= 0);
 133
 134         assert_se(sd_radv_prefix_set_address_autoconfiguration(NULL, true) < 0);
 135         assert_se(sd_radv_prefix_set_address_autoconfiguration(p, true) >= 0);
 136         assert_se(sd_radv_prefix_set_address_autoconfiguration(p, false) >= 0);
 137
 138         assert_se(sd_radv_prefix_set_valid_lifetime(NULL, true) < 0);
 139         assert_se(sd_radv_prefix_set_valid_lifetime(p, ~0) >= 0);
 140         assert_se(sd_radv_prefix_set_valid_lifetime(p, 42) >= 0);
 141         assert_se(sd_radv_prefix_set_valid_lifetime(p, 0) >= 0);
 142
 143         assert_se(sd_radv_prefix_set_preferred_lifetime(NULL, true) < 0);
 144         assert_se(sd_radv_prefix_set_preferred_lifetime(p, ~0) >= 0);
 145         assert_se(sd_radv_prefix_set_preferred_lifetime(p, 42) >= 0);
 146         assert_se(sd_radv_prefix_set_preferred_lifetime(p, 0) >= 0);
 147
 148         assert_se(sd_radv_prefix_set_prefix(NULL, NULL, 0) < 0);
 149         assert_se(sd_radv_prefix_set_prefix(p, NULL, 0) < 0);
 150
 151         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 64) >= 0);
 152         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 0) < 0);
 153         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 1) < 0);
 154         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 2) < 0);
 155         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 3) >= 0);
 156         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 125) >= 0);
 157         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 128) >= 0);
 158         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 129) < 0);
 159         assert_se(sd_radv_prefix_set_prefix(p, &prefix[0].address, 255) < 0);
 160
 161         p = sd_radv_prefix_unref(p);
 162         assert_se(!p);
 163 }
 164
 165 static void test_radv(void) {
 166         sd_radv *ra;
 167
 168         printf("* %s\n", __FUNCTION__);
 169
 170         assert_se(sd_radv_new(&ra) >= 0);
 171         assert_se(ra);
 172
 173         assert_se(sd_radv_set_ifindex(NULL, 0) < 0);
 174         assert_se(sd_radv_set_ifindex(ra, 0) >= 0);
 175         assert_se(sd_radv_set_ifindex(ra, -1) >= 0);
 176         assert_se(sd_radv_set_ifindex(ra, -2) < 0);
 177         assert_se(sd_radv_set_ifindex(ra, 42) >= 0);
 178
 179         assert_se(sd_radv_set_mac(NULL, NULL) < 0);
 180         assert_se(sd_radv_set_mac(ra, NULL) >= 0);
 181         assert_se(sd_radv_set_mac(ra, &mac_addr) >= 0);
 182
 183         assert_se(sd_radv_set_mtu(NULL, 0) < 0);
 184         assert_se(sd_radv_set_mtu(ra, 0) < 0);
 185         assert_se(sd_radv_set_mtu(ra, 1279) < 0);
 186         assert_se(sd_radv_set_mtu(ra, 1280) >= 0);
 187         assert_se(sd_radv_set_mtu(ra, ~0) >= 0);
 188
 189         assert_se(sd_radv_set_hop_limit(NULL, 0) < 0);
 190         assert_se(sd_radv_set_hop_limit(ra, 0) >= 0);
 191         assert_se(sd_radv_set_hop_limit(ra, ~0) >= 0);
 192
 193         assert_se(sd_radv_set_router_lifetime(NULL, 0) < 0);
 194         assert_se(sd_radv_set_router_lifetime(ra, 0) >= 0);
 195         assert_se(sd_radv_set_router_lifetime(ra, ~0) >= 0);
 196
 197         assert_se(sd_radv_set_preference(NULL, 0) < 0);
 198         assert_se(sd_radv_set_preference(ra, SD_NDISC_PREFERENCE_LOW) >= 0);
 199         assert_se(sd_radv_set_preference(ra, SD_NDISC_PREFERENCE_MEDIUM) >= 0);
 200         assert_se(sd_radv_set_preference(ra, SD_NDISC_PREFERENCE_HIGH) >= 0);
 201         assert_se(sd_radv_set_preference(ra, ~0) < 0);
 202
 203         assert_se(sd_radv_set_preference(ra, SD_NDISC_PREFERENCE_HIGH) >= 0);
 204         assert_se(sd_radv_set_router_lifetime(ra, 42000) >= 0);
 205         assert_se(sd_radv_set_router_lifetime(ra, 0) < 0);
 206         assert_se(sd_radv_set_preference(ra, SD_NDISC_PREFERENCE_MEDIUM) >= 0);
 207         assert_se(sd_radv_set_router_lifetime(ra, 0) >= 0);
 208
 209         assert_se(sd_radv_set_managed_information(NULL, true) < 0);
 210         assert_se(sd_radv_set_managed_information(ra, true) >= 0);
 211         assert_se(sd_radv_set_managed_information(ra, false) >= 0);
 212
 213         assert_se(sd_radv_set_other_information(NULL, true) < 0);
 214         assert_se(sd_radv_set_other_information(ra, true) >= 0);
 215         assert_se(sd_radv_set_other_information(ra, false) >= 0);
 216
 217         assert_se(sd_radv_set_rdnss(NULL, 0, NULL, 0) < 0);
 218         assert_se(sd_radv_set_rdnss(ra, 0, NULL, 0) >= 0);
 219         assert_se(sd_radv_set_rdnss(ra, 0, NULL, 128) < 0);
 220         assert_se(sd_radv_set_rdnss(ra, 600, &test_rdnss, 0) >= 0);
 221         assert_se(sd_radv_set_rdnss(ra, 600, &test_rdnss, 1) >= 0);
 222         assert_se(sd_radv_set_rdnss(ra, 0, &test_rdnss, 1) >= 0);
 223         assert_se(sd_radv_set_rdnss(ra, 0, NULL, 0) >= 0);
 224
 225         assert_se(sd_radv_set_dnssl(ra, 0, NULL) >= 0);
 226         assert_se(sd_radv_set_dnssl(ra, 600, NULL) >= 0);
 227         assert_se(sd_radv_set_dnssl(ra, 0, (char **)test_dnssl) >= 0);
 228         assert_se(sd_radv_set_dnssl(ra, 600, (char **)test_dnssl) >= 0);
 229
 230         ra = sd_radv_unref(ra);
 231         assert_se(!ra);
 232 }
 233
 234 int icmp6_bind_router_solicitation(int index) {
 235         return -ENOSYS;
 236 }
 237
 238 int icmp6_bind_router_advertisement(int index) {
 239         assert_se(index == 42);
 240
 241         return test_fd[1];
 242 }
 243
 244 int icmp6_send_router_solicitation(int s, const struct ether_addr *ether_addr) {
 245
 246         return 0;
 247 }
 248
 249 int icmp6_receive(int fd, void *iov_base, size_t iov_len,
 250                   struct in6_addr *dst, triple_timestamp *timestamp) {
 251         assert_se(read (fd, iov_base, iov_len) == (ssize_t)iov_len);
 252
 253         if (timestamp)
 254                 triple_timestamp_get(timestamp);
 255
 256         return 0;
 257 }
 258
 259 static int radv_recv(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 260         sd_radv *ra = userdata;
 261         unsigned char buf[168];
 262         size_t i;
 263
 264         read(test_fd[0], &buf, sizeof(buf));
 265
 266         /* router lifetime must be zero when test is stopped */
 267         if (test_stopped) {
 268                 advertisement[6] = 0x00;
 269                 advertisement[7] = 0x00;
 270         }
 271
 272         printf ("Received Router Advertisement with lifetime %u\n",
 273                 (advertisement[6] << 8) + advertisement[7]);
 274
 275         /* test only up to buf size, rest is not yet implemented */
 276         for (i = 0; i < sizeof(buf); i++) {
 277                 if (!(i % 8))
 278                         printf("%3zd: ", i);
 279
 280                 printf("0x%02x", buf[i]);
 281
 282                 assert_se(buf[i] == advertisement[i]);
 283
 284                 if ((i + 1) % 8)
 285                         printf(", ");
 286                 else
 287                         printf("\n");
 288         }
 289
 290         if (test_stopped) {
 291                 sd_event *e;
 292
 293                 e = sd_radv_get_event(ra);
 294                 sd_event_exit(e, 0);
 295
 296                 return 0;
 297         }
 298
 299         assert_se(sd_radv_stop(ra) >= 0);
 300         test_stopped = true;
 301
 302         return 0;
 303 }
 304
 305 static void test_ra(void) {
 306         sd_event *e;
 307         sd_radv *ra;
 308         usec_t time_now = now(clock_boottime_or_monotonic());
 309         unsigned int i;
 310
 311         printf("* %s\n", __FUNCTION__);
 312
 313         assert_se(socketpair(AF_UNIX, SOCK_SEQPACKET, 0, test_fd) >= 0);
 314
 315         assert_se(sd_event_new(&e) >= 0);
 316
 317         assert_se(sd_radv_new(&ra) >= 0);
 318         assert_se(ra);
 319
 320         assert_se(sd_radv_attach_event(ra, e, 0) >= 0);
 321
 322         assert_se(sd_radv_set_ifindex(ra, 42) >= 0);
 323         assert_se(sd_radv_set_mac(ra, &mac_addr) >= 0);
 324         assert_se(sd_radv_set_router_lifetime(ra, 180) >= 0);
 325         assert_se(sd_radv_set_hop_limit(ra, 64) >= 0);
 326         assert_se(sd_radv_set_managed_information(ra, true) >= 0);
 327         assert_se(sd_radv_set_other_information(ra, true) >= 0);
 328         assert_se(sd_radv_set_rdnss(ra, 60, &test_rdnss, 1) >= 0);
 329         assert_se(sd_radv_set_dnssl(ra, 60, (char **)test_dnssl) >= 0);
 330
 331         for (i = 0; i < ELEMENTSOF(prefix); i++) {
 332                 sd_radv_prefix *p;
 333
 334                 printf("Test prefix %u\n", i);
 335                 assert_se(sd_radv_prefix_new(&p) >= 0);
 336
 337                 assert_se(sd_radv_prefix_set_prefix(p, &prefix[i].address,
 338                                                     prefix[i].prefixlen) >= 0);
 339                 if (prefix[i].valid)
 340                         assert_se(sd_radv_prefix_set_valid_lifetime(p, prefix[i].valid) >= 0);
 341                 if (prefix[i].preferred)
 342                         assert_se(sd_radv_prefix_set_preferred_lifetime(p, prefix[i].preferred) >= 0);
 343
 344                 assert_se((sd_radv_add_prefix(ra, p) >= 0) == prefix[i].succesful);
 345                 assert_se(sd_radv_add_prefix(ra, p) < 0);
 346
 347                 p = sd_radv_prefix_unref(p);
 348                 assert_se(!p);
 349         }
 350
 351         assert_se(sd_event_add_io(e, &recv_router_advertisement, test_fd[0],
 352                                   EPOLLIN, radv_recv, ra) >= 0);
 353
 354         assert_se(sd_event_add_time(e, &test_hangcheck, clock_boottime_or_monotonic(),
 355                                  time_now + 2 *USEC_PER_SEC, 0,
 356                                  test_rs_hangcheck, NULL) >= 0);
 357
 358         assert_se(sd_radv_start(ra) >= 0);
 359
 360         sd_event_loop(e);
 361
 362         test_hangcheck = sd_event_source_unref(test_hangcheck);
 363
 364         ra = sd_radv_unref(ra);
 365         assert_se(!ra);
 366
 367         close(test_fd[0]);
 368
 369         sd_event_unref(e);
 370 }
 371
 372 int main(int argc, char *argv[]) {
 373
 374         log_set_max_level(LOG_DEBUG);
 375         log_parse_environment();
 376         log_open();
 377
 378         test_radv_prefix();
 379         test_radv();
 380         test_ra();
 381
 382         printf("* done\n");
 383         return 0;
 384 }