2 * Implements an IPX socket layer.
4 * This code is derived from work by
5 * Ross Biro : Writing the original IP stack
6 * Fred Van Kempen : Tidying up the TCP/IP
8 * Many thanks go to Keith Baker, Institute For Industrial Information
9 * Technology Ltd, Swansea University for allowing me to work on this
10 * in my own time even though it was in some ways related to commercial
11 * work I am currently employed to do there.
13 * All the material in this file is subject to the Gnu license version 2.
14 * Neither Alan Cox nor the Swansea University Computer Society admit
15 * liability nor provide warranty for any of this software. This material
16 * is provided as is and at no charge.
18 * Portions Copyright (c) 2000-2003 Conectiva, Inc. <acme@conectiva.com.br>
19 * Neither Arnaldo Carvalho de Melo nor Conectiva, Inc. admit liability nor
20 * provide warranty for any of this software. This material is provided
21 * "AS-IS" and at no charge.
23 * Portions Copyright (c) 1995 Caldera, Inc. <greg@caldera.com>
24 * Neither Greg Page nor Caldera, Inc. admit liability nor provide
25 * warranty for any of this software. This material is provided
26 * "AS-IS" and at no charge.
28 * See net/ipx/ChangeLog.
31 #include <linux/config.h>
32 #include <linux/capability.h>
33 #include <linux/errno.h>
34 #include <linux/if_arp.h>
35 #include <linux/if_ether.h>
36 #include <linux/init.h>
37 #include <linux/ipx.h>
38 #include <linux/kernel.h>
39 #include <linux/list.h>
40 #include <linux/module.h>
41 #include <linux/net.h>
42 #include <linux/netdevice.h>
43 #include <linux/uio.h>
44 #include <linux/skbuff.h>
45 #include <linux/socket.h>
46 #include <linux/sockios.h>
47 #include <linux/string.h>
48 #include <linux/types.h>
49 #include <linux/termios.h>
52 #include <net/p8022.h>
53 #include <net/psnap.h>
55 #include <net/tcp_states.h>
57 #include <asm/uaccess.h>
60 extern void ipx_register_sysctl(void);
61 extern void ipx_unregister_sysctl(void);
63 #define ipx_register_sysctl()
64 #define ipx_unregister_sysctl()
67 /* Configuration Variables */
68 static unsigned char ipxcfg_max_hops
= 16;
69 static char ipxcfg_auto_select_primary
;
70 static char ipxcfg_auto_create_interfaces
;
71 int sysctl_ipx_pprop_broadcasting
= 1;
73 /* Global Variables */
74 static struct datalink_proto
*p8022_datalink
;
75 static struct datalink_proto
*pEII_datalink
;
76 static struct datalink_proto
*p8023_datalink
;
77 static struct datalink_proto
*pSNAP_datalink
;
79 static const struct proto_ops ipx_dgram_ops
;
81 LIST_HEAD(ipx_interfaces
);
82 DEFINE_SPINLOCK(ipx_interfaces_lock
);
84 struct ipx_interface
*ipx_primary_net
;
85 struct ipx_interface
*ipx_internal_net
;
87 extern int ipxrtr_add_route(__u32 network
, struct ipx_interface
*intrfc
,
89 extern void ipxrtr_del_routes(struct ipx_interface
*intrfc
);
90 extern int ipxrtr_route_packet(struct sock
*sk
, struct sockaddr_ipx
*usipx
,
91 struct iovec
*iov
, int len
, int noblock
);
92 extern int ipxrtr_route_skb(struct sk_buff
*skb
);
93 extern struct ipx_route
*ipxrtr_lookup(__u32 net
);
94 extern int ipxrtr_ioctl(unsigned int cmd
, void __user
*arg
);
96 #undef IPX_REFCNT_DEBUG
97 #ifdef IPX_REFCNT_DEBUG
101 struct ipx_interface
*ipx_interfaces_head(void)
103 struct ipx_interface
*rc
= NULL
;
105 if (!list_empty(&ipx_interfaces
))
106 rc
= list_entry(ipx_interfaces
.next
,
107 struct ipx_interface
, node
);
111 static void ipxcfg_set_auto_select(char val
)
113 ipxcfg_auto_select_primary
= val
;
114 if (val
&& !ipx_primary_net
)
115 ipx_primary_net
= ipx_interfaces_head();
118 static int ipxcfg_get_config_data(struct ipx_config_data __user
*arg
)
120 struct ipx_config_data vals
;
122 vals
.ipxcfg_auto_create_interfaces
= ipxcfg_auto_create_interfaces
;
123 vals
.ipxcfg_auto_select_primary
= ipxcfg_auto_select_primary
;
125 return copy_to_user(arg
, &vals
, sizeof(vals
)) ? -EFAULT
: 0;
129 * Note: Sockets may not be removed _during_ an interrupt or inet_bh
130 * handler using this technique. They can be added although we do not
134 static void ipx_remove_socket(struct sock
*sk
)
136 /* Determine interface with which socket is associated */
137 struct ipx_interface
*intrfc
= ipx_sk(sk
)->intrfc
;
143 spin_lock_bh(&intrfc
->if_sklist_lock
);
144 sk_del_node_init(sk
);
145 spin_unlock_bh(&intrfc
->if_sklist_lock
);
151 static void ipx_destroy_socket(struct sock
*sk
)
153 ipx_remove_socket(sk
);
154 skb_queue_purge(&sk
->sk_receive_queue
);
155 #ifdef IPX_REFCNT_DEBUG
156 atomic_dec(&ipx_sock_nr
);
157 printk(KERN_DEBUG
"IPX socket %p released, %d are still alive\n", sk
,
158 atomic_read(&ipx_sock_nr
));
159 if (atomic_read(&sk
->sk_refcnt
) != 1)
160 printk(KERN_DEBUG
"Destruction sock ipx %p delayed, cnt=%d\n",
161 sk
, atomic_read(&sk
->sk_refcnt
));
167 * The following code is used to support IPX Interfaces (IPXITF). An
168 * IPX interface is defined by a physical device and a frame type.
171 /* ipxitf_clear_primary_net has to be called with ipx_interfaces_lock held */
173 static void ipxitf_clear_primary_net(void)
175 ipx_primary_net
= NULL
;
176 if (ipxcfg_auto_select_primary
)
177 ipx_primary_net
= ipx_interfaces_head();
180 static struct ipx_interface
*__ipxitf_find_using_phys(struct net_device
*dev
,
181 unsigned short datalink
)
183 struct ipx_interface
*i
;
185 list_for_each_entry(i
, &ipx_interfaces
, node
)
186 if (i
->if_dev
== dev
&& i
->if_dlink_type
== datalink
)
193 static struct ipx_interface
*ipxitf_find_using_phys(struct net_device
*dev
,
194 unsigned short datalink
)
196 struct ipx_interface
*i
;
198 spin_lock_bh(&ipx_interfaces_lock
);
199 i
= __ipxitf_find_using_phys(dev
, datalink
);
202 spin_unlock_bh(&ipx_interfaces_lock
);
206 struct ipx_interface
*ipxitf_find_using_net(__u32 net
)
208 struct ipx_interface
*i
;
210 spin_lock_bh(&ipx_interfaces_lock
);
212 list_for_each_entry(i
, &ipx_interfaces
, node
)
213 if (i
->if_netnum
== net
)
224 spin_unlock_bh(&ipx_interfaces_lock
);
228 /* Sockets are bound to a particular IPX interface. */
229 static void ipxitf_insert_socket(struct ipx_interface
*intrfc
, struct sock
*sk
)
232 spin_lock_bh(&intrfc
->if_sklist_lock
);
233 ipx_sk(sk
)->intrfc
= intrfc
;
234 sk_add_node(sk
, &intrfc
->if_sklist
);
235 spin_unlock_bh(&intrfc
->if_sklist_lock
);
239 /* caller must hold intrfc->if_sklist_lock */
240 static struct sock
*__ipxitf_find_socket(struct ipx_interface
*intrfc
,
244 struct hlist_node
*node
;
246 sk_for_each(s
, node
, &intrfc
->if_sklist
)
247 if (ipx_sk(s
)->port
== port
)
254 /* caller must hold a reference to intrfc */
255 static struct sock
*ipxitf_find_socket(struct ipx_interface
*intrfc
,
260 spin_lock_bh(&intrfc
->if_sklist_lock
);
261 s
= __ipxitf_find_socket(intrfc
, port
);
264 spin_unlock_bh(&intrfc
->if_sklist_lock
);
269 #ifdef CONFIG_IPX_INTERN
270 static struct sock
*ipxitf_find_internal_socket(struct ipx_interface
*intrfc
,
271 unsigned char *ipx_node
,
275 struct hlist_node
*node
;
278 spin_lock_bh(&intrfc
->if_sklist_lock
);
280 sk_for_each(s
, node
, &intrfc
->if_sklist
) {
281 struct ipx_sock
*ipxs
= ipx_sk(s
);
283 if (ipxs
->port
== port
&&
284 !memcmp(ipx_node
, ipxs
->node
, IPX_NODE_LEN
))
289 spin_unlock_bh(&intrfc
->if_sklist_lock
);
295 static void __ipxitf_down(struct ipx_interface
*intrfc
)
298 struct hlist_node
*node
, *t
;
300 /* Delete all routes associated with this interface */
301 ipxrtr_del_routes(intrfc
);
303 spin_lock_bh(&intrfc
->if_sklist_lock
);
305 sk_for_each_safe(s
, node
, t
, &intrfc
->if_sklist
) {
306 struct ipx_sock
*ipxs
= ipx_sk(s
);
309 s
->sk_error_report(s
);
312 sock_set_flag(s
, SOCK_ZAPPED
); /* Indicates it is no longer bound */
315 INIT_HLIST_HEAD(&intrfc
->if_sklist
);
316 spin_unlock_bh(&intrfc
->if_sklist_lock
);
318 /* remove this interface from list */
319 list_del(&intrfc
->node
);
321 /* remove this interface from *special* networks */
322 if (intrfc
== ipx_primary_net
)
323 ipxitf_clear_primary_net();
324 if (intrfc
== ipx_internal_net
)
325 ipx_internal_net
= NULL
;
328 dev_put(intrfc
->if_dev
);
332 void ipxitf_down(struct ipx_interface
*intrfc
)
334 spin_lock_bh(&ipx_interfaces_lock
);
335 __ipxitf_down(intrfc
);
336 spin_unlock_bh(&ipx_interfaces_lock
);
339 static __inline__
void __ipxitf_put(struct ipx_interface
*intrfc
)
341 if (atomic_dec_and_test(&intrfc
->refcnt
))
342 __ipxitf_down(intrfc
);
345 static int ipxitf_device_event(struct notifier_block
*notifier
,
346 unsigned long event
, void *ptr
)
348 struct net_device
*dev
= ptr
;
349 struct ipx_interface
*i
, *tmp
;
351 if (event
!= NETDEV_DOWN
&& event
!= NETDEV_UP
)
354 spin_lock_bh(&ipx_interfaces_lock
);
355 list_for_each_entry_safe(i
, tmp
, &ipx_interfaces
, node
)
356 if (i
->if_dev
== dev
) {
357 if (event
== NETDEV_UP
)
362 spin_unlock_bh(&ipx_interfaces_lock
);
368 static __exit
void ipxitf_cleanup(void)
370 struct ipx_interface
*i
, *tmp
;
372 spin_lock_bh(&ipx_interfaces_lock
);
373 list_for_each_entry_safe(i
, tmp
, &ipx_interfaces
, node
)
375 spin_unlock_bh(&ipx_interfaces_lock
);
378 static void ipxitf_def_skb_handler(struct sock
*sock
, struct sk_buff
*skb
)
380 if (sock_queue_rcv_skb(sock
, skb
) < 0)
385 * On input skb->sk is NULL. Nobody is charged for the memory.
388 /* caller must hold a reference to intrfc */
390 #ifdef CONFIG_IPX_INTERN
391 static int ipxitf_demux_socket(struct ipx_interface
*intrfc
,
392 struct sk_buff
*skb
, int copy
)
394 struct ipxhdr
*ipx
= ipx_hdr(skb
);
395 int is_broadcast
= !memcmp(ipx
->ipx_dest
.node
, ipx_broadcast_node
,
398 struct hlist_node
*node
;
401 spin_lock_bh(&intrfc
->if_sklist_lock
);
403 sk_for_each(s
, node
, &intrfc
->if_sklist
) {
404 struct ipx_sock
*ipxs
= ipx_sk(s
);
406 if (ipxs
->port
== ipx
->ipx_dest
.sock
&&
407 (is_broadcast
|| !memcmp(ipx
->ipx_dest
.node
,
408 ipxs
->node
, IPX_NODE_LEN
))) {
409 /* We found a socket to which to send */
410 struct sk_buff
*skb1
;
413 skb1
= skb_clone(skb
, GFP_ATOMIC
);
419 copy
= 1; /* skb may only be used once */
421 ipxitf_def_skb_handler(s
, skb1
);
423 /* On an external interface, one socket can listen */
424 if (intrfc
!= ipx_internal_net
)
429 /* skb was solely for us, and we did not make a copy, so free it. */
435 spin_unlock_bh(&intrfc
->if_sklist_lock
);
439 static struct sock
*ncp_connection_hack(struct ipx_interface
*intrfc
,
442 /* The packet's target is a NCP connection handler. We want to hand it
443 * to the correct socket directly within the kernel, so that the
444 * mars_nwe packet distribution process does not have to do it. Here we
445 * only care about NCP and BURST packets.
447 * You might call this a hack, but believe me, you do not want a
448 * complete NCP layer in the kernel, and this is VERY fast as well. */
449 struct sock
*sk
= NULL
;
451 u8
*ncphdr
= (u8
*)(ipx
+ 1);
453 if (*ncphdr
== 0x22 && *(ncphdr
+ 1) == 0x22) /* NCP request */
454 connection
= (((int) *(ncphdr
+ 5)) << 8) | (int) *(ncphdr
+ 3);
455 else if (*ncphdr
== 0x77 && *(ncphdr
+ 1) == 0x77) /* BURST packet */
456 connection
= (((int) *(ncphdr
+ 9)) << 8) | (int) *(ncphdr
+ 8);
459 struct hlist_node
*node
;
460 /* Now we have to look for a special NCP connection handling
461 * socket. Only these sockets have ipx_ncp_conn != 0, set by
463 spin_lock_bh(&intrfc
->if_sklist_lock
);
464 sk_for_each(sk
, node
, &intrfc
->if_sklist
)
465 if (ipx_sk(sk
)->ipx_ncp_conn
== connection
) {
471 spin_unlock_bh(&intrfc
->if_sklist_lock
);
476 static int ipxitf_demux_socket(struct ipx_interface
*intrfc
,
477 struct sk_buff
*skb
, int copy
)
479 struct ipxhdr
*ipx
= ipx_hdr(skb
);
480 struct sock
*sock1
= NULL
, *sock2
= NULL
;
481 struct sk_buff
*skb1
= NULL
, *skb2
= NULL
;
484 if (intrfc
== ipx_primary_net
&& ntohs(ipx
->ipx_dest
.sock
) == 0x451)
485 sock1
= ncp_connection_hack(intrfc
, ipx
);
487 /* No special socket found, forward the packet the normal way */
488 sock1
= ipxitf_find_socket(intrfc
, ipx
->ipx_dest
.sock
);
491 * We need to check if there is a primary net and if
492 * this is addressed to one of the *SPECIAL* sockets because
493 * these need to be propagated to the primary net.
494 * The *SPECIAL* socket list contains: 0x452(SAP), 0x453(RIP) and
498 if (ipx_primary_net
&& intrfc
!= ipx_primary_net
) {
499 const int dsock
= ntohs(ipx
->ipx_dest
.sock
);
501 if (dsock
== 0x452 || dsock
== 0x453 || dsock
== 0x456)
502 /* The appropriate thing to do here is to dup the
503 * packet and route to the primary net interface via
504 * ipxitf_send; however, we'll cheat and just demux it
506 sock2
= ipxitf_find_socket(ipx_primary_net
,
511 * If there is nothing to do return. The kfree will cancel any charging.
514 if (!sock1
&& !sock2
) {
521 * This next segment of code is a little awkward, but it sets it up
522 * so that the appropriate number of copies of the SKB are made and
523 * that skb1 and skb2 point to it (them) so that it (they) can be
524 * demuxed to sock1 and/or sock2. If we are unable to make enough
525 * copies, we do as much as is possible.
529 skb1
= skb_clone(skb
, GFP_ATOMIC
);
537 /* Do we need 2 SKBs? */
539 skb2
= skb_clone(skb1
, GFP_ATOMIC
);
544 ipxitf_def_skb_handler(sock1
, skb1
);
550 ipxitf_def_skb_handler(sock2
, skb2
);
561 #endif /* CONFIG_IPX_INTERN */
563 static struct sk_buff
*ipxitf_adjust_skbuff(struct ipx_interface
*intrfc
,
566 struct sk_buff
*skb2
;
567 int in_offset
= (unsigned char *)ipx_hdr(skb
) - skb
->head
;
568 int out_offset
= intrfc
->if_ipx_offset
;
571 /* Hopefully, most cases */
572 if (in_offset
>= out_offset
)
576 len
= skb
->len
+ out_offset
;
577 skb2
= alloc_skb(len
, GFP_ATOMIC
);
579 skb_reserve(skb2
, out_offset
);
580 skb2
->nh
.raw
= skb2
->h
.raw
= skb_put(skb2
, skb
->len
);
581 memcpy(ipx_hdr(skb2
), ipx_hdr(skb
), skb
->len
);
582 memcpy(skb2
->cb
, skb
->cb
, sizeof(skb
->cb
));
588 /* caller must hold a reference to intrfc and the skb has to be unshared */
589 int ipxitf_send(struct ipx_interface
*intrfc
, struct sk_buff
*skb
, char *node
)
591 struct ipxhdr
*ipx
= ipx_hdr(skb
);
592 struct net_device
*dev
= intrfc
->if_dev
;
593 struct datalink_proto
*dl
= intrfc
->if_dlink
;
594 char dest_node
[IPX_NODE_LEN
];
595 int send_to_wire
= 1;
598 ipx
->ipx_tctrl
= IPX_SKB_CB(skb
)->ipx_tctrl
;
599 ipx
->ipx_dest
.net
= IPX_SKB_CB(skb
)->ipx_dest_net
;
600 ipx
->ipx_source
.net
= IPX_SKB_CB(skb
)->ipx_source_net
;
602 /* see if we need to include the netnum in the route list */
603 if (IPX_SKB_CB(skb
)->last_hop
.index
>= 0) {
604 u32
*last_hop
= (u32
*)(((u8
*) skb
->data
) +
605 sizeof(struct ipxhdr
) +
606 IPX_SKB_CB(skb
)->last_hop
.index
*
608 *last_hop
= IPX_SKB_CB(skb
)->last_hop
.netnum
;
609 IPX_SKB_CB(skb
)->last_hop
.index
= -1;
613 * We need to know how many skbuffs it will take to send out this
614 * packet to avoid unnecessary copies.
617 if (!dl
|| !dev
|| dev
->flags
& IFF_LOOPBACK
)
618 send_to_wire
= 0; /* No non looped */
621 * See if this should be demuxed to sockets on this interface
623 * We want to ensure the original was eaten or that we only use
627 if (ipx
->ipx_dest
.net
== intrfc
->if_netnum
) {
629 * To our own node, loop and free the original.
630 * The internal net will receive on all node address.
632 if (intrfc
== ipx_internal_net
||
633 !memcmp(intrfc
->if_node
, node
, IPX_NODE_LEN
)) {
634 /* Don't charge sender */
637 /* Will charge receiver */
638 return ipxitf_demux_socket(intrfc
, skb
, 0);
641 /* Broadcast, loop and possibly keep to send on. */
642 if (!memcmp(ipx_broadcast_node
, node
, IPX_NODE_LEN
)) {
645 ipxitf_demux_socket(intrfc
, skb
, send_to_wire
);
652 * If the originating net is not equal to our net; this is routed
653 * We are still charging the sender. Which is right - the driver
654 * free will handle this fairly.
656 if (ipx
->ipx_source
.net
!= intrfc
->if_netnum
) {
658 * Unshare the buffer before modifying the count in
659 * case it's a flood or tcpdump
661 skb
= skb_unshare(skb
, GFP_ATOMIC
);
664 if (++ipx
->ipx_tctrl
> ipxcfg_max_hops
)
673 /* Determine the appropriate hardware address */
674 addr_len
= dev
->addr_len
;
675 if (!memcmp(ipx_broadcast_node
, node
, IPX_NODE_LEN
))
676 memcpy(dest_node
, dev
->broadcast
, addr_len
);
678 memcpy(dest_node
, &(node
[IPX_NODE_LEN
-addr_len
]), addr_len
);
680 /* Make any compensation for differing physical/data link size */
681 skb
= ipxitf_adjust_skbuff(intrfc
, skb
);
685 /* set up data link and physical headers */
687 skb
->protocol
= htons(ETH_P_IPX
);
690 dl
->request(dl
, skb
, dest_node
);
695 static int ipxitf_add_local_route(struct ipx_interface
*intrfc
)
697 return ipxrtr_add_route(intrfc
->if_netnum
, intrfc
, NULL
);
700 static void ipxitf_discover_netnum(struct ipx_interface
*intrfc
,
701 struct sk_buff
*skb
);
702 static int ipxitf_pprop(struct ipx_interface
*intrfc
, struct sk_buff
*skb
);
704 static int ipxitf_rcv(struct ipx_interface
*intrfc
, struct sk_buff
*skb
)
706 struct ipxhdr
*ipx
= ipx_hdr(skb
);
711 /* See if we should update our network number */
712 if (!intrfc
->if_netnum
) /* net number of intrfc not known yet */
713 ipxitf_discover_netnum(intrfc
, skb
);
715 IPX_SKB_CB(skb
)->last_hop
.index
= -1;
716 if (ipx
->ipx_type
== IPX_TYPE_PPROP
) {
717 rc
= ipxitf_pprop(intrfc
, skb
);
722 /* local processing follows */
723 if (!IPX_SKB_CB(skb
)->ipx_dest_net
)
724 IPX_SKB_CB(skb
)->ipx_dest_net
= intrfc
->if_netnum
;
725 if (!IPX_SKB_CB(skb
)->ipx_source_net
)
726 IPX_SKB_CB(skb
)->ipx_source_net
= intrfc
->if_netnum
;
728 /* it doesn't make sense to route a pprop packet, there's no meaning
729 * in the ipx_dest_net for such packets */
730 if (ipx
->ipx_type
!= IPX_TYPE_PPROP
&&
731 intrfc
->if_netnum
!= IPX_SKB_CB(skb
)->ipx_dest_net
) {
732 /* We only route point-to-point packets. */
733 if (skb
->pkt_type
== PACKET_HOST
) {
734 skb
= skb_unshare(skb
, GFP_ATOMIC
);
736 rc
= ipxrtr_route_skb(skb
);
743 /* see if we should keep it */
744 if (!memcmp(ipx_broadcast_node
, ipx
->ipx_dest
.node
, IPX_NODE_LEN
) ||
745 !memcmp(intrfc
->if_node
, ipx
->ipx_dest
.node
, IPX_NODE_LEN
)) {
746 rc
= ipxitf_demux_socket(intrfc
, skb
, 0);
750 /* we couldn't pawn it off so unload it */
758 static void ipxitf_discover_netnum(struct ipx_interface
*intrfc
,
761 const struct ipx_cb
*cb
= IPX_SKB_CB(skb
);
763 /* see if this is an intra packet: source_net == dest_net */
764 if (cb
->ipx_source_net
== cb
->ipx_dest_net
&& cb
->ipx_source_net
) {
765 struct ipx_interface
*i
=
766 ipxitf_find_using_net(cb
->ipx_source_net
);
767 /* NB: NetWare servers lie about their hop count so we
768 * dropped the test based on it. This is the best way
769 * to determine this is a 0 hop count packet. */
771 intrfc
->if_netnum
= cb
->ipx_source_net
;
772 ipxitf_add_local_route(intrfc
);
774 printk(KERN_WARNING
"IPX: Network number collision "
775 "%lx\n %s %s and %s %s\n",
776 (unsigned long) htonl(cb
->ipx_source_net
),
778 ipx_frame_name(i
->if_dlink_type
),
779 ipx_device_name(intrfc
),
780 ipx_frame_name(intrfc
->if_dlink_type
));
787 * ipxitf_pprop - Process packet propagation IPX packet type 0x14, used for
789 * @intrfc: IPX interface receiving this packet
790 * @skb: Received packet
792 * Checks if packet is valid: if its more than %IPX_MAX_PPROP_HOPS hops or if it
793 * is smaller than a IPX header + the room for %IPX_MAX_PPROP_HOPS hops we drop
794 * it, not even processing it locally, if it has exact %IPX_MAX_PPROP_HOPS we
795 * don't broadcast it, but process it locally. See chapter 5 of Novell's "IPX
796 * RIP and SAP Router Specification", Part Number 107-000029-001.
798 * If it is valid, check if we have pprop broadcasting enabled by the user,
799 * if not, just return zero for local processing.
801 * If it is enabled check the packet and don't broadcast it if we have already
804 * Broadcast: send it to the interfaces that aren't on the packet visited nets
805 * array, just after the IPX header.
807 * Returns -EINVAL for invalid packets, so that the calling function drops
808 * the packet without local processing. 0 if packet is to be locally processed.
810 static int ipxitf_pprop(struct ipx_interface
*intrfc
, struct sk_buff
*skb
)
812 struct ipxhdr
*ipx
= ipx_hdr(skb
);
814 struct ipx_interface
*ifcs
;
818 /* Illegal packet - too many hops or too short */
819 /* We decide to throw it away: no broadcasting, no local processing.
820 * NetBIOS unaware implementations route them as normal packets -
821 * tctrl <= 15, any data payload... */
822 if (IPX_SKB_CB(skb
)->ipx_tctrl
> IPX_MAX_PPROP_HOPS
||
823 ntohs(ipx
->ipx_pktsize
) < sizeof(struct ipxhdr
) +
824 IPX_MAX_PPROP_HOPS
* sizeof(u32
))
826 /* are we broadcasting this damn thing? */
828 if (!sysctl_ipx_pprop_broadcasting
)
830 /* We do broadcast packet on the IPX_MAX_PPROP_HOPS hop, but we
831 * process it locally. All previous hops broadcasted it, and process it
833 if (IPX_SKB_CB(skb
)->ipx_tctrl
== IPX_MAX_PPROP_HOPS
)
836 c
= ((u8
*) ipx
) + sizeof(struct ipxhdr
);
839 /* Don't broadcast packet if already seen this net */
840 for (i
= 0; i
< IPX_SKB_CB(skb
)->ipx_tctrl
; i
++)
841 if (*l
++ == intrfc
->if_netnum
)
844 /* < IPX_MAX_PPROP_HOPS hops && input interface not in list. Save the
845 * position where we will insert recvd netnum into list, later on,
847 IPX_SKB_CB(skb
)->last_hop
.index
= i
;
848 IPX_SKB_CB(skb
)->last_hop
.netnum
= intrfc
->if_netnum
;
849 /* xmit on all other interfaces... */
850 spin_lock_bh(&ipx_interfaces_lock
);
851 list_for_each_entry(ifcs
, &ipx_interfaces
, node
) {
852 /* Except unconfigured interfaces */
853 if (!ifcs
->if_netnum
)
856 /* That aren't in the list */
860 /* don't consider the last entry in the packet list,
861 * it is our netnum, and it is not there yet */
862 for (i
= 0; i
< IPX_SKB_CB(skb
)->ipx_tctrl
; i
++)
863 if (ifcs
->if_netnum
== *l
++)
865 if (i
== IPX_SKB_CB(skb
)->ipx_tctrl
) {
866 struct sk_buff
*s
= skb_copy(skb
, GFP_ATOMIC
);
869 IPX_SKB_CB(s
)->ipx_dest_net
= ifcs
->if_netnum
;
874 spin_unlock_bh(&ipx_interfaces_lock
);
879 static void ipxitf_insert(struct ipx_interface
*intrfc
)
881 spin_lock_bh(&ipx_interfaces_lock
);
882 list_add_tail(&intrfc
->node
, &ipx_interfaces
);
883 spin_unlock_bh(&ipx_interfaces_lock
);
885 if (ipxcfg_auto_select_primary
&& !ipx_primary_net
)
886 ipx_primary_net
= intrfc
;
889 static struct ipx_interface
*ipxitf_alloc(struct net_device
*dev
, __u32 netnum
,
890 unsigned short dlink_type
,
891 struct datalink_proto
*dlink
,
892 unsigned char internal
,
895 struct ipx_interface
*intrfc
= kmalloc(sizeof(*intrfc
), GFP_ATOMIC
);
898 intrfc
->if_dev
= dev
;
899 intrfc
->if_netnum
= netnum
;
900 intrfc
->if_dlink_type
= dlink_type
;
901 intrfc
->if_dlink
= dlink
;
902 intrfc
->if_internal
= internal
;
903 intrfc
->if_ipx_offset
= ipx_offset
;
904 intrfc
->if_sknum
= IPX_MIN_EPHEMERAL_SOCKET
;
905 INIT_HLIST_HEAD(&intrfc
->if_sklist
);
906 atomic_set(&intrfc
->refcnt
, 1);
907 spin_lock_init(&intrfc
->if_sklist_lock
);
913 static int ipxitf_create_internal(struct ipx_interface_definition
*idef
)
915 struct ipx_interface
*intrfc
;
918 /* Only one primary network allowed */
922 /* Must have a valid network number */
924 if (!idef
->ipx_network
)
926 intrfc
= ipxitf_find_using_net(idef
->ipx_network
);
932 intrfc
= ipxitf_alloc(NULL
, idef
->ipx_network
, 0, NULL
, 1, 0);
936 memcpy((char *)&(intrfc
->if_node
), idef
->ipx_node
, IPX_NODE_LEN
);
937 ipx_internal_net
= ipx_primary_net
= intrfc
;
939 ipxitf_insert(intrfc
);
941 rc
= ipxitf_add_local_route(intrfc
);
947 static __be16
ipx_map_frame_type(unsigned char type
)
952 case IPX_FRAME_ETHERII
: rc
= htons(ETH_P_IPX
); break;
953 case IPX_FRAME_8022
: rc
= htons(ETH_P_802_2
); break;
954 case IPX_FRAME_SNAP
: rc
= htons(ETH_P_SNAP
); break;
955 case IPX_FRAME_8023
: rc
= htons(ETH_P_802_3
); break;
961 static int ipxitf_create(struct ipx_interface_definition
*idef
)
963 struct net_device
*dev
;
964 unsigned short dlink_type
= 0;
965 struct datalink_proto
*datalink
= NULL
;
966 struct ipx_interface
*intrfc
;
969 if (idef
->ipx_special
== IPX_INTERNAL
) {
970 rc
= ipxitf_create_internal(idef
);
975 if (idef
->ipx_special
== IPX_PRIMARY
&& ipx_primary_net
)
978 intrfc
= ipxitf_find_using_net(idef
->ipx_network
);
980 if (idef
->ipx_network
&& intrfc
) {
988 dev
= dev_get_by_name(idef
->ipx_device
);
993 switch (idef
->ipx_dlink_type
) {
994 case IPX_FRAME_TR_8022
:
995 printk(KERN_WARNING
"IPX frame type 802.2TR is "
996 "obsolete Use 802.2 instead.\n");
999 dlink_type
= htons(ETH_P_802_2
);
1000 datalink
= p8022_datalink
;
1002 case IPX_FRAME_ETHERII
:
1003 if (dev
->type
!= ARPHRD_IEEE802
) {
1004 dlink_type
= htons(ETH_P_IPX
);
1005 datalink
= pEII_datalink
;
1008 printk(KERN_WARNING
"IPX frame type EtherII over "
1009 "token-ring is obsolete. Use SNAP "
1012 case IPX_FRAME_SNAP
:
1013 dlink_type
= htons(ETH_P_SNAP
);
1014 datalink
= pSNAP_datalink
;
1016 case IPX_FRAME_8023
:
1017 dlink_type
= htons(ETH_P_802_3
);
1018 datalink
= p8023_datalink
;
1020 case IPX_FRAME_NONE
:
1022 rc
= -EPROTONOSUPPORT
;
1027 if (!(dev
->flags
& IFF_UP
))
1030 /* Check addresses are suitable */
1032 if (dev
->addr_len
> IPX_NODE_LEN
)
1035 intrfc
= ipxitf_find_using_phys(dev
, dlink_type
);
1038 intrfc
= ipxitf_alloc(dev
, idef
->ipx_network
, dlink_type
,
1039 datalink
, 0, dev
->hard_header_len
+
1040 datalink
->header_length
);
1044 /* Setup primary if necessary */
1045 if (idef
->ipx_special
== IPX_PRIMARY
)
1046 ipx_primary_net
= intrfc
;
1047 if (!memcmp(idef
->ipx_node
, "\000\000\000\000\000\000",
1049 memset(intrfc
->if_node
, 0, IPX_NODE_LEN
);
1050 memcpy(intrfc
->if_node
+ IPX_NODE_LEN
- dev
->addr_len
,
1051 dev
->dev_addr
, dev
->addr_len
);
1053 memcpy(intrfc
->if_node
, idef
->ipx_node
, IPX_NODE_LEN
);
1054 ipxitf_hold(intrfc
);
1055 ipxitf_insert(intrfc
);
1059 /* If the network number is known, add a route */
1061 if (!intrfc
->if_netnum
)
1064 rc
= ipxitf_add_local_route(intrfc
);
1074 static int ipxitf_delete(struct ipx_interface_definition
*idef
)
1076 struct net_device
*dev
= NULL
;
1077 unsigned short dlink_type
= 0;
1078 struct ipx_interface
*intrfc
;
1081 spin_lock_bh(&ipx_interfaces_lock
);
1082 if (idef
->ipx_special
== IPX_INTERNAL
) {
1083 if (ipx_internal_net
) {
1084 __ipxitf_put(ipx_internal_net
);
1091 dlink_type
= ipx_map_frame_type(idef
->ipx_dlink_type
);
1092 rc
= -EPROTONOSUPPORT
;
1096 dev
= __dev_get_by_name(idef
->ipx_device
);
1101 intrfc
= __ipxitf_find_using_phys(dev
, dlink_type
);
1105 __ipxitf_put(intrfc
);
1109 spin_unlock_bh(&ipx_interfaces_lock
);
1113 static struct ipx_interface
*ipxitf_auto_create(struct net_device
*dev
,
1114 unsigned short dlink_type
)
1116 struct ipx_interface
*intrfc
= NULL
;
1117 struct datalink_proto
*datalink
;
1122 /* Check addresses are suitable */
1123 if (dev
->addr_len
> IPX_NODE_LEN
)
1126 switch (htons(dlink_type
)) {
1127 case ETH_P_IPX
: datalink
= pEII_datalink
; break;
1128 case ETH_P_802_2
: datalink
= p8022_datalink
; break;
1129 case ETH_P_SNAP
: datalink
= pSNAP_datalink
; break;
1130 case ETH_P_802_3
: datalink
= p8023_datalink
; break;
1134 intrfc
= ipxitf_alloc(dev
, 0, dlink_type
, datalink
, 0,
1135 dev
->hard_header_len
+ datalink
->header_length
);
1138 memset(intrfc
->if_node
, 0, IPX_NODE_LEN
);
1139 memcpy((char *)&(intrfc
->if_node
[IPX_NODE_LEN
-dev
->addr_len
]),
1140 dev
->dev_addr
, dev
->addr_len
);
1141 spin_lock_init(&intrfc
->if_sklist_lock
);
1142 atomic_set(&intrfc
->refcnt
, 1);
1143 ipxitf_insert(intrfc
);
1151 static int ipxitf_ioctl(unsigned int cmd
, void __user
*arg
)
1159 struct sockaddr_ipx
*sipx
;
1160 struct ipx_interface_definition f
;
1163 if (copy_from_user(&ifr
, arg
, sizeof(ifr
)))
1165 sipx
= (struct sockaddr_ipx
*)&ifr
.ifr_addr
;
1167 if (sipx
->sipx_family
!= AF_IPX
)
1169 f
.ipx_network
= sipx
->sipx_network
;
1170 memcpy(f
.ipx_device
, ifr
.ifr_name
,
1171 sizeof(f
.ipx_device
));
1172 memcpy(f
.ipx_node
, sipx
->sipx_node
, IPX_NODE_LEN
);
1173 f
.ipx_dlink_type
= sipx
->sipx_type
;
1174 f
.ipx_special
= sipx
->sipx_special
;
1176 if (sipx
->sipx_action
== IPX_DLTITF
)
1177 rc
= ipxitf_delete(&f
);
1179 rc
= ipxitf_create(&f
);
1183 struct sockaddr_ipx
*sipx
;
1184 struct ipx_interface
*ipxif
;
1185 struct net_device
*dev
;
1188 if (copy_from_user(&ifr
, arg
, sizeof(ifr
)))
1190 sipx
= (struct sockaddr_ipx
*)&ifr
.ifr_addr
;
1191 dev
= __dev_get_by_name(ifr
.ifr_name
);
1195 ipxif
= ipxitf_find_using_phys(dev
,
1196 ipx_map_frame_type(sipx
->sipx_type
));
1197 rc
= -EADDRNOTAVAIL
;
1201 sipx
->sipx_family
= AF_IPX
;
1202 sipx
->sipx_network
= ipxif
->if_netnum
;
1203 memcpy(sipx
->sipx_node
, ipxif
->if_node
,
1204 sizeof(sipx
->sipx_node
));
1206 if (copy_to_user(arg
, &ifr
, sizeof(ifr
)))
1212 case SIOCAIPXITFCRT
:
1214 if (get_user(val
, (unsigned char __user
*) arg
))
1217 ipxcfg_auto_create_interfaces
= val
;
1219 case SIOCAIPXPRISLT
:
1221 if (get_user(val
, (unsigned char __user
*) arg
))
1224 ipxcfg_set_auto_select(val
);
1232 * Checksum routine for IPX
1235 /* Note: We assume ipx_tctrl==0 and htons(length)==ipx_pktsize */
1236 /* This functions should *not* mess with packet contents */
1238 __u16
ipx_cksum(struct ipxhdr
*packet
, int length
)
1241 * NOTE: sum is a net byte order quantity, which optimizes the
1242 * loop. This only works on big and little endian machines. (I
1243 * don't know of a machine that isn't.)
1245 /* start at ipx_dest - We skip the checksum field and start with
1246 * ipx_type before the loop, not considering ipx_tctrl in the calc */
1247 __u16
*p
= (__u16
*)&packet
->ipx_dest
;
1248 __u32 i
= (length
>> 1) - 1; /* Number of complete words */
1249 __u32 sum
= packet
->ipx_type
<< sizeof(packet
->ipx_tctrl
);
1251 /* Loop through all complete words except the checksum field,
1252 * ipx_type (accounted above) and ipx_tctrl (not used in the cksum) */
1256 /* Add on the last part word if it exists */
1257 if (packet
->ipx_pktsize
& htons(1))
1258 sum
+= ntohs(0xff00) & *p
;
1260 /* Do final fixup */
1261 sum
= (sum
& 0xffff) + (sum
>> 16);
1263 /* It's a pity there's no concept of carry in C */
1270 const char *ipx_frame_name(unsigned short frame
)
1274 switch (ntohs(frame
)) {
1275 case ETH_P_IPX
: rc
= "EtherII"; break;
1276 case ETH_P_802_2
: rc
= "802.2"; break;
1277 case ETH_P_SNAP
: rc
= "SNAP"; break;
1278 case ETH_P_802_3
: rc
= "802.3"; break;
1279 case ETH_P_TR_802_2
: rc
= "802.2TR"; break;
1285 const char *ipx_device_name(struct ipx_interface
*intrfc
)
1287 return intrfc
->if_internal
? "Internal" :
1288 intrfc
->if_dev
? intrfc
->if_dev
->name
: "Unknown";
1291 /* Handling for system calls applied via the various interfaces to an IPX
1294 static int ipx_setsockopt(struct socket
*sock
, int level
, int optname
,
1295 char __user
*optval
, int optlen
)
1297 struct sock
*sk
= sock
->sk
;
1301 if (optlen
!= sizeof(int))
1305 if (get_user(opt
, (unsigned int __user
*)optval
))
1309 if (!(level
== SOL_IPX
&& optname
== IPX_TYPE
))
1312 ipx_sk(sk
)->type
= opt
;
1318 static int ipx_getsockopt(struct socket
*sock
, int level
, int optname
,
1319 char __user
*optval
, int __user
*optlen
)
1321 struct sock
*sk
= sock
->sk
;
1324 int rc
= -ENOPROTOOPT
;
1326 if (!(level
== SOL_IPX
&& optname
== IPX_TYPE
))
1329 val
= ipx_sk(sk
)->type
;
1332 if (get_user(len
, optlen
))
1335 len
= min_t(unsigned int, len
, sizeof(int));
1341 if (put_user(len
, optlen
) || copy_to_user(optval
, &val
, len
))
1349 static struct proto ipx_proto
= {
1351 .owner
= THIS_MODULE
,
1352 .obj_size
= sizeof(struct ipx_sock
),
1355 static int ipx_create(struct socket
*sock
, int protocol
)
1357 int rc
= -ESOCKTNOSUPPORT
;
1361 * SPX support is not anymore in the kernel sources. If you want to
1362 * ressurrect it, completing it and making it understand shared skbs,
1363 * be fully multithreaded, etc, grab the sources in an early 2.5 kernel
1366 if (sock
->type
!= SOCK_DGRAM
)
1370 sk
= sk_alloc(PF_IPX
, GFP_KERNEL
, &ipx_proto
, 1);
1373 #ifdef IPX_REFCNT_DEBUG
1374 atomic_inc(&ipx_sock_nr
);
1375 printk(KERN_DEBUG
"IPX socket %p created, now we have %d alive\n", sk
,
1376 atomic_read(&ipx_sock_nr
));
1378 sock_init_data(sock
, sk
);
1379 sk
->sk_no_check
= 1; /* Checksum off by default */
1380 sock
->ops
= &ipx_dgram_ops
;
1386 static int ipx_release(struct socket
*sock
)
1388 struct sock
*sk
= sock
->sk
;
1393 if (!sock_flag(sk
, SOCK_DEAD
))
1394 sk
->sk_state_change(sk
);
1396 sock_set_flag(sk
, SOCK_DEAD
);
1398 ipx_destroy_socket(sk
);
1403 /* caller must hold a reference to intrfc */
1405 static unsigned short ipx_first_free_socketnum(struct ipx_interface
*intrfc
)
1407 unsigned short socketNum
= intrfc
->if_sknum
;
1409 spin_lock_bh(&intrfc
->if_sklist_lock
);
1411 if (socketNum
< IPX_MIN_EPHEMERAL_SOCKET
)
1412 socketNum
= IPX_MIN_EPHEMERAL_SOCKET
;
1414 while (__ipxitf_find_socket(intrfc
, ntohs(socketNum
)))
1415 if (socketNum
> IPX_MAX_EPHEMERAL_SOCKET
)
1416 socketNum
= IPX_MIN_EPHEMERAL_SOCKET
;
1420 spin_unlock_bh(&intrfc
->if_sklist_lock
);
1421 intrfc
->if_sknum
= socketNum
;
1423 return ntohs(socketNum
);
1426 static int ipx_bind(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
)
1428 struct sock
*sk
= sock
->sk
;
1429 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1430 struct ipx_interface
*intrfc
;
1431 struct sockaddr_ipx
*addr
= (struct sockaddr_ipx
*)uaddr
;
1434 if (!sock_flag(sk
, SOCK_ZAPPED
) || addr_len
!= sizeof(struct sockaddr_ipx
))
1437 intrfc
= ipxitf_find_using_net(addr
->sipx_network
);
1438 rc
= -EADDRNOTAVAIL
;
1442 if (!addr
->sipx_port
) {
1443 addr
->sipx_port
= ipx_first_free_socketnum(intrfc
);
1445 if (!addr
->sipx_port
)
1449 /* protect IPX system stuff like routing/sap */
1451 if (ntohs(addr
->sipx_port
) < IPX_MIN_EPHEMERAL_SOCKET
&&
1452 !capable(CAP_NET_ADMIN
))
1455 ipxs
->port
= addr
->sipx_port
;
1457 #ifdef CONFIG_IPX_INTERN
1458 if (intrfc
== ipx_internal_net
) {
1459 /* The source address is to be set explicitly if the
1460 * socket is to be bound on the internal network. If a
1461 * node number 0 was specified, the default is used.
1465 if (!memcmp(addr
->sipx_node
, ipx_broadcast_node
, IPX_NODE_LEN
))
1467 if (!memcmp(addr
->sipx_node
, ipx_this_node
, IPX_NODE_LEN
))
1468 memcpy(ipxs
->node
, intrfc
->if_node
, IPX_NODE_LEN
);
1470 memcpy(ipxs
->node
, addr
->sipx_node
, IPX_NODE_LEN
);
1473 if (ipxitf_find_internal_socket(intrfc
, ipxs
->node
,
1476 "IPX: bind failed because port %X in use.\n",
1477 ntohs((int)addr
->sipx_port
));
1481 /* Source addresses are easy. It must be our
1482 * network:node pair for an interface routed to IPX
1483 * with the ipx routing ioctl()
1486 memcpy(ipxs
->node
, intrfc
->if_node
, IPX_NODE_LEN
);
1489 if (ipxitf_find_socket(intrfc
, addr
->sipx_port
)) {
1491 "IPX: bind failed because port %X in use.\n",
1492 ntohs((int)addr
->sipx_port
));
1497 #else /* !def CONFIG_IPX_INTERN */
1499 /* Source addresses are easy. It must be our network:node pair for
1500 an interface routed to IPX with the ipx routing ioctl() */
1503 if (ipxitf_find_socket(intrfc
, addr
->sipx_port
)) {
1504 SOCK_DEBUG(sk
, "IPX: bind failed because port %X in use.\n",
1505 ntohs((int)addr
->sipx_port
));
1509 #endif /* CONFIG_IPX_INTERN */
1511 ipxitf_insert_socket(intrfc
, sk
);
1512 sock_reset_flag(sk
, SOCK_ZAPPED
);
1521 static int ipx_connect(struct socket
*sock
, struct sockaddr
*uaddr
,
1522 int addr_len
, int flags
)
1524 struct sock
*sk
= sock
->sk
;
1525 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1526 struct sockaddr_ipx
*addr
;
1528 struct ipx_route
*rt
;
1530 sk
->sk_state
= TCP_CLOSE
;
1531 sock
->state
= SS_UNCONNECTED
;
1533 if (addr_len
!= sizeof(*addr
))
1535 addr
= (struct sockaddr_ipx
*)uaddr
;
1537 /* put the autobinding in */
1539 struct sockaddr_ipx uaddr
;
1541 uaddr
.sipx_port
= 0;
1542 uaddr
.sipx_network
= 0;
1544 #ifdef CONFIG_IPX_INTERN
1547 goto out
; /* Someone zonked the iface */
1548 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
,
1550 #endif /* CONFIG_IPX_INTERN */
1552 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1553 sizeof(struct sockaddr_ipx
));
1558 /* We can either connect to primary network or somewhere
1559 * we can route to */
1560 rt
= ipxrtr_lookup(addr
->sipx_network
);
1562 if (!rt
&& !(!addr
->sipx_network
&& ipx_primary_net
))
1565 ipxs
->dest_addr
.net
= addr
->sipx_network
;
1566 ipxs
->dest_addr
.sock
= addr
->sipx_port
;
1567 memcpy(ipxs
->dest_addr
.node
, addr
->sipx_node
, IPX_NODE_LEN
);
1568 ipxs
->type
= addr
->sipx_type
;
1570 if (sock
->type
== SOCK_DGRAM
) {
1571 sock
->state
= SS_CONNECTED
;
1572 sk
->sk_state
= TCP_ESTABLISHED
;
1583 static int ipx_getname(struct socket
*sock
, struct sockaddr
*uaddr
,
1584 int *uaddr_len
, int peer
)
1586 struct ipx_address
*addr
;
1587 struct sockaddr_ipx sipx
;
1588 struct sock
*sk
= sock
->sk
;
1589 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1592 *uaddr_len
= sizeof(struct sockaddr_ipx
);
1596 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1599 addr
= &ipxs
->dest_addr
;
1600 sipx
.sipx_network
= addr
->net
;
1601 sipx
.sipx_port
= addr
->sock
;
1602 memcpy(sipx
.sipx_node
, addr
->node
, IPX_NODE_LEN
);
1605 sipx
.sipx_network
= ipxs
->intrfc
->if_netnum
;
1606 #ifdef CONFIG_IPX_INTERN
1607 memcpy(sipx
.sipx_node
, ipxs
->node
, IPX_NODE_LEN
);
1609 memcpy(sipx
.sipx_node
, ipxs
->intrfc
->if_node
,
1611 #endif /* CONFIG_IPX_INTERN */
1614 sipx
.sipx_network
= 0;
1615 memset(sipx
.sipx_node
, '\0', IPX_NODE_LEN
);
1618 sipx
.sipx_port
= ipxs
->port
;
1621 sipx
.sipx_family
= AF_IPX
;
1622 sipx
.sipx_type
= ipxs
->type
;
1624 memcpy(uaddr
, &sipx
, sizeof(sipx
));
1631 static int ipx_rcv(struct sk_buff
*skb
, struct net_device
*dev
, struct packet_type
*pt
, struct net_device
*orig_dev
)
1633 /* NULL here for pt means the packet was looped back */
1634 struct ipx_interface
*intrfc
;
1640 if (skb
->pkt_type
== PACKET_OTHERHOST
)
1643 if ((skb
= skb_share_check(skb
, GFP_ATOMIC
)) == NULL
)
1647 ipx_pktsize
= ntohs(ipx
->ipx_pktsize
);
1649 /* Too small or invalid header? */
1650 if (ipx_pktsize
< sizeof(struct ipxhdr
) || ipx_pktsize
> skb
->len
)
1653 if (ipx
->ipx_checksum
!= IPX_NO_CHECKSUM
&&
1654 ipx
->ipx_checksum
!= ipx_cksum(ipx
, ipx_pktsize
))
1657 IPX_SKB_CB(skb
)->ipx_tctrl
= ipx
->ipx_tctrl
;
1658 IPX_SKB_CB(skb
)->ipx_dest_net
= ipx
->ipx_dest
.net
;
1659 IPX_SKB_CB(skb
)->ipx_source_net
= ipx
->ipx_source
.net
;
1661 /* Determine what local ipx endpoint this is */
1662 intrfc
= ipxitf_find_using_phys(dev
, pt
->type
);
1664 if (ipxcfg_auto_create_interfaces
&&
1665 ntohl(IPX_SKB_CB(skb
)->ipx_dest_net
)) {
1666 intrfc
= ipxitf_auto_create(dev
, pt
->type
);
1668 ipxitf_hold(intrfc
);
1671 if (!intrfc
) /* Not one of ours */
1672 /* or invalid packet for auto creation */
1676 rc
= ipxitf_rcv(intrfc
, skb
);
1685 static int ipx_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
1686 struct msghdr
*msg
, size_t len
)
1688 struct sock
*sk
= sock
->sk
;
1689 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1690 struct sockaddr_ipx
*usipx
= (struct sockaddr_ipx
*)msg
->msg_name
;
1691 struct sockaddr_ipx local_sipx
;
1693 int flags
= msg
->msg_flags
;
1695 /* Socket gets bound below anyway */
1696 /* if (sk->sk_zapped)
1697 return -EIO; */ /* Socket not bound */
1698 if (flags
& ~(MSG_DONTWAIT
|MSG_CMSG_COMPAT
))
1701 /* Max possible packet size limited by 16 bit pktsize in header */
1702 if (len
>= 65535 - sizeof(struct ipxhdr
))
1707 struct sockaddr_ipx uaddr
;
1709 uaddr
.sipx_port
= 0;
1710 uaddr
.sipx_network
= 0;
1711 #ifdef CONFIG_IPX_INTERN
1714 goto out
; /* Someone zonked the iface */
1715 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
,
1718 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1719 sizeof(struct sockaddr_ipx
));
1725 if (msg
->msg_namelen
< sizeof(*usipx
) ||
1726 usipx
->sipx_family
!= AF_IPX
)
1730 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1733 usipx
= &local_sipx
;
1734 usipx
->sipx_family
= AF_IPX
;
1735 usipx
->sipx_type
= ipxs
->type
;
1736 usipx
->sipx_port
= ipxs
->dest_addr
.sock
;
1737 usipx
->sipx_network
= ipxs
->dest_addr
.net
;
1738 memcpy(usipx
->sipx_node
, ipxs
->dest_addr
.node
, IPX_NODE_LEN
);
1741 rc
= ipxrtr_route_packet(sk
, usipx
, msg
->msg_iov
, len
,
1742 flags
& MSG_DONTWAIT
);
1750 static int ipx_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
1751 struct msghdr
*msg
, size_t size
, int flags
)
1753 struct sock
*sk
= sock
->sk
;
1754 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1755 struct sockaddr_ipx
*sipx
= (struct sockaddr_ipx
*)msg
->msg_name
;
1756 struct ipxhdr
*ipx
= NULL
;
1757 struct sk_buff
*skb
;
1760 /* put the autobinding in */
1762 struct sockaddr_ipx uaddr
;
1764 uaddr
.sipx_port
= 0;
1765 uaddr
.sipx_network
= 0;
1767 #ifdef CONFIG_IPX_INTERN
1770 goto out
; /* Someone zonked the iface */
1771 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
, IPX_NODE_LEN
);
1772 #endif /* CONFIG_IPX_INTERN */
1774 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1775 sizeof(struct sockaddr_ipx
));
1781 if (sock_flag(sk
, SOCK_ZAPPED
))
1784 skb
= skb_recv_datagram(sk
, flags
& ~MSG_DONTWAIT
,
1785 flags
& MSG_DONTWAIT
, &rc
);
1790 copied
= ntohs(ipx
->ipx_pktsize
) - sizeof(struct ipxhdr
);
1791 if (copied
> size
) {
1793 msg
->msg_flags
|= MSG_TRUNC
;
1796 rc
= skb_copy_datagram_iovec(skb
, sizeof(struct ipxhdr
), msg
->msg_iov
,
1800 if (skb
->tstamp
.off_sec
)
1801 skb_get_timestamp(skb
, &sk
->sk_stamp
);
1803 msg
->msg_namelen
= sizeof(*sipx
);
1806 sipx
->sipx_family
= AF_IPX
;
1807 sipx
->sipx_port
= ipx
->ipx_source
.sock
;
1808 memcpy(sipx
->sipx_node
, ipx
->ipx_source
.node
, IPX_NODE_LEN
);
1809 sipx
->sipx_network
= IPX_SKB_CB(skb
)->ipx_source_net
;
1810 sipx
->sipx_type
= ipx
->ipx_type
;
1811 sipx
->sipx_zero
= 0;
1816 skb_free_datagram(sk
, skb
);
1822 static int ipx_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1826 struct sock
*sk
= sock
->sk
;
1827 void __user
*argp
= (void __user
*)arg
;
1831 amount
= sk
->sk_sndbuf
- atomic_read(&sk
->sk_wmem_alloc
);
1834 rc
= put_user(amount
, (int __user
*)argp
);
1837 struct sk_buff
*skb
= skb_peek(&sk
->sk_receive_queue
);
1838 /* These two are safe on a single CPU system as only
1839 * user tasks fiddle here */
1841 amount
= skb
->len
- sizeof(struct ipxhdr
);
1842 rc
= put_user(amount
, (int __user
*)argp
);
1848 if (capable(CAP_NET_ADMIN
))
1849 rc
= ipxrtr_ioctl(cmd
, argp
);
1852 case SIOCAIPXITFCRT
:
1853 case SIOCAIPXPRISLT
:
1855 if (!capable(CAP_NET_ADMIN
))
1858 rc
= ipxitf_ioctl(cmd
, argp
);
1860 case SIOCIPXCFGDATA
:
1861 rc
= ipxcfg_get_config_data(argp
);
1863 case SIOCIPXNCPCONN
:
1865 * This socket wants to take care of the NCP connection
1866 * handed to us in arg.
1869 if (!capable(CAP_NET_ADMIN
))
1871 rc
= get_user(ipx_sk(sk
)->ipx_ncp_conn
,
1872 (const unsigned short __user
*)argp
);
1877 rc
= sock_get_timestamp(sk
, argp
);
1879 case SIOCGIFDSTADDR
:
1880 case SIOCSIFDSTADDR
:
1881 case SIOCGIFBRDADDR
:
1882 case SIOCSIFBRDADDR
:
1883 case SIOCGIFNETMASK
:
1884 case SIOCSIFNETMASK
:
1896 #ifdef CONFIG_COMPAT
1897 static int ipx_compat_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1900 * These 4 commands use same structure on 32bit and 64bit. Rest of IPX
1901 * commands is handled by generic ioctl code. As these commands are
1902 * SIOCPROTOPRIVATE..SIOCPROTOPRIVATE+3, they cannot be handled by generic
1906 case SIOCAIPXITFCRT
:
1907 case SIOCAIPXPRISLT
:
1908 case SIOCIPXCFGDATA
:
1909 case SIOCIPXNCPCONN
:
1910 return ipx_ioctl(sock
, cmd
, arg
);
1912 return -ENOIOCTLCMD
;
1919 * Socket family declarations
1922 static struct net_proto_family ipx_family_ops
= {
1924 .create
= ipx_create
,
1925 .owner
= THIS_MODULE
,
1928 static const struct proto_ops
SOCKOPS_WRAPPED(ipx_dgram_ops
) = {
1930 .owner
= THIS_MODULE
,
1931 .release
= ipx_release
,
1933 .connect
= ipx_connect
,
1934 .socketpair
= sock_no_socketpair
,
1935 .accept
= sock_no_accept
,
1936 .getname
= ipx_getname
,
1937 .poll
= datagram_poll
,
1939 #ifdef CONFIG_COMPAT
1940 .compat_ioctl
= ipx_compat_ioctl
,
1942 .listen
= sock_no_listen
,
1943 .shutdown
= sock_no_shutdown
, /* FIXME: support shutdown */
1944 .setsockopt
= ipx_setsockopt
,
1945 .getsockopt
= ipx_getsockopt
,
1946 .sendmsg
= ipx_sendmsg
,
1947 .recvmsg
= ipx_recvmsg
,
1948 .mmap
= sock_no_mmap
,
1949 .sendpage
= sock_no_sendpage
,
1952 #include <linux/smp_lock.h>
1953 SOCKOPS_WRAP(ipx_dgram
, PF_IPX
);
1955 static struct packet_type ipx_8023_packet_type
= {
1956 .type
= __constant_htons(ETH_P_802_3
),
1960 static struct packet_type ipx_dix_packet_type
= {
1961 .type
= __constant_htons(ETH_P_IPX
),
1965 static struct notifier_block ipx_dev_notifier
= {
1966 .notifier_call
= ipxitf_device_event
,
1969 extern struct datalink_proto
*make_EII_client(void);
1970 extern void destroy_EII_client(struct datalink_proto
*);
1972 static unsigned char ipx_8022_type
= 0xE0;
1973 static unsigned char ipx_snap_id
[5] = { 0x0, 0x0, 0x0, 0x81, 0x37 };
1974 static char ipx_EII_err_msg
[] __initdata
=
1975 KERN_CRIT
"IPX: Unable to register with Ethernet II\n";
1976 static char ipx_8023_err_msg
[] __initdata
=
1977 KERN_CRIT
"IPX: Unable to register with 802.3\n";
1978 static char ipx_llc_err_msg
[] __initdata
=
1979 KERN_CRIT
"IPX: Unable to register with 802.2\n";
1980 static char ipx_snap_err_msg
[] __initdata
=
1981 KERN_CRIT
"IPX: Unable to register with SNAP\n";
1983 static int __init
ipx_init(void)
1985 int rc
= proto_register(&ipx_proto
, 1);
1990 sock_register(&ipx_family_ops
);
1992 pEII_datalink
= make_EII_client();
1994 dev_add_pack(&ipx_dix_packet_type
);
1996 printk(ipx_EII_err_msg
);
1998 p8023_datalink
= make_8023_client();
2000 dev_add_pack(&ipx_8023_packet_type
);
2002 printk(ipx_8023_err_msg
);
2004 p8022_datalink
= register_8022_client(ipx_8022_type
, ipx_rcv
);
2005 if (!p8022_datalink
)
2006 printk(ipx_llc_err_msg
);
2008 pSNAP_datalink
= register_snap_client(ipx_snap_id
, ipx_rcv
);
2009 if (!pSNAP_datalink
)
2010 printk(ipx_snap_err_msg
);
2012 register_netdevice_notifier(&ipx_dev_notifier
);
2013 ipx_register_sysctl();
2019 static void __exit
ipx_proto_finito(void)
2022 ipx_unregister_sysctl();
2024 unregister_netdevice_notifier(&ipx_dev_notifier
);
2028 unregister_snap_client(pSNAP_datalink
);
2029 pSNAP_datalink
= NULL
;
2031 unregister_8022_client(p8022_datalink
);
2032 p8022_datalink
= NULL
;
2034 dev_remove_pack(&ipx_8023_packet_type
);
2035 destroy_8023_client(p8023_datalink
);
2036 p8023_datalink
= NULL
;
2038 dev_remove_pack(&ipx_dix_packet_type
);
2039 destroy_EII_client(pEII_datalink
);
2040 pEII_datalink
= NULL
;
2042 proto_unregister(&ipx_proto
);
2043 sock_unregister(ipx_family_ops
.family
);
2046 module_init(ipx_init
);
2047 module_exit(ipx_proto_finito
);
2048 MODULE_LICENSE("GPL");
2049 MODULE_ALIAS_NETPROTO(PF_IPX
);