[BACK]Return to raw_ip.c CVS log [TXT][DIR] Up to [cvs.NetBSD.org] / src / sys / netinet

Annotation of src/sys/netinet/raw_ip.c, Revision 1.30

1.30    ! pk          1: /*     $NetBSD: raw_ip.c,v 1.29 1996/05/24 19:03:13 mycroft Exp $      */
1.14      cgd         2:
1.1       cgd         3: /*
1.13      mycroft     4:  * Copyright (c) 1982, 1986, 1988, 1993
                      5:  *     The Regents of the University of California.  All rights reserved.
1.1       cgd         6:  *
                      7:  * Redistribution and use in source and binary forms, with or without
                      8:  * modification, are permitted provided that the following conditions
                      9:  * are met:
                     10:  * 1. Redistributions of source code must retain the above copyright
                     11:  *    notice, this list of conditions and the following disclaimer.
                     12:  * 2. Redistributions in binary form must reproduce the above copyright
                     13:  *    notice, this list of conditions and the following disclaimer in the
                     14:  *    documentation and/or other materials provided with the distribution.
                     15:  * 3. All advertising materials mentioning features or use of this software
                     16:  *    must display the following acknowledgement:
                     17:  *     This product includes software developed by the University of
                     18:  *     California, Berkeley and its contributors.
                     19:  * 4. Neither the name of the University nor the names of its contributors
                     20:  *    may be used to endorse or promote products derived from this software
                     21:  *    without specific prior written permission.
                     22:  *
                     23:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     24:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     25:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     26:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     27:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     28:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     29:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     30:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     31:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     32:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     33:  * SUCH DAMAGE.
                     34:  *
1.14      cgd        35:  *     @(#)raw_ip.c    8.2 (Berkeley) 1/4/94
1.1       cgd        36:  */
                     37:
1.7       mycroft    38: #include <sys/param.h>
                     39: #include <sys/malloc.h>
                     40: #include <sys/mbuf.h>
                     41: #include <sys/socket.h>
                     42: #include <sys/protosw.h>
                     43: #include <sys/socketvar.h>
                     44: #include <sys/errno.h>
1.13      mycroft    45: #include <sys/systm.h>
1.26      mycroft    46: #include <sys/proc.h>
1.1       cgd        47:
1.7       mycroft    48: #include <net/if.h>
                     49: #include <net/route.h>
1.1       cgd        50:
1.7       mycroft    51: #include <netinet/in.h>
                     52: #include <netinet/in_systm.h>
                     53: #include <netinet/ip.h>
                     54: #include <netinet/ip_var.h>
1.13      mycroft    55: #include <netinet/ip_mroute.h>
1.7       mycroft    56: #include <netinet/in_pcb.h>
1.24      christos   57: #include <netinet/in_var.h>
                     58:
                     59: #include <machine/stdarg.h>
1.13      mycroft    60:
1.20      mycroft    61: struct inpcbtable rawcbtable;
1.30    ! pk         62:
        !            63: int     rip_bind __P((struct inpcb *, struct mbuf *));
        !            64: int     rip_connect __P((struct inpcb *, struct mbuf *));
        !            65: void    rip_disconnect __P((struct inpcb *));
1.13      mycroft    66:
                     67: /*
                     68:  * Nominal space allocated to a raw ip socket.
                     69:  */
                     70: #define        RIPSNDQ         8192
                     71: #define        RIPRCVQ         8192
1.1       cgd        72:
                     73: /*
                     74:  * Raw interface to IP protocol.
                     75:  */
1.13      mycroft    76:
                     77: /*
                     78:  * Initialize raw connection block q.
                     79:  */
                     80: void
                     81: rip_init()
                     82: {
                     83:
1.23      mycroft    84:        in_pcbinit(&rawcbtable, 1);
1.13      mycroft    85: }
                     86:
1.1       cgd        87: struct sockaddr_in ripsrc = { sizeof(ripsrc), AF_INET };
                     88: /*
                     89:  * Setup generic address and protocol structures
                     90:  * for raw_input routine, then pass them along with
                     91:  * mbuf chain.
                     92:  */
1.9       mycroft    93: void
1.24      christos   94: #if __STDC__
                     95: rip_input(struct mbuf *m, ...)
                     96: #else
                     97: rip_input(m, va_alist)
