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 sock
->state
= SS_UNCONNECTED
;
814 return sock_error(sk
); /* Always set at this point */
817 sock
->state
= SS_CONNECTED
;
822 static int rose_accept(struct socket
*sock
, struct socket
*newsock
, int flags
)
824 struct task_struct
*tsk
= current
;
825 DECLARE_WAITQUEUE(wait
, tsk
);
831 if ((sk
= sock
->sk
) == NULL
)
835 if (sk
->sk_type
!= SOCK_SEQPACKET
) {
840 if (sk
->sk_state
!= TCP_LISTEN
) {
846 * The write queue this time is holding sockets ready to use
847 * hooked into the SABM we saved
849 add_wait_queue(sk
->sk_sleep
, &wait
);
851 skb
= skb_dequeue(&sk
->sk_receive_queue
);
855 current
->state
= TASK_INTERRUPTIBLE
;
857 if (flags
& O_NONBLOCK
) {
858 current
->state
= TASK_RUNNING
;
859 remove_wait_queue(sk
->sk_sleep
, &wait
);
862 if (!signal_pending(tsk
)) {
869 current
->state
= TASK_RUNNING
;
870 remove_wait_queue(sk
->sk_sleep
, &wait
);
873 newsk
->sk_socket
= newsock
;
874 newsk
->sk_sleep
= &newsock
->wait
;
876 /* Now attach up the new socket */
879 sk
->sk_ack_backlog
--;
888 static int rose_getname(struct socket
*sock
, struct sockaddr
*uaddr
,
889 int *uaddr_len
, int peer
)
891 struct full_sockaddr_rose
*srose
= (struct full_sockaddr_rose
*)uaddr
;
892 struct sock
*sk
= sock
->sk
;
893 struct rose_sock
*rose
= rose_sk(sk
);
897 if (sk
->sk_state
!= TCP_ESTABLISHED
)
899 srose
->srose_family
= AF_ROSE
;
900 srose
->srose_addr
= rose
->dest_addr
;
901 srose
->srose_call
= rose
->dest_call
;
902 srose
->srose_ndigis
= rose
->dest_ndigis
;
903 for (n
= 0; n
< rose
->dest_ndigis
; n
++)
904 srose
->srose_digis
[n
] = rose
->dest_digis
[n
];
906 srose
->srose_family
= AF_ROSE
;
907 srose
->srose_addr
= rose
->source_addr
;
908 srose
->srose_call
= rose
->source_call
;
909 srose
->srose_ndigis
= rose
->source_ndigis
;
910 for (n
= 0; n
< rose
->source_ndigis
; n
++)
911 srose
->srose_digis
[n
] = rose
->source_digis
[n
];
914 *uaddr_len
= sizeof(struct full_sockaddr_rose
);
918 int rose_rx_call_request(struct sk_buff
*skb
, struct net_device
*dev
, struct rose_neigh
*neigh
, unsigned int lci
)
922 struct rose_sock
*make_rose
;
923 struct rose_facilities_struct facilities
;
926 skb
->sk
= NULL
; /* Initially we don't know who it's for */
929 * skb->data points to the rose frame start
931 memset(&facilities
, 0x00, sizeof(struct rose_facilities_struct
));
933 len
= (((skb
->data
[3] >> 4) & 0x0F) + 1) / 2;
934 len
+= (((skb
->data
[3] >> 0) & 0x0F) + 1) / 2;
935 if (!rose_parse_facilities(skb
->data
+ len
+ 4, &facilities
)) {
936 rose_transmit_clear_request(neigh
, lci
, ROSE_INVALID_FACILITY
, 76);
940 sk
= rose_find_listener(&facilities
.source_addr
, &facilities
.source_call
);
943 * We can't accept the Call Request.
945 if (sk
== NULL
|| sk_acceptq_is_full(sk
) ||
946 (make
= rose_make_new(sk
)) == NULL
) {
947 rose_transmit_clear_request(neigh
, lci
, ROSE_NETWORK_CONGESTION
, 120);
952 make
->sk_state
= TCP_ESTABLISHED
;
953 make_rose
= rose_sk(make
);
955 make_rose
->lci
= lci
;
956 make_rose
->dest_addr
= facilities
.dest_addr
;
957 make_rose
->dest_call
= facilities
.dest_call
;
958 make_rose
->dest_ndigis
= facilities
.dest_ndigis
;
959 for (n
= 0 ; n
< facilities
.dest_ndigis
; n
++)
960 make_rose
->dest_digis
[n
] = facilities
.dest_digis
[n
];
961 make_rose
->source_addr
= facilities
.source_addr
;
962 make_rose
->source_call
= facilities
.source_call
;
963 make_rose
->source_ndigis
= facilities
.source_ndigis
;
964 for (n
= 0 ; n
< facilities
.source_ndigis
; n
++)
965 make_rose
->source_digis
[n
]= facilities
.source_digis
[n
];
966 make_rose
->neighbour
= neigh
;
967 make_rose
->device
= dev
;
968 make_rose
->facilities
= facilities
;
970 make_rose
->neighbour
->use
++;
972 if (rose_sk(sk
)->defer
) {
973 make_rose
->state
= ROSE_STATE_5
;
975 rose_write_internal(make
, ROSE_CALL_ACCEPTED
);
976 make_rose
->state
= ROSE_STATE_3
;
977 rose_start_idletimer(make
);
980 make_rose
->condition
= 0x00;
985 sk
->sk_ack_backlog
++;
987 rose_insert_socket(make
);
989 skb_queue_head(&sk
->sk_receive_queue
, skb
);
991 rose_start_heartbeat(make
);
993 if (!sock_flag(sk
, SOCK_DEAD
))
994 sk
->sk_data_ready(sk
, skb
->len
);
999 static int rose_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
1000 struct msghdr
*msg
, size_t len
)
1002 struct sock
*sk
= sock
->sk
;
1003 struct rose_sock
*rose
= rose_sk(sk
);
1004 struct sockaddr_rose
*usrose
= (struct sockaddr_rose
*)msg
->msg_name
;
1006 struct full_sockaddr_rose srose
;
1007 struct sk_buff
*skb
;
1008 unsigned char *asmptr
;
1009 int n
, size
, qbit
= 0;
1011 if (msg
->msg_flags
& ~(MSG_DONTWAIT
|MSG_EOR
|MSG_CMSG_COMPAT
))
1014 if (sock_flag(sk
, SOCK_ZAPPED
))
1015 return -EADDRNOTAVAIL
;
1017 if (sk
->sk_shutdown
& SEND_SHUTDOWN
) {
1018 send_sig(SIGPIPE
, current
, 0);
1022 if (rose
->neighbour
== NULL
|| rose
->device
== NULL
)
1023 return -ENETUNREACH
;
1025 if (usrose
!= NULL
) {
1026 if (msg
->msg_namelen
!= sizeof(struct sockaddr_rose
) && msg
->msg_namelen
!= sizeof(struct full_sockaddr_rose
))
1028 memset(&srose
, 0, sizeof(struct full_sockaddr_rose
));
1029 memcpy(&srose
, usrose
, msg
->msg_namelen
);
1030 if (rosecmp(&rose
->dest_addr
, &srose
.srose_addr
) != 0 ||
1031 ax25cmp(&rose
->dest_call
, &srose
.srose_call
) != 0)
1033 if (srose
.srose_ndigis
!= rose
->dest_ndigis
)
1035 if (srose
.srose_ndigis
== rose
->dest_ndigis
) {
1036 for (n
= 0 ; n
< srose
.srose_ndigis
; n
++)
1037 if (ax25cmp(&rose
->dest_digis
[n
],
1038 &srose
.srose_digis
[n
]))
1041 if (srose
.srose_family
!= AF_ROSE
)
1044 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1047 srose
.srose_family
= AF_ROSE
;
1048 srose
.srose_addr
= rose
->dest_addr
;
1049 srose
.srose_call
= rose
->dest_call
;
1050 srose
.srose_ndigis
= rose
->dest_ndigis
;
1051 for (n
= 0 ; n
< rose
->dest_ndigis
; n
++)
1052 srose
.srose_digis
[n
] = rose
->dest_digis
[n
];
1055 SOCK_DEBUG(sk
, "ROSE: sendto: Addresses built.\n");
1057 /* Build a packet */
1058 SOCK_DEBUG(sk
, "ROSE: sendto: building packet.\n");
1059 size
= len
+ AX25_BPQ_HEADER_LEN
+ AX25_MAX_HEADER_LEN
+ ROSE_MIN_LEN
;
1061 if ((skb
= sock_alloc_send_skb(sk
, size
, msg
->msg_flags
& MSG_DONTWAIT
, &err
)) == NULL
)
1064 skb_reserve(skb
, AX25_BPQ_HEADER_LEN
+ AX25_MAX_HEADER_LEN
+ ROSE_MIN_LEN
);
1067 * Put the data on the end
1069 SOCK_DEBUG(sk
, "ROSE: Appending user data\n");
1071 asmptr
= skb
->h
.raw
= skb_put(skb
, len
);
1073 err
= memcpy_fromiovec(asmptr
, msg
->msg_iov
, len
);
1080 * If the Q BIT Include socket option is in force, the first
1081 * byte of the user data is the logical value of the Q Bit.
1083 if (rose
->qbitincl
) {
1084 qbit
= skb
->data
[0];
1089 * Push down the ROSE header
1091 asmptr
= skb_push(skb
, ROSE_MIN_LEN
);
1093 SOCK_DEBUG(sk
, "ROSE: Building Network Header.\n");
1095 /* Build a ROSE Network header */
1096 asmptr
[0] = ((rose
->lci
>> 8) & 0x0F) | ROSE_GFI
;
1097 asmptr
[1] = (rose
->lci
>> 0) & 0xFF;
1098 asmptr
[2] = ROSE_DATA
;
1101 asmptr
[0] |= ROSE_Q_BIT
;
1103 SOCK_DEBUG(sk
, "ROSE: Built header.\n");
1105 SOCK_DEBUG(sk
, "ROSE: Transmitting buffer\n");
1107 if (sk
->sk_state
!= TCP_ESTABLISHED
) {
1113 #define ROSE_PACLEN (256-ROSE_MIN_LEN)
1114 if (skb
->len
- ROSE_MIN_LEN
> ROSE_PACLEN
) {
1115 unsigned char header
[ROSE_MIN_LEN
];
1116 struct sk_buff
*skbn
;
1120 /* Save a copy of the Header */
1121 memcpy(header
, skb
->data
, ROSE_MIN_LEN
);
1122 skb_pull(skb
, ROSE_MIN_LEN
);
1124 frontlen
= skb_headroom(skb
);
1126 while (skb
->len
> 0) {
1127 if ((skbn
= sock_alloc_send_skb(sk
, frontlen
+ ROSE_PACLEN
, 0, &err
)) == NULL
) {
1136 skb_reserve(skbn
, frontlen
);
1138 lg
= (ROSE_PACLEN
> skb
->len
) ? skb
->len
: ROSE_PACLEN
;
1140 /* Copy the user data */
1141 memcpy(skb_put(skbn
, lg
), skb
->data
, lg
);
1144 /* Duplicate the Header */
1145 skb_push(skbn
, ROSE_MIN_LEN
);
1146 memcpy(skbn
->data
, header
, ROSE_MIN_LEN
);
1149 skbn
->data
[2] |= M_BIT
;
1151 skb_queue_tail(&sk
->sk_write_queue
, skbn
); /* Throw it on the queue */
1157 skb_queue_tail(&sk
->sk_write_queue
, skb
); /* Throw it on the queue */
1160 skb_queue_tail(&sk
->sk_write_queue
, skb
); /* Shove it onto the queue */
1169 static int rose_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
1170 struct msghdr
*msg
, size_t size
, int flags
)
1172 struct sock
*sk
= sock
->sk
;
1173 struct rose_sock
*rose
= rose_sk(sk
);
1174 struct sockaddr_rose
*srose
= (struct sockaddr_rose
*)msg
->msg_name
;
1176 unsigned char *asmptr
;
1177 struct sk_buff
*skb
;
1181 * This works for seqpacket too. The receiver has ordered the queue for
1182 * us! We do one quick check first though
1184 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1187 /* Now we can treat all alike */
1188 if ((skb
= skb_recv_datagram(sk
, flags
& ~MSG_DONTWAIT
, flags
& MSG_DONTWAIT
, &er
)) == NULL
)
1191 qbit
= (skb
->data
[0] & ROSE_Q_BIT
) == ROSE_Q_BIT
;
1193 skb_pull(skb
, ROSE_MIN_LEN
);
1195 if (rose
->qbitincl
) {
1196 asmptr
= skb_push(skb
, 1);
1200 skb
->h
.raw
= skb
->data
;
1203 if (copied
> size
) {
1205 msg
->msg_flags
|= MSG_TRUNC
;
1208 skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, copied
);
1210 if (srose
!= NULL
) {
1211 srose
->srose_family
= AF_ROSE
;
1212 srose
->srose_addr
= rose
->dest_addr
;
1213 srose
->srose_call
= rose
->dest_call
;
1214 srose
->srose_ndigis
= rose
->dest_ndigis
;
1215 if (msg
->msg_namelen
>= sizeof(struct full_sockaddr_rose
)) {
1216 struct full_sockaddr_rose
*full_srose
= (struct full_sockaddr_rose
*)msg
->msg_name
;
1217 for (n
= 0 ; n
< rose
->dest_ndigis
; n
++)
1218 full_srose
->srose_digis
[n
] = rose
->dest_digis
[n
];
1219 msg
->msg_namelen
= sizeof(struct full_sockaddr_rose
);
1221 if (rose
->dest_ndigis
>= 1) {
1222 srose
->srose_ndigis
= 1;
1223 srose
->srose_digi
= rose
->dest_digis
[0];
1225 msg
->msg_namelen
= sizeof(struct sockaddr_rose
);
1229 skb_free_datagram(sk
, skb
);
1235 static int rose_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1237 struct sock
*sk
= sock
->sk
;
1238 struct rose_sock
*rose
= rose_sk(sk
);
1239 void __user
*argp
= (void __user
*)arg
;
1244 amount
= sk
->sk_sndbuf
- atomic_read(&sk
->sk_wmem_alloc
);
1247 return put_user(amount
, (unsigned int __user
*) argp
);
1251 struct sk_buff
*skb
;
1253 /* These two are safe on a single CPU system as only user tasks fiddle here */
1254 if ((skb
= skb_peek(&sk
->sk_receive_queue
)) != NULL
)
1256 return put_user(amount
, (unsigned int __user
*) argp
);
1260 return sock_get_timestamp(sk
, (struct timeval __user
*) argp
);
1264 case SIOCGIFDSTADDR
:
1265 case SIOCSIFDSTADDR
:
1266 case SIOCGIFBRDADDR
:
1267 case SIOCSIFBRDADDR
:
1268 case SIOCGIFNETMASK
:
1269 case SIOCSIFNETMASK
:
1277 if (!capable(CAP_NET_ADMIN
))
1279 return rose_rt_ioctl(cmd
, argp
);
1281 case SIOCRSGCAUSE
: {
1282 struct rose_cause_struct rose_cause
;
1283 rose_cause
.cause
= rose
->cause
;
1284 rose_cause
.diagnostic
= rose
->diagnostic
;
1285 return copy_to_user(argp
, &rose_cause
, sizeof(struct rose_cause_struct
)) ? -EFAULT
: 0;
1288 case SIOCRSSCAUSE
: {
1289 struct rose_cause_struct rose_cause
;
1290 if (copy_from_user(&rose_cause
, argp
, sizeof(struct rose_cause_struct
)))
1292 rose
->cause
= rose_cause
.cause
;
1293 rose
->diagnostic
= rose_cause
.diagnostic
;
1298 if (!capable(CAP_NET_ADMIN
)) return -EPERM
;
1299 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1300 ax25_listen_release(&rose_callsign
, NULL
);
1301 if (copy_from_user(&rose_callsign
, argp
, sizeof(ax25_address
)))
1303 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1304 ax25_listen_register(&rose_callsign
, NULL
);
1308 return copy_to_user(argp
, &rose_callsign
, sizeof(ax25_address
)) ? -EFAULT
: 0;
1311 if (rose
->state
== ROSE_STATE_5
) {
1312 rose_write_internal(sk
, ROSE_CALL_ACCEPTED
);
1313 rose_start_idletimer(sk
);
1314 rose
->condition
= 0x00;
1319 rose
->state
= ROSE_STATE_3
;
1324 return -ENOIOCTLCMD
;
1330 #ifdef CONFIG_PROC_FS
1331 static void *rose_info_start(struct seq_file
*seq
, loff_t
*pos
)
1335 struct hlist_node
*node
;
1337 spin_lock_bh(&rose_list_lock
);
1339 return SEQ_START_TOKEN
;
1342 sk_for_each(s
, node
, &rose_list
) {
1350 static void *rose_info_next(struct seq_file
*seq
, void *v
, loff_t
*pos
)
1354 return (v
== SEQ_START_TOKEN
) ? sk_head(&rose_list
)
1355 : sk_next((struct sock
*)v
);
1358 static void rose_info_stop(struct seq_file
*seq
, void *v
)
1360 spin_unlock_bh(&rose_list_lock
);
1363 static int rose_info_show(struct seq_file
*seq
, void *v
)
1367 if (v
== SEQ_START_TOKEN
)
1369 "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");
1373 struct rose_sock
*rose
= rose_sk(s
);
1374 const char *devname
, *callsign
;
1375 const struct net_device
*dev
= rose
->device
;
1380 devname
= dev
->name
;
1382 seq_printf(seq
, "%-10s %-9s ",
1383 rose2asc(&rose
->dest_addr
),
1384 ax2asc(buf
, &rose
->dest_call
));
1386 if (ax25cmp(&rose
->source_call
, &null_ax25_address
) == 0)
1387 callsign
= "??????-?";
1389 callsign
= ax2asc(buf
, &rose
->source_call
);
1392 "%-10s %-9s %-5s %3.3X %05d %d %d %d %d %3lu %3lu %3lu %3lu %3lu %3lu/%03lu %5d %5d %ld\n",
1393 rose2asc(&rose
->source_addr
),
1397 (rose
->neighbour
) ? rose
->neighbour
->number
: 0,
1402 ax25_display_timer(&rose
->timer
) / HZ
,
1407 ax25_display_timer(&rose
->idletimer
) / (60 * HZ
),
1408 rose
->idle
/ (60 * HZ
),
1409 atomic_read(&s
->sk_wmem_alloc
),
1410 atomic_read(&s
->sk_rmem_alloc
),
1411 s
->sk_socket
? SOCK_INODE(s
->sk_socket
)->i_ino
: 0L);
1417 static struct seq_operations rose_info_seqops
= {
1418 .start
= rose_info_start
,
1419 .next
= rose_info_next
,
1420 .stop
= rose_info_stop
,
1421 .show
= rose_info_show
,
1424 static int rose_info_open(struct inode
*inode
, struct file
*file
)
1426 return seq_open(file
, &rose_info_seqops
);
1429 static struct file_operations rose_info_fops
= {
1430 .owner
= THIS_MODULE
,
1431 .open
= rose_info_open
,
1433 .llseek
= seq_lseek
,
1434 .release
= seq_release
,
1436 #endif /* CONFIG_PROC_FS */
1438 static struct net_proto_family rose_family_ops
= {
1440 .create
= rose_create
,
1441 .owner
= THIS_MODULE
,
1444 static struct proto_ops rose_proto_ops
= {
1446 .owner
= THIS_MODULE
,
1447 .release
= rose_release
,
1449 .connect
= rose_connect
,
1450 .socketpair
= sock_no_socketpair
,
1451 .accept
= rose_accept
,
1452 .getname
= rose_getname
,
1453 .poll
= datagram_poll
,
1454 .ioctl
= rose_ioctl
,
1455 .listen
= rose_listen
,
1456 .shutdown
= sock_no_shutdown
,
1457 .setsockopt
= rose_setsockopt
,
1458 .getsockopt
= rose_getsockopt
,
1459 .sendmsg
= rose_sendmsg
,
1460 .recvmsg
= rose_recvmsg
,
1461 .mmap
= sock_no_mmap
,
1462 .sendpage
= sock_no_sendpage
,
1465 static struct notifier_block rose_dev_notifier
= {
1466 .notifier_call
= rose_device_event
,
1469 static struct net_device
**dev_rose
;
1471 static int __init
rose_proto_init(void)
1476 if (rose_ndevs
> 0x7FFFFFFF/sizeof(struct net_device
*)) {
1477 printk(KERN_ERR
"ROSE: rose_proto_init - rose_ndevs parameter to large\n");
1482 rc
= proto_register(&rose_proto
, 0);
1486 rose_callsign
= null_ax25_address
;
1488 dev_rose
= kmalloc(rose_ndevs
* sizeof(struct net_device
*), GFP_KERNEL
);
1489 if (dev_rose
== NULL
) {
1490 printk(KERN_ERR
"ROSE: rose_proto_init - unable to allocate device structure\n");
1492 goto out_proto_unregister
;
1495 memset(dev_rose
, 0x00, rose_ndevs
* sizeof(struct net_device
*));
1496 for (i
= 0; i
< rose_ndevs
; i
++) {
1497 struct net_device
*dev
;
1498 char name
[IFNAMSIZ
];
1500 sprintf(name
, "rose%d", i
);
1501 dev
= alloc_netdev(sizeof(struct net_device_stats
),
1504 printk(KERN_ERR
"ROSE: rose_proto_init - unable to allocate memory\n");
1508 rc
= register_netdev(dev
);
1510 printk(KERN_ERR
"ROSE: netdevice registration failed\n");
1517 sock_register(&rose_family_ops
);
1518 register_netdevice_notifier(&rose_dev_notifier
);
1520 ax25_protocol_register(AX25_P_ROSE
, rose_route_frame
);
1521 ax25_linkfail_register(rose_link_failed
);
1523 #ifdef CONFIG_SYSCTL
1524 rose_register_sysctl();
1526 rose_loopback_init();
1528 rose_add_loopback_neigh();
1530 proc_net_fops_create("rose", S_IRUGO
, &rose_info_fops
);
1531 proc_net_fops_create("rose_neigh", S_IRUGO
, &rose_neigh_fops
);
1532 proc_net_fops_create("rose_nodes", S_IRUGO
, &rose_nodes_fops
);
1533 proc_net_fops_create("rose_routes", S_IRUGO
, &rose_routes_fops
);
1538 unregister_netdev(dev_rose
[i
]);
1539 free_netdev(dev_rose
[i
]);
1542 out_proto_unregister
:
1543 proto_unregister(&rose_proto
);
1546 module_init(rose_proto_init
);
1548 module_param(rose_ndevs
, int, 0);
1549 MODULE_PARM_DESC(rose_ndevs
, "number of ROSE devices");
1551 MODULE_AUTHOR("Jonathan Naylor G4KLX <g4klx@g4klx.demon.co.uk>");
1552 MODULE_DESCRIPTION("The amateur radio ROSE network layer protocol");
1553 MODULE_LICENSE("GPL");
1554 MODULE_ALIAS_NETPROTO(PF_ROSE
);
1556 static void __exit
rose_exit(void)
1560 proc_net_remove("rose");
1561 proc_net_remove("rose_neigh");
1562 proc_net_remove("rose_nodes");
1563 proc_net_remove("rose_routes");
1564 rose_loopback_clear();
1568 ax25_protocol_release(AX25_P_ROSE
);
1569 ax25_linkfail_release(rose_link_failed
);
1571 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1572 ax25_listen_release(&rose_callsign
, NULL
);
1574 #ifdef CONFIG_SYSCTL
1575 rose_unregister_sysctl();
1577 unregister_netdevice_notifier(&rose_dev_notifier
);
1579 sock_unregister(PF_ROSE
);
1581 for (i
= 0; i
< rose_ndevs
; i
++) {
1582 struct net_device
*dev
= dev_rose
[i
];
1585 unregister_netdev(dev
);
1591 proto_unregister(&rose_proto
);
1594 module_exit(rose_exit
);