-/*
- * Ethernet output routine.
- * Encapsulate a packet of type family for the local net.
- * Use trailer local net encapsulation if enough data in first
- * packet leaves a multiple of 512 bytes of data in remainder.
- */
-aceoutput(ifp, m0, dst)
- struct ifnet *ifp;
- struct mbuf *m0;
- struct sockaddr *dst;
-{
- register struct ace_softc *is = &ace_softc[ifp->if_unit];
- register struct mbuf *m = m0;
- register struct ether_header *ace;
- register int off;
- struct mbuf *mcopy = (struct mbuf *)0;
- int type, s, error;
- u_char edst[6];
- struct in_addr idst;
-
- if ((ifp->if_flags & (IFF_UP|IFF_RUNNING)) != (IFF_UP|IFF_RUNNING)) {
- error = ENETDOWN;
- goto bad;
- }
- switch (dst->sa_family) {
-
-#ifdef INET
- case AF_INET:
- idst = ((struct sockaddr_in *)dst)->sin_addr;
- if (!arpresolve(&is->is_ac, m, &idst, edst))
- return (0); /* if not yet resolved */
- if (!bcmp((caddr_t)edst, (caddr_t)etherbroadcastaddr,
- sizeof(edst)))
- mcopy = m_copy(m, 0, (int)M_COPYALL);
- off = ntohs((u_short)mtod(m, struct ip *)->ip_len) - m->m_len;
- /* need per host negotiation */
- if ((ifp->if_flags & IFF_NOTRAILERS) == 0 && off > 0 &&
- (off & 0x1ff) == 0 &&
- m->m_off >= MMINOFF + 2 * sizeof (u_short)) {
- type = ETHERTYPE_TRAIL + (off>>9);
- m->m_off -= 2 * sizeof (u_short);
- m->m_len += 2 * sizeof (u_short);
- *mtod(m, u_short *) = htons((u_short)ETHERTYPE_IP);
- *(mtod(m, u_short *) + 1) = htons((u_short)m->m_len);
- goto gottrailertype;
- }
- type = ETHERTYPE_IP;
- off = 0;
- goto gottype;
-#endif
-#ifdef NS
- case AF_NS:
- bcopy((caddr_t)&(((struct sockaddr_ns *)dst)->sns_addr.x_host),
- (caddr_t)edst, sizeof (edst));
- if (!bcmp((caddr_t)edst, (caddr_t)&ns_broadhost,sizeof(edst)))
- mcopy = m_copy(m, 0, (int)M_COPYALL);
- else if (!bcmp((caddr_t)edst, (caddr_t)&ns_thishost,
- sizeof(edst)))
- return(looutput(&loif, m, dst));
- type = ETHERTYPE_NS;
- off = 0;
- goto gottype;
-#endif
- case AF_UNSPEC:
- ace = (struct ether_header *)dst->sa_data;
- bcopy((caddr_t)ace->ether_dhost, (caddr_t)edst, sizeof (edst));
- type = ace->ether_type;
- goto gottype;
-
- default:
- log(LOG_ERR, "ace%d: can't handle af%d\n",
- ifp->if_unit, dst->sa_family);
- error = EAFNOSUPPORT;
- goto bad;
- }
-
-gottrailertype:
- /*
- * Packet to be sent as trailer: move first packet
- * (control information) to end of chain.
- */
- while (m->m_next)
- m = m->m_next;
- m->m_next = m0;
- m = m0->m_next;
- m0->m_next = 0;
- m0 = m;
-
-gottype:
- /*
- * Add local net header. If no space in first mbuf,
- * allocate another.
- */
- if (m->m_off > MMAXOFF ||
-#ifdef notdef
- MMINOFF + sizeof (struct ether_header) > m->m_off) {
-#else
- MMINOFF + 14 > m->m_off) {
-#endif
- m = m_get(M_DONTWAIT, MT_HEADER);
- if (m == 0) {
- error = ENOBUFS;
- goto bad;
- }
- m->m_next = m0;
- m->m_off = MMINOFF;
-#ifdef notdef
- m->m_len = sizeof (struct ether_header);
-#else
- m->m_len = 14;
-#endif
- } else {
-#ifdef notdef
- m->m_off -= sizeof (struct ether_header);
- m->m_len += sizeof (struct ether_header);
-#else
- m->m_off -= 14;
- m->m_len += 14;
-#endif
- }
- ace = mtod(m, struct ether_header *);
- bcopy((caddr_t)edst, (caddr_t)ace->ether_dhost, sizeof (edst));
- bcopy((caddr_t)is->is_addr, (caddr_t)ace->ether_shost,
- sizeof (is->is_addr));
- ace->ether_type = htons((u_short)type);
-
- /*
- * Queue message on interface, and start output if interface
- * not yet active.
- */
- s = splimp();
- if (IF_QFULL(&ifp->if_snd)) {
- IF_DROP(&ifp->if_snd);
- error = ENOBUFS;
- goto qfull;
- }
- IF_ENQUEUE(&ifp->if_snd, m);
- splx(s);
- acestart(ifp->if_unit);
- return (mcopy ? looutput(&loif, mcopy, dst) : 0);
-qfull:
- m0 = m;
- splx(s);
-bad:
- m_freem(m0);
- if (mcopy)
- m_freem(mcopy);
- return (error);
-}
-
projects / unix-history / blobdiff