1.1       cgd        98:        struct mbuf *m;
1.24      christos   99:        va_dcl
                    100: #endif
1.1       cgd       101: {
                    102:        register struct ip *ip = mtod(m, struct ip *);
1.13      mycroft   103:        register struct inpcb *inp;
                    104:        struct socket *last = 0;
1.1       cgd       105:
                    106:        ripsrc.sin_addr = ip->ip_src;
1.21      cgd       107:        for (inp = rawcbtable.inpt_queue.cqh_first;
                    108:            inp != (struct inpcb *)&rawcbtable.inpt_queue;
                    109:            inp = inp->inp_queue.cqe_next) {
1.13      mycroft   110:                if (inp->inp_ip.ip_p && inp->inp_ip.ip_p != ip->ip_p)
                    111:                        continue;
1.27      mycroft   112:                if (inp->inp_laddr.s_addr != INADDR_ANY &&
1.16      glass     113:                    inp->inp_laddr.s_addr != ip->ip_dst.s_addr)
1.13      mycroft   114:                        continue;
1.27      mycroft   115:                if (inp->inp_faddr.s_addr != INADDR_ANY &&
1.16      glass     116:                    inp->inp_faddr.s_addr != ip->ip_src.s_addr)
1.13      mycroft   117:                        continue;
                    118:                if (last) {
                    119:                        struct mbuf *n;
1.24      christos  120:                        if ((n = m_copy(m, 0, (int)M_COPYALL)) != NULL) {
1.13      mycroft   121:                                if (sbappendaddr(&last->so_rcv,
1.19      mycroft   122:                                    sintosa(&ripsrc), n,
                    123:                                    (struct mbuf *)0) == 0)
1.13      mycroft   124:                                        /* should notify about lost packet */
                    125:                                        m_freem(n);
                    126:                                else
                    127:                                        sorwakeup(last);
                    128:                        }
                    129:                }
                    130:                last = inp->inp_socket;
                    131:        }
                    132:        if (last) {
1.19      mycroft   133:                if (sbappendaddr(&last->so_rcv, sintosa(&ripsrc), m,
                    134:                    (struct mbuf *)0) == 0)
1.13      mycroft   135:                        m_freem(m);
                    136:                else
                    137:                        sorwakeup(last);
                    138:        } else {
                    139:                m_freem(m);
1.1       cgd       140:                ipstat.ips_noproto++;
                    141:                ipstat.ips_delivered--;
                    142:        }
                    143: }
                    144:
                    145: /*
                    146:  * Generate IP header and pass packet to ip_output.
                    147:  * Tack on options user may have setup with control call.
                    148:  */
1.9       mycroft   149: int
1.24      christos  150: #if __STDC__
                    151: rip_output(struct mbuf *m, ...)
                    152: #else
                    153: rip_output(m, va_alist)
                    154:        struct mbuf *m;
                    155:        va_dcl
                    156: #endif
                    157: {
1.27      mycroft   158:        register struct inpcb *inp;
1.1       cgd       159:        register struct ip *ip;
1.10      mycroft   160:        struct mbuf *opts;
1.24      christos  161:        int flags;
                    162:        va_list ap;
                    163:
                    164:        va_start(ap, m);
1.27      mycroft   165:        inp = va_arg(ap, struct inpcb *);
1.24      christos  166:        va_end(ap);
                    167:
1.27      mycroft   168:        flags =
                    169:            (inp->inp_socket->so_options & SO_DONTROUTE) | IP_ALLOWBROADCAST;
1.1       cgd       170:
                    171:        /*
                    172:         * If the user handed us a complete IP packet, use it.
                    173:         * Otherwise, allocate an mbuf for a header and fill it in.
                    174:         */
1.13      mycroft   175:        if ((inp->inp_flags & INP_HDRINCL) == 0) {
1.1       cgd       176:                M_PREPEND(m, sizeof(struct ip), M_WAIT);
                    177:                ip = mtod(m, struct ip *);
                    178:                ip->ip_tos = 0;
                    179:                ip->ip_off = 0;
1.13      mycroft   180:                ip->ip_p = inp->inp_ip.ip_p;
1.1       cgd       181:                ip->ip_len = m->m_pkthdr.len;
1.13      mycroft   182:                ip->ip_src = inp->inp_laddr;
1.27      mycroft   183:                ip->ip_dst = inp->inp_faddr;
1.1       cgd       184:                ip->ip_ttl = MAXTTL;
1.13      mycroft   185:                opts = inp->inp_options;
                    186:        } else {
                    187:                ip = mtod(m, struct ip *);
                    188:                if (ip->ip_id == 0)
                    189:                        ip->ip_id = htons(ip_id++);
                    190:                opts = NULL;
                    191:                /* XXX prevent ip_output from overwriting header fields */
                    192:                flags |= IP_RAWOUTPUT;
                    193:                ipstat.ips_rawout++;
1.1       cgd       194:        }
1.13      mycroft   195:        return (ip_output(m, opts, &inp->inp_route, flags, inp->inp_moptions));
1.1       cgd       196: }
                    197:
                    198: /*
                    199:  * Raw IP socket option processing.
                    200:  */
