sys/netnatm/natm_pcb.c

   1 /* $FreeBSD$ */
   2 /*      $NetBSD: natm_pcb.c,v 1.4 1996/11/09 03:26:27 chuck Exp $       */
   3
   4 /*
   5  *
   6  * Copyright (c) 1996 Charles D. Cranor and Washington University.
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. All advertising materials mentioning features or use of this software
  18  *    must display the following acknowledgement:
  19  *      This product includes software developed by Charles D. Cranor and
  20  *      Washington University.
  21  * 4. The name of the author may not be used to endorse or promote products
  22  *    derived from this software without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  25  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  26  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  28  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  29  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  30  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  31  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  32  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  33  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  */
  35
  36 /*
  37  * atm_pcb.c: manage atm protocol control blocks and keep IP and NATM
  38  * from trying to use each other's VCs.
  39  */
  40
  41 #include <sys/param.h>
  42 #include <sys/systm.h>
  43 #include <sys/malloc.h>
  44 #include <sys/socket.h>
  45 #include <sys/socketvar.h>
  46
  47 #include <net/if.h>
  48
  49 #include <netinet/in.h>
  50
  51 #include <netnatm/natm.h>
  52
  53 struct npcblist natm_pcbs;
  54
  55 /*
  56  * npcb_alloc: allocate a npcb [in the free state]
  57  */
  58
  59 struct natmpcb *npcb_alloc(wait)
  60
  61 int wait;
  62
  63 {
  64   struct natmpcb *npcb;
  65
  66   MALLOC(npcb, struct natmpcb *, sizeof(*npcb), M_PCB, wait | M_ZERO);
  67
  68 #ifdef DIAGNOSTIC
  69   if (wait == M_WAITOK && npcb == NULL) panic("npcb_alloc: malloc didn't wait");
  70 #endif
  71
  72   if (npcb)
  73     npcb->npcb_flags = NPCB_FREE;
  74
  75   return(npcb);
  76 }
  77
  78
  79 /*
  80  * npcb_free: free a npcb
  81  */
  82
  83 void npcb_free(npcb, op)
  84
  85 struct natmpcb *npcb;
  86 int op;
  87
  88 {
  89   int s = splimp();
  90
  91   if ((npcb->npcb_flags & NPCB_FREE) == 0) {
  92     LIST_REMOVE(npcb, pcblist);
  93     npcb->npcb_flags = NPCB_FREE;
  94   }
  95   if (op == NPCB_DESTROY) {
  96     if (npcb->npcb_inq) {
  97       npcb->npcb_flags = NPCB_DRAIN;    /* flag for distruction */
  98     } else {
  99       FREE(npcb, M_PCB);                /* kill it! */
 100     }
 101   }
 102
 103   splx(s);
 104 }
 105
 106
 107 /*
 108  * npcb_add: add or remove npcb from main list
 109  *   returns npcb if ok
 110  */
 111
 112 struct natmpcb *npcb_add(npcb, ifp, vci, vpi)
 113
 114 struct natmpcb *npcb;
 115 struct ifnet *ifp;
 116 u_int16_t vci;
 117 u_int8_t vpi;
 118
 119 {
 120   struct natmpcb *cpcb = NULL;          /* current pcb */
 121   int s = splimp();
 122
 123
 124   /*
 125    * lookup required
 126    */
 127
 128   for (cpcb = LIST_FIRST(&natm_pcbs) ; cpcb != NULL ;
 129                                         cpcb = LIST_NEXT(cpcb, pcblist)) {
 130     if (ifp == cpcb->npcb_ifp && vci == cpcb->npcb_vci && vpi == cpcb->npcb_vpi)
 131       break;
 132   }
 133
 134   /*
 135    * add & something already there?
 136    */
 137
 138   if (cpcb) {
 139     cpcb = NULL;
 140     goto done;                                  /* fail */
 141   }
 142
 143   /*
 144    * need to allocate a pcb?
 145    */
 146
 147   if (npcb == NULL) {
 148     cpcb = npcb_alloc(M_NOWAIT);        /* could be called from lower half */
 149     if (cpcb == NULL)
 150       goto done;                        /* fail */
 151   } else {
 152     cpcb = npcb;
 153   }
 154
 155   cpcb->npcb_ifp = ifp;
 156   cpcb->ipaddr.s_addr = 0;
 157   cpcb->npcb_vci = vci;
 158   cpcb->npcb_vpi = vpi;
 159   cpcb->npcb_flags = NPCB_CONNECTED;
 160
 161   LIST_INSERT_HEAD(&natm_pcbs, cpcb, pcblist);
 162
 163 done:
 164   splx(s);
 165   return(cpcb);
 166 }
 167
 168
 169
 170 #ifdef DDB
 171
 172 int npcb_dump __P((void));
 173
 174 int npcb_dump()
 175
 176 {
 177   struct natmpcb *cpcb;
 178
 179   printf("npcb dump:\n");
 180   for (cpcb = LIST_FIRST(&natm_pcbs) ; cpcb != NULL ;
 181                                         cpcb = LIST_NEXT(cpcb, pcblist)) {
 182     printf("if=%s, vci=%d, vpi=%d, IP=0x%x, sock=%p, flags=0x%x, inq=%d\n",
 183         cpcb->npcb_ifp->if_xname, cpcb->npcb_vci, cpcb->npcb_vpi,
 184         cpcb->ipaddr.s_addr, cpcb->npcb_socket,
 185         cpcb->npcb_flags, cpcb->npcb_inq);
 186   }
 187   printf("done\n");
 188   return(0);
 189 }
 190
 191 #endif