sys/netinet/if_atm.c

   1 /*      $NetBSD: if_atm.c,v 1.6 1996/10/13 02:03:01 christos Exp $       */
   2
   3 /*-
   4  *
   5  * Copyright (c) 1996 Charles D. Cranor and Washington University.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. All advertising materials mentioning features or use of this software
  17  *    must display the following acknowledgement:
  18  *      This product includes software developed by Charles D. Cranor and
  19  *      Washington University.
  20  * 4. The name of the author may not be used to endorse or promote products
  21  *    derived from this software without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  26  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  27  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  28  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  31  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  32  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  33  */
  34 #include <sys/cdefs.h>
  35 __FBSDID("$FreeBSD$");
  36
  37 /*
  38  * IP <=> ATM address resolution.
  39  */
  40 #include "opt_inet.h"
  41 #include "opt_inet6.h"
  42 #include "opt_natm.h"
  43
  44 #if defined(INET) || defined(INET6)
  45
  46 #include <sys/param.h>
  47 #include <sys/systm.h>
  48 #include <sys/queue.h>
  49 #include <sys/mbuf.h>
  50 #include <sys/socket.h>
  51 #include <sys/sockio.h>
  52 #include <sys/syslog.h>
  53
  54 #include <net/if.h>
  55 #include <net/if_dl.h>
  56 #include <net/route.h>
  57 #include <net/if_atm.h>
  58
  59 #include <netinet/in.h>
  60 #include <netinet/if_atm.h>
  61
  62 #ifdef NATM
  63 #include <netnatm/natm.h>
  64 #endif
  65
  66 #define SDL(s) ((struct sockaddr_dl *)s)
  67
  68 #define GET3BYTE(V, A, L)       do {                            \
  69         (V) = ((A)[0] << 16) | ((A)[1] << 8) | (A)[2];          \
  70         (A) += 3;                                               \
  71         (L) -= 3;                                               \
  72     } while (0)
  73
  74 #define GET2BYTE(V, A, L)       do {                            \
  75         (V) = ((A)[0] << 8) | (A)[1];                           \
  76         (A) += 2;                                               \
  77         (L) -= 2;                                               \
  78     } while (0)
  79
  80 #define GET1BYTE(V, A, L)       do {                            \
  81         (V) = *(A)++;                                           \
  82         (L)--;                                                  \
  83     } while (0)
  84
  85
  86 /*
  87  * atm_rtrequest: handle ATM rt request (in support of generic code)
  88  *   inputs: "req" = request code
  89  *           "rt" = route entry
  90  *           "info" = rt_addrinfo
  91  */
  92 void
  93 atm_rtrequest(int req, struct rtentry *rt, struct rt_addrinfo *info)
  94 {
  95         struct sockaddr *gate = rt->rt_gateway;
  96         struct atmio_openvcc op;
  97         struct atmio_closevcc cl;
  98         u_char *addr;
  99         u_int alen;
 100 #ifdef NATM
 101         struct sockaddr_in *sin;
 102         struct natmpcb *npcb = NULL;
 103 #endif
 104         static struct sockaddr_dl null_sdl = {sizeof(null_sdl), AF_LINK};
 105
 106         if (rt->rt_flags & RTF_GATEWAY)   /* link level requests only */
 107                 return;
 108
 109         switch (req) {
 110
 111         case RTM_RESOLVE: /* resolve: only happens when cloning */
 112                 printf("atm_rtrequest: RTM_RESOLVE request detected?\n");
 113                 break;
 114
 115         case RTM_ADD:
 116                 /*
 117                  * route added by a command (e.g. ifconfig, route, arp...).
 118                  *
 119                  * first check to see if this is not a host route, in which
 120                  * case we are being called via "ifconfig" to set the address.
 121                  */
 122                 if ((rt->rt_flags & RTF_HOST) == 0) {
 123                         rt_setgate(rt,rt_key(rt),(struct sockaddr *)&null_sdl);
 124                         gate = rt->rt_gateway;
 125                         SDL(gate)->sdl_type = rt->rt_ifp->if_type;
 126                         SDL(gate)->sdl_index = rt->rt_ifp->if_index;
 127                         break;
 128                 }
 129
 130                 if ((rt->rt_flags & RTF_CLONING) != 0) {
 131                         printf("atm_rtrequest: cloning route detected?\n");
 132                         break;
 133                 }
 134                 if (gate->sa_family != AF_LINK ||
 135                     gate->sa_len < sizeof(null_sdl)) {
 136                         log(LOG_DEBUG, "atm_rtrequest: bad gateway value");
 137                         break;
 138                 }
 139
 140                 KASSERT(rt->rt_ifp->if_ioctl != NULL,
 141                     ("atm_rtrequest: null ioctl"));
 142
 143                 /*
 144                  * Parse and verify the link level address as
 145                  * an open request
 146                  */
 147                 bzero(&op, sizeof(op));
 148                 addr = LLADDR(SDL(gate));
 149                 alen = SDL(gate)->sdl_alen;
 150                 if (alen < 4) {
 151                         printf("%s: bad link-level address\n", __func__);
 152                         goto failed;
 153                 }
 154
 155                 if (alen == 4) {
 156                         /* old type address */
 157                         GET1BYTE(op.param.flags, addr, alen);
 158                         GET1BYTE(op.param.vpi, addr, alen);
 159                         GET2BYTE(op.param.vci, addr, alen);
 160                         op.param.traffic = ATMIO_TRAFFIC_UBR;
 161                         op.param.aal = (op.param.flags & ATM_PH_AAL5) ?
 162                             ATMIO_AAL_5 : ATMIO_AAL_0;
 163                 } else {
 164                         /* new address */
 165                         op.param.aal = ATMIO_AAL_5;
 166
 167                         GET1BYTE(op.param.flags, addr, alen);
 168                         op.param.flags &= ATM_PH_LLCSNAP;
 169
 170                         GET1BYTE(op.param.vpi, addr, alen);
 171                         GET2BYTE(op.param.vci, addr, alen);
 172
 173                         GET1BYTE(op.param.traffic, addr, alen);
 174
 175                         switch (op.param.traffic) {
 176
 177                           case ATMIO_TRAFFIC_UBR:
 178                                 if (alen >= 3)
 179                                         GET3BYTE(op.param.tparam.pcr,
 180                                             addr, alen);
 181                                 break;
 182
 183                           case ATMIO_TRAFFIC_CBR:
 184                                 if (alen < 3)
 185                                         goto bad_param;
 186                                 GET3BYTE(op.param.tparam.pcr, addr, alen);
 187                                 break;
 188
 189                           case ATMIO_TRAFFIC_VBR:
 190                                 if (alen < 3 * 3)
 191                                         goto bad_param;
 192                                 GET3BYTE(op.param.tparam.pcr, addr, alen);
 193                                 GET3BYTE(op.param.tparam.scr, addr, alen);
 194                                 GET3BYTE(op.param.tparam.mbs, addr, alen);
 195                                 break;
 196
 197                           case ATMIO_TRAFFIC_ABR:
 198                                 if (alen < 4 * 3 + 2 + 1 * 2 + 3)
 199                                         goto bad_param;
 200                                 GET3BYTE(op.param.tparam.pcr, addr, alen);
 201                                 GET3BYTE(op.param.tparam.mcr, addr, alen);
 202                                 GET3BYTE(op.param.tparam.icr, addr, alen);
 203                                 GET3BYTE(op.param.tparam.tbe, addr, alen);
 204                                 GET1BYTE(op.param.tparam.nrm, addr, alen);
 205                                 GET1BYTE(op.param.tparam.trm, addr, alen);
 206                                 GET2BYTE(op.param.tparam.adtf, addr, alen);
 207                                 GET1BYTE(op.param.tparam.rif, addr, alen);
 208                                 GET1BYTE(op.param.tparam.rdf, addr, alen);
 209                                 GET1BYTE(op.param.tparam.cdf, addr, alen);
 210                                 break;
 211
 212                           default:
 213                           bad_param:
 214                                 printf("%s: bad traffic params\n", __func__);
 215                                 goto failed;
 216                         }
 217                 }
 218                 op.param.rmtu = op.param.tmtu = rt->rt_ifp->if_mtu;
 219 #ifdef NATM
 220                 /*
 221                  * let native ATM know we are using this VCI/VPI
 222                  * (i.e. reserve it)
 223                  */
 224                 sin = (struct sockaddr_in *) rt_key(rt);
 225                 if (sin->sin_family != AF_INET)
 226                         goto failed;
 227                 npcb = npcb_add(NULL, rt->rt_ifp, op.param.vci,  op.param.vpi);
 228                 if (npcb == NULL)
 229                         goto failed;
 230                 npcb->npcb_flags |= NPCB_IP;
 231                 npcb->ipaddr.s_addr = sin->sin_addr.s_addr;
 232                 /* XXX: move npcb to llinfo when ATM ARP is ready */
 233                 rt->rt_llinfo = (caddr_t) npcb;
 234                 rt->rt_flags |= RTF_LLINFO;
 235 #endif
 236                 /*
 237                  * let the lower level know this circuit is active
 238                  */
 239                 op.rxhand = NULL;
 240                 op.param.flags |= ATMIO_FLAG_ASYNC;
 241                 if (rt->rt_ifp->if_ioctl(rt->rt_ifp, SIOCATMOPENVCC,
 242                     (caddr_t)&op) != 0) {
 243                         printf("atm: couldn't add VC\n");
 244                         goto failed;
 245                 }
 246
 247                 SDL(gate)->sdl_type = rt->rt_ifp->if_type;
 248                 SDL(gate)->sdl_index = rt->rt_ifp->if_index;
 249
 250                 break;
 251
 252 failed:
 253 #ifdef NATM
 254                 if (npcb) {
 255                         npcb_free(npcb, NPCB_DESTROY);
 256                         rt->rt_llinfo = NULL;
 257                         rt->rt_flags &= ~RTF_LLINFO;
 258                 }
 259 #endif
 260                 /* mark as invalid. We cannot RTM_DELETE the route from
 261                  * here, because the recursive call to rtrequest1 does
 262                  * not really work. */
 263                 rt->rt_flags |= RTF_REJECT;
 264                 break;
 265
 266         case RTM_DELETE:
 267 #ifdef NATM
 268                 /*
 269                  * tell native ATM we are done with this VC
 270                  */
 271                 if (rt->rt_flags & RTF_LLINFO) {
 272                         npcb_free((struct natmpcb *)rt->rt_llinfo,
 273                             NPCB_DESTROY);
 274                         rt->rt_llinfo = NULL;
 275                         rt->rt_flags &= ~RTF_LLINFO;
 276                 }
 277 #endif
 278                 /*
 279                  * tell the lower layer to disable this circuit
 280                  */
 281                 bzero(&op, sizeof(op));
 282                 addr = LLADDR(SDL(gate));
 283                 addr++;
 284                 cl.vpi = *addr++;
 285                 cl.vci = *addr++ << 8;
 286                 cl.vci |= *addr++;
 287                 (void)rt->rt_ifp->if_ioctl(rt->rt_ifp, SIOCATMCLOSEVCC,
 288                     (caddr_t)&cl);
 289                 break;
 290         }
 291 }
 292
 293 /*
 294  * atmresolve:
 295  *   inputs:
 296  *     [1] "rt" = the link level route to use (or null if need to look one up)
 297  *     [2] "m" = mbuf containing the data to be sent
 298  *     [3] "dst" = sockaddr_in (IP) address of dest.
 299  *   output:
 300  *     [4] "desten" = ATM pseudo header which we will fill in VPI/VCI info
 301  *   return:
 302  *     0 == resolve FAILED; note that "m" gets m_freem'd in this case
 303  *     1 == resolve OK; desten contains result
 304  *
 305  *   XXX: will need more work if we wish to support ATMARP in the kernel,
 306  *   but this is enough for PVCs entered via the "route" command.
 307  */
 308 int
 309 atmresolve(struct rtentry *rt, struct mbuf *m, struct sockaddr *dst,
 310     struct atm_pseudohdr *desten)
 311 {
 312         struct sockaddr_dl *sdl;
 313
 314         if (m->m_flags & (M_BCAST | M_MCAST)) {
 315                 log(LOG_INFO, "atmresolve: BCAST/MCAST packet detected/dumped");
 316                 goto bad;
 317         }
 318
 319         if (rt == NULL) {
 320                 rt = RTALLOC1(dst, 0);
 321                 if (rt == NULL)
 322                         goto bad;       /* failed */
 323                 RT_REMREF(rt);          /* don't keep LL references */
 324                 if ((rt->rt_flags & RTF_GATEWAY) != 0 ||
 325                     (rt->rt_flags & RTF_LLINFO) == 0 ||
 326                     /* XXX: are we using LLINFO? */
 327                     rt->rt_gateway->sa_family != AF_LINK) {
 328                         RT_UNLOCK(rt);
 329                         goto bad;
 330                 }
 331                 RT_UNLOCK(rt);
 332         }
 333
 334         /*
 335          * note that rt_gateway is a sockaddr_dl which contains the
 336          * atm_pseudohdr data structure for this route.   we currently
 337          * don't need any rt_llinfo info (but will if we want to support
 338          * ATM ARP [c.f. if_ether.c]).
 339          */
 340         sdl = SDL(rt->rt_gateway);
 341
 342         /*
 343          * Check the address family and length is valid, the address
 344          * is resolved; otherwise, try to resolve.
 345          */
 346         if (sdl->sdl_family == AF_LINK && sdl->sdl_alen >= sizeof(*desten)) {
 347                 bcopy(LLADDR(sdl), desten, sizeof(*desten));
 348                 return (1);     /* ok, go for it! */
 349         }
 350
 351         /*
 352          * we got an entry, but it doesn't have valid link address
 353          * info in it (it is prob. the interface route, which has
 354          * sdl_alen == 0).    dump packet.  (fall through to "bad").
 355          */
 356 bad:
 357         m_freem(m);
 358         return (0);
 359 }
 360 #endif /* INET */