Annotation of Net2/netns/idp_usrreq.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1984, 1985, 1986, 1987 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:  *     @(#)idp_usrreq.c        7.11 (Berkeley) 6/27/91
        !            34:  */
        !            35: 
        !            36: #include "param.h"
        !            37: #include "malloc.h"
        !            38: #include "mbuf.h"
        !            39: #include "protosw.h"
        !            40: #include "socket.h"
        !            41: #include "socketvar.h"
        !            42: #include "errno.h"
        !            43: #include "stat.h"
        !            44: 
        !            45: #include "../net/if.h"
        !            46: #include "../net/route.h"
        !            47: 
        !            48: #include "ns.h"
        !            49: #include "ns_pcb.h"
        !            50: #include "ns_if.h"
        !            51: #include "idp.h"
        !            52: #include "idp_var.h"
        !            53: #include "ns_error.h"
        !            54: 
        !            55: /*
        !            56:  * IDP protocol implementation.
        !            57:  */
        !            58: 
        !            59: struct sockaddr_ns idp_ns = { sizeof(idp_ns), AF_NS };
        !            60: 
        !            61: /*
        !            62:  *  This may also be called for raw listeners.
        !            63:  */
        !            64: idp_input(m, nsp)
        !            65:        struct mbuf *m;
        !            66:        register struct nspcb *nsp;
        !            67: {
        !            68:        register struct idp *idp = mtod(m, struct idp *);
        !            69:        struct ifnet *ifp = m->m_pkthdr.rcvif;
        !            70: 
        !            71:        if (nsp==0)
        !            72:                panic("No nspcb");
        !            73:        /*
        !            74:         * Construct sockaddr format source address.
        !            75:         * Stuff source address and datagram in user buffer.
        !            76:         */
        !            77:        idp_ns.sns_addr = idp->idp_sna;
        !            78:        if (ns_neteqnn(idp->idp_sna.x_net, ns_zeronet) && ifp) {
        !            79:                register struct ifaddr *ifa;
        !            80: 
        !            81:                for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next) {
        !            82:                        if (ifa->ifa_addr->sa_family == AF_NS) {
        !            83:                                idp_ns.sns_addr.x_net =
        !            84:                                        IA_SNS(ifa)->sns_addr.x_net;
        !            85:                                break;
        !            86:                        }
        !            87:                }
        !            88:        }
        !            89:        nsp->nsp_rpt = idp->idp_pt;
        !            90:        if ( ! (nsp->nsp_flags & NSP_RAWIN) ) {
        !            91:                m->m_len -= sizeof (struct idp);
        !            92:                m->m_pkthdr.len -= sizeof (struct idp);
        !            93:                m->m_data += sizeof (struct idp);
        !            94:        }
        !            95:        if (sbappendaddr(&nsp->nsp_socket->so_rcv, (struct sockaddr *)&idp_ns,
        !            96:            m, (struct mbuf *)0) == 0)
        !            97:                goto bad;
        !            98:        sorwakeup(nsp->nsp_socket);
        !            99:        return;
        !           100: bad:
        !           101:        m_freem(m);
        !           102: }
        !           103: 
        !           104: idp_abort(nsp)
        !           105:        struct nspcb *nsp;
        !           106: {
        !           107:        struct socket *so = nsp->nsp_socket;
        !           108: 
        !           109:        ns_pcbdisconnect(nsp);
        !           110:        soisdisconnected(so);
        !           111: }
        !           112: /*
        !           113:  * Drop connection, reporting
        !           114:  * the specified error.
        !           115:  */
        !           116: struct nspcb *
        !           117: idp_drop(nsp, errno)
        !           118:        register struct nspcb *nsp;
        !           119:        int errno;
        !           120: {
        !           121:        struct socket *so = nsp->nsp_socket;
        !           122: 
        !           123:        /*
        !           124:         * someday, in the xerox world
        !           125:         * we will generate error protocol packets
        !           126:         * announcing that the socket has gone away.
        !           127:         */
        !           128:        /*if (TCPS_HAVERCVDSYN(tp->t_state)) {
        !           129:                tp->t_state = TCPS_CLOSED;
        !           130:                (void) tcp_output(tp);
        !           131:        }*/
        !           132:        so->so_error = errno;
        !           133:        ns_pcbdisconnect(nsp);
        !           134:        soisdisconnected(so);
        !           135: }
        !           136: 
        !           137: int noIdpRoute;
        !           138: idp_output(nsp, m0)
        !           139:        struct nspcb *nsp;
        !           140:        struct mbuf *m0;
        !           141: {
        !           142:        register struct mbuf *m;
        !           143:        register struct idp *idp;
        !           144:        register struct socket *so;
        !           145:        register int len = 0;
        !           146:        register struct route *ro;
        !           147:        struct mbuf *mprev;
        !           148:        extern int idpcksum;
        !           149: 
        !           150:        /*
        !           151:         * Calculate data length.
        !           152:         */
        !           153:        for (m = m0; m; m = m->m_next) {
        !           154:                mprev = m;
        !           155:                len += m->m_len;
        !           156:        }
        !           157:        /*
        !           158:         * Make sure packet is actually of even length.
        !           159:         */
        !           160:        
        !           161:        if (len & 1) {
        !           162:                m = mprev;
        !           163:                if ((m->m_flags & M_EXT) == 0 &&
        !           164:                        (m->m_len + m->m_data < &m->m_dat[MLEN])) {
        !           165:                        m->m_len++;
        !           166:                } else {
        !           167:                        struct mbuf *m1 = m_get(M_DONTWAIT, MT_DATA);
        !           168: 
        !           169:                        if (m1 == 0) {
        !           170:                                m_freem(m0);
        !           171:                                return (ENOBUFS);
        !           172:                        }
        !           173:                        m1->m_len = 1;
        !           174:                        * mtod(m1, char *) = 0;
        !           175:                        m->m_next = m1;
        !           176:                }
        !           177:                m0->m_pkthdr.len++;
        !           178:        }
        !           179: 
        !           180:        /*
        !           181:         * Fill in mbuf with extended IDP header
        !           182:         * and addresses and length put into network format.
        !           183:         */
        !           184:        m = m0;
        !           185:        if (nsp->nsp_flags & NSP_RAWOUT) {
        !           186:                idp = mtod(m, struct idp *);
        !           187:        } else {
        !           188:                M_PREPEND(m, sizeof (struct idp), M_DONTWAIT);
        !           189:                if (m == 0)
        !           190:                        return (ENOBUFS);
        !           191:                idp = mtod(m, struct idp *);
        !           192:                idp->idp_tc = 0;
        !           193:                idp->idp_pt = nsp->nsp_dpt;
        !           194:                idp->idp_sna = nsp->nsp_laddr;
        !           195:                idp->idp_dna = nsp->nsp_faddr;
        !           196:                len += sizeof (struct idp);
        !           197:        }
        !           198: 
        !           199:        idp->idp_len = htons((u_short)len);
        !           200: 
        !           201:        if (idpcksum) {
        !           202:                idp->idp_sum = 0;
        !           203:                len = ((len - 1) | 1) + 1;
        !           204:                idp->idp_sum = ns_cksum(m, len);
        !           205:        } else
        !           206:                idp->idp_sum = 0xffff;
        !           207: 
        !           208:        /*
        !           209:         * Output datagram.
        !           210:         */
        !           211:        so = nsp->nsp_socket;
        !           212:        if (so->so_options & SO_DONTROUTE)
        !           213:                return (ns_output(m, (struct route *)0,
        !           214:                    (so->so_options & SO_BROADCAST) | NS_ROUTETOIF));
        !           215:        /*
        !           216:         * Use cached route for previous datagram if
        !           217:         * possible.  If the previous net was the same
        !           218:         * and the interface was a broadcast medium, or
        !           219:         * if the previous destination was identical,
        !           220:         * then we are ok.
        !           221:         *
        !           222:         * NB: We don't handle broadcasts because that
        !           223:         *     would require 3 subroutine calls.
        !           224:         */
        !           225:        ro = &nsp->nsp_route;
        !           226: #ifdef ancient_history
        !           227:        /*
        !           228:         * I think that this will all be handled in ns_pcbconnect!
        !           229:         */
        !           230:        if (ro->ro_rt) {
        !           231:                if(ns_neteq(nsp->nsp_lastdst, idp->idp_dna)) {
        !           232:                        /*
        !           233:                         * This assumes we have no GH type routes
        !           234:                         */
        !           235:                        if (ro->ro_rt->rt_flags & RTF_HOST) {
        !           236:                                if (!ns_hosteq(nsp->nsp_lastdst, idp->idp_dna))
        !           237:                                        goto re_route;
        !           238: 
        !           239:                        }
        !           240:                        if ((ro->ro_rt->rt_flags & RTF_GATEWAY) == 0) {
        !           241:                                register struct ns_addr *dst =
        !           242:                                                &satons_addr(ro->ro_dst);
        !           243:                                dst->x_host = idp->idp_dna.x_host;
        !           244:                        }
        !           245:                        /* 
        !           246:                         * Otherwise, we go through the same gateway
        !           247:                         * and dst is already set up.
        !           248:                         */
        !           249:                } else {
        !           250:                re_route:
        !           251:                        RTFREE(ro->ro_rt);
        !           252:                        ro->ro_rt = (struct rtentry *)0;
        !           253:                }
        !           254:        }
        !           255:        nsp->nsp_lastdst = idp->idp_dna;
        !           256: #endif ancient_history
        !           257:        if (noIdpRoute) ro = 0;
        !           258:        return (ns_output(m, ro, so->so_options & SO_BROADCAST));
        !           259: }
        !           260: /* ARGSUSED */
        !           261: idp_ctloutput(req, so, level, name, value)
        !           262:        int req, level;
        !           263:        struct socket *so;
        !           264:        int name;
        !           265:        struct mbuf **value;
        !           266: {
        !           267:        register struct mbuf *m;
        !           268:        struct nspcb *nsp = sotonspcb(so);
        !           269:        int mask, error = 0;
        !           270:        extern long ns_pexseq;
        !           271: 
        !           272:        if (nsp == NULL)
        !           273:                return (EINVAL);
        !           274: 
        !           275:        switch (req) {
        !           276: 
        !           277:        case PRCO_GETOPT:
        !           278:                if (value==NULL)
        !           279:                        return (EINVAL);
        !           280:                m = m_get(M_DONTWAIT, MT_DATA);
        !           281:                if (m==NULL)
        !           282:                        return (ENOBUFS);
        !           283:                switch (name) {
        !           284: 
        !           285:                case SO_ALL_PACKETS:
        !           286:                        mask = NSP_ALL_PACKETS;
        !           287:                        goto get_flags;
        !           288: 
        !           289:                case SO_HEADERS_ON_INPUT:
        !           290:                        mask = NSP_RAWIN;
        !           291:                        goto get_flags;
        !           292:                        
        !           293:                case SO_HEADERS_ON_OUTPUT:
        !           294:                        mask = NSP_RAWOUT;
        !           295:                get_flags:
        !           296:                        m->m_len = sizeof(short);
        !           297:                        *mtod(m, short *) = nsp->nsp_flags & mask;
        !           298:                        break;
        !           299: 
        !           300:                case SO_DEFAULT_HEADERS:
        !           301:                        m->m_len = sizeof(struct idp);
        !           302:                        {
        !           303:                                register struct idp *idp = mtod(m, struct idp *);
        !           304:                                idp->idp_len = 0;
        !           305:                                idp->idp_sum = 0;
        !           306:                                idp->idp_tc = 0;
        !           307:                                idp->idp_pt = nsp->nsp_dpt;
        !           308:                                idp->idp_dna = nsp->nsp_faddr;
        !           309:                                idp->idp_sna = nsp->nsp_laddr;
        !           310:                        }
        !           311:                        break;
        !           312: 
        !           313:                case SO_SEQNO:
        !           314:                        m->m_len = sizeof(long);
        !           315:                        *mtod(m, long *) = ns_pexseq++;
        !           316:                        break;
        !           317: 
        !           318:                default:
        !           319:                        error = EINVAL;
        !           320:                }
        !           321:                *value = m;
        !           322:                break;
        !           323: 
        !           324:        case PRCO_SETOPT:
        !           325:                switch (name) {
        !           326:                        int *ok;
        !           327: 
        !           328:                case SO_ALL_PACKETS:
        !           329:                        mask = NSP_ALL_PACKETS;
        !           330:                        goto set_head;
        !           331: 
        !           332:                case SO_HEADERS_ON_INPUT:
        !           333:                        mask = NSP_RAWIN;
        !           334:                        goto set_head;
        !           335: 
        !           336:                case SO_HEADERS_ON_OUTPUT:
        !           337:                        mask = NSP_RAWOUT;
        !           338:                set_head:
        !           339:                        if (value && *value) {
        !           340:                                ok = mtod(*value, int *);
        !           341:                                if (*ok)
        !           342:                                        nsp->nsp_flags |= mask;
        !           343:                                else
        !           344:                                        nsp->nsp_flags &= ~mask;
        !           345:                        } else error = EINVAL;
        !           346:                        break;
        !           347: 
        !           348:                case SO_DEFAULT_HEADERS:
        !           349:                        {
        !           350:                                register struct idp *idp
        !           351:                                    = mtod(*value, struct idp *);
        !           352:                                nsp->nsp_dpt = idp->idp_pt;
        !           353:                        }
        !           354:                        break;
        !           355: #ifdef NSIP
        !           356: 
        !           357:                case SO_NSIP_ROUTE:
        !           358:                        error = nsip_route(*value);
        !           359:                        break;
        !           360: #endif NSIP
        !           361:                default:
        !           362:                        error = EINVAL;
        !           363:                }
        !           364:                if (value && *value)
        !           365:                        m_freem(*value);
        !           366:                break;
        !           367:        }
        !           368:        return (error);
        !           369: }
        !           370: 
        !           371: /*ARGSUSED*/
        !           372: idp_usrreq(so, req, m, nam, control)
        !           373:        struct socket *so;
        !           374:        int req;
        !           375:        struct mbuf *m, *nam, *control;
        !           376: {
        !           377:        struct nspcb *nsp = sotonspcb(so);
        !           378:        int error = 0;
        !           379: 
        !           380:        if (req == PRU_CONTROL)
        !           381:                 return (ns_control(so, (int)m, (caddr_t)nam,
        !           382:                        (struct ifnet *)control));
        !           383:        if (control && control->m_len) {
        !           384:                error = EINVAL;
        !           385:                goto release;
        !           386:        }
        !           387:        if (nsp == NULL && req != PRU_ATTACH) {
        !           388:                error = EINVAL;
        !           389:                goto release;
        !           390:        }
        !           391:        switch (req) {
        !           392: 
        !           393:        case PRU_ATTACH:
        !           394:                if (nsp != NULL) {
        !           395:                        error = EINVAL;
        !           396:                        break;
        !           397:                }
        !           398:                error = ns_pcballoc(so, &nspcb);
        !           399:                if (error)
        !           400:                        break;
        !           401:                error = soreserve(so, (u_long) 2048, (u_long) 2048);
        !           402:                if (error)
        !           403:                        break;
        !           404:                break;
        !           405: 
        !           406:        case PRU_DETACH:
        !           407:                if (nsp == NULL) {
        !           408:                        error = ENOTCONN;
        !           409:                        break;
        !           410:                }
        !           411:                ns_pcbdetach(nsp);
        !           412:                break;
        !           413: 
        !           414:        case PRU_BIND:
        !           415:                error = ns_pcbbind(nsp, nam);
        !           416:                break;
        !           417: 
        !           418:        case PRU_LISTEN:
        !           419:                error = EOPNOTSUPP;
        !           420:                break;
        !           421: 
        !           422:        case PRU_CONNECT:
        !           423:                if (!ns_nullhost(nsp->nsp_faddr)) {
        !           424:                        error = EISCONN;
        !           425:                        break;
        !           426:                }
        !           427:                error = ns_pcbconnect(nsp, nam);
        !           428:                if (error == 0)
        !           429:                        soisconnected(so);
        !           430:                break;
        !           431: 
        !           432:        case PRU_CONNECT2:
        !           433:                error = EOPNOTSUPP;
        !           434:                break;
        !           435: 
        !           436:        case PRU_ACCEPT:
        !           437:                error = EOPNOTSUPP;
        !           438:                break;
        !           439: 
        !           440:        case PRU_DISCONNECT:
        !           441:                if (ns_nullhost(nsp->nsp_faddr)) {
        !           442:                        error = ENOTCONN;
        !           443:                        break;
        !           444:                }
        !           445:                ns_pcbdisconnect(nsp);
        !           446:                soisdisconnected(so);
        !           447:                break;
        !           448: 
        !           449:        case PRU_SHUTDOWN:
        !           450:                socantsendmore(so);
        !           451:                break;
        !           452: 
        !           453:        case PRU_SEND:
        !           454:        {
        !           455:                struct ns_addr laddr;
        !           456:                int s;
        !           457: 
        !           458:                if (nam) {
        !           459:                        laddr = nsp->nsp_laddr;
        !           460:                        if (!ns_nullhost(nsp->nsp_faddr)) {
        !           461:                                error = EISCONN;
        !           462:                                break;
        !           463:                        }
        !           464:                        /*
        !           465:                         * Must block input while temporarily connected.
        !           466:                         */
        !           467:                        s = splnet();
        !           468:                        error = ns_pcbconnect(nsp, nam);
        !           469:                        if (error) {
        !           470:                                splx(s);
        !           471:                                break;
        !           472:                        }
        !           473:                } else {
        !           474:                        if (ns_nullhost(nsp->nsp_faddr)) {
        !           475:                                error = ENOTCONN;
        !           476:                                break;
        !           477:                        }
        !           478:                }
        !           479:                error = idp_output(nsp, m);
        !           480:                m = NULL;
        !           481:                if (nam) {
        !           482:                        ns_pcbdisconnect(nsp);
        !           483:                        splx(s);
        !           484:                        nsp->nsp_laddr.x_host = laddr.x_host;
        !           485:                        nsp->nsp_laddr.x_port = laddr.x_port;
        !           486:                }
        !           487:        }
        !           488:                break;
        !           489: 
        !           490:        case PRU_ABORT:
        !           491:                ns_pcbdetach(nsp);
        !           492:                sofree(so);
        !           493:                soisdisconnected(so);
        !           494:                break;
        !           495: 
        !           496:        case PRU_SOCKADDR:
        !           497:                ns_setsockaddr(nsp, nam);
        !           498:                break;
        !           499: 
        !           500:        case PRU_PEERADDR:
        !           501:                ns_setpeeraddr(nsp, nam);
        !           502:                break;
        !           503: 
        !           504:        case PRU_SENSE:
        !           505:                /*
        !           506:                 * stat: don't bother with a blocksize.
        !           507:                 */
        !           508:                return (0);
        !           509: 
        !           510:        case PRU_SENDOOB:
        !           511:        case PRU_FASTTIMO:
        !           512:        case PRU_SLOWTIMO:
        !           513:        case PRU_PROTORCV:
        !           514:        case PRU_PROTOSEND:
        !           515:                error =  EOPNOTSUPP;
        !           516:                break;
        !           517: 
        !           518:        case PRU_CONTROL:
        !           519:        case PRU_RCVD:
        !           520:        case PRU_RCVOOB:
        !           521:                return (EOPNOTSUPP);    /* do not free mbuf's */
        !           522: 
        !           523:        default:
        !           524:                panic("idp_usrreq");
        !           525:        }
        !           526: release:
        !           527:        if (control != NULL)
        !           528:                m_freem(control);
        !           529:        if (m != NULL)
        !           530:                m_freem(m);
        !           531:        return (error);
        !           532: }
        !           533: /*ARGSUSED*/
        !           534: idp_raw_usrreq(so, req, m, nam, control)
        !           535:        struct socket *so;
        !           536:        int req;
        !           537:        struct mbuf *m, *nam, *control;
        !           538: {
        !           539:        int error = 0;
        !           540:        struct nspcb *nsp = sotonspcb(so);
        !           541:        extern struct nspcb nsrawpcb;
        !           542: 
        !           543:        switch (req) {
        !           544: 
        !           545:        case PRU_ATTACH:
        !           546: 
        !           547:                if (!(so->so_state & SS_PRIV) || (nsp != NULL)) {
        !           548:                        error = EINVAL;
        !           549:                        break;
        !           550:                }
        !           551:                error = ns_pcballoc(so, &nsrawpcb);
        !           552:                if (error)
        !           553:                        break;
        !           554:                error = soreserve(so, (u_long) 2048, (u_long) 2048);
        !           555:                if (error)
        !           556:                        break;
        !           557:                nsp = sotonspcb(so);
        !           558:                nsp->nsp_faddr.x_host = ns_broadhost;
        !           559:                nsp->nsp_flags = NSP_RAWIN | NSP_RAWOUT;
        !           560:                break;
        !           561:        default:
        !           562:                error = idp_usrreq(so, req, m, nam, control);
        !           563:        }
        !           564:        return (error);
        !           565: }
        !           566: 

unix.superglobalmegacorp.com

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