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/capability.h>
32 #include <linux/errno.h>
33 #include <linux/if_arp.h>
34 #include <linux/if_ether.h>
35 #include <linux/init.h>
36 #include <linux/ipx.h>
37 #include <linux/kernel.h>
38 #include <linux/list.h>
39 #include <linux/module.h>
40 #include <linux/net.h>
41 #include <linux/netdevice.h>
42 #include <linux/uio.h>
43 #include <linux/skbuff.h>
44 #include <linux/socket.h>
45 #include <linux/sockios.h>
46 #include <linux/string.h>
47 #include <linux/types.h>
48 #include <linux/termios.h>
51 #include <net/p8022.h>
52 #include <net/psnap.h>
54 #include <net/tcp_states.h>
56 #include <asm/uaccess.h>
59 extern void ipx_register_sysctl(void);
60 extern void ipx_unregister_sysctl(void);
62 #define ipx_register_sysctl()
63 #define ipx_unregister_sysctl()
66 /* Configuration Variables */
67 static unsigned char ipxcfg_max_hops
= 16;
68 static char ipxcfg_auto_select_primary
;
69 static char ipxcfg_auto_create_interfaces
;
70 int sysctl_ipx_pprop_broadcasting
= 1;
72 /* Global Variables */
73 static struct datalink_proto
*p8022_datalink
;
74 static struct datalink_proto
*pEII_datalink
;
75 static struct datalink_proto
*p8023_datalink
;
76 static struct datalink_proto
*pSNAP_datalink
;
78 static const struct proto_ops ipx_dgram_ops
;
80 LIST_HEAD(ipx_interfaces
);
81 DEFINE_SPINLOCK(ipx_interfaces_lock
);
83 struct ipx_interface
*ipx_primary_net
;
84 struct ipx_interface
*ipx_internal_net
;
86 extern int ipxrtr_add_route(__be32 network
, struct ipx_interface
*intrfc
,
88 extern void ipxrtr_del_routes(struct ipx_interface
*intrfc
);
89 extern int ipxrtr_route_packet(struct sock
*sk
, struct sockaddr_ipx
*usipx
,
90 struct iovec
*iov
, size_t len
, int noblock
);
91 extern int ipxrtr_route_skb(struct sk_buff
*skb
);
92 extern struct ipx_route
*ipxrtr_lookup(__be32 net
);
93 extern int ipxrtr_ioctl(unsigned int cmd
, void __user
*arg
);
95 #undef IPX_REFCNT_DEBUG
96 #ifdef IPX_REFCNT_DEBUG
100 struct ipx_interface
*ipx_interfaces_head(void)
102 struct ipx_interface
*rc
= NULL
;
104 if (!list_empty(&ipx_interfaces
))
105 rc
= list_entry(ipx_interfaces
.next
,
106 struct ipx_interface
, node
);
110 static void ipxcfg_set_auto_select(char val
)
112 ipxcfg_auto_select_primary
= val
;
113 if (val
&& !ipx_primary_net
)
114 ipx_primary_net
= ipx_interfaces_head();
117 static int ipxcfg_get_config_data(struct ipx_config_data __user
*arg
)
119 struct ipx_config_data vals
;
121 vals
.ipxcfg_auto_create_interfaces
= ipxcfg_auto_create_interfaces
;
122 vals
.ipxcfg_auto_select_primary
= ipxcfg_auto_select_primary
;
124 return copy_to_user(arg
, &vals
, sizeof(vals
)) ? -EFAULT
: 0;
128 * Note: Sockets may not be removed _during_ an interrupt or inet_bh
129 * handler using this technique. They can be added although we do not
133 static void ipx_remove_socket(struct sock
*sk
)
135 /* Determine interface with which socket is associated */
136 struct ipx_interface
*intrfc
= ipx_sk(sk
)->intrfc
;
142 spin_lock_bh(&intrfc
->if_sklist_lock
);
143 sk_del_node_init(sk
);
144 spin_unlock_bh(&intrfc
->if_sklist_lock
);
150 static void ipx_destroy_socket(struct sock
*sk
)
152 ipx_remove_socket(sk
);
153 skb_queue_purge(&sk
->sk_receive_queue
);
154 #ifdef IPX_REFCNT_DEBUG
155 atomic_dec(&ipx_sock_nr
);
156 printk(KERN_DEBUG
"IPX socket %p released, %d are still alive\n", sk
,
157 atomic_read(&ipx_sock_nr
));
158 if (atomic_read(&sk
->sk_refcnt
) != 1)
159 printk(KERN_DEBUG
"Destruction sock ipx %p delayed, cnt=%d\n",
160 sk
, atomic_read(&sk
->sk_refcnt
));
166 * The following code is used to support IPX Interfaces (IPXITF). An
167 * IPX interface is defined by a physical device and a frame type.
170 /* ipxitf_clear_primary_net has to be called with ipx_interfaces_lock held */
172 static void ipxitf_clear_primary_net(void)
174 ipx_primary_net
= NULL
;
175 if (ipxcfg_auto_select_primary
)
176 ipx_primary_net
= ipx_interfaces_head();
179 static struct ipx_interface
*__ipxitf_find_using_phys(struct net_device
*dev
,
182 struct ipx_interface
*i
;
184 list_for_each_entry(i
, &ipx_interfaces
, node
)
185 if (i
->if_dev
== dev
&& i
->if_dlink_type
== datalink
)
192 static struct ipx_interface
*ipxitf_find_using_phys(struct net_device
*dev
,
195 struct ipx_interface
*i
;
197 spin_lock_bh(&ipx_interfaces_lock
);
198 i
= __ipxitf_find_using_phys(dev
, datalink
);
201 spin_unlock_bh(&ipx_interfaces_lock
);
205 struct ipx_interface
*ipxitf_find_using_net(__be32 net
)
207 struct ipx_interface
*i
;
209 spin_lock_bh(&ipx_interfaces_lock
);
211 list_for_each_entry(i
, &ipx_interfaces
, node
)
212 if (i
->if_netnum
== net
)
223 spin_unlock_bh(&ipx_interfaces_lock
);
227 /* Sockets are bound to a particular IPX interface. */
228 static void ipxitf_insert_socket(struct ipx_interface
*intrfc
, struct sock
*sk
)
231 spin_lock_bh(&intrfc
->if_sklist_lock
);
232 ipx_sk(sk
)->intrfc
= intrfc
;
233 sk_add_node(sk
, &intrfc
->if_sklist
);
234 spin_unlock_bh(&intrfc
->if_sklist_lock
);
238 /* caller must hold intrfc->if_sklist_lock */
239 static struct sock
*__ipxitf_find_socket(struct ipx_interface
*intrfc
,
243 struct hlist_node
*node
;
245 sk_for_each(s
, node
, &intrfc
->if_sklist
)
246 if (ipx_sk(s
)->port
== port
)
253 /* caller must hold a reference to intrfc */
254 static struct sock
*ipxitf_find_socket(struct ipx_interface
*intrfc
,
259 spin_lock_bh(&intrfc
->if_sklist_lock
);
260 s
= __ipxitf_find_socket(intrfc
, port
);
263 spin_unlock_bh(&intrfc
->if_sklist_lock
);
268 #ifdef CONFIG_IPX_INTERN
269 static struct sock
*ipxitf_find_internal_socket(struct ipx_interface
*intrfc
,
270 unsigned char *ipx_node
,
274 struct hlist_node
*node
;
277 spin_lock_bh(&intrfc
->if_sklist_lock
);
279 sk_for_each(s
, node
, &intrfc
->if_sklist
) {
280 struct ipx_sock
*ipxs
= ipx_sk(s
);
282 if (ipxs
->port
== port
&&
283 !memcmp(ipx_node
, ipxs
->node
, IPX_NODE_LEN
))
288 spin_unlock_bh(&intrfc
->if_sklist_lock
);
294 static void __ipxitf_down(struct ipx_interface
*intrfc
)
297 struct hlist_node
*node
, *t
;
299 /* Delete all routes associated with this interface */
300 ipxrtr_del_routes(intrfc
);
302 spin_lock_bh(&intrfc
->if_sklist_lock
);
304 sk_for_each_safe(s
, node
, t
, &intrfc
->if_sklist
) {
305 struct ipx_sock
*ipxs
= ipx_sk(s
);
308 s
->sk_error_report(s
);
311 sock_set_flag(s
, SOCK_ZAPPED
); /* Indicates it is no longer bound */
314 INIT_HLIST_HEAD(&intrfc
->if_sklist
);
315 spin_unlock_bh(&intrfc
->if_sklist_lock
);
317 /* remove this interface from list */
318 list_del(&intrfc
->node
);
320 /* remove this interface from *special* networks */
321 if (intrfc
== ipx_primary_net
)
322 ipxitf_clear_primary_net();
323 if (intrfc
== ipx_internal_net
)
324 ipx_internal_net
= NULL
;
327 dev_put(intrfc
->if_dev
);
331 void ipxitf_down(struct ipx_interface
*intrfc
)
333 spin_lock_bh(&ipx_interfaces_lock
);
334 __ipxitf_down(intrfc
);
335 spin_unlock_bh(&ipx_interfaces_lock
);
338 static __inline__
void __ipxitf_put(struct ipx_interface
*intrfc
)
340 if (atomic_dec_and_test(&intrfc
->refcnt
))
341 __ipxitf_down(intrfc
);
344 static int ipxitf_device_event(struct notifier_block
*notifier
,
345 unsigned long event
, void *ptr
)
347 struct net_device
*dev
= ptr
;
348 struct ipx_interface
*i
, *tmp
;
350 if (dev
->nd_net
!= &init_net
)
353 if (event
!= NETDEV_DOWN
&& event
!= NETDEV_UP
)
356 spin_lock_bh(&ipx_interfaces_lock
);
357 list_for_each_entry_safe(i
, tmp
, &ipx_interfaces
, node
)
358 if (i
->if_dev
== dev
) {
359 if (event
== NETDEV_UP
)
364 spin_unlock_bh(&ipx_interfaces_lock
);
370 static __exit
void ipxitf_cleanup(void)
372 struct ipx_interface
*i
, *tmp
;
374 spin_lock_bh(&ipx_interfaces_lock
);
375 list_for_each_entry_safe(i
, tmp
, &ipx_interfaces
, node
)
377 spin_unlock_bh(&ipx_interfaces_lock
);
380 static void ipxitf_def_skb_handler(struct sock
*sock
, struct sk_buff
*skb
)
382 if (sock_queue_rcv_skb(sock
, skb
) < 0)
387 * On input skb->sk is NULL. Nobody is charged for the memory.
390 /* caller must hold a reference to intrfc */
392 #ifdef CONFIG_IPX_INTERN
393 static int ipxitf_demux_socket(struct ipx_interface
*intrfc
,
394 struct sk_buff
*skb
, int copy
)
396 struct ipxhdr
*ipx
= ipx_hdr(skb
);
397 int is_broadcast
= !memcmp(ipx
->ipx_dest
.node
, ipx_broadcast_node
,
400 struct hlist_node
*node
;
403 spin_lock_bh(&intrfc
->if_sklist_lock
);
405 sk_for_each(s
, node
, &intrfc
->if_sklist
) {
406 struct ipx_sock
*ipxs
= ipx_sk(s
);
408 if (ipxs
->port
== ipx
->ipx_dest
.sock
&&
409 (is_broadcast
|| !memcmp(ipx
->ipx_dest
.node
,
410 ipxs
->node
, IPX_NODE_LEN
))) {
411 /* We found a socket to which to send */
412 struct sk_buff
*skb1
;
415 skb1
= skb_clone(skb
, GFP_ATOMIC
);
421 copy
= 1; /* skb may only be used once */
423 ipxitf_def_skb_handler(s
, skb1
);
425 /* On an external interface, one socket can listen */
426 if (intrfc
!= ipx_internal_net
)
431 /* skb was solely for us, and we did not make a copy, so free it. */
437 spin_unlock_bh(&intrfc
->if_sklist_lock
);
441 static struct sock
*ncp_connection_hack(struct ipx_interface
*intrfc
,
444 /* The packet's target is a NCP connection handler. We want to hand it
445 * to the correct socket directly within the kernel, so that the
446 * mars_nwe packet distribution process does not have to do it. Here we
447 * only care about NCP and BURST packets.
449 * You might call this a hack, but believe me, you do not want a
450 * complete NCP layer in the kernel, and this is VERY fast as well. */
451 struct sock
*sk
= NULL
;
453 u8
*ncphdr
= (u8
*)(ipx
+ 1);
455 if (*ncphdr
== 0x22 && *(ncphdr
+ 1) == 0x22) /* NCP request */
456 connection
= (((int) *(ncphdr
+ 5)) << 8) | (int) *(ncphdr
+ 3);
457 else if (*ncphdr
== 0x77 && *(ncphdr
+ 1) == 0x77) /* BURST packet */
458 connection
= (((int) *(ncphdr
+ 9)) << 8) | (int) *(ncphdr
+ 8);
461 struct hlist_node
*node
;
462 /* Now we have to look for a special NCP connection handling
463 * socket. Only these sockets have ipx_ncp_conn != 0, set by
465 spin_lock_bh(&intrfc
->if_sklist_lock
);
466 sk_for_each(sk
, node
, &intrfc
->if_sklist
)
467 if (ipx_sk(sk
)->ipx_ncp_conn
== connection
) {
473 spin_unlock_bh(&intrfc
->if_sklist_lock
);
478 static int ipxitf_demux_socket(struct ipx_interface
*intrfc
,
479 struct sk_buff
*skb
, int copy
)
481 struct ipxhdr
*ipx
= ipx_hdr(skb
);
482 struct sock
*sock1
= NULL
, *sock2
= NULL
;
483 struct sk_buff
*skb1
= NULL
, *skb2
= NULL
;
486 if (intrfc
== ipx_primary_net
&& ntohs(ipx
->ipx_dest
.sock
) == 0x451)
487 sock1
= ncp_connection_hack(intrfc
, ipx
);
489 /* No special socket found, forward the packet the normal way */
490 sock1
= ipxitf_find_socket(intrfc
, ipx
->ipx_dest
.sock
);
493 * We need to check if there is a primary net and if
494 * this is addressed to one of the *SPECIAL* sockets because
495 * these need to be propagated to the primary net.
496 * The *SPECIAL* socket list contains: 0x452(SAP), 0x453(RIP) and
500 if (ipx_primary_net
&& intrfc
!= ipx_primary_net
) {
501 const int dsock
= ntohs(ipx
->ipx_dest
.sock
);
503 if (dsock
== 0x452 || dsock
== 0x453 || dsock
== 0x456)
504 /* The appropriate thing to do here is to dup the
505 * packet and route to the primary net interface via
506 * ipxitf_send; however, we'll cheat and just demux it
508 sock2
= ipxitf_find_socket(ipx_primary_net
,
513 * If there is nothing to do return. The kfree will cancel any charging.
516 if (!sock1
&& !sock2
) {
523 * This next segment of code is a little awkward, but it sets it up
524 * so that the appropriate number of copies of the SKB are made and
525 * that skb1 and skb2 point to it (them) so that it (they) can be
526 * demuxed to sock1 and/or sock2. If we are unable to make enough
527 * copies, we do as much as is possible.
531 skb1
= skb_clone(skb
, GFP_ATOMIC
);
539 /* Do we need 2 SKBs? */
541 skb2
= skb_clone(skb1
, GFP_ATOMIC
);
546 ipxitf_def_skb_handler(sock1
, skb1
);
552 ipxitf_def_skb_handler(sock2
, skb2
);
563 #endif /* CONFIG_IPX_INTERN */
565 static struct sk_buff
*ipxitf_adjust_skbuff(struct ipx_interface
*intrfc
,
568 struct sk_buff
*skb2
;
569 int in_offset
= (unsigned char *)ipx_hdr(skb
) - skb
->head
;
570 int out_offset
= intrfc
->if_ipx_offset
;
573 /* Hopefully, most cases */
574 if (in_offset
>= out_offset
)
578 len
= skb
->len
+ out_offset
;
579 skb2
= alloc_skb(len
, GFP_ATOMIC
);
581 skb_reserve(skb2
, out_offset
);
582 skb_reset_network_header(skb2
);
583 skb_reset_transport_header(skb2
);
584 skb_put(skb2
, skb
->len
);
585 memcpy(ipx_hdr(skb2
), ipx_hdr(skb
), skb
->len
);
586 memcpy(skb2
->cb
, skb
->cb
, sizeof(skb
->cb
));
592 /* caller must hold a reference to intrfc and the skb has to be unshared */
593 int ipxitf_send(struct ipx_interface
*intrfc
, struct sk_buff
*skb
, char *node
)
595 struct ipxhdr
*ipx
= ipx_hdr(skb
);
596 struct net_device
*dev
= intrfc
->if_dev
;
597 struct datalink_proto
*dl
= intrfc
->if_dlink
;
598 char dest_node
[IPX_NODE_LEN
];
599 int send_to_wire
= 1;
602 ipx
->ipx_tctrl
= IPX_SKB_CB(skb
)->ipx_tctrl
;
603 ipx
->ipx_dest
.net
= IPX_SKB_CB(skb
)->ipx_dest_net
;
604 ipx
->ipx_source
.net
= IPX_SKB_CB(skb
)->ipx_source_net
;
606 /* see if we need to include the netnum in the route list */
607 if (IPX_SKB_CB(skb
)->last_hop
.index
>= 0) {
608 __be32
*last_hop
= (__be32
*)(((u8
*) skb
->data
) +
609 sizeof(struct ipxhdr
) +
610 IPX_SKB_CB(skb
)->last_hop
.index
*
612 *last_hop
= IPX_SKB_CB(skb
)->last_hop
.netnum
;
613 IPX_SKB_CB(skb
)->last_hop
.index
= -1;
617 * We need to know how many skbuffs it will take to send out this
618 * packet to avoid unnecessary copies.
621 if (!dl
|| !dev
|| dev
->flags
& IFF_LOOPBACK
)
622 send_to_wire
= 0; /* No non looped */
625 * See if this should be demuxed to sockets on this interface
627 * We want to ensure the original was eaten or that we only use
631 if (ipx
->ipx_dest
.net
== intrfc
->if_netnum
) {
633 * To our own node, loop and free the original.
634 * The internal net will receive on all node address.
636 if (intrfc
== ipx_internal_net
||
637 !memcmp(intrfc
->if_node
, node
, IPX_NODE_LEN
)) {
638 /* Don't charge sender */
641 /* Will charge receiver */
642 return ipxitf_demux_socket(intrfc
, skb
, 0);
645 /* Broadcast, loop and possibly keep to send on. */
646 if (!memcmp(ipx_broadcast_node
, node
, IPX_NODE_LEN
)) {
649 ipxitf_demux_socket(intrfc
, skb
, send_to_wire
);
656 * If the originating net is not equal to our net; this is routed
657 * We are still charging the sender. Which is right - the driver
658 * free will handle this fairly.
660 if (ipx
->ipx_source
.net
!= intrfc
->if_netnum
) {
662 * Unshare the buffer before modifying the count in
663 * case it's a flood or tcpdump
665 skb
= skb_unshare(skb
, GFP_ATOMIC
);
668 if (++ipx
->ipx_tctrl
> ipxcfg_max_hops
)
677 /* Determine the appropriate hardware address */
678 addr_len
= dev
->addr_len
;
679 if (!memcmp(ipx_broadcast_node
, node
, IPX_NODE_LEN
))
680 memcpy(dest_node
, dev
->broadcast
, addr_len
);
682 memcpy(dest_node
, &(node
[IPX_NODE_LEN
-addr_len
]), addr_len
);
684 /* Make any compensation for differing physical/data link size */
685 skb
= ipxitf_adjust_skbuff(intrfc
, skb
);
689 /* set up data link and physical headers */
691 skb
->protocol
= htons(ETH_P_IPX
);
694 dl
->request(dl
, skb
, dest_node
);
699 static int ipxitf_add_local_route(struct ipx_interface
*intrfc
)
701 return ipxrtr_add_route(intrfc
->if_netnum
, intrfc
, NULL
);
704 static void ipxitf_discover_netnum(struct ipx_interface
*intrfc
,
705 struct sk_buff
*skb
);
706 static int ipxitf_pprop(struct ipx_interface
*intrfc
, struct sk_buff
*skb
);
708 static int ipxitf_rcv(struct ipx_interface
*intrfc
, struct sk_buff
*skb
)
710 struct ipxhdr
*ipx
= ipx_hdr(skb
);
715 /* See if we should update our network number */
716 if (!intrfc
->if_netnum
) /* net number of intrfc not known yet */
717 ipxitf_discover_netnum(intrfc
, skb
);
719 IPX_SKB_CB(skb
)->last_hop
.index
= -1;
720 if (ipx
->ipx_type
== IPX_TYPE_PPROP
) {
721 rc
= ipxitf_pprop(intrfc
, skb
);
726 /* local processing follows */
727 if (!IPX_SKB_CB(skb
)->ipx_dest_net
)
728 IPX_SKB_CB(skb
)->ipx_dest_net
= intrfc
->if_netnum
;
729 if (!IPX_SKB_CB(skb
)->ipx_source_net
)
730 IPX_SKB_CB(skb
)->ipx_source_net
= intrfc
->if_netnum
;
732 /* it doesn't make sense to route a pprop packet, there's no meaning
733 * in the ipx_dest_net for such packets */
734 if (ipx
->ipx_type
!= IPX_TYPE_PPROP
&&
735 intrfc
->if_netnum
!= IPX_SKB_CB(skb
)->ipx_dest_net
) {
736 /* We only route point-to-point packets. */
737 if (skb
->pkt_type
== PACKET_HOST
) {
738 skb
= skb_unshare(skb
, GFP_ATOMIC
);
740 rc
= ipxrtr_route_skb(skb
);
747 /* see if we should keep it */
748 if (!memcmp(ipx_broadcast_node
, ipx
->ipx_dest
.node
, IPX_NODE_LEN
) ||
749 !memcmp(intrfc
->if_node
, ipx
->ipx_dest
.node
, IPX_NODE_LEN
)) {
750 rc
= ipxitf_demux_socket(intrfc
, skb
, 0);
754 /* we couldn't pawn it off so unload it */
762 static void ipxitf_discover_netnum(struct ipx_interface
*intrfc
,
765 const struct ipx_cb
*cb
= IPX_SKB_CB(skb
);
767 /* see if this is an intra packet: source_net == dest_net */
768 if (cb
->ipx_source_net
== cb
->ipx_dest_net
&& cb
->ipx_source_net
) {
769 struct ipx_interface
*i
=
770 ipxitf_find_using_net(cb
->ipx_source_net
);
771 /* NB: NetWare servers lie about their hop count so we
772 * dropped the test based on it. This is the best way
773 * to determine this is a 0 hop count packet. */
775 intrfc
->if_netnum
= cb
->ipx_source_net
;
776 ipxitf_add_local_route(intrfc
);
778 printk(KERN_WARNING
"IPX: Network number collision "
779 "%lx\n %s %s and %s %s\n",
780 (unsigned long) ntohl(cb
->ipx_source_net
),
782 ipx_frame_name(i
->if_dlink_type
),
783 ipx_device_name(intrfc
),
784 ipx_frame_name(intrfc
->if_dlink_type
));
791 * ipxitf_pprop - Process packet propagation IPX packet type 0x14, used for
793 * @intrfc: IPX interface receiving this packet
794 * @skb: Received packet
796 * Checks if packet is valid: if its more than %IPX_MAX_PPROP_HOPS hops or if it
797 * is smaller than a IPX header + the room for %IPX_MAX_PPROP_HOPS hops we drop
798 * it, not even processing it locally, if it has exact %IPX_MAX_PPROP_HOPS we
799 * don't broadcast it, but process it locally. See chapter 5 of Novell's "IPX
800 * RIP and SAP Router Specification", Part Number 107-000029-001.
802 * If it is valid, check if we have pprop broadcasting enabled by the user,
803 * if not, just return zero for local processing.
805 * If it is enabled check the packet and don't broadcast it if we have already
808 * Broadcast: send it to the interfaces that aren't on the packet visited nets
809 * array, just after the IPX header.
811 * Returns -EINVAL for invalid packets, so that the calling function drops
812 * the packet without local processing. 0 if packet is to be locally processed.
814 static int ipxitf_pprop(struct ipx_interface
*intrfc
, struct sk_buff
*skb
)
816 struct ipxhdr
*ipx
= ipx_hdr(skb
);
818 struct ipx_interface
*ifcs
;
822 /* Illegal packet - too many hops or too short */
823 /* We decide to throw it away: no broadcasting, no local processing.
824 * NetBIOS unaware implementations route them as normal packets -
825 * tctrl <= 15, any data payload... */
826 if (IPX_SKB_CB(skb
)->ipx_tctrl
> IPX_MAX_PPROP_HOPS
||
827 ntohs(ipx
->ipx_pktsize
) < sizeof(struct ipxhdr
) +
828 IPX_MAX_PPROP_HOPS
* sizeof(u32
))
830 /* are we broadcasting this damn thing? */
832 if (!sysctl_ipx_pprop_broadcasting
)
834 /* We do broadcast packet on the IPX_MAX_PPROP_HOPS hop, but we
835 * process it locally. All previous hops broadcasted it, and process it
837 if (IPX_SKB_CB(skb
)->ipx_tctrl
== IPX_MAX_PPROP_HOPS
)
840 c
= ((u8
*) ipx
) + sizeof(struct ipxhdr
);
843 /* Don't broadcast packet if already seen this net */
844 for (i
= 0; i
< IPX_SKB_CB(skb
)->ipx_tctrl
; i
++)
845 if (*l
++ == intrfc
->if_netnum
)
848 /* < IPX_MAX_PPROP_HOPS hops && input interface not in list. Save the
849 * position where we will insert recvd netnum into list, later on,
851 IPX_SKB_CB(skb
)->last_hop
.index
= i
;
852 IPX_SKB_CB(skb
)->last_hop
.netnum
= intrfc
->if_netnum
;
853 /* xmit on all other interfaces... */
854 spin_lock_bh(&ipx_interfaces_lock
);
855 list_for_each_entry(ifcs
, &ipx_interfaces
, node
) {
856 /* Except unconfigured interfaces */
857 if (!ifcs
->if_netnum
)
860 /* That aren't in the list */
864 /* don't consider the last entry in the packet list,
865 * it is our netnum, and it is not there yet */
866 for (i
= 0; i
< IPX_SKB_CB(skb
)->ipx_tctrl
; i
++)
867 if (ifcs
->if_netnum
== *l
++)
869 if (i
== IPX_SKB_CB(skb
)->ipx_tctrl
) {
870 struct sk_buff
*s
= skb_copy(skb
, GFP_ATOMIC
);
873 IPX_SKB_CB(s
)->ipx_dest_net
= ifcs
->if_netnum
;
878 spin_unlock_bh(&ipx_interfaces_lock
);
883 static void ipxitf_insert(struct ipx_interface
*intrfc
)
885 spin_lock_bh(&ipx_interfaces_lock
);
886 list_add_tail(&intrfc
->node
, &ipx_interfaces
);
887 spin_unlock_bh(&ipx_interfaces_lock
);
889 if (ipxcfg_auto_select_primary
&& !ipx_primary_net
)
890 ipx_primary_net
= intrfc
;
893 static struct ipx_interface
*ipxitf_alloc(struct net_device
*dev
, __be32 netnum
,
895 struct datalink_proto
*dlink
,
896 unsigned char internal
,
899 struct ipx_interface
*intrfc
= kmalloc(sizeof(*intrfc
), GFP_ATOMIC
);
902 intrfc
->if_dev
= dev
;
903 intrfc
->if_netnum
= netnum
;
904 intrfc
->if_dlink_type
= dlink_type
;
905 intrfc
->if_dlink
= dlink
;
906 intrfc
->if_internal
= internal
;
907 intrfc
->if_ipx_offset
= ipx_offset
;
908 intrfc
->if_sknum
= IPX_MIN_EPHEMERAL_SOCKET
;
909 INIT_HLIST_HEAD(&intrfc
->if_sklist
);
910 atomic_set(&intrfc
->refcnt
, 1);
911 spin_lock_init(&intrfc
->if_sklist_lock
);
917 static int ipxitf_create_internal(struct ipx_interface_definition
*idef
)
919 struct ipx_interface
*intrfc
;
922 /* Only one primary network allowed */
926 /* Must have a valid network number */
928 if (!idef
->ipx_network
)
930 intrfc
= ipxitf_find_using_net(idef
->ipx_network
);
936 intrfc
= ipxitf_alloc(NULL
, idef
->ipx_network
, 0, NULL
, 1, 0);
940 memcpy((char *)&(intrfc
->if_node
), idef
->ipx_node
, IPX_NODE_LEN
);
941 ipx_internal_net
= ipx_primary_net
= intrfc
;
943 ipxitf_insert(intrfc
);
945 rc
= ipxitf_add_local_route(intrfc
);
951 static __be16
ipx_map_frame_type(unsigned char type
)
956 case IPX_FRAME_ETHERII
: rc
= htons(ETH_P_IPX
); break;
957 case IPX_FRAME_8022
: rc
= htons(ETH_P_802_2
); break;
958 case IPX_FRAME_SNAP
: rc
= htons(ETH_P_SNAP
); break;
959 case IPX_FRAME_8023
: rc
= htons(ETH_P_802_3
); break;
965 static int ipxitf_create(struct ipx_interface_definition
*idef
)
967 struct net_device
*dev
;
968 __be16 dlink_type
= 0;
969 struct datalink_proto
*datalink
= NULL
;
970 struct ipx_interface
*intrfc
;
973 if (idef
->ipx_special
== IPX_INTERNAL
) {
974 rc
= ipxitf_create_internal(idef
);
979 if (idef
->ipx_special
== IPX_PRIMARY
&& ipx_primary_net
)
982 intrfc
= ipxitf_find_using_net(idef
->ipx_network
);
984 if (idef
->ipx_network
&& intrfc
) {
992 dev
= dev_get_by_name(&init_net
, idef
->ipx_device
);
997 switch (idef
->ipx_dlink_type
) {
998 case IPX_FRAME_TR_8022
:
999 printk(KERN_WARNING
"IPX frame type 802.2TR is "
1000 "obsolete Use 802.2 instead.\n");
1002 case IPX_FRAME_8022
:
1003 dlink_type
= htons(ETH_P_802_2
);
1004 datalink
= p8022_datalink
;
1006 case IPX_FRAME_ETHERII
:
1007 if (dev
->type
!= ARPHRD_IEEE802
) {
1008 dlink_type
= htons(ETH_P_IPX
);
1009 datalink
= pEII_datalink
;
1012 printk(KERN_WARNING
"IPX frame type EtherII over "
1013 "token-ring is obsolete. Use SNAP "
1016 case IPX_FRAME_SNAP
:
1017 dlink_type
= htons(ETH_P_SNAP
);
1018 datalink
= pSNAP_datalink
;
1020 case IPX_FRAME_8023
:
1021 dlink_type
= htons(ETH_P_802_3
);
1022 datalink
= p8023_datalink
;
1024 case IPX_FRAME_NONE
:
1026 rc
= -EPROTONOSUPPORT
;
1031 if (!(dev
->flags
& IFF_UP
))
1034 /* Check addresses are suitable */
1036 if (dev
->addr_len
> IPX_NODE_LEN
)
1039 intrfc
= ipxitf_find_using_phys(dev
, dlink_type
);
1042 intrfc
= ipxitf_alloc(dev
, idef
->ipx_network
, dlink_type
,
1043 datalink
, 0, dev
->hard_header_len
+
1044 datalink
->header_length
);
1048 /* Setup primary if necessary */
1049 if (idef
->ipx_special
== IPX_PRIMARY
)
1050 ipx_primary_net
= intrfc
;
1051 if (!memcmp(idef
->ipx_node
, "\000\000\000\000\000\000",
1053 memset(intrfc
->if_node
, 0, IPX_NODE_LEN
);
1054 memcpy(intrfc
->if_node
+ IPX_NODE_LEN
- dev
->addr_len
,
1055 dev
->dev_addr
, dev
->addr_len
);
1057 memcpy(intrfc
->if_node
, idef
->ipx_node
, IPX_NODE_LEN
);
1058 ipxitf_hold(intrfc
);
1059 ipxitf_insert(intrfc
);
1063 /* If the network number is known, add a route */
1065 if (!intrfc
->if_netnum
)
1068 rc
= ipxitf_add_local_route(intrfc
);
1078 static int ipxitf_delete(struct ipx_interface_definition
*idef
)
1080 struct net_device
*dev
= NULL
;
1081 __be16 dlink_type
= 0;
1082 struct ipx_interface
*intrfc
;
1085 spin_lock_bh(&ipx_interfaces_lock
);
1086 if (idef
->ipx_special
== IPX_INTERNAL
) {
1087 if (ipx_internal_net
) {
1088 __ipxitf_put(ipx_internal_net
);
1095 dlink_type
= ipx_map_frame_type(idef
->ipx_dlink_type
);
1096 rc
= -EPROTONOSUPPORT
;
1100 dev
= __dev_get_by_name(&init_net
, idef
->ipx_device
);
1105 intrfc
= __ipxitf_find_using_phys(dev
, dlink_type
);
1109 __ipxitf_put(intrfc
);
1113 spin_unlock_bh(&ipx_interfaces_lock
);
1117 static struct ipx_interface
*ipxitf_auto_create(struct net_device
*dev
,
1120 struct ipx_interface
*intrfc
= NULL
;
1121 struct datalink_proto
*datalink
;
1126 /* Check addresses are suitable */
1127 if (dev
->addr_len
> IPX_NODE_LEN
)
1130 switch (ntohs(dlink_type
)) {
1131 case ETH_P_IPX
: datalink
= pEII_datalink
; break;
1132 case ETH_P_802_2
: datalink
= p8022_datalink
; break;
1133 case ETH_P_SNAP
: datalink
= pSNAP_datalink
; break;
1134 case ETH_P_802_3
: datalink
= p8023_datalink
; break;
1138 intrfc
= ipxitf_alloc(dev
, 0, dlink_type
, datalink
, 0,
1139 dev
->hard_header_len
+ datalink
->header_length
);
1142 memset(intrfc
->if_node
, 0, IPX_NODE_LEN
);
1143 memcpy((char *)&(intrfc
->if_node
[IPX_NODE_LEN
-dev
->addr_len
]),
1144 dev
->dev_addr
, dev
->addr_len
);
1145 spin_lock_init(&intrfc
->if_sklist_lock
);
1146 atomic_set(&intrfc
->refcnt
, 1);
1147 ipxitf_insert(intrfc
);
1155 static int ipxitf_ioctl(unsigned int cmd
, void __user
*arg
)
1163 struct sockaddr_ipx
*sipx
;
1164 struct ipx_interface_definition f
;
1167 if (copy_from_user(&ifr
, arg
, sizeof(ifr
)))
1169 sipx
= (struct sockaddr_ipx
*)&ifr
.ifr_addr
;
1171 if (sipx
->sipx_family
!= AF_IPX
)
1173 f
.ipx_network
= sipx
->sipx_network
;
1174 memcpy(f
.ipx_device
, ifr
.ifr_name
,
1175 sizeof(f
.ipx_device
));
1176 memcpy(f
.ipx_node
, sipx
->sipx_node
, IPX_NODE_LEN
);
1177 f
.ipx_dlink_type
= sipx
->sipx_type
;
1178 f
.ipx_special
= sipx
->sipx_special
;
1180 if (sipx
->sipx_action
== IPX_DLTITF
)
1181 rc
= ipxitf_delete(&f
);
1183 rc
= ipxitf_create(&f
);
1187 struct sockaddr_ipx
*sipx
;
1188 struct ipx_interface
*ipxif
;
1189 struct net_device
*dev
;
1192 if (copy_from_user(&ifr
, arg
, sizeof(ifr
)))
1194 sipx
= (struct sockaddr_ipx
*)&ifr
.ifr_addr
;
1195 dev
= __dev_get_by_name(&init_net
, ifr
.ifr_name
);
1199 ipxif
= ipxitf_find_using_phys(dev
,
1200 ipx_map_frame_type(sipx
->sipx_type
));
1201 rc
= -EADDRNOTAVAIL
;
1205 sipx
->sipx_family
= AF_IPX
;
1206 sipx
->sipx_network
= ipxif
->if_netnum
;
1207 memcpy(sipx
->sipx_node
, ipxif
->if_node
,
1208 sizeof(sipx
->sipx_node
));
1210 if (copy_to_user(arg
, &ifr
, sizeof(ifr
)))
1216 case SIOCAIPXITFCRT
:
1218 if (get_user(val
, (unsigned char __user
*) arg
))
1221 ipxcfg_auto_create_interfaces
= val
;
1223 case SIOCAIPXPRISLT
:
1225 if (get_user(val
, (unsigned char __user
*) arg
))
1228 ipxcfg_set_auto_select(val
);
1236 * Checksum routine for IPX
1239 /* Note: We assume ipx_tctrl==0 and htons(length)==ipx_pktsize */
1240 /* This functions should *not* mess with packet contents */
1242 __be16
ipx_cksum(struct ipxhdr
*packet
, int length
)
1245 * NOTE: sum is a net byte order quantity, which optimizes the
1246 * loop. This only works on big and little endian machines. (I
1247 * don't know of a machine that isn't.)
1249 /* handle the first 3 words separately; checksum should be skipped
1250 * and ipx_tctrl masked out */
1251 __u16
*p
= (__u16
*)packet
;
1252 __u32 sum
= p
[1] + (p
[2] & (__force u16
)htons(0x00ff));
1253 __u32 i
= (length
>> 1) - 3; /* Number of remaining complete words */
1255 /* Loop through them */
1260 /* Add on the last part word if it exists */
1261 if (packet
->ipx_pktsize
& htons(1))
1262 sum
+= (__force u16
)htons(0xff00) & *p
;
1264 /* Do final fixup */
1265 sum
= (sum
& 0xffff) + (sum
>> 16);
1267 /* It's a pity there's no concept of carry in C */
1272 * Leave 0 alone; we don't want 0xffff here. Note that we can't get
1273 * here with 0x10000, so this check is the same as ((__u16)sum)
1278 return (__force __be16
)sum
;
1281 const char *ipx_frame_name(__be16 frame
)
1285 switch (ntohs(frame
)) {
1286 case ETH_P_IPX
: rc
= "EtherII"; break;
1287 case ETH_P_802_2
: rc
= "802.2"; break;
1288 case ETH_P_SNAP
: rc
= "SNAP"; break;
1289 case ETH_P_802_3
: rc
= "802.3"; break;
1290 case ETH_P_TR_802_2
: rc
= "802.2TR"; break;
1296 const char *ipx_device_name(struct ipx_interface
*intrfc
)
1298 return intrfc
->if_internal
? "Internal" :
1299 intrfc
->if_dev
? intrfc
->if_dev
->name
: "Unknown";
1302 /* Handling for system calls applied via the various interfaces to an IPX
1305 static int ipx_setsockopt(struct socket
*sock
, int level
, int optname
,
1306 char __user
*optval
, int optlen
)
1308 struct sock
*sk
= sock
->sk
;
1312 if (optlen
!= sizeof(int))
1316 if (get_user(opt
, (unsigned int __user
*)optval
))
1320 if (!(level
== SOL_IPX
&& optname
== IPX_TYPE
))
1323 ipx_sk(sk
)->type
= opt
;
1329 static int ipx_getsockopt(struct socket
*sock
, int level
, int optname
,
1330 char __user
*optval
, int __user
*optlen
)
1332 struct sock
*sk
= sock
->sk
;
1335 int rc
= -ENOPROTOOPT
;
1337 if (!(level
== SOL_IPX
&& optname
== IPX_TYPE
))
1340 val
= ipx_sk(sk
)->type
;
1343 if (get_user(len
, optlen
))
1346 len
= min_t(unsigned int, len
, sizeof(int));
1352 if (put_user(len
, optlen
) || copy_to_user(optval
, &val
, len
))
1360 static struct proto ipx_proto
= {
1362 .owner
= THIS_MODULE
,
1363 .obj_size
= sizeof(struct ipx_sock
),
1366 static int ipx_create(struct net
*net
, struct socket
*sock
, int protocol
)
1368 int rc
= -ESOCKTNOSUPPORT
;
1371 if (net
!= &init_net
)
1372 return -EAFNOSUPPORT
;
1375 * SPX support is not anymore in the kernel sources. If you want to
1376 * ressurrect it, completing it and making it understand shared skbs,
1377 * be fully multithreaded, etc, grab the sources in an early 2.5 kernel
1380 if (sock
->type
!= SOCK_DGRAM
)
1384 sk
= sk_alloc(net
, PF_IPX
, GFP_KERNEL
, &ipx_proto
, 1);
1387 #ifdef IPX_REFCNT_DEBUG
1388 atomic_inc(&ipx_sock_nr
);
1389 printk(KERN_DEBUG
"IPX socket %p created, now we have %d alive\n", sk
,
1390 atomic_read(&ipx_sock_nr
));
1392 sock_init_data(sock
, sk
);
1393 sk
->sk_no_check
= 1; /* Checksum off by default */
1394 sock
->ops
= &ipx_dgram_ops
;
1400 static int ipx_release(struct socket
*sock
)
1402 struct sock
*sk
= sock
->sk
;
1407 if (!sock_flag(sk
, SOCK_DEAD
))
1408 sk
->sk_state_change(sk
);
1410 sock_set_flag(sk
, SOCK_DEAD
);
1412 ipx_destroy_socket(sk
);
1417 /* caller must hold a reference to intrfc */
1419 static __be16
ipx_first_free_socketnum(struct ipx_interface
*intrfc
)
1421 unsigned short socketNum
= intrfc
->if_sknum
;
1423 spin_lock_bh(&intrfc
->if_sklist_lock
);
1425 if (socketNum
< IPX_MIN_EPHEMERAL_SOCKET
)
1426 socketNum
= IPX_MIN_EPHEMERAL_SOCKET
;
1428 while (__ipxitf_find_socket(intrfc
, htons(socketNum
)))
1429 if (socketNum
> IPX_MAX_EPHEMERAL_SOCKET
)
1430 socketNum
= IPX_MIN_EPHEMERAL_SOCKET
;
1434 spin_unlock_bh(&intrfc
->if_sklist_lock
);
1435 intrfc
->if_sknum
= socketNum
;
1437 return htons(socketNum
);
1440 static int ipx_bind(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
)
1442 struct sock
*sk
= sock
->sk
;
1443 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1444 struct ipx_interface
*intrfc
;
1445 struct sockaddr_ipx
*addr
= (struct sockaddr_ipx
*)uaddr
;
1448 if (!sock_flag(sk
, SOCK_ZAPPED
) || addr_len
!= sizeof(struct sockaddr_ipx
))
1451 intrfc
= ipxitf_find_using_net(addr
->sipx_network
);
1452 rc
= -EADDRNOTAVAIL
;
1456 if (!addr
->sipx_port
) {
1457 addr
->sipx_port
= ipx_first_free_socketnum(intrfc
);
1459 if (!addr
->sipx_port
)
1463 /* protect IPX system stuff like routing/sap */
1465 if (ntohs(addr
->sipx_port
) < IPX_MIN_EPHEMERAL_SOCKET
&&
1466 !capable(CAP_NET_ADMIN
))
1469 ipxs
->port
= addr
->sipx_port
;
1471 #ifdef CONFIG_IPX_INTERN
1472 if (intrfc
== ipx_internal_net
) {
1473 /* The source address is to be set explicitly if the
1474 * socket is to be bound on the internal network. If a
1475 * node number 0 was specified, the default is used.
1479 if (!memcmp(addr
->sipx_node
, ipx_broadcast_node
, IPX_NODE_LEN
))
1481 if (!memcmp(addr
->sipx_node
, ipx_this_node
, IPX_NODE_LEN
))
1482 memcpy(ipxs
->node
, intrfc
->if_node
, IPX_NODE_LEN
);
1484 memcpy(ipxs
->node
, addr
->sipx_node
, IPX_NODE_LEN
);
1487 if (ipxitf_find_internal_socket(intrfc
, ipxs
->node
,
1490 "IPX: bind failed because port %X in use.\n",
1491 ntohs(addr
->sipx_port
));
1495 /* Source addresses are easy. It must be our
1496 * network:node pair for an interface routed to IPX
1497 * with the ipx routing ioctl()
1500 memcpy(ipxs
->node
, intrfc
->if_node
, IPX_NODE_LEN
);
1503 if (ipxitf_find_socket(intrfc
, addr
->sipx_port
)) {
1505 "IPX: bind failed because port %X in use.\n",
1506 ntohs(addr
->sipx_port
));
1511 #else /* !def CONFIG_IPX_INTERN */
1513 /* Source addresses are easy. It must be our network:node pair for
1514 an interface routed to IPX with the ipx routing ioctl() */
1517 if (ipxitf_find_socket(intrfc
, addr
->sipx_port
)) {
1518 SOCK_DEBUG(sk
, "IPX: bind failed because port %X in use.\n",
1519 ntohs((int)addr
->sipx_port
));
1523 #endif /* CONFIG_IPX_INTERN */
1525 ipxitf_insert_socket(intrfc
, sk
);
1526 sock_reset_flag(sk
, SOCK_ZAPPED
);
1535 static int ipx_connect(struct socket
*sock
, struct sockaddr
*uaddr
,
1536 int addr_len
, int flags
)
1538 struct sock
*sk
= sock
->sk
;
1539 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1540 struct sockaddr_ipx
*addr
;
1542 struct ipx_route
*rt
;
1544 sk
->sk_state
= TCP_CLOSE
;
1545 sock
->state
= SS_UNCONNECTED
;
1547 if (addr_len
!= sizeof(*addr
))
1549 addr
= (struct sockaddr_ipx
*)uaddr
;
1551 /* put the autobinding in */
1553 struct sockaddr_ipx uaddr
;
1555 uaddr
.sipx_port
= 0;
1556 uaddr
.sipx_network
= 0;
1558 #ifdef CONFIG_IPX_INTERN
1561 goto out
; /* Someone zonked the iface */
1562 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
,
1564 #endif /* CONFIG_IPX_INTERN */
1566 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1567 sizeof(struct sockaddr_ipx
));
1572 /* We can either connect to primary network or somewhere
1573 * we can route to */
1574 rt
= ipxrtr_lookup(addr
->sipx_network
);
1576 if (!rt
&& !(!addr
->sipx_network
&& ipx_primary_net
))
1579 ipxs
->dest_addr
.net
= addr
->sipx_network
;
1580 ipxs
->dest_addr
.sock
= addr
->sipx_port
;
1581 memcpy(ipxs
->dest_addr
.node
, addr
->sipx_node
, IPX_NODE_LEN
);
1582 ipxs
->type
= addr
->sipx_type
;
1584 if (sock
->type
== SOCK_DGRAM
) {
1585 sock
->state
= SS_CONNECTED
;
1586 sk
->sk_state
= TCP_ESTABLISHED
;
1597 static int ipx_getname(struct socket
*sock
, struct sockaddr
*uaddr
,
1598 int *uaddr_len
, int peer
)
1600 struct ipx_address
*addr
;
1601 struct sockaddr_ipx sipx
;
1602 struct sock
*sk
= sock
->sk
;
1603 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1606 *uaddr_len
= sizeof(struct sockaddr_ipx
);
1610 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1613 addr
= &ipxs
->dest_addr
;
1614 sipx
.sipx_network
= addr
->net
;
1615 sipx
.sipx_port
= addr
->sock
;
1616 memcpy(sipx
.sipx_node
, addr
->node
, IPX_NODE_LEN
);
1619 sipx
.sipx_network
= ipxs
->intrfc
->if_netnum
;
1620 #ifdef CONFIG_IPX_INTERN
1621 memcpy(sipx
.sipx_node
, ipxs
->node
, IPX_NODE_LEN
);
1623 memcpy(sipx
.sipx_node
, ipxs
->intrfc
->if_node
,
1625 #endif /* CONFIG_IPX_INTERN */
1628 sipx
.sipx_network
= 0;
1629 memset(sipx
.sipx_node
, '\0', IPX_NODE_LEN
);
1632 sipx
.sipx_port
= ipxs
->port
;
1635 sipx
.sipx_family
= AF_IPX
;
1636 sipx
.sipx_type
= ipxs
->type
;
1638 memcpy(uaddr
, &sipx
, sizeof(sipx
));
1645 static int ipx_rcv(struct sk_buff
*skb
, struct net_device
*dev
, struct packet_type
*pt
, struct net_device
*orig_dev
)
1647 /* NULL here for pt means the packet was looped back */
1648 struct ipx_interface
*intrfc
;
1653 if (dev
->nd_net
!= &init_net
)
1657 if (skb
->pkt_type
== PACKET_OTHERHOST
)
1660 if ((skb
= skb_share_check(skb
, GFP_ATOMIC
)) == NULL
)
1663 if (!pskb_may_pull(skb
, sizeof(struct ipxhdr
)))
1666 ipx_pktsize
= ntohs(ipx_hdr(skb
)->ipx_pktsize
);
1668 /* Too small or invalid header? */
1669 if (ipx_pktsize
< sizeof(struct ipxhdr
) ||
1670 !pskb_may_pull(skb
, ipx_pktsize
))
1674 if (ipx
->ipx_checksum
!= IPX_NO_CHECKSUM
&&
1675 ipx
->ipx_checksum
!= ipx_cksum(ipx
, ipx_pktsize
))
1678 IPX_SKB_CB(skb
)->ipx_tctrl
= ipx
->ipx_tctrl
;
1679 IPX_SKB_CB(skb
)->ipx_dest_net
= ipx
->ipx_dest
.net
;
1680 IPX_SKB_CB(skb
)->ipx_source_net
= ipx
->ipx_source
.net
;
1682 /* Determine what local ipx endpoint this is */
1683 intrfc
= ipxitf_find_using_phys(dev
, pt
->type
);
1685 if (ipxcfg_auto_create_interfaces
&&
1686 IPX_SKB_CB(skb
)->ipx_dest_net
) {
1687 intrfc
= ipxitf_auto_create(dev
, pt
->type
);
1689 ipxitf_hold(intrfc
);
1692 if (!intrfc
) /* Not one of ours */
1693 /* or invalid packet for auto creation */
1697 rc
= ipxitf_rcv(intrfc
, skb
);
1706 static int ipx_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
1707 struct msghdr
*msg
, size_t len
)
1709 struct sock
*sk
= sock
->sk
;
1710 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1711 struct sockaddr_ipx
*usipx
= (struct sockaddr_ipx
*)msg
->msg_name
;
1712 struct sockaddr_ipx local_sipx
;
1714 int flags
= msg
->msg_flags
;
1716 /* Socket gets bound below anyway */
1717 /* if (sk->sk_zapped)
1718 return -EIO; */ /* Socket not bound */
1719 if (flags
& ~(MSG_DONTWAIT
|MSG_CMSG_COMPAT
))
1722 /* Max possible packet size limited by 16 bit pktsize in header */
1723 if (len
>= 65535 - sizeof(struct ipxhdr
))
1728 struct sockaddr_ipx uaddr
;
1730 uaddr
.sipx_port
= 0;
1731 uaddr
.sipx_network
= 0;
1732 #ifdef CONFIG_IPX_INTERN
1735 goto out
; /* Someone zonked the iface */
1736 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
,
1739 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1740 sizeof(struct sockaddr_ipx
));
1746 if (msg
->msg_namelen
< sizeof(*usipx
) ||
1747 usipx
->sipx_family
!= AF_IPX
)
1751 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1754 usipx
= &local_sipx
;
1755 usipx
->sipx_family
= AF_IPX
;
1756 usipx
->sipx_type
= ipxs
->type
;
1757 usipx
->sipx_port
= ipxs
->dest_addr
.sock
;
1758 usipx
->sipx_network
= ipxs
->dest_addr
.net
;
1759 memcpy(usipx
->sipx_node
, ipxs
->dest_addr
.node
, IPX_NODE_LEN
);
1762 rc
= ipxrtr_route_packet(sk
, usipx
, msg
->msg_iov
, len
,
1763 flags
& MSG_DONTWAIT
);
1771 static int ipx_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
1772 struct msghdr
*msg
, size_t size
, int flags
)
1774 struct sock
*sk
= sock
->sk
;
1775 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1776 struct sockaddr_ipx
*sipx
= (struct sockaddr_ipx
*)msg
->msg_name
;
1777 struct ipxhdr
*ipx
= NULL
;
1778 struct sk_buff
*skb
;
1781 /* put the autobinding in */
1783 struct sockaddr_ipx uaddr
;
1785 uaddr
.sipx_port
= 0;
1786 uaddr
.sipx_network
= 0;
1788 #ifdef CONFIG_IPX_INTERN
1791 goto out
; /* Someone zonked the iface */
1792 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
, IPX_NODE_LEN
);
1793 #endif /* CONFIG_IPX_INTERN */
1795 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1796 sizeof(struct sockaddr_ipx
));
1802 if (sock_flag(sk
, SOCK_ZAPPED
))
1805 skb
= skb_recv_datagram(sk
, flags
& ~MSG_DONTWAIT
,
1806 flags
& MSG_DONTWAIT
, &rc
);
1811 copied
= ntohs(ipx
->ipx_pktsize
) - sizeof(struct ipxhdr
);
1812 if (copied
> size
) {
1814 msg
->msg_flags
|= MSG_TRUNC
;
1817 rc
= skb_copy_datagram_iovec(skb
, sizeof(struct ipxhdr
), msg
->msg_iov
,
1821 if (skb
->tstamp
.tv64
)
1822 sk
->sk_stamp
= skb
->tstamp
;
1824 msg
->msg_namelen
= sizeof(*sipx
);
1827 sipx
->sipx_family
= AF_IPX
;
1828 sipx
->sipx_port
= ipx
->ipx_source
.sock
;
1829 memcpy(sipx
->sipx_node
, ipx
->ipx_source
.node
, IPX_NODE_LEN
);
1830 sipx
->sipx_network
= IPX_SKB_CB(skb
)->ipx_source_net
;
1831 sipx
->sipx_type
= ipx
->ipx_type
;
1832 sipx
->sipx_zero
= 0;
1837 skb_free_datagram(sk
, skb
);
1843 static int ipx_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1847 struct sock
*sk
= sock
->sk
;
1848 void __user
*argp
= (void __user
*)arg
;
1852 amount
= sk
->sk_sndbuf
- atomic_read(&sk
->sk_wmem_alloc
);
1855 rc
= put_user(amount
, (int __user
*)argp
);
1858 struct sk_buff
*skb
= skb_peek(&sk
->sk_receive_queue
);
1859 /* These two are safe on a single CPU system as only
1860 * user tasks fiddle here */
1862 amount
= skb
->len
- sizeof(struct ipxhdr
);
1863 rc
= put_user(amount
, (int __user
*)argp
);
1869 if (capable(CAP_NET_ADMIN
))
1870 rc
= ipxrtr_ioctl(cmd
, argp
);
1873 case SIOCAIPXITFCRT
:
1874 case SIOCAIPXPRISLT
:
1876 if (!capable(CAP_NET_ADMIN
))
1879 rc
= ipxitf_ioctl(cmd
, argp
);
1881 case SIOCIPXCFGDATA
:
1882 rc
= ipxcfg_get_config_data(argp
);
1884 case SIOCIPXNCPCONN
:
1886 * This socket wants to take care of the NCP connection
1887 * handed to us in arg.
1890 if (!capable(CAP_NET_ADMIN
))
1892 rc
= get_user(ipx_sk(sk
)->ipx_ncp_conn
,
1893 (const unsigned short __user
*)argp
);
1898 rc
= sock_get_timestamp(sk
, argp
);
1900 case SIOCGIFDSTADDR
:
1901 case SIOCSIFDSTADDR
:
1902 case SIOCGIFBRDADDR
:
1903 case SIOCSIFBRDADDR
:
1904 case SIOCGIFNETMASK
:
1905 case SIOCSIFNETMASK
:
1917 #ifdef CONFIG_COMPAT
1918 static int ipx_compat_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1921 * These 4 commands use same structure on 32bit and 64bit. Rest of IPX
1922 * commands is handled by generic ioctl code. As these commands are
1923 * SIOCPROTOPRIVATE..SIOCPROTOPRIVATE+3, they cannot be handled by generic
1927 case SIOCAIPXITFCRT
:
1928 case SIOCAIPXPRISLT
:
1929 case SIOCIPXCFGDATA
:
1930 case SIOCIPXNCPCONN
:
1931 return ipx_ioctl(sock
, cmd
, arg
);
1933 return -ENOIOCTLCMD
;
1940 * Socket family declarations
1943 static struct net_proto_family ipx_family_ops
= {
1945 .create
= ipx_create
,
1946 .owner
= THIS_MODULE
,
1949 static const struct proto_ops
SOCKOPS_WRAPPED(ipx_dgram_ops
) = {
1951 .owner
= THIS_MODULE
,
1952 .release
= ipx_release
,
1954 .connect
= ipx_connect
,
1955 .socketpair
= sock_no_socketpair
,
1956 .accept
= sock_no_accept
,
1957 .getname
= ipx_getname
,
1958 .poll
= datagram_poll
,
1960 #ifdef CONFIG_COMPAT
1961 .compat_ioctl
= ipx_compat_ioctl
,
1963 .listen
= sock_no_listen
,
1964 .shutdown
= sock_no_shutdown
, /* FIXME: support shutdown */
1965 .setsockopt
= ipx_setsockopt
,
1966 .getsockopt
= ipx_getsockopt
,
1967 .sendmsg
= ipx_sendmsg
,
1968 .recvmsg
= ipx_recvmsg
,
1969 .mmap
= sock_no_mmap
,
1970 .sendpage
= sock_no_sendpage
,
1973 SOCKOPS_WRAP(ipx_dgram
, PF_IPX
);
1975 static struct packet_type ipx_8023_packet_type
= {
1976 .type
= __constant_htons(ETH_P_802_3
),
1980 static struct packet_type ipx_dix_packet_type
= {
1981 .type
= __constant_htons(ETH_P_IPX
),
1985 static struct notifier_block ipx_dev_notifier
= {
1986 .notifier_call
= ipxitf_device_event
,
1989 extern struct datalink_proto
*make_EII_client(void);
1990 extern void destroy_EII_client(struct datalink_proto
*);
1992 static unsigned char ipx_8022_type
= 0xE0;
1993 static unsigned char ipx_snap_id
[5] = { 0x0, 0x0, 0x0, 0x81, 0x37 };
1994 static char ipx_EII_err_msg
[] __initdata
=
1995 KERN_CRIT
"IPX: Unable to register with Ethernet II\n";
1996 static char ipx_8023_err_msg
[] __initdata
=
1997 KERN_CRIT
"IPX: Unable to register with 802.3\n";
1998 static char ipx_llc_err_msg
[] __initdata
=
1999 KERN_CRIT
"IPX: Unable to register with 802.2\n";
2000 static char ipx_snap_err_msg
[] __initdata
=
2001 KERN_CRIT
"IPX: Unable to register with SNAP\n";
2003 static int __init
ipx_init(void)
2005 int rc
= proto_register(&ipx_proto
, 1);
2010 sock_register(&ipx_family_ops
);
2012 pEII_datalink
= make_EII_client();
2014 dev_add_pack(&ipx_dix_packet_type
);
2016 printk(ipx_EII_err_msg
);
2018 p8023_datalink
= make_8023_client();
2020 dev_add_pack(&ipx_8023_packet_type
);
2022 printk(ipx_8023_err_msg
);
2024 p8022_datalink
= register_8022_client(ipx_8022_type
, ipx_rcv
);
2025 if (!p8022_datalink
)
2026 printk(ipx_llc_err_msg
);
2028 pSNAP_datalink
= register_snap_client(ipx_snap_id
, ipx_rcv
);
2029 if (!pSNAP_datalink
)
2030 printk(ipx_snap_err_msg
);
2032 register_netdevice_notifier(&ipx_dev_notifier
);
2033 ipx_register_sysctl();
2039 static void __exit
ipx_proto_finito(void)
2042 ipx_unregister_sysctl();
2044 unregister_netdevice_notifier(&ipx_dev_notifier
);
2048 if (pSNAP_datalink
) {
2049 unregister_snap_client(pSNAP_datalink
);
2050 pSNAP_datalink
= NULL
;
2053 if (p8022_datalink
) {
2054 unregister_8022_client(p8022_datalink
);
2055 p8022_datalink
= NULL
;
2058 dev_remove_pack(&ipx_8023_packet_type
);
2059 if (p8023_datalink
) {
2060 destroy_8023_client(p8023_datalink
);
2061 p8023_datalink
= NULL
;
2064 dev_remove_pack(&ipx_dix_packet_type
);
2065 if (pEII_datalink
) {
2066 destroy_EII_client(pEII_datalink
);
2067 pEII_datalink
= NULL
;
2070 proto_unregister(&ipx_proto
);
2071 sock_unregister(ipx_family_ops
.family
);
2074 module_init(ipx_init
);
2075 module_exit(ipx_proto_finito
);
2076 MODULE_LICENSE("GPL");
2077 MODULE_ALIAS_NETPROTO(PF_IPX
);