1 /* $NetBSD: ip_ecn.c,v 1.6 1999/07/31 18:41:15 itojun Exp $ */ 2 3 /* 4 * Copyright (C) 1999 WIDE Project. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. Neither the name of the project nor the names of its contributors 16 * may be used to endorse or promote products derived from this software 17 * without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 * 31 * KAME Id: ip_ecn.c,v 1.1.4.2 1999/07/30 10:20:02 itojun Exp 32 */ 33 /* 34 * ECN consideration on tunnel ingress/egress operation. 35 * http://www.aciri.org/floyd/papers/draft-ipsec-ecn-00.txt 36 */ 37 38 #if (defined(__FreeBSD__) && __FreeBSD__ >= 3) || defined(__NetBSD__) 39 #include "opt_inet.h" 40 #endif 41 42 #include <sys/param.h> 43 #include <sys/systm.h> 44 #include <sys/malloc.h> 45 #include <sys/mbuf.h> 46 #include <sys/errno.h> 47 48 #ifdef INET 49 #include <netinet/in.h> 50 #include <netinet/in_systm.h> 51 #include <netinet/ip.h> 52 #endif 53 54 #ifdef INET6 55 #ifndef INET 56 #include <netinet/in.h> 57 #endif 58 #include <netinet/ip6.h> 59 #endif 60 61 #include <netinet/ip_ecn.h> 62 63 /* 64 * modify outer ECN (TOS) field on ingress operation (tunnel encapsulation). 65 * call it after you've done the default initialization/copy for the outer. 66 */ 67 void 68 ip_ecn_ingress(mode, outer, inner) 69 int mode; 70 u_int8_t *outer; 71 u_int8_t *inner; 72 { 73 if (!outer || !inner) 74 panic("NULL pointer passed to ip_ecn_ingress"); 75 76 switch (mode) { 77 case ECN_ALLOWED: /* ECN allowed */ 78 *outer &= ~IPTOS_CE; 79 break; 80 case ECN_FORBIDDEN: /* ECN forbidden */ 81 *outer &= ~(IPTOS_ECT | IPTOS_CE); 82 break; 83 case ECN_NOCARE: /* no consideration to ECN */ 84 break; 85 } 86 } 87 88 /* 89 * modify inner ECN (TOS) field on egress operation (tunnel decapsulation). 90 * call it after you've done the default initialization/copy for the inner. 91 */ 92 void 93 ip_ecn_egress(mode, outer, inner) 94 int mode; 95 u_int8_t *outer; 96 u_int8_t *inner; 97 { 98 if (!outer || !inner) 99 panic("NULL pointer passed to ip_ecn_egress"); 100 101 switch (mode) { 102 case ECN_ALLOWED: 103 if (*outer & IPTOS_CE) 104 *inner |= IPTOS_CE; 105 break; 106 case ECN_FORBIDDEN: /* ECN forbidden */ 107 case ECN_NOCARE: /* no consideration to ECN */ 108 break; 109 } 110 } 111 112 #ifdef INET6 113 void 114 ip6_ecn_ingress(mode, outer, inner) 115 int mode; 116 u_int32_t *outer; 117 u_int32_t *inner; 118 { 119 u_int8_t outer8, inner8; 120 121 if (!outer || !inner) 122 panic("NULL pointer passed to ip6_ecn_ingress"); 123 124 outer8 = (ntohl(*outer) >> 20) & 0xff; 125 inner8 = (ntohl(*inner) >> 20) & 0xff; 126 ip_ecn_ingress(mode, &outer8, &inner8); 127 *outer &= ~htonl(0xff << 20); 128 *outer |= htonl((u_int32_t)outer8 << 20); 129 } 130 131 void 132 ip6_ecn_egress(mode, outer, inner) 133 int mode; 134 u_int32_t *outer; 135 u_int32_t *inner; 136 { 137 u_int8_t outer8, inner8; 138 139 if (!outer || !inner) 140 panic("NULL pointer passed to ip6_ecn_egress"); 141 142 outer8 = (ntohl(*outer) >> 20) & 0xff; 143 inner8 = (ntohl(*inner) >> 20) & 0xff; 144 ip_ecn_egress(mode, &outer8, &inner8); 145 *inner &= ~htonl(0xff << 20); 146 *inner |= htonl((u_int32_t)inner8 << 20); 147 } 148 #endif 149