?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
pcnet_cs: add cis of National Semicondoctor's multifunction pcmcia card
[linux/fpc-iii.git] / net / ipv4 / ip_sockglue.c
blob0c0b6e363a20a9ac2e16b0ba22e816b7327ee6bc
1 /*
2 * INET An implementation of the TCP/IP protocol suite for the LINUX
3 * operating system. INET is implemented using the BSD Socket
4 * interface as the means of communication with the user level.
5 *
6 * The IP to API glue.
7 *
8 * Authors: see ip.c
9 *
10 * Fixes:
11 * Many : Split from ip.c , see ip.c for history.
12 * Martin Mares : TOS setting fixed.
13 * Alan Cox : Fixed a couple of oopses in Martin's
14 * TOS tweaks.
15 * Mike McLagan : Routing by source
16 */
17
18 #include <linux/module.h>
19 #include <linux/types.h>
20 #include <linux/mm.h>
21 #include <linux/skbuff.h>
22 #include <linux/ip.h>
23 #include <linux/icmp.h>
24 #include <linux/inetdevice.h>
25 #include <linux/netdevice.h>
26 #include <net/sock.h>
27 #include <net/ip.h>
28 #include <net/icmp.h>
29 #include <net/tcp_states.h>
30 #include <linux/udp.h>
31 #include <linux/igmp.h>
32 #include <linux/netfilter.h>
33 #include <linux/route.h>
34 #include <linux/mroute.h>
35 #include <net/route.h>
36 #include <net/xfrm.h>
37 #include <net/compat.h>
38 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
39 #include <net/transp_v6.h>
40 #endif
41
42 #include <linux/errqueue.h>
43 #include <asm/uaccess.h>
44
45 #define IP_CMSG_PKTINFO 1
46 #define IP_CMSG_TTL 2
47 #define IP_CMSG_TOS 4
48 #define IP_CMSG_RECVOPTS 8
49 #define IP_CMSG_RETOPTS 16
50 #define IP_CMSG_PASSSEC 32
51 #define IP_CMSG_ORIGDSTADDR 64
52
53 /*
54 * SOL_IP control messages.
55 */
56
57 static void ip_cmsg_recv_pktinfo(struct msghdr *msg, struct sk_buff *skb)
58 {
59 struct in_pktinfo info;
60 struct rtable *rt = skb_rtable(skb);
61
62 info.ipi_addr.s_addr = ip_hdr(skb)->daddr;
63 if (rt) {
64 info.ipi_ifindex = rt->rt_iif;
65 info.ipi_spec_dst.s_addr = rt->rt_spec_dst;
66 } else {
67 info.ipi_ifindex = 0;
68 info.ipi_spec_dst.s_addr = 0;
69 }
70
71 put_cmsg(msg, SOL_IP, IP_PKTINFO, sizeof(info), &info);
72 }
73
74 static void ip_cmsg_recv_ttl(struct msghdr *msg, struct sk_buff *skb)
75 {
76 int ttl = ip_hdr(skb)->ttl;
77 put_cmsg(msg, SOL_IP, IP_TTL, sizeof(int), &ttl);
78 }
79
80 static void ip_cmsg_recv_tos(struct msghdr *msg, struct sk_buff *skb)
81 {
82 put_cmsg(msg, SOL_IP, IP_TOS, 1, &ip_hdr(skb)->tos);
83 }
84
85 static void ip_cmsg_recv_opts(struct msghdr *msg, struct sk_buff *skb)
86 {
87 if (IPCB(skb)->opt.optlen == 0)
88 return;
89
90 put_cmsg(msg, SOL_IP, IP_RECVOPTS, IPCB(skb)->opt.optlen,
91 ip_hdr(skb) + 1);
92 }
93
94
95 static void ip_cmsg_recv_retopts(struct msghdr *msg, struct sk_buff *skb)
96 {
97 unsigned char optbuf[sizeof(struct ip_options) + 40];
98 struct ip_options * opt = (struct ip_options *)optbuf;
99
100 if (IPCB(skb)->opt.optlen == 0)
101 return;
102
103 if (ip_options_echo(opt, skb)) {
104 msg->msg_flags |= MSG_CTRUNC;
105 return;
106 }
107 ip_options_undo(opt);
108
109 put_cmsg(msg, SOL_IP, IP_RETOPTS, opt->optlen, opt->__data);
110 }
111
112 static void ip_cmsg_recv_security(struct msghdr *msg, struct sk_buff *skb)
113 {
114 char *secdata;
115 u32 seclen, secid;
116 int err;
117
118 err = security_socket_getpeersec_dgram(NULL, skb, &secid);
119 if (err)
120 return;
121
122 err = security_secid_to_secctx(secid, &secdata, &seclen);
123 if (err)
124 return;
125
126 put_cmsg(msg, SOL_IP, SCM_SECURITY, seclen, secdata);
127 security_release_secctx(secdata, seclen);
128 }
129
130 static void ip_cmsg_recv_dstaddr(struct msghdr *msg, struct sk_buff *skb)
131 {
132 struct sockaddr_in sin;
133 struct iphdr *iph = ip_hdr(skb);
134 __be16 *ports = (__be16 *)skb_transport_header(skb);
135
136 if (skb_transport_offset(skb) + 4 > skb->len)
137 return;
138
139 /* All current transport protocols have the port numbers in the
140 * first four bytes of the transport header and this function is
141 * written with this assumption in mind.
142 */
143
144 sin.sin_family = AF_INET;
145 sin.sin_addr.s_addr = iph->daddr;
146 sin.sin_port = ports[1];
147 memset(sin.sin_zero, 0, sizeof(sin.sin_zero));
148
149 put_cmsg(msg, SOL_IP, IP_ORIGDSTADDR, sizeof(sin), &sin);
150 }
151
152 void ip_cmsg_recv(struct msghdr *msg, struct sk_buff *skb)
153 {
154 struct inet_sock *inet = inet_sk(skb->sk);
155 unsigned flags = inet->cmsg_flags;
156
157 /* Ordered by supposed usage frequency */
158 if (flags & 1)
159 ip_cmsg_recv_pktinfo(msg, skb);
160 if ((flags >>= 1) == 0)
161 return;
162
163 if (flags & 1)
164 ip_cmsg_recv_ttl(msg, skb);
165 if ((flags >>= 1) == 0)
166 return;
167
168 if (flags & 1)
169 ip_cmsg_recv_tos(msg, skb);
170 if ((flags >>= 1) == 0)
171 return;
172
173 if (flags & 1)
174 ip_cmsg_recv_opts(msg, skb);
175 if ((flags >>= 1) == 0)
176 return;
177
178 if (flags & 1)
179 ip_cmsg_recv_retopts(msg, skb);
180 if ((flags >>= 1) == 0)
181 return;
182
183 if (flags & 1)
184 ip_cmsg_recv_security(msg, skb);
185
186 if ((flags >>= 1) == 0)
187 return;
188 if (flags & 1)
189 ip_cmsg_recv_dstaddr(msg, skb);
190
191 }
192 EXPORT_SYMBOL(ip_cmsg_recv);
193
194 int ip_cmsg_send(struct net *net, struct msghdr *msg, struct ipcm_cookie *ipc)
195 {
196 int err;
197 struct cmsghdr *cmsg;
198
199 for (cmsg = CMSG_FIRSTHDR(msg); cmsg; cmsg = CMSG_NXTHDR(msg, cmsg)) {
200 if (!CMSG_OK(msg, cmsg))
201 return -EINVAL;
202 if (cmsg->cmsg_level != SOL_IP)
203 continue;
204 switch (cmsg->cmsg_type) {
205 case IP_RETOPTS:
206 err = cmsg->cmsg_len - CMSG_ALIGN(sizeof(struct cmsghdr));
207 err = ip_options_get(net, &ipc->opt, CMSG_DATA(cmsg),
208 err < 40 ? err : 40);
209 if (err)
210 return err;
211 break;
212 case IP_PKTINFO:
213 {
214 struct in_pktinfo *info;
215 if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct in_pktinfo)))
216 return -EINVAL;
217 info = (struct in_pktinfo *)CMSG_DATA(cmsg);
218 ipc->oif = info->ipi_ifindex;
219 ipc->addr = info->ipi_spec_dst.s_addr;
220 break;
221 }
222 default:
223 return -EINVAL;
224 }
225 }
226 return 0;
227 }
228
229
230 /* Special input handler for packets caught by router alert option.
231 They are selected only by protocol field, and then processed likely
232 local ones; but only if someone wants them! Otherwise, router
233 not running rsvpd will kill RSVP.
234
235 It is user level problem, what it will make with them.
236 I have no idea, how it will masquearde or NAT them (it is joke, joke :-)),
237 but receiver should be enough clever f.e. to forward mtrace requests,
238 sent to multicast group to reach destination designated router.
239 */
240 struct ip_ra_chain *ip_ra_chain;
241 DEFINE_RWLOCK(ip_ra_lock);
242
243 int ip_ra_control(struct sock *sk, unsigned char on,
244 void (*destructor)(struct sock *))
245 {
246 struct ip_ra_chain *ra, *new_ra, **rap;
247
248 if (sk->sk_type != SOCK_RAW || inet_sk(sk)->num == IPPROTO_RAW)
249 return -EINVAL;
250
251 new_ra = on ? kmalloc(sizeof(*new_ra), GFP_KERNEL) : NULL;
252
253 write_lock_bh(&ip_ra_lock);
254 for (rap = &ip_ra_chain; (ra = *rap) != NULL; rap = &ra->next) {
255 if (ra->sk == sk) {
256 if (on) {
257 write_unlock_bh(&ip_ra_lock);
258 kfree(new_ra);
259 return -EADDRINUSE;
260 }
261 *rap = ra->next;
262 write_unlock_bh(&ip_ra_lock);
263
264 if (ra->destructor)
265 ra->destructor(sk);
266 sock_put(sk);
267 kfree(ra);
268 return 0;
269 }
270 }
271 if (new_ra == NULL) {
272 write_unlock_bh(&ip_ra_lock);
273 return -ENOBUFS;
274 }
275 new_ra->sk = sk;
276 new_ra->destructor = destructor;
277
278 new_ra->next = ra;
279 *rap = new_ra;
280 sock_hold(sk);
281 write_unlock_bh(&ip_ra_lock);
282
283 return 0;
284 }
285
286 void ip_icmp_error(struct sock *sk, struct sk_buff *skb, int err,
287 __be16 port, u32 info, u8 *payload)
288 {
289 struct inet_sock *inet = inet_sk(sk);
290 struct sock_exterr_skb *serr;
291
292 if (!inet->recverr)
293 return;
294
295 skb = skb_clone(skb, GFP_ATOMIC);
296 if (!skb)
297 return;
298
299 serr = SKB_EXT_ERR(skb);
300 serr->ee.ee_errno = err;
301 serr->ee.ee_origin = SO_EE_ORIGIN_ICMP;
302 serr->ee.ee_type = icmp_hdr(skb)->type;
303 serr->ee.ee_code = icmp_hdr(skb)->code;
304 serr->ee.ee_pad = 0;
305 serr->ee.ee_info = info;
306 serr->ee.ee_data = 0;
307 serr->addr_offset = (u8 *)&(((struct iphdr *)(icmp_hdr(skb) + 1))->daddr) -
308 skb_network_header(skb);
309 serr->port = port;
310
311 if (skb_pull(skb, payload - skb->data) != NULL) {
312 skb_reset_transport_header(skb);
313 if (sock_queue_err_skb(sk, skb) == 0)
314 return;
315 }
316 kfree_skb(skb);
317 }
318
319 void ip_local_error(struct sock *sk, int err, __be32 daddr, __be16 port, u32 info)
320 {
321 struct inet_sock *inet = inet_sk(sk);
322 struct sock_exterr_skb *serr;
323 struct iphdr *iph;
324 struct sk_buff *skb;
325
326 if (!inet->recverr)
327 return;
328
329 skb = alloc_skb(sizeof(struct iphdr), GFP_ATOMIC);
330 if (!skb)
331 return;
332
333 skb_put(skb, sizeof(struct iphdr));
334 skb_reset_network_header(skb);
335 iph = ip_hdr(skb);
336 iph->daddr = daddr;
337
338 serr = SKB_EXT_ERR(skb);
339 serr->ee.ee_errno = err;
340 serr->ee.ee_origin = SO_EE_ORIGIN_LOCAL;
341 serr->ee.ee_type = 0;
342 serr->ee.ee_code = 0;
343 serr->ee.ee_pad = 0;
344 serr->ee.ee_info = info;
345 serr->ee.ee_data = 0;
346 serr->addr_offset = (u8 *)&iph->daddr - skb_network_header(skb);
347 serr->port = port;
348
349 __skb_pull(skb, skb_tail_pointer(skb) - skb->data);
350 skb_reset_transport_header(skb);
351
352 if (sock_queue_err_skb(sk, skb))
353 kfree_skb(skb);
354 }
355
356 /*
357 * Handle MSG_ERRQUEUE
358 */
359 int ip_recv_error(struct sock *sk, struct msghdr *msg, int len)
360 {
361 struct sock_exterr_skb *serr;
362 struct sk_buff *skb, *skb2;
363 struct sockaddr_in *sin;
364 struct {
365 struct sock_extended_err ee;
366 struct sockaddr_in offender;
367 } errhdr;
368 int err;
369 int copied;
370
371 err = -EAGAIN;
372 skb = skb_dequeue(&sk->sk_error_queue);
373 if (skb == NULL)
374 goto out;
375
376 copied = skb->len;
377 if (copied > len) {
378 msg->msg_flags |= MSG_TRUNC;
379 copied = len;
380 }
381 err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
382 if (err)
383 goto out_free_skb;
384
385 sock_recv_timestamp(msg, sk, skb);
386
387 serr = SKB_EXT_ERR(skb);
388
389 sin = (struct sockaddr_in *)msg->msg_name;
390 if (sin) {
391 sin->sin_family = AF_INET;
392 sin->sin_addr.s_addr = *(__be32 *)(skb_network_header(skb) +
393 serr->addr_offset);
394 sin->sin_port = serr->port;
395 memset(&sin->sin_zero, 0, sizeof(sin->sin_zero));
396 }
397
398 memcpy(&errhdr.ee, &serr->ee, sizeof(struct sock_extended_err));
399 sin = &errhdr.offender;
400 sin->sin_family = AF_UNSPEC;
401 if (serr->ee.ee_origin == SO_EE_ORIGIN_ICMP) {
402 struct inet_sock *inet = inet_sk(sk);
403
404 sin->sin_family = AF_INET;
405 sin->sin_addr.s_addr = ip_hdr(skb)->saddr;
406 sin->sin_port = 0;
407 memset(&sin->sin_zero, 0, sizeof(sin->sin_zero));
408 if (inet->cmsg_flags)
409 ip_cmsg_recv(msg, skb);
410 }
411
412 put_cmsg(msg, SOL_IP, IP_RECVERR, sizeof(errhdr), &errhdr);
413
414 /* Now we could try to dump offended packet options */
415
416 msg->msg_flags |= MSG_ERRQUEUE;
417 err = copied;
418
419 /* Reset and regenerate socket error */
420 spin_lock_bh(&sk->sk_error_queue.lock);
421 sk->sk_err = 0;
422 skb2 = skb_peek(&sk->sk_error_queue);
423 if (skb2 != NULL) {
424 sk->sk_err = SKB_EXT_ERR(skb2)->ee.ee_errno;
425 spin_unlock_bh(&sk->sk_error_queue.lock);
426 sk->sk_error_report(sk);
427 } else
428 spin_unlock_bh(&sk->sk_error_queue.lock);
429
430 out_free_skb:
431 kfree_skb(skb);
432 out:
433 return err;
434 }
435
436
437 /*
438 * Socket option code for IP. This is the end of the line after any
439 * TCP,UDP etc options on an IP socket.
440 */
441
442 static int do_ip_setsockopt(struct sock *sk, int level,
443 int optname, char __user *optval, unsigned int optlen)
444 {
445 struct inet_sock *inet = inet_sk(sk);
446 int val = 0, err;
447
448 if (((1<<optname) & ((1<<IP_PKTINFO) | (1<<IP_RECVTTL) |
449 (1<<IP_RECVOPTS) | (1<<IP_RECVTOS) |
450 (1<<IP_RETOPTS) | (1<<IP_TOS) |
451 (1<<IP_TTL) | (1<<IP_HDRINCL) |
452 (1<<IP_MTU_DISCOVER) | (1<<IP_RECVERR) |
453 (1<<IP_ROUTER_ALERT) | (1<<IP_FREEBIND) |
454 (1<<IP_PASSSEC) | (1<<IP_TRANSPARENT))) ||
455 optname == IP_MULTICAST_TTL ||
456 optname == IP_MULTICAST_ALL ||
457 optname == IP_MULTICAST_LOOP ||
458 optname == IP_RECVORIGDSTADDR) {
459 if (optlen >= sizeof(int)) {
460 if (get_user(val, (int __user *) optval))
461 return -EFAULT;
462 } else if (optlen >= sizeof(char)) {
463 unsigned char ucval;
464
465 if (get_user(ucval, (unsigned char __user *) optval))
466 return -EFAULT;
467 val = (int) ucval;
468 }
469 }
470
471 /* If optlen==0, it is equivalent to val == 0 */
472
473 if (ip_mroute_opt(optname))
474 return ip_mroute_setsockopt(sk, optname, optval, optlen);
475
476 err = 0;
477 lock_sock(sk);
478
479 switch (optname) {
480 case IP_OPTIONS:
481 {
482 struct ip_options *opt = NULL;
483 if (optlen > 40 || optlen < 0)
484 goto e_inval;
485 err = ip_options_get_from_user(sock_net(sk), &opt,
486 optval, optlen);
487 if (err)
488 break;
489 if (inet->is_icsk) {
490 struct inet_connection_sock *icsk = inet_csk(sk);
491 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
492 if (sk->sk_family == PF_INET ||
493 (!((1 << sk->sk_state) &
494 (TCPF_LISTEN | TCPF_CLOSE)) &&
495 inet->daddr != LOOPBACK4_IPV6)) {
496 #endif
497 if (inet->opt)
498 icsk->icsk_ext_hdr_len -= inet->opt->optlen;
499 if (opt)
500 icsk->icsk_ext_hdr_len += opt->optlen;
501 icsk->icsk_sync_mss(sk, icsk->icsk_pmtu_cookie);
502 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
503 }
504 #endif
505 }
506 opt = xchg(&inet->opt, opt);
507 kfree(opt);
508 break;
509 }
510 case IP_PKTINFO:
511 if (val)
512 inet->cmsg_flags |= IP_CMSG_PKTINFO;
513 else
514 inet->cmsg_flags &= ~IP_CMSG_PKTINFO;
515 break;
516 case IP_RECVTTL:
517 if (val)
518 inet->cmsg_flags |= IP_CMSG_TTL;
519 else
520 inet->cmsg_flags &= ~IP_CMSG_TTL;
521 break;
522 case IP_RECVTOS:
523 if (val)
524 inet->cmsg_flags |= IP_CMSG_TOS;
525 else
526 inet->cmsg_flags &= ~IP_CMSG_TOS;
527 break;
528 case IP_RECVOPTS:
529 if (val)
530 inet->cmsg_flags |= IP_CMSG_RECVOPTS;
531 else
532 inet->cmsg_flags &= ~IP_CMSG_RECVOPTS;
533 break;
534 case IP_RETOPTS:
535 if (val)
536 inet->cmsg_flags |= IP_CMSG_RETOPTS;
537 else
538 inet->cmsg_flags &= ~IP_CMSG_RETOPTS;
539 break;
540 case IP_PASSSEC:
541 if (val)
542 inet->cmsg_flags |= IP_CMSG_PASSSEC;
543 else
544 inet->cmsg_flags &= ~IP_CMSG_PASSSEC;
545 break;
546 case IP_RECVORIGDSTADDR:
547 if (val)
548 inet->cmsg_flags |= IP_CMSG_ORIGDSTADDR;
549 else
550 inet->cmsg_flags &= ~IP_CMSG_ORIGDSTADDR;
551 break;
552 case IP_TOS: /* This sets both TOS and Precedence */
553 if (sk->sk_type == SOCK_STREAM) {
554 val &= ~3;
555 val |= inet->tos & 3;
556 }
557 if (inet->tos != val) {
558 inet->tos = val;
559 sk->sk_priority = rt_tos2priority(val);
560 sk_dst_reset(sk);
561 }
562 break;
563 case IP_TTL:
564 if (optlen < 1)
565 goto e_inval;
566 if (val != -1 && (val < 0 || val > 255))
567 goto e_inval;
568 inet->uc_ttl = val;
569 break;
570 case IP_HDRINCL:
571 if (sk->sk_type != SOCK_RAW) {
572 err = -ENOPROTOOPT;
573 break;
574 }
575 inet->hdrincl = val ? 1 : 0;
576 break;
577 case IP_MTU_DISCOVER:
578 if (val < 0 || val > 3)
579 goto e_inval;
580 inet->pmtudisc = val;
581 break;
582 case IP_RECVERR:
583 inet->recverr = !!val;
584 if (!val)
585 skb_queue_purge(&sk->sk_error_queue);
586 break;
587 case IP_MULTICAST_TTL:
588 if (sk->sk_type == SOCK_STREAM)
589 goto e_inval;
590 if (optlen < 1)
591 goto e_inval;
592 if (val == -1)
593 val = 1;
594 if (val < 0 || val > 255)
595 goto e_inval;
596 inet->mc_ttl = val;
597 break;
598 case IP_MULTICAST_LOOP:
599 if (optlen < 1)
600 goto e_inval;
601 inet->mc_loop = !!val;
602 break;
603 case IP_MULTICAST_IF:
604 {
605 struct ip_mreqn mreq;
606 struct net_device *dev = NULL;
607
608 if (sk->sk_type == SOCK_STREAM)
609 goto e_inval;
610 /*
611 * Check the arguments are allowable
612 */
613
614 if (optlen < sizeof(struct in_addr))
615 goto e_inval;
616
617 err = -EFAULT;
618 if (optlen >= sizeof(struct ip_mreqn)) {
619 if (copy_from_user(&mreq, optval, sizeof(mreq)))
620 break;
621 } else {
622 memset(&mreq, 0, sizeof(mreq));
623 if (optlen >= sizeof(struct in_addr) &&
624 copy_from_user(&mreq.imr_address, optval,
625 sizeof(struct in_addr)))
626 break;
627 }
628
629 if (!mreq.imr_ifindex) {
630 if (mreq.imr_address.s_addr == htonl(INADDR_ANY)) {
631 inet->mc_index = 0;
632 inet->mc_addr = 0;
633 err = 0;
634 break;
635 }
636 dev = ip_dev_find(sock_net(sk), mreq.imr_address.s_addr);
637 if (dev) {
638 mreq.imr_ifindex = dev->ifindex;
639 dev_put(dev);
640 }
641 } else
642 dev = __dev_get_by_index(sock_net(sk), mreq.imr_ifindex);
643
644
645 err = -EADDRNOTAVAIL;
646 if (!dev)
647 break;
648
649 err = -EINVAL;
650 if (sk->sk_bound_dev_if &&
651 mreq.imr_ifindex != sk->sk_bound_dev_if)
652 break;
653
654 inet->mc_index = mreq.imr_ifindex;
655 inet->mc_addr = mreq.imr_address.s_addr;
656 err = 0;
657 break;
658 }
659
660 case IP_ADD_MEMBERSHIP:
661 case IP_DROP_MEMBERSHIP:
662 {
663 struct ip_mreqn mreq;
664
665 err = -EPROTO;
666 if (inet_sk(sk)->is_icsk)
667 break;
668
669 if (optlen < sizeof(struct ip_mreq))
670 goto e_inval;
671 err = -EFAULT;
672 if (optlen >= sizeof(struct ip_mreqn)) {
673 if (copy_from_user(&mreq, optval, sizeof(mreq)))
674 break;
675 } else {
676 memset(&mreq, 0, sizeof(mreq));
677 if (copy_from_user(&mreq, optval, sizeof(struct ip_mreq)))
678 break;
679 }
680
681 if (optname == IP_ADD_MEMBERSHIP)
682 err = ip_mc_join_group(sk, &mreq);
683 else
684 err = ip_mc_leave_group(sk, &mreq);
685 break;
686 }
687 case IP_MSFILTER:
688 {
689 struct ip_msfilter *msf;
690
691 if (optlen < IP_MSFILTER_SIZE(0))
692 goto e_inval;
693 if (optlen > sysctl_optmem_max) {
694 err = -ENOBUFS;
695 break;
696 }
697 msf = kmalloc(optlen, GFP_KERNEL);
698 if (!msf) {
699 err = -ENOBUFS;
700 break;
701 }
702 err = -EFAULT;
703 if (copy_from_user(msf, optval, optlen)) {
704 kfree(msf);
705 break;
706 }
707 /* numsrc >= (1G-4) overflow in 32 bits */
708 if (msf->imsf_numsrc >= 0x3ffffffcU ||
709 msf->imsf_numsrc > sysctl_igmp_max_msf) {
710 kfree(msf);
711 err = -ENOBUFS;
712 break;
713 }
714 if (IP_MSFILTER_SIZE(msf->imsf_numsrc) > optlen) {
715 kfree(msf);
716 err = -EINVAL;
717 break;
718 }
719 err = ip_mc_msfilter(sk, msf, 0);
720 kfree(msf);
721 break;
722 }
723 case IP_BLOCK_SOURCE:
724 case IP_UNBLOCK_SOURCE:
725 case IP_ADD_SOURCE_MEMBERSHIP:
726 case IP_DROP_SOURCE_MEMBERSHIP:
727 {
728 struct ip_mreq_source mreqs;
729 int omode, add;
730
731 if (optlen != sizeof(struct ip_mreq_source))
732 goto e_inval;
733 if (copy_from_user(&mreqs, optval, sizeof(mreqs))) {
734 err = -EFAULT;
735 break;
736 }
737 if (optname == IP_BLOCK_SOURCE) {
738 omode = MCAST_EXCLUDE;
739 add = 1;
740 } else if (optname == IP_UNBLOCK_SOURCE) {
741 omode = MCAST_EXCLUDE;
742 add = 0;
743 } else if (optname == IP_ADD_SOURCE_MEMBERSHIP) {
744 struct ip_mreqn mreq;
745
746 mreq.imr_multiaddr.s_addr = mreqs.imr_multiaddr;
747 mreq.imr_address.s_addr = mreqs.imr_interface;
748 mreq.imr_ifindex = 0;
749 err = ip_mc_join_group(sk, &mreq);
750 if (err && err != -EADDRINUSE)
751 break;
752 omode = MCAST_INCLUDE;
753 add = 1;
754 } else /* IP_DROP_SOURCE_MEMBERSHIP */ {
755 omode = MCAST_INCLUDE;
756 add = 0;
757 }
758 err = ip_mc_source(add, omode, sk, &mreqs, 0);
759 break;
760 }
761 case MCAST_JOIN_GROUP:
762 case MCAST_LEAVE_GROUP:
763 {
764 struct group_req greq;
765 struct sockaddr_in *psin;
766 struct ip_mreqn mreq;
767
768 if (optlen < sizeof(struct group_req))
769 goto e_inval;
770 err = -EFAULT;
771 if (copy_from_user(&greq, optval, sizeof(greq)))
772 break;
773 psin = (struct sockaddr_in *)&greq.gr_group;
774 if (psin->sin_family != AF_INET)
775 goto e_inval;
776 memset(&mreq, 0, sizeof(mreq));
777 mreq.imr_multiaddr = psin->sin_addr;
778 mreq.imr_ifindex = greq.gr_interface;
779
780 if (optname == MCAST_JOIN_GROUP)
781 err = ip_mc_join_group(sk, &mreq);
782 else
783 err = ip_mc_leave_group(sk, &mreq);
784 break;
785 }
786 case MCAST_JOIN_SOURCE_GROUP:
787 case MCAST_LEAVE_SOURCE_GROUP:
788 case MCAST_BLOCK_SOURCE:
789 case MCAST_UNBLOCK_SOURCE:
790 {
791 struct group_source_req greqs;
792 struct ip_mreq_source mreqs;
793 struct sockaddr_in *psin;
794 int omode, add;
795
796 if (optlen != sizeof(struct group_source_req))
797 goto e_inval;
798 if (copy_from_user(&greqs, optval, sizeof(greqs))) {
799 err = -EFAULT;
800 break;
801 }
802 if (greqs.gsr_group.ss_family != AF_INET ||
803 greqs.gsr_source.ss_family != AF_INET) {
804 err = -EADDRNOTAVAIL;
805 break;
806 }
807 psin = (struct sockaddr_in *)&greqs.gsr_group;
808 mreqs.imr_multiaddr = psin->sin_addr.s_addr;
809 psin = (struct sockaddr_in *)&greqs.gsr_source;
810 mreqs.imr_sourceaddr = psin->sin_addr.s_addr;
811 mreqs.imr_interface = 0; /* use index for mc_source */
812
813 if (optname == MCAST_BLOCK_SOURCE) {
814 omode = MCAST_EXCLUDE;
815 add = 1;
816 } else if (optname == MCAST_UNBLOCK_SOURCE) {
817 omode = MCAST_EXCLUDE;
818 add = 0;
819 } else if (optname == MCAST_JOIN_SOURCE_GROUP) {
820 struct ip_mreqn mreq;
821
822 psin = (struct sockaddr_in *)&greqs.gsr_group;
823 mreq.imr_multiaddr = psin->sin_addr;
824 mreq.imr_address.s_addr = 0;
825 mreq.imr_ifindex = greqs.gsr_interface;
826 err = ip_mc_join_group(sk, &mreq);
827 if (err && err != -EADDRINUSE)
828 break;
829 greqs.gsr_interface = mreq.imr_ifindex;
830 omode = MCAST_INCLUDE;
831 add = 1;
832 } else /* MCAST_LEAVE_SOURCE_GROUP */ {
833 omode = MCAST_INCLUDE;
834 add = 0;
835 }
836 err = ip_mc_source(add, omode, sk, &mreqs,
837 greqs.gsr_interface);
838 break;
839 }
840 case MCAST_MSFILTER:
841 {
842 struct sockaddr_in *psin;
843 struct ip_msfilter *msf = NULL;
844 struct group_filter *gsf = NULL;
845 int msize, i, ifindex;
846
847 if (optlen < GROUP_FILTER_SIZE(0))
848 goto e_inval;
849 if (optlen > sysctl_optmem_max) {
850 err = -ENOBUFS;
851 break;
852 }
853 gsf = kmalloc(optlen, GFP_KERNEL);
854 if (!gsf) {
855 err = -ENOBUFS;
856 break;
857 }
858 err = -EFAULT;
859 if (copy_from_user(gsf, optval, optlen))
860 goto mc_msf_out;
861
862 /* numsrc >= (4G-140)/128 overflow in 32 bits */
863 if (gsf->gf_numsrc >= 0x1ffffff ||
864 gsf->gf_numsrc > sysctl_igmp_max_msf) {
865 err = -ENOBUFS;
866 goto mc_msf_out;
867 }
868 if (GROUP_FILTER_SIZE(gsf->gf_numsrc) > optlen) {
869 err = -EINVAL;
870 goto mc_msf_out;
871 }
872 msize = IP_MSFILTER_SIZE(gsf->gf_numsrc);
873 msf = kmalloc(msize, GFP_KERNEL);
874 if (!msf) {
875 err = -ENOBUFS;
876 goto mc_msf_out;
877 }
878 ifindex = gsf->gf_interface;
879 psin = (struct sockaddr_in *)&gsf->gf_group;
880 if (psin->sin_family != AF_INET) {
881 err = -EADDRNOTAVAIL;
882 goto mc_msf_out;
883 }
884 msf->imsf_multiaddr = psin->sin_addr.s_addr;
885 msf->imsf_interface = 0;
886 msf->imsf_fmode = gsf->gf_fmode;
887 msf->imsf_numsrc = gsf->gf_numsrc;
888 err = -EADDRNOTAVAIL;
889 for (i = 0; i < gsf->gf_numsrc; ++i) {
890 psin = (struct sockaddr_in *)&gsf->gf_slist[i];
891
892 if (psin->sin_family != AF_INET)
893 goto mc_msf_out;
894 msf->imsf_slist[i] = psin->sin_addr.s_addr;
895 }
896 kfree(gsf);
897 gsf = NULL;
898
899 err = ip_mc_msfilter(sk, msf, ifindex);
900 mc_msf_out:
901 kfree(msf);
902 kfree(gsf);
903 break;
904 }
905 case IP_MULTICAST_ALL:
906 if (optlen < 1)
907 goto e_inval;
908 if (val != 0 && val != 1)
909 goto e_inval;
910 inet->mc_all = val;
911 break;
912 case IP_ROUTER_ALERT:
913 err = ip_ra_control(sk, val ? 1 : 0, NULL);
914 break;
915
916 case IP_FREEBIND:
917 if (optlen < 1)
918 goto e_inval;
919 inet->freebind = !!val;
920 break;
921
922 case IP_IPSEC_POLICY:
923 case IP_XFRM_POLICY:
924 err = -EPERM;
925 if (!capable(CAP_NET_ADMIN))
926 break;
927 err = xfrm_user_policy(sk, optname, optval, optlen);
928 break;
929
930 case IP_TRANSPARENT:
931 if (!capable(CAP_NET_ADMIN)) {
932 err = -EPERM;
933 break;
934 }
935 if (optlen < 1)
936 goto e_inval;
937 inet->transparent = !!val;
938 break;
939
940 default:
941 err = -ENOPROTOOPT;
942 break;
943 }
944 release_sock(sk);
945 return err;
946
947 e_inval:
948 release_sock(sk);
949 return -EINVAL;
950 }
951
952 int ip_setsockopt(struct sock *sk, int level,
953 int optname, char __user *optval, unsigned int optlen)
954 {
955 int err;
956
957 if (level != SOL_IP)
958 return -ENOPROTOOPT;
959
960 err = do_ip_setsockopt(sk, level, optname, optval, optlen);
961 #ifdef CONFIG_NETFILTER
962 /* we need to exclude all possible ENOPROTOOPTs except default case */
963 if (err == -ENOPROTOOPT && optname != IP_HDRINCL &&
964 optname != IP_IPSEC_POLICY &&
965 optname != IP_XFRM_POLICY &&
966 !ip_mroute_opt(optname)) {
967 lock_sock(sk);
968 err = nf_setsockopt(sk, PF_INET, optname, optval, optlen);
969 release_sock(sk);
970 }
971 #endif
972 return err;
973 }
974 EXPORT_SYMBOL(ip_setsockopt);
975
976 #ifdef CONFIG_COMPAT
977 int compat_ip_setsockopt(struct sock *sk, int level, int optname,
978 char __user *optval, unsigned int optlen)
979 {
980 int err;
981
982 if (level != SOL_IP)
983 return -ENOPROTOOPT;
984
985 if (optname >= MCAST_JOIN_GROUP && optname <= MCAST_MSFILTER)
986 return compat_mc_setsockopt(sk, level, optname, optval, optlen,
987 ip_setsockopt);
988
989 err = do_ip_setsockopt(sk, level, optname, optval, optlen);
990 #ifdef CONFIG_NETFILTER
991 /* we need to exclude all possible ENOPROTOOPTs except default case */
992 if (err == -ENOPROTOOPT && optname != IP_HDRINCL &&
993 optname != IP_IPSEC_POLICY &&
994 optname != IP_XFRM_POLICY &&
995 !ip_mroute_opt(optname)) {
996 lock_sock(sk);
997 err = compat_nf_setsockopt(sk, PF_INET, optname,
998 optval, optlen);
999 release_sock(sk);
1000 }
1001 #endif
1002 return err;
1003 }
1004 EXPORT_SYMBOL(compat_ip_setsockopt);
1005 #endif
1006
1007 /*
1008 * Get the options. Note for future reference. The GET of IP options gets
1009 * the _received_ ones. The set sets the _sent_ ones.
1010 */
1011
1012 static int do_ip_getsockopt(struct sock *sk, int level, int optname,
1013 char __user *optval, int __user *optlen)
1014 {
1015 struct inet_sock *inet = inet_sk(sk);
1016 int val;
1017 int len;
1018
1019 if (level != SOL_IP)
1020 return -EOPNOTSUPP;
1021
1022 if (ip_mroute_opt(optname))
1023 return ip_mroute_getsockopt(sk, optname, optval, optlen);
1024
1025 if (get_user(len, optlen))
1026 return -EFAULT;
1027 if (len < 0)
1028 return -EINVAL;
1029
1030 lock_sock(sk);
1031
1032 switch (optname) {
1033 case IP_OPTIONS:
1034 {
1035 unsigned char optbuf[sizeof(struct ip_options)+40];
1036 struct ip_options * opt = (struct ip_options *)optbuf;
1037 opt->optlen = 0;
1038 if (inet->opt)
1039 memcpy(optbuf, inet->opt,
1040 sizeof(struct ip_options)+
1041 inet->opt->optlen);
1042 release_sock(sk);
1043
1044 if (opt->optlen == 0)
1045 return put_user(0, optlen);
1046
1047 ip_options_undo(opt);
1048
1049 len = min_t(unsigned int, len, opt->optlen);
1050 if (put_user(len, optlen))
1051 return -EFAULT;
1052 if (copy_to_user(optval, opt->__data, len))
1053 return -EFAULT;
1054 return 0;
1055 }
1056 case IP_PKTINFO:
1057 val = (inet->cmsg_flags & IP_CMSG_PKTINFO) != 0;
1058 break;
1059 case IP_RECVTTL:
1060 val = (inet->cmsg_flags & IP_CMSG_TTL) != 0;
1061 break;
1062 case IP_RECVTOS:
1063 val = (inet->cmsg_flags & IP_CMSG_TOS) != 0;
1064 break;
1065 case IP_RECVOPTS:
1066 val = (inet->cmsg_flags & IP_CMSG_RECVOPTS) != 0;
1067 break;
1068 case IP_RETOPTS:
1069 val = (inet->cmsg_flags & IP_CMSG_RETOPTS) != 0;
1070 break;
1071 case IP_PASSSEC:
1072 val = (inet->cmsg_flags & IP_CMSG_PASSSEC) != 0;
1073 break;
1074 case IP_RECVORIGDSTADDR:
1075 val = (inet->cmsg_flags & IP_CMSG_ORIGDSTADDR) != 0;
1076 break;
1077 case IP_TOS:
1078 val = inet->tos;
1079 break;
1080 case IP_TTL:
1081 val = (inet->uc_ttl == -1 ?
1082 sysctl_ip_default_ttl :
1083 inet->uc_ttl);
1084 break;
1085 case IP_HDRINCL:
1086 val = inet->hdrincl;
1087 break;
1088 case IP_MTU_DISCOVER:
1089 val = inet->pmtudisc;
1090 break;
1091 case IP_MTU:
1092 {
1093 struct dst_entry *dst;
1094 val = 0;
1095 dst = sk_dst_get(sk);
1096 if (dst) {
1097 val = dst_mtu(dst);
1098 dst_release(dst);
1099 }
1100 if (!val) {
1101 release_sock(sk);
1102 return -ENOTCONN;
1103 }
1104 break;
1105 }
1106 case IP_RECVERR:
1107 val = inet->recverr;
1108 break;
1109 case IP_MULTICAST_TTL:
1110 val = inet->mc_ttl;
1111 break;
1112 case IP_MULTICAST_LOOP:
1113 val = inet->mc_loop;
1114 break;
1115 case IP_MULTICAST_IF:
1116 {
1117 struct in_addr addr;
1118 len = min_t(unsigned int, len, sizeof(struct in_addr));
1119 addr.s_addr = inet->mc_addr;
1120 release_sock(sk);
1121
1122 if (put_user(len, optlen))
1123 return -EFAULT;
1124 if (copy_to_user(optval, &addr, len))
1125 return -EFAULT;
1126 return 0;
1127 }
1128 case IP_MSFILTER:
1129 {
1130 struct ip_msfilter msf;
1131 int err;
1132
1133 if (len < IP_MSFILTER_SIZE(0)) {
1134 release_sock(sk);
1135 return -EINVAL;
1136 }
1137 if (copy_from_user(&msf, optval, IP_MSFILTER_SIZE(0))) {
1138 release_sock(sk);
1139 return -EFAULT;
1140 }
1141 err = ip_mc_msfget(sk, &msf,
1142 (struct ip_msfilter __user *)optval, optlen);
1143 release_sock(sk);
1144 return err;
1145 }
1146 case MCAST_MSFILTER:
1147 {
1148 struct group_filter gsf;
1149 int err;
1150
1151 if (len < GROUP_FILTER_SIZE(0)) {
1152 release_sock(sk);
1153 return -EINVAL;
1154 }
1155 if (copy_from_user(&gsf, optval, GROUP_FILTER_SIZE(0))) {
1156 release_sock(sk);
1157 return -EFAULT;
1158 }
1159 err = ip_mc_gsfget(sk, &gsf,
1160 (struct group_filter __user *)optval,
1161 optlen);
1162 release_sock(sk);
1163 return err;
1164 }
1165 case IP_MULTICAST_ALL:
1166 val = inet->mc_all;
1167 break;
1168 case IP_PKTOPTIONS:
1169 {
1170 struct msghdr msg;
1171
1172 release_sock(sk);
1173
1174 if (sk->sk_type != SOCK_STREAM)
1175 return -ENOPROTOOPT;
1176
1177 msg.msg_control = optval;
1178 msg.msg_controllen = len;
1179 msg.msg_flags = 0;
1180
1181 if (inet->cmsg_flags & IP_CMSG_PKTINFO) {
1182 struct in_pktinfo info;
1183
1184 info.ipi_addr.s_addr = inet->rcv_saddr;
1185 info.ipi_spec_dst.s_addr = inet->rcv_saddr;
1186 info.ipi_ifindex = inet->mc_index;
1187 put_cmsg(&msg, SOL_IP, IP_PKTINFO, sizeof(info), &info);
1188 }
1189 if (inet->cmsg_flags & IP_CMSG_TTL) {
1190 int hlim = inet->mc_ttl;
1191 put_cmsg(&msg, SOL_IP, IP_TTL, sizeof(hlim), &hlim);
1192 }
1193 len -= msg.msg_controllen;
1194 return put_user(len, optlen);
1195 }
1196 case IP_FREEBIND:
1197 val = inet->freebind;
1198 break;
1199 case IP_TRANSPARENT:
1200 val = inet->transparent;
1201 break;
1202 default:
1203 release_sock(sk);
1204 return -ENOPROTOOPT;
1205 }
1206 release_sock(sk);
1207
1208 if (len < sizeof(int) && len > 0 && val >= 0 && val <= 255) {
1209 unsigned char ucval = (unsigned char)val;
1210 len = 1;
1211 if (put_user(len, optlen))
1212 return -EFAULT;
1213 if (copy_to_user(optval, &ucval, 1))
1214 return -EFAULT;
1215 } else {
1216 len = min_t(unsigned int, sizeof(int), len);
1217 if (put_user(len, optlen))
1218 return -EFAULT;
1219 if (copy_to_user(optval, &val, len))
1220 return -EFAULT;
1221 }
1222 return 0;
1223 }
1224
1225 int ip_getsockopt(struct sock *sk, int level,
1226 int optname, char __user *optval, int __user *optlen)
1227 {
1228 int err;
1229
1230 err = do_ip_getsockopt(sk, level, optname, optval, optlen);
1231 #ifdef CONFIG_NETFILTER
1232 /* we need to exclude all possible ENOPROTOOPTs except default case */
1233 if (err == -ENOPROTOOPT && optname != IP_PKTOPTIONS &&
1234 !ip_mroute_opt(optname)) {
1235 int len;
1236
1237 if (get_user(len, optlen))
1238 return -EFAULT;
1239
1240 lock_sock(sk);
1241 err = nf_getsockopt(sk, PF_INET, optname, optval,
1242 &len);
1243 release_sock(sk);
1244 if (err >= 0)
1245 err = put_user(len, optlen);
1246 return err;
1247 }
1248 #endif
1249 return err;
1250 }
1251 EXPORT_SYMBOL(ip_getsockopt);
1252
1253 #ifdef CONFIG_COMPAT
1254 int compat_ip_getsockopt(struct sock *sk, int level, int optname,
1255 char __user *optval, int __user *optlen)
1256 {
1257 int err;
1258
1259 if (optname == MCAST_MSFILTER)
1260 return compat_mc_getsockopt(sk, level, optname, optval, optlen,
1261 ip_getsockopt);
1262
1263 err = do_ip_getsockopt(sk, level, optname, optval, optlen);
1264
1265 #ifdef CONFIG_NETFILTER
1266 /* we need to exclude all possible ENOPROTOOPTs except default case */
1267 if (err == -ENOPROTOOPT && optname != IP_PKTOPTIONS &&
1268 !ip_mroute_opt(optname)) {
1269 int len;
1270
1271 if (get_user(len, optlen))
1272 return -EFAULT;
1273
1274 lock_sock(sk);
1275 err = compat_nf_getsockopt(sk, PF_INET, optname, optval, &len);
1276 release_sock(sk);
1277 if (err >= 0)
1278 err = put_user(len, optlen);
1279 return err;
1280 }
1281 #endif
1282 return err;
1283 }
1284 EXPORT_SYMBOL(compat_ip_getsockopt);
1285 #endif
Linux with added FPC-III support