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(__u32 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
, int len
, int noblock
);
91 extern int ipxrtr_route_skb(struct sk_buff
*skb
);
92 extern struct ipx_route
*ipxrtr_lookup(__u32 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
,
180 unsigned short datalink
)
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
,
193 unsigned short datalink
)
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(__u32 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 (event
!= NETDEV_DOWN
&& event
!= NETDEV_UP
)
353 spin_lock_bh(&ipx_interfaces_lock
);
354 list_for_each_entry_safe(i
, tmp
, &ipx_interfaces
, node
)
355 if (i
->if_dev
== dev
) {
356 if (event
== NETDEV_UP
)
361 spin_unlock_bh(&ipx_interfaces_lock
);
367 static __exit
void ipxitf_cleanup(void)
369 struct ipx_interface
*i
, *tmp
;
371 spin_lock_bh(&ipx_interfaces_lock
);
372 list_for_each_entry_safe(i
, tmp
, &ipx_interfaces
, node
)
374 spin_unlock_bh(&ipx_interfaces_lock
);
377 static void ipxitf_def_skb_handler(struct sock
*sock
, struct sk_buff
*skb
)
379 if (sock_queue_rcv_skb(sock
, skb
) < 0)
384 * On input skb->sk is NULL. Nobody is charged for the memory.
387 /* caller must hold a reference to intrfc */
389 #ifdef CONFIG_IPX_INTERN
390 static int ipxitf_demux_socket(struct ipx_interface
*intrfc
,
391 struct sk_buff
*skb
, int copy
)
393 struct ipxhdr
*ipx
= ipx_hdr(skb
);
394 int is_broadcast
= !memcmp(ipx
->ipx_dest
.node
, ipx_broadcast_node
,
397 struct hlist_node
*node
;
400 spin_lock_bh(&intrfc
->if_sklist_lock
);
402 sk_for_each(s
, node
, &intrfc
->if_sklist
) {
403 struct ipx_sock
*ipxs
= ipx_sk(s
);
405 if (ipxs
->port
== ipx
->ipx_dest
.sock
&&
406 (is_broadcast
|| !memcmp(ipx
->ipx_dest
.node
,
407 ipxs
->node
, IPX_NODE_LEN
))) {
408 /* We found a socket to which to send */
409 struct sk_buff
*skb1
;
412 skb1
= skb_clone(skb
, GFP_ATOMIC
);
418 copy
= 1; /* skb may only be used once */
420 ipxitf_def_skb_handler(s
, skb1
);
422 /* On an external interface, one socket can listen */
423 if (intrfc
!= ipx_internal_net
)
428 /* skb was solely for us, and we did not make a copy, so free it. */
434 spin_unlock_bh(&intrfc
->if_sklist_lock
);
438 static struct sock
*ncp_connection_hack(struct ipx_interface
*intrfc
,
441 /* The packet's target is a NCP connection handler. We want to hand it
442 * to the correct socket directly within the kernel, so that the
443 * mars_nwe packet distribution process does not have to do it. Here we
444 * only care about NCP and BURST packets.
446 * You might call this a hack, but believe me, you do not want a
447 * complete NCP layer in the kernel, and this is VERY fast as well. */
448 struct sock
*sk
= NULL
;
450 u8
*ncphdr
= (u8
*)(ipx
+ 1);
452 if (*ncphdr
== 0x22 && *(ncphdr
+ 1) == 0x22) /* NCP request */
453 connection
= (((int) *(ncphdr
+ 5)) << 8) | (int) *(ncphdr
+ 3);
454 else if (*ncphdr
== 0x77 && *(ncphdr
+ 1) == 0x77) /* BURST packet */
455 connection
= (((int) *(ncphdr
+ 9)) << 8) | (int) *(ncphdr
+ 8);
458 struct hlist_node
*node
;
459 /* Now we have to look for a special NCP connection handling
460 * socket. Only these sockets have ipx_ncp_conn != 0, set by
462 spin_lock_bh(&intrfc
->if_sklist_lock
);
463 sk_for_each(sk
, node
, &intrfc
->if_sklist
)
464 if (ipx_sk(sk
)->ipx_ncp_conn
== connection
) {
470 spin_unlock_bh(&intrfc
->if_sklist_lock
);
475 static int ipxitf_demux_socket(struct ipx_interface
*intrfc
,
476 struct sk_buff
*skb
, int copy
)
478 struct ipxhdr
*ipx
= ipx_hdr(skb
);
479 struct sock
*sock1
= NULL
, *sock2
= NULL
;
480 struct sk_buff
*skb1
= NULL
, *skb2
= NULL
;
483 if (intrfc
== ipx_primary_net
&& ntohs(ipx
->ipx_dest
.sock
) == 0x451)
484 sock1
= ncp_connection_hack(intrfc
, ipx
);
486 /* No special socket found, forward the packet the normal way */
487 sock1
= ipxitf_find_socket(intrfc
, ipx
->ipx_dest
.sock
);
490 * We need to check if there is a primary net and if
491 * this is addressed to one of the *SPECIAL* sockets because
492 * these need to be propagated to the primary net.
493 * The *SPECIAL* socket list contains: 0x452(SAP), 0x453(RIP) and
497 if (ipx_primary_net
&& intrfc
!= ipx_primary_net
) {
498 const int dsock
= ntohs(ipx
->ipx_dest
.sock
);
500 if (dsock
== 0x452 || dsock
== 0x453 || dsock
== 0x456)
501 /* The appropriate thing to do here is to dup the
502 * packet and route to the primary net interface via
503 * ipxitf_send; however, we'll cheat and just demux it
505 sock2
= ipxitf_find_socket(ipx_primary_net
,
510 * If there is nothing to do return. The kfree will cancel any charging.
513 if (!sock1
&& !sock2
) {
520 * This next segment of code is a little awkward, but it sets it up
521 * so that the appropriate number of copies of the SKB are made and
522 * that skb1 and skb2 point to it (them) so that it (they) can be
523 * demuxed to sock1 and/or sock2. If we are unable to make enough
524 * copies, we do as much as is possible.
528 skb1
= skb_clone(skb
, GFP_ATOMIC
);
536 /* Do we need 2 SKBs? */
538 skb2
= skb_clone(skb1
, GFP_ATOMIC
);
543 ipxitf_def_skb_handler(sock1
, skb1
);
549 ipxitf_def_skb_handler(sock2
, skb2
);
560 #endif /* CONFIG_IPX_INTERN */
562 static struct sk_buff
*ipxitf_adjust_skbuff(struct ipx_interface
*intrfc
,
565 struct sk_buff
*skb2
;
566 int in_offset
= (unsigned char *)ipx_hdr(skb
) - skb
->head
;
567 int out_offset
= intrfc
->if_ipx_offset
;
570 /* Hopefully, most cases */
571 if (in_offset
>= out_offset
)
575 len
= skb
->len
+ out_offset
;
576 skb2
= alloc_skb(len
, GFP_ATOMIC
);
578 skb_reserve(skb2
, out_offset
);
579 skb2
->nh
.raw
= skb2
->h
.raw
= skb_put(skb2
, skb
->len
);
580 memcpy(ipx_hdr(skb2
), ipx_hdr(skb
), skb
->len
);
581 memcpy(skb2
->cb
, skb
->cb
, sizeof(skb
->cb
));
587 /* caller must hold a reference to intrfc and the skb has to be unshared */
588 int ipxitf_send(struct ipx_interface
*intrfc
, struct sk_buff
*skb
, char *node
)
590 struct ipxhdr
*ipx
= ipx_hdr(skb
);
591 struct net_device
*dev
= intrfc
->if_dev
;
592 struct datalink_proto
*dl
= intrfc
->if_dlink
;
593 char dest_node
[IPX_NODE_LEN
];
594 int send_to_wire
= 1;
597 ipx
->ipx_tctrl
= IPX_SKB_CB(skb
)->ipx_tctrl
;
598 ipx
->ipx_dest
.net
= IPX_SKB_CB(skb
)->ipx_dest_net
;
599 ipx
->ipx_source
.net
= IPX_SKB_CB(skb
)->ipx_source_net
;
601 /* see if we need to include the netnum in the route list */
602 if (IPX_SKB_CB(skb
)->last_hop
.index
>= 0) {
603 u32
*last_hop
= (u32
*)(((u8
*) skb
->data
) +
604 sizeof(struct ipxhdr
) +
605 IPX_SKB_CB(skb
)->last_hop
.index
*
607 *last_hop
= IPX_SKB_CB(skb
)->last_hop
.netnum
;
608 IPX_SKB_CB(skb
)->last_hop
.index
= -1;
612 * We need to know how many skbuffs it will take to send out this
613 * packet to avoid unnecessary copies.
616 if (!dl
|| !dev
|| dev
->flags
& IFF_LOOPBACK
)
617 send_to_wire
= 0; /* No non looped */
620 * See if this should be demuxed to sockets on this interface
622 * We want to ensure the original was eaten or that we only use
626 if (ipx
->ipx_dest
.net
== intrfc
->if_netnum
) {
628 * To our own node, loop and free the original.
629 * The internal net will receive on all node address.
631 if (intrfc
== ipx_internal_net
||
632 !memcmp(intrfc
->if_node
, node
, IPX_NODE_LEN
)) {
633 /* Don't charge sender */
636 /* Will charge receiver */
637 return ipxitf_demux_socket(intrfc
, skb
, 0);
640 /* Broadcast, loop and possibly keep to send on. */
641 if (!memcmp(ipx_broadcast_node
, node
, IPX_NODE_LEN
)) {
644 ipxitf_demux_socket(intrfc
, skb
, send_to_wire
);
651 * If the originating net is not equal to our net; this is routed
652 * We are still charging the sender. Which is right - the driver
653 * free will handle this fairly.
655 if (ipx
->ipx_source
.net
!= intrfc
->if_netnum
) {
657 * Unshare the buffer before modifying the count in
658 * case it's a flood or tcpdump
660 skb
= skb_unshare(skb
, GFP_ATOMIC
);
663 if (++ipx
->ipx_tctrl
> ipxcfg_max_hops
)
672 /* Determine the appropriate hardware address */
673 addr_len
= dev
->addr_len
;
674 if (!memcmp(ipx_broadcast_node
, node
, IPX_NODE_LEN
))
675 memcpy(dest_node
, dev
->broadcast
, addr_len
);
677 memcpy(dest_node
, &(node
[IPX_NODE_LEN
-addr_len
]), addr_len
);
679 /* Make any compensation for differing physical/data link size */
680 skb
= ipxitf_adjust_skbuff(intrfc
, skb
);
684 /* set up data link and physical headers */
686 skb
->protocol
= htons(ETH_P_IPX
);
689 dl
->request(dl
, skb
, dest_node
);
694 static int ipxitf_add_local_route(struct ipx_interface
*intrfc
)
696 return ipxrtr_add_route(intrfc
->if_netnum
, intrfc
, NULL
);
699 static void ipxitf_discover_netnum(struct ipx_interface
*intrfc
,
700 struct sk_buff
*skb
);
701 static int ipxitf_pprop(struct ipx_interface
*intrfc
, struct sk_buff
*skb
);
703 static int ipxitf_rcv(struct ipx_interface
*intrfc
, struct sk_buff
*skb
)
705 struct ipxhdr
*ipx
= ipx_hdr(skb
);
710 /* See if we should update our network number */
711 if (!intrfc
->if_netnum
) /* net number of intrfc not known yet */
712 ipxitf_discover_netnum(intrfc
, skb
);
714 IPX_SKB_CB(skb
)->last_hop
.index
= -1;
715 if (ipx
->ipx_type
== IPX_TYPE_PPROP
) {
716 rc
= ipxitf_pprop(intrfc
, skb
);
721 /* local processing follows */
722 if (!IPX_SKB_CB(skb
)->ipx_dest_net
)
723 IPX_SKB_CB(skb
)->ipx_dest_net
= intrfc
->if_netnum
;
724 if (!IPX_SKB_CB(skb
)->ipx_source_net
)
725 IPX_SKB_CB(skb
)->ipx_source_net
= intrfc
->if_netnum
;
727 /* it doesn't make sense to route a pprop packet, there's no meaning
728 * in the ipx_dest_net for such packets */
729 if (ipx
->ipx_type
!= IPX_TYPE_PPROP
&&
730 intrfc
->if_netnum
!= IPX_SKB_CB(skb
)->ipx_dest_net
) {
731 /* We only route point-to-point packets. */
732 if (skb
->pkt_type
== PACKET_HOST
) {
733 skb
= skb_unshare(skb
, GFP_ATOMIC
);
735 rc
= ipxrtr_route_skb(skb
);
742 /* see if we should keep it */
743 if (!memcmp(ipx_broadcast_node
, ipx
->ipx_dest
.node
, IPX_NODE_LEN
) ||
744 !memcmp(intrfc
->if_node
, ipx
->ipx_dest
.node
, IPX_NODE_LEN
)) {
745 rc
= ipxitf_demux_socket(intrfc
, skb
, 0);
749 /* we couldn't pawn it off so unload it */
757 static void ipxitf_discover_netnum(struct ipx_interface
*intrfc
,
760 const struct ipx_cb
*cb
= IPX_SKB_CB(skb
);
762 /* see if this is an intra packet: source_net == dest_net */
763 if (cb
->ipx_source_net
== cb
->ipx_dest_net
&& cb
->ipx_source_net
) {
764 struct ipx_interface
*i
=
765 ipxitf_find_using_net(cb
->ipx_source_net
);
766 /* NB: NetWare servers lie about their hop count so we
767 * dropped the test based on it. This is the best way
768 * to determine this is a 0 hop count packet. */
770 intrfc
->if_netnum
= cb
->ipx_source_net
;
771 ipxitf_add_local_route(intrfc
);
773 printk(KERN_WARNING
"IPX: Network number collision "
774 "%lx\n %s %s and %s %s\n",
775 (unsigned long) htonl(cb
->ipx_source_net
),
777 ipx_frame_name(i
->if_dlink_type
),
778 ipx_device_name(intrfc
),
779 ipx_frame_name(intrfc
->if_dlink_type
));
786 * ipxitf_pprop - Process packet propagation IPX packet type 0x14, used for
788 * @intrfc: IPX interface receiving this packet
789 * @skb: Received packet
791 * Checks if packet is valid: if its more than %IPX_MAX_PPROP_HOPS hops or if it
792 * is smaller than a IPX header + the room for %IPX_MAX_PPROP_HOPS hops we drop
793 * it, not even processing it locally, if it has exact %IPX_MAX_PPROP_HOPS we
794 * don't broadcast it, but process it locally. See chapter 5 of Novell's "IPX
795 * RIP and SAP Router Specification", Part Number 107-000029-001.
797 * If it is valid, check if we have pprop broadcasting enabled by the user,
798 * if not, just return zero for local processing.
800 * If it is enabled check the packet and don't broadcast it if we have already
803 * Broadcast: send it to the interfaces that aren't on the packet visited nets
804 * array, just after the IPX header.
806 * Returns -EINVAL for invalid packets, so that the calling function drops
807 * the packet without local processing. 0 if packet is to be locally processed.
809 static int ipxitf_pprop(struct ipx_interface
*intrfc
, struct sk_buff
*skb
)
811 struct ipxhdr
*ipx
= ipx_hdr(skb
);
813 struct ipx_interface
*ifcs
;
817 /* Illegal packet - too many hops or too short */
818 /* We decide to throw it away: no broadcasting, no local processing.
819 * NetBIOS unaware implementations route them as normal packets -
820 * tctrl <= 15, any data payload... */
821 if (IPX_SKB_CB(skb
)->ipx_tctrl
> IPX_MAX_PPROP_HOPS
||
822 ntohs(ipx
->ipx_pktsize
) < sizeof(struct ipxhdr
) +
823 IPX_MAX_PPROP_HOPS
* sizeof(u32
))
825 /* are we broadcasting this damn thing? */
827 if (!sysctl_ipx_pprop_broadcasting
)
829 /* We do broadcast packet on the IPX_MAX_PPROP_HOPS hop, but we
830 * process it locally. All previous hops broadcasted it, and process it
832 if (IPX_SKB_CB(skb
)->ipx_tctrl
== IPX_MAX_PPROP_HOPS
)
835 c
= ((u8
*) ipx
) + sizeof(struct ipxhdr
);
838 /* Don't broadcast packet if already seen this net */
839 for (i
= 0; i
< IPX_SKB_CB(skb
)->ipx_tctrl
; i
++)
840 if (*l
++ == intrfc
->if_netnum
)
843 /* < IPX_MAX_PPROP_HOPS hops && input interface not in list. Save the
844 * position where we will insert recvd netnum into list, later on,
846 IPX_SKB_CB(skb
)->last_hop
.index
= i
;
847 IPX_SKB_CB(skb
)->last_hop
.netnum
= intrfc
->if_netnum
;
848 /* xmit on all other interfaces... */
849 spin_lock_bh(&ipx_interfaces_lock
);
850 list_for_each_entry(ifcs
, &ipx_interfaces
, node
) {
851 /* Except unconfigured interfaces */
852 if (!ifcs
->if_netnum
)
855 /* That aren't in the list */
859 /* don't consider the last entry in the packet list,
860 * it is our netnum, and it is not there yet */
861 for (i
= 0; i
< IPX_SKB_CB(skb
)->ipx_tctrl
; i
++)
862 if (ifcs
->if_netnum
== *l
++)
864 if (i
== IPX_SKB_CB(skb
)->ipx_tctrl
) {
865 struct sk_buff
*s
= skb_copy(skb
, GFP_ATOMIC
);
868 IPX_SKB_CB(s
)->ipx_dest_net
= ifcs
->if_netnum
;
873 spin_unlock_bh(&ipx_interfaces_lock
);
878 static void ipxitf_insert(struct ipx_interface
*intrfc
)
880 spin_lock_bh(&ipx_interfaces_lock
);
881 list_add_tail(&intrfc
->node
, &ipx_interfaces
);
882 spin_unlock_bh(&ipx_interfaces_lock
);
884 if (ipxcfg_auto_select_primary
&& !ipx_primary_net
)
885 ipx_primary_net
= intrfc
;
888 static struct ipx_interface
*ipxitf_alloc(struct net_device
*dev
, __u32 netnum
,
889 unsigned short dlink_type
,
890 struct datalink_proto
*dlink
,
891 unsigned char internal
,
894 struct ipx_interface
*intrfc
= kmalloc(sizeof(*intrfc
), GFP_ATOMIC
);
897 intrfc
->if_dev
= dev
;
898 intrfc
->if_netnum
= netnum
;
899 intrfc
->if_dlink_type
= dlink_type
;
900 intrfc
->if_dlink
= dlink
;
901 intrfc
->if_internal
= internal
;
902 intrfc
->if_ipx_offset
= ipx_offset
;
903 intrfc
->if_sknum
= IPX_MIN_EPHEMERAL_SOCKET
;
904 INIT_HLIST_HEAD(&intrfc
->if_sklist
);
905 atomic_set(&intrfc
->refcnt
, 1);
906 spin_lock_init(&intrfc
->if_sklist_lock
);
912 static int ipxitf_create_internal(struct ipx_interface_definition
*idef
)
914 struct ipx_interface
*intrfc
;
917 /* Only one primary network allowed */
921 /* Must have a valid network number */
923 if (!idef
->ipx_network
)
925 intrfc
= ipxitf_find_using_net(idef
->ipx_network
);
931 intrfc
= ipxitf_alloc(NULL
, idef
->ipx_network
, 0, NULL
, 1, 0);
935 memcpy((char *)&(intrfc
->if_node
), idef
->ipx_node
, IPX_NODE_LEN
);
936 ipx_internal_net
= ipx_primary_net
= intrfc
;
938 ipxitf_insert(intrfc
);
940 rc
= ipxitf_add_local_route(intrfc
);
946 static __be16
ipx_map_frame_type(unsigned char type
)
951 case IPX_FRAME_ETHERII
: rc
= htons(ETH_P_IPX
); break;
952 case IPX_FRAME_8022
: rc
= htons(ETH_P_802_2
); break;
953 case IPX_FRAME_SNAP
: rc
= htons(ETH_P_SNAP
); break;
954 case IPX_FRAME_8023
: rc
= htons(ETH_P_802_3
); break;
960 static int ipxitf_create(struct ipx_interface_definition
*idef
)
962 struct net_device
*dev
;
963 unsigned short dlink_type
= 0;
964 struct datalink_proto
*datalink
= NULL
;
965 struct ipx_interface
*intrfc
;
968 if (idef
->ipx_special
== IPX_INTERNAL
) {
969 rc
= ipxitf_create_internal(idef
);
974 if (idef
->ipx_special
== IPX_PRIMARY
&& ipx_primary_net
)
977 intrfc
= ipxitf_find_using_net(idef
->ipx_network
);
979 if (idef
->ipx_network
&& intrfc
) {
987 dev
= dev_get_by_name(idef
->ipx_device
);
992 switch (idef
->ipx_dlink_type
) {
993 case IPX_FRAME_TR_8022
:
994 printk(KERN_WARNING
"IPX frame type 802.2TR is "
995 "obsolete Use 802.2 instead.\n");
998 dlink_type
= htons(ETH_P_802_2
);
999 datalink
= p8022_datalink
;
1001 case IPX_FRAME_ETHERII
:
1002 if (dev
->type
!= ARPHRD_IEEE802
) {
1003 dlink_type
= htons(ETH_P_IPX
);
1004 datalink
= pEII_datalink
;
1007 printk(KERN_WARNING
"IPX frame type EtherII over "
1008 "token-ring is obsolete. Use SNAP "
1011 case IPX_FRAME_SNAP
:
1012 dlink_type
= htons(ETH_P_SNAP
);
1013 datalink
= pSNAP_datalink
;
1015 case IPX_FRAME_8023
:
1016 dlink_type
= htons(ETH_P_802_3
);
1017 datalink
= p8023_datalink
;
1019 case IPX_FRAME_NONE
:
1021 rc
= -EPROTONOSUPPORT
;
1026 if (!(dev
->flags
& IFF_UP
))
1029 /* Check addresses are suitable */
1031 if (dev
->addr_len
> IPX_NODE_LEN
)
1034 intrfc
= ipxitf_find_using_phys(dev
, dlink_type
);
1037 intrfc
= ipxitf_alloc(dev
, idef
->ipx_network
, dlink_type
,
1038 datalink
, 0, dev
->hard_header_len
+
1039 datalink
->header_length
);
1043 /* Setup primary if necessary */
1044 if (idef
->ipx_special
== IPX_PRIMARY
)
1045 ipx_primary_net
= intrfc
;
1046 if (!memcmp(idef
->ipx_node
, "\000\000\000\000\000\000",
1048 memset(intrfc
->if_node
, 0, IPX_NODE_LEN
);
1049 memcpy(intrfc
->if_node
+ IPX_NODE_LEN
- dev
->addr_len
,
1050 dev
->dev_addr
, dev
->addr_len
);
1052 memcpy(intrfc
->if_node
, idef
->ipx_node
, IPX_NODE_LEN
);
1053 ipxitf_hold(intrfc
);
1054 ipxitf_insert(intrfc
);
1058 /* If the network number is known, add a route */
1060 if (!intrfc
->if_netnum
)
1063 rc
= ipxitf_add_local_route(intrfc
);
1073 static int ipxitf_delete(struct ipx_interface_definition
*idef
)
1075 struct net_device
*dev
= NULL
;
1076 unsigned short dlink_type
= 0;
1077 struct ipx_interface
*intrfc
;
1080 spin_lock_bh(&ipx_interfaces_lock
);
1081 if (idef
->ipx_special
== IPX_INTERNAL
) {
1082 if (ipx_internal_net
) {
1083 __ipxitf_put(ipx_internal_net
);
1090 dlink_type
= ipx_map_frame_type(idef
->ipx_dlink_type
);
1091 rc
= -EPROTONOSUPPORT
;
1095 dev
= __dev_get_by_name(idef
->ipx_device
);
1100 intrfc
= __ipxitf_find_using_phys(dev
, dlink_type
);
1104 __ipxitf_put(intrfc
);
1108 spin_unlock_bh(&ipx_interfaces_lock
);
1112 static struct ipx_interface
*ipxitf_auto_create(struct net_device
*dev
,
1113 unsigned short dlink_type
)
1115 struct ipx_interface
*intrfc
= NULL
;
1116 struct datalink_proto
*datalink
;
1121 /* Check addresses are suitable */
1122 if (dev
->addr_len
> IPX_NODE_LEN
)
1125 switch (htons(dlink_type
)) {
1126 case ETH_P_IPX
: datalink
= pEII_datalink
; break;
1127 case ETH_P_802_2
: datalink
= p8022_datalink
; break;
1128 case ETH_P_SNAP
: datalink
= pSNAP_datalink
; break;
1129 case ETH_P_802_3
: datalink
= p8023_datalink
; break;
1133 intrfc
= ipxitf_alloc(dev
, 0, dlink_type
, datalink
, 0,
1134 dev
->hard_header_len
+ datalink
->header_length
);
1137 memset(intrfc
->if_node
, 0, IPX_NODE_LEN
);
1138 memcpy((char *)&(intrfc
->if_node
[IPX_NODE_LEN
-dev
->addr_len
]),
1139 dev
->dev_addr
, dev
->addr_len
);
1140 spin_lock_init(&intrfc
->if_sklist_lock
);
1141 atomic_set(&intrfc
->refcnt
, 1);
1142 ipxitf_insert(intrfc
);
1150 static int ipxitf_ioctl(unsigned int cmd
, void __user
*arg
)
1158 struct sockaddr_ipx
*sipx
;
1159 struct ipx_interface_definition f
;
1162 if (copy_from_user(&ifr
, arg
, sizeof(ifr
)))
1164 sipx
= (struct sockaddr_ipx
*)&ifr
.ifr_addr
;
1166 if (sipx
->sipx_family
!= AF_IPX
)
1168 f
.ipx_network
= sipx
->sipx_network
;
1169 memcpy(f
.ipx_device
, ifr
.ifr_name
,
1170 sizeof(f
.ipx_device
));
1171 memcpy(f
.ipx_node
, sipx
->sipx_node
, IPX_NODE_LEN
);
1172 f
.ipx_dlink_type
= sipx
->sipx_type
;
1173 f
.ipx_special
= sipx
->sipx_special
;
1175 if (sipx
->sipx_action
== IPX_DLTITF
)
1176 rc
= ipxitf_delete(&f
);
1178 rc
= ipxitf_create(&f
);
1182 struct sockaddr_ipx
*sipx
;
1183 struct ipx_interface
*ipxif
;
1184 struct net_device
*dev
;
1187 if (copy_from_user(&ifr
, arg
, sizeof(ifr
)))
1189 sipx
= (struct sockaddr_ipx
*)&ifr
.ifr_addr
;
1190 dev
= __dev_get_by_name(ifr
.ifr_name
);
1194 ipxif
= ipxitf_find_using_phys(dev
,
1195 ipx_map_frame_type(sipx
->sipx_type
));
1196 rc
= -EADDRNOTAVAIL
;
1200 sipx
->sipx_family
= AF_IPX
;
1201 sipx
->sipx_network
= ipxif
->if_netnum
;
1202 memcpy(sipx
->sipx_node
, ipxif
->if_node
,
1203 sizeof(sipx
->sipx_node
));
1205 if (copy_to_user(arg
, &ifr
, sizeof(ifr
)))
1211 case SIOCAIPXITFCRT
:
1213 if (get_user(val
, (unsigned char __user
*) arg
))
1216 ipxcfg_auto_create_interfaces
= val
;
1218 case SIOCAIPXPRISLT
:
1220 if (get_user(val
, (unsigned char __user
*) arg
))
1223 ipxcfg_set_auto_select(val
);
1231 * Checksum routine for IPX
1234 /* Note: We assume ipx_tctrl==0 and htons(length)==ipx_pktsize */
1235 /* This functions should *not* mess with packet contents */
1237 __u16
ipx_cksum(struct ipxhdr
*packet
, int length
)
1240 * NOTE: sum is a net byte order quantity, which optimizes the
1241 * loop. This only works on big and little endian machines. (I
1242 * don't know of a machine that isn't.)
1244 /* start at ipx_dest - We skip the checksum field and start with
1245 * ipx_type before the loop, not considering ipx_tctrl in the calc */
1246 __u16
*p
= (__u16
*)&packet
->ipx_dest
;
1247 __u32 i
= (length
>> 1) - 1; /* Number of complete words */
1248 __u32 sum
= packet
->ipx_type
<< sizeof(packet
->ipx_tctrl
);
1250 /* Loop through all complete words except the checksum field,
1251 * ipx_type (accounted above) and ipx_tctrl (not used in the cksum) */
1255 /* Add on the last part word if it exists */
1256 if (packet
->ipx_pktsize
& htons(1))
1257 sum
+= ntohs(0xff00) & *p
;
1259 /* Do final fixup */
1260 sum
= (sum
& 0xffff) + (sum
>> 16);
1262 /* It's a pity there's no concept of carry in C */
1269 const char *ipx_frame_name(unsigned short frame
)
1273 switch (ntohs(frame
)) {
1274 case ETH_P_IPX
: rc
= "EtherII"; break;
1275 case ETH_P_802_2
: rc
= "802.2"; break;
1276 case ETH_P_SNAP
: rc
= "SNAP"; break;
1277 case ETH_P_802_3
: rc
= "802.3"; break;
1278 case ETH_P_TR_802_2
: rc
= "802.2TR"; break;
1284 const char *ipx_device_name(struct ipx_interface
*intrfc
)
1286 return intrfc
->if_internal
? "Internal" :
1287 intrfc
->if_dev
? intrfc
->if_dev
->name
: "Unknown";
1290 /* Handling for system calls applied via the various interfaces to an IPX
1293 static int ipx_setsockopt(struct socket
*sock
, int level
, int optname
,
1294 char __user
*optval
, int optlen
)
1296 struct sock
*sk
= sock
->sk
;
1300 if (optlen
!= sizeof(int))
1304 if (get_user(opt
, (unsigned int __user
*)optval
))
1308 if (!(level
== SOL_IPX
&& optname
== IPX_TYPE
))
1311 ipx_sk(sk
)->type
= opt
;
1317 static int ipx_getsockopt(struct socket
*sock
, int level
, int optname
,
1318 char __user
*optval
, int __user
*optlen
)
1320 struct sock
*sk
= sock
->sk
;
1323 int rc
= -ENOPROTOOPT
;
1325 if (!(level
== SOL_IPX
&& optname
== IPX_TYPE
))
1328 val
= ipx_sk(sk
)->type
;
1331 if (get_user(len
, optlen
))
1334 len
= min_t(unsigned int, len
, sizeof(int));
1340 if (put_user(len
, optlen
) || copy_to_user(optval
, &val
, len
))
1348 static struct proto ipx_proto
= {
1350 .owner
= THIS_MODULE
,
1351 .obj_size
= sizeof(struct ipx_sock
),
1354 static int ipx_create(struct socket
*sock
, int protocol
)
1356 int rc
= -ESOCKTNOSUPPORT
;
1360 * SPX support is not anymore in the kernel sources. If you want to
1361 * ressurrect it, completing it and making it understand shared skbs,
1362 * be fully multithreaded, etc, grab the sources in an early 2.5 kernel
1365 if (sock
->type
!= SOCK_DGRAM
)
1369 sk
= sk_alloc(PF_IPX
, GFP_KERNEL
, &ipx_proto
, 1);
1372 #ifdef IPX_REFCNT_DEBUG
1373 atomic_inc(&ipx_sock_nr
);
1374 printk(KERN_DEBUG
"IPX socket %p created, now we have %d alive\n", sk
,
1375 atomic_read(&ipx_sock_nr
));
1377 sock_init_data(sock
, sk
);
1378 sk
->sk_no_check
= 1; /* Checksum off by default */
1379 sock
->ops
= &ipx_dgram_ops
;
1385 static int ipx_release(struct socket
*sock
)
1387 struct sock
*sk
= sock
->sk
;
1392 if (!sock_flag(sk
, SOCK_DEAD
))
1393 sk
->sk_state_change(sk
);
1395 sock_set_flag(sk
, SOCK_DEAD
);
1397 ipx_destroy_socket(sk
);
1402 /* caller must hold a reference to intrfc */
1404 static unsigned short ipx_first_free_socketnum(struct ipx_interface
*intrfc
)
1406 unsigned short socketNum
= intrfc
->if_sknum
;
1408 spin_lock_bh(&intrfc
->if_sklist_lock
);
1410 if (socketNum
< IPX_MIN_EPHEMERAL_SOCKET
)
1411 socketNum
= IPX_MIN_EPHEMERAL_SOCKET
;
1413 while (__ipxitf_find_socket(intrfc
, ntohs(socketNum
)))
1414 if (socketNum
> IPX_MAX_EPHEMERAL_SOCKET
)
1415 socketNum
= IPX_MIN_EPHEMERAL_SOCKET
;
1419 spin_unlock_bh(&intrfc
->if_sklist_lock
);
1420 intrfc
->if_sknum
= socketNum
;
1422 return ntohs(socketNum
);
1425 static int ipx_bind(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
)
1427 struct sock
*sk
= sock
->sk
;
1428 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1429 struct ipx_interface
*intrfc
;
1430 struct sockaddr_ipx
*addr
= (struct sockaddr_ipx
*)uaddr
;
1433 if (!sock_flag(sk
, SOCK_ZAPPED
) || addr_len
!= sizeof(struct sockaddr_ipx
))
1436 intrfc
= ipxitf_find_using_net(addr
->sipx_network
);
1437 rc
= -EADDRNOTAVAIL
;
1441 if (!addr
->sipx_port
) {
1442 addr
->sipx_port
= ipx_first_free_socketnum(intrfc
);
1444 if (!addr
->sipx_port
)
1448 /* protect IPX system stuff like routing/sap */
1450 if (ntohs(addr
->sipx_port
) < IPX_MIN_EPHEMERAL_SOCKET
&&
1451 !capable(CAP_NET_ADMIN
))
1454 ipxs
->port
= addr
->sipx_port
;
1456 #ifdef CONFIG_IPX_INTERN
1457 if (intrfc
== ipx_internal_net
) {
1458 /* The source address is to be set explicitly if the
1459 * socket is to be bound on the internal network. If a
1460 * node number 0 was specified, the default is used.
1464 if (!memcmp(addr
->sipx_node
, ipx_broadcast_node
, IPX_NODE_LEN
))
1466 if (!memcmp(addr
->sipx_node
, ipx_this_node
, IPX_NODE_LEN
))
1467 memcpy(ipxs
->node
, intrfc
->if_node
, IPX_NODE_LEN
);
1469 memcpy(ipxs
->node
, addr
->sipx_node
, IPX_NODE_LEN
);
1472 if (ipxitf_find_internal_socket(intrfc
, ipxs
->node
,
1475 "IPX: bind failed because port %X in use.\n",
1476 ntohs((int)addr
->sipx_port
));
1480 /* Source addresses are easy. It must be our
1481 * network:node pair for an interface routed to IPX
1482 * with the ipx routing ioctl()
1485 memcpy(ipxs
->node
, intrfc
->if_node
, IPX_NODE_LEN
);
1488 if (ipxitf_find_socket(intrfc
, addr
->sipx_port
)) {
1490 "IPX: bind failed because port %X in use.\n",
1491 ntohs((int)addr
->sipx_port
));
1496 #else /* !def CONFIG_IPX_INTERN */
1498 /* Source addresses are easy. It must be our network:node pair for
1499 an interface routed to IPX with the ipx routing ioctl() */
1502 if (ipxitf_find_socket(intrfc
, addr
->sipx_port
)) {
1503 SOCK_DEBUG(sk
, "IPX: bind failed because port %X in use.\n",
1504 ntohs((int)addr
->sipx_port
));
1508 #endif /* CONFIG_IPX_INTERN */
1510 ipxitf_insert_socket(intrfc
, sk
);
1511 sock_reset_flag(sk
, SOCK_ZAPPED
);
1520 static int ipx_connect(struct socket
*sock
, struct sockaddr
*uaddr
,
1521 int addr_len
, int flags
)
1523 struct sock
*sk
= sock
->sk
;
1524 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1525 struct sockaddr_ipx
*addr
;
1527 struct ipx_route
*rt
;
1529 sk
->sk_state
= TCP_CLOSE
;
1530 sock
->state
= SS_UNCONNECTED
;
1532 if (addr_len
!= sizeof(*addr
))
1534 addr
= (struct sockaddr_ipx
*)uaddr
;
1536 /* put the autobinding in */
1538 struct sockaddr_ipx uaddr
;
1540 uaddr
.sipx_port
= 0;
1541 uaddr
.sipx_network
= 0;
1543 #ifdef CONFIG_IPX_INTERN
1546 goto out
; /* Someone zonked the iface */
1547 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
,
1549 #endif /* CONFIG_IPX_INTERN */
1551 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1552 sizeof(struct sockaddr_ipx
));
1557 /* We can either connect to primary network or somewhere
1558 * we can route to */
1559 rt
= ipxrtr_lookup(addr
->sipx_network
);
1561 if (!rt
&& !(!addr
->sipx_network
&& ipx_primary_net
))
1564 ipxs
->dest_addr
.net
= addr
->sipx_network
;
1565 ipxs
->dest_addr
.sock
= addr
->sipx_port
;
1566 memcpy(ipxs
->dest_addr
.node
, addr
->sipx_node
, IPX_NODE_LEN
);
1567 ipxs
->type
= addr
->sipx_type
;
1569 if (sock
->type
== SOCK_DGRAM
) {
1570 sock
->state
= SS_CONNECTED
;
1571 sk
->sk_state
= TCP_ESTABLISHED
;
1582 static int ipx_getname(struct socket
*sock
, struct sockaddr
*uaddr
,
1583 int *uaddr_len
, int peer
)
1585 struct ipx_address
*addr
;
1586 struct sockaddr_ipx sipx
;
1587 struct sock
*sk
= sock
->sk
;
1588 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1591 *uaddr_len
= sizeof(struct sockaddr_ipx
);
1595 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1598 addr
= &ipxs
->dest_addr
;
1599 sipx
.sipx_network
= addr
->net
;
1600 sipx
.sipx_port
= addr
->sock
;
1601 memcpy(sipx
.sipx_node
, addr
->node
, IPX_NODE_LEN
);
1604 sipx
.sipx_network
= ipxs
->intrfc
->if_netnum
;
1605 #ifdef CONFIG_IPX_INTERN
1606 memcpy(sipx
.sipx_node
, ipxs
->node
, IPX_NODE_LEN
);
1608 memcpy(sipx
.sipx_node
, ipxs
->intrfc
->if_node
,
1610 #endif /* CONFIG_IPX_INTERN */
1613 sipx
.sipx_network
= 0;
1614 memset(sipx
.sipx_node
, '\0', IPX_NODE_LEN
);
1617 sipx
.sipx_port
= ipxs
->port
;
1620 sipx
.sipx_family
= AF_IPX
;
1621 sipx
.sipx_type
= ipxs
->type
;
1623 memcpy(uaddr
, &sipx
, sizeof(sipx
));
1630 static int ipx_rcv(struct sk_buff
*skb
, struct net_device
*dev
, struct packet_type
*pt
, struct net_device
*orig_dev
)
1632 /* NULL here for pt means the packet was looped back */
1633 struct ipx_interface
*intrfc
;
1639 if (skb
->pkt_type
== PACKET_OTHERHOST
)
1642 if ((skb
= skb_share_check(skb
, GFP_ATOMIC
)) == NULL
)
1645 if (!pskb_may_pull(skb
, sizeof(struct ipxhdr
)))
1648 ipx_pktsize
= ntohs(ipx_hdr(skb
)->ipx_pktsize
);
1650 /* Too small or invalid header? */
1651 if (ipx_pktsize
< sizeof(struct ipxhdr
) ||
1652 !pskb_may_pull(skb
, ipx_pktsize
))
1656 if (ipx
->ipx_checksum
!= IPX_NO_CHECKSUM
&&
1657 ipx
->ipx_checksum
!= ipx_cksum(ipx
, ipx_pktsize
))
1660 IPX_SKB_CB(skb
)->ipx_tctrl
= ipx
->ipx_tctrl
;
1661 IPX_SKB_CB(skb
)->ipx_dest_net
= ipx
->ipx_dest
.net
;
1662 IPX_SKB_CB(skb
)->ipx_source_net
= ipx
->ipx_source
.net
;
1664 /* Determine what local ipx endpoint this is */
1665 intrfc
= ipxitf_find_using_phys(dev
, pt
->type
);
1667 if (ipxcfg_auto_create_interfaces
&&
1668 ntohl(IPX_SKB_CB(skb
)->ipx_dest_net
)) {
1669 intrfc
= ipxitf_auto_create(dev
, pt
->type
);
1671 ipxitf_hold(intrfc
);
1674 if (!intrfc
) /* Not one of ours */
1675 /* or invalid packet for auto creation */
1679 rc
= ipxitf_rcv(intrfc
, skb
);
1688 static int ipx_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
1689 struct msghdr
*msg
, size_t len
)
1691 struct sock
*sk
= sock
->sk
;
1692 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1693 struct sockaddr_ipx
*usipx
= (struct sockaddr_ipx
*)msg
->msg_name
;
1694 struct sockaddr_ipx local_sipx
;
1696 int flags
= msg
->msg_flags
;
1698 /* Socket gets bound below anyway */
1699 /* if (sk->sk_zapped)
1700 return -EIO; */ /* Socket not bound */
1701 if (flags
& ~(MSG_DONTWAIT
|MSG_CMSG_COMPAT
))
1704 /* Max possible packet size limited by 16 bit pktsize in header */
1705 if (len
>= 65535 - sizeof(struct ipxhdr
))
1710 struct sockaddr_ipx uaddr
;
1712 uaddr
.sipx_port
= 0;
1713 uaddr
.sipx_network
= 0;
1714 #ifdef CONFIG_IPX_INTERN
1717 goto out
; /* Someone zonked the iface */
1718 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
,
1721 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1722 sizeof(struct sockaddr_ipx
));
1728 if (msg
->msg_namelen
< sizeof(*usipx
) ||
1729 usipx
->sipx_family
!= AF_IPX
)
1733 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1736 usipx
= &local_sipx
;
1737 usipx
->sipx_family
= AF_IPX
;
1738 usipx
->sipx_type
= ipxs
->type
;
1739 usipx
->sipx_port
= ipxs
->dest_addr
.sock
;
1740 usipx
->sipx_network
= ipxs
->dest_addr
.net
;
1741 memcpy(usipx
->sipx_node
, ipxs
->dest_addr
.node
, IPX_NODE_LEN
);
1744 rc
= ipxrtr_route_packet(sk
, usipx
, msg
->msg_iov
, len
,
1745 flags
& MSG_DONTWAIT
);
1753 static int ipx_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
1754 struct msghdr
*msg
, size_t size
, int flags
)
1756 struct sock
*sk
= sock
->sk
;
1757 struct ipx_sock
*ipxs
= ipx_sk(sk
);
1758 struct sockaddr_ipx
*sipx
= (struct sockaddr_ipx
*)msg
->msg_name
;
1759 struct ipxhdr
*ipx
= NULL
;
1760 struct sk_buff
*skb
;
1763 /* put the autobinding in */
1765 struct sockaddr_ipx uaddr
;
1767 uaddr
.sipx_port
= 0;
1768 uaddr
.sipx_network
= 0;
1770 #ifdef CONFIG_IPX_INTERN
1773 goto out
; /* Someone zonked the iface */
1774 memcpy(uaddr
.sipx_node
, ipxs
->intrfc
->if_node
, IPX_NODE_LEN
);
1775 #endif /* CONFIG_IPX_INTERN */
1777 rc
= ipx_bind(sock
, (struct sockaddr
*)&uaddr
,
1778 sizeof(struct sockaddr_ipx
));
1784 if (sock_flag(sk
, SOCK_ZAPPED
))
1787 skb
= skb_recv_datagram(sk
, flags
& ~MSG_DONTWAIT
,
1788 flags
& MSG_DONTWAIT
, &rc
);
1793 copied
= ntohs(ipx
->ipx_pktsize
) - sizeof(struct ipxhdr
);
1794 if (copied
> size
) {
1796 msg
->msg_flags
|= MSG_TRUNC
;
1799 rc
= skb_copy_datagram_iovec(skb
, sizeof(struct ipxhdr
), msg
->msg_iov
,
1803 if (skb
->tstamp
.off_sec
)
1804 skb_get_timestamp(skb
, &sk
->sk_stamp
);
1806 msg
->msg_namelen
= sizeof(*sipx
);
1809 sipx
->sipx_family
= AF_IPX
;
1810 sipx
->sipx_port
= ipx
->ipx_source
.sock
;
1811 memcpy(sipx
->sipx_node
, ipx
->ipx_source
.node
, IPX_NODE_LEN
);
1812 sipx
->sipx_network
= IPX_SKB_CB(skb
)->ipx_source_net
;
1813 sipx
->sipx_type
= ipx
->ipx_type
;
1814 sipx
->sipx_zero
= 0;
1819 skb_free_datagram(sk
, skb
);
1825 static int ipx_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1829 struct sock
*sk
= sock
->sk
;
1830 void __user
*argp
= (void __user
*)arg
;
1834 amount
= sk
->sk_sndbuf
- atomic_read(&sk
->sk_wmem_alloc
);
1837 rc
= put_user(amount
, (int __user
*)argp
);
1840 struct sk_buff
*skb
= skb_peek(&sk
->sk_receive_queue
);
1841 /* These two are safe on a single CPU system as only
1842 * user tasks fiddle here */
1844 amount
= skb
->len
- sizeof(struct ipxhdr
);
1845 rc
= put_user(amount
, (int __user
*)argp
);
1851 if (capable(CAP_NET_ADMIN
))
1852 rc
= ipxrtr_ioctl(cmd
, argp
);
1855 case SIOCAIPXITFCRT
:
1856 case SIOCAIPXPRISLT
:
1858 if (!capable(CAP_NET_ADMIN
))
1861 rc
= ipxitf_ioctl(cmd
, argp
);
1863 case SIOCIPXCFGDATA
:
1864 rc
= ipxcfg_get_config_data(argp
);
1866 case SIOCIPXNCPCONN
:
1868 * This socket wants to take care of the NCP connection
1869 * handed to us in arg.
1872 if (!capable(CAP_NET_ADMIN
))
1874 rc
= get_user(ipx_sk(sk
)->ipx_ncp_conn
,
1875 (const unsigned short __user
*)argp
);
1880 rc
= sock_get_timestamp(sk
, argp
);
1882 case SIOCGIFDSTADDR
:
1883 case SIOCSIFDSTADDR
:
1884 case SIOCGIFBRDADDR
:
1885 case SIOCSIFBRDADDR
:
1886 case SIOCGIFNETMASK
:
1887 case SIOCSIFNETMASK
:
1899 #ifdef CONFIG_COMPAT
1900 static int ipx_compat_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1903 * These 4 commands use same structure on 32bit and 64bit. Rest of IPX
1904 * commands is handled by generic ioctl code. As these commands are
1905 * SIOCPROTOPRIVATE..SIOCPROTOPRIVATE+3, they cannot be handled by generic
1909 case SIOCAIPXITFCRT
:
1910 case SIOCAIPXPRISLT
:
1911 case SIOCIPXCFGDATA
:
1912 case SIOCIPXNCPCONN
:
1913 return ipx_ioctl(sock
, cmd
, arg
);
1915 return -ENOIOCTLCMD
;
1922 * Socket family declarations
1925 static struct net_proto_family ipx_family_ops
= {
1927 .create
= ipx_create
,
1928 .owner
= THIS_MODULE
,
1931 static const struct proto_ops
SOCKOPS_WRAPPED(ipx_dgram_ops
) = {
1933 .owner
= THIS_MODULE
,
1934 .release
= ipx_release
,
1936 .connect
= ipx_connect
,
1937 .socketpair
= sock_no_socketpair
,
1938 .accept
= sock_no_accept
,
1939 .getname
= ipx_getname
,
1940 .poll
= datagram_poll
,
1942 #ifdef CONFIG_COMPAT
1943 .compat_ioctl
= ipx_compat_ioctl
,
1945 .listen
= sock_no_listen
,
1946 .shutdown
= sock_no_shutdown
, /* FIXME: support shutdown */
1947 .setsockopt
= ipx_setsockopt
,
1948 .getsockopt
= ipx_getsockopt
,
1949 .sendmsg
= ipx_sendmsg
,
1950 .recvmsg
= ipx_recvmsg
,
1951 .mmap
= sock_no_mmap
,
1952 .sendpage
= sock_no_sendpage
,
1955 #include <linux/smp_lock.h>
1956 SOCKOPS_WRAP(ipx_dgram
, PF_IPX
);
1958 static struct packet_type ipx_8023_packet_type
= {
1959 .type
= __constant_htons(ETH_P_802_3
),
1963 static struct packet_type ipx_dix_packet_type
= {
1964 .type
= __constant_htons(ETH_P_IPX
),
1968 static struct notifier_block ipx_dev_notifier
= {
1969 .notifier_call
= ipxitf_device_event
,
1972 extern struct datalink_proto
*make_EII_client(void);
1973 extern void destroy_EII_client(struct datalink_proto
*);
1975 static unsigned char ipx_8022_type
= 0xE0;
1976 static unsigned char ipx_snap_id
[5] = { 0x0, 0x0, 0x0, 0x81, 0x37 };
1977 static char ipx_EII_err_msg
[] __initdata
=
1978 KERN_CRIT
"IPX: Unable to register with Ethernet II\n";
1979 static char ipx_8023_err_msg
[] __initdata
=
1980 KERN_CRIT
"IPX: Unable to register with 802.3\n";
1981 static char ipx_llc_err_msg
[] __initdata
=
1982 KERN_CRIT
"IPX: Unable to register with 802.2\n";
1983 static char ipx_snap_err_msg
[] __initdata
=
1984 KERN_CRIT
"IPX: Unable to register with SNAP\n";
1986 static int __init
ipx_init(void)
1988 int rc
= proto_register(&ipx_proto
, 1);
1993 sock_register(&ipx_family_ops
);
1995 pEII_datalink
= make_EII_client();
1997 dev_add_pack(&ipx_dix_packet_type
);
1999 printk(ipx_EII_err_msg
);
2001 p8023_datalink
= make_8023_client();
2003 dev_add_pack(&ipx_8023_packet_type
);
2005 printk(ipx_8023_err_msg
);
2007 p8022_datalink
= register_8022_client(ipx_8022_type
, ipx_rcv
);
2008 if (!p8022_datalink
)
2009 printk(ipx_llc_err_msg
);
2011 pSNAP_datalink
= register_snap_client(ipx_snap_id
, ipx_rcv
);
2012 if (!pSNAP_datalink
)
2013 printk(ipx_snap_err_msg
);
2015 register_netdevice_notifier(&ipx_dev_notifier
);
2016 ipx_register_sysctl();
2022 static void __exit
ipx_proto_finito(void)
2025 ipx_unregister_sysctl();
2027 unregister_netdevice_notifier(&ipx_dev_notifier
);
2031 unregister_snap_client(pSNAP_datalink
);
2032 pSNAP_datalink
= NULL
;
2034 unregister_8022_client(p8022_datalink
);
2035 p8022_datalink
= NULL
;
2037 dev_remove_pack(&ipx_8023_packet_type
);
2038 destroy_8023_client(p8023_datalink
);
2039 p8023_datalink
= NULL
;
2041 dev_remove_pack(&ipx_dix_packet_type
);
2042 destroy_EII_client(pEII_datalink
);
2043 pEII_datalink
= NULL
;
2045 proto_unregister(&ipx_proto
);
2046 sock_unregister(ipx_family_ops
.family
);
2049 module_init(ipx_init
);
2050 module_exit(ipx_proto_finito
);
2051 MODULE_LICENSE("GPL");
2052 MODULE_ALIAS_NETPROTO(PF_IPX
);