1.9       mycroft   201: int
1.1       cgd       202: rip_ctloutput(op, so, level, optname, m)
                    203:        int op;
                    204:        struct socket *so;
                    205:        int level, optname;
                    206:        struct mbuf **m;
                    207: {
1.13      mycroft   208:        register struct inpcb *inp = sotoinpcb(so);
1.25      christos  209: #ifdef MROUTING
                    210:        int error;
                    211: #endif
1.1       cgd       212:
1.15      mycroft   213:        if (level != IPPROTO_IP) {
                    214:                if (m != 0 && *m != 0)
                    215:                        (void)m_free(*m);
1.13      mycroft   216:                return (EINVAL);
1.15      mycroft   217:        }
1.1       cgd       218:
1.13      mycroft   219:        switch (optname) {
1.1       cgd       220:
1.13      mycroft   221:        case IP_HDRINCL:
                    222:                if (op == PRCO_SETOPT || op == PRCO_GETOPT) {
                    223:                        if (m == 0 || *m == 0 || (*m)->m_len < sizeof (int))
                    224:                                return (EINVAL);
                    225:                        if (op == PRCO_SETOPT) {
                    226:                                if (*mtod(*m, int *))
                    227:                                        inp->inp_flags |= INP_HDRINCL;
                    228:                                else
                    229:                                        inp->inp_flags &= ~INP_HDRINCL;
                    230:                                (void)m_free(*m);
                    231:                        } else {
                    232:                                (*m)->m_len = sizeof (int);
                    233:                                *mtod(*m, int *) = inp->inp_flags & INP_HDRINCL;
                    234:                        }
                    235:                        return (0);
                    236:                }
                    237:                break;
1.1       cgd       238:
1.18      mycroft   239:        case MRT_INIT:
                    240:        case MRT_DONE:
                    241:        case MRT_ADD_VIF:
                    242:        case MRT_DEL_VIF:
                    243:        case MRT_ADD_MFC:
                    244:        case MRT_DEL_MFC:
                    245:        case MRT_VERSION:
                    246:        case MRT_ASSERT:
1.6       hpeyerl   247: #ifdef MROUTING
1.18      mycroft   248:                switch (op) {
                    249:                case PRCO_SETOPT:
                    250:                        error = ip_mrouter_set(optname, so, m);
                    251:                        break;
                    252:                case PRCO_GETOPT:
                    253:                        error = ip_mrouter_get(optname, so, m);
                    254:                        break;
                    255:                default:
1.13      mycroft   256:                        error = EINVAL;
1.18      mycroft   257:                        break;
                    258:                }
1.13      mycroft   259:                return (error);
1.6       hpeyerl   260: #else
1.13      mycroft   261:                if (op == PRCO_SETOPT && *m)
1.18      mycroft   262:                        m_free(*m);
1.13      mycroft   263:                return (EOPNOTSUPP);
1.6       hpeyerl   264: #endif
1.1       cgd       265:        }
1.13      mycroft   266:        return (ip_ctloutput(op, so, level, optname, m));
1.1       cgd       267: }
                    268:
