Annotation of Net2/netiso/iso_pcb.c, revision 1.1

1.1     ! root        1: /*-
        !             2:  * Copyright (c) 1991 The Regents of the University of California.
        !             3:  * All rights reserved.
        !             4:  *
        !             5:  * Redistribution and use in source and binary forms, with or without
        !             6:  * modification, are permitted provided that the following conditions
        !             7:  * are met:
        !             8:  * 1. Redistributions of source code must retain the above copyright
        !             9:  *    notice, this list of conditions and the following disclaimer.
        !            10:  * 2. Redistributions in binary form must reproduce the above copyright
        !            11:  *    notice, this list of conditions and the following disclaimer in the
        !            12:  *    documentation and/or other materials provided with the distribution.
        !            13:  * 3. All advertising materials mentioning features or use of this software
        !            14:  *    must display the following acknowledgement:
        !            15:  *     This product includes software developed by the University of
        !            16:  *     California, Berkeley and its contributors.
        !            17:  * 4. Neither the name of the University nor the names of its contributors
        !            18:  *    may be used to endorse or promote products derived from this software
        !            19:  *    without specific prior written permission.
        !            20:  *
        !            21:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
        !            22:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
        !            23:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
        !            24:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
        !            25:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
        !            26:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
        !            27:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
        !            28:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
        !            29:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
        !            30:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
        !            31:  * SUCH DAMAGE.
        !            32:  *
        !            33:  *     @(#)iso_pcb.c   7.10 (Berkeley) 6/27/91
        !            34:  */
        !            35: 
        !            36: /***********************************************************
        !            37:                Copyright IBM Corporation 1987
        !            38: 
        !            39:                       All Rights Reserved
        !            40: 
        !            41: Permission to use, copy, modify, and distribute this software and its 
        !            42: documentation for any purpose and without fee is hereby granted, 
        !            43: provided that the above copyright notice appear in all copies and that
        !            44: both that copyright notice and this permission notice appear in 
        !            45: supporting documentation, and that the name of IBM not be
        !            46: used in advertising or publicity pertaining to distribution of the
        !            47: software without specific, written prior permission.  
        !            48: 
        !            49: IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
        !            50: ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
        !            51: IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
        !            52: ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
        !            53: WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
        !            54: ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
        !            55: SOFTWARE.
        !            56: 
        !            57: ******************************************************************/
        !            58: 
        !            59: /*
        !            60:  * ARGO Project, Computer Sciences Dept., University of Wisconsin - Madison
        !            61:  */
        !            62: /*
        !            63:  * $Header: iso_pcb.c,v 4.5 88/06/29 14:59:56 hagens Exp $
        !            64:  * $Source: /usr/argo/sys/netiso/RCS/iso_pcb.c,v $
        !            65:  *
        !            66:  * Iso address family net-layer(s) pcb stuff. NEH 1/29/87
        !            67:  */
        !            68: 
        !            69: #ifdef ISO
        !            70: 
        !            71: #include "param.h"
        !            72: #include "systm.h"
        !            73: #include "mbuf.h"
        !            74: #include "socket.h"
        !            75: #include "socketvar.h"
        !            76: #include "errno.h"
        !            77: 
        !            78: #include "argo_debug.h"
        !            79: #include "iso.h"
        !            80: #include "clnp.h"
        !            81: #include "../netinet/in_systm.h"
        !            82: #include "../net/if.h"
        !            83: #include "../net/route.h"
        !            84: #include "iso_pcb.h"
        !            85: #include "iso_var.h"
        !            86: #include "protosw.h"
        !            87: 
        !            88: #ifdef TPCONS
        !            89: #include "../netccitt/x25.h"
        !            90: #include "../netccitt/pk.h"
        !            91: #include "../netccitt/pk_var.h"
        !            92: #endif
        !            93: 
        !            94: #define PCBNULL (struct isopcb *)0
        !            95: struct iso_addr zeroiso_addr = {
        !            96:        0
        !            97: };
        !            98: 
        !            99: 
        !           100: /*
        !           101:  * FUNCTION:           iso_pcballoc
        !           102:  *
        !           103:  * PURPOSE:                    creates an isopcb structure in an mbuf,
        !           104:  *                                     with socket (so), and 
        !           105:  *                                     puts it in the queue with head (head)
        !           106:  *
        !           107:  * RETURNS:                    0 if OK, ENOBUFS if can't alloc the necessary mbuf
        !           108:  */
        !           109: int
        !           110: iso_pcballoc(so, head)
        !           111:        struct socket *so;
        !           112:        struct isopcb *head;
        !           113: {
        !           114:        register struct isopcb *isop;
        !           115: 
        !           116:        IFDEBUG(D_ISO)
        !           117:                printf("iso_pcballoc(so 0x%x)\n", so);
        !           118:        ENDDEBUG
        !           119:        MALLOC(isop, struct isopcb *, sizeof(*isop), M_PCB, M_NOWAIT);
        !           120:        if (isop == NULL)
        !           121:                return ENOBUFS;
        !           122:        bzero((caddr_t)isop, sizeof(*isop));
        !           123:        isop->isop_head = head;
        !           124:        isop->isop_socket = so;
        !           125:        insque(isop, head);
        !           126:        if (so)
        !           127:                so->so_pcb = (caddr_t)isop;
        !           128:        return 0;
        !           129: }
        !           130:        
        !           131: /*
        !           132:  * FUNCTION:           iso_pcbbind
        !           133:  *
        !           134:  * PURPOSE:                    binds the address given in *(nam) to the socket
        !           135:  *                                     specified by the isopcb in *(isop)
        !           136:  *                                     If the given address is zero, it makes sure the
        !           137:  *                                     address isn't already in use and if it's got a network
        !           138:  *                                     portion, we look for an interface with that network
        !           139:  *                                     address.  If the address given is zero, we allocate
        !           140:  *                                     a port and stuff it in the (nam) structure.
        !           141:  *
        !           142:  * RETURNS:                    errno E* or 0 if ok.
        !           143:  *
        !           144:  * SIDE EFFECTS:       increments head->isop_lport if it allocates a port #
        !           145:  *
        !           146:  * NOTES:                      
        !           147:  */
        !           148: #define        satosiso(sa)    ((struct sockaddr_iso *)(sa))
        !           149: int
        !           150: iso_pcbbind(isop, nam)
        !           151:        register struct isopcb *isop;
        !           152:        struct mbuf *nam;
        !           153: {
        !           154:        register struct isopcb *head = isop->isop_head;
        !           155:        register struct sockaddr_iso *siso;
        !           156:        struct iso_ifaddr *ia;
        !           157:        union {
        !           158:                char data[2];
        !           159:                u_short s;
        !           160:        } suf;
        !           161: 
        !           162:        IFDEBUG(D_ISO)
        !           163:                printf("iso_pcbbind(isop 0x%x, nam 0x%x)\n", isop, nam);
        !           164:        ENDDEBUG
        !           165:        suf.s = 0;
        !           166:        if (iso_ifaddr == 0) /* any interfaces attached? */
        !           167:                return EADDRNOTAVAIL;
        !           168:        if (isop->isop_laddr)  /* already bound */
        !           169:                return EADDRINUSE;
        !           170:        if(nam == (struct mbuf *)0) {
        !           171:                isop->isop_laddr = &isop->isop_sladdr;
        !           172:                isop->isop_sladdr.siso_len = sizeof(struct sockaddr_iso);
        !           173:                isop->isop_sladdr.siso_family = AF_ISO;
        !           174:                isop->isop_sladdr.siso_tlen = 2;
        !           175:                isop->isop_sladdr.siso_nlen = 0;
        !           176:                isop->isop_sladdr.siso_slen = 0;
        !           177:                isop->isop_sladdr.siso_plen = 0;
        !           178:                goto noname;
        !           179:        }
        !           180:        siso = mtod(nam, struct sockaddr_iso *);
        !           181:        IFDEBUG(D_ISO)
        !           182:                printf("iso_pcbbind(name len 0x%x)\n", nam->m_len);
        !           183:                printf("The address is %s\n", clnp_iso_addrp(&siso->siso_addr));
        !           184:        ENDDEBUG
        !           185:        /*
        !           186:         * We would like sort of length check but since some OSI addrs
        !           187:         * do not have fixed length, we can't really do much.
        !           188:         * The ONLY thing we can say is that an osi addr has to have
        !           189:         * at LEAST an afi and one more byte and had better fit into
        !           190:         * a struct iso_addr.
        !           191:         * However, in fact the size of the whole thing is a struct
        !           192:         * sockaddr_iso, so probably this is what we should check for.
        !           193:         */
        !           194:        if( (nam->m_len < 2) || (nam->m_len < siso->siso_len)) {
        !           195:                        return ENAMETOOLONG;
        !           196:        }
        !           197:        if (siso->siso_tlen) {
        !           198:                        register char *cp = TSEL(siso);
        !           199:                        suf.data[0] = cp[0];
        !           200:                        suf.data[1] = cp[1];
        !           201:        }
        !           202:        if (siso->siso_nlen) {
        !           203:                /* non-zero net addr- better match one of our interfaces */
        !           204:                IFDEBUG(D_ISO)
        !           205:                        printf("iso_pcbbind: bind to NOT zeroisoaddr\n");
        !           206:                ENDDEBUG
        !           207:                for (ia = iso_ifaddr; ia; ia = ia->ia_next) 
        !           208:                        if (SAME_ISOADDR(siso, &ia->ia_addr))
        !           209:                                break;
        !           210:                if (ia == 0)
        !           211:                        return EADDRNOTAVAIL;
        !           212:        } 
        !           213:        if (siso->siso_len <= sizeof (isop->isop_sladdr)) {
        !           214:                isop->isop_laddr = &isop->isop_sladdr;
        !           215:        } else {
        !           216:                if ((nam = m_copy(nam, 0, (int)M_COPYALL)) == 0)
        !           217:                        return ENOBUFS;
        !           218:                isop->isop_laddr = mtod(nam, struct sockaddr_iso *);
        !           219:        }
        !           220:        bcopy((caddr_t)siso, (caddr_t)isop->isop_laddr, siso->siso_len);
        !           221:        if (suf.s || siso->siso_tlen != 2) {
        !           222:                if((suf.s < ISO_PORT_RESERVED) && (siso->siso_tlen <= 2) &&
        !           223:                   (isop->isop_socket->so_state && SS_PRIV) == 0)
        !           224:                        return EACCES;
        !           225:                if ((isop->isop_socket->so_options & SO_REUSEADDR) == 0 &&
        !           226:                        iso_pcblookup(head, 0, (caddr_t)0, isop->isop_laddr))
        !           227:                        return EADDRINUSE;
        !           228:        } else {
        !           229:                register char *cp;
        !           230: noname:
        !           231:                cp = TSEL(isop->isop_laddr);
        !           232:        IFDEBUG(D_ISO)
        !           233:                printf("iso_pcbbind noname\n");
        !           234:        ENDDEBUG
        !           235:                do {
        !           236:                        if (head->isop_lport++ < ISO_PORT_RESERVED ||
        !           237:                            head->isop_lport > ISO_PORT_USERRESERVED)
        !           238:                                head->isop_lport = ISO_PORT_RESERVED;
        !           239:                        suf.s = head->isop_lport;
        !           240:                        cp[0] = suf.data[0];
        !           241:                        cp[1] = suf.data[1];
        !           242:                } while (iso_pcblookup(head, 0, (caddr_t)0, isop->isop_laddr));
        !           243:        }
        !           244:        IFDEBUG(D_ISO)
        !           245:                printf("iso_pcbbind returns 0, suf 0x%x\n", suf);
        !           246:        ENDDEBUG
        !           247:        return 0;
        !           248: }
        !           249: /*
        !           250:  * FUNCTION:           iso_pcbconnect
        !           251:  *
        !           252:  * PURPOSE:                    Make the isopcb (isop) look like it's connected.
        !           253:  *                                     In other words, give it the peer address given in 
        !           254:  *                                     the mbuf * (nam).   Make sure such a combination
        !           255:  *                                     of local, peer addresses doesn't already exist
        !           256:  *                                     for this protocol.  Internet mentality prevails here,
        !           257:  *                                     wherein a src,dst pair uniquely identifies a connection.
        !           258:  *                                     Both net address and port must be specified in argument 
        !           259:  *                                     (nam).
        !           260:  *                                     If we don't have a local address for this socket yet, 
        !           261:  *                                     we pick one by calling iso_pcbbind().
        !           262:  *
        !           263:  * RETURNS:                    errno E* or 0 if ok.
        !           264:  *
        !           265:  * SIDE EFFECTS:       Looks up a route, which may cause one to be left
        !           266:  *                                     in the isopcb.
        !           267:  *
        !           268:  * NOTES:                      
        !           269:  */
        !           270: int
        !           271: iso_pcbconnect(isop, nam)
        !           272:        register struct isopcb *isop;
        !           273:        struct mbuf *nam;
        !           274: {
        !           275:        register struct sockaddr_iso    *siso = mtod(nam, struct sockaddr_iso *);
        !           276:        int                                                             local_zero, error = 0;
        !           277:        struct iso_ifaddr                               *ia;
        !           278: 
        !           279:        IFDEBUG(D_ISO)
        !           280:                printf("iso_pcbconnect(isop 0x%x sock 0x%x nam 0x%x",
        !           281:                                        isop, isop->isop_socket, nam);
        !           282:                printf("nam->m_len 0x%x), addr:\n", nam->m_len);
        !           283:                dump_isoaddr(siso);
        !           284:        ENDDEBUG
        !           285:        if (nam->m_len < siso->siso_len)
        !           286:                return EINVAL; 
        !           287:        if (siso->siso_family != AF_ISO)
        !           288:                return EAFNOSUPPORT;
        !           289:        if (siso->siso_nlen == 0) {
        !           290:                if (ia = iso_ifaddr) {
        !           291:                        int nlen = ia->ia_addr.siso_nlen;
        !           292:                        ovbcopy(TSEL(siso), nlen + TSEL(siso),
        !           293:                                siso->siso_plen + siso->siso_tlen + siso->siso_slen);
        !           294:                        bcopy((caddr_t)&ia->ia_addr.siso_addr,
        !           295:                                  (caddr_t)&siso->siso_addr, nlen + 1);
        !           296:                        /* includes siso->siso_nlen = nlen; */
        !           297:                } else
        !           298:                        return EADDRNOTAVAIL;
        !           299:        }
        !           300:        /*
        !           301:         * Local zero means either not bound, or bound to a TSEL, but no
        !           302:         * particular local interface.  So, if we want to send somebody
        !           303:         * we need to choose a return address.
        !           304:         */
        !           305:        local_zero = 
        !           306:                ((isop->isop_laddr == 0) || (isop->isop_laddr->siso_nlen == 0));
        !           307:        if (local_zero) {
        !           308:                int flags;
        !           309: 
        !           310:                IFDEBUG(D_ISO)
        !           311:                        printf("iso_pcbconnect localzero 1\n");
        !           312:                ENDDEBUG
        !           313:                /* 
        !           314:                 * If route is known or can be allocated now,
        !           315:                 * our src addr is taken from the i/f, else punt.
        !           316:                 */
        !           317:                flags = isop->isop_socket->so_options & SO_DONTROUTE;
        !           318:                if (error = clnp_route(&siso->siso_addr, &isop->isop_route, flags,
        !           319:                                                (struct sockaddr **)0, &ia))
        !           320:                        return error;
        !           321:                IFDEBUG(D_ISO)
        !           322:                        printf("iso_pcbconnect localzero 2, ro->ro_rt 0x%x",
        !           323:                                isop->isop_route.ro_rt);
        !           324:                        printf(" ia 0x%x\n", ia);
        !           325:                ENDDEBUG
        !           326:        }
        !           327:        IFDEBUG(D_ISO)
        !           328:                printf("in iso_pcbconnect before lookup isop 0x%x isop->sock 0x%x\n", 
        !           329:                        isop, isop->isop_socket);
        !           330:        ENDDEBUG
        !           331:        if (local_zero) {
        !           332:                int nlen, tlen, totlen; caddr_t oldtsel, newtsel;
        !           333:                siso = isop->isop_laddr;
        !           334:                if (siso == 0 || siso->siso_tlen == 0)
        !           335:                        (void)iso_pcbbind(isop, (struct mbuf *)0);
        !           336:                /*
        !           337:                 * Here we have problem of squezeing in a definite network address
        !           338:                 * into an existing sockaddr_iso, which in fact may not have room
        !           339:                 * for it.  This gets messy.
        !           340:                 */
        !           341:                siso = isop->isop_laddr;
        !           342:                oldtsel = TSEL(siso);
        !           343:                tlen = siso->siso_tlen;
        !           344:                nlen = ia->ia_addr.siso_nlen;
        !           345:                totlen = tlen + nlen + _offsetof(struct sockaddr_iso, siso_data[0]);
        !           346:                if ((siso == &isop->isop_sladdr) &&
        !           347:                        (totlen > sizeof(isop->isop_sladdr))) {
        !           348:                        struct mbuf *m = m_get(MT_SONAME, M_DONTWAIT);
        !           349:                        if (m == 0)
        !           350:                                        return ENOBUFS;
        !           351:                        m->m_len = totlen;
        !           352:                        isop->isop_laddr = siso = mtod(m, struct sockaddr_iso *);
        !           353:                }
        !           354:                siso->siso_nlen = ia->ia_addr.siso_nlen;
        !           355:                newtsel = TSEL(siso);
        !           356:                ovbcopy(oldtsel, newtsel, tlen);
        !           357:                bcopy(ia->ia_addr.siso_data, siso->siso_data, nlen);
        !           358:                siso->siso_tlen = tlen;
        !           359:                siso->siso_family = AF_ISO;
        !           360:                siso->siso_len = totlen;
        !           361:                siso = mtod(nam, struct sockaddr_iso *);
        !           362:        }
        !           363:        IFDEBUG(D_ISO)
        !           364:                printf("in iso_pcbconnect before bcopy isop 0x%x isop->sock 0x%x\n", 
        !           365:                        isop, isop->isop_socket);
        !           366:        ENDDEBUG
        !           367:        /*
        !           368:         * If we had to allocate space to a previous big foreign address,
        !           369:         * and for some reason we didn't free it, we reuse it knowing
        !           370:         * that is going to be big enough, as sockaddrs are delivered in
        !           371:         * 128 byte mbufs.
        !           372:         * If the foreign address is small enough, we use default space;
        !           373:         * otherwise, we grab an mbuf to copy into.
        !           374:         */
        !           375:        if (isop->isop_faddr == 0 || isop->isop_faddr == &isop->isop_sfaddr) {
        !           376:                if (siso->siso_len <= sizeof(isop->isop_sfaddr))
        !           377:                        isop->isop_faddr = &isop->isop_sfaddr;
        !           378:                else {
        !           379:                        struct mbuf *m = m_get(MT_SONAME, M_DONTWAIT);
        !           380:                        if (m == 0)
        !           381:                                return ENOBUFS;
        !           382:                        isop->isop_faddr = mtod(m, struct sockaddr_iso *);
        !           383:                }
        !           384:        }
        !           385:        bcopy((caddr_t)siso, (caddr_t)isop->isop_faddr, siso->siso_len);
        !           386:        IFDEBUG(D_ISO)
        !           387:                printf("in iso_pcbconnect after bcopy isop 0x%x isop->sock 0x%x\n", 
        !           388:                        isop, isop->isop_socket);
        !           389:                printf("iso_pcbconnect connected to addr:\n");
        !           390:                dump_isoaddr(isop->isop_faddr);
        !           391:                printf("iso_pcbconnect end: src addr:\n");
        !           392:                dump_isoaddr(isop->isop_laddr);
        !           393:        ENDDEBUG
        !           394:        return 0;
        !           395: }
        !           396: 
        !           397: /*
        !           398:  * FUNCTION:           iso_pcbdisconnect()
        !           399:  *
        !           400:  * PURPOSE:                    washes away the peer address info so the socket
        !           401:  *                                     appears to be disconnected.
        !           402:  *                                     If there's no file descriptor associated with the socket
        !           403:  *                                     it detaches the pcb.
        !           404:  *
        !           405:  * RETURNS:                    Nada.
        !           406:  *
        !           407:  * SIDE EFFECTS:       May detach the pcb.
        !           408:  *
        !           409:  * NOTES:                      
        !           410:  */
        !           411: void
        !           412: iso_pcbdisconnect(isop)
        !           413:        struct isopcb *isop;
        !           414: {
        !           415:        void iso_pcbdetach();
        !           416:        register struct sockaddr_iso *siso;
        !           417: 
        !           418:        IFDEBUG(D_ISO)
        !           419:                printf("iso_pcbdisconnect(isop 0x%x)\n", isop);
        !           420:        ENDDEBUG
        !           421:        /*
        !           422:         * Preserver binding infnormation if already bound.
        !           423:         */
        !           424:        if ((siso = isop->isop_laddr) && siso->siso_nlen && siso->siso_tlen) {
        !           425:                caddr_t otsel = TSEL(siso);
        !           426:                siso->siso_nlen = 0;
        !           427:                ovbcopy(otsel, TSEL(siso), siso->siso_tlen);
        !           428:        }
        !           429:        if (isop->isop_faddr && isop->isop_faddr != &isop->isop_sfaddr)
        !           430:                m_freem(dtom(isop->isop_faddr));
        !           431:        isop->isop_faddr = 0;
        !           432:        if (isop->isop_socket->so_state & SS_NOFDREF)
        !           433:                iso_pcbdetach(isop);
        !           434: }
        !           435: 
        !           436: /*
        !           437:  * FUNCTION:           iso_pcbdetach
        !           438:  *
        !           439:  * PURPOSE:                    detach the pcb at *(isop) from it's socket and free
        !           440:  *                                     the mbufs associated with the pcb..
        !           441:  *                                     Dequeues (isop) from its head.
        !           442:  *
        !           443:  * RETURNS:                    Nada.
        !           444:  *
        !           445:  * SIDE EFFECTS:       
        !           446:  *
        !           447:  * NOTES:                      
        !           448:  */
        !           449: void
        !           450: iso_pcbdetach(isop)
        !           451:        struct isopcb *isop;
        !           452: {
        !           453:        struct socket *so = isop->isop_socket;
        !           454: 
        !           455:        IFDEBUG(D_ISO)
        !           456:                printf("iso_pcbdetach(isop 0x%x socket 0x%x so 0x%x)\n", 
        !           457:                        isop, isop->isop_socket, so);
        !           458:        ENDDEBUG
        !           459: #ifdef TPCONS
        !           460:        if (isop->isop_refcnt) {
        !           461:                register struct pklcd *lcp = (struct pklcd *)isop->isop_chan;
        !           462:                if (--isop->isop_refcnt > 0)
        !           463:                        return;
        !           464:                if (lcp && lcp->lcd_state == DATA_TRANSFER)
        !           465:                        pk_disconnect(lcp);
        !           466:                isop->isop_chan = 0;
        !           467:        }
        !           468: #endif
        !           469:        if (so) { /* in the x.25 domain, we sometimes have no socket */
        !           470:                so->so_pcb = 0;
        !           471:                sofree(so); 
        !           472:        }
        !           473:        IFDEBUG(D_ISO)
        !           474:                printf("iso_pcbdetach 2 \n");
        !           475:        ENDDEBUG
        !           476:        if (isop->isop_options)
        !           477:                (void)m_free(isop->isop_options);
        !           478:        IFDEBUG(D_ISO)
        !           479:                printf("iso_pcbdetach 3 \n");
        !           480:        ENDDEBUG
        !           481:        if (isop->isop_route.ro_rt)
        !           482:                rtfree(isop->isop_route.ro_rt);
        !           483:        IFDEBUG(D_ISO)
        !           484:                printf("iso_pcbdetach 3.1\n");
        !           485:        ENDDEBUG
        !           486:        if (isop->isop_clnpcache != NULL) {
        !           487:                struct clnp_cache *clcp =
        !           488:                        mtod(isop->isop_clnpcache, struct clnp_cache *);
        !           489:                IFDEBUG(D_ISO)
        !           490:                        printf("iso_pcbdetach 3.2: clcp 0x%x freeing clc_hdr x%x\n", 
        !           491:                                clcp, clcp->clc_hdr);
        !           492:                ENDDEBUG
        !           493:                if (clcp->clc_hdr != NULL)
        !           494:                        m_free(clcp->clc_hdr);
        !           495:                IFDEBUG(D_ISO)
        !           496:                        printf("iso_pcbdetach 3.3: freeing cache x%x\n", 
        !           497:                                isop->isop_clnpcache);
        !           498:                ENDDEBUG
        !           499:                m_free(isop->isop_clnpcache);
        !           500:        }
        !           501:        IFDEBUG(D_ISO)
        !           502:                printf("iso_pcbdetach 4 \n");
        !           503:        ENDDEBUG
        !           504:        remque(isop);
        !           505:        IFDEBUG(D_ISO)
        !           506:                printf("iso_pcbdetach 5 \n");
        !           507:        ENDDEBUG
        !           508:        if (isop->isop_laddr && (isop->isop_laddr != &isop->isop_sladdr))
        !           509:                m_freem(dtom(isop->isop_laddr));
        !           510:        free((caddr_t)isop, M_PCB);
        !           511: }
        !           512: 
        !           513: 
        !           514: /*
        !           515:  * FUNCTION:           iso_pcbnotify
        !           516:  *
        !           517:  * PURPOSE:                    notify all connections in this protocol's queue (head)
        !           518:  *                                     that have peer address (dst) of the problem (errno)
        !           519:  *                                     by calling (notify) on the connections' isopcbs.
        !           520:  *
        !           521:  * RETURNS:                    Rien.
        !           522:  *
        !           523:  * SIDE EFFECTS:       
        !           524:  *
        !           525:  * NOTES:                      (notify) is called at splimp!
        !           526:  */
        !           527: void
        !           528: iso_pcbnotify(head, siso, errno, notify)
        !           529:        struct isopcb *head;
        !           530:        register struct sockaddr_iso *siso;
        !           531:        int errno, (*notify)();
        !           532: {
        !           533:        register struct isopcb *isop;
        !           534:        int s = splimp();
        !           535: 
        !           536:        IFDEBUG(D_ISO)
        !           537:                printf("iso_pcbnotify(head 0x%x, notify 0x%x) dst:\n", head, notify);
        !           538:        ENDDEBUG
        !           539:        for (isop = head->isop_next; isop != head; isop = isop->isop_next) {
        !           540:                if (isop->isop_socket == 0 || isop->isop_faddr == 0 ||
        !           541:                        !SAME_ISOADDR(siso, isop->isop_faddr)) {
        !           542:                        IFDEBUG(D_ISO)
        !           543:                                printf("iso_pcbnotify: CONTINUE isop 0x%x, sock 0x%x\n" ,
        !           544:                                        isop, isop->isop_socket);
        !           545:                                printf("addrmatch cmp'd with (0x%x):\n", isop->isop_faddr);
        !           546:                                dump_isoaddr(isop->isop_faddr);
        !           547:                        ENDDEBUG
        !           548:                        continue;
        !           549:                }
        !           550:                if (errno) 
        !           551:                        isop->isop_socket->so_error = errno;
        !           552:                if (notify)
        !           553:                        (*notify)(isop);
        !           554:        }
        !           555:        splx(s);
        !           556:        IFDEBUG(D_ISO)
        !           557:                printf("END OF iso_pcbnotify\n" );
        !           558:        ENDDEBUG
        !           559: }
        !           560: 
        !           561: 
        !           562: /*
        !           563:  * FUNCTION:           iso_pcblookup
        !           564:  *
        !           565:  * PURPOSE:                    looks for a given combination of (faddr), (fport),
        !           566:  *                                     (lport), (laddr) in the queue named by (head).
        !           567:  *                                     Argument (flags) is ignored.
        !           568:  *
        !           569:  * RETURNS:                    ptr to the isopcb if it finds a connection matching
        !           570:  *                                     these arguments, o.w. returns zero.
        !           571:  *
        !           572:  * SIDE EFFECTS:       
        !           573:  *
        !           574:  * NOTES:                      
        !           575:  */
        !           576: struct isopcb *
        !           577: iso_pcblookup(head, fportlen, fport, laddr)
        !           578:        struct isopcb *head;
        !           579:        register struct sockaddr_iso *laddr;
        !           580:        caddr_t fport;
        !           581:        int fportlen;
        !           582: {
        !           583:        register struct isopcb *isop;
        !           584:        register caddr_t lp = TSEL(laddr);
        !           585:        unsigned int llen = laddr->siso_tlen;
        !           586: 
        !           587:        IFDEBUG(D_ISO)
        !           588:                printf("iso_pcblookup(head 0x%x laddr 0x%x fport 0x%x)\n", 
        !           589:                        head, laddr, fport);
        !           590:        ENDDEBUG
        !           591:        for (isop = head->isop_next; isop != head; isop = isop->isop_next) {
        !           592:                if (isop->isop_laddr == 0 || isop->isop_laddr == laddr)
        !           593:                        continue;
        !           594:                if (isop->isop_laddr->siso_tlen != llen)
        !           595:                        continue;
        !           596:                if (bcmp(lp, TSEL(isop->isop_laddr), llen))
        !           597:                        continue;
        !           598:                if (fportlen && isop->isop_faddr &&
        !           599:                        bcmp(fport, TSEL(isop->isop_faddr), (unsigned)fportlen))
        !           600:                        continue;
        !           601:                /*      PHASE2
        !           602:                 *      addrmatch1 should be iso_addrmatch(a, b, mask)
        !           603:                 *      where mask is taken from isop->isop_laddrmask (new field)
        !           604:                 *      isop_lnetmask will also be available in isop
        !           605:                if (laddr != &zeroiso_addr &&
        !           606:                        !iso_addrmatch1(laddr, &(isop->isop_laddr.siso_addr)))
        !           607:                        continue;
        !           608:                */
        !           609:                if (laddr->siso_nlen && (!SAME_ISOADDR(laddr, isop->isop_laddr)))
        !           610:                        continue;
        !           611:                return (isop);
        !           612:        }
        !           613:        return (struct isopcb *)0;
        !           614: }
        !           615: #endif ISO

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.