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.10 2008/05/14 11:59:24 sephe 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 error
= ifp
->if_output(ifp
, m
, (struct sockaddr
*)&gate
, NULL
);