Remove the RCSID macro
[openafs.git] / src / rx / LINUX / rx_knet.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /*
11  * rx_knet.c - RX kernel send, receive and timer routines.
12  *
13  * Linux implementation.
14  */
15 #include <afsconfig.h>
16 #include "afs/param.h"
17
18
19 #include <linux/version.h>
20 #ifdef AFS_LINUX22_ENV
21 #include "rx/rx_kcommon.h"
22 #if defined(AFS_LINUX24_ENV)
23 #include "h/smp_lock.h"
24 #endif
25 #include <asm/uaccess.h>
26 #ifdef ADAPT_PMTU
27 #include <linux/errqueue.h>
28 #include <linux/icmp.h>
29 #endif
30
31 /* rxk_NewSocket
32  * open and bind RX socket
33  */
34 osi_socket *
35 rxk_NewSocketHost(afs_uint32 ahost, short aport)
36 {
37     struct socket *sockp;
38     struct sockaddr_in myaddr;
39     int code;
40     KERNEL_SPACE_DECL;
41 #ifdef ADAPT_PMTU
42     int pmtu = IP_PMTUDISC_WANT;
43     int do_recverr = 1;
44 #else
45     int pmtu = IP_PMTUDISC_DONT;
46 #endif
47
48     /* We need a better test for this. if you need it back, tell us
49      * how to detect it. 
50      */
51 #ifdef LINUX_KERNEL_SOCK_CREATE_V
52     code = sock_create(AF_INET, SOCK_DGRAM, IPPROTO_UDP, &sockp, 0);
53 #else
54     code = sock_create(AF_INET, SOCK_DGRAM, IPPROTO_UDP, &sockp);
55 #endif
56     if (code < 0)
57         return NULL;
58
59     /* Bind socket */
60     myaddr.sin_family = AF_INET;
61     myaddr.sin_addr.s_addr = ahost;
62     myaddr.sin_port = aport;
63     code =
64         sockp->ops->bind(sockp, (struct sockaddr *)&myaddr, sizeof(myaddr));
65
66     if (code < 0) {
67 #if defined(AFS_LINUX24_ENV)
68         printk("sock_release(rx_socket) FIXME\n");
69 #else
70         sock_release(sockp);
71 #endif
72         return NULL;
73     }
74
75     TO_USER_SPACE();
76     sockp->ops->setsockopt(sockp, SOL_IP, IP_MTU_DISCOVER, (char *)&pmtu,
77                            sizeof(pmtu));
78 #ifdef ADAPT_PMTU
79     sockp->ops->setsockopt(sockp, SOL_IP, IP_RECVERR, (char *)&do_recverr,
80                            sizeof(do_recverr));
81 #endif
82     TO_KERNEL_SPACE();
83     return (osi_socket *)sockp;
84 }
85
86 osi_socket *
87 rxk_NewSocket(short aport)
88 {
89     return rxk_NewSocketHost(htonl(INADDR_ANY), aport);
90 }
91
92 /* free socket allocated by osi_NetSocket */
93 int
94 rxk_FreeSocket(register struct socket *asocket)
95 {
96     AFS_STATCNT(osi_FreeSocket);
97     return 0;
98 }
99
100 #ifdef ADAPT_PMTU
101 void
102 handle_socket_error(osi_socket so)
103 {
104     KERNEL_SPACE_DECL;
105     struct msghdr msg;
106     struct cmsghdr *cmsg;
107     struct sock_extended_err *err;
108     struct sockaddr_in addr;
109     struct sockaddr *offender;
110     char *controlmsgbuf;
111     int code;
112     struct socket *sop = (struct socket *)so;
113
114     if (!(controlmsgbuf=rxi_Alloc(256)))
115         return;
116     msg.msg_name = &addr;
117     msg.msg_namelen = sizeof(addr);
118     msg.msg_iov = NULL;
119     msg.msg_iovlen = 0;
120     msg.msg_control = controlmsgbuf;
121     msg.msg_controllen = 256;
122     msg.msg_flags = 0;
123
124     TO_USER_SPACE();
125     code = sock_recvmsg(sop, &msg, 256, MSG_ERRQUEUE|MSG_DONTWAIT|MSG_TRUNC);
126     TO_KERNEL_SPACE();
127
128     if (code < 0 || !(msg.msg_flags & MSG_ERRQUEUE))
129         goto out;
130
131     for (cmsg = CMSG_FIRSTHDR(&msg); cmsg; cmsg = CMSG_NXTHDR(&msg, cmsg)) {
132         if (CMSG_OK(&msg, cmsg) && cmsg->cmsg_level == SOL_IP &&
133             cmsg->cmsg_type == IP_RECVERR)
134             break;
135     }
136     if (!cmsg)
137         goto out;
138     err = CMSG_DATA(cmsg);
139     offender = SO_EE_OFFENDER(err);
140     
141     if (offender->sa_family != AF_INET)
142        goto out;
143
144     memcpy(&addr, offender, sizeof(addr));
145
146     if (err->ee_origin == SO_EE_ORIGIN_ICMP &&
147         err->ee_type == ICMP_DEST_UNREACH &&
148         err->ee_code == ICMP_FRAG_NEEDED) {
149         rxi_SetPeerMtu(ntohl(addr.sin_addr.s_addr), ntohs(addr.sin_port),
150                        err->ee_info);
151     }
152     /* other DEST_UNREACH's and TIME_EXCEEDED should be dealt with too */
153
154 out:
155     rxi_Free(controlmsgbuf, 256);
156     return;
157 }
158 #endif
159
160 /* osi_NetSend
161  *
162  * Return codes:
163  * 0 = success
164  * non-zero = failure
165  */
166 int
167 osi_NetSend(osi_socket sop, struct sockaddr_in *to, struct iovec *iovec,
168             int iovcnt, afs_int32 size, int istack)
169 {
170     KERNEL_SPACE_DECL;
171     struct msghdr msg;
172     int code, sockerr;
173     size_t esize;
174
175 #ifdef ADAPT_PMTU
176     while (1) {
177         sockerr=0;
178         esize = sizeof(sockerr);
179         TO_USER_SPACE();
180         sop->ops->getsockopt(sop, SOL_SOCKET, SO_ERROR, (char *)&sockerr,
181                            &esize);
182         TO_KERNEL_SPACE();
183         if (sockerr == 0)
184            break;
185         handle_socket_error(sop);
186     }
187 #endif
188
189     msg.msg_iovlen = iovcnt;
190     msg.msg_iov = iovec;
191     msg.msg_name = to;
192     msg.msg_namelen = sizeof(*to);
193     msg.msg_control = NULL;
194     msg.msg_controllen = 0;
195     msg.msg_flags = 0;
196
197     TO_USER_SPACE();
198     code = sock_sendmsg(sop, &msg, size);
199     TO_KERNEL_SPACE();
200     return (code < 0) ? code : 0;
201 }
202
203
204 /* osi_NetReceive
205  * OS dependent part of kernel RX listener thread.
206  *
207  * Arguments:
208  *      so      socket to receive on, typically rx_socket
209  *      from    pointer to a sockaddr_in. 
210  *      iov     array of iovecs to fill in.
211  *      iovcnt  how many iovecs there are.
212  *      lengthp IN/OUT in: total space available in iovecs. out: size of read.
213  *
214  * Return
215  * 0 if successful
216  * error code (such as EINTER) if not
217  *
218  * Environment
219  *      Note that the maximum number of iovecs is 2 + RX_MAXWVECS. This is
220  *      so we have a little space to look for packets larger than 
221  *      rx_maxReceiveSize.
222  */
223 int rxk_lastSocketError;
224 int rxk_nSocketErrors;
225 int
226 osi_NetReceive(osi_socket so, struct sockaddr_in *from, struct iovec *iov,
227                int iovcnt, int *lengthp)
228 {
229     KERNEL_SPACE_DECL;
230     struct msghdr msg;
231     int code, sockerr;
232     size_t esize;
233     struct iovec tmpvec[RX_MAXWVECS + 2];
234     struct socket *sop = (struct socket *)so;
235
236     if (iovcnt > RX_MAXWVECS + 2) {
237         osi_Panic("Too many (%d) iovecs passed to osi_NetReceive\n", iovcnt);
238     }
239 #ifdef ADAPT_PMTU
240     while (1) {
241         sockerr=0;
242         esize = sizeof(sockerr);
243         TO_USER_SPACE();
244         sop->ops->getsockopt(sop, SOL_SOCKET, SO_ERROR, (char *)&sockerr,
245                            &esize);
246         TO_KERNEL_SPACE();
247         if (sockerr == 0)
248            break;
249         handle_socket_error(so);
250     }
251 #endif
252     memcpy(tmpvec, iov, iovcnt * sizeof(struct iovec));
253     msg.msg_name = from;
254     msg.msg_iov = tmpvec;
255     msg.msg_iovlen = iovcnt;
256     msg.msg_control = NULL;
257     msg.msg_controllen = 0;
258     msg.msg_flags = 0;
259
260     TO_USER_SPACE();
261     code = sock_recvmsg(sop, &msg, *lengthp, 0);
262     TO_KERNEL_SPACE();
263
264     if (code < 0) {
265 #ifdef AFS_LINUX26_ENV
266 #ifdef CONFIG_PM
267         if (
268 #ifdef PF_FREEZE
269             current->flags & PF_FREEZE
270 #else
271 #if defined(STRUCT_TASK_STRUCT_HAS_TODO)
272             !current->todo
273 #else
274 #if defined(STRUCT_TASK_STRUCT_HAS_THREAD_INFO)
275             test_ti_thread_flag(current->thread_info, TIF_FREEZE)
276 #else
277             test_ti_thread_flag(task_thread_info(current), TIF_FREEZE)
278 #endif
279 #endif
280 #endif
281             )
282 #ifdef LINUX_REFRIGERATOR_TAKES_PF_FREEZE
283             refrigerator(PF_FREEZE);
284 #else
285             refrigerator();
286 #endif
287             set_current_state(TASK_INTERRUPTIBLE);
288 #endif
289 #endif
290
291         /* Clear the error before using the socket again.
292          * Oh joy, Linux has hidden header files as well. It appears we can
293          * simply call again and have it clear itself via sock_error().
294          */
295 #ifdef AFS_LINUX22_ENV
296         flush_signals(current); /* We don't want no stinkin' signals. */
297 #else
298         current->signal = 0;    /* We don't want no stinkin' signals. */
299 #endif
300         rxk_lastSocketError = code;
301         rxk_nSocketErrors++;
302     } else {
303         *lengthp = code;
304         code = 0;
305     }
306
307     return code;
308 }
309 #ifdef EXPORTED_TASKLIST_LOCK
310 extern rwlock_t tasklist_lock __attribute__((weak));
311 #endif
312 void
313 osi_StopListener(void)
314 {
315     extern struct task_struct *rxk_ListenerTask;
316
317     while (rxk_ListenerTask) {
318         if (rxk_ListenerTask) {
319             flush_signals(rxk_ListenerTask);
320             force_sig(SIGKILL, rxk_ListenerTask);
321         }
322         if (!rxk_ListenerTask)
323             break;
324         afs_osi_Sleep(&rxk_ListenerTask);
325     }
326     sock_release(rx_socket);
327     rx_socket = NULL;
328 }
329
330 #endif /* AFS_LINUX22_ENV */