bsd/netinet/ip_ecn.c

   1 /*
   2  * Copyright (c) 2006 Apple Computer, Inc. All Rights Reserved.
   3  *
   4  * @APPLE_LICENSE_OSREFERENCE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License.  The rights granted to you under the
  10  * License may not be used to create, or enable the creation or
  11  * redistribution of, unlawful or unlicensed copies of an Apple operating
  12  * system, or to circumvent, violate, or enable the circumvention or
  13  * violation of, any terms of an Apple operating system software license
  14  * agreement.
  15  *
  16  * Please obtain a copy of the License at
  17  * http://www.opensource.apple.com/apsl/ and read it before using this
  18  * file.
  19  *
  20  * The Original Code and all software distributed under the License are
  21  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  22  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  23  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  24  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  25  * Please see the License for the specific language governing rights and
  26  * limitations under the License.
  27  *
  28  * @APPLE_LICENSE_OSREFERENCE_HEADER_END@
  29  */
  30 /*
  31  * Copyright (C) 1999 WIDE Project.
  32  * All rights reserved.
  33  *
  34  * Redistribution and use in source and binary forms, with or without
  35  * modification, are permitted provided that the following conditions
  36  * are met:
  37  * 1. Redistributions of source code must retain the above copyright
  38  *    notice, this list of conditions and the following disclaimer.
  39  * 2. Redistributions in binary form must reproduce the above copyright
  40  *    notice, this list of conditions and the following disclaimer in the
  41  *    documentation and/or other materials provided with the distribution.
  42  * 3. Neither the name of the project nor the names of its contributors
  43  *    may be used to endorse or promote products derived from this software
  44  *    without specific prior written permission.
  45  *
  46  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
  47  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  48  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  49  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
  50  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  51  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  52  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  53  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  54  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  55  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  56  * SUCH DAMAGE.
  57  *
  58  */
  59 /*
  60  * ECN consideration on tunnel ingress/egress operation.
  61  * http://www.aciri.org/floyd/papers/draft-ipsec-ecn-00.txt
  62  */
  63
  64 #include <sys/param.h>
  65 #include <sys/systm.h>
  66 #include <sys/malloc.h>
  67 #include <sys/mbuf.h>
  68 #include <sys/errno.h>
  69
  70 #include <netinet/in.h>
  71 #include <netinet/in_systm.h>
  72 #include <netinet/ip.h>
  73 #if INET6
  74 #include <netinet/ip6.h>
  75 #endif
  76
  77 #include <netinet/ip_ecn.h>
  78 #if INET6
  79 #include <netinet6/ip6_ecn.h>
  80 #endif
  81
  82 /*
  83  * modify outer ECN (TOS) field on ingress operation (tunnel encapsulation).
  84  */
  85 void
  86 ip_ecn_ingress(mode, outer, inner)
  87         int mode;
  88         u_int8_t *outer;
  89         const u_int8_t *inner;
  90 {
  91         if (!outer || !inner)
  92                 panic("NULL pointer passed to ip_ecn_ingress");
  93
  94         *outer = *inner;
  95         switch (mode) {
  96         case ECN_ALLOWED:               /* ECN allowed */
  97                 *outer &= ~IPTOS_CE;
  98                 break;
  99         case ECN_FORBIDDEN:             /* ECN forbidden */
 100                 *outer &= ~(IPTOS_ECT | IPTOS_CE);
 101                 break;
 102         case ECN_NOCARE:        /* no consideration to ECN */
 103                 break;
 104         }
 105 }
 106
 107 /*
 108  * modify inner ECN (TOS) field on egress operation (tunnel decapsulation).
 109  */
 110 void
 111 ip_ecn_egress(mode, outer, inner)
 112         int mode;
 113         const u_int8_t *outer;
 114         u_int8_t *inner;
 115 {
 116         if (!outer || !inner)
 117                 panic("NULL pointer passed to ip_ecn_egress");
 118
 119         switch (mode) {
 120         case ECN_ALLOWED:
 121                 if (*outer & IPTOS_CE)
 122                         *inner |= IPTOS_CE;
 123                 break;
 124         case ECN_FORBIDDEN:             /* ECN forbidden */
 125         case ECN_NOCARE:        /* no consideration to ECN */
 126                 break;
 127         }
 128 }
 129
 130 #if INET6
 131 void
 132 ip6_ecn_ingress(mode, outer, inner)
 133         int mode;
 134         u_int32_t *outer;
 135         const u_int32_t *inner;
 136 {
 137         u_int8_t outer8, inner8;
 138
 139         if (!outer || !inner)
 140                 panic("NULL pointer passed to ip6_ecn_ingress");
 141
 142         inner8 = (ntohl(*inner) >> 20) & 0xff;
 143         ip_ecn_ingress(mode, &outer8, &inner8);
 144         *outer &= ~htonl(0xff << 20);
 145         *outer |= htonl((u_int32_t)outer8 << 20);
 146 }
 147
 148 void
 149 ip6_ecn_egress(mode, outer, inner)
 150         int mode;
 151         const u_int32_t *outer;
 152         u_int32_t *inner;
 153 {
 154         u_int8_t outer8, inner8;
 155
 156         if (!outer || !inner)
 157                 panic("NULL pointer passed to ip6_ecn_egress");
 158
 159         outer8 = (ntohl(*outer) >> 20) & 0xff;
 160         ip_ecn_egress(mode, &outer8, &inner8);
 161         *inner &= ~htonl(0xff << 20);
 162         *inner |= htonl((u_int32_t)inner8 << 20);
 163 }
 164 #endif