2 * Copyright (c) 1990,1991 Regents of The University of Michigan.
5 * Permission to use, copy, modify, and distribute this software and
6 * its documentation for any purpose and without fee is hereby granted,
7 * provided that the above copyright notice appears in all copies and
8 * that both that copyright notice and this permission notice appear
9 * in supporting documentation, and that the name of The University
10 * of Michigan not be used in advertising or publicity pertaining to
11 * distribution of the software without specific, written prior
12 * permission. This software is supplied as is without expressed or
13 * implied warranties of any kind.
15 * Research Systems Unix Group
16 * The University of Michigan
18 * 535 W. William Street
21 * netatalk@itd.umich.edu
24 /* $FreeBSD: src/sys/netatalk/ddp_output.c,v 1.13.6.1 2000/06/02 22:39:07 archie Exp $ */
25 /* $DragonFly: src/sys/netproto/atalk/ddp_output.c,v 1.9 2006/12/22 23:57:53 swildner Exp $ */
27 #include <sys/param.h>
28 #include <sys/systm.h>
30 #include <sys/socket.h>
31 #include <sys/socketvar.h>
34 #include <net/route.h>
42 #include "at_extern.h"
47 ddp_output(struct mbuf *m, struct socket *so, ...)
50 struct ddpcb *ddp = sotoddpcb( so );
52 M_PREPEND( m, sizeof( struct ddpehdr ), MB_WAIT );
56 deh = mtod( m, struct ddpehdr *);
60 deh->deh_len = m->m_pkthdr.len;
62 deh->deh_dnet = ddp->ddp_fsat.sat_addr.s_net;
63 deh->deh_dnode = ddp->ddp_fsat.sat_addr.s_node;
64 deh->deh_dport = ddp->ddp_fsat.sat_port;
65 deh->deh_snet = ddp->ddp_lsat.sat_addr.s_net;
66 deh->deh_snode = ddp->ddp_lsat.sat_addr.s_node;
67 deh->deh_sport = ddp->ddp_lsat.sat_port;
70 * The checksum calculation is done after all of the other bytes have
74 deh->deh_sum = at_cksum( m, sizeof( int ));
78 deh->deh_bytes = htonl( deh->deh_bytes );
81 kprintf ("ddp_output: from %d.%d:%d to %d.%d:%d\n",
82 ntohs(deh->deh_snet), deh->deh_snode, deh->deh_sport,
83 ntohs(deh->deh_dnet), deh->deh_dnode, deh->deh_dport);
85 return( ddp_route( m, &ddp->ddp_route ));
89 at_cksum( struct mbuf *m, int skip)
94 for (; m; m = m->m_next ) {
95 for ( data = mtod( m, u_char * ), end = data + m->m_len; data < end;
101 cksum = ( cksum + *data ) << 1;
102 if ( cksum & 0x00010000 ) {
112 return( (u_short)cksum );
116 ddp_route( struct mbuf *m, struct route *ro)
118 struct sockaddr_at gate;
121 struct at_ifaddr *aa = NULL;
122 struct ifnet *ifp = NULL;
127 /* Check for net zero, node zero ("myself") */
128 if (satosat(&ro->ro_dst)->sat_addr.s_net == ATADDR_ANYNET
129 && satosat(&ro->ro_dst)->sat_addr.s_node == ATADDR_ANYNODE) {
130 /* Find the loopback interface */
135 * if we have a route, find the ifa that refers to this route.
136 * I.e The ifa used to get to the gateway.
138 if ( (ro->ro_rt == NULL)
139 || ( ro->ro_rt->rt_ifa == NULL )
140 || ( (ifp = ro->ro_rt->rt_ifa->ifa_ifp) == NULL )) {
143 if ( (ro->ro_rt != NULL)
144 && ( ro->ro_rt->rt_ifa )
145 && ( ifp = ro->ro_rt->rt_ifa->ifa_ifp )) {
146 net = ntohs(satosat(ro->ro_rt->rt_gateway)->sat_addr.s_net);
147 for ( aa = at_ifaddr; aa; aa = aa->aa_next ) {
148 if (((net == 0) || (aa->aa_ifp == ifp)) &&
149 net >= ntohs( aa->aa_firstnet ) &&
150 net <= ntohs( aa->aa_lastnet )) {
156 #ifdef NETATALK_DEBUG
157 if (ro->ro_rt == NULL)
158 kprintf ("ddp_route: no ro_rt.\n");
159 else if (ro->ro_rt->rt_ifa == NULL)
160 kprintf ("ddp_route: no ro_rt->rt_ifa\n");
162 kprintf ("ddp_route: no ro_rt->rt_ifa->ifa_ifp\n");
164 return( ENETUNREACH );
168 #ifdef NETATALK_DEBUG
169 kprintf( "ddp_route: no atalk address found for %s\n",
173 return( ENETUNREACH );
177 * if the destination address is on a directly attached node use that,
178 * else use the official gateway.
180 if ( ntohs( satosat( &ro->ro_dst )->sat_addr.s_net ) >=
181 ntohs( aa->aa_firstnet ) &&
182 ntohs( satosat( &ro->ro_dst )->sat_addr.s_net ) <=
183 ntohs( aa->aa_lastnet )) {
184 gate = *satosat( &ro->ro_dst );
186 gate = *satosat( ro->ro_rt->rt_gateway );
190 * There are several places in the kernel where data is added to
191 * an mbuf without ensuring that the mbuf pointer is aligned.
192 * This is bad for transition routing, since phase 1 and phase 2
193 * packets end up poorly aligned due to the three byte elap header.
195 if ( !(aa->aa_flags & AFA_PHASE2) ) {
196 MGET( m0, MB_WAIT, MT_HEADER );
199 kprintf("ddp_route: no buffers\n");
203 /* XXX perhaps we ought to align the header? */
204 m0->m_len = SZ_ELAPHDR;
207 elh = mtod( m, struct elaphdr *);
208 elh->el_snode = satosat( &aa->aa_addr )->sat_addr.s_node;
209 elh->el_type = ELAP_DDPEXTEND;
210 elh->el_dnode = gate.sat_addr.s_node;
214 #ifdef NETATALK_DEBUG
215 kprintf ("ddp_route: from %d.%d to %d.%d, via %d.%d (%s)\n",
216 ntohs(satosat(&aa->aa_addr)->sat_addr.s_net),
217 satosat(&aa->aa_addr)->sat_addr.s_node,
218 ntohs(satosat(&ro->ro_dst)->sat_addr.s_net),
219 satosat(&ro->ro_dst)->sat_addr.s_node,
220 ntohs(gate.sat_addr.s_net),
221 gate.sat_addr.s_node,
225 /* short-circuit the output if we're sending this to ourself */
226 if ((satosat(&aa->aa_addr)->sat_addr.s_net == satosat(&ro->ro_dst)->sat_addr.s_net) &&
227 (satosat(&aa->aa_addr)->sat_addr.s_node == satosat(&ro->ro_dst)->sat_addr.s_node))
229 return (if_simloop(ifp, m, gate.sat_family, 0));
233 lwkt_serialize_enter(ifp->if_serializer);
234 error = (*ifp->if_output)( ifp, m, (struct sockaddr *)&gate, NULL);
235 lwkt_serialize_exit(ifp->if_serializer);