2 * This program is free software; you can redistribute it and/or modify
3 * it under the terms of the GNU General Public License as published by
4 * the Free Software Foundation; either version 2 of the License, or
5 * (at your option) any later version.
7 * Copyright (C) Jonathan Naylor G4KLX (g4klx@g4klx.demon.co.uk)
8 * Copyright (C) Alan Cox GW4PTS (alan@lxorguk.ukuu.org.uk)
9 * Copyright (C) Terry Dawson VK2KTJ (terry@animats.net)
10 * Copyright (C) Tomi Manninen OH2BNS (oh2bns@sral.fi)
13 #include <linux/capability.h>
14 #include <linux/module.h>
15 #include <linux/moduleparam.h>
16 #include <linux/init.h>
17 #include <linux/errno.h>
18 #include <linux/types.h>
19 #include <linux/socket.h>
21 #include <linux/kernel.h>
22 #include <linux/sched.h>
23 #include <linux/spinlock.h>
24 #include <linux/timer.h>
25 #include <linux/string.h>
26 #include <linux/sockios.h>
27 #include <linux/net.h>
28 #include <linux/stat.h>
30 #include <linux/inet.h>
31 #include <linux/netdevice.h>
32 #include <linux/if_arp.h>
33 #include <linux/skbuff.h>
35 #include <asm/system.h>
36 #include <asm/uaccess.h>
37 #include <linux/fcntl.h>
38 #include <linux/termios.h>
40 #include <linux/interrupt.h>
41 #include <linux/notifier.h>
43 #include <linux/proc_fs.h>
44 #include <linux/seq_file.h>
45 #include <net/tcp_states.h>
49 static int rose_ndevs
= 10;
51 int sysctl_rose_restart_request_timeout
= ROSE_DEFAULT_T0
;
52 int sysctl_rose_call_request_timeout
= ROSE_DEFAULT_T1
;
53 int sysctl_rose_reset_request_timeout
= ROSE_DEFAULT_T2
;
54 int sysctl_rose_clear_request_timeout
= ROSE_DEFAULT_T3
;
55 int sysctl_rose_no_activity_timeout
= ROSE_DEFAULT_IDLE
;
56 int sysctl_rose_ack_hold_back_timeout
= ROSE_DEFAULT_HB
;
57 int sysctl_rose_routing_control
= ROSE_DEFAULT_ROUTING
;
58 int sysctl_rose_link_fail_timeout
= ROSE_DEFAULT_FAIL_TIMEOUT
;
59 int sysctl_rose_maximum_vcs
= ROSE_DEFAULT_MAXVC
;
60 int sysctl_rose_window_size
= ROSE_DEFAULT_WINDOW_SIZE
;
62 static HLIST_HEAD(rose_list
);
63 static DEFINE_SPINLOCK(rose_list_lock
);
65 static struct proto_ops rose_proto_ops
;
67 ax25_address rose_callsign
;
70 * Convert a ROSE address into text.
72 const char *rose2asc(const rose_address
*addr
)
74 static char buffer
[11];
76 if (addr
->rose_addr
[0] == 0x00 && addr
->rose_addr
[1] == 0x00 &&
77 addr
->rose_addr
[2] == 0x00 && addr
->rose_addr
[3] == 0x00 &&
78 addr
->rose_addr
[4] == 0x00) {
81 sprintf(buffer
, "%02X%02X%02X%02X%02X", addr
->rose_addr
[0] & 0xFF,
82 addr
->rose_addr
[1] & 0xFF,
83 addr
->rose_addr
[2] & 0xFF,
84 addr
->rose_addr
[3] & 0xFF,
85 addr
->rose_addr
[4] & 0xFF);
92 * Compare two ROSE addresses, 0 == equal.
94 int rosecmp(rose_address
*addr1
, rose_address
*addr2
)
98 for (i
= 0; i
< 5; i
++)
99 if (addr1
->rose_addr
[i
] != addr2
->rose_addr
[i
])
106 * Compare two ROSE addresses for only mask digits, 0 == equal.
108 int rosecmpm(rose_address
*addr1
, rose_address
*addr2
, unsigned short mask
)
115 for (i
= 0; i
< mask
; i
++) {
119 if ((addr1
->rose_addr
[j
] & 0x0F) != (addr2
->rose_addr
[j
] & 0x0F))
122 if ((addr1
->rose_addr
[j
] & 0xF0) != (addr2
->rose_addr
[j
] & 0xF0))
131 * Socket removal during an interrupt is now safe.
133 static void rose_remove_socket(struct sock
*sk
)
135 spin_lock_bh(&rose_list_lock
);
136 sk_del_node_init(sk
);
137 spin_unlock_bh(&rose_list_lock
);
141 * Kill all bound sockets on a broken link layer connection to a
142 * particular neighbour.
144 void rose_kill_by_neigh(struct rose_neigh
*neigh
)
147 struct hlist_node
*node
;
149 spin_lock_bh(&rose_list_lock
);
150 sk_for_each(s
, node
, &rose_list
) {
151 struct rose_sock
*rose
= rose_sk(s
);
153 if (rose
->neighbour
== neigh
) {
154 rose_disconnect(s
, ENETUNREACH
, ROSE_OUT_OF_ORDER
, 0);
155 rose
->neighbour
->use
--;
156 rose
->neighbour
= NULL
;
159 spin_unlock_bh(&rose_list_lock
);
163 * Kill all bound sockets on a dropped device.
165 static void rose_kill_by_device(struct net_device
*dev
)
168 struct hlist_node
*node
;
170 spin_lock_bh(&rose_list_lock
);
171 sk_for_each(s
, node
, &rose_list
) {
172 struct rose_sock
*rose
= rose_sk(s
);
174 if (rose
->device
== dev
) {
175 rose_disconnect(s
, ENETUNREACH
, ROSE_OUT_OF_ORDER
, 0);
176 rose
->neighbour
->use
--;
180 spin_unlock_bh(&rose_list_lock
);
184 * Handle device status changes.
186 static int rose_device_event(struct notifier_block
*this, unsigned long event
,
189 struct net_device
*dev
= (struct net_device
*)ptr
;
191 if (event
!= NETDEV_DOWN
)
196 rose_kill_by_device(dev
);
199 rose_link_device_down(dev
);
200 rose_rt_device_down(dev
);
208 * Add a socket to the bound sockets list.
210 static void rose_insert_socket(struct sock
*sk
)
213 spin_lock_bh(&rose_list_lock
);
214 sk_add_node(sk
, &rose_list
);
215 spin_unlock_bh(&rose_list_lock
);
219 * Find a socket that wants to accept the Call Request we just
222 static struct sock
*rose_find_listener(rose_address
*addr
, ax25_address
*call
)
225 struct hlist_node
*node
;
227 spin_lock_bh(&rose_list_lock
);
228 sk_for_each(s
, node
, &rose_list
) {
229 struct rose_sock
*rose
= rose_sk(s
);
231 if (!rosecmp(&rose
->source_addr
, addr
) &&
232 !ax25cmp(&rose
->source_call
, call
) &&
233 !rose
->source_ndigis
&& s
->sk_state
== TCP_LISTEN
)
237 sk_for_each(s
, node
, &rose_list
) {
238 struct rose_sock
*rose
= rose_sk(s
);
240 if (!rosecmp(&rose
->source_addr
, addr
) &&
241 !ax25cmp(&rose
->source_call
, &null_ax25_address
) &&
242 s
->sk_state
== TCP_LISTEN
)
247 spin_unlock_bh(&rose_list_lock
);
252 * Find a connected ROSE socket given my LCI and device.
254 struct sock
*rose_find_socket(unsigned int lci
, struct rose_neigh
*neigh
)
257 struct hlist_node
*node
;
259 spin_lock_bh(&rose_list_lock
);
260 sk_for_each(s
, node
, &rose_list
) {
261 struct rose_sock
*rose
= rose_sk(s
);
263 if (rose
->lci
== lci
&& rose
->neighbour
== neigh
)
268 spin_unlock_bh(&rose_list_lock
);
273 * Find a unique LCI for a given device.
275 unsigned int rose_new_lci(struct rose_neigh
*neigh
)
279 if (neigh
->dce_mode
) {
280 for (lci
= 1; lci
<= sysctl_rose_maximum_vcs
; lci
++)
281 if (rose_find_socket(lci
, neigh
) == NULL
&& rose_route_free_lci(lci
, neigh
) == NULL
)
284 for (lci
= sysctl_rose_maximum_vcs
; lci
> 0; lci
--)
285 if (rose_find_socket(lci
, neigh
) == NULL
&& rose_route_free_lci(lci
, neigh
) == NULL
)
295 void rose_destroy_socket(struct sock
*);
298 * Handler for deferred kills.
300 static void rose_destroy_timer(unsigned long data
)
302 rose_destroy_socket((struct sock
*)data
);
306 * This is called from user mode and the timers. Thus it protects itself
307 * against interrupt users but doesn't worry about being called during
308 * work. Once it is removed from the queue no interrupt or bottom half
309 * will touch it and we are (fairly 8-) ) safe.
311 void rose_destroy_socket(struct sock
*sk
)
315 rose_remove_socket(sk
);
316 rose_stop_heartbeat(sk
);
317 rose_stop_idletimer(sk
);
320 rose_clear_queues(sk
); /* Flush the queues */
322 while ((skb
= skb_dequeue(&sk
->sk_receive_queue
)) != NULL
) {
323 if (skb
->sk
!= sk
) { /* A pending connection */
324 /* Queue the unaccepted socket for death */
325 sock_set_flag(skb
->sk
, SOCK_DEAD
);
326 rose_start_heartbeat(skb
->sk
);
327 rose_sk(skb
->sk
)->state
= ROSE_STATE_0
;
333 if (atomic_read(&sk
->sk_wmem_alloc
) ||
334 atomic_read(&sk
->sk_rmem_alloc
)) {
335 /* Defer: outstanding buffers */
336 init_timer(&sk
->sk_timer
);
337 sk
->sk_timer
.expires
= jiffies
+ 10 * HZ
;
338 sk
->sk_timer
.function
= rose_destroy_timer
;
339 sk
->sk_timer
.data
= (unsigned long)sk
;
340 add_timer(&sk
->sk_timer
);
346 * Handling for system calls applied via the various interfaces to a
347 * ROSE socket object.
350 static int rose_setsockopt(struct socket
*sock
, int level
, int optname
,
351 char __user
*optval
, int optlen
)
353 struct sock
*sk
= sock
->sk
;
354 struct rose_sock
*rose
= rose_sk(sk
);
357 if (level
!= SOL_ROSE
)
360 if (optlen
< sizeof(int))
363 if (get_user(opt
, (int __user
*)optval
))
368 rose
->defer
= opt
? 1 : 0;
398 rose
->idle
= opt
* 60 * HZ
;
402 rose
->qbitincl
= opt
? 1 : 0;
410 static int rose_getsockopt(struct socket
*sock
, int level
, int optname
,
411 char __user
*optval
, int __user
*optlen
)
413 struct sock
*sk
= sock
->sk
;
414 struct rose_sock
*rose
= rose_sk(sk
);
418 if (level
!= SOL_ROSE
)
421 if (get_user(len
, optlen
))
449 val
= rose
->idle
/ (60 * HZ
);
453 val
= rose
->qbitincl
;
460 len
= min_t(unsigned int, len
, sizeof(int));
462 if (put_user(len
, optlen
))
465 return copy_to_user(optval
, &val
, len
) ? -EFAULT
: 0;
468 static int rose_listen(struct socket
*sock
, int backlog
)
470 struct sock
*sk
= sock
->sk
;
472 if (sk
->sk_state
!= TCP_LISTEN
) {
473 struct rose_sock
*rose
= rose_sk(sk
);
475 rose
->dest_ndigis
= 0;
476 memset(&rose
->dest_addr
, 0, ROSE_ADDR_LEN
);
477 memset(&rose
->dest_call
, 0, AX25_ADDR_LEN
);
478 memset(rose
->dest_digis
, 0, AX25_ADDR_LEN
* ROSE_MAX_DIGIS
);
479 sk
->sk_max_ack_backlog
= backlog
;
480 sk
->sk_state
= TCP_LISTEN
;
487 static struct proto rose_proto
= {
489 .owner
= THIS_MODULE
,
490 .obj_size
= sizeof(struct rose_sock
),
493 static int rose_create(struct socket
*sock
, int protocol
)
496 struct rose_sock
*rose
;
498 if (sock
->type
!= SOCK_SEQPACKET
|| protocol
!= 0)
499 return -ESOCKTNOSUPPORT
;
501 if ((sk
= sk_alloc(PF_ROSE
, GFP_ATOMIC
, &rose_proto
, 1)) == NULL
)
506 sock_init_data(sock
, sk
);
508 skb_queue_head_init(&rose
->ack_queue
);
510 skb_queue_head_init(&rose
->frag_queue
);
514 sock
->ops
= &rose_proto_ops
;
515 sk
->sk_protocol
= protocol
;
517 init_timer(&rose
->timer
);
518 init_timer(&rose
->idletimer
);
520 rose
->t1
= msecs_to_jiffies(sysctl_rose_call_request_timeout
);
521 rose
->t2
= msecs_to_jiffies(sysctl_rose_reset_request_timeout
);
522 rose
->t3
= msecs_to_jiffies(sysctl_rose_clear_request_timeout
);
523 rose
->hb
= msecs_to_jiffies(sysctl_rose_ack_hold_back_timeout
);
524 rose
->idle
= msecs_to_jiffies(sysctl_rose_no_activity_timeout
);
526 rose
->state
= ROSE_STATE_0
;
531 static struct sock
*rose_make_new(struct sock
*osk
)
534 struct rose_sock
*rose
, *orose
;
536 if (osk
->sk_type
!= SOCK_SEQPACKET
)
539 if ((sk
= sk_alloc(PF_ROSE
, GFP_ATOMIC
, &rose_proto
, 1)) == NULL
)
544 sock_init_data(NULL
, sk
);
546 skb_queue_head_init(&rose
->ack_queue
);
548 skb_queue_head_init(&rose
->frag_queue
);
552 sk
->sk_type
= osk
->sk_type
;
553 sk
->sk_socket
= osk
->sk_socket
;
554 sk
->sk_priority
= osk
->sk_priority
;
555 sk
->sk_protocol
= osk
->sk_protocol
;
556 sk
->sk_rcvbuf
= osk
->sk_rcvbuf
;
557 sk
->sk_sndbuf
= osk
->sk_sndbuf
;
558 sk
->sk_state
= TCP_ESTABLISHED
;
559 sk
->sk_sleep
= osk
->sk_sleep
;
560 sock_copy_flags(sk
, osk
);
562 init_timer(&rose
->timer
);
563 init_timer(&rose
->idletimer
);
565 orose
= rose_sk(osk
);
566 rose
->t1
= orose
->t1
;
567 rose
->t2
= orose
->t2
;
568 rose
->t3
= orose
->t3
;
569 rose
->hb
= orose
->hb
;
570 rose
->idle
= orose
->idle
;
571 rose
->defer
= orose
->defer
;
572 rose
->device
= orose
->device
;
573 rose
->qbitincl
= orose
->qbitincl
;
578 static int rose_release(struct socket
*sock
)
580 struct sock
*sk
= sock
->sk
;
581 struct rose_sock
*rose
;
583 if (sk
== NULL
) return 0;
587 switch (rose
->state
) {
589 rose_disconnect(sk
, 0, -1, -1);
590 rose_destroy_socket(sk
);
594 rose
->neighbour
->use
--;
595 rose_disconnect(sk
, 0, -1, -1);
596 rose_destroy_socket(sk
);
603 rose_clear_queues(sk
);
604 rose_stop_idletimer(sk
);
605 rose_write_internal(sk
, ROSE_CLEAR_REQUEST
);
606 rose_start_t3timer(sk
);
607 rose
->state
= ROSE_STATE_2
;
608 sk
->sk_state
= TCP_CLOSE
;
609 sk
->sk_shutdown
|= SEND_SHUTDOWN
;
610 sk
->sk_state_change(sk
);
611 sock_set_flag(sk
, SOCK_DEAD
);
612 sock_set_flag(sk
, SOCK_DESTROY
);
624 static int rose_bind(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
)
626 struct sock
*sk
= sock
->sk
;
627 struct rose_sock
*rose
= rose_sk(sk
);
628 struct sockaddr_rose
*addr
= (struct sockaddr_rose
*)uaddr
;
629 struct net_device
*dev
;
630 ax25_address
*source
;
631 ax25_uid_assoc
*user
;
634 if (!sock_flag(sk
, SOCK_ZAPPED
))
637 if (addr_len
!= sizeof(struct sockaddr_rose
) && addr_len
!= sizeof(struct full_sockaddr_rose
))
640 if (addr
->srose_family
!= AF_ROSE
)
643 if (addr_len
== sizeof(struct sockaddr_rose
) && addr
->srose_ndigis
> 1)
646 if (addr
->srose_ndigis
> ROSE_MAX_DIGIS
)
649 if ((dev
= rose_dev_get(&addr
->srose_addr
)) == NULL
) {
650 SOCK_DEBUG(sk
, "ROSE: bind failed: invalid address\n");
651 return -EADDRNOTAVAIL
;
654 source
= &addr
->srose_call
;
656 user
= ax25_findbyuid(current
->euid
);
658 rose
->source_call
= user
->call
;
661 if (ax25_uid_policy
&& !capable(CAP_NET_BIND_SERVICE
))
663 rose
->source_call
= *source
;
666 rose
->source_addr
= addr
->srose_addr
;
668 rose
->source_ndigis
= addr
->srose_ndigis
;
670 if (addr_len
== sizeof(struct full_sockaddr_rose
)) {
671 struct full_sockaddr_rose
*full_addr
= (struct full_sockaddr_rose
*)uaddr
;
672 for (n
= 0 ; n
< addr
->srose_ndigis
; n
++)
673 rose
->source_digis
[n
] = full_addr
->srose_digis
[n
];
675 if (rose
->source_ndigis
== 1) {
676 rose
->source_digis
[0] = addr
->srose_digi
;
680 rose_insert_socket(sk
);
682 sock_reset_flag(sk
, SOCK_ZAPPED
);
683 SOCK_DEBUG(sk
, "ROSE: socket is bound\n");
687 static int rose_connect(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
, int flags
)
689 struct sock
*sk
= sock
->sk
;
690 struct rose_sock
*rose
= rose_sk(sk
);
691 struct sockaddr_rose
*addr
= (struct sockaddr_rose
*)uaddr
;
692 unsigned char cause
, diagnostic
;
693 struct net_device
*dev
;
694 ax25_uid_assoc
*user
;
697 if (sk
->sk_state
== TCP_ESTABLISHED
&& sock
->state
== SS_CONNECTING
) {
698 sock
->state
= SS_CONNECTED
;
699 return 0; /* Connect completed during a ERESTARTSYS event */
702 if (sk
->sk_state
== TCP_CLOSE
&& sock
->state
== SS_CONNECTING
) {
703 sock
->state
= SS_UNCONNECTED
;
704 return -ECONNREFUSED
;
707 if (sk
->sk_state
== TCP_ESTABLISHED
)
708 return -EISCONN
; /* No reconnect on a seqpacket socket */
710 sk
->sk_state
= TCP_CLOSE
;
711 sock
->state
= SS_UNCONNECTED
;
713 if (addr_len
!= sizeof(struct sockaddr_rose
) && addr_len
!= sizeof(struct full_sockaddr_rose
))
716 if (addr
->srose_family
!= AF_ROSE
)
719 if (addr_len
== sizeof(struct sockaddr_rose
) && addr
->srose_ndigis
> 1)
722 if (addr
->srose_ndigis
> ROSE_MAX_DIGIS
)
725 /* Source + Destination digis should not exceed ROSE_MAX_DIGIS */
726 if ((rose
->source_ndigis
+ addr
->srose_ndigis
) > ROSE_MAX_DIGIS
)
729 rose
->neighbour
= rose_get_neigh(&addr
->srose_addr
, &cause
,
731 if (!rose
->neighbour
)
734 rose
->lci
= rose_new_lci(rose
->neighbour
);
738 if (sock_flag(sk
, SOCK_ZAPPED
)) { /* Must bind first - autobinding in this may or may not work */
739 sock_reset_flag(sk
, SOCK_ZAPPED
);
741 if ((dev
= rose_dev_first()) == NULL
)
744 user
= ax25_findbyuid(current
->euid
);
748 memcpy(&rose
->source_addr
, dev
->dev_addr
, ROSE_ADDR_LEN
);
749 rose
->source_call
= user
->call
;
753 rose_insert_socket(sk
); /* Finish the bind */
756 rose
->dest_addr
= addr
->srose_addr
;
757 rose
->dest_call
= addr
->srose_call
;
758 rose
->rand
= ((long)rose
& 0xFFFF) + rose
->lci
;
759 rose
->dest_ndigis
= addr
->srose_ndigis
;
761 if (addr_len
== sizeof(struct full_sockaddr_rose
)) {
762 struct full_sockaddr_rose
*full_addr
= (struct full_sockaddr_rose
*)uaddr
;
763 for (n
= 0 ; n
< addr
->srose_ndigis
; n
++)
764 rose
->dest_digis
[n
] = full_addr
->srose_digis
[n
];
766 if (rose
->dest_ndigis
== 1) {
767 rose
->dest_digis
[0] = addr
->srose_digi
;
771 /* Move to connecting socket, start sending Connect Requests */
772 sock
->state
= SS_CONNECTING
;
773 sk
->sk_state
= TCP_SYN_SENT
;
775 rose
->state
= ROSE_STATE_1
;
777 rose
->neighbour
->use
++;
779 rose_write_internal(sk
, ROSE_CALL_REQUEST
);
780 rose_start_heartbeat(sk
);
781 rose_start_t1timer(sk
);
784 if (sk
->sk_state
!= TCP_ESTABLISHED
&& (flags
& O_NONBLOCK
))
788 * A Connect Ack with Choke or timeout or failed routing will go to
791 if (sk
->sk_state
== TCP_SYN_SENT
) {
792 struct task_struct
*tsk
= current
;
793 DECLARE_WAITQUEUE(wait
, tsk
);
795 add_wait_queue(sk
->sk_sleep
, &wait
);
797 set_current_state(TASK_INTERRUPTIBLE
);
798 if (sk
->sk_state
!= TCP_SYN_SENT
)
800 if (!signal_pending(tsk
)) {
804 current
->state
= TASK_RUNNING
;
805 remove_wait_queue(sk
->sk_sleep
, &wait
);
808 current
->state
= TASK_RUNNING
;
809 remove_wait_queue(sk
->sk_sleep
, &wait
);
812 if (sk
->sk_state
!= TCP_ESTABLISHED
) {
813 /* Try next neighbour */
814 rose
->neighbour
= rose_get_neigh(&addr
->srose_addr
, &cause
, &diagnostic
);
816 goto rose_try_next_neigh
;
817 /* No more neighbour */
818 sock
->state
= SS_UNCONNECTED
;
819 return sock_error(sk
); /* Always set at this point */
822 sock
->state
= SS_CONNECTED
;
827 static int rose_accept(struct socket
*sock
, struct socket
*newsock
, int flags
)
829 struct task_struct
*tsk
= current
;
830 DECLARE_WAITQUEUE(wait
, tsk
);
836 if ((sk
= sock
->sk
) == NULL
)
840 if (sk
->sk_type
!= SOCK_SEQPACKET
) {
845 if (sk
->sk_state
!= TCP_LISTEN
) {
851 * The write queue this time is holding sockets ready to use
852 * hooked into the SABM we saved
854 add_wait_queue(sk
->sk_sleep
, &wait
);
856 skb
= skb_dequeue(&sk
->sk_receive_queue
);
860 current
->state
= TASK_INTERRUPTIBLE
;
862 if (flags
& O_NONBLOCK
) {
863 current
->state
= TASK_RUNNING
;
864 remove_wait_queue(sk
->sk_sleep
, &wait
);
867 if (!signal_pending(tsk
)) {
874 current
->state
= TASK_RUNNING
;
875 remove_wait_queue(sk
->sk_sleep
, &wait
);
878 newsk
->sk_socket
= newsock
;
879 newsk
->sk_sleep
= &newsock
->wait
;
881 /* Now attach up the new socket */
884 sk
->sk_ack_backlog
--;
893 static int rose_getname(struct socket
*sock
, struct sockaddr
*uaddr
,
894 int *uaddr_len
, int peer
)
896 struct full_sockaddr_rose
*srose
= (struct full_sockaddr_rose
*)uaddr
;
897 struct sock
*sk
= sock
->sk
;
898 struct rose_sock
*rose
= rose_sk(sk
);
902 if (sk
->sk_state
!= TCP_ESTABLISHED
)
904 srose
->srose_family
= AF_ROSE
;
905 srose
->srose_addr
= rose
->dest_addr
;
906 srose
->srose_call
= rose
->dest_call
;
907 srose
->srose_ndigis
= rose
->dest_ndigis
;
908 for (n
= 0; n
< rose
->dest_ndigis
; n
++)
909 srose
->srose_digis
[n
] = rose
->dest_digis
[n
];
911 srose
->srose_family
= AF_ROSE
;
912 srose
->srose_addr
= rose
->source_addr
;
913 srose
->srose_call
= rose
->source_call
;
914 srose
->srose_ndigis
= rose
->source_ndigis
;
915 for (n
= 0; n
< rose
->source_ndigis
; n
++)
916 srose
->srose_digis
[n
] = rose
->source_digis
[n
];
919 *uaddr_len
= sizeof(struct full_sockaddr_rose
);
923 int rose_rx_call_request(struct sk_buff
*skb
, struct net_device
*dev
, struct rose_neigh
*neigh
, unsigned int lci
)
927 struct rose_sock
*make_rose
;
928 struct rose_facilities_struct facilities
;
931 skb
->sk
= NULL
; /* Initially we don't know who it's for */
934 * skb->data points to the rose frame start
936 memset(&facilities
, 0x00, sizeof(struct rose_facilities_struct
));
938 len
= (((skb
->data
[3] >> 4) & 0x0F) + 1) / 2;
939 len
+= (((skb
->data
[3] >> 0) & 0x0F) + 1) / 2;
940 if (!rose_parse_facilities(skb
->data
+ len
+ 4, &facilities
)) {
941 rose_transmit_clear_request(neigh
, lci
, ROSE_INVALID_FACILITY
, 76);
945 sk
= rose_find_listener(&facilities
.source_addr
, &facilities
.source_call
);
948 * We can't accept the Call Request.
950 if (sk
== NULL
|| sk_acceptq_is_full(sk
) ||
951 (make
= rose_make_new(sk
)) == NULL
) {
952 rose_transmit_clear_request(neigh
, lci
, ROSE_NETWORK_CONGESTION
, 120);
957 make
->sk_state
= TCP_ESTABLISHED
;
958 make_rose
= rose_sk(make
);
960 make_rose
->lci
= lci
;
961 make_rose
->dest_addr
= facilities
.dest_addr
;
962 make_rose
->dest_call
= facilities
.dest_call
;
963 make_rose
->dest_ndigis
= facilities
.dest_ndigis
;
964 for (n
= 0 ; n
< facilities
.dest_ndigis
; n
++)
965 make_rose
->dest_digis
[n
] = facilities
.dest_digis
[n
];
966 make_rose
->source_addr
= facilities
.source_addr
;
967 make_rose
->source_call
= facilities
.source_call
;
968 make_rose
->source_ndigis
= facilities
.source_ndigis
;
969 for (n
= 0 ; n
< facilities
.source_ndigis
; n
++)
970 make_rose
->source_digis
[n
]= facilities
.source_digis
[n
];
971 make_rose
->neighbour
= neigh
;
972 make_rose
->device
= dev
;
973 make_rose
->facilities
= facilities
;
975 make_rose
->neighbour
->use
++;
977 if (rose_sk(sk
)->defer
) {
978 make_rose
->state
= ROSE_STATE_5
;
980 rose_write_internal(make
, ROSE_CALL_ACCEPTED
);
981 make_rose
->state
= ROSE_STATE_3
;
982 rose_start_idletimer(make
);
985 make_rose
->condition
= 0x00;
990 sk
->sk_ack_backlog
++;
992 rose_insert_socket(make
);
994 skb_queue_head(&sk
->sk_receive_queue
, skb
);
996 rose_start_heartbeat(make
);
998 if (!sock_flag(sk
, SOCK_DEAD
))
999 sk
->sk_data_ready(sk
, skb
->len
);
1004 static int rose_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
1005 struct msghdr
*msg
, size_t len
)
1007 struct sock
*sk
= sock
->sk
;
1008 struct rose_sock
*rose
= rose_sk(sk
);
1009 struct sockaddr_rose
*usrose
= (struct sockaddr_rose
*)msg
->msg_name
;
1011 struct full_sockaddr_rose srose
;
1012 struct sk_buff
*skb
;
1013 unsigned char *asmptr
;
1014 int n
, size
, qbit
= 0;
1016 if (msg
->msg_flags
& ~(MSG_DONTWAIT
|MSG_EOR
|MSG_CMSG_COMPAT
))
1019 if (sock_flag(sk
, SOCK_ZAPPED
))
1020 return -EADDRNOTAVAIL
;
1022 if (sk
->sk_shutdown
& SEND_SHUTDOWN
) {
1023 send_sig(SIGPIPE
, current
, 0);
1027 if (rose
->neighbour
== NULL
|| rose
->device
== NULL
)
1028 return -ENETUNREACH
;
1030 if (usrose
!= NULL
) {
1031 if (msg
->msg_namelen
!= sizeof(struct sockaddr_rose
) && msg
->msg_namelen
!= sizeof(struct full_sockaddr_rose
))
1033 memset(&srose
, 0, sizeof(struct full_sockaddr_rose
));
1034 memcpy(&srose
, usrose
, msg
->msg_namelen
);
1035 if (rosecmp(&rose
->dest_addr
, &srose
.srose_addr
) != 0 ||
1036 ax25cmp(&rose
->dest_call
, &srose
.srose_call
) != 0)
1038 if (srose
.srose_ndigis
!= rose
->dest_ndigis
)
1040 if (srose
.srose_ndigis
== rose
->dest_ndigis
) {
1041 for (n
= 0 ; n
< srose
.srose_ndigis
; n
++)
1042 if (ax25cmp(&rose
->dest_digis
[n
],
1043 &srose
.srose_digis
[n
]))
1046 if (srose
.srose_family
!= AF_ROSE
)
1049 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1052 srose
.srose_family
= AF_ROSE
;
1053 srose
.srose_addr
= rose
->dest_addr
;
1054 srose
.srose_call
= rose
->dest_call
;
1055 srose
.srose_ndigis
= rose
->dest_ndigis
;
1056 for (n
= 0 ; n
< rose
->dest_ndigis
; n
++)
1057 srose
.srose_digis
[n
] = rose
->dest_digis
[n
];
1060 SOCK_DEBUG(sk
, "ROSE: sendto: Addresses built.\n");
1062 /* Build a packet */
1063 SOCK_DEBUG(sk
, "ROSE: sendto: building packet.\n");
1064 size
= len
+ AX25_BPQ_HEADER_LEN
+ AX25_MAX_HEADER_LEN
+ ROSE_MIN_LEN
;
1066 if ((skb
= sock_alloc_send_skb(sk
, size
, msg
->msg_flags
& MSG_DONTWAIT
, &err
)) == NULL
)
1069 skb_reserve(skb
, AX25_BPQ_HEADER_LEN
+ AX25_MAX_HEADER_LEN
+ ROSE_MIN_LEN
);
1072 * Put the data on the end
1074 SOCK_DEBUG(sk
, "ROSE: Appending user data\n");
1076 asmptr
= skb
->h
.raw
= skb_put(skb
, len
);
1078 err
= memcpy_fromiovec(asmptr
, msg
->msg_iov
, len
);
1085 * If the Q BIT Include socket option is in force, the first
1086 * byte of the user data is the logical value of the Q Bit.
1088 if (rose
->qbitincl
) {
1089 qbit
= skb
->data
[0];
1094 * Push down the ROSE header
1096 asmptr
= skb_push(skb
, ROSE_MIN_LEN
);
1098 SOCK_DEBUG(sk
, "ROSE: Building Network Header.\n");
1100 /* Build a ROSE Network header */
1101 asmptr
[0] = ((rose
->lci
>> 8) & 0x0F) | ROSE_GFI
;
1102 asmptr
[1] = (rose
->lci
>> 0) & 0xFF;
1103 asmptr
[2] = ROSE_DATA
;
1106 asmptr
[0] |= ROSE_Q_BIT
;
1108 SOCK_DEBUG(sk
, "ROSE: Built header.\n");
1110 SOCK_DEBUG(sk
, "ROSE: Transmitting buffer\n");
1112 if (sk
->sk_state
!= TCP_ESTABLISHED
) {
1118 #define ROSE_PACLEN (256-ROSE_MIN_LEN)
1119 if (skb
->len
- ROSE_MIN_LEN
> ROSE_PACLEN
) {
1120 unsigned char header
[ROSE_MIN_LEN
];
1121 struct sk_buff
*skbn
;
1125 /* Save a copy of the Header */
1126 memcpy(header
, skb
->data
, ROSE_MIN_LEN
);
1127 skb_pull(skb
, ROSE_MIN_LEN
);
1129 frontlen
= skb_headroom(skb
);
1131 while (skb
->len
> 0) {
1132 if ((skbn
= sock_alloc_send_skb(sk
, frontlen
+ ROSE_PACLEN
, 0, &err
)) == NULL
) {
1141 skb_reserve(skbn
, frontlen
);
1143 lg
= (ROSE_PACLEN
> skb
->len
) ? skb
->len
: ROSE_PACLEN
;
1145 /* Copy the user data */
1146 memcpy(skb_put(skbn
, lg
), skb
->data
, lg
);
1149 /* Duplicate the Header */
1150 skb_push(skbn
, ROSE_MIN_LEN
);
1151 memcpy(skbn
->data
, header
, ROSE_MIN_LEN
);
1154 skbn
->data
[2] |= M_BIT
;
1156 skb_queue_tail(&sk
->sk_write_queue
, skbn
); /* Throw it on the queue */
1162 skb_queue_tail(&sk
->sk_write_queue
, skb
); /* Throw it on the queue */
1165 skb_queue_tail(&sk
->sk_write_queue
, skb
); /* Shove it onto the queue */
1174 static int rose_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
1175 struct msghdr
*msg
, size_t size
, int flags
)
1177 struct sock
*sk
= sock
->sk
;
1178 struct rose_sock
*rose
= rose_sk(sk
);
1179 struct sockaddr_rose
*srose
= (struct sockaddr_rose
*)msg
->msg_name
;
1181 unsigned char *asmptr
;
1182 struct sk_buff
*skb
;
1186 * This works for seqpacket too. The receiver has ordered the queue for
1187 * us! We do one quick check first though
1189 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1192 /* Now we can treat all alike */
1193 if ((skb
= skb_recv_datagram(sk
, flags
& ~MSG_DONTWAIT
, flags
& MSG_DONTWAIT
, &er
)) == NULL
)
1196 qbit
= (skb
->data
[0] & ROSE_Q_BIT
) == ROSE_Q_BIT
;
1198 skb_pull(skb
, ROSE_MIN_LEN
);
1200 if (rose
->qbitincl
) {
1201 asmptr
= skb_push(skb
, 1);
1205 skb
->h
.raw
= skb
->data
;
1208 if (copied
> size
) {
1210 msg
->msg_flags
|= MSG_TRUNC
;
1213 skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, copied
);
1215 if (srose
!= NULL
) {
1216 srose
->srose_family
= AF_ROSE
;
1217 srose
->srose_addr
= rose
->dest_addr
;
1218 srose
->srose_call
= rose
->dest_call
;
1219 srose
->srose_ndigis
= rose
->dest_ndigis
;
1220 if (msg
->msg_namelen
>= sizeof(struct full_sockaddr_rose
)) {
1221 struct full_sockaddr_rose
*full_srose
= (struct full_sockaddr_rose
*)msg
->msg_name
;
1222 for (n
= 0 ; n
< rose
->dest_ndigis
; n
++)
1223 full_srose
->srose_digis
[n
] = rose
->dest_digis
[n
];
1224 msg
->msg_namelen
= sizeof(struct full_sockaddr_rose
);
1226 if (rose
->dest_ndigis
>= 1) {
1227 srose
->srose_ndigis
= 1;
1228 srose
->srose_digi
= rose
->dest_digis
[0];
1230 msg
->msg_namelen
= sizeof(struct sockaddr_rose
);
1234 skb_free_datagram(sk
, skb
);
1240 static int rose_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1242 struct sock
*sk
= sock
->sk
;
1243 struct rose_sock
*rose
= rose_sk(sk
);
1244 void __user
*argp
= (void __user
*)arg
;
1249 amount
= sk
->sk_sndbuf
- atomic_read(&sk
->sk_wmem_alloc
);
1252 return put_user(amount
, (unsigned int __user
*) argp
);
1256 struct sk_buff
*skb
;
1258 /* These two are safe on a single CPU system as only user tasks fiddle here */
1259 if ((skb
= skb_peek(&sk
->sk_receive_queue
)) != NULL
)
1261 return put_user(amount
, (unsigned int __user
*) argp
);
1265 return sock_get_timestamp(sk
, (struct timeval __user
*) argp
);
1269 case SIOCGIFDSTADDR
:
1270 case SIOCSIFDSTADDR
:
1271 case SIOCGIFBRDADDR
:
1272 case SIOCSIFBRDADDR
:
1273 case SIOCGIFNETMASK
:
1274 case SIOCSIFNETMASK
:
1282 if (!capable(CAP_NET_ADMIN
))
1284 return rose_rt_ioctl(cmd
, argp
);
1286 case SIOCRSGCAUSE
: {
1287 struct rose_cause_struct rose_cause
;
1288 rose_cause
.cause
= rose
->cause
;
1289 rose_cause
.diagnostic
= rose
->diagnostic
;
1290 return copy_to_user(argp
, &rose_cause
, sizeof(struct rose_cause_struct
)) ? -EFAULT
: 0;
1293 case SIOCRSSCAUSE
: {
1294 struct rose_cause_struct rose_cause
;
1295 if (copy_from_user(&rose_cause
, argp
, sizeof(struct rose_cause_struct
)))
1297 rose
->cause
= rose_cause
.cause
;
1298 rose
->diagnostic
= rose_cause
.diagnostic
;
1303 if (!capable(CAP_NET_ADMIN
)) return -EPERM
;
1304 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1305 ax25_listen_release(&rose_callsign
, NULL
);
1306 if (copy_from_user(&rose_callsign
, argp
, sizeof(ax25_address
)))
1308 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1309 ax25_listen_register(&rose_callsign
, NULL
);
1313 return copy_to_user(argp
, &rose_callsign
, sizeof(ax25_address
)) ? -EFAULT
: 0;
1316 if (rose
->state
== ROSE_STATE_5
) {
1317 rose_write_internal(sk
, ROSE_CALL_ACCEPTED
);
1318 rose_start_idletimer(sk
);
1319 rose
->condition
= 0x00;
1324 rose
->state
= ROSE_STATE_3
;
1329 return -ENOIOCTLCMD
;
1335 #ifdef CONFIG_PROC_FS
1336 static void *rose_info_start(struct seq_file
*seq
, loff_t
*pos
)
1340 struct hlist_node
*node
;
1342 spin_lock_bh(&rose_list_lock
);
1344 return SEQ_START_TOKEN
;
1347 sk_for_each(s
, node
, &rose_list
) {
1355 static void *rose_info_next(struct seq_file
*seq
, void *v
, loff_t
*pos
)
1359 return (v
== SEQ_START_TOKEN
) ? sk_head(&rose_list
)
1360 : sk_next((struct sock
*)v
);
1363 static void rose_info_stop(struct seq_file
*seq
, void *v
)
1365 spin_unlock_bh(&rose_list_lock
);
1368 static int rose_info_show(struct seq_file
*seq
, void *v
)
1372 if (v
== SEQ_START_TOKEN
)
1374 "dest_addr dest_call src_addr src_call dev lci neigh st vs vr va t t1 t2 t3 hb idle Snd-Q Rcv-Q inode\n");
1378 struct rose_sock
*rose
= rose_sk(s
);
1379 const char *devname
, *callsign
;
1380 const struct net_device
*dev
= rose
->device
;
1385 devname
= dev
->name
;
1387 seq_printf(seq
, "%-10s %-9s ",
1388 rose2asc(&rose
->dest_addr
),
1389 ax2asc(buf
, &rose
->dest_call
));
1391 if (ax25cmp(&rose
->source_call
, &null_ax25_address
) == 0)
1392 callsign
= "??????-?";
1394 callsign
= ax2asc(buf
, &rose
->source_call
);
1397 "%-10s %-9s %-5s %3.3X %05d %d %d %d %d %3lu %3lu %3lu %3lu %3lu %3lu/%03lu %5d %5d %ld\n",
1398 rose2asc(&rose
->source_addr
),
1402 (rose
->neighbour
) ? rose
->neighbour
->number
: 0,
1407 ax25_display_timer(&rose
->timer
) / HZ
,
1412 ax25_display_timer(&rose
->idletimer
) / (60 * HZ
),
1413 rose
->idle
/ (60 * HZ
),
1414 atomic_read(&s
->sk_wmem_alloc
),
1415 atomic_read(&s
->sk_rmem_alloc
),
1416 s
->sk_socket
? SOCK_INODE(s
->sk_socket
)->i_ino
: 0L);
1422 static struct seq_operations rose_info_seqops
= {
1423 .start
= rose_info_start
,
1424 .next
= rose_info_next
,
1425 .stop
= rose_info_stop
,
1426 .show
= rose_info_show
,
1429 static int rose_info_open(struct inode
*inode
, struct file
*file
)
1431 return seq_open(file
, &rose_info_seqops
);
1434 static struct file_operations rose_info_fops
= {
1435 .owner
= THIS_MODULE
,
1436 .open
= rose_info_open
,
1438 .llseek
= seq_lseek
,
1439 .release
= seq_release
,
1441 #endif /* CONFIG_PROC_FS */
1443 static struct net_proto_family rose_family_ops
= {
1445 .create
= rose_create
,
1446 .owner
= THIS_MODULE
,
1449 static struct proto_ops rose_proto_ops
= {
1451 .owner
= THIS_MODULE
,
1452 .release
= rose_release
,
1454 .connect
= rose_connect
,
1455 .socketpair
= sock_no_socketpair
,
1456 .accept
= rose_accept
,
1457 .getname
= rose_getname
,
1458 .poll
= datagram_poll
,
1459 .ioctl
= rose_ioctl
,
1460 .listen
= rose_listen
,
1461 .shutdown
= sock_no_shutdown
,
1462 .setsockopt
= rose_setsockopt
,
1463 .getsockopt
= rose_getsockopt
,
1464 .sendmsg
= rose_sendmsg
,
1465 .recvmsg
= rose_recvmsg
,
1466 .mmap
= sock_no_mmap
,
1467 .sendpage
= sock_no_sendpage
,
1470 static struct notifier_block rose_dev_notifier
= {
1471 .notifier_call
= rose_device_event
,
1474 static struct net_device
**dev_rose
;
1476 static int __init
rose_proto_init(void)
1481 if (rose_ndevs
> 0x7FFFFFFF/sizeof(struct net_device
*)) {
1482 printk(KERN_ERR
"ROSE: rose_proto_init - rose_ndevs parameter to large\n");
1487 rc
= proto_register(&rose_proto
, 0);
1491 rose_callsign
= null_ax25_address
;
1493 dev_rose
= kmalloc(rose_ndevs
* sizeof(struct net_device
*), GFP_KERNEL
);
1494 if (dev_rose
== NULL
) {
1495 printk(KERN_ERR
"ROSE: rose_proto_init - unable to allocate device structure\n");
1497 goto out_proto_unregister
;
1500 memset(dev_rose
, 0x00, rose_ndevs
* sizeof(struct net_device
*));
1501 for (i
= 0; i
< rose_ndevs
; i
++) {
1502 struct net_device
*dev
;
1503 char name
[IFNAMSIZ
];
1505 sprintf(name
, "rose%d", i
);
1506 dev
= alloc_netdev(sizeof(struct net_device_stats
),
1509 printk(KERN_ERR
"ROSE: rose_proto_init - unable to allocate memory\n");
1513 rc
= register_netdev(dev
);
1515 printk(KERN_ERR
"ROSE: netdevice registration failed\n");
1522 sock_register(&rose_family_ops
);
1523 register_netdevice_notifier(&rose_dev_notifier
);
1525 ax25_protocol_register(AX25_P_ROSE
, rose_route_frame
);
1526 ax25_linkfail_register(rose_link_failed
);
1528 #ifdef CONFIG_SYSCTL
1529 rose_register_sysctl();
1531 rose_loopback_init();
1533 rose_add_loopback_neigh();
1535 proc_net_fops_create("rose", S_IRUGO
, &rose_info_fops
);
1536 proc_net_fops_create("rose_neigh", S_IRUGO
, &rose_neigh_fops
);
1537 proc_net_fops_create("rose_nodes", S_IRUGO
, &rose_nodes_fops
);
1538 proc_net_fops_create("rose_routes", S_IRUGO
, &rose_routes_fops
);
1543 unregister_netdev(dev_rose
[i
]);
1544 free_netdev(dev_rose
[i
]);
1547 out_proto_unregister
:
1548 proto_unregister(&rose_proto
);
1551 module_init(rose_proto_init
);
1553 module_param(rose_ndevs
, int, 0);
1554 MODULE_PARM_DESC(rose_ndevs
, "number of ROSE devices");
1556 MODULE_AUTHOR("Jonathan Naylor G4KLX <g4klx@g4klx.demon.co.uk>");
1557 MODULE_DESCRIPTION("The amateur radio ROSE network layer protocol");
1558 MODULE_LICENSE("GPL");
1559 MODULE_ALIAS_NETPROTO(PF_ROSE
);
1561 static void __exit
rose_exit(void)
1565 proc_net_remove("rose");
1566 proc_net_remove("rose_neigh");
1567 proc_net_remove("rose_nodes");
1568 proc_net_remove("rose_routes");
1569 rose_loopback_clear();
1573 ax25_protocol_release(AX25_P_ROSE
);
1574 ax25_linkfail_release(rose_link_failed
);
1576 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1577 ax25_listen_release(&rose_callsign
, NULL
);
1579 #ifdef CONFIG_SYSCTL
1580 rose_unregister_sysctl();
1582 unregister_netdevice_notifier(&rose_dev_notifier
);
1584 sock_unregister(PF_ROSE
);
1586 for (i
= 0; i
< rose_ndevs
; i
++) {
1587 struct net_device
*dev
= dev_rose
[i
];
1590 unregister_netdev(dev
);
1596 proto_unregister(&rose_proto
);
1599 module_exit(rose_exit
);