src/vnet/ip/ip.c

   1 /*
   2  * Copyright (c) 2017 Cisco and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15
  16 #include <vnet/ip/ip.h>
  17 #include <vnet/fib/fib_table.h>
  18
  19 u8
  20 ip_is_zero (ip46_address_t * ip46_address, u8 is_ip4)
  21 {
  22   if (is_ip4)
  23     return (ip46_address->ip4.as_u32 == 0);
  24   else
  25     return (ip46_address->as_u64[0] == 0 && ip46_address->as_u64[1] == 0);
  26 }
  27
  28 u8
  29 ip_is_local_host (ip46_address_t * ip46_address, u8 is_ip4)
  30 {
  31   if (is_ip4)
  32     return (ip46_address->ip4.as_u8[0] == 127);
  33   else
  34     return (ip46_address->as_u64[0] == 0 &&
  35             clib_net_to_host_u64 (ip46_address->as_u64[1]) == 1);
  36 }
  37
  38 u8
  39 ip4_is_local_host (ip4_address_t * ip4_address)
  40 {
  41   return (ip4_address->as_u8[0] == 127);
  42 }
  43
  44 u8
  45 ip6_is_local_host (ip6_address_t * ip6_address)
  46 {
  47   return (ip6_address->as_u64[0] == 0 &&
  48           clib_net_to_host_u64 (ip6_address->as_u64[1]) == 1);
  49 }
  50
  51 /**
  52  * Checks that an ip is local to the requested fib
  53  */
  54 u8
  55 ip_is_local (u32 fib_index, ip46_address_t * ip46_address, u8 is_ip4)
  56 {
  57   fib_node_index_t fei;
  58   fib_entry_flag_t flags;
  59   fib_prefix_t prefix;
  60
  61   /* Check if requester is local */
  62   if (is_ip4)
  63     {
  64       prefix.fp_len = 32;
  65       prefix.fp_proto = FIB_PROTOCOL_IP4;
  66     }
  67   else
  68     {
  69       prefix.fp_len = 128;
  70       prefix.fp_proto = FIB_PROTOCOL_IP6;
  71     }
  72
  73   clib_memcpy_fast (&prefix.fp_addr, ip46_address, sizeof (ip46_address_t));
  74   fei = fib_table_lookup (fib_index, &prefix);
  75   flags = fib_entry_get_flags (fei);
  76
  77   return (flags & FIB_ENTRY_FLAG_LOCAL);
  78 }
  79
  80 void
  81 ip_copy (ip46_address_t * dst, ip46_address_t * src, u8 is_ip4)
  82 {
  83   if (is_ip4)
  84     dst->ip4.as_u32 = src->ip4.as_u32;
  85   else
  86     clib_memcpy_fast (&dst->ip6, &src->ip6, sizeof (ip6_address_t));
  87 }
  88
  89 void
  90 ip_set (ip46_address_t * dst, void *src, u8 is_ip4)
  91 {
  92   if (is_ip4)
  93     dst->ip4.as_u32 = ((ip4_address_t *) src)->as_u32;
  94   else
  95     clib_memcpy_fast (&dst->ip6, (ip6_address_t *) src,
  96                       sizeof (ip6_address_t));
  97 }
  98
  99 u8
 100 ip_interface_has_address (u32 sw_if_index, ip46_address_t * ip, u8 is_ip4)
 101 {
 102   ip_interface_address_t *ia = 0;
 103
 104   if (is_ip4)
 105     {
 106       ip_lookup_main_t *lm4 = &ip4_main.lookup_main;
 107       ip4_address_t *ip4;
 108       /* *INDENT-OFF* */
 109       foreach_ip_interface_address (lm4, ia, sw_if_index, 1 /* unnumbered */ ,
 110       ({
 111         ip4 = ip_interface_address_get_address (lm4, ia);
 112         if (ip4_address_compare (ip4, &ip->ip4) == 0)
 113           return 1;
 114       }));
 115       /* *INDENT-ON* */
 116     }
 117   else
 118     {
 119       ip_lookup_main_t *lm6 = &ip6_main.lookup_main;
 120       ip6_address_t *ip6;
 121       /* *INDENT-OFF* */
 122       foreach_ip_interface_address (lm6, ia, sw_if_index, 1 /* unnumbered */ ,
 123       ({
 124         ip6 = ip_interface_address_get_address (lm6, ia);
 125         if (ip6_address_compare (ip6, &ip->ip6) == 0)
 126           return 1;
 127       }));
 128       /* *INDENT-ON* */
 129     }
 130   return 0;
 131 }
 132
 133 void *
 134 ip_interface_get_first_ip (u32 sw_if_index, u8 is_ip4)
 135 {
 136   ip_lookup_main_t *lm4 = &ip4_main.lookup_main;
 137   ip_lookup_main_t *lm6 = &ip6_main.lookup_main;
 138   ip_interface_address_t *ia = 0;
 139
 140   if (is_ip4)
 141     {
 142       /* *INDENT-OFF* */
 143       foreach_ip_interface_address (lm4, ia, sw_if_index, 1 /* unnumbered */ ,
 144       ({
 145         return ip_interface_address_get_address (lm4, ia);
 146       }));
 147       /* *INDENT-ON* */
 148     }
 149   else
 150     {
 151       /* *INDENT-OFF* */
 152       foreach_ip_interface_address (lm6, ia, sw_if_index, 1 /* unnumbered */ ,
 153       ({
 154         ip6_address_t *rv;
 155         rv = ip_interface_address_get_address (lm6, ia);
 156         /* Trying to use a link-local ip6 src address is a fool's errand */
 157         if (!ip6_address_is_link_local_unicast (rv))
 158           return rv;
 159       }));
 160       /* *INDENT-ON* */
 161     }
 162
 163   return 0;
 164 }
 165
 166 u8 *
 167 format_ip_address_family (u8 * s, va_list * args)
 168 {
 169   ip_address_family_t af = va_arg (*args, int); // int promo ip_address_family_t);
 170
 171   switch (af)
 172     {
 173     case AF_IP4:
 174       return (format (s, "ip4"));
 175     case AF_IP6:
 176       return (format (s, "ip6"));
 177     }
 178
 179   return (format (s, "unknown"));
 180 }
 181
 182 uword
 183 unformat_ip_address_family (unformat_input_t * input, va_list * args)
 184 {
 185   ip_address_family_t *af = va_arg (*args, ip_address_family_t *);
 186
 187   if (unformat (input, "ip4") || unformat (input, "ipv4") ||
 188       unformat (input, "IP4") || unformat (input, "IPv4"))
 189     {
 190       *af = AF_IP4;
 191       return (1);
 192     }
 193   else if (unformat (input, "ip6") || unformat (input, "ipv6") ||
 194            unformat (input, "IP6") || unformat (input, "IPv6"))
 195     {
 196       *af = AF_IP6;
 197       return (1);
 198     }
 199   return (0);
 200 }
 201
 202 u8 *
 203 format_ip_dscp (u8 * s, va_list * va)
 204 {
 205   ip_dscp_t dscp = va_arg (*va, u32);   // int promotion of u8
 206
 207   switch (dscp)
 208     {
 209 #define _(n,v)                                                  \
 210     case IP_DSCP_##v:                                           \
 211       return (format (s, "%s", #v));
 212       foreach_ip_dscp
 213 #undef _
 214     }
 215
 216   return (format (s, "unknown"));
 217 }
 218
 219 u8 *
 220 format_ip_ecn (u8 * s, va_list * va)
 221 {
 222   ip_ecn_t ecn = va_arg (*va, u32);     // int promotion of u8
 223
 224   switch (ecn)
 225     {
 226 #define _(n,v)                                                  \
 227     case IP_ECN_##v:                                           \
 228       return (format (s, "%s", #v));
 229       foreach_ip_ecn
 230 #undef _
 231     }
 232
 233   return (format (s, "unknown"));
 234 }
 235
 236 /*
 237  * fd.io coding-style-patch-verification: ON
 238  *
 239  * Local Variables:
 240  * eval: (c-set-style "gnu")
 241  * End:
 242  */