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.
8 * Version: $Id: ip_sockglue.c,v 1.62 2002/02/01 22:01:04 davem Exp $
13 * Many : Split from ip.c , see ip.c for history.
14 * Martin Mares : TOS setting fixed.
15 * Alan Cox : Fixed a couple of oopses in Martin's
17 * Mike McLagan : Routing by source
20 #include <linux/config.h>
21 #include <linux/types.h>
23 #include <linux/sched.h>
24 #include <linux/skbuff.h>
26 #include <linux/icmp.h>
27 #include <linux/netdevice.h>
32 #include <linux/tcp.h>
33 #include <linux/udp.h>
34 #include <linux/igmp.h>
35 #include <linux/netfilter.h>
36 #include <linux/route.h>
37 #include <linux/mroute.h>
38 #include <net/route.h>
40 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
41 #include <net/transp_v6.h>
44 #include <linux/errqueue.h>
45 #include <asm/uaccess.h>
47 #define IP_CMSG_PKTINFO 1
50 #define IP_CMSG_RECVOPTS 8
51 #define IP_CMSG_RETOPTS 16
54 * SOL_IP control messages.
57 static void ip_cmsg_recv_pktinfo(struct msghdr
*msg
, struct sk_buff
*skb
)
59 struct in_pktinfo info
;
60 struct rtable
*rt
= (struct rtable
*)skb
->dst
;
62 info
.ipi_addr
.s_addr
= skb
->nh
.iph
->daddr
;
64 info
.ipi_ifindex
= rt
->rt_iif
;
65 info
.ipi_spec_dst
.s_addr
= rt
->rt_spec_dst
;
68 info
.ipi_spec_dst
.s_addr
= 0;
71 put_cmsg(msg
, SOL_IP
, IP_PKTINFO
, sizeof(info
), &info
);
74 static void ip_cmsg_recv_ttl(struct msghdr
*msg
, struct sk_buff
*skb
)
76 int ttl
= skb
->nh
.iph
->ttl
;
77 put_cmsg(msg
, SOL_IP
, IP_TTL
, sizeof(int), &ttl
);
80 static void ip_cmsg_recv_tos(struct msghdr
*msg
, struct sk_buff
*skb
)
82 put_cmsg(msg
, SOL_IP
, IP_TOS
, 1, &skb
->nh
.iph
->tos
);
85 static void ip_cmsg_recv_opts(struct msghdr
*msg
, struct sk_buff
*skb
)
87 if (IPCB(skb
)->opt
.optlen
== 0)
90 put_cmsg(msg
, SOL_IP
, IP_RECVOPTS
, IPCB(skb
)->opt
.optlen
, skb
->nh
.iph
+1);
94 void ip_cmsg_recv_retopts(struct msghdr
*msg
, struct sk_buff
*skb
)
96 unsigned char optbuf
[sizeof(struct ip_options
) + 40];
97 struct ip_options
* opt
= (struct ip_options
*)optbuf
;
99 if (IPCB(skb
)->opt
.optlen
== 0)
102 if (ip_options_echo(opt
, skb
)) {
103 msg
->msg_flags
|= MSG_CTRUNC
;
106 ip_options_undo(opt
);
108 put_cmsg(msg
, SOL_IP
, IP_RETOPTS
, opt
->optlen
, opt
->__data
);
112 void ip_cmsg_recv(struct msghdr
*msg
, struct sk_buff
*skb
)
114 struct inet_opt
*inet
= inet_sk(skb
->sk
);
115 unsigned flags
= inet
->cmsg_flags
;
117 /* Ordered by supposed usage frequency */
119 ip_cmsg_recv_pktinfo(msg
, skb
);
120 if ((flags
>>=1) == 0)
124 ip_cmsg_recv_ttl(msg
, skb
);
125 if ((flags
>>=1) == 0)
129 ip_cmsg_recv_tos(msg
, skb
);
130 if ((flags
>>=1) == 0)
134 ip_cmsg_recv_opts(msg
, skb
);
135 if ((flags
>>=1) == 0)
139 ip_cmsg_recv_retopts(msg
, skb
);
142 int ip_cmsg_send(struct msghdr
*msg
, struct ipcm_cookie
*ipc
)
145 struct cmsghdr
*cmsg
;
147 for (cmsg
= CMSG_FIRSTHDR(msg
); cmsg
; cmsg
= CMSG_NXTHDR(msg
, cmsg
)) {
148 if (cmsg
->cmsg_len
< sizeof(struct cmsghdr
) ||
149 (unsigned long)(((char*)cmsg
- (char*)msg
->msg_control
)
150 + cmsg
->cmsg_len
) > msg
->msg_controllen
) {
153 if (cmsg
->cmsg_level
!= SOL_IP
)
155 switch (cmsg
->cmsg_type
) {
157 err
= cmsg
->cmsg_len
- CMSG_ALIGN(sizeof(struct cmsghdr
));
158 err
= ip_options_get(&ipc
->opt
, CMSG_DATA(cmsg
), err
< 40 ? err
: 40, 0);
164 struct in_pktinfo
*info
;
165 if (cmsg
->cmsg_len
!= CMSG_LEN(sizeof(struct in_pktinfo
)))
167 info
= (struct in_pktinfo
*)CMSG_DATA(cmsg
);
168 ipc
->oif
= info
->ipi_ifindex
;
169 ipc
->addr
= info
->ipi_spec_dst
.s_addr
;
180 /* Special input handler for packets catched by router alert option.
181 They are selected only by protocol field, and then processed likely
182 local ones; but only if someone wants them! Otherwise, router
183 not running rsvpd will kill RSVP.
185 It is user level problem, what it will make with them.
186 I have no idea, how it will masquearde or NAT them (it is joke, joke :-)),
187 but receiver should be enough clever f.e. to forward mtrace requests,
188 sent to multicast group to reach destination designated router.
190 struct ip_ra_chain
*ip_ra_chain
;
191 rwlock_t ip_ra_lock
= RW_LOCK_UNLOCKED
;
193 int ip_ra_control(struct sock
*sk
, unsigned char on
, void (*destructor
)(struct sock
*))
195 struct ip_ra_chain
*ra
, *new_ra
, **rap
;
197 if (sk
->type
!= SOCK_RAW
|| inet_sk(sk
)->num
== IPPROTO_RAW
)
200 new_ra
= on
? kmalloc(sizeof(*new_ra
), GFP_KERNEL
) : NULL
;
202 write_lock_bh(&ip_ra_lock
);
203 for (rap
= &ip_ra_chain
; (ra
=*rap
) != NULL
; rap
= &ra
->next
) {
206 write_unlock_bh(&ip_ra_lock
);
212 write_unlock_bh(&ip_ra_lock
);
221 if (new_ra
== NULL
) {
222 write_unlock_bh(&ip_ra_lock
);
226 new_ra
->destructor
= destructor
;
231 write_unlock_bh(&ip_ra_lock
);
236 void ip_icmp_error(struct sock
*sk
, struct sk_buff
*skb
, int err
,
237 u16 port
, u32 info
, u8
*payload
)
239 struct inet_opt
*inet
= inet_sk(sk
);
240 struct sock_exterr_skb
*serr
;
245 skb
= skb_clone(skb
, GFP_ATOMIC
);
249 serr
= SKB_EXT_ERR(skb
);
250 serr
->ee
.ee_errno
= err
;
251 serr
->ee
.ee_origin
= SO_EE_ORIGIN_ICMP
;
252 serr
->ee
.ee_type
= skb
->h
.icmph
->type
;
253 serr
->ee
.ee_code
= skb
->h
.icmph
->code
;
255 serr
->ee
.ee_info
= info
;
256 serr
->ee
.ee_data
= 0;
257 serr
->addr_offset
= (u8
*)&(((struct iphdr
*)(skb
->h
.icmph
+1))->daddr
) - skb
->nh
.raw
;
260 skb
->h
.raw
= payload
;
261 if (!skb_pull(skb
, payload
- skb
->data
) ||
262 sock_queue_err_skb(sk
, skb
))
266 void ip_local_error(struct sock
*sk
, int err
, u32 daddr
, u16 port
, u32 info
)
268 struct inet_opt
*inet
= inet_sk(sk
);
269 struct sock_exterr_skb
*serr
;
276 skb
= alloc_skb(sizeof(struct iphdr
), GFP_ATOMIC
);
280 iph
= (struct iphdr
*)skb_put(skb
, sizeof(struct iphdr
));
284 serr
= SKB_EXT_ERR(skb
);
285 serr
->ee
.ee_errno
= err
;
286 serr
->ee
.ee_origin
= SO_EE_ORIGIN_LOCAL
;
287 serr
->ee
.ee_type
= 0;
288 serr
->ee
.ee_code
= 0;
290 serr
->ee
.ee_info
= info
;
291 serr
->ee
.ee_data
= 0;
292 serr
->addr_offset
= (u8
*)&iph
->daddr
- skb
->nh
.raw
;
295 skb
->h
.raw
= skb
->tail
;
296 __skb_pull(skb
, skb
->tail
- skb
->data
);
298 if (sock_queue_err_skb(sk
, skb
))
303 * Handle MSG_ERRQUEUE
305 int ip_recv_error(struct sock
*sk
, struct msghdr
*msg
, int len
)
307 struct sock_exterr_skb
*serr
;
308 struct sk_buff
*skb
, *skb2
;
309 struct sockaddr_in
*sin
;
311 struct sock_extended_err ee
;
312 struct sockaddr_in offender
;
318 skb
= skb_dequeue(&sk
->error_queue
);
324 msg
->msg_flags
|= MSG_TRUNC
;
327 err
= skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, copied
);
331 sock_recv_timestamp(msg
, sk
, skb
);
333 serr
= SKB_EXT_ERR(skb
);
335 sin
= (struct sockaddr_in
*)msg
->msg_name
;
337 sin
->sin_family
= AF_INET
;
338 sin
->sin_addr
.s_addr
= *(u32
*)(skb
->nh
.raw
+ serr
->addr_offset
);
339 sin
->sin_port
= serr
->port
;
340 memset(&sin
->sin_zero
, 0, sizeof(sin
->sin_zero
));
343 memcpy(&errhdr
.ee
, &serr
->ee
, sizeof(struct sock_extended_err
));
344 sin
= &errhdr
.offender
;
345 sin
->sin_family
= AF_UNSPEC
;
346 if (serr
->ee
.ee_origin
== SO_EE_ORIGIN_ICMP
) {
347 struct inet_opt
*inet
= inet_sk(sk
);
349 sin
->sin_family
= AF_INET
;
350 sin
->sin_addr
.s_addr
= skb
->nh
.iph
->saddr
;
352 memset(&sin
->sin_zero
, 0, sizeof(sin
->sin_zero
));
353 if (inet
->cmsg_flags
)
354 ip_cmsg_recv(msg
, skb
);
357 put_cmsg(msg
, SOL_IP
, IP_RECVERR
, sizeof(errhdr
), &errhdr
);
359 /* Now we could try to dump offended packet options */
361 msg
->msg_flags
|= MSG_ERRQUEUE
;
364 /* Reset and regenerate socket error */
365 spin_lock_irq(&sk
->error_queue
.lock
);
367 if ((skb2
= skb_peek(&sk
->error_queue
)) != NULL
) {
368 sk
->err
= SKB_EXT_ERR(skb2
)->ee
.ee_errno
;
369 spin_unlock_irq(&sk
->error_queue
.lock
);
370 sk
->error_report(sk
);
372 spin_unlock_irq(&sk
->error_queue
.lock
);
383 * Socket option code for IP. This is the end of the line after any TCP,UDP etc options on
387 int ip_setsockopt(struct sock
*sk
, int level
, int optname
, char *optval
, int optlen
)
389 struct inet_opt
*inet
= inet_sk(sk
);
395 if (((1<<optname
) & ((1<<IP_PKTINFO
) | (1<<IP_RECVTTL
) |
396 (1<<IP_RECVOPTS
) | (1<<IP_RECVTOS
) |
397 (1<<IP_RETOPTS
) | (1<<IP_TOS
) |
398 (1<<IP_TTL
) | (1<<IP_HDRINCL
) |
399 (1<<IP_MTU_DISCOVER
) | (1<<IP_RECVERR
) |
400 (1<<IP_ROUTER_ALERT
) | (1<<IP_FREEBIND
))) ||
401 optname
== IP_MULTICAST_TTL
||
402 optname
== IP_MULTICAST_LOOP
) {
403 if (optlen
>= sizeof(int)) {
404 if (get_user(val
, (int *) optval
))
406 } else if (optlen
>= sizeof(char)) {
409 if (get_user(ucval
, (unsigned char *) optval
))
415 /* If optlen==0, it is equivalent to val == 0 */
417 #ifdef CONFIG_IP_MROUTE
418 if (optname
>= MRT_BASE
&& optname
<= (MRT_BASE
+ 10))
419 return ip_mroute_setsockopt(sk
,optname
,optval
,optlen
);
428 struct ip_options
* opt
= NULL
;
429 if (optlen
> 40 || optlen
< 0)
431 err
= ip_options_get(&opt
, optval
, optlen
, 1);
434 if (sk
->type
== SOCK_STREAM
) {
435 struct tcp_opt
*tp
= tcp_sk(sk
);
436 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
437 if (sk
->family
== PF_INET
||
438 (!((1<<sk
->state
)&(TCPF_LISTEN
|TCPF_CLOSE
))
439 && inet
->daddr
!= LOOPBACK4_IPV6
)) {
442 tp
->ext_header_len
-= inet
->opt
->optlen
;
444 tp
->ext_header_len
+= opt
->optlen
;
445 tcp_sync_mss(sk
, tp
->pmtu_cookie
);
446 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
450 opt
= xchg(&inet
->opt
, opt
);
457 inet
->cmsg_flags
|= IP_CMSG_PKTINFO
;
459 inet
->cmsg_flags
&= ~IP_CMSG_PKTINFO
;
463 inet
->cmsg_flags
|= IP_CMSG_TTL
;
465 inet
->cmsg_flags
&= ~IP_CMSG_TTL
;
469 inet
->cmsg_flags
|= IP_CMSG_TOS
;
471 inet
->cmsg_flags
&= ~IP_CMSG_TOS
;
475 inet
->cmsg_flags
|= IP_CMSG_RECVOPTS
;
477 inet
->cmsg_flags
&= ~IP_CMSG_RECVOPTS
;
481 inet
->cmsg_flags
|= IP_CMSG_RETOPTS
;
483 inet
->cmsg_flags
&= ~IP_CMSG_RETOPTS
;
485 case IP_TOS
: /* This sets both TOS and Precedence */
486 if (sk
->type
== SOCK_STREAM
) {
488 val
|= inet
->tos
& 3;
490 if (IPTOS_PREC(val
) >= IPTOS_PREC_CRITIC_ECP
&&
491 !capable(CAP_NET_ADMIN
)) {
495 if (inet
->tos
!= val
) {
497 sk
->priority
= rt_tos2priority(val
);
505 val
= sysctl_ip_default_ttl
;
511 if(sk
->type
!=SOCK_RAW
) {
515 inet
->hdrincl
= val
? 1 : 0;
517 case IP_MTU_DISCOVER
:
520 inet
->pmtudisc
= val
;
523 inet
->recverr
= !!val
;
525 skb_queue_purge(&sk
->error_queue
);
527 case IP_MULTICAST_TTL
:
528 if (sk
->type
== SOCK_STREAM
)
534 if (val
< 0 || val
> 255)
538 case IP_MULTICAST_LOOP
:
541 inet
->mc_loop
= !!val
;
543 case IP_MULTICAST_IF
:
545 struct ip_mreqn mreq
;
546 struct net_device
*dev
= NULL
;
548 if (sk
->type
== SOCK_STREAM
)
551 * Check the arguments are allowable
555 if (optlen
>= sizeof(struct ip_mreqn
)) {
556 if (copy_from_user(&mreq
,optval
,sizeof(mreq
)))
559 memset(&mreq
, 0, sizeof(mreq
));
560 if (optlen
>= sizeof(struct in_addr
) &&
561 copy_from_user(&mreq
.imr_address
,optval
,sizeof(struct in_addr
)))
565 if (!mreq
.imr_ifindex
) {
566 if (mreq
.imr_address
.s_addr
== INADDR_ANY
) {
572 dev
= ip_dev_find(mreq
.imr_address
.s_addr
);
574 mreq
.imr_ifindex
= dev
->ifindex
;
578 dev
= __dev_get_by_index(mreq
.imr_ifindex
);
581 err
= -EADDRNOTAVAIL
;
586 if (sk
->bound_dev_if
&& mreq
.imr_ifindex
!= sk
->bound_dev_if
)
589 inet
->mc_index
= mreq
.imr_ifindex
;
590 inet
->mc_addr
= mreq
.imr_address
.s_addr
;
595 case IP_ADD_MEMBERSHIP
:
596 case IP_DROP_MEMBERSHIP
:
598 struct ip_mreqn mreq
;
600 if (optlen
< sizeof(struct ip_mreq
))
603 if (optlen
>= sizeof(struct ip_mreqn
)) {
604 if(copy_from_user(&mreq
,optval
,sizeof(mreq
)))
607 memset(&mreq
, 0, sizeof(mreq
));
608 if (copy_from_user(&mreq
,optval
,sizeof(struct ip_mreq
)))
612 if (optname
== IP_ADD_MEMBERSHIP
)
613 err
= ip_mc_join_group(sk
,&mreq
);
615 err
= ip_mc_leave_group(sk
,&mreq
);
618 case IP_ROUTER_ALERT
:
619 err
= ip_ra_control(sk
, val
? 1 : 0, NULL
);
625 inet
->freebind
= !!val
;
628 case IP_IPSEC_POLICY
:
630 err
= xfrm_user_policy(sk
, optname
, optval
, optlen
);
634 #ifdef CONFIG_NETFILTER
635 err
= nf_setsockopt(sk
, PF_INET
, optname
, optval
,
651 * Get the options. Note for future reference. The GET of IP options gets the
652 * _received_ ones. The set sets the _sent_ ones.
655 int ip_getsockopt(struct sock
*sk
, int level
, int optname
, char *optval
, int *optlen
)
657 struct inet_opt
*inet
= inet_sk(sk
);
664 #ifdef CONFIG_IP_MROUTE
665 if(optname
>=MRT_BASE
&& optname
<=MRT_BASE
+10)
667 return ip_mroute_getsockopt(sk
,optname
,optval
,optlen
);
671 if(get_user(len
,optlen
))
681 unsigned char optbuf
[sizeof(struct ip_options
)+40];
682 struct ip_options
* opt
= (struct ip_options
*)optbuf
;
685 memcpy(optbuf
, inet
->opt
,
686 sizeof(struct ip_options
)+
690 if (opt
->optlen
== 0)
691 return put_user(0, optlen
);
693 ip_options_undo(opt
);
695 len
= min_t(unsigned int, len
, opt
->optlen
);
696 if(put_user(len
, optlen
))
698 if(copy_to_user(optval
, opt
->__data
, len
))
703 val
= (inet
->cmsg_flags
& IP_CMSG_PKTINFO
) != 0;
706 val
= (inet
->cmsg_flags
& IP_CMSG_TTL
) != 0;
709 val
= (inet
->cmsg_flags
& IP_CMSG_TOS
) != 0;
712 val
= (inet
->cmsg_flags
& IP_CMSG_RECVOPTS
) != 0;
715 val
= (inet
->cmsg_flags
& IP_CMSG_RETOPTS
) != 0;
726 case IP_MTU_DISCOVER
:
727 val
= inet
->pmtudisc
;
731 struct dst_entry
*dst
;
733 dst
= sk_dst_get(sk
);
735 val
= dst_pmtu(dst
) - dst
->header_len
;
747 case IP_MULTICAST_TTL
:
750 case IP_MULTICAST_LOOP
:
753 case IP_MULTICAST_IF
:
756 len
= min_t(unsigned int, len
, sizeof(struct in_addr
));
757 addr
.s_addr
= inet
->mc_addr
;
760 if(put_user(len
, optlen
))
762 if(copy_to_user((void *)optval
, &addr
, len
))
772 if (sk
->type
!= SOCK_STREAM
)
775 msg
.msg_control
= optval
;
776 msg
.msg_controllen
= len
;
779 if (inet
->cmsg_flags
& IP_CMSG_PKTINFO
) {
780 struct in_pktinfo info
;
782 info
.ipi_addr
.s_addr
= inet
->rcv_saddr
;
783 info
.ipi_spec_dst
.s_addr
= inet
->rcv_saddr
;
784 info
.ipi_ifindex
= inet
->mc_index
;
785 put_cmsg(&msg
, SOL_IP
, IP_PKTINFO
, sizeof(info
), &info
);
787 if (inet
->cmsg_flags
& IP_CMSG_TTL
) {
788 int hlim
= inet
->mc_ttl
;
789 put_cmsg(&msg
, SOL_IP
, IP_TTL
, sizeof(hlim
), &hlim
);
791 len
-= msg
.msg_controllen
;
792 return put_user(len
, optlen
);
795 val
= inet
->freebind
;
798 #ifdef CONFIG_NETFILTER
799 val
= nf_getsockopt(sk
, PF_INET
, optname
, optval
,
803 val
= put_user(len
, optlen
);
812 if (len
< sizeof(int) && len
> 0 && val
>=0 && val
<255) {
813 unsigned char ucval
= (unsigned char)val
;
815 if(put_user(len
, optlen
))
817 if(copy_to_user(optval
,&ucval
,1))
820 len
= min_t(unsigned int, sizeof(int), len
);
821 if(put_user(len
, optlen
))
823 if(copy_to_user(optval
,&val
,len
))