src/vnet/sctp/sctp_input.c

   1 /*
   2  * Copyright (c) 2017 SUSE LLC.
   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 #include <vppinfra/sparse_vec.h>
  16 #include <vnet/sctp/sctp.h>
  17 #include <vnet/sctp/sctp_packet.h>
  18 #include <vnet/sctp/sctp_debug.h>
  19 #include <vnet/session/session.h>
  20 #include <math.h>
  21
  22 static char *sctp_error_strings[] = {
  23 #define sctp_error(n,s) s,
  24 #include <vnet/sctp/sctp_error.def>
  25 #undef sctp_error
  26 };
  27
  28 /* All SCTP nodes have the same outgoing arcs */
  29 #define foreach_sctp_state_next                  \
  30   _ (DROP, "error-drop")                        \
  31   _ (SCTP4_OUTPUT, "sctp4-output")                \
  32   _ (SCTP6_OUTPUT, "sctp6-output")
  33
  34 typedef enum _sctp_established_phase_next
  35 {
  36 #define _(s,n) SCTP_ESTABLISHED_PHASE_NEXT_##s,
  37   foreach_sctp_state_next
  38 #undef _
  39     SCTP_ESTABLISHED_PHASE_N_NEXT,
  40 } sctp_established_phase_next_t;
  41
  42 typedef enum _sctp_rcv_phase_next
  43 {
  44 #define _(s,n) SCTP_RCV_PHASE_NEXT_##s,
  45   foreach_sctp_state_next
  46 #undef _
  47     SCTP_RCV_PHASE_N_NEXT,
  48 } sctp_rcv_phase_next_t;
  49
  50 typedef enum _sctp_listen_phase_next
  51 {
  52 #define _(s,n) SCTP_LISTEN_PHASE_NEXT_##s,
  53   foreach_sctp_state_next
  54 #undef _
  55     SCTP_LISTEN_PHASE_N_NEXT,
  56 } sctp_listen_phase_next_t;
  57
  58 typedef enum _sctp_shutdown_phase_next
  59 {
  60 #define _(s,n) SCTP_SHUTDOWN_PHASE_NEXT_##s,
  61   foreach_sctp_state_next
  62 #undef _
  63     SCTP_SHUTDOWN_PHASE_N_NEXT,
  64 } sctp_shutdown_phase_next_t;
  65
  66 /* Generic, state independent indices */
  67 typedef enum _sctp_state_next
  68 {
  69 #define _(s,n) SCTP_NEXT_##s,
  70   foreach_sctp_state_next
  71 #undef _
  72     SCTP_STATE_N_NEXT,
  73 } sctp_state_next_t;
  74
  75 typedef enum _sctp_input_next
  76 {
  77   SCTP_INPUT_NEXT_DROP,
  78   SCTP_INPUT_NEXT_LISTEN_PHASE,
  79   SCTP_INPUT_NEXT_RCV_PHASE,
  80   SCTP_INPUT_NEXT_ESTABLISHED_PHASE,
  81   SCTP_INPUT_NEXT_SHUTDOWN_PHASE,
  82   SCTP_INPUT_NEXT_PUNT_PHASE,
  83   SCTP_INPUT_N_NEXT
  84 } sctp_input_next_t;
  85
  86 char *
  87 phase_to_string (u8 phase)
  88 {
  89   switch (phase)
  90     {
  91     case SCTP_INPUT_NEXT_DROP:
  92       return "SCTP_INPUT_NEXT_DROP";
  93     case SCTP_INPUT_NEXT_LISTEN_PHASE:
  94       return "SCTP_INPUT_NEXT_LISTEN_PHASE";
  95     case SCTP_INPUT_NEXT_RCV_PHASE:
  96       return "SCTP_INPUT_NEXT_RCV_PHASE";
  97     case SCTP_INPUT_NEXT_ESTABLISHED_PHASE:
  98       return "SCTP_INPUT_NEXT_ESTABLISHED_PHASE";
  99     case SCTP_INPUT_NEXT_SHUTDOWN_PHASE:
 100       return "SCTP_INPUT_NEXT_SHUTDOWN_PHASE";
 101     case SCTP_INPUT_NEXT_PUNT_PHASE:
 102       return "SCTP_INPUT_NEXT_PUNT_PHASE";
 103     }
 104   return NULL;
 105 }
 106
 107 #define foreach_sctp4_input_next                 \
 108   _ (DROP, "error-drop")                         \
 109   _ (RCV_PHASE, "sctp4-rcv")                    \
 110   _ (LISTEN_PHASE, "sctp4-listen")       \
 111   _ (ESTABLISHED_PHASE, "sctp4-established")             \
 112   _ (SHUTDOWN_PHASE, "sctp4-shutdown")  \
 113   _ (PUNT_PHASE, "ip4-punt")
 114
 115
 116 #define foreach_sctp6_input_next                 \
 117   _ (DROP, "error-drop")                         \
 118   _ (RCV_PHASE, "sctp6-rcv")                    \
 119   _ (LISTEN_PHASE, "sctp6-listen")       \
 120   _ (ESTABLISHED_PHASE, "sctp6-established")             \
 121   _ (SHUTDOWN_PHASE, "sctp6-shutdown")          \
 122   _ (PUNT_PHASE, "ip6-punt")
 123
 124 static u8
 125 sctp_lookup_is_valid (transport_connection_t * trans_conn,
 126                       sctp_header_t * sctp_hdr)
 127 {
 128   sctp_connection_t *sctp_conn =
 129     sctp_get_connection_from_transport (trans_conn);
 130
 131   if (!sctp_conn)
 132     return 1;
 133
 134   u8 is_valid = (trans_conn->lcl_port == sctp_hdr->dst_port
 135                  && (sctp_conn->state == SCTP_STATE_CLOSED
 136                      || trans_conn->rmt_port == sctp_hdr->src_port));
 137
 138   return is_valid;
 139 }
 140
 141 /**
 142  * Lookup transport connection
 143  */
 144 static sctp_connection_t *
 145 sctp_lookup_connection (u32 fib_index, vlib_buffer_t * b, u8 thread_index,
 146                         u8 is_ip4)
 147 {
 148   sctp_main_t *tm = vnet_get_sctp_main ();
 149   sctp_header_t *sctp_hdr;
 150   transport_connection_t *trans_conn;
 151   sctp_connection_t *sctp_conn;
 152   u8 is_filtered, i;
 153   if (is_ip4)
 154     {
 155       ip4_header_t *ip4_hdr;
 156       ip4_hdr = vlib_buffer_get_current (b);
 157       sctp_hdr = ip4_next_header (ip4_hdr);
 158       trans_conn = session_lookup_connection_wt4 (fib_index,
 159                                                   &ip4_hdr->dst_address,
 160                                                   &ip4_hdr->src_address,
 161                                                   sctp_hdr->dst_port,
 162                                                   sctp_hdr->src_port,
 163                                                   TRANSPORT_PROTO_SCTP,
 164                                                   thread_index, &is_filtered);
 165       if (trans_conn == 0)      /* Not primary connection */
 166         {
 167           for (i = 0; i < MAX_SCTP_CONNECTIONS; i++)
 168             {
 169               if ((tm->connections[thread_index]->sub_conn[i].
 170                    connection.lcl_ip.ip4.as_u32 ==
 171                    ip4_hdr->dst_address.as_u32)
 172                   && (tm->connections[thread_index]->sub_conn[i].
 173                       connection.rmt_ip.ip4.as_u32 ==
 174                       ip4_hdr->src_address.as_u32))
 175                 {
 176                   trans_conn =
 177                     &tm->connections[thread_index]->sub_conn[i].connection;
 178                   break;
 179                 }
 180             }
 181         }
 182       ASSERT (trans_conn != 0);
 183       ASSERT (sctp_lookup_is_valid (trans_conn, sctp_hdr));
 184     }
 185   else
 186     {
 187       ip6_header_t *ip6_hdr;
 188       ip6_hdr = vlib_buffer_get_current (b);
 189       sctp_hdr = ip6_next_header (ip6_hdr);
 190       trans_conn = session_lookup_connection_wt6 (fib_index,
 191                                                   &ip6_hdr->dst_address,
 192                                                   &ip6_hdr->src_address,
 193                                                   sctp_hdr->dst_port,
 194                                                   sctp_hdr->src_port,
 195                                                   TRANSPORT_PROTO_SCTP,
 196                                                   thread_index, &is_filtered);
 197       if (trans_conn == 0)      /* Not primary connection */
 198         {
 199           for (i = 0; i < MAX_SCTP_CONNECTIONS; i++)
 200             {
 201               if ((tm->connections[thread_index]->sub_conn[i].
 202                    connection.lcl_ip.ip6.as_u64[0] ==
 203                    ip6_hdr->dst_address.as_u64[0]
 204                    && tm->connections[thread_index]->sub_conn[i].
 205                    connection.lcl_ip.ip6.as_u64[1] ==
 206                    ip6_hdr->dst_address.as_u64[1])
 207                   && (tm->connections[thread_index]->sub_conn[i].
 208                       connection.rmt_ip.ip6.as_u64[0] ==
 209                       ip6_hdr->src_address.as_u64[0]
 210                       && tm->connections[thread_index]->
 211                       sub_conn[i].connection.rmt_ip.ip6.as_u64[1] ==
 212                       ip6_hdr->src_address.as_u64[1]))
 213                 {
 214                   trans_conn =
 215                     &tm->connections[thread_index]->sub_conn[i].connection;
 216                   break;
 217                 }
 218             }
 219         }
 220       ASSERT (trans_conn != 0);
 221       ASSERT (sctp_lookup_is_valid (trans_conn, sctp_hdr));
 222     }
 223   sctp_conn = sctp_get_connection_from_transport (trans_conn);
 224   return sctp_conn;
 225 }
 226
 227 typedef struct
 228 {
 229   sctp_header_t sctp_header;
 230   sctp_connection_t sctp_connection;
 231 } sctp_rx_trace_t;
 232
 233 #define sctp_next_output(is_ip4) (is_ip4 ? SCTP_NEXT_SCTP4_OUTPUT          \
 234                                         : SCTP_NEXT_SCTP6_OUTPUT)
 235
 236
 237 void
 238 sctp_set_rx_trace_data (sctp_rx_trace_t * rx_trace,
 239                         sctp_connection_t * sctp_conn,
 240                         sctp_header_t * sctp_hdr, vlib_buffer_t * b0,
 241                         u8 is_ip4)
 242 {
 243   if (sctp_conn)
 244     {
 245       clib_memcpy (&rx_trace->sctp_connection, sctp_conn,
 246                    sizeof (rx_trace->sctp_connection));
 247     }
 248   else
 249     {
 250       sctp_hdr = sctp_buffer_hdr (b0);
 251     }
 252   clib_memcpy (&rx_trace->sctp_header, sctp_hdr,
 253                sizeof (rx_trace->sctp_header));
 254 }
 255
 256 always_inline u16
 257 sctp_calculate_implied_length (ip4_header_t * ip4_hdr, ip6_header_t * ip6_hdr,
 258                                int is_ip4)
 259 {
 260   u16 sctp_implied_packet_length = 0;
 261
 262   if (is_ip4)
 263     sctp_implied_packet_length =
 264       clib_net_to_host_u16 (ip4_hdr->length) - ip4_header_bytes (ip4_hdr);
 265   else
 266     sctp_implied_packet_length =
 267       clib_net_to_host_u16 (ip6_hdr->payload_length) - sizeof (ip6_hdr);
 268
 269   return sctp_implied_packet_length;
 270 }
 271
 272 always_inline u8
 273 sctp_is_bundling (u16 sctp_implied_length,
 274                   sctp_chunks_common_hdr_t * sctp_common_hdr)
 275 {
 276   if (sctp_implied_length !=
 277       sizeof (sctp_header_t) + vnet_sctp_get_chunk_length (sctp_common_hdr))
 278     return 1;
 279   return 0;
 280 }
 281
 282 always_inline u16
 283 sctp_handle_init (sctp_header_t * sctp_hdr,
 284                   sctp_chunks_common_hdr_t * sctp_chunk_hdr,
 285                   sctp_connection_t * sctp_conn, vlib_buffer_t * b0,
 286                   u16 sctp_implied_length)
 287 {
 288   sctp_init_chunk_t *init_chunk = (sctp_init_chunk_t *) (sctp_hdr);
 289   ip4_address_t *ip4_addr = 0;
 290   ip6_address_t *ip6_addr = 0;
 291   char hostname[FQDN_MAX_LENGTH];
 292
 293   /* Check the current state of the connection
 294    *
 295    * The logic required by the RFC4960 Section 5.2.2 is already taken care of
 296    * in the code below and by the "sctp_prepare_initack_chunk" function.
 297    * However, for debugging purposes it is nice to have a message printed out
 298    * for these corner-case scenarios.
 299    */
 300   if (sctp_conn->state != SCTP_STATE_CLOSED)
 301     {                           /* UNEXPECTED scenario */
 302       switch (sctp_conn->state)
 303         {
 304         case SCTP_STATE_COOKIE_WAIT:    /* TODO */
 305           SCTP_ADV_DBG ("Received INIT chunk while in COOKIE_WAIT state");
 306           break;
 307         case SCTP_STATE_COOKIE_ECHOED:  /* TODO */
 308           SCTP_ADV_DBG ("Received INIT chunk while in COOKIE_ECHOED state");
 309           break;
 310         }
 311     }
 312
 313   if (sctp_hdr->verification_tag != 0x0)
 314     return SCTP_ERROR_INVALID_TAG_FOR_INIT;
 315
 316   /*
 317    * It is not possible to bundle any other CHUNK with the INIT chunk
 318    */
 319   if (sctp_is_bundling (sctp_implied_length, &init_chunk->chunk_hdr))
 320     return SCTP_ERROR_BUNDLING_VIOLATION;
 321
 322   /* Save the INITIATE_TAG of the remote peer for this connection:
 323    * it MUST be used for the VERIFICATION_TAG parameter in the SCTP HEADER */
 324   sctp_conn->remote_tag = init_chunk->initiate_tag;
 325   sctp_conn->remote_initial_tsn =
 326     clib_net_to_host_u32 (init_chunk->initial_tsn);
 327   sctp_conn->last_rcvd_tsn = sctp_conn->remote_initial_tsn;
 328   sctp_conn->next_tsn_expected = sctp_conn->remote_initial_tsn + 1;
 329   SCTP_CONN_TRACKING_DBG ("sctp_conn->remote_initial_tsn = %u",
 330                           sctp_conn->remote_initial_tsn);
 331
 332   sctp_conn->snd_opts.a_rwnd = clib_net_to_host_u32 (init_chunk->a_rwnd);
 333
 334   /*
 335    * If the length specified in the INIT message is bigger than the size in bytes of our structure it means that
 336    * optional parameters have been sent with the INIT chunk and we need to parse them.
 337    */
 338   u16 length = vnet_sctp_get_chunk_length (sctp_chunk_hdr);
 339   if (length > sizeof (sctp_init_chunk_t))
 340     {
 341       /* There are optional parameters in the INIT chunk */
 342       u16 pointer_offset = sizeof (sctp_init_chunk_t);
 343       while (pointer_offset < length)
 344         {
 345           sctp_opt_params_hdr_t *opt_params_hdr =
 346             (sctp_opt_params_hdr_t *) init_chunk + pointer_offset;
 347
 348           switch (clib_net_to_host_u16 (opt_params_hdr->type))
 349             {
 350             case SCTP_IPV4_ADDRESS_TYPE:
 351               {
 352                 sctp_ipv4_addr_param_t *ipv4 =
 353                   (sctp_ipv4_addr_param_t *) opt_params_hdr;
 354                 clib_memcpy (ip4_addr, &ipv4->address,
 355                              sizeof (ip4_address_t));
 356
 357                 sctp_sub_connection_add_ip4 (vlib_get_thread_index (), ipv4);
 358
 359                 break;
 360               }
 361             case SCTP_IPV6_ADDRESS_TYPE:
 362               {
 363                 sctp_ipv6_addr_param_t *ipv6 =
 364                   (sctp_ipv6_addr_param_t *) opt_params_hdr;
 365                 clib_memcpy (ip6_addr, &ipv6->address,
 366                              sizeof (ip6_address_t));
 367
 368                 sctp_sub_connection_add_ip6 (vlib_get_thread_index (), ipv6);
 369
 370                 break;
 371               }
 372             case SCTP_COOKIE_PRESERVATIVE_TYPE:
 373               {
 374                 sctp_cookie_preservative_param_t *cookie_pres =
 375                   (sctp_cookie_preservative_param_t *) opt_params_hdr;
 376                 sctp_conn->peer_cookie_life_span_increment =
 377                   cookie_pres->life_span_inc;
 378                 break;
 379               }
 380             case SCTP_HOSTNAME_ADDRESS_TYPE:
 381               {
 382                 sctp_hostname_param_t *hostname_addr =
 383                   (sctp_hostname_param_t *) opt_params_hdr;
 384                 clib_memcpy (hostname, hostname_addr->hostname,
 385                              FQDN_MAX_LENGTH);
 386                 break;
 387               }
 388             case SCTP_SUPPORTED_ADDRESS_TYPES:
 389               {
 390                 /* TODO */
 391                 break;
 392               }
 393             }
 394           pointer_offset += clib_net_to_host_u16 (opt_params_hdr->length);
 395         }
 396     }
 397
 398   /* Reuse buffer to make init-ack and send */
 399   sctp_prepare_initack_chunk (sctp_conn, b0, ip4_addr, ip6_addr);
 400   return SCTP_ERROR_NONE;
 401 }
 402
 403 always_inline u16
 404 sctp_is_valid_init_ack (sctp_header_t * sctp_hdr,
 405                         sctp_chunks_common_hdr_t * sctp_chunk_hdr,
 406                         sctp_connection_t * sctp_conn, vlib_buffer_t * b0,
 407                         u16 sctp_implied_length)
 408 {
 409   sctp_init_ack_chunk_t *init_ack_chunk =
 410     (sctp_init_ack_chunk_t *) (sctp_hdr);
 411
 412   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
 413   if (sctp_conn->local_tag != init_ack_chunk->sctp_hdr.verification_tag)
 414     {
 415       return SCTP_ERROR_INVALID_TAG;
 416     }
 417
 418   /*
 419    * It is not possible to bundle any other CHUNK with the INIT_ACK chunk
 420    */
 421   if (sctp_is_bundling (sctp_implied_length, &init_ack_chunk->chunk_hdr))
 422     return SCTP_ERROR_BUNDLING_VIOLATION;
 423
 424   return SCTP_ERROR_NONE;
 425 }
 426
 427 always_inline u16
 428 sctp_handle_init_ack (sctp_header_t * sctp_hdr,
 429                       sctp_chunks_common_hdr_t * sctp_chunk_hdr,
 430                       sctp_connection_t * sctp_conn, u8 idx,
 431                       vlib_buffer_t * b0, u16 sctp_implied_length)
 432 {
 433   sctp_init_ack_chunk_t *init_ack_chunk =
 434     (sctp_init_ack_chunk_t *) (sctp_hdr);
 435   sctp_state_cookie_param_t state_cookie;
 436
 437   char hostname[FQDN_MAX_LENGTH];
 438
 439   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
 440   if (sctp_conn->local_tag != init_ack_chunk->sctp_hdr.verification_tag)
 441     {
 442       return SCTP_ERROR_INVALID_TAG;
 443     }
 444
 445   /*
 446    * It is not possible to bundle any other CHUNK with the INIT chunk
 447    */
 448   if (sctp_is_bundling (sctp_implied_length, &init_ack_chunk->chunk_hdr))
 449     return SCTP_ERROR_BUNDLING_VIOLATION;
 450
 451   sctp_calculate_rto (sctp_conn, idx);
 452
 453   /* remote_tag to be placed in the VERIFICATION_TAG field of the COOKIE_ECHO chunk */
 454   sctp_conn->remote_tag = init_ack_chunk->initiate_tag;
 455   sctp_conn->remote_initial_tsn =
 456     clib_net_to_host_u32 (init_ack_chunk->initial_tsn);
 457   sctp_conn->last_rcvd_tsn = sctp_conn->remote_initial_tsn;
 458   sctp_conn->next_tsn_expected = sctp_conn->remote_initial_tsn + 1;
 459   SCTP_CONN_TRACKING_DBG ("sctp_conn->remote_initial_tsn = %u",
 460                           sctp_conn->remote_initial_tsn);
 461   sctp_conn->snd_opts.a_rwnd = clib_net_to_host_u32 (init_ack_chunk->a_rwnd);
 462
 463   u16 length = vnet_sctp_get_chunk_length (sctp_chunk_hdr);
 464
 465   if (length > sizeof (sctp_init_ack_chunk_t))
 466     /*
 467      * There are optional parameters in the INIT ACK chunk
 468      */
 469     {
 470       u16 pointer_offset = sizeof (sctp_init_ack_chunk_t);
 471
 472       while (pointer_offset < length)
 473         {
 474           sctp_opt_params_hdr_t *opt_params_hdr =
 475             (sctp_opt_params_hdr_t *) ((char *) init_ack_chunk +
 476                                        pointer_offset);
 477
 478           switch (clib_net_to_host_u16 (opt_params_hdr->type))
 479             {
 480             case SCTP_IPV4_ADDRESS_TYPE:
 481               {
 482                 sctp_ipv4_addr_param_t *ipv4 =
 483                   (sctp_ipv4_addr_param_t *) opt_params_hdr;
 484
 485                 sctp_sub_connection_add_ip4 (vlib_get_thread_index (), ipv4);
 486
 487                 break;
 488               }
 489             case SCTP_IPV6_ADDRESS_TYPE:
 490               {
 491                 sctp_ipv6_addr_param_t *ipv6 =
 492                   (sctp_ipv6_addr_param_t *) opt_params_hdr;
 493
 494                 sctp_sub_connection_add_ip6 (vlib_get_thread_index (), ipv6);
 495
 496                 break;
 497               }
 498             case SCTP_STATE_COOKIE_TYPE:
 499               {
 500                 sctp_state_cookie_param_t *state_cookie_param =
 501                   (sctp_state_cookie_param_t *) opt_params_hdr;
 502
 503                 clib_memcpy (&state_cookie, state_cookie_param,
 504                              sizeof (sctp_state_cookie_param_t));
 505                 break;
 506               }
 507             case SCTP_HOSTNAME_ADDRESS_TYPE:
 508               {
 509                 sctp_hostname_param_t *hostname_addr =
 510                   (sctp_hostname_param_t *) opt_params_hdr;
 511                 clib_memcpy (hostname, hostname_addr->hostname,
 512                              FQDN_MAX_LENGTH);
 513                 break;
 514               }
 515             case SCTP_UNRECOGNIZED_TYPE:
 516               {
 517                 break;
 518               }
 519             }
 520           u16 increment = clib_net_to_host_u16 (opt_params_hdr->length);
 521           /* This indicates something really bad happened */
 522           if (increment == 0)
 523             {
 524               return SCTP_ERROR_INVALID_TAG;
 525             }
 526           pointer_offset += increment;
 527         }
 528     }
 529
 530   sctp_prepare_cookie_echo_chunk (sctp_conn, b0, &state_cookie);
 531
 532   /* Start the T1_COOKIE timer */
 533   sctp_timer_set (sctp_conn, sctp_pick_conn_idx_on_chunk (COOKIE_ECHO),
 534                   SCTP_TIMER_T1_COOKIE, sctp_conn->sub_conn[idx].RTO);
 535
 536   return SCTP_ERROR_NONE;
 537 }
 538
 539 /** Enqueue data out-of-order for delivery to application */
 540 always_inline int
 541 sctp_session_enqueue_data_ooo (sctp_connection_t * sctp_conn,
 542                                vlib_buffer_t * b, u16 data_len, u8 conn_idx)
 543 {
 544   int written, error = SCTP_ERROR_ENQUEUED;
 545
 546   written =
 547     session_enqueue_stream_connection (&sctp_conn->
 548                                        sub_conn[conn_idx].connection, b, 0,
 549                                        1 /* queue event */ ,
 550                                        0);
 551
 552   /* Update next_tsn_expected */
 553   if (PREDICT_TRUE (written == data_len))
 554     {
 555       sctp_conn->next_tsn_expected += written;
 556
 557       SCTP_ADV_DBG ("CONN = %u, WRITTEN [%u] == DATA_LEN [%d]",
 558                     sctp_conn->sub_conn[conn_idx].connection.c_index,
 559                     written, data_len);
 560     }
 561   /* If more data written than expected, account for out-of-order bytes. */
 562   else if (written > data_len)
 563     {
 564       sctp_conn->next_tsn_expected += written;
 565
 566       SCTP_ADV_DBG ("CONN = %u, WRITTEN [%u] > DATA_LEN [%d]",
 567                     sctp_conn->sub_conn[conn_idx].connection.c_index,
 568                     written, data_len);
 569     }
 570   else if (written > 0)
 571     {
 572       /* We've written something but FIFO is probably full now */
 573       sctp_conn->next_tsn_expected += written;
 574
 575       error = SCTP_ERROR_PARTIALLY_ENQUEUED;
 576
 577       SCTP_ADV_DBG
 578         ("CONN = %u, WRITTEN [%u] > 0 (SCTP_ERROR_PARTIALLY_ENQUEUED)",
 579          sctp_conn->sub_conn[conn_idx].connection.c_index, written);
 580     }
 581   else
 582     {
 583       SCTP_ADV_DBG ("CONN = %u, WRITTEN == 0 (SCTP_ERROR_FIFO_FULL)",
 584                     sctp_conn->sub_conn[conn_idx].connection.c_index);
 585
 586       return SCTP_ERROR_FIFO_FULL;
 587     }
 588
 589   /* TODO: Update out_of_order_map & SACK list */
 590
 591   return error;
 592 }
 593
 594 /** Enqueue data for delivery to application */
 595 always_inline int
 596 sctp_session_enqueue_data (sctp_connection_t * sctp_conn, vlib_buffer_t * b,
 597                            u16 data_len, u8 conn_idx)
 598 {
 599   int written, error = SCTP_ERROR_ENQUEUED;
 600
 601   written =
 602     session_enqueue_stream_connection (&sctp_conn->
 603                                        sub_conn[conn_idx].connection, b, 0,
 604                                        1 /* queue event */ ,
 605                                        1);
 606
 607   /* Update next_tsn_expected */
 608   if (PREDICT_TRUE (written == data_len))
 609     {
 610       sctp_conn->next_tsn_expected += written;
 611
 612       SCTP_ADV_DBG ("CONN = %u, WRITTEN [%u] == DATA_LEN [%d]",
 613                     sctp_conn->sub_conn[conn_idx].connection.c_index,
 614                     written, data_len);
 615     }
 616   /* If more data written than expected, account for out-of-order bytes. */
 617   else if (written > data_len)
 618     {
 619       sctp_conn->next_tsn_expected += written;
 620
 621       SCTP_ADV_DBG ("CONN = %u, WRITTEN [%u] > DATA_LEN [%d]",
 622                     sctp_conn->sub_conn[conn_idx].connection.c_index,
 623                     written, data_len);
 624     }
 625   else if (written > 0)
 626     {
 627       /* We've written something but FIFO is probably full now */
 628       sctp_conn->next_tsn_expected += written;
 629
 630       error = SCTP_ERROR_PARTIALLY_ENQUEUED;
 631
 632       SCTP_ADV_DBG
 633         ("CONN = %u, WRITTEN [%u] > 0 (SCTP_ERROR_PARTIALLY_ENQUEUED)",
 634          sctp_conn->sub_conn[conn_idx].connection.c_index, written);
 635     }
 636   else
 637     {
 638       SCTP_ADV_DBG ("CONN = %u, WRITTEN == 0 (SCTP_ERROR_FIFO_FULL)",
 639                     sctp_conn->sub_conn[conn_idx].connection.c_index);
 640
 641       return SCTP_ERROR_FIFO_FULL;
 642     }
 643
 644   return error;
 645 }
 646
 647 always_inline u8
 648 sctp_is_sack_delayable (sctp_connection_t * sctp_conn, u8 gapping)
 649 {
 650   if (gapping != 0)
 651     {
 652       SCTP_CONN_TRACKING_DBG
 653         ("gapping != 0: CONN_INDEX = %u, sctp_conn->ack_state = %u",
 654          sctp_conn->sub_conn[idx].connection.c_index, sctp_conn->ack_state);
 655       return 1;
 656     }
 657
 658   if (sctp_conn->ack_state >= MAX_ENQUEABLE_SACKS)
 659     {
 660       SCTP_CONN_TRACKING_DBG
 661         ("sctp_conn->ack_state >= MAX_ENQUEABLE_SACKS: CONN_INDEX = %u, sctp_conn->ack_state = %u",
 662          sctp_conn->sub_conn[idx].connection.c_index, sctp_conn->ack_state);
 663       return 1;
 664     }
 665
 666   sctp_conn->ack_state += 1;
 667
 668   return 0;
 669 }
 670
 671 always_inline void
 672 sctp_is_connection_gapping (sctp_connection_t * sctp_conn, u32 tsn,
 673                             u8 * gapping)
 674 {
 675   if (sctp_conn->next_tsn_expected != tsn)      // It means data transmission is GAPPING
 676     {
 677       SCTP_CONN_TRACKING_DBG
 678         ("GAPPING: CONN_INDEX = %u, sctp_conn->next_tsn_expected = %u, tsn = %u, diff = %u",
 679          sctp_conn->sub_conn[idx].connection.c_index,
 680          sctp_conn->next_tsn_expected, tsn,
 681          sctp_conn->next_tsn_expected - tsn);
 682
 683       *gapping = 1;
 684     }
 685 }
 686
 687 always_inline u16
 688 sctp_handle_data (sctp_payload_data_chunk_t * sctp_data_chunk,
 689                   sctp_connection_t * sctp_conn, vlib_buffer_t * b,
 690                   u16 * next0)
 691 {
 692   u32 error = 0, n_data_bytes;
 693   u8 idx = sctp_pick_conn_idx_on_state (sctp_conn->state);
 694   u8 is_gapping = 0;
 695
 696   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
 697   if (sctp_conn->local_tag != sctp_data_chunk->sctp_hdr.verification_tag)
 698     {
 699       return SCTP_ERROR_INVALID_TAG;
 700     }
 701
 702   vnet_buffer (b)->sctp.sid = sctp_data_chunk->stream_id;
 703   vnet_buffer (b)->sctp.ssn = sctp_data_chunk->stream_seq;
 704
 705   u32 tsn = clib_net_to_host_u32 (sctp_data_chunk->tsn);
 706
 707   vlib_buffer_advance (b, vnet_buffer (b)->sctp.data_offset);
 708   n_data_bytes = vnet_buffer (b)->sctp.data_len;
 709   ASSERT (n_data_bytes);
 710
 711   sctp_is_connection_gapping (sctp_conn, tsn, &is_gapping);
 712
 713   sctp_conn->last_rcvd_tsn = tsn;
 714
 715   SCTP_ADV_DBG ("POINTER_WITH_DATA = %p", b->data);
 716
 717   u8 bbit = vnet_sctp_get_bbit (&sctp_data_chunk->chunk_hdr);
 718   u8 ebit = vnet_sctp_get_ebit (&sctp_data_chunk->chunk_hdr);
 719
 720   if (bbit == 1 && ebit == 1)   /* Unfragmented message */
 721     {
 722       /* In order data, enqueue. Fifo figures out by itself if any out-of-order
 723        * segments can be enqueued after fifo tail offset changes. */
 724       error = sctp_session_enqueue_data (sctp_conn, b, n_data_bytes, idx);
 725     }
 726   else if (bbit == 1 && ebit == 0)      /* First piece of a fragmented user message */
 727     {
 728       error = sctp_session_enqueue_data (sctp_conn, b, n_data_bytes, idx);
 729     }
 730   else if (bbit == 0 && ebit == 1)      /* Last piece of a fragmented user message */
 731     {
 732       if (PREDICT_FALSE (is_gapping == 1))
 733         error =
 734           sctp_session_enqueue_data_ooo (sctp_conn, b, n_data_bytes, idx);
 735       else
 736         error = sctp_session_enqueue_data (sctp_conn, b, n_data_bytes, idx);
 737     }
 738   else                          /* Middle piece of a fragmented user message */
 739     {
 740       if (PREDICT_FALSE (is_gapping == 1))
 741         error =
 742           sctp_session_enqueue_data_ooo (sctp_conn, b, n_data_bytes, idx);
 743       else
 744         error = sctp_session_enqueue_data (sctp_conn, b, n_data_bytes, idx);
 745     }
 746   sctp_conn->last_rcvd_tsn = tsn;
 747
 748   *next0 = sctp_next_output (sctp_conn->sub_conn[idx].c_is_ip4);
 749
 750   SCTP_ADV_DBG ("POINTER_WITH_DATA = %p", b->data);
 751
 752   if (sctp_is_sack_delayable (sctp_conn, is_gapping) != 0)
 753     sctp_prepare_sack_chunk (sctp_conn, b);
 754
 755   return error;
 756 }
 757
 758 always_inline u16
 759 sctp_handle_cookie_echo (sctp_header_t * sctp_hdr,
 760                          sctp_chunks_common_hdr_t * sctp_chunk_hdr,
 761                          sctp_connection_t * sctp_conn, vlib_buffer_t * b0)
 762 {
 763   u32 now = sctp_time_now ();
 764
 765   /* Build TCB */
 766   u8 idx = sctp_pick_conn_idx_on_chunk (COOKIE_ECHO);
 767
 768   sctp_cookie_echo_chunk_t *cookie_echo =
 769     (sctp_cookie_echo_chunk_t *) sctp_hdr;
 770
 771   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
 772   if (sctp_conn->local_tag != sctp_hdr->verification_tag)
 773     {
 774       return SCTP_ERROR_INVALID_TAG;
 775     }
 776
 777   sctp_calculate_rto (sctp_conn, idx);
 778
 779   u32 creation_time =
 780     clib_net_to_host_u32 (cookie_echo->cookie.creation_time);
 781   u32 cookie_lifespan =
 782     clib_net_to_host_u32 (cookie_echo->cookie.cookie_lifespan);
 783   if (now > creation_time + cookie_lifespan)
 784     {
 785       SCTP_DBG ("now (%u) > creation_time (%u) + cookie_lifespan (%u)",
 786                 now, creation_time, cookie_lifespan);
 787       return SCTP_ERROR_COOKIE_ECHO_VIOLATION;
 788     }
 789
 790   sctp_prepare_cookie_ack_chunk (sctp_conn, b0);
 791
 792   /* Change state */
 793   sctp_conn->state = SCTP_STATE_ESTABLISHED;
 794
 795   sctp_timer_set (sctp_conn, idx, SCTP_TIMER_T4_HEARTBEAT,
 796                   sctp_conn->sub_conn[idx].RTO);
 797
 798   stream_session_accept_notify (&sctp_conn->sub_conn[idx].connection);
 799
 800   return SCTP_ERROR_NONE;
 801
 802 }
 803
 804 always_inline u16
 805 sctp_handle_cookie_ack (sctp_header_t * sctp_hdr,
 806                         sctp_chunks_common_hdr_t * sctp_chunk_hdr,
 807                         sctp_connection_t * sctp_conn, vlib_buffer_t * b0)
 808 {
 809
 810   /* Stop T1_COOKIE timer */
 811   u8 idx = sctp_pick_conn_idx_on_chunk (COOKIE_ACK);
 812
 813   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
 814   if (sctp_conn->local_tag != sctp_hdr->verification_tag)
 815     {
 816       return SCTP_ERROR_INVALID_TAG;
 817     }
 818
 819   sctp_calculate_rto (sctp_conn, idx);
 820
 821   sctp_timer_reset (sctp_conn, idx, SCTP_TIMER_T1_COOKIE);
 822   /* Change state */
 823   sctp_conn->state = SCTP_STATE_ESTABLISHED;
 824
 825   sctp_timer_set (sctp_conn, idx, SCTP_TIMER_T4_HEARTBEAT,
 826                   sctp_conn->sub_conn[idx].RTO);
 827
 828   stream_session_accept_notify (&sctp_conn->sub_conn[idx].connection);
 829
 830   return SCTP_ERROR_NONE;
 831
 832 }
 833
 834 always_inline uword
 835 sctp46_rcv_phase_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
 836                          vlib_frame_t * from_frame, int is_ip4)
 837 {
 838   sctp_main_t *tm = vnet_get_sctp_main ();
 839
 840   u32 n_left_from, next_index, *from, *to_next;
 841   u32 my_thread_index = vm->thread_index;
 842
 843   from = vlib_frame_vector_args (from_frame);
 844   n_left_from = from_frame->n_vectors;
 845
 846   next_index = node->cached_next_index;
 847
 848   while (n_left_from > 0)
 849     {
 850       u32 n_left_to_next;
 851
 852       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 853
 854       while (n_left_from > 0 && n_left_to_next > 0)
 855         {
 856           u32 bi0;
 857           vlib_buffer_t *b0;
 858           sctp_header_t *sctp_hdr = 0;
 859           sctp_chunks_common_hdr_t *sctp_chunk_hdr = 0;
 860           ip4_header_t *ip4_hdr = 0;
 861           ip6_header_t *ip6_hdr = 0;
 862           sctp_connection_t *sctp_conn, *new_sctp_conn;
 863           u16 sctp_implied_length = 0;
 864           u16 error0 = SCTP_ERROR_NONE, next0 = SCTP_RCV_PHASE_N_NEXT;
 865           u8 idx;
 866
 867           bi0 = from[0];
 868           to_next[0] = bi0;
 869           from += 1;
 870           to_next += 1;
 871           n_left_from -= 1;
 872           n_left_to_next -= 1;
 873
 874           b0 = vlib_get_buffer (vm, bi0);
 875
 876           /* If we are in SCTP_COOKIE_WAIT_STATE then the connection
 877            * will come from the half-open connections pool.
 878            */
 879           sctp_conn =
 880             sctp_half_open_connection_get (vnet_buffer (b0)->
 881                                            sctp.connection_index);
 882
 883           if (PREDICT_FALSE (sctp_conn == 0))
 884             {
 885               SCTP_ADV_DBG
 886                 ("sctp_conn == NULL; return SCTP_ERROR_INVALID_CONNECTION");
 887               error0 = SCTP_ERROR_INVALID_CONNECTION;
 888               goto drop;
 889             }
 890           if (is_ip4)
 891             {
 892               ip4_hdr = vlib_buffer_get_current (b0);
 893               sctp_hdr = ip4_next_header (ip4_hdr);
 894             }
 895           else
 896             {
 897               ip6_hdr = vlib_buffer_get_current (b0);
 898               sctp_hdr = ip6_next_header (ip6_hdr);
 899             }
 900           idx = sctp_pick_conn_idx_on_state (sctp_conn->state);
 901
 902           sctp_full_hdr_t *full_hdr = (sctp_full_hdr_t *) sctp_hdr;
 903
 904           transport_connection_t *trans_conn =
 905             &sctp_conn->sub_conn[idx].connection;
 906
 907           trans_conn->lcl_port = sctp_hdr->dst_port;
 908           trans_conn->rmt_port = sctp_hdr->src_port;
 909           trans_conn->is_ip4 = is_ip4;
 910
 911           if (is_ip4)
 912             {
 913               trans_conn->lcl_ip.ip4.as_u32 = ip4_hdr->dst_address.as_u32;
 914               trans_conn->rmt_ip.ip4.as_u32 = ip4_hdr->src_address.as_u32;
 915             }
 916           else
 917             {
 918               clib_memcpy (&trans_conn->lcl_ip.ip6, &ip6_hdr->dst_address,
 919                            sizeof (ip6_address_t));
 920               clib_memcpy (&trans_conn->rmt_ip.ip6, &ip6_hdr->src_address,
 921                            sizeof (ip6_address_t));
 922             }
 923
 924           sctp_chunk_hdr =
 925             (sctp_chunks_common_hdr_t *) (&full_hdr->common_hdr);
 926
 927           sctp_implied_length =
 928             sctp_calculate_implied_length (ip4_hdr, ip6_hdr, is_ip4);
 929
 930           u8 chunk_type = vnet_sctp_get_chunk_type (&full_hdr->common_hdr);
 931
 932           switch (chunk_type)
 933             {
 934             case INIT_ACK:
 935               error0 =
 936                 sctp_is_valid_init_ack (sctp_hdr, sctp_chunk_hdr, sctp_conn,
 937                                         b0, sctp_implied_length);
 938
 939               if (error0 == SCTP_ERROR_NONE)
 940                 {
 941                   pool_get (tm->connections[my_thread_index], new_sctp_conn);
 942                   clib_memcpy (new_sctp_conn, sctp_conn,
 943                                sizeof (*new_sctp_conn));
 944                   new_sctp_conn->sub_conn[idx].c_c_index =
 945                     new_sctp_conn - tm->connections[my_thread_index];
 946                   new_sctp_conn->sub_conn[idx].c_thread_index =
 947                     my_thread_index;
 948                   new_sctp_conn->sub_conn[idx].parent = new_sctp_conn;
 949
 950                   if (sctp_half_open_connection_cleanup (sctp_conn))
 951                     {
 952                       SCTP_DBG
 953                         ("Cannot cleanup half-open connection; not the owning thread");
 954                     }
 955
 956                   sctp_connection_timers_init (new_sctp_conn);
 957
 958                   error0 =
 959                     sctp_handle_init_ack (sctp_hdr, sctp_chunk_hdr,
 960                                           new_sctp_conn, idx, b0,
 961                                           sctp_implied_length);
 962
 963                   sctp_init_mss (new_sctp_conn);
 964
 965                   if (session_stream_connect_notify
 966                       (&new_sctp_conn->sub_conn[idx].connection, 0))
 967                     {
 968                       SCTP_DBG
 969                         ("conn_index = %u: session_stream_connect_notify error; cleaning up connection",
 970                          new_sctp_conn->sub_conn[idx].connection.c_index);
 971                       sctp_connection_cleanup (new_sctp_conn);
 972                       goto drop;
 973                     }
 974                 }
 975               next0 = sctp_next_output (is_ip4);
 976               break;
 977
 978               /* All UNEXPECTED scenarios (wrong chunk received per state-machine)
 979                * are handled by the input-dispatcher function using the table-lookup
 980                * hence we should never get to the "default" case below.
 981                */
 982             default:
 983               error0 = SCTP_ERROR_UNKOWN_CHUNK;
 984               next0 = SCTP_NEXT_DROP;
 985               goto drop;
 986             }
 987
 988           if (error0 != SCTP_ERROR_NONE)
 989             {
 990               clib_warning ("error while parsing chunk");
 991               sctp_connection_cleanup (sctp_conn);
 992               next0 = SCTP_NEXT_DROP;
 993               goto drop;
 994             }
 995
 996         drop:
 997           b0->error = node->errors[error0];
 998           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 999             {
1000               sctp_rx_trace_t *t0 =
1001                 vlib_add_trace (vm, node, b0, sizeof (*t0));
1002               sctp_set_rx_trace_data (t0, sctp_conn, sctp_hdr, b0, is_ip4);
1003             }
1004
1005           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
1006                                            n_left_to_next, bi0, next0);
1007         }
1008
1009       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1010     }
1011   return from_frame->n_vectors;
1012 }
1013
1014 static uword
1015 sctp4_rcv_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1016                  vlib_frame_t * from_frame)
1017 {
1018   return sctp46_rcv_phase_inline (vm, node, from_frame, 1 /* is_ip4 */ );
1019 }
1020
1021 static uword
1022 sctp6_rcv_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1023                  vlib_frame_t * from_frame)
1024 {
1025   return sctp46_rcv_phase_inline (vm, node, from_frame, 0 /* is_ip4 */ );
1026 }
1027
1028 u8 *
1029 format_sctp_rx_trace_short (u8 * s, va_list * args)
1030 {
1031   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
1032   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
1033   sctp_rx_trace_t *t = va_arg (*args, sctp_rx_trace_t *);
1034
1035   s = format (s, "%d -> %d (%U)",
1036               clib_net_to_host_u16 (t->sctp_header.src_port),
1037               clib_net_to_host_u16 (t->sctp_header.dst_port),
1038               format_sctp_state, t->sctp_connection.state);
1039
1040   return s;
1041 }
1042
1043 /* *INDENT-OFF* */
1044 VLIB_REGISTER_NODE (sctp4_rcv_phase_node) =
1045 {
1046   .function = sctp4_rcv_phase,
1047   .name = "sctp4-rcv",
1048   /* Takes a vector of packets. */
1049   .vector_size = sizeof (u32),
1050   .n_errors = SCTP_N_ERROR,
1051   .error_strings = sctp_error_strings,
1052   .n_next_nodes = SCTP_RCV_PHASE_N_NEXT,
1053   .next_nodes =
1054   {
1055 #define _(s,n) [SCTP_RCV_PHASE_NEXT_##s] = n,
1056     foreach_sctp_state_next
1057 #undef _
1058   },
1059   .format_trace = format_sctp_rx_trace_short,
1060 };
1061 /* *INDENT-ON* */
1062
1063 VLIB_NODE_FUNCTION_MULTIARCH (sctp4_rcv_phase_node, sctp4_rcv_phase);
1064
1065 /* *INDENT-OFF* */
1066 VLIB_REGISTER_NODE (sctp6_init_phase_node) =
1067 {
1068   .function = sctp6_rcv_phase,
1069   .name = "sctp6-rcv",
1070   /* Takes a vector of packets. */
1071   .vector_size = sizeof (u32),
1072   .n_errors = SCTP_N_ERROR,
1073   .error_strings = sctp_error_strings,
1074   .n_next_nodes = SCTP_RCV_PHASE_N_NEXT,
1075   .next_nodes =
1076   {
1077 #define _(s,n) [SCTP_RCV_PHASE_NEXT_##s] = n,
1078     foreach_sctp_state_next
1079 #undef _
1080   },
1081   .format_trace = format_sctp_rx_trace_short,
1082 };
1083 /* *INDENT-ON* */
1084
1085 VLIB_NODE_FUNCTION_MULTIARCH (sctp6_init_phase_node, sctp6_rcv_phase);
1086
1087 vlib_node_registration_t sctp4_shutdown_phase_node;
1088 vlib_node_registration_t sctp6_shutdown_phase_node;
1089
1090 always_inline u16
1091 sctp_handle_shutdown (sctp_header_t * sctp_hdr,
1092                       sctp_chunks_common_hdr_t * sctp_chunk_hdr,
1093                       sctp_connection_t * sctp_conn, vlib_buffer_t * b0,
1094                       u16 sctp_implied_length)
1095 {
1096   sctp_shutdown_association_chunk_t *shutdown_chunk =
1097     (sctp_shutdown_association_chunk_t *) (sctp_hdr);
1098
1099   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
1100   if (sctp_conn->local_tag != sctp_hdr->verification_tag)
1101     {
1102       return SCTP_ERROR_INVALID_TAG;
1103     }
1104
1105   /*
1106    * It is not possible to bundle any other CHUNK with the SHUTDOWN chunk
1107    */
1108   if (sctp_is_bundling (sctp_implied_length, &shutdown_chunk->chunk_hdr))
1109     return SCTP_ERROR_BUNDLING_VIOLATION;
1110
1111   switch (sctp_conn->state)
1112     {
1113     case SCTP_STATE_ESTABLISHED:
1114       if (sctp_check_outstanding_data_chunks (sctp_conn) == 0)
1115         sctp_conn->state = SCTP_STATE_SHUTDOWN_RECEIVED;
1116       break;
1117
1118     case SCTP_STATE_SHUTDOWN_SENT:
1119       sctp_send_shutdown_ack (sctp_conn);
1120       break;
1121     }
1122
1123   return SCTP_ERROR_NONE;
1124 }
1125
1126 always_inline u16
1127 sctp_handle_shutdown_ack (sctp_header_t * sctp_hdr,
1128                           sctp_chunks_common_hdr_t * sctp_chunk_hdr,
1129                           sctp_connection_t * sctp_conn, vlib_buffer_t * b0,
1130                           u16 sctp_implied_length)
1131 {
1132   sctp_shutdown_ack_chunk_t *shutdown_ack_chunk =
1133     (sctp_shutdown_ack_chunk_t *) (sctp_hdr);
1134
1135   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
1136   if (sctp_conn->local_tag != sctp_hdr->verification_tag)
1137     {
1138       return SCTP_ERROR_INVALID_TAG;
1139     }
1140
1141   /*
1142    * It is not possible to bundle any other CHUNK with the SHUTDOWN chunk
1143    */
1144   if (sctp_is_bundling (sctp_implied_length, &shutdown_ack_chunk->chunk_hdr))
1145     return SCTP_ERROR_BUNDLING_VIOLATION;
1146
1147   /* Whether we are in SCTP_STATE_SHUTDOWN_SENT or SCTP_STATE_SHUTDOWN_ACK_SENT
1148    * the reception of a SHUTDOWN_ACK chunk leads to the same actions:
1149    * - STOP T2_SHUTDOWN timer
1150    * - SEND SHUTDOWN_COMPLETE chunk
1151    */
1152   sctp_timer_reset (sctp_conn, MAIN_SCTP_SUB_CONN_IDX,
1153                     SCTP_TIMER_T2_SHUTDOWN);
1154   sctp_send_shutdown_complete (sctp_conn);
1155
1156   return SCTP_ERROR_NONE;
1157 }
1158
1159 always_inline u16
1160 sctp_handle_shutdown_complete (sctp_header_t * sctp_hdr,
1161                                sctp_chunks_common_hdr_t * sctp_chunk_hdr,
1162                                sctp_connection_t * sctp_conn,
1163                                vlib_buffer_t * b0, u16 sctp_implied_length)
1164 {
1165   sctp_shutdown_complete_chunk_t *shutdown_complete =
1166     (sctp_shutdown_complete_chunk_t *) (sctp_hdr);
1167
1168   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
1169   if (sctp_conn->local_tag != sctp_hdr->verification_tag)
1170     {
1171       return SCTP_ERROR_INVALID_TAG;
1172     }
1173
1174   /*
1175    * It is not possible to bundle any other CHUNK with the SHUTDOWN chunk
1176    */
1177   if (sctp_is_bundling (sctp_implied_length, &shutdown_complete->chunk_hdr))
1178     return SCTP_ERROR_BUNDLING_VIOLATION;
1179
1180   sctp_timer_reset (sctp_conn, MAIN_SCTP_SUB_CONN_IDX,
1181                     SCTP_TIMER_T2_SHUTDOWN);
1182
1183   sctp_conn->state = SCTP_STATE_CLOSED;
1184
1185   stream_session_disconnect_notify (&sctp_conn->sub_conn
1186                                     [MAIN_SCTP_SUB_CONN_IDX].connection);
1187
1188   return SCTP_ERROR_NONE;
1189 }
1190
1191 always_inline uword
1192 sctp46_shutdown_phase_inline (vlib_main_t * vm,
1193                               vlib_node_runtime_t * node,
1194                               vlib_frame_t * from_frame, int is_ip4)
1195 {
1196   u32 n_left_from, next_index, *from, *to_next;
1197   u32 my_thread_index = vm->thread_index;
1198
1199   from = vlib_frame_vector_args (from_frame);
1200   n_left_from = from_frame->n_vectors;
1201
1202   next_index = node->cached_next_index;
1203
1204   while (n_left_from > 0)
1205     {
1206       u32 n_left_to_next;
1207
1208       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
1209
1210       while (n_left_from > 0 && n_left_to_next > 0)
1211         {
1212           u32 bi0;
1213           vlib_buffer_t *b0;
1214           sctp_rx_trace_t *sctp_trace;
1215           sctp_header_t *sctp_hdr = 0;
1216           sctp_chunks_common_hdr_t *sctp_chunk_hdr = 0;
1217           ip4_header_t *ip4_hdr = 0;
1218           ip6_header_t *ip6_hdr = 0;
1219           sctp_connection_t *sctp_conn;
1220           u16 sctp_implied_length = 0;
1221           u16 error0 = SCTP_ERROR_NONE, next0 = SCTP_RCV_PHASE_N_NEXT;
1222
1223           bi0 = from[0];
1224           to_next[0] = bi0;
1225           from += 1;
1226           to_next += 1;
1227           n_left_from -= 1;
1228           n_left_to_next -= 1;
1229
1230           b0 = vlib_get_buffer (vm, bi0);
1231           sctp_conn =
1232             sctp_connection_get (vnet_buffer (b0)->sctp.connection_index,
1233                                  my_thread_index);
1234
1235           if (PREDICT_FALSE (sctp_conn == 0))
1236             {
1237               SCTP_DBG
1238                 ("sctp_conn == NULL; return SCTP_ERROR_INVALID_CONNECTION");
1239               error0 = SCTP_ERROR_INVALID_CONNECTION;
1240               goto drop;
1241             }
1242
1243           if (is_ip4)
1244             {
1245               ip4_hdr = vlib_buffer_get_current (b0);
1246               sctp_hdr = ip4_next_header (ip4_hdr);
1247             }
1248           else
1249             {
1250               ip6_hdr = vlib_buffer_get_current (b0);
1251               sctp_hdr = ip6_next_header (ip6_hdr);
1252             }
1253
1254           sctp_full_hdr_t *full_hdr = (sctp_full_hdr_t *) sctp_hdr;
1255           sctp_chunk_hdr = &full_hdr->common_hdr;
1256
1257           sctp_implied_length =
1258             sctp_calculate_implied_length (ip4_hdr, ip6_hdr, is_ip4);
1259
1260           switch (vnet_sctp_get_chunk_type (sctp_chunk_hdr))
1261             {
1262             case SHUTDOWN:
1263               error0 =
1264                 sctp_handle_shutdown (sctp_hdr, sctp_chunk_hdr, sctp_conn, b0,
1265                                       sctp_implied_length);
1266               next0 = sctp_next_output (is_ip4);
1267               break;
1268
1269             case SHUTDOWN_ACK:
1270               error0 =
1271                 sctp_handle_shutdown_ack (sctp_hdr, sctp_chunk_hdr, sctp_conn,
1272                                           b0, sctp_implied_length);
1273               next0 = sctp_next_output (is_ip4);
1274               break;
1275
1276             case SHUTDOWN_COMPLETE:
1277               error0 =
1278                 sctp_handle_shutdown_complete (sctp_hdr, sctp_chunk_hdr,
1279                                                sctp_conn, b0,
1280                                                sctp_implied_length);
1281
1282               sctp_connection_cleanup (sctp_conn);
1283               next0 = sctp_next_output (is_ip4);
1284               break;
1285
1286               /*
1287                * DATA chunks can still be transmitted/received in the SHUTDOWN-PENDING
1288                * and SHUTDOWN-SENT states (as per RFC4960 Section 6)
1289                */
1290             case DATA:
1291               error0 =
1292                 sctp_handle_data ((sctp_payload_data_chunk_t *) sctp_hdr,
1293                                   sctp_conn, b0, &next0);
1294               next0 = sctp_next_output (is_ip4);
1295               break;
1296
1297               /* All UNEXPECTED scenarios (wrong chunk received per state-machine)
1298                * are handled by the input-dispatcher function using the table-lookup
1299                * hence we should never get to the "default" case below.
1300                */
1301             default:
1302               error0 = SCTP_ERROR_UNKOWN_CHUNK;
1303               next0 = SCTP_NEXT_DROP;
1304               goto drop;
1305             }
1306
1307           if (error0 != SCTP_ERROR_NONE)
1308             {
1309               clib_warning ("error while parsing chunk");
1310               sctp_connection_cleanup (sctp_conn);
1311               next0 = SCTP_NEXT_DROP;
1312               goto drop;
1313             }
1314
1315         drop:
1316           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
1317             {
1318               sctp_trace =
1319                 vlib_add_trace (vm, node, b0, sizeof (*sctp_trace));
1320
1321               if (sctp_hdr != NULL)
1322                 clib_memcpy (&sctp_trace->sctp_header, sctp_hdr,
1323                              sizeof (sctp_trace->sctp_header));
1324
1325               if (sctp_conn != NULL)
1326                 clib_memcpy (&sctp_trace->sctp_connection, sctp_conn,
1327                              sizeof (sctp_trace->sctp_connection));
1328             }
1329
1330           b0->error = node->errors[error0];
1331
1332           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
1333                                            n_left_to_next, bi0, next0);
1334         }
1335
1336       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1337     }
1338
1339   return from_frame->n_vectors;
1340
1341 }
1342
1343 static uword
1344 sctp4_shutdown_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1345                       vlib_frame_t * from_frame)
1346 {
1347   return sctp46_shutdown_phase_inline (vm, node, from_frame, 1 /* is_ip4 */ );
1348 }
1349
1350 static uword
1351 sctp6_shutdown_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1352                       vlib_frame_t * from_frame)
1353 {
1354   return sctp46_shutdown_phase_inline (vm, node, from_frame, 1 /* is_ip4 */ );
1355 }
1356
1357 /* *INDENT-OFF* */
1358 VLIB_REGISTER_NODE (sctp4_shutdown_phase_node) =
1359 {
1360   .function = sctp4_shutdown_phase,
1361   .name = "sctp4-shutdown",
1362   /* Takes a vector of packets. */
1363   .vector_size = sizeof (u32),
1364   .n_errors = SCTP_N_ERROR,
1365   .error_strings = sctp_error_strings,
1366   .n_next_nodes = SCTP_SHUTDOWN_PHASE_N_NEXT,
1367   .next_nodes =
1368   {
1369 #define _(s,n) [SCTP_SHUTDOWN_PHASE_NEXT_##s] = n,
1370     foreach_sctp_state_next
1371 #undef _
1372   },
1373   .format_trace = format_sctp_rx_trace_short,
1374 };
1375 /* *INDENT-ON* */
1376
1377 VLIB_NODE_FUNCTION_MULTIARCH (sctp4_shutdown_phase_node,
1378                               sctp4_shutdown_phase);
1379
1380 /* *INDENT-OFF* */
1381 VLIB_REGISTER_NODE (sctp6_shutdown_phase_node) =
1382 {
1383   .function = sctp6_shutdown_phase,
1384   .name = "sctp6-shutdown",
1385   /* Takes a vector of packets. */
1386   .vector_size = sizeof (u32),
1387   .n_errors = SCTP_N_ERROR,
1388   .error_strings = sctp_error_strings,
1389   .n_next_nodes = SCTP_SHUTDOWN_PHASE_N_NEXT,
1390   .next_nodes =
1391   {
1392 #define _(s,n) [SCTP_SHUTDOWN_PHASE_NEXT_##s] = n,
1393     foreach_sctp_state_next
1394 #undef _
1395   },
1396   .format_trace = format_sctp_rx_trace_short,
1397 };
1398 /* *INDENT-ON* */
1399
1400 VLIB_NODE_FUNCTION_MULTIARCH (sctp6_shutdown_phase_node,
1401                               sctp6_shutdown_phase);
1402
1403 vlib_node_registration_t sctp4_listen_phase_node;
1404 vlib_node_registration_t sctp6_listen_phase_node;
1405
1406 vlib_node_registration_t sctp4_established_phase_node;
1407 vlib_node_registration_t sctp6_established_phase_node;
1408
1409 always_inline u16
1410 sctp_handle_sack (sctp_selective_ack_chunk_t * sack_chunk,
1411                   sctp_connection_t * sctp_conn, u8 idx, vlib_buffer_t * b0,
1412                   u16 * next0)
1413 {
1414   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
1415   if (sctp_conn->local_tag != sack_chunk->sctp_hdr.verification_tag)
1416     {
1417       return SCTP_ERROR_INVALID_TAG;
1418     }
1419
1420   sctp_calculate_rto (sctp_conn, idx);
1421
1422   sctp_timer_update (sctp_conn, idx, SCTP_TIMER_T3_RXTX,
1423                      sctp_conn->sub_conn[idx].RTO);
1424
1425   sctp_conn->sub_conn[idx].RTO_pending = 0;
1426
1427   *next0 = sctp_next_output (sctp_conn->sub_conn[idx].connection.is_ip4);
1428
1429   return SCTP_ERROR_NONE;
1430 }
1431
1432 always_inline u16
1433 sctp_handle_heartbeat (sctp_hb_req_chunk_t * sctp_hb_chunk,
1434                        sctp_connection_t * sctp_conn, u8 idx,
1435                        vlib_buffer_t * b0, u16 * next0)
1436 {
1437   /* Check that the LOCALLY generated tag is being used by the REMOTE peer as the verification tag */
1438   if (sctp_conn->local_tag != sctp_hb_chunk->sctp_hdr.verification_tag)
1439     {
1440       return SCTP_ERROR_INVALID_TAG;
1441     }
1442
1443   sctp_prepare_heartbeat_ack_chunk (sctp_conn, b0);
1444
1445   *next0 = sctp_next_output (sctp_conn->sub_conn[idx].connection.is_ip4);
1446
1447   return SCTP_ERROR_NONE;
1448 }
1449
1450 always_inline u16
1451 sctp_handle_heartbeat_ack (sctp_hb_ack_chunk_t * sctp_hb_ack_chunk,
1452                            sctp_connection_t * sctp_conn, u8 idx,
1453                            vlib_buffer_t * b0, u16 * next0)
1454 {
1455   sctp_conn->sub_conn[idx].unacknowledged_hb -= 1;
1456
1457   sctp_timer_update (sctp_conn, idx, SCTP_TIMER_T4_HEARTBEAT,
1458                      sctp_conn->sub_conn[idx].RTO);
1459
1460   *next0 = sctp_next_output (sctp_conn->sub_conn[idx].connection.is_ip4);
1461
1462   return SCTP_ERROR_NONE;
1463 }
1464
1465 always_inline void
1466 sctp_node_inc_counter (vlib_main_t * vm, u32 tcp4_node, u32 tcp6_node,
1467                        u8 is_ip4, u8 evt, u8 val)
1468 {
1469   if (PREDICT_TRUE (!val))
1470     return;
1471
1472   if (is_ip4)
1473     vlib_node_increment_counter (vm, tcp4_node, evt, val);
1474   else
1475     vlib_node_increment_counter (vm, tcp6_node, evt, val);
1476 }
1477
1478 always_inline uword
1479 sctp46_listen_process_inline (vlib_main_t * vm,
1480                               vlib_node_runtime_t * node,
1481                               vlib_frame_t * from_frame, int is_ip4)
1482 {
1483   u32 n_left_from, next_index, *from, *to_next;
1484   u32 my_thread_index = vm->thread_index;
1485
1486   from = vlib_frame_vector_args (from_frame);
1487   n_left_from = from_frame->n_vectors;
1488
1489   next_index = node->cached_next_index;
1490
1491   while (n_left_from > 0)
1492     {
1493       u32 n_left_to_next;
1494
1495       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
1496
1497       while (n_left_from > 0 && n_left_to_next > 0)
1498         {
1499           u32 bi0;
1500           vlib_buffer_t *b0;
1501           sctp_header_t *sctp_hdr = 0;
1502           ip4_header_t *ip4_hdr;
1503           ip6_header_t *ip6_hdr;
1504           sctp_connection_t *child_conn;
1505           sctp_connection_t *sctp_listener;
1506           u16 next0 = SCTP_LISTEN_PHASE_N_NEXT, error0 = SCTP_ERROR_ENQUEUED;
1507
1508           bi0 = from[0];
1509           to_next[0] = bi0;
1510           from += 1;
1511           to_next += 1;
1512           n_left_from -= 1;
1513           n_left_to_next -= 1;
1514
1515           b0 = vlib_get_buffer (vm, bi0);
1516           sctp_listener =
1517             sctp_listener_get (vnet_buffer (b0)->sctp.connection_index);
1518
1519           if (is_ip4)
1520             {
1521               ip4_hdr = vlib_buffer_get_current (b0);
1522               sctp_hdr = ip4_next_header (ip4_hdr);
1523             }
1524           else
1525             {
1526               ip6_hdr = vlib_buffer_get_current (b0);
1527               sctp_hdr = ip6_next_header (ip6_hdr);
1528             }
1529
1530           child_conn =
1531             sctp_lookup_connection (sctp_listener->sub_conn
1532                                     [MAIN_SCTP_SUB_CONN_IDX].c_fib_index, b0,
1533                                     my_thread_index, is_ip4);
1534
1535           if (PREDICT_FALSE (child_conn->state != SCTP_STATE_CLOSED))
1536             {
1537               SCTP_DBG
1538                 ("conn_index = %u: child_conn->state != SCTP_STATE_CLOSED.... STATE=%s",
1539                  child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].
1540                  connection.c_index,
1541                  sctp_state_to_string (child_conn->state));
1542               error0 = SCTP_ERROR_CREATE_EXISTS;
1543               goto drop;
1544             }
1545
1546           /* Create child session and send SYN-ACK */
1547           child_conn = sctp_connection_new (my_thread_index);
1548           child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].parent = child_conn;
1549           child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_lcl_port =
1550             sctp_hdr->dst_port;
1551           child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_rmt_port =
1552             sctp_hdr->src_port;
1553           child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_is_ip4 = is_ip4;
1554           child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].connection.proto =
1555             sctp_listener->sub_conn[MAIN_SCTP_SUB_CONN_IDX].connection.proto;
1556           child_conn->state = SCTP_STATE_CLOSED;
1557
1558           if (is_ip4)
1559             {
1560               child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_lcl_ip4.as_u32 =
1561                 ip4_hdr->dst_address.as_u32;
1562               child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_rmt_ip4.as_u32 =
1563                 ip4_hdr->src_address.as_u32;
1564             }
1565           else
1566             {
1567               clib_memcpy (&child_conn->
1568                            sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_lcl_ip6,
1569                            &ip6_hdr->dst_address, sizeof (ip6_address_t));
1570               clib_memcpy (&child_conn->
1571                            sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_rmt_ip6,
1572                            &ip6_hdr->src_address, sizeof (ip6_address_t));
1573             }
1574
1575           sctp_full_hdr_t *full_hdr = (sctp_full_hdr_t *) sctp_hdr;
1576           sctp_chunks_common_hdr_t *sctp_chunk_hdr = &full_hdr->common_hdr;
1577
1578           u8 chunk_type = vnet_sctp_get_chunk_type (sctp_chunk_hdr);
1579           if (chunk_type != INIT)
1580             {
1581               SCTP_DBG
1582                 ("conn_index = %u: chunk_type != INIT... chunk_type=%s",
1583                  child_conn->sub_conn[MAIN_SCTP_SUB_CONN_IDX].
1584                  connection.c_index, sctp_chunk_to_string (chunk_type));
1585
1586               error0 = SCTP_ERROR_UNKOWN_CHUNK;
1587               next0 = SCTP_NEXT_DROP;
1588               goto drop;
1589             }
1590
1591           u16 sctp_implied_length =
1592             sctp_calculate_implied_length (ip4_hdr, ip6_hdr, is_ip4);
1593
1594           switch (chunk_type)
1595             {
1596             case INIT:
1597               sctp_connection_timers_init (child_conn);
1598
1599               sctp_init_snd_vars (child_conn);
1600
1601               error0 =
1602                 sctp_handle_init (sctp_hdr, sctp_chunk_hdr, child_conn, b0,
1603                                   sctp_implied_length);
1604
1605               sctp_init_mss (child_conn);
1606
1607               if (error0 == SCTP_ERROR_NONE)
1608                 {
1609                   if (stream_session_accept
1610                       (&child_conn->
1611                        sub_conn[MAIN_SCTP_SUB_CONN_IDX].connection,
1612                        sctp_listener->
1613                        sub_conn[MAIN_SCTP_SUB_CONN_IDX].c_s_index, 0))
1614                     {
1615                       clib_warning ("session accept fail");
1616                       sctp_connection_cleanup (child_conn);
1617                       error0 = SCTP_ERROR_CREATE_SESSION_FAIL;
1618                       goto drop;
1619                     }
1620                 }
1621               next0 = sctp_next_output (is_ip4);
1622               break;
1623
1624               /* Reception of a DATA chunk whilst in the CLOSED state is called
1625                * "Out of the Blue" packet and handling of the chunk needs special treatment
1626                * as per RFC4960 section 8.4
1627                */
1628             case DATA:
1629               break;
1630             }
1631
1632         drop:
1633           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
1634             {
1635               sctp_rx_trace_t *t0 =
1636                 vlib_add_trace (vm, node, b0, sizeof (*t0));
1637               clib_memcpy (&t0->sctp_header, sctp_hdr,
1638                            sizeof (t0->sctp_header));
1639               clib_memcpy (&t0->sctp_connection, sctp_listener,
1640                            sizeof (t0->sctp_connection));
1641             }
1642
1643           b0->error = node->errors[error0];
1644
1645           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
1646                                            n_left_to_next, bi0, next0);
1647         }
1648       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1649
1650     }
1651   return from_frame->n_vectors;
1652 }
1653
1654 static uword
1655 sctp4_listen_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1656                     vlib_frame_t * from_frame)
1657 {
1658   return sctp46_listen_process_inline (vm, node, from_frame, 1 /* is_ip4 */ );
1659 }
1660
1661 static uword
1662 sctp6_listen_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1663                     vlib_frame_t * from_frame)
1664 {
1665   return sctp46_listen_process_inline (vm, node, from_frame, 0 /* is_ip4 */ );
1666 }
1667
1668 always_inline uword
1669 sctp46_established_phase_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
1670                                  vlib_frame_t * from_frame, int is_ip4)
1671 {
1672   u32 n_left_from, next_index, *from, *to_next;
1673   u32 my_thread_index = vm->thread_index, errors = 0;
1674
1675   from = vlib_frame_vector_args (from_frame);
1676   n_left_from = from_frame->n_vectors;
1677
1678   next_index = node->cached_next_index;
1679
1680   while (n_left_from > 0)
1681     {
1682       u32 n_left_to_next;
1683
1684       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
1685
1686       while (n_left_from > 0 && n_left_to_next > 0)
1687         {
1688           u32 bi0;
1689           vlib_buffer_t *b0;
1690           sctp_header_t *sctp_hdr = 0;
1691           sctp_chunks_common_hdr_t *sctp_chunk_hdr = 0;
1692           ip4_header_t *ip4_hdr = 0;
1693           ip6_header_t *ip6_hdr = 0;
1694           sctp_connection_t *sctp_conn;
1695           u16 error0 = SCTP_ERROR_NONE, next0 = SCTP_ESTABLISHED_PHASE_N_NEXT;
1696           u8 idx;
1697
1698           bi0 = from[0];
1699           to_next[0] = bi0;
1700           from += 1;
1701           to_next += 1;
1702           n_left_from -= 1;
1703           n_left_to_next -= 1;
1704
1705           b0 = vlib_get_buffer (vm, bi0);
1706           sctp_conn =
1707             sctp_connection_get (vnet_buffer (b0)->sctp.connection_index,
1708                                  my_thread_index);
1709
1710           if (PREDICT_FALSE (sctp_conn == 0))
1711             {
1712               SCTP_DBG
1713                 ("sctp_conn == NULL; return SCTP_ERROR_INVALID_CONNECTION");
1714               error0 = SCTP_ERROR_INVALID_CONNECTION;
1715               goto done;
1716             }
1717           if (is_ip4)
1718             {
1719               ip4_hdr = vlib_buffer_get_current (b0);
1720               sctp_hdr = ip4_next_header (ip4_hdr);
1721             }
1722           else
1723             {
1724               ip6_hdr = vlib_buffer_get_current (b0);
1725               sctp_hdr = ip6_next_header (ip6_hdr);
1726             }
1727
1728           idx = sctp_pick_conn_idx_on_state (sctp_conn->state);
1729
1730           sctp_full_hdr_t *full_hdr = (sctp_full_hdr_t *) sctp_hdr;
1731
1732           transport_connection_t *trans_conn =
1733             &sctp_conn->sub_conn[idx].connection;
1734
1735           trans_conn->lcl_port = sctp_hdr->dst_port;
1736           trans_conn->rmt_port = sctp_hdr->src_port;
1737           trans_conn->is_ip4 = is_ip4;
1738
1739           sctp_conn->sub_conn[idx].parent = sctp_conn;
1740
1741           if (is_ip4)
1742             {
1743               trans_conn->lcl_ip.ip4.as_u32 = ip4_hdr->dst_address.as_u32;
1744               trans_conn->rmt_ip.ip4.as_u32 = ip4_hdr->src_address.as_u32;
1745             }
1746           else
1747             {
1748               clib_memcpy (&trans_conn->lcl_ip.ip6, &ip6_hdr->dst_address,
1749                            sizeof (ip6_address_t));
1750               clib_memcpy (&trans_conn->rmt_ip.ip6, &ip6_hdr->src_address,
1751                            sizeof (ip6_address_t));
1752             }
1753
1754           sctp_chunk_hdr =
1755             (sctp_chunks_common_hdr_t *) (&full_hdr->common_hdr);
1756
1757           u8 chunk_type = vnet_sctp_get_chunk_type (&full_hdr->common_hdr);
1758
1759           switch (chunk_type)
1760             {
1761             case COOKIE_ECHO:
1762               error0 =
1763                 sctp_handle_cookie_echo (sctp_hdr, sctp_chunk_hdr, sctp_conn,
1764                                          b0);
1765               next0 = sctp_next_output (is_ip4);
1766               break;
1767
1768             case COOKIE_ACK:
1769               error0 =
1770                 sctp_handle_cookie_ack (sctp_hdr, sctp_chunk_hdr, sctp_conn,
1771                                         b0);
1772               next0 = sctp_next_output (is_ip4);
1773               break;
1774
1775             case SACK:
1776               error0 =
1777                 sctp_handle_sack ((sctp_selective_ack_chunk_t *) sctp_hdr,
1778                                   sctp_conn, idx, b0, &next0);
1779               break;
1780
1781             case HEARTBEAT:
1782               error0 =
1783                 sctp_handle_heartbeat ((sctp_hb_req_chunk_t *) sctp_hdr,
1784                                        sctp_conn, idx, b0, &next0);
1785               break;
1786
1787             case HEARTBEAT_ACK:
1788               error0 =
1789                 sctp_handle_heartbeat_ack ((sctp_hb_ack_chunk_t *) sctp_hdr,
1790                                            sctp_conn, idx, b0, &next0);
1791               break;
1792
1793             case DATA:
1794               error0 =
1795                 sctp_handle_data ((sctp_payload_data_chunk_t *) sctp_hdr,
1796                                   sctp_conn, b0, &next0);
1797               break;
1798
1799               /* All UNEXPECTED scenarios (wrong chunk received per state-machine)
1800                * are handled by the input-dispatcher function using the table-lookup
1801                * hence we should never get to the "default" case below.
1802                */
1803             default:
1804               error0 = SCTP_ERROR_UNKOWN_CHUNK;
1805               next0 = SCTP_NEXT_DROP;
1806               goto done;
1807             }
1808
1809         done:
1810           b0->error = node->errors[error0];
1811           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
1812             {
1813               sctp_rx_trace_t *t0 =
1814                 vlib_add_trace (vm, node, b0, sizeof (*t0));
1815               sctp_set_rx_trace_data (t0, sctp_conn, sctp_hdr, b0, is_ip4);
1816             }
1817
1818           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
1819                                            n_left_to_next, bi0, next0);
1820         }
1821
1822       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1823     }
1824
1825   errors = session_manager_flush_enqueue_events (TRANSPORT_PROTO_SCTP,
1826                                                  my_thread_index);
1827
1828   sctp_node_inc_counter (vm, is_ip4, sctp4_established_phase_node.index,
1829                          sctp6_established_phase_node.index,
1830                          SCTP_ERROR_EVENT_FIFO_FULL, errors);
1831   sctp_flush_frame_to_output (vm, my_thread_index, is_ip4);
1832
1833   return from_frame->n_vectors;
1834 }
1835
1836 static uword
1837 sctp4_established_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1838                          vlib_frame_t * from_frame)
1839 {
1840   return sctp46_established_phase_inline (vm, node, from_frame,
1841                                           1 /* is_ip4 */ );
1842 }
1843
1844 static uword
1845 sctp6_established_phase (vlib_main_t * vm, vlib_node_runtime_t * node,
1846                          vlib_frame_t * from_frame)
1847 {
1848   return sctp46_established_phase_inline (vm, node, from_frame,
1849                                           0 /* is_ip4 */ );
1850 }
1851
1852 u8 *
1853 format_sctp_rx_trace (u8 * s, va_list * args)
1854 {
1855   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
1856   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
1857   sctp_rx_trace_t *t = va_arg (*args, sctp_rx_trace_t *);
1858   u32 indent = format_get_indent (s);
1859
1860   s = format (s, "%U\n%U%U",
1861               format_sctp_header, &t->sctp_header, 128,
1862               format_white_space, indent,
1863               format_sctp_connection, &t->sctp_connection, 1);
1864
1865   return s;
1866 }
1867
1868 /* *INDENT-OFF* */
1869 VLIB_REGISTER_NODE (sctp4_listen_phase_node) =
1870 {
1871   .function = sctp4_listen_phase,
1872   .name = "sctp4-listen",
1873   /* Takes a vector of packets. */
1874   .vector_size = sizeof (u32),
1875   .n_errors = SCTP_N_ERROR,
1876   .error_strings = sctp_error_strings,
1877   .n_next_nodes = SCTP_LISTEN_PHASE_N_NEXT,
1878   .next_nodes =
1879   {
1880 #define _(s,n) [SCTP_LISTEN_PHASE_NEXT_##s] = n,
1881     foreach_sctp_state_next
1882 #undef _
1883   },
1884   .format_trace = format_sctp_rx_trace_short,
1885 };
1886 /* *INDENT-ON* */
1887
1888 VLIB_NODE_FUNCTION_MULTIARCH (sctp4_listen_phase_node, sctp4_listen_phase);
1889
1890 /* *INDENT-OFF* */
1891 VLIB_REGISTER_NODE (sctp6_listen_phase_node) =
1892 {
1893   .function = sctp6_listen_phase,
1894   .name = "sctp6-listen",
1895   /* Takes a vector of packets. */
1896   .vector_size = sizeof (u32),
1897   .n_errors = SCTP_N_ERROR,
1898   .error_strings = sctp_error_strings,
1899   .n_next_nodes = SCTP_LISTEN_PHASE_N_NEXT,
1900   .next_nodes =
1901   {
1902 #define _(s,n) [SCTP_LISTEN_PHASE_NEXT_##s] = n,
1903     foreach_sctp_state_next
1904 #undef _
1905   },
1906   .format_trace = format_sctp_rx_trace_short,
1907 };
1908 /* *INDENT-ON* */
1909
1910 VLIB_NODE_FUNCTION_MULTIARCH (sctp6_listen_phase_node, sctp6_listen_phase);
1911
1912 /* *INDENT-OFF* */
1913 VLIB_REGISTER_NODE (sctp4_established_phase_node) =
1914 {
1915   .function = sctp4_established_phase,
1916   .name = "sctp4-established",
1917   /* Takes a vector of packets. */
1918   .vector_size = sizeof (u32),
1919   .n_errors = SCTP_N_ERROR,
1920   .error_strings = sctp_error_strings,
1921   .n_next_nodes = SCTP_ESTABLISHED_PHASE_N_NEXT,
1922   .next_nodes =
1923   {
1924 #define _(s,n) [SCTP_ESTABLISHED_PHASE_NEXT_##s] = n,
1925     foreach_sctp_state_next
1926 #undef _
1927   },
1928   .format_trace = format_sctp_rx_trace_short,
1929 };
1930 /* *INDENT-ON* */
1931
1932 VLIB_NODE_FUNCTION_MULTIARCH (sctp4_established_phase_node,
1933                               sctp4_established_phase);
1934
1935 /* *INDENT-OFF* */
1936 VLIB_REGISTER_NODE (sctp6_established_phase_node) =
1937 {
1938   .function = sctp6_established_phase,
1939   .name = "sctp6-established",
1940   /* Takes a vector of packets. */
1941   .vector_size = sizeof (u32),
1942   .n_errors = SCTP_N_ERROR,
1943   .error_strings = sctp_error_strings,
1944   .n_next_nodes = SCTP_LISTEN_PHASE_N_NEXT,
1945   .next_nodes =
1946   {
1947 #define _(s,n) [SCTP_LISTEN_PHASE_NEXT_##s] = n,
1948     foreach_sctp_state_next
1949 #undef _
1950   },
1951   .format_trace = format_sctp_rx_trace_short,
1952 };
1953 /* *INDENT-ON* */
1954
1955 VLIB_NODE_FUNCTION_MULTIARCH (sctp6_established_phase_node,
1956                               sctp6_established_phase);
1957
1958 /*
1959  * This is the function executed first for the SCTP graph.
1960  * It takes care of doing the initial message parsing and
1961  * dispatch to the specialized function.
1962  */
1963 always_inline uword
1964 sctp46_input_dispatcher (vlib_main_t * vm, vlib_node_runtime_t * node,
1965                          vlib_frame_t * from_frame, int is_ip4)
1966 {
1967   u32 n_left_from, next_index, *from, *to_next;
1968   u32 my_thread_index = vm->thread_index;
1969   u8 is_filtered;
1970   sctp_main_t *tm = vnet_get_sctp_main ();
1971
1972   from = vlib_frame_vector_args (from_frame);
1973   n_left_from = from_frame->n_vectors;
1974   next_index = node->cached_next_index;
1975   sctp_set_time_now (my_thread_index);
1976
1977   while (n_left_from > 0)
1978     {
1979       u32 n_left_to_next;
1980
1981       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
1982
1983       while (n_left_from > 0 && n_left_to_next > 0)
1984         {
1985           int n_advance_bytes0, n_data_bytes0;
1986           u32 bi0, fib_index0;
1987           vlib_buffer_t *b0;
1988           sctp_header_t *sctp_hdr = 0;
1989           sctp_chunks_common_hdr_t *sctp_chunk_hdr = 0;
1990           sctp_connection_t *sctp_conn;
1991           transport_connection_t *trans_conn;
1992           ip4_header_t *ip4_hdr;
1993           ip6_header_t *ip6_hdr;
1994           u32 error0 = SCTP_ERROR_NO_LISTENER, next0 = SCTP_INPUT_NEXT_DROP;
1995
1996           bi0 = from[0];
1997           to_next[0] = bi0;
1998           from += 1;
1999           to_next += 1;
2000           n_left_from -= 1;
2001           n_left_to_next -= 1;
2002
2003           b0 = vlib_get_buffer (vm, bi0);
2004           vnet_buffer (b0)->tcp.flags = 0;
2005           fib_index0 = vnet_buffer (b0)->ip.fib_index;
2006
2007           /* Checksum computed by ipx_local no need to compute again */
2008
2009           if (is_ip4)
2010             {
2011               ip4_hdr = vlib_buffer_get_current (b0);
2012               sctp_hdr = ip4_next_header (ip4_hdr);
2013
2014               sctp_full_hdr_t *full_hdr = (sctp_full_hdr_t *) sctp_hdr;
2015               sctp_chunk_hdr = &full_hdr->common_hdr;
2016
2017               n_advance_bytes0 =
2018                 (ip4_header_bytes (ip4_hdr) +
2019                  sizeof (sctp_payload_data_chunk_t));
2020               n_data_bytes0 =
2021                 clib_net_to_host_u16 (ip4_hdr->length) - n_advance_bytes0;
2022
2023               trans_conn = session_lookup_connection_wt4 (fib_index0,
2024                                                           &ip4_hdr->dst_address,
2025                                                           &ip4_hdr->src_address,
2026                                                           sctp_hdr->dst_port,
2027                                                           sctp_hdr->src_port,
2028                                                           TRANSPORT_PROTO_SCTP,
2029                                                           my_thread_index,
2030                                                           &is_filtered);
2031             }
2032           else
2033             {
2034               ip6_hdr = vlib_buffer_get_current (b0);
2035               sctp_hdr = ip6_next_header (ip6_hdr);
2036
2037               sctp_full_hdr_t *full_hdr = (sctp_full_hdr_t *) sctp_hdr;
2038               sctp_chunk_hdr = &full_hdr->common_hdr;
2039
2040               n_advance_bytes0 = sctp_header_bytes ();
2041               n_data_bytes0 =
2042                 clib_net_to_host_u16 (ip6_hdr->payload_length) -
2043                 n_advance_bytes0;
2044               n_advance_bytes0 += sizeof (ip6_hdr[0]);
2045
2046               trans_conn = session_lookup_connection_wt6 (fib_index0,
2047                                                           &ip6_hdr->dst_address,
2048                                                           &ip6_hdr->src_address,
2049                                                           sctp_hdr->dst_port,
2050                                                           sctp_hdr->src_port,
2051                                                           TRANSPORT_PROTO_SCTP,
2052                                                           my_thread_index,
2053                                                           &is_filtered);
2054             }
2055
2056           /* Length check */
2057           if (PREDICT_FALSE (n_advance_bytes0 < 0))
2058             {
2059               error0 = SCTP_ERROR_LENGTH;
2060               goto done;
2061             }
2062
2063           sctp_conn = sctp_get_connection_from_transport (trans_conn);
2064           vnet_sctp_common_hdr_params_net_to_host (sctp_chunk_hdr);
2065
2066           u8 type = vnet_sctp_get_chunk_type (sctp_chunk_hdr);
2067
2068 #if SCTP_DEBUG_STATE_MACHINE
2069           u8 idx = sctp_pick_conn_idx_on_state (sctp_conn->state);
2070 #endif
2071           vnet_buffer (b0)->sctp.hdr_offset =
2072             (u8 *) sctp_hdr - (u8 *) vlib_buffer_get_current (b0);
2073
2074           /* Session exists */
2075           if (PREDICT_TRUE (0 != sctp_conn))
2076             {
2077               /* Save connection index */
2078               vnet_buffer (b0)->sctp.connection_index = trans_conn->c_index;
2079               vnet_buffer (b0)->sctp.data_offset = n_advance_bytes0;
2080               vnet_buffer (b0)->sctp.data_len = n_data_bytes0;
2081
2082               next0 = tm->dispatch_table[sctp_conn->state][type].next;
2083               error0 = tm->dispatch_table[sctp_conn->state][type].error;
2084
2085               SCTP_DBG_STATE_MACHINE ("CONNECTION_INDEX = %u: "
2086                                       "CURRENT_CONNECTION_STATE = %s,"
2087                                       "CHUNK_TYPE_RECEIVED = %s "
2088                                       "NEXT_PHASE = %s",
2089                                       sctp_conn->sub_conn
2090                                       [idx].connection.c_index,
2091                                       sctp_state_to_string (sctp_conn->state),
2092                                       sctp_chunk_to_string (type),
2093                                       phase_to_string (next0));
2094
2095               if (type == DATA)
2096                 SCTP_ADV_DBG ("n_advance_bytes0 = %u, n_data_bytes0 = %u",
2097                               n_advance_bytes0, n_data_bytes0);
2098
2099             }
2100           else
2101             {
2102               if (is_filtered)
2103                 {
2104                   next0 = SCTP_INPUT_NEXT_DROP;
2105                   error0 = SCTP_ERROR_FILTERED;
2106                 }
2107               else if ((is_ip4 && tm->punt_unknown4) ||
2108                        (!is_ip4 && tm->punt_unknown6))
2109                 {
2110                   next0 = SCTP_INPUT_NEXT_PUNT_PHASE;
2111                   error0 = SCTP_ERROR_PUNT;
2112                 }
2113               else
2114                 {
2115                   next0 = SCTP_INPUT_NEXT_DROP;
2116                   error0 = SCTP_ERROR_NO_LISTENER;
2117                 }
2118               SCTP_DBG_STATE_MACHINE ("sctp_conn == NULL, NEXT_PHASE = %s",
2119                                       phase_to_string (next0));
2120               sctp_conn = 0;
2121             }
2122
2123         done:
2124           b0->error = error0 ? node->errors[error0] : 0;
2125
2126           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
2127             {
2128               sctp_rx_trace_t *t0 =
2129                 vlib_add_trace (vm, node, b0, sizeof (*t0));
2130               sctp_set_rx_trace_data (t0, sctp_conn, sctp_hdr, b0, is_ip4);
2131             }
2132           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
2133                                            n_left_to_next, bi0, next0);
2134         }
2135
2136       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
2137     }
2138   return from_frame->n_vectors;
2139 }
2140
2141 static uword
2142 sctp4_input_dispatcher (vlib_main_t * vm, vlib_node_runtime_t * node,
2143                         vlib_frame_t * from_frame)
2144 {
2145   return sctp46_input_dispatcher (vm, node, from_frame, 1 /* is_ip4 */ );
2146 }
2147
2148 static uword
2149 sctp6_input_dispatcher (vlib_main_t * vm, vlib_node_runtime_t * node,
2150                         vlib_frame_t * from_frame)
2151 {
2152   return sctp46_input_dispatcher (vm, node, from_frame, 0 /* is_ip4 */ );
2153 }
2154
2155 /* *INDENT-OFF* */
2156 VLIB_REGISTER_NODE (sctp4_input_node) =
2157 {
2158   .function = sctp4_input_dispatcher,
2159   .name = "sctp4-input",
2160   /* Takes a vector of packets. */
2161   .vector_size = sizeof (u32),
2162   .n_errors = SCTP_N_ERROR,
2163   .error_strings = sctp_error_strings,
2164   .n_next_nodes = SCTP_INPUT_N_NEXT,
2165   .next_nodes =
2166   {
2167 #define _(s,n) [SCTP_INPUT_NEXT_##s] = n,
2168     foreach_sctp4_input_next
2169 #undef _
2170   },
2171   .format_buffer = format_sctp_header,
2172   .format_trace = format_sctp_rx_trace,
2173 };
2174 /* *INDENT-ON* */
2175
2176 VLIB_NODE_FUNCTION_MULTIARCH (sctp4_input_node, sctp4_input_dispatcher);
2177
2178 /* *INDENT-OFF* */
2179 VLIB_REGISTER_NODE (sctp6_input_node) =
2180 {
2181   .function = sctp6_input_dispatcher,
2182   .name = "sctp6-input",
2183   /* Takes a vector of packets. */
2184   .vector_size = sizeof (u32),
2185   .n_errors = SCTP_N_ERROR,
2186   .error_strings = sctp_error_strings,
2187   .n_next_nodes = SCTP_INPUT_N_NEXT,
2188   .next_nodes =
2189   {
2190 #define _(s,n) [SCTP_INPUT_NEXT_##s] = n,
2191     foreach_sctp6_input_next
2192 #undef _
2193   },
2194   .format_buffer = format_sctp_header,
2195   .format_trace = format_sctp_rx_trace,
2196 };
2197 /* *INDENT-ON* */
2198
2199 VLIB_NODE_FUNCTION_MULTIARCH (sctp6_input_node, sctp6_input_dispatcher);
2200
2201 vlib_node_registration_t sctp4_input_node;
2202 vlib_node_registration_t sctp6_input_node;
2203
2204 static void
2205 sctp_dispatch_table_init (sctp_main_t * tm)
2206 {
2207   int i, j;
2208   for (i = 0; i < ARRAY_LEN (tm->dispatch_table); i++)
2209     for (j = 0; j < ARRAY_LEN (tm->dispatch_table[i]); j++)
2210       {
2211         tm->dispatch_table[i][j].next = SCTP_INPUT_NEXT_DROP;
2212         tm->dispatch_table[i][j].error = SCTP_ERROR_DISPATCH;
2213       }
2214
2215 #define _(t,f,n,e)                                              \
2216 do {                                                            \
2217     tm->dispatch_table[SCTP_STATE_##t][f].next = (n);           \
2218     tm->dispatch_table[SCTP_STATE_##t][f].error = (e);          \
2219 } while (0)
2220
2221   /*
2222    * SCTP STATE-MACHINE states:
2223    *
2224    * _(CLOSED, "CLOSED")                         \
2225    * _(COOKIE_WAIT, "COOKIE_WAIT")               \
2226    * _(COOKIE_ECHOED, "COOKIE_ECHOED")           \
2227    * _(ESTABLISHED, "ESTABLISHED")               \
2228    * _(SHUTDOWN_PENDING, "SHUTDOWN_PENDING")     \
2229    * _(SHUTDOWN_SENT, "SHUTDOWN_SENT")           \
2230    * _(SHUTDOWN_RECEIVED, "SHUTDOWN_RECEIVED")   \
2231    * _(SHUTDOWN_ACK_SENT, "SHUTDOWN_ACK_SENT")
2232    */
2233   _(CLOSED, DATA, SCTP_INPUT_NEXT_LISTEN_PHASE, SCTP_ERROR_NONE);       /* UNEXPECTED DATA chunk which requires special handling */
2234   _(CLOSED, INIT, SCTP_INPUT_NEXT_LISTEN_PHASE, SCTP_ERROR_NONE);
2235   _(CLOSED, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);        /* UNEXPECTED INIT_ACK chunk */
2236   _(CLOSED, SACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SACK_CHUNK_VIOLATION);       /* UNEXPECTED SACK chunk */
2237   _(CLOSED, HEARTBEAT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_CHUNK_VIOLATION);     /* UNEXPECTED HEARTBEAT chunk */
2238   _(CLOSED, HEARTBEAT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_ACK_CHUNK_VIOLATION);     /* UNEXPECTED HEARTBEAT_ACK chunk */
2239   _(CLOSED, ABORT, SCTP_INPUT_NEXT_RCV_PHASE, SCTP_ERROR_NONE);
2240   _(CLOSED, SHUTDOWN, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_CHUNK_VIOLATION);       /* UNEXPECTED SHUTDOWN chunk */
2241   _(CLOSED, SHUTDOWN_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_ACK_CHUNK_VIOLATION);       /* UNEXPECTED SHUTDOWN_ACK chunk */
2242   _(CLOSED, OPERATION_ERROR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_OPERATION_ERROR_VIOLATION);       /* UNEXPECTED OPERATION_ERROR chunk */
2243   _(CLOSED, COOKIE_ECHO, SCTP_INPUT_NEXT_ESTABLISHED_PHASE, SCTP_ERROR_NONE);
2244   _(CLOSED, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);      /* UNEXPECTED COOKIE_ACK chunk */
2245   _(CLOSED, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);     /* UNEXPECTED ECNE chunk */
2246   _(CLOSED, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);       /* UNEXPECTED CWR chunk */
2247   _(CLOSED, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION);   /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2248
2249   _(COOKIE_WAIT, DATA, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_NONE);
2250   _(COOKIE_WAIT, INIT, SCTP_INPUT_NEXT_RCV_PHASE, SCTP_ERROR_NONE);     /* UNEXPECTED INIT chunk which requires special handling */
2251   _(COOKIE_WAIT, INIT_ACK, SCTP_INPUT_NEXT_RCV_PHASE, SCTP_ERROR_NONE);
2252   _(COOKIE_WAIT, SACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SACK_CHUNK_VIOLATION);  /* UNEXPECTED SACK chunk */
2253   _(COOKIE_WAIT, HEARTBEAT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_CHUNK_VIOLATION);        /* UNEXPECTED HEARTBEAT chunk */
2254   _(COOKIE_WAIT, HEARTBEAT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_ACK_CHUNK_VIOLATION);        /* UNEXPECTED HEARTBEAT_ACK chunk */
2255   _(COOKIE_WAIT, ABORT, SCTP_INPUT_NEXT_RCV_PHASE, SCTP_ERROR_NONE);
2256   _(COOKIE_WAIT, SHUTDOWN, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_CHUNK_VIOLATION);  /* UNEXPECTED SHUTDOWN chunk */
2257   _(COOKIE_WAIT, SHUTDOWN_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_ACK_CHUNK_VIOLATION);  /* UNEXPECTED SHUTDOWN_ACK chunk */
2258   _(COOKIE_WAIT, OPERATION_ERROR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_OPERATION_ERROR_VIOLATION);  /* UNEXPECTED OPERATION_ERROR chunk */
2259   _(COOKIE_WAIT, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);  /* UNEXPECTED COOKIE_ECHO chunk */
2260   _(COOKIE_WAIT, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP); /* UNEXPECTED COOKIE_ACK chunk */
2261   _(COOKIE_WAIT, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);        /* UNEXPECTED ECNE chunk */
2262   _(COOKIE_WAIT, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);  /* UNEXPECTED CWR chunk */
2263   _(COOKIE_WAIT, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION);      /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2264
2265   _(COOKIE_ECHOED, DATA, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_NONE);
2266   _(COOKIE_ECHOED, INIT, SCTP_INPUT_NEXT_RCV_PHASE, SCTP_ERROR_NONE);   /* UNEXPECTED INIT chunk which requires special handling */
2267   _(COOKIE_ECHOED, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP); /* UNEXPECTED INIT_ACK chunk */
2268   _(COOKIE_ECHOED, SACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SACK_CHUNK_VIOLATION);        /* UNEXPECTED SACK chunk */
2269   _(COOKIE_ECHOED, HEARTBEAT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_CHUNK_VIOLATION);      /* UNEXPECTED HEARTBEAT chunk */
2270   _(COOKIE_ECHOED, HEARTBEAT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_ACK_CHUNK_VIOLATION);      /* UNEXPECTED HEARTBEAT_ACK chunk */
2271   _(COOKIE_ECHOED, ABORT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ABORT_CHUNK_VIOLATION);      /* UNEXPECTED ABORT chunk */
2272   _(COOKIE_ECHOED, SHUTDOWN, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_CHUNK_VIOLATION);        /* UNEXPECTED SHUTDOWN chunk */
2273   _(COOKIE_ECHOED, SHUTDOWN_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_ACK_CHUNK_VIOLATION);        /* UNEXPECTED SHUTDOWN_ACK chunk */
2274   _(COOKIE_ECHOED, OPERATION_ERROR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_OPERATION_ERROR_VIOLATION);        /* UNEXPECTED OPERATION_ERROR chunk */
2275   _(COOKIE_ECHOED, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);        /* UNEXPECTED COOKIE_ECHO chunk */
2276   _(COOKIE_ECHOED, COOKIE_ACK, SCTP_INPUT_NEXT_ESTABLISHED_PHASE,
2277     SCTP_ERROR_NONE);
2278   _(COOKIE_ECHOED, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);      /* UNEXPECTED ECNE chunk */
2279   _(COOKIE_ECHOED, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);        /* UNEXPECTED CWR chunk */
2280   _(COOKIE_ECHOED, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION);    /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2281
2282   _(ESTABLISHED, DATA, SCTP_INPUT_NEXT_ESTABLISHED_PHASE, SCTP_ERROR_NONE);
2283   _(ESTABLISHED, INIT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_INIT_CHUNK_VIOLATION);  /* UNEXPECTED INIT chunk */
2284   _(ESTABLISHED, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);   /* UNEXPECTED INIT_ACK chunk */
2285   _(ESTABLISHED, SACK, SCTP_INPUT_NEXT_ESTABLISHED_PHASE, SCTP_ERROR_NONE);
2286   _(ESTABLISHED, HEARTBEAT, SCTP_INPUT_NEXT_ESTABLISHED_PHASE,
2287     SCTP_ERROR_NONE);
2288   _(ESTABLISHED, HEARTBEAT_ACK, SCTP_INPUT_NEXT_ESTABLISHED_PHASE,
2289     SCTP_ERROR_NONE);
2290   _(ESTABLISHED, ABORT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ABORT_CHUNK_VIOLATION);        /* UNEXPECTED ABORT chunk */
2291   _(ESTABLISHED, SHUTDOWN, SCTP_INPUT_NEXT_SHUTDOWN_PHASE, SCTP_ERROR_NONE);
2292   _(ESTABLISHED, SHUTDOWN_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_ACK_CHUNK_VIOLATION);  /* UNEXPECTED SHUTDOWN_ACK chunk */
2293   _(ESTABLISHED, OPERATION_ERROR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_OPERATION_ERROR_VIOLATION);  /* UNEXPECTED OPERATION_ERROR chunk */
2294   _(ESTABLISHED, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);  /* UNEXPECTED COOKIE_ECHO chunk */
2295   _(ESTABLISHED, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP); /* UNEXPECTED COOKIE_ACK chunk */
2296   _(ESTABLISHED, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);        /* UNEXPECTED ECNE chunk */
2297   _(ESTABLISHED, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);  /* UNEXPECTED CWR chunk */
2298   _(ESTABLISHED, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION);      /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2299
2300   _(SHUTDOWN_PENDING, DATA, SCTP_INPUT_NEXT_SHUTDOWN_PHASE, SCTP_ERROR_NONE);
2301   _(SHUTDOWN_PENDING, INIT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_INIT_CHUNK_VIOLATION);     /* UNEXPECTED INIT chunk */
2302   _(SHUTDOWN_PENDING, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);      /* UNEXPECTED INIT_ACK chunk */
2303   _(SHUTDOWN_PENDING, SACK, SCTP_INPUT_NEXT_LISTEN_PHASE, SCTP_ERROR_NONE);
2304   _(SHUTDOWN_PENDING, HEARTBEAT, SCTP_INPUT_NEXT_LISTEN_PHASE,
2305     SCTP_ERROR_NONE);
2306   _(SHUTDOWN_PENDING, HEARTBEAT_ACK, SCTP_INPUT_NEXT_LISTEN_PHASE,
2307     SCTP_ERROR_NONE);
2308   _(SHUTDOWN_PENDING, ABORT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ABORT_CHUNK_VIOLATION);   /* UNEXPECTED ABORT chunk */
2309   _(SHUTDOWN_PENDING, SHUTDOWN, SCTP_INPUT_NEXT_SHUTDOWN_PHASE,
2310     SCTP_ERROR_NONE);
2311   _(SHUTDOWN_PENDING, SHUTDOWN_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_ACK_CHUNK_VIOLATION);     /* UNEXPECTED SHUTDOWN_ACK chunk */
2312   _(SHUTDOWN_PENDING, OPERATION_ERROR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_OPERATION_ERROR_VIOLATION);     /* UNEXPECTED OPERATION_ERROR chunk */
2313   _(SHUTDOWN_PENDING, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);     /* UNEXPECTED COOKIE_ECHO chunk */
2314   _(SHUTDOWN_PENDING, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);    /* UNEXPECTED COOKIE_ACK chunk */
2315   _(SHUTDOWN_PENDING, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);   /* UNEXPECTED ECNE chunk */
2316   _(SHUTDOWN_PENDING, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);     /* UNEXPECTED CWR chunk */
2317   _(SHUTDOWN_PENDING, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION); /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2318
2319   _(SHUTDOWN_SENT, DATA, SCTP_INPUT_NEXT_SHUTDOWN_PHASE, SCTP_ERROR_NONE);
2320   _(SHUTDOWN_SENT, INIT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_INIT_CHUNK_VIOLATION);        /* UNEXPECTED INIT chunk */
2321   _(SHUTDOWN_SENT, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP); /* UNEXPECTED INIT_ACK chunk */
2322   _(SHUTDOWN_SENT, SACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SACK_CHUNK_VIOLATION);        /* UNEXPECTED SACK chunk */
2323   _(SHUTDOWN_SENT, HEARTBEAT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_CHUNK_VIOLATION);      /* UNEXPECTED HEARTBEAT chunk */
2324   _(SHUTDOWN_SENT, HEARTBEAT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_ACK_CHUNK_VIOLATION);      /* UNEXPECTED HEARTBEAT_ACK chunk */
2325   _(SHUTDOWN_SENT, ABORT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ABORT_CHUNK_VIOLATION);      /* UNEXPECTED ABORT chunk */
2326   _(SHUTDOWN_SENT, SHUTDOWN, SCTP_INPUT_NEXT_SHUTDOWN_PHASE, SCTP_ERROR_NONE);
2327   _(SHUTDOWN_SENT, SHUTDOWN_ACK, SCTP_INPUT_NEXT_SHUTDOWN_PHASE,
2328     SCTP_ERROR_NONE);
2329   _(SHUTDOWN_SENT, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);        /* UNEXPECTED COOKIE_ECHO chunk */
2330   _(SHUTDOWN_SENT, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);       /* UNEXPECTED COOKIE_ACK chunk */
2331   _(SHUTDOWN_SENT, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);      /* UNEXPECTED ECNE chunk */
2332   _(SHUTDOWN_SENT, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);        /* UNEXPECTED CWR chunk */
2333   _(SHUTDOWN_SENT, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION);    /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2334
2335   _(SHUTDOWN_RECEIVED, DATA, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_DATA_CHUNK_VIOLATION);    /* UNEXPECTED DATA chunk */
2336   _(SHUTDOWN_RECEIVED, INIT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_INIT_CHUNK_VIOLATION);    /* UNEXPECTED INIT chunk */
2337   _(SHUTDOWN_RECEIVED, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);     /* UNEXPECTED INIT_ACK chunk */
2338   _(SHUTDOWN_RECEIVED, SACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SACK_CHUNK_VIOLATION);    /* UNEXPECTED INIT chunk */
2339   _(SHUTDOWN_RECEIVED, HEARTBEAT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_CHUNK_VIOLATION);  /* UNEXPECTED HEARTBEAT chunk */
2340   _(SHUTDOWN_RECEIVED, HEARTBEAT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_ACK_CHUNK_VIOLATION);  /* UNEXPECTED HEARTBEAT_ACK chunk */
2341   _(SHUTDOWN_RECEIVED, ABORT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ABORT_CHUNK_VIOLATION);  /* UNEXPECTED ABORT chunk */
2342   _(SHUTDOWN_RECEIVED, SHUTDOWN, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_CHUNK_VIOLATION);    /* UNEXPECTED SHUTDOWN chunk */
2343   _(SHUTDOWN_RECEIVED, SHUTDOWN_ACK, SCTP_INPUT_NEXT_SHUTDOWN_PHASE,
2344     SCTP_ERROR_NONE);
2345   _(SHUTDOWN_RECEIVED, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);    /* UNEXPECTED COOKIE_ECHO chunk */
2346   _(SHUTDOWN_RECEIVED, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);   /* UNEXPECTED COOKIE_ACK chunk */
2347   _(SHUTDOWN_RECEIVED, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);  /* UNEXPECTED ECNE chunk */
2348   _(SHUTDOWN_RECEIVED, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);    /* UNEXPECTED CWR chunk */
2349   _(SHUTDOWN_RECEIVED, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_COMPLETE_VIOLATION);        /* UNEXPECTED SHUTDOWN_COMPLETE chunk */
2350
2351   _(SHUTDOWN_ACK_SENT, DATA, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_DATA_CHUNK_VIOLATION);    /* UNEXPECTED DATA chunk */
2352   _(SHUTDOWN_ACK_SENT, INIT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_INIT_CHUNK_VIOLATION);    /* UNEXPECTED INIT chunk */
2353   _(SHUTDOWN_ACK_SENT, INIT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);     /* UNEXPECTED INIT_ACK chunk */
2354   _(SHUTDOWN_ACK_SENT, SACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SACK_CHUNK_VIOLATION);    /* UNEXPECTED INIT chunk */
2355   _(SHUTDOWN_ACK_SENT, HEARTBEAT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_CHUNK_VIOLATION);  /* UNEXPECTED HEARTBEAT chunk */
2356   _(SHUTDOWN_ACK_SENT, HEARTBEAT_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_HEARTBEAT_ACK_CHUNK_VIOLATION);  /* UNEXPECTED HEARTBEAT_ACK chunk */
2357   _(SHUTDOWN_ACK_SENT, ABORT, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ABORT_CHUNK_VIOLATION);  /* UNEXPECTED ABORT chunk */
2358   _(SHUTDOWN_ACK_SENT, SHUTDOWN, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_CHUNK_VIOLATION);    /* UNEXPECTED SHUTDOWN chunk */
2359   _(SHUTDOWN_ACK_SENT, SHUTDOWN_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_SHUTDOWN_ACK_CHUNK_VIOLATION);    /* UNEXPECTED SHUTDOWN_ACK chunk */
2360   _(SHUTDOWN_ACK_SENT, COOKIE_ECHO, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_COOKIE_ECHO_VIOLATION);    /* UNEXPECTED COOKIE_ECHO chunk */
2361   _(SHUTDOWN_ACK_SENT, COOKIE_ACK, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ACK_DUP);   /* UNEXPECTED COOKIE_ACK chunk */
2362   _(SHUTDOWN_ACK_SENT, ECNE, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_ECNE_VIOLATION);  /* UNEXPECTED ECNE chunk */
2363   _(SHUTDOWN_ACK_SENT, CWR, SCTP_INPUT_NEXT_DROP, SCTP_ERROR_CWR_VIOLATION);    /* UNEXPECTED CWR chunk */
2364   _(SHUTDOWN_ACK_SENT, SHUTDOWN_COMPLETE, SCTP_INPUT_NEXT_SHUTDOWN_PHASE,
2365     SCTP_ERROR_NONE);
2366
2367   /* TODO: Handle COOKIE ECHO when a TCB Exists */
2368
2369 #undef _
2370 }
2371
2372 clib_error_t *
2373 sctp_input_init (vlib_main_t * vm)
2374 {
2375   clib_error_t *error = 0;
2376   sctp_main_t *tm = vnet_get_sctp_main ();
2377
2378   if ((error = vlib_call_init_function (vm, sctp_init)))
2379     return error;
2380
2381   /* Initialize dispatch table. */
2382   sctp_dispatch_table_init (tm);
2383
2384   return error;
2385 }
2386
2387 VLIB_INIT_FUNCTION (sctp_input_init);
2388
2389 /*
2390  * fd.io coding-style-patch-verification: ON
2391  *
2392  * Local Variables:
2393  * eval: (c-set-style "gnu")
2394  * End:
2395  */