1.27      mycroft   269: int
1.29      mycroft   270: rip_bind(inp, nam)
                    271:        struct inpcb *inp;
                    272:        struct mbuf *nam;
                    273: {
                    274:        struct sockaddr_in *addr = mtod(nam, struct sockaddr_in *);
                    275:
                    276:        if (nam->m_len != sizeof(*addr))
                    277:                return (EINVAL);
                    278:        if (ifnet.tqh_first == 0)
                    279:                return (EADDRNOTAVAIL);
                    280:        if (addr->sin_family != AF_INET &&
                    281:            addr->sin_family != AF_IMPLINK)
                    282:                return (EAFNOSUPPORT);
                    283:        if (addr->sin_addr.s_addr != INADDR_ANY &&
                    284:            ifa_ifwithaddr(sintosa(addr)) == 0)
                    285:                return (EADDRNOTAVAIL);
                    286:        inp->inp_laddr = addr->sin_addr;
                    287:        return (0);
                    288: }
                    289:
                    290: int
1.27      mycroft   291: rip_connect(inp, nam)
                    292:        struct inpcb *inp;
                    293:        struct mbuf *nam;
                    294: {
                    295:        struct sockaddr_in *addr = mtod(nam, struct sockaddr_in *);
                    296:
                    297:        if (nam->m_len != sizeof(*addr))
                    298:                return (EINVAL);
                    299:        if (ifnet.tqh_first == 0)
                    300:                return (EADDRNOTAVAIL);
                    301:        if (addr->sin_family != AF_INET &&
                    302:            addr->sin_family != AF_IMPLINK)
                    303:                return (EAFNOSUPPORT);
                    304:        inp->inp_faddr = addr->sin_addr;
                    305:        return (0);
                    306: }
                    307:
                    308: void
                    309: rip_disconnect(inp)
                    310:        struct inpcb *inp;
                    311: {
                    312:
                    313:        inp->inp_faddr.s_addr = INADDR_ANY;
                    314: }
                    315:
1.13      mycroft   316: u_long rip_sendspace = RIPSNDQ;
                    317: u_long rip_recvspace = RIPRCVQ;
                    318:
1.1       cgd       319: /*ARGSUSED*/
1.9       mycroft   320: int
1.26      mycroft   321: rip_usrreq(so, req, m, nam, control, p)
1.1       cgd       322:        register struct socket *so;
                    323:        int req;
