Merge from vendor branch GCC:
[dragonfly.git] / sys / netproto / atm / ipatm / ipatm_output.c
1 /*
2  *
3  * ===================================
4  * HARP  |  Host ATM Research Platform
5  * ===================================
6  *
7  *
8  * This Host ATM Research Platform ("HARP") file (the "Software") is
9  * made available by Network Computing Services, Inc. ("NetworkCS")
10  * "AS IS".  NetworkCS does not provide maintenance, improvements or
11  * support of any kind.
12  *
13  * NETWORKCS MAKES NO WARRANTIES OR REPRESENTATIONS, EXPRESS OR IMPLIED,
14  * INCLUDING, BUT NOT LIMITED TO, IMPLIED WARRANTIES OF MERCHANTABILITY
15  * AND FITNESS FOR A PARTICULAR PURPOSE, AS TO ANY ELEMENT OF THE
16  * SOFTWARE OR ANY SUPPORT PROVIDED IN CONNECTION WITH THIS SOFTWARE.
17  * In no event shall NetworkCS be responsible for any damages, including
18  * but not limited to consequential damages, arising from or relating to
19  * any use of the Software or related support.
20  *
21  * Copyright 1994-1998 Network Computing Services, Inc.
22  *
23  * Copies of this Software may be made, however, the above copyright
24  * notice must be reproduced on all copies.
25  *
26  *      @(#) $FreeBSD: src/sys/netatm/ipatm/ipatm_output.c,v 1.4.2.1 2000/06/02 22:39:08 archie Exp $
27  *      @(#) $DragonFly: src/sys/netproto/atm/ipatm/ipatm_output.c,v 1.6 2005/06/02 22:37:47 dillon Exp $
28  */
29
30 /*
31  * IP Over ATM Support
32  * -------------------
33  *
34  * Output IP packets across an ATM VCC
35  *
36  */
37
38 #include <netproto/atm/kern_include.h>
39
40 #include "ipatm_var.h"
41 #include "ipatm_serv.h"
42
43 /*
44  * Output an IP Packet
45  * 
46  * All IP packets output to an ATM interface will be directed here via
47  * the atm_ifoutput() function.  If there is an ATM VCC already setup for
48  * the destination IP address, then we'll just send the packet to that VCC.
49  * Otherwise we will have to setup a new VCC, ARPing for the corresponding
50  * destination ATM hardware address along the way.
51  *
52  * Arguments:
53  *      ifp     pointer to ifnet structure
54  *      m       pointer to packet buffer chain to be output
55  *      dst     pointer to packet's IP destination address
56  *
57  * Returns:
58  *      0       packet "output" was successful 
59  *      errno   output failed - reason indicated
60  *
61  */
62 int
63 ipatm_ifoutput(ifp, m, dst)
64         struct ifnet    *ifp;
65         KBuffer         *m;
66         struct sockaddr *dst;
67 {
68         struct ipvcc    *ivp;
69         int     err = 0;
70
71 #ifdef DIAGNOSTIC
72         if (ipatm_print) {
73                 atm_pdu_print(m, "ipatm_ifoutput");
74         }
75 #endif
76
77         /*
78          * See if we've already got an appropriate VCC
79          */
80         ivp = ipatm_iptovc((struct sockaddr_in *)dst, (struct atm_nif *)ifp);
81         if (ivp) {
82
83                 /*
84                  * Reset idle timer
85                  */
86                 ivp->iv_idle = 0;
87
88                 /*
89                  * Can we use this VCC now??
90                  */
91                 if ((ivp->iv_state == IPVCC_ACTIVE) && 
92                     (ivp->iv_flags & IVF_MAPOK)) {
93
94                         /*
95                          * OK, now send packet
96                          */
97                         err = atm_cm_cpcs_data(ivp->iv_conn, m);
98                         if (err) {
99                                 /*
100                                  * Output problem, drop packet
101                                  */
102                                 KB_FREEALL(m);
103                         }
104                 } else {
105
106                         /*
107                          * VCC is unavailable for data packets.  Queue packet
108                          * for now, but only maintain a queue length of one.
109                          */
110                         if (ivp->iv_queue)
111                                 KB_FREEALL(ivp->iv_queue);
112
113                         ivp->iv_queue = m;
114                 }
115         } else {
116                 struct in_ifaddr        *ia;
117
118                 /*
119                  * No VCC to destination
120                  */
121
122                 /*
123                  * Is packet for our interface address?
124                  */
125                 TAILQ_FOREACH(ia, &in_ifaddrhead, ia_link) {
126                         if (ia->ia_ifp != ifp)
127                                 continue;
128                         if (((struct sockaddr_in *)dst)->sin_addr.s_addr == 
129                                         IA_SIN(ia)->sin_addr.s_addr) {
130
131                                 /*
132                                  * It's for us - hand packet to loopback driver
133                                  */
134                                 (void) if_simloop(ifp, m, dst->sa_family, 0);
135                                 goto done;
136                         }
137                 }
138
139                 /*
140                  * Is this a broadcast packet ??
141                  */
142                 if (in_broadcast(((struct sockaddr_in *)dst)->sin_addr, ifp)) {
143                         struct ip_nif   *inp;
144
145                         /*
146                          * If interface server exists and provides broadcast 
147                          * services, then let it deal with this packet
148                          */
149                         crit_enter();
150                         for (inp = ipatm_nif_head; inp; inp = inp->inf_next) {
151                                 if (inp->inf_nif == (struct atm_nif *)ifp)
152                                         break;
153                         }
154                         crit_exit();
155
156                         if ((inp == NULL) ||
157                             (inp->inf_serv == NULL) ||
158                             (inp->inf_serv->is_bcast_output == NULL)) {
159                                 KB_FREEALL(m);
160                                 err = EADDRNOTAVAIL;
161                                 goto done;
162                         }
163
164                         err = (*inp->inf_serv->is_bcast_output)(inp, m);
165                         goto done;
166                 }
167
168                 /*
169                  * How about a multicast packet ??
170                  */
171                 if (IN_MULTICAST(ntohl(SATOSIN(dst)->sin_addr.s_addr))) {
172                         /* 
173                          * Multicast isn't currently supported
174                          */
175                         KB_FREEALL(m);
176                         err = EADDRNOTAVAIL;
177                         goto done;
178                 }
179
180                 /*
181                  * Well, I guess we need to create an SVC to the destination
182                  */
183                 if ((err = ipatm_createsvc(ifp, AF_INET,
184                                 (caddr_t)&((struct sockaddr_in *)dst)->sin_addr,
185                                 &ivp)) == 0) {
186                         /*
187                          * SVC open is proceeding, queue packet 
188                          */
189                         ivp->iv_queue = m;
190
191                 } else {
192                         /*
193                          * SVC open failed, release buffers and return
194                          */
195                         KB_FREEALL(m);
196                 }
197         }
198
199 done:
200         return (err);
201 }
202