4 * Phonet pipe protocol end point socket
6 * Copyright (C) 2008 Nokia Corporation.
8 * Author: RĂ©mi Denis-Courmont <remi.denis-courmont@nokia.com>
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License
12 * version 2 as published by the Free Software Foundation.
14 * This program is distributed in the hope that it will be useful, but
15 * WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
25 #include <linux/kernel.h>
26 #include <linux/slab.h>
27 #include <linux/socket.h>
29 #include <net/tcp_states.h>
30 #include <asm/ioctls.h>
32 #include <linux/phonet.h>
33 #include <net/phonet/phonet.h>
34 #include <net/phonet/pep.h>
35 #include <net/phonet/gprs.h>
38 * TCP_CLOSE sock not in use yet
39 * TCP_CLOSE_WAIT disconnected pipe
40 * TCP_LISTEN listening pipe endpoint
41 * TCP_SYN_RECV connected pipe in disabled state
42 * TCP_ESTABLISHED connected pipe in enabled state
45 * - sk_state, ackq, hlist: sock lock needed
46 * - listener: read only
47 * - pipe_handle: read only
50 #define CREDITS_MAX 10
53 #define pep_sb_size(s) (((s) + 5) & ~3) /* 2-bytes head, 32-bits aligned */
55 /* Get the next TLV sub-block. */
56 static unsigned char *pep_get_sb(struct sk_buff
*skb
, u8
*ptype
, u8
*plen
,
66 ph
= skb_header_pointer(skb
, 0, 2, &h
);
67 if (ph
== NULL
|| ph
->sb_len
< 2 || !pskb_may_pull(skb
, ph
->sb_len
))
73 if (buflen
> ph
->sb_len
)
75 data
= skb_header_pointer(skb
, 2, buflen
, buf
);
76 __skb_pull(skb
, 2 + ph
->sb_len
);
80 static int pep_reply(struct sock
*sk
, struct sk_buff
*oskb
,
81 u8 code
, const void *data
, int len
, gfp_t priority
)
83 const struct pnpipehdr
*oph
= pnp_hdr(oskb
);
86 struct sockaddr_pn peer
;
88 skb
= alloc_skb(MAX_PNPIPE_HEADER
+ len
, priority
);
91 skb_set_owner_w(skb
, sk
);
93 skb_reserve(skb
, MAX_PNPIPE_HEADER
);
95 skb_copy_to_linear_data(skb
, data
, len
);
96 __skb_push(skb
, sizeof(*ph
));
97 skb_reset_transport_header(skb
);
100 ph
->message_id
= oph
->message_id
+ 1; /* REQ -> RESP */
101 ph
->pipe_handle
= oph
->pipe_handle
;
102 ph
->error_code
= code
;
104 pn_skb_get_src_sockaddr(oskb
, &peer
);
105 return pn_skb_send(sk
, skb
, &peer
);
110 #ifdef CONFIG_PHONET_PIPECTRLR
111 static int pipe_handler_send_req(struct sock
*sk
, u8 msg_id
, gfp_t priority
)
114 struct pnpipehdr
*ph
;
116 struct pep_sock
*pn
= pep_sk(sk
);
118 static const u8 data
[4] = {
123 case PNS_PEP_CONNECT_REQ
:
127 case PNS_PEP_DISCONNECT_REQ
:
128 case PNS_PEP_ENABLE_REQ
:
129 case PNS_PEP_DISABLE_REQ
:
137 skb
= alloc_skb(MAX_PNPIPE_HEADER
+ len
, priority
);
140 skb_set_owner_w(skb
, sk
);
142 skb_reserve(skb
, MAX_PNPIPE_HEADER
);
145 skb_copy_to_linear_data(skb
, data
, len
);
147 __skb_push(skb
, sizeof(*ph
));
148 skb_reset_transport_header(skb
);
150 ph
->utid
= msg_id
; /* whatever */
151 ph
->message_id
= msg_id
;
152 ph
->pipe_handle
= pn
->pipe_handle
;
153 ph
->error_code
= PN_PIPE_NO_ERROR
;
155 return pn_skb_send(sk
, skb
, NULL
);
158 static int pipe_handler_send_created_ind(struct sock
*sk
, u8 msg_id
)
161 struct pnpipehdr
*ph
;
164 struct pep_sock
*pn
= pep_sk(sk
);
165 static u8 data
[4] = {
172 * actually, below is number of sub-blocks and not error code.
173 * Pipe_created_ind message format does not have any
174 * error code field. However, the Phonet stack will always send
175 * an error code as part of pnpipehdr. So, use that err_code to
176 * specify the number of sub-blocks.
180 skb
= alloc_skb(MAX_PNPIPE_HEADER
+ sizeof(data
), GFP_ATOMIC
);
183 skb_set_owner_w(skb
, sk
);
185 skb_reserve(skb
, MAX_PNPIPE_HEADER
);
186 __skb_put(skb
, sizeof(data
));
187 skb_copy_to_linear_data(skb
, data
, sizeof(data
));
188 __skb_push(skb
, sizeof(*ph
));
189 skb_reset_transport_header(skb
);
192 ph
->message_id
= msg_id
;
193 ph
->pipe_handle
= pn
->pipe_handle
;
194 ph
->error_code
= err_code
;
196 return pn_skb_send(sk
, skb
, NULL
);
199 static int pipe_handler_send_ind(struct sock
*sk
, u8 msg_id
)
202 struct pnpipehdr
*ph
;
204 struct pep_sock
*pn
= pep_sk(sk
);
207 * actually, below is a filler.
208 * Pipe_enabled/disabled_ind message format does not have any
209 * error code field. However, the Phonet stack will always send
210 * an error code as part of pnpipehdr. So, use that err_code to
211 * specify the filler value.
215 skb
= alloc_skb(MAX_PNPIPE_HEADER
, GFP_ATOMIC
);
218 skb_set_owner_w(skb
, sk
);
220 skb_reserve(skb
, MAX_PNPIPE_HEADER
);
221 __skb_push(skb
, sizeof(*ph
));
222 skb_reset_transport_header(skb
);
225 ph
->message_id
= msg_id
;
226 ph
->pipe_handle
= pn
->pipe_handle
;
227 ph
->error_code
= err_code
;
229 return pn_skb_send(sk
, skb
, NULL
);
232 static int pipe_handler_enable_pipe(struct sock
*sk
, int enable
)
234 u8 id
= enable
? PNS_PEP_ENABLE_REQ
: PNS_PEP_DISABLE_REQ
;
236 return pipe_handler_send_req(sk
, id
, GFP_KERNEL
);
240 static int pep_accept_conn(struct sock
*sk
, struct sk_buff
*skb
)
242 static const u8 data
[20] = {
243 PAD
, PAD
, PAD
, 2 /* sub-blocks */,
244 PN_PIPE_SB_REQUIRED_FC_TX
, pep_sb_size(5), 3, PAD
,
245 PN_MULTI_CREDIT_FLOW_CONTROL
,
246 PN_ONE_CREDIT_FLOW_CONTROL
,
247 PN_LEGACY_FLOW_CONTROL
,
249 PN_PIPE_SB_PREFERRED_FC_RX
, pep_sb_size(5), 3, PAD
,
250 PN_MULTI_CREDIT_FLOW_CONTROL
,
251 PN_ONE_CREDIT_FLOW_CONTROL
,
252 PN_LEGACY_FLOW_CONTROL
,
257 return pep_reply(sk
, skb
, PN_PIPE_NO_ERROR
, data
, sizeof(data
),
261 static int pep_reject_conn(struct sock
*sk
, struct sk_buff
*skb
, u8 code
)
263 static const u8 data
[4] = { PAD
, PAD
, PAD
, 0 /* sub-blocks */ };
264 WARN_ON(code
== PN_PIPE_NO_ERROR
);
265 return pep_reply(sk
, skb
, code
, data
, sizeof(data
), GFP_ATOMIC
);
268 /* Control requests are not sent by the pipe service and have a specific
270 static int pep_ctrlreq_error(struct sock
*sk
, struct sk_buff
*oskb
, u8 code
,
273 const struct pnpipehdr
*oph
= pnp_hdr(oskb
);
275 struct pnpipehdr
*ph
;
276 struct sockaddr_pn dst
;
278 skb
= alloc_skb(MAX_PNPIPE_HEADER
+ 4, priority
);
281 skb_set_owner_w(skb
, sk
);
283 skb_reserve(skb
, MAX_PHONET_HEADER
);
284 ph
= (struct pnpipehdr
*)skb_put(skb
, sizeof(*ph
) + 4);
286 ph
->utid
= oph
->utid
;
287 ph
->message_id
= PNS_PEP_CTRL_RESP
;
288 ph
->pipe_handle
= oph
->pipe_handle
;
289 ph
->data
[0] = oph
->data
[1]; /* CTRL id */
290 ph
->data
[1] = oph
->data
[0]; /* PEP type */
291 ph
->data
[2] = code
; /* error code, at an usual offset */
295 pn_skb_get_src_sockaddr(oskb
, &dst
);
296 return pn_skb_send(sk
, skb
, &dst
);
299 static int pipe_snd_status(struct sock
*sk
, u8 type
, u8 status
, gfp_t priority
)
301 struct pep_sock
*pn
= pep_sk(sk
);
302 struct pnpipehdr
*ph
;
305 skb
= alloc_skb(MAX_PNPIPE_HEADER
+ 4, priority
);
308 skb_set_owner_w(skb
, sk
);
310 skb_reserve(skb
, MAX_PNPIPE_HEADER
+ 4);
311 __skb_push(skb
, sizeof(*ph
) + 4);
312 skb_reset_transport_header(skb
);
315 ph
->message_id
= PNS_PEP_STATUS_IND
;
316 ph
->pipe_handle
= pn
->pipe_handle
;
317 ph
->pep_type
= PN_PEP_TYPE_COMMON
;
321 ph
->data
[4] = status
;
323 return pn_skb_send(sk
, skb
, NULL
);
326 /* Send our RX flow control information to the sender.
327 * Socket must be locked. */
328 static void pipe_grant_credits(struct sock
*sk
)
330 struct pep_sock
*pn
= pep_sk(sk
);
332 BUG_ON(sk
->sk_state
!= TCP_ESTABLISHED
);
335 case PN_LEGACY_FLOW_CONTROL
: /* TODO */
337 case PN_ONE_CREDIT_FLOW_CONTROL
:
338 pipe_snd_status(sk
, PN_PEP_IND_FLOW_CONTROL
,
339 PEP_IND_READY
, GFP_ATOMIC
);
342 case PN_MULTI_CREDIT_FLOW_CONTROL
:
343 if ((pn
->rx_credits
+ CREDITS_THR
) > CREDITS_MAX
)
345 if (pipe_snd_status(sk
, PN_PEP_IND_ID_MCFC_GRANT_CREDITS
,
346 CREDITS_MAX
- pn
->rx_credits
,
348 pn
->rx_credits
= CREDITS_MAX
;
353 static int pipe_rcv_status(struct sock
*sk
, struct sk_buff
*skb
)
355 struct pep_sock
*pn
= pep_sk(sk
);
356 struct pnpipehdr
*hdr
;
359 if (!pskb_may_pull(skb
, sizeof(*hdr
) + 4))
363 if (hdr
->data
[0] != PN_PEP_TYPE_COMMON
) {
364 LIMIT_NETDEBUG(KERN_DEBUG
"Phonet unknown PEP type: %u\n",
365 (unsigned)hdr
->data
[0]);
369 switch (hdr
->data
[1]) {
370 case PN_PEP_IND_FLOW_CONTROL
:
372 case PN_LEGACY_FLOW_CONTROL
:
373 switch (hdr
->data
[4]) {
375 atomic_set(&pn
->tx_credits
, 0);
378 atomic_set(&pn
->tx_credits
, wake
= 1);
382 case PN_ONE_CREDIT_FLOW_CONTROL
:
383 if (hdr
->data
[4] == PEP_IND_READY
)
384 atomic_set(&pn
->tx_credits
, wake
= 1);
389 case PN_PEP_IND_ID_MCFC_GRANT_CREDITS
:
390 if (pn
->tx_fc
!= PN_MULTI_CREDIT_FLOW_CONTROL
)
392 atomic_add(wake
= hdr
->data
[4], &pn
->tx_credits
);
396 LIMIT_NETDEBUG(KERN_DEBUG
"Phonet unknown PEP indication: %u\n",
397 (unsigned)hdr
->data
[1]);
401 sk
->sk_write_space(sk
);
405 static int pipe_rcv_created(struct sock
*sk
, struct sk_buff
*skb
)
407 struct pep_sock
*pn
= pep_sk(sk
);
408 struct pnpipehdr
*hdr
= pnp_hdr(skb
);
409 u8 n_sb
= hdr
->data
[0];
411 pn
->rx_fc
= pn
->tx_fc
= PN_LEGACY_FLOW_CONTROL
;
412 __skb_pull(skb
, sizeof(*hdr
));
414 u8 type
, buf
[2], len
= sizeof(buf
);
415 u8
*data
= pep_get_sb(skb
, &type
, &len
, buf
);
420 case PN_PIPE_SB_NEGOTIATED_FC
:
421 if (len
< 2 || (data
[0] | data
[1]) > 3)
423 pn
->tx_fc
= data
[0] & 3;
424 pn
->rx_fc
= data
[1] & 3;
432 /* Queue an skb to a connected sock.
433 * Socket lock must be held. */
434 static int pipe_do_rcv(struct sock
*sk
, struct sk_buff
*skb
)
436 struct pep_sock
*pn
= pep_sk(sk
);
437 struct pnpipehdr
*hdr
= pnp_hdr(skb
);
438 struct sk_buff_head
*queue
;
441 BUG_ON(sk
->sk_state
== TCP_CLOSE_WAIT
);
443 switch (hdr
->message_id
) {
444 case PNS_PEP_CONNECT_REQ
:
445 pep_reject_conn(sk
, skb
, PN_PIPE_ERR_PEP_IN_USE
);
448 case PNS_PEP_DISCONNECT_REQ
:
449 pep_reply(sk
, skb
, PN_PIPE_NO_ERROR
, NULL
, 0, GFP_ATOMIC
);
450 sk
->sk_state
= TCP_CLOSE_WAIT
;
451 if (!sock_flag(sk
, SOCK_DEAD
))
452 sk
->sk_state_change(sk
);
455 #ifdef CONFIG_PHONET_PIPECTRLR
456 case PNS_PEP_DISCONNECT_RESP
:
457 sk
->sk_state
= TCP_CLOSE
;
461 case PNS_PEP_ENABLE_REQ
:
462 /* Wait for PNS_PIPE_(ENABLED|REDIRECTED)_IND */
463 pep_reply(sk
, skb
, PN_PIPE_NO_ERROR
, NULL
, 0, GFP_ATOMIC
);
466 #ifdef CONFIG_PHONET_PIPECTRLR
467 case PNS_PEP_ENABLE_RESP
:
468 pipe_handler_send_ind(sk
, PNS_PIPE_ENABLED_IND
);
470 if (!pn_flow_safe(pn
->tx_fc
)) {
471 atomic_set(&pn
->tx_credits
, 1);
472 sk
->sk_write_space(sk
);
474 if (sk
->sk_state
== TCP_ESTABLISHED
)
475 break; /* Nothing to do */
476 sk
->sk_state
= TCP_ESTABLISHED
;
477 pipe_grant_credits(sk
);
481 case PNS_PEP_RESET_REQ
:
482 switch (hdr
->state_after_reset
) {
483 case PN_PIPE_DISABLE
:
489 default: /* not allowed to send an error here!? */
494 case PNS_PEP_DISABLE_REQ
:
495 atomic_set(&pn
->tx_credits
, 0);
496 pep_reply(sk
, skb
, PN_PIPE_NO_ERROR
, NULL
, 0, GFP_ATOMIC
);
499 #ifdef CONFIG_PHONET_PIPECTRLR
500 case PNS_PEP_DISABLE_RESP
:
501 atomic_set(&pn
->tx_credits
, 0);
502 pipe_handler_send_ind(sk
, PNS_PIPE_DISABLED_IND
);
503 sk
->sk_state
= TCP_SYN_RECV
;
508 case PNS_PEP_CTRL_REQ
:
509 if (skb_queue_len(&pn
->ctrlreq_queue
) >= PNPIPE_CTRLREQ_MAX
) {
510 atomic_inc(&sk
->sk_drops
);
514 queue
= &pn
->ctrlreq_queue
;
517 case PNS_PIPE_ALIGNED_DATA
:
521 __skb_pull(skb
, 3); /* Pipe data header */
522 if (!pn_flow_safe(pn
->rx_fc
)) {
523 err
= sock_queue_rcv_skb(sk
, skb
);
529 if (pn
->rx_credits
== 0) {
530 atomic_inc(&sk
->sk_drops
);
535 queue
= &sk
->sk_receive_queue
;
538 case PNS_PEP_STATUS_IND
:
539 pipe_rcv_status(sk
, skb
);
542 case PNS_PIPE_REDIRECTED_IND
:
543 err
= pipe_rcv_created(sk
, skb
);
546 case PNS_PIPE_CREATED_IND
:
547 err
= pipe_rcv_created(sk
, skb
);
551 case PNS_PIPE_RESET_IND
:
552 if (!pn
->init_enable
)
555 case PNS_PIPE_ENABLED_IND
:
556 if (!pn_flow_safe(pn
->tx_fc
)) {
557 atomic_set(&pn
->tx_credits
, 1);
558 sk
->sk_write_space(sk
);
560 if (sk
->sk_state
== TCP_ESTABLISHED
)
561 break; /* Nothing to do */
562 sk
->sk_state
= TCP_ESTABLISHED
;
563 pipe_grant_credits(sk
);
566 case PNS_PIPE_DISABLED_IND
:
567 sk
->sk_state
= TCP_SYN_RECV
;
572 LIMIT_NETDEBUG(KERN_DEBUG
"Phonet unknown PEP message: %u\n",
582 skb_set_owner_r(skb
, sk
);
584 skb_queue_tail(queue
, skb
);
585 if (!sock_flag(sk
, SOCK_DEAD
))
586 sk
->sk_data_ready(sk
, err
);
590 /* Destroy connected sock. */
591 static void pipe_destruct(struct sock
*sk
)
593 struct pep_sock
*pn
= pep_sk(sk
);
595 skb_queue_purge(&sk
->sk_receive_queue
);
596 skb_queue_purge(&pn
->ctrlreq_queue
);
599 #ifdef CONFIG_PHONET_PIPECTRLR
600 static u8
pipe_negotiate_fc(const u8
*fcs
, unsigned n
)
603 u8 final_fc
= PN_NO_FLOW_CONTROL
;
605 for (i
= 0; i
< n
; i
++) {
608 if (fc
> final_fc
&& fc
< PN_MAX_FLOW_CONTROL
)
614 static int pep_connresp_rcv(struct sock
*sk
, struct sk_buff
*skb
)
616 struct pep_sock
*pn
= pep_sk(sk
);
617 struct pnpipehdr
*hdr
;
620 if (!pskb_pull(skb
, sizeof(*hdr
) + 4))
625 /* Parse sub-blocks */
628 u8 type
, buf
[6], len
= sizeof(buf
);
629 const u8
*data
= pep_get_sb(skb
, &type
, &len
, buf
);
635 case PN_PIPE_SB_REQUIRED_FC_TX
:
636 if (len
< 2 || len
< data
[0])
638 pn
->tx_fc
= pipe_negotiate_fc(data
+ 2, len
- 2);
641 case PN_PIPE_SB_PREFERRED_FC_RX
:
642 if (len
< 2 || len
< data
[0])
644 pn
->rx_fc
= pipe_negotiate_fc(data
+ 2, len
- 2);
651 sk
->sk_state
= TCP_SYN_RECV
;
652 sk
->sk_backlog_rcv
= pipe_do_rcv
;
653 sk
->sk_destruct
= pipe_destruct
;
655 sk
->sk_state_change(sk
);
657 return pipe_handler_send_created_ind(sk
, PNS_PIPE_CREATED_IND
);
661 static int pep_connreq_rcv(struct sock
*sk
, struct sk_buff
*skb
)
664 struct pep_sock
*newpn
, *pn
= pep_sk(sk
);
665 struct pnpipehdr
*hdr
;
666 struct sockaddr_pn dst
, src
;
668 u8 pipe_handle
, enabled
, n_sb
;
671 if (!pskb_pull(skb
, sizeof(*hdr
) + 4))
675 pipe_handle
= hdr
->pipe_handle
;
676 switch (hdr
->state_after_connect
) {
677 case PN_PIPE_DISABLE
:
684 pep_reject_conn(sk
, skb
, PN_PIPE_ERR_INVALID_PARAM
);
687 peer_type
= hdr
->other_pep_type
<< 8;
689 if (unlikely(sk
->sk_state
!= TCP_LISTEN
) || sk_acceptq_is_full(sk
)) {
690 pep_reject_conn(sk
, skb
, PN_PIPE_ERR_PEP_IN_USE
);
694 /* Parse sub-blocks (options) */
697 u8 type
, buf
[1], len
= sizeof(buf
);
698 const u8
*data
= pep_get_sb(skb
, &type
, &len
, buf
);
703 case PN_PIPE_SB_CONNECT_REQ_PEP_SUB_TYPE
:
706 peer_type
= (peer_type
& 0xff00) | data
[0];
708 case PN_PIPE_SB_ALIGNED_DATA
:
709 aligned
= data
[0] != 0;
715 skb
= skb_clone(skb
, GFP_ATOMIC
);
719 /* Create a new to-be-accepted sock */
720 newsk
= sk_alloc(sock_net(sk
), PF_PHONET
, GFP_ATOMIC
, sk
->sk_prot
);
725 sock_init_data(NULL
, newsk
);
726 newsk
->sk_state
= TCP_SYN_RECV
;
727 newsk
->sk_backlog_rcv
= pipe_do_rcv
;
728 newsk
->sk_protocol
= sk
->sk_protocol
;
729 newsk
->sk_destruct
= pipe_destruct
;
731 newpn
= pep_sk(newsk
);
732 pn_skb_get_dst_sockaddr(skb
, &dst
);
733 pn_skb_get_src_sockaddr(skb
, &src
);
734 newpn
->pn_sk
.sobject
= pn_sockaddr_get_object(&dst
);
735 newpn
->pn_sk
.dobject
= pn_sockaddr_get_object(&src
);
736 newpn
->pn_sk
.resource
= pn_sockaddr_get_resource(&dst
);
737 skb_queue_head_init(&newpn
->ctrlreq_queue
);
738 newpn
->pipe_handle
= pipe_handle
;
739 atomic_set(&newpn
->tx_credits
, 0);
740 newpn
->peer_type
= peer_type
;
741 newpn
->rx_credits
= 0;
742 newpn
->rx_fc
= newpn
->tx_fc
= PN_LEGACY_FLOW_CONTROL
;
743 newpn
->init_enable
= enabled
;
744 newpn
->aligned
= aligned
;
746 BUG_ON(!skb_queue_empty(&newsk
->sk_receive_queue
));
747 skb_queue_head(&newsk
->sk_receive_queue
, skb
);
748 if (!sock_flag(sk
, SOCK_DEAD
))
749 sk
->sk_data_ready(sk
, 0);
751 sk_acceptq_added(sk
);
752 sk_add_node(newsk
, &pn
->ackq
);
756 /* Listening sock must be locked */
757 static struct sock
*pep_find_pipe(const struct hlist_head
*hlist
,
758 const struct sockaddr_pn
*dst
,
761 struct hlist_node
*node
;
763 u16 dobj
= pn_sockaddr_get_object(dst
);
765 sk_for_each(sknode
, node
, hlist
) {
766 struct pep_sock
*pnnode
= pep_sk(sknode
);
768 /* Ports match, but addresses might not: */
769 if (pnnode
->pn_sk
.sobject
!= dobj
)
771 if (pnnode
->pipe_handle
!= pipe_handle
)
773 if (sknode
->sk_state
== TCP_CLOSE_WAIT
)
783 * Deliver an skb to a listening sock.
784 * Socket lock must be held.
785 * We then queue the skb to the right connected sock (if any).
787 static int pep_do_rcv(struct sock
*sk
, struct sk_buff
*skb
)
789 struct pep_sock
*pn
= pep_sk(sk
);
791 struct pnpipehdr
*hdr
;
792 struct sockaddr_pn dst
;
793 int err
= NET_RX_SUCCESS
;
796 if (!pskb_may_pull(skb
, sizeof(*hdr
)))
800 pipe_handle
= hdr
->pipe_handle
;
801 if (pipe_handle
== PN_PIPE_INVALID_HANDLE
)
804 pn_skb_get_dst_sockaddr(skb
, &dst
);
806 /* Look for an existing pipe handle */
807 sknode
= pep_find_pipe(&pn
->hlist
, &dst
, pipe_handle
);
809 return sk_receive_skb(sknode
, skb
, 1);
811 /* Look for a pipe handle pending accept */
812 sknode
= pep_find_pipe(&pn
->ackq
, &dst
, pipe_handle
);
816 printk(KERN_WARNING
"Phonet unconnected PEP ignored");
821 switch (hdr
->message_id
) {
822 case PNS_PEP_CONNECT_REQ
:
823 err
= pep_connreq_rcv(sk
, skb
);
826 #ifdef CONFIG_PHONET_PIPECTRLR
827 case PNS_PEP_CONNECT_RESP
:
828 err
= pep_connresp_rcv(sk
, skb
);
832 case PNS_PEP_DISCONNECT_REQ
:
833 pep_reply(sk
, skb
, PN_PIPE_NO_ERROR
, NULL
, 0, GFP_ATOMIC
);
836 case PNS_PEP_CTRL_REQ
:
837 pep_ctrlreq_error(sk
, skb
, PN_PIPE_INVALID_HANDLE
, GFP_ATOMIC
);
840 case PNS_PEP_RESET_REQ
:
841 case PNS_PEP_ENABLE_REQ
:
842 case PNS_PEP_DISABLE_REQ
:
843 /* invalid handle is not even allowed here! */
852 #ifndef CONFIG_PHONET_PIPECTRLR
853 static int pipe_do_remove(struct sock
*sk
)
855 struct pep_sock
*pn
= pep_sk(sk
);
856 struct pnpipehdr
*ph
;
859 skb
= alloc_skb(MAX_PNPIPE_HEADER
, GFP_KERNEL
);
863 skb_reserve(skb
, MAX_PNPIPE_HEADER
);
864 __skb_push(skb
, sizeof(*ph
));
865 skb_reset_transport_header(skb
);
868 ph
->message_id
= PNS_PIPE_REMOVE_REQ
;
869 ph
->pipe_handle
= pn
->pipe_handle
;
872 return pn_skb_send(sk
, skb
, NULL
);
876 /* associated socket ceases to exist */
877 static void pep_sock_close(struct sock
*sk
, long timeout
)
879 struct pep_sock
*pn
= pep_sk(sk
);
882 sock_hold(sk
); /* keep a reference after sk_common_release() */
883 sk_common_release(sk
);
886 if (sk
->sk_state
== TCP_LISTEN
) {
887 /* Destroy the listen queue */
889 struct hlist_node
*p
, *n
;
891 sk_for_each_safe(sknode
, p
, n
, &pn
->ackq
)
892 sk_del_node_init(sknode
);
893 sk
->sk_state
= TCP_CLOSE
;
894 } else if ((1 << sk
->sk_state
) & (TCPF_SYN_RECV
|TCPF_ESTABLISHED
)) {
895 #ifndef CONFIG_PHONET_PIPECTRLR
896 /* Forcefully remove dangling Phonet pipe */
899 /* send pep disconnect request */
900 pipe_handler_send_req(sk
, PNS_PEP_DISCONNECT_REQ
, GFP_KERNEL
);
901 sk
->sk_state
= TCP_CLOSE
;
905 ifindex
= pn
->ifindex
;
914 static int pep_wait_connreq(struct sock
*sk
, int noblock
)
916 struct task_struct
*tsk
= current
;
917 struct pep_sock
*pn
= pep_sk(sk
);
918 long timeo
= sock_rcvtimeo(sk
, noblock
);
923 if (sk
->sk_state
!= TCP_LISTEN
)
925 if (!hlist_empty(&pn
->ackq
))
929 if (signal_pending(tsk
))
930 return sock_intr_errno(timeo
);
932 prepare_to_wait_exclusive(sk_sleep(sk
), &wait
,
935 timeo
= schedule_timeout(timeo
);
937 finish_wait(sk_sleep(sk
), &wait
);
943 static struct sock
*pep_sock_accept(struct sock
*sk
, int flags
, int *errp
)
945 struct pep_sock
*pn
= pep_sk(sk
);
946 struct sock
*newsk
= NULL
;
947 struct sk_buff
*oskb
;
951 err
= pep_wait_connreq(sk
, flags
& O_NONBLOCK
);
955 newsk
= __sk_head(&pn
->ackq
);
957 oskb
= skb_dequeue(&newsk
->sk_receive_queue
);
958 err
= pep_accept_conn(newsk
, oskb
);
960 skb_queue_head(&newsk
->sk_receive_queue
, oskb
);
967 pep_sk(newsk
)->listener
= sk
;
970 sk_del_node_init(newsk
);
971 sk_acceptq_removed(sk
);
972 sk_add_node(newsk
, &pn
->hlist
);
981 #ifdef CONFIG_PHONET_PIPECTRLR
982 static int pep_sock_connect(struct sock
*sk
, struct sockaddr
*addr
, int len
)
984 struct pep_sock
*pn
= pep_sk(sk
);
985 const struct sockaddr_pn
*spn
= (struct sockaddr_pn
*)addr
;
987 pn
->pn_sk
.dobject
= pn_sockaddr_get_object(spn
);
988 pn
->pn_sk
.resource
= pn_sockaddr_get_resource(spn
);
989 return pipe_handler_send_req(sk
, PNS_PEP_CONNECT_REQ
, GFP_KERNEL
);
993 static int pep_ioctl(struct sock
*sk
, int cmd
, unsigned long arg
)
995 struct pep_sock
*pn
= pep_sk(sk
);
1000 if (sk
->sk_state
== TCP_LISTEN
)
1004 if (sock_flag(sk
, SOCK_URGINLINE
) &&
1005 !skb_queue_empty(&pn
->ctrlreq_queue
))
1006 answ
= skb_peek(&pn
->ctrlreq_queue
)->len
;
1007 else if (!skb_queue_empty(&sk
->sk_receive_queue
))
1008 answ
= skb_peek(&sk
->sk_receive_queue
)->len
;
1012 return put_user(answ
, (int __user
*)arg
);
1015 return -ENOIOCTLCMD
;
1018 static int pep_init(struct sock
*sk
)
1020 struct pep_sock
*pn
= pep_sk(sk
);
1022 INIT_HLIST_HEAD(&pn
->ackq
);
1023 INIT_HLIST_HEAD(&pn
->hlist
);
1024 skb_queue_head_init(&pn
->ctrlreq_queue
);
1025 pn
->pipe_handle
= PN_PIPE_INVALID_HANDLE
;
1029 static int pep_setsockopt(struct sock
*sk
, int level
, int optname
,
1030 char __user
*optval
, unsigned int optlen
)
1032 struct pep_sock
*pn
= pep_sk(sk
);
1033 int val
= 0, err
= 0;
1035 if (level
!= SOL_PNPIPE
)
1036 return -ENOPROTOOPT
;
1037 if (optlen
>= sizeof(int)) {
1038 if (get_user(val
, (int __user
*) optval
))
1044 #ifdef CONFIG_PHONET_PIPECTRLR
1045 case PNPIPE_PIPE_HANDLE
:
1047 pn
->pipe_handle
= val
;
1053 if (val
&& val
!= PNPIPE_ENCAP_IP
) {
1057 if (!pn
->ifindex
== !val
)
1058 break; /* Nothing to do! */
1059 if (!capable(CAP_NET_ADMIN
)) {
1065 err
= gprs_attach(sk
);
1078 #ifdef CONFIG_PHONET_PIPECTRLR
1080 if ((1 << sk
->sk_state
) & ~(TCPF_SYN_RECV
|TCPF_ESTABLISHED
)) {
1084 err
= pipe_handler_enable_pipe(sk
, val
);
1097 static int pep_getsockopt(struct sock
*sk
, int level
, int optname
,
1098 char __user
*optval
, int __user
*optlen
)
1100 struct pep_sock
*pn
= pep_sk(sk
);
1103 if (level
!= SOL_PNPIPE
)
1104 return -ENOPROTOOPT
;
1105 if (get_user(len
, optlen
))
1110 val
= pn
->ifindex
? PNPIPE_ENCAP_IP
: PNPIPE_ENCAP_NONE
;
1113 case PNPIPE_IFINDEX
:
1117 #ifdef CONFIG_PHONET_PIPECTRLR
1119 val
= sk
->sk_state
== TCP_ESTABLISHED
;
1124 return -ENOPROTOOPT
;
1127 len
= min_t(unsigned int, sizeof(int), len
);
1128 if (put_user(len
, optlen
))
1130 if (put_user(val
, (int __user
*) optval
))
1135 static int pipe_skb_send(struct sock
*sk
, struct sk_buff
*skb
)
1137 struct pep_sock
*pn
= pep_sk(sk
);
1138 struct pnpipehdr
*ph
;
1141 if (pn_flow_safe(pn
->tx_fc
) &&
1142 !atomic_add_unless(&pn
->tx_credits
, -1, 0)) {
1147 skb_push(skb
, 3 + pn
->aligned
);
1148 skb_reset_transport_header(skb
);
1152 ph
->message_id
= PNS_PIPE_ALIGNED_DATA
;
1153 ph
->data
[0] = 0; /* padding */
1155 ph
->message_id
= PNS_PIPE_DATA
;
1156 ph
->pipe_handle
= pn
->pipe_handle
;
1157 err
= pn_skb_send(sk
, skb
, NULL
);
1159 if (err
&& pn_flow_safe(pn
->tx_fc
))
1160 atomic_inc(&pn
->tx_credits
);
1165 static int pep_sendmsg(struct kiocb
*iocb
, struct sock
*sk
,
1166 struct msghdr
*msg
, size_t len
)
1168 struct pep_sock
*pn
= pep_sk(sk
);
1169 struct sk_buff
*skb
;
1171 int flags
= msg
->msg_flags
;
1174 if ((msg
->msg_flags
& ~(MSG_DONTWAIT
|MSG_EOR
|MSG_NOSIGNAL
|
1175 MSG_CMSG_COMPAT
)) ||
1176 !(msg
->msg_flags
& MSG_EOR
))
1179 skb
= sock_alloc_send_skb(sk
, MAX_PNPIPE_HEADER
+ len
,
1180 flags
& MSG_DONTWAIT
, &err
);
1184 skb_reserve(skb
, MAX_PHONET_HEADER
+ 3);
1185 err
= memcpy_fromiovec(skb_put(skb
, len
), msg
->msg_iov
, len
);
1190 timeo
= sock_sndtimeo(sk
, flags
& MSG_DONTWAIT
);
1191 if ((1 << sk
->sk_state
) & (TCPF_LISTEN
|TCPF_CLOSE
)) {
1195 if (sk
->sk_state
!= TCP_ESTABLISHED
) {
1196 /* Wait until the pipe gets to enabled state */
1198 err
= sk_stream_wait_connect(sk
, &timeo
);
1202 if (sk
->sk_state
== TCP_CLOSE_WAIT
) {
1207 BUG_ON(sk
->sk_state
!= TCP_ESTABLISHED
);
1209 /* Wait until flow control allows TX */
1210 done
= atomic_read(&pn
->tx_credits
);
1218 if (signal_pending(current
)) {
1219 err
= sock_intr_errno(timeo
);
1223 prepare_to_wait(sk_sleep(sk
), &wait
,
1224 TASK_INTERRUPTIBLE
);
1225 done
= sk_wait_event(sk
, &timeo
, atomic_read(&pn
->tx_credits
));
1226 finish_wait(sk_sleep(sk
), &wait
);
1228 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1232 err
= pipe_skb_send(sk
, skb
);
1234 err
= len
; /* success! */
1243 int pep_writeable(struct sock
*sk
)
1245 struct pep_sock
*pn
= pep_sk(sk
);
1247 return atomic_read(&pn
->tx_credits
);
1250 int pep_write(struct sock
*sk
, struct sk_buff
*skb
)
1252 struct sk_buff
*rskb
, *fs
;
1255 if (pep_sk(sk
)->aligned
)
1256 return pipe_skb_send(sk
, skb
);
1258 rskb
= alloc_skb(MAX_PNPIPE_HEADER
, GFP_ATOMIC
);
1263 skb_shinfo(rskb
)->frag_list
= skb
;
1264 rskb
->len
+= skb
->len
;
1265 rskb
->data_len
+= rskb
->len
;
1266 rskb
->truesize
+= rskb
->len
;
1268 /* Avoid nested fragments */
1269 skb_walk_frags(skb
, fs
)
1271 skb
->next
= skb_shinfo(skb
)->frag_list
;
1272 skb_frag_list_init(skb
);
1274 skb
->data_len
-= flen
;
1275 skb
->truesize
-= flen
;
1277 skb_reserve(rskb
, MAX_PHONET_HEADER
+ 3);
1278 return pipe_skb_send(sk
, rskb
);
1281 struct sk_buff
*pep_read(struct sock
*sk
)
1283 struct sk_buff
*skb
= skb_dequeue(&sk
->sk_receive_queue
);
1285 if (sk
->sk_state
== TCP_ESTABLISHED
)
1286 pipe_grant_credits(sk
);
1290 static int pep_recvmsg(struct kiocb
*iocb
, struct sock
*sk
,
1291 struct msghdr
*msg
, size_t len
, int noblock
,
1292 int flags
, int *addr_len
)
1294 struct sk_buff
*skb
;
1297 if (flags
& ~(MSG_OOB
|MSG_PEEK
|MSG_TRUNC
|MSG_DONTWAIT
|MSG_WAITALL
|
1298 MSG_NOSIGNAL
|MSG_CMSG_COMPAT
))
1301 if (unlikely(1 << sk
->sk_state
& (TCPF_LISTEN
| TCPF_CLOSE
)))
1304 if ((flags
& MSG_OOB
) || sock_flag(sk
, SOCK_URGINLINE
)) {
1305 /* Dequeue and acknowledge control request */
1306 struct pep_sock
*pn
= pep_sk(sk
);
1308 if (flags
& MSG_PEEK
)
1310 skb
= skb_dequeue(&pn
->ctrlreq_queue
);
1312 pep_ctrlreq_error(sk
, skb
, PN_PIPE_NO_ERROR
,
1314 msg
->msg_flags
|= MSG_OOB
;
1317 if (flags
& MSG_OOB
)
1321 skb
= skb_recv_datagram(sk
, flags
, noblock
, &err
);
1324 if (err
== -ENOTCONN
&& sk
->sk_state
== TCP_CLOSE_WAIT
)
1330 if (sk
->sk_state
== TCP_ESTABLISHED
)
1331 pipe_grant_credits(sk
);
1334 msg
->msg_flags
|= MSG_EOR
;
1336 msg
->msg_flags
|= MSG_TRUNC
;
1340 err
= skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, len
);
1342 err
= (flags
& MSG_TRUNC
) ? skb
->len
: len
;
1344 skb_free_datagram(sk
, skb
);
1348 static void pep_sock_unhash(struct sock
*sk
)
1350 struct pep_sock
*pn
= pep_sk(sk
);
1351 struct sock
*skparent
= NULL
;
1355 #ifndef CONFIG_PHONET_PIPECTRLR
1356 if ((1 << sk
->sk_state
) & ~(TCPF_CLOSE
|TCPF_LISTEN
)) {
1357 skparent
= pn
->listener
;
1360 pn
= pep_sk(skparent
);
1361 lock_sock(skparent
);
1362 sk_del_node_init(sk
);
1366 /* Unhash a listening sock only when it is closed
1367 * and all of its active connected pipes are closed. */
1368 if (hlist_empty(&pn
->hlist
))
1369 pn_sock_unhash(&pn
->pn_sk
.sk
);
1376 static struct proto pep_proto
= {
1377 .close
= pep_sock_close
,
1378 .accept
= pep_sock_accept
,
1379 #ifdef CONFIG_PHONET_PIPECTRLR
1380 .connect
= pep_sock_connect
,
1384 .setsockopt
= pep_setsockopt
,
1385 .getsockopt
= pep_getsockopt
,
1386 .sendmsg
= pep_sendmsg
,
1387 .recvmsg
= pep_recvmsg
,
1388 .backlog_rcv
= pep_do_rcv
,
1389 .hash
= pn_sock_hash
,
1390 .unhash
= pep_sock_unhash
,
1391 .get_port
= pn_sock_get_port
,
1392 .obj_size
= sizeof(struct pep_sock
),
1393 .owner
= THIS_MODULE
,
1397 static struct phonet_protocol pep_pn_proto
= {
1398 .ops
= &phonet_stream_ops
,
1400 .sock_type
= SOCK_SEQPACKET
,
1403 static int __init
pep_register(void)
1405 return phonet_proto_register(PN_PROTO_PIPE
, &pep_pn_proto
);
1408 static void __exit
pep_unregister(void)
1410 phonet_proto_unregister(PN_PROTO_PIPE
, &pep_pn_proto
);
1413 module_init(pep_register
);
1414 module_exit(pep_unregister
);
1415 MODULE_AUTHOR("Remi Denis-Courmont, Nokia");
1416 MODULE_DESCRIPTION("Phonet pipe protocol");
1417 MODULE_LICENSE("GPL");
1418 MODULE_ALIAS_NET_PF_PROTO(PF_PHONET
, PN_PROTO_PIPE
);