Blame view

RIOT/sys/shell/commands/sc_gnrc_6ctx.c 4.93 KB
fb11e647   vrobic   reseau statique a...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
  /*
   * Copyright (C) 2015 Martine Lenders <mlenders@inf.fu-berlin.de>
   *
   * This file is subject to the terms and conditions of the GNU Lesser
   * General Public License v2.1. See the file LICENSE in the top level
   * directory for more details.
   */
  
  /**
   * @{
   *
   * @file
   */
  
  /* Required for strtok_r in string.h, when building with -std=c99 */
  #define _DEFAULT_SOURCE 1
  #include <inttypes.h>
  #include <stdio.h>
  #include <stdlib.h>
  #include <string.h>
  
  #include "net/ipv6/addr.h"
  #include "net/gnrc/ipv6/netif.h"
  #include "net/gnrc/ndp/internal.h"
  #include "net/gnrc/sixlowpan/ctx.h"
  #include "net/gnrc/sixlowpan/nd.h"
  #include "timex.h"
  #include "xtimer.h"
  
  static xtimer_t del_timer[GNRC_SIXLOWPAN_CTX_SIZE];
  static gnrc_sixlowpan_nd_router_abr_t *abr = NULL;
  
  void _del_cb(void *ptr)
  {
      gnrc_sixlowpan_ctx_t *ctx = ptr;
      uint8_t cid = ctx->flags_id & GNRC_SIXLOWPAN_CTX_FLAGS_CID_MASK;
      ctx->prefix_len = 0;
      gnrc_sixlowpan_nd_router_abr_rem_ctx(abr, cid);
      del_timer[cid].callback = NULL;
  }
  
  static void _usage(char *cmd_str)
  {
      printf("usage: %s [{add <0-15> <prefix>/<prefix_len> <ltime in min>|del <ctx>}]\n", cmd_str);
      puts("       `del` will only invalidate the context for compression. It can be");
      puts("       reassigned after 5 min.");
  }
  
  int _gnrc_6ctx_list(void)
  {
      puts("cid|prefix                                     |C|ltime");
      puts("-----------------------------------------------------------");
      for (uint8_t i = 0; i < GNRC_SIXLOWPAN_CTX_SIZE; i++) {
          gnrc_sixlowpan_ctx_t *ctx = gnrc_sixlowpan_ctx_lookup_id(i);
          if (ctx != NULL) {
              char addr_str[IPV6_ADDR_MAX_STR_LEN];
              printf(" %2" PRIu8 "|%39s/%-3" PRIu8 "|%" PRIx8 "|%5" PRIu16 " min\n", i,
                     ipv6_addr_to_str(addr_str, &ctx->prefix, sizeof(addr_str)), ctx->prefix_len,
                     (uint8_t) ((ctx->flags_id & 0xf0) >> 4), ctx->ltime);
          }
      }
      return 0;
  }
  
  static void _adv_ctx(void)
  {
      kernel_pid_t ifs[GNRC_NETIF_NUMOF];
      size_t ifnum = gnrc_netif_get(ifs);
      for (size_t i = 0; i < ifnum; i++) {
          gnrc_ipv6_netif_t *iface = gnrc_ipv6_netif_get(ifs[i]);
          if ((iface != NULL) && (iface->flags & GNRC_IPV6_NETIF_FLAGS_SIXLOWPAN)) {
              gnrc_ndp_internal_send_rtr_adv(ifs[i], NULL, NULL, false);
          }
      }
  }
  
  int _gnrc_6ctx_add(char *cmd_str, char *ctx_str, char *prefix_str, char *ltime_str)
  {
      ipv6_addr_t prefix;
      char *addr_str, *prefix_len_str, *save_ptr;
      unsigned prefix_len;
      unsigned ltime;
      unsigned ctx = (unsigned)atoi(ctx_str);
      if (ctx >= GNRC_SIXLOWPAN_CTX_SIZE) {
          _usage(cmd_str);
          return 1;
      }
      addr_str = strtok_r(prefix_str, "/", &save_ptr);
      if (addr_str == NULL) {
          _usage(cmd_str);
          return 1;
      }
      prefix_len_str = strtok_r(NULL, "/", &save_ptr);
      if (addr_str == NULL) {
          _usage(cmd_str);
          return 1;
      }
      prefix_len = (unsigned)atoi(prefix_len_str);
      if ((prefix_len - 1U) > 128U) {
          puts("ERROR: prefix_len < 1 || prefix_len > 128");
          return 1;
      }
      ipv6_addr_from_str(&prefix, addr_str);
      if (ipv6_addr_is_unspecified(&prefix)) {
          puts("ERROR: prefix may not be ::");
          return 1;
      }
      if (abr == NULL) {
          abr = gnrc_sixlowpan_nd_router_abr_get();
      }
      if (gnrc_sixlowpan_nd_router_abr_add_ctx(abr, ctx) < 0) {
          puts("ERROR: can not add context");
          return 1;
      }
      ltime = (unsigned)atoi(ltime_str);
      if (gnrc_sixlowpan_ctx_update((uint8_t)ctx, &prefix, (uint8_t)prefix_len, ltime,
                                    true) == NULL) {
          puts("ERROR: can not add context");
          return 1;
      }
      /* advertise new/updated context */
      _adv_ctx();
      return 0;
  }
  
  int _gnrc_6ctx_del(char *cmd_str, char *ctx_str)
  {
      gnrc_sixlowpan_ctx_t *ctx;
      unsigned cid = (unsigned)atoi(ctx_str);
      if (cid >= GNRC_SIXLOWPAN_CTX_SIZE) {
          _usage(cmd_str);
          return 1;
      }
      else if (del_timer[cid].callback == NULL) {
          ctx = gnrc_sixlowpan_ctx_lookup_id(cid);
          if (ctx != NULL) {
              ctx->flags_id &= ~GNRC_SIXLOWPAN_CTX_FLAGS_COMP;
              ctx->ltime = 0;
              del_timer[cid].callback = _del_cb;
              del_timer[cid].arg = ctx;
              xtimer_set(&del_timer[cid], GNRC_SIXLOWPAN_ND_RTR_MIN_CTX_DELAY * SEC_IN_USEC);
          }
      }
      else {
          printf("Context %u already marked for removal\n", cid);
          return 1;
      }
      /* advertise updated context */
      _adv_ctx();
      return 0;
  }
  
  int _gnrc_6ctx(int argc, char **argv)
  {
      if (argc < 2) {
          _gnrc_6ctx_list();
      }
      else if (strcmp("add", argv[1]) == 0) {
          if (argc < 5) {
              _usage(argv[0]);
              return 1;
          }
          return _gnrc_6ctx_add(argv[0], argv[2], argv[3], argv[4]);
      }
      else if (strcmp("del", argv[1]) == 0) {
          return _gnrc_6ctx_del(argv[0], argv[2]);
      }
      else {
          _usage(argv[0]);
          return 1;
      }
      return 0;
  }
  
  /** @} */