1.2       cgd       324:        struct mbuf *m, *nam, *control;
1.26      mycroft   325:        struct proc *p;
1.1       cgd       326: {
1.27      mycroft   327:        register struct inpcb *inp;
                    328:        int s;
1.1       cgd       329:        register int error = 0;
1.13      mycroft   330: #ifdef MROUTING
1.6       hpeyerl   331:        extern struct socket *ip_mrouter;
                    332: #endif
1.27      mycroft   333:
1.22      pk        334:        if (req == PRU_CONTROL)
                    335:                return (in_control(so, (long)m, (caddr_t)nam,
1.26      mycroft   336:                    (struct ifnet *)control, p));
1.22      pk        337:
1.27      mycroft   338:        s = splsoftnet();
                    339:        inp = sotoinpcb(so);
1.28      mycroft   340: #ifdef DIAGNOSTIC
                    341:        if (req != PRU_SEND && req != PRU_SENDOOB && control)
                    342:                panic("rip_usrreq: unexpected control mbuf");
                    343: #endif
1.27      mycroft   344:        if (inp == 0 && req != PRU_ATTACH) {
1.22      pk        345:                error = EINVAL;
                    346:                goto release;
                    347:        }
                    348:
1.1       cgd       349:        switch (req) {
                    350:
                    351:        case PRU_ATTACH:
1.27      mycroft   352:                if (inp != 0) {
                    353:                        error = EISCONN;
                    354:                        break;
                    355:                }
1.26      mycroft   356:                if (p == 0 || (error = suser(p->p_ucred, &p->p_acflag))) {
1.13      mycroft   357:                        error = EACCES;
                    358:                        break;
                    359:                }
1.27      mycroft   360:                if (so->so_snd.sb_hiwat == 0 || so->so_rcv.sb_hiwat == 0) {
                    361:                        error = soreserve(so, rip_sendspace, rip_recvspace);
                    362:                        if (error)
                    363:                                break;
                    364:                }
                    365:                error = in_pcballoc(so, &rawcbtable);
                    366:                if (error)
1.13      mycroft   367:                        break;
1.27      mycroft   368:                inp = sotoinpcb(so);
1.17      cgd       369:                inp->inp_ip.ip_p = (long)nam;
1.1       cgd       370:                break;
                    371:
                    372:        case PRU_DETACH:
1.13      mycroft   373: #ifdef MROUTING
1.6       hpeyerl   374:                if (so == ip_mrouter)
                    375:                        ip_mrouter_done();
                    376: #endif
1.13      mycroft   377:                in_pcbdetach(inp);
1.1       cgd       378:                break;
                    379:
                    380:        case PRU_BIND:
1.29      mycroft   381:                error = rip_bind(inp, nam);
1.27      mycroft   382:                break;
                    383:
                    384:        case PRU_LISTEN:
                    385:                error = EOPNOTSUPP;
                    386:                break;
                    387:
                    388:        case PRU_CONNECT:
                    389:                error = rip_connect(inp, nam);
                    390:                if (error)
1.13      mycroft   391:                        break;
1.1       cgd       392:                soisconnected(so);
1.13      mycroft   393:                break;
                    394:
                    395:        case PRU_CONNECT2:
                    396:                error = EOPNOTSUPP;
                    397:                break;
                    398:
1.27      mycroft   399:        case PRU_DISCONNECT:
                    400:                soisdisconnected(so);
                    401:                rip_disconnect(inp);
                    402:                break;
                    403:
1.13      mycroft   404:        /*
                    405:         * Mark the connection as being incapable of further input.
                    406:         */
                    407:        case PRU_SHUTDOWN:
                    408:                socantsendmore(so);
                    409:                break;
                    410:
1.27      mycroft   411:        case PRU_RCVD:
                    412:                error = EOPNOTSUPP;
                    413:                break;
                    414:
1.13      mycroft   415:        /*
                    416:         * Ship a packet out.  The appropriate raw output
                    417:         * routine handles any massaging necessary.
                    418:         */
                    419:        case PRU_SEND:
1.28      mycroft   420:                if (control && control->m_len) {
                    421:                        m_freem(control);
                    422:                        m_freem(m);
                    423:                        error = EINVAL;
                    424:                        break;
                    425:                }
                    426:        {
1.27      mycroft   427:                if (nam) {
                    428:                        if ((so->so_state & SS_ISCONNECTED) != 0) {
1.13      mycroft   429:                                error = EISCONN;
1.28      mycroft   430:                                goto die;
1.13      mycroft   431:                        }
1.27      mycroft   432:                        error = rip_connect(inp, nam);
                    433:                        if (error) {
1.28      mycroft   434:                        die:
1.27      mycroft   435:                                m_freem(m);
                    436:                                break;
                    437:                        }
1.13      mycroft   438:                } else {
1.27      mycroft   439:                        if ((so->so_state & SS_ISCONNECTED) == 0) {
1.13      mycroft   440:                                error = ENOTCONN;
1.28      mycroft   441:                                goto die;
1.13      mycroft   442:                        }
                    443:                }
1.27      mycroft   444:                error = rip_output(m, inp);
                    445:                if (nam)
                    446:                        rip_disconnect(inp);
1.28      mycroft   447:        }
1.13      mycroft   448:                break;
                    449:
                    450:        case PRU_SENSE:
                    451:                /*
                    452:                 * stat: don't bother with a blocksize.
                    453:                 */
1.27      mycroft   454:                splx(s);
1.1       cgd       455:                return (0);
1.13      mycroft   456:
                    457:        case PRU_RCVOOB:
1.27      mycroft   458:                error = EOPNOTSUPP;
                    459:                break;
                    460:
1.13      mycroft   461:        case PRU_SENDOOB:
1.28      mycroft   462:                m_freem(control);
1.27      mycroft   463:                m_freem(m);
1.13      mycroft   464:                error = EOPNOTSUPP;
                    465:                break;
                    466:
                    467:        case PRU_SOCKADDR:
                    468:                in_setsockaddr(inp, nam);
                    469:                break;
                    470:
                    471:        case PRU_PEERADDR:
                    472:                in_setpeeraddr(inp, nam);
                    473:                break;
                    474:
                    475:        default:
                    476:                panic("rip_usrreq");
1.1       cgd       477:        }
1.27      mycroft   478:
1.22      pk        479: release:
1.27      mycroft   480:        splx(s);
1.1       cgd       481:        return (error);
                    482: }

CVSweb <webmaster@jp.NetBSD.org>