1 /*********************************************************************
3 * Filename: irlap_frame.c
5 * Description: Build and transmit IrLAP frames
7 * Author: Dag Brattli <dagb@cs.uit.no>
8 * Created at: Tue Aug 19 10:27:26 1997
9 * Modified at: Wed Jan 5 08:59:04 2000
10 * Modified by: Dag Brattli <dagb@cs.uit.no>
12 * Copyright (c) 1998-2000 Dag Brattli <dagb@cs.uit.no>,
13 * All Rights Reserved.
14 * Copyright (c) 2000-2003 Jean Tourrilhes <jt@hpl.hp.com>
16 * This program is free software; you can redistribute it and/or
17 * modify it under the terms of the GNU General Public License as
18 * published by the Free Software Foundation; either version 2 of
19 * the License, or (at your option) any later version.
21 * Neither Dag Brattli nor University of Tromsø admit liability nor
22 * provide warranty for any of this software. This material is
23 * provided "AS-IS" and at no charge.
25 ********************************************************************/
27 #include <linux/skbuff.h>
29 #include <linux/if_ether.h>
30 #include <linux/netdevice.h>
31 #include <linux/irda.h>
32 #include <linux/slab.h>
34 #include <net/pkt_sched.h>
37 #include <asm/byteorder.h>
39 #include <net/irda/irda.h>
40 #include <net/irda/irda_device.h>
41 #include <net/irda/irlap.h>
42 #include <net/irda/wrapper.h>
43 #include <net/irda/timer.h>
44 #include <net/irda/irlap_frame.h>
45 #include <net/irda/qos.h>
47 static void irlap_send_i_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
51 * Function irlap_insert_info (self, skb)
53 * Insert minimum turnaround time and speed information into the skb. We
54 * need to do this since it's per packet relevant information. Safe to
55 * have this function inlined since it's only called from one place
57 static inline void irlap_insert_info(struct irlap_cb
*self
,
60 struct irda_skb_cb
*cb
= (struct irda_skb_cb
*) skb
->cb
;
63 * Insert MTT (min. turn time) and speed into skb, so that the
64 * device driver knows which settings to use
66 cb
->magic
= LAP_MAGIC
;
67 cb
->mtt
= self
->mtt_required
;
68 cb
->next_speed
= self
->speed
;
71 self
->mtt_required
= 0;
74 * Delay equals negotiated BOFs count, plus the number of BOFs to
75 * force the negotiated minimum turnaround time
77 cb
->xbofs
= self
->bofs_count
;
78 cb
->next_xbofs
= self
->next_bofs
;
79 cb
->xbofs_delay
= self
->xbofs_delay
;
81 /* Reset XBOF's delay (used only for getting min turn time) */
82 self
->xbofs_delay
= 0;
83 /* Put the correct xbofs value for the next packet */
84 self
->bofs_count
= self
->next_bofs
;
88 * Function irlap_queue_xmit (self, skb)
90 * A little wrapper for dev_queue_xmit, so we can insert some common
93 void irlap_queue_xmit(struct irlap_cb
*self
, struct sk_buff
*skb
)
95 /* Some common init stuff */
96 skb
->dev
= self
->netdev
;
97 skb_reset_mac_header(skb
);
98 skb_reset_network_header(skb
);
99 skb_reset_transport_header(skb
);
100 skb
->protocol
= htons(ETH_P_IRDA
);
101 skb
->priority
= TC_PRIO_BESTEFFORT
;
103 irlap_insert_info(self
, skb
);
105 if (unlikely(self
->mode
& IRDA_MODE_MONITOR
)) {
106 IRDA_DEBUG(3, "%s(): %s is in monitor mode\n", __func__
,
116 * Function irlap_send_snrm_cmd (void)
118 * Transmits a connect SNRM command frame
120 void irlap_send_snrm_frame(struct irlap_cb
*self
, struct qos_info
*qos
)
122 struct sk_buff
*tx_skb
;
123 struct snrm_frame
*frame
;
126 IRDA_ASSERT(self
!= NULL
, return;);
127 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
130 tx_skb
= alloc_skb(sizeof(struct snrm_frame
) +
131 IRLAP_NEGOCIATION_PARAMS_LEN
,
136 frame
= (struct snrm_frame
*) skb_put(tx_skb
, 2);
138 /* Insert connection address field */
140 frame
->caddr
= CMD_FRAME
| CBROADCAST
;
142 frame
->caddr
= CMD_FRAME
| self
->caddr
;
144 /* Insert control field */
145 frame
->control
= SNRM_CMD
| PF_BIT
;
148 * If we are establishing a connection then insert QoS parameters
151 skb_put(tx_skb
, 9); /* 25 left */
152 frame
->saddr
= cpu_to_le32(self
->saddr
);
153 frame
->daddr
= cpu_to_le32(self
->daddr
);
155 frame
->ncaddr
= self
->caddr
;
157 ret
= irlap_insert_qos_negotiation_params(self
, tx_skb
);
159 dev_kfree_skb(tx_skb
);
163 irlap_queue_xmit(self
, tx_skb
);
167 * Function irlap_recv_snrm_cmd (skb, info)
169 * Received SNRM (Set Normal Response Mode) command frame
172 static void irlap_recv_snrm_cmd(struct irlap_cb
*self
, struct sk_buff
*skb
,
173 struct irlap_info
*info
)
175 struct snrm_frame
*frame
;
177 if (pskb_may_pull(skb
,sizeof(struct snrm_frame
))) {
178 frame
= (struct snrm_frame
*) skb
->data
;
180 /* Copy the new connection address ignoring the C/R bit */
181 info
->caddr
= frame
->ncaddr
& 0xFE;
183 /* Check if the new connection address is valid */
184 if ((info
->caddr
== 0x00) || (info
->caddr
== 0xfe)) {
185 IRDA_DEBUG(3, "%s(), invalid connection address!\n",
190 /* Copy peer device address */
191 info
->daddr
= le32_to_cpu(frame
->saddr
);
192 info
->saddr
= le32_to_cpu(frame
->daddr
);
194 /* Only accept if addressed directly to us */
195 if (info
->saddr
!= self
->saddr
) {
196 IRDA_DEBUG(2, "%s(), not addressed to us!\n",
200 irlap_do_event(self
, RECV_SNRM_CMD
, skb
, info
);
202 /* Signal that this SNRM frame does not contain and I-field */
203 irlap_do_event(self
, RECV_SNRM_CMD
, skb
, NULL
);
208 * Function irlap_send_ua_response_frame (qos)
210 * Send UA (Unnumbered Acknowledgement) frame
213 void irlap_send_ua_response_frame(struct irlap_cb
*self
, struct qos_info
*qos
)
215 struct sk_buff
*tx_skb
;
216 struct ua_frame
*frame
;
219 IRDA_DEBUG(2, "%s() <%ld>\n", __func__
, jiffies
);
221 IRDA_ASSERT(self
!= NULL
, return;);
222 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
225 tx_skb
= alloc_skb(sizeof(struct ua_frame
) +
226 IRLAP_NEGOCIATION_PARAMS_LEN
,
231 frame
= (struct ua_frame
*) skb_put(tx_skb
, 10);
233 /* Build UA response */
234 frame
->caddr
= self
->caddr
;
235 frame
->control
= UA_RSP
| PF_BIT
;
237 frame
->saddr
= cpu_to_le32(self
->saddr
);
238 frame
->daddr
= cpu_to_le32(self
->daddr
);
240 /* Should we send QoS negotiation parameters? */
242 ret
= irlap_insert_qos_negotiation_params(self
, tx_skb
);
244 dev_kfree_skb(tx_skb
);
249 irlap_queue_xmit(self
, tx_skb
);
254 * Function irlap_send_dm_frame (void)
256 * Send disconnected mode (DM) frame
259 void irlap_send_dm_frame( struct irlap_cb
*self
)
261 struct sk_buff
*tx_skb
= NULL
;
262 struct dm_frame
*frame
;
264 IRDA_ASSERT(self
!= NULL
, return;);
265 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
267 tx_skb
= alloc_skb(sizeof(struct dm_frame
), GFP_ATOMIC
);
271 frame
= (struct dm_frame
*)skb_put(tx_skb
, 2);
273 if (self
->state
== LAP_NDM
)
274 frame
->caddr
= CBROADCAST
;
276 frame
->caddr
= self
->caddr
;
278 frame
->control
= DM_RSP
| PF_BIT
;
280 irlap_queue_xmit(self
, tx_skb
);
284 * Function irlap_send_disc_frame (void)
286 * Send disconnect (DISC) frame
289 void irlap_send_disc_frame(struct irlap_cb
*self
)
291 struct sk_buff
*tx_skb
= NULL
;
292 struct disc_frame
*frame
;
294 IRDA_DEBUG(3, "%s()\n", __func__
);
296 IRDA_ASSERT(self
!= NULL
, return;);
297 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
299 tx_skb
= alloc_skb(sizeof(struct disc_frame
), GFP_ATOMIC
);
303 frame
= (struct disc_frame
*)skb_put(tx_skb
, 2);
305 frame
->caddr
= self
->caddr
| CMD_FRAME
;
306 frame
->control
= DISC_CMD
| PF_BIT
;
308 irlap_queue_xmit(self
, tx_skb
);
312 * Function irlap_send_discovery_xid_frame (S, s, command)
314 * Build and transmit a XID (eXchange station IDentifier) discovery
317 void irlap_send_discovery_xid_frame(struct irlap_cb
*self
, int S
, __u8 s
,
318 __u8 command
, discovery_t
*discovery
)
320 struct sk_buff
*tx_skb
= NULL
;
321 struct xid_frame
*frame
;
322 __u32 bcast
= BROADCAST
;
325 IRDA_DEBUG(4, "%s(), s=%d, S=%d, command=%d\n", __func__
,
328 IRDA_ASSERT(self
!= NULL
, return;);
329 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
330 IRDA_ASSERT(discovery
!= NULL
, return;);
332 tx_skb
= alloc_skb(sizeof(struct xid_frame
) + IRLAP_DISCOVERY_INFO_LEN
,
338 frame
= (struct xid_frame
*) tx_skb
->data
;
341 frame
->caddr
= CBROADCAST
| CMD_FRAME
;
342 frame
->control
= XID_CMD
| PF_BIT
;
344 frame
->caddr
= CBROADCAST
;
345 frame
->control
= XID_RSP
| PF_BIT
;
347 frame
->ident
= XID_FORMAT
;
349 frame
->saddr
= cpu_to_le32(self
->saddr
);
352 frame
->daddr
= cpu_to_le32(bcast
);
354 frame
->daddr
= cpu_to_le32(discovery
->data
.daddr
);
375 frame
->version
= 0x00;
378 * Provide info for final slot only in commands, and for all
379 * responses. Send the second byte of the hint only if the
380 * EXTENSION bit is set in the first byte.
382 if (!command
|| (frame
->slotnr
== 0xff)) {
385 if (discovery
->data
.hints
[0] & HINT_EXTENSION
) {
386 info
= skb_put(tx_skb
, 2);
387 info
[0] = discovery
->data
.hints
[0];
388 info
[1] = discovery
->data
.hints
[1];
390 info
= skb_put(tx_skb
, 1);
391 info
[0] = discovery
->data
.hints
[0];
393 info
= skb_put(tx_skb
, 1);
394 info
[0] = discovery
->data
.charset
;
396 len
= IRDA_MIN(discovery
->name_len
, skb_tailroom(tx_skb
));
397 info
= skb_put(tx_skb
, len
);
398 memcpy(info
, discovery
->data
.info
, len
);
400 irlap_queue_xmit(self
, tx_skb
);
404 * Function irlap_recv_discovery_xid_rsp (skb, info)
406 * Received a XID discovery response
409 static void irlap_recv_discovery_xid_rsp(struct irlap_cb
*self
,
411 struct irlap_info
*info
)
413 struct xid_frame
*xid
;
414 discovery_t
*discovery
= NULL
;
415 __u8
*discovery_info
;
418 IRDA_DEBUG(4, "%s()\n", __func__
);
420 IRDA_ASSERT(self
!= NULL
, return;);
421 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
423 if (!pskb_may_pull(skb
, sizeof(struct xid_frame
))) {
424 IRDA_ERROR("%s: frame too short!\n", __func__
);
428 xid
= (struct xid_frame
*) skb
->data
;
430 info
->daddr
= le32_to_cpu(xid
->saddr
);
431 info
->saddr
= le32_to_cpu(xid
->daddr
);
433 /* Make sure frame is addressed to us */
434 if ((info
->saddr
!= self
->saddr
) && (info
->saddr
!= BROADCAST
)) {
435 IRDA_DEBUG(0, "%s(), frame is not addressed to us!\n",
440 if ((discovery
= kzalloc(sizeof(discovery_t
), GFP_ATOMIC
)) == NULL
) {
441 IRDA_WARNING("%s: kmalloc failed!\n", __func__
);
445 discovery
->data
.daddr
= info
->daddr
;
446 discovery
->data
.saddr
= self
->saddr
;
447 discovery
->timestamp
= jiffies
;
449 IRDA_DEBUG(4, "%s(), daddr=%08x\n", __func__
,
450 discovery
->data
.daddr
);
452 discovery_info
= skb_pull(skb
, sizeof(struct xid_frame
));
454 /* Get info returned from peer */
455 discovery
->data
.hints
[0] = discovery_info
[0];
456 if (discovery_info
[0] & HINT_EXTENSION
) {
457 IRDA_DEBUG(4, "EXTENSION\n");
458 discovery
->data
.hints
[1] = discovery_info
[1];
459 discovery
->data
.charset
= discovery_info
[2];
460 text
= (char *) &discovery_info
[3];
462 discovery
->data
.hints
[1] = 0;
463 discovery
->data
.charset
= discovery_info
[1];
464 text
= (char *) &discovery_info
[2];
467 * Terminate info string, should be safe since this is where the
470 skb
->data
[skb
->len
] = '\0';
471 strncpy(discovery
->data
.info
, text
, NICKNAME_MAX_LEN
);
472 discovery
->name_len
= strlen(discovery
->data
.info
);
474 info
->discovery
= discovery
;
476 irlap_do_event(self
, RECV_DISCOVERY_XID_RSP
, skb
, info
);
480 * Function irlap_recv_discovery_xid_cmd (skb, info)
482 * Received a XID discovery command
485 static void irlap_recv_discovery_xid_cmd(struct irlap_cb
*self
,
487 struct irlap_info
*info
)
489 struct xid_frame
*xid
;
490 discovery_t
*discovery
= NULL
;
491 __u8
*discovery_info
;
494 if (!pskb_may_pull(skb
, sizeof(struct xid_frame
))) {
495 IRDA_ERROR("%s: frame too short!\n", __func__
);
499 xid
= (struct xid_frame
*) skb
->data
;
501 info
->daddr
= le32_to_cpu(xid
->saddr
);
502 info
->saddr
= le32_to_cpu(xid
->daddr
);
504 /* Make sure frame is addressed to us */
505 if ((info
->saddr
!= self
->saddr
) && (info
->saddr
!= BROADCAST
)) {
506 IRDA_DEBUG(0, "%s(), frame is not addressed to us!\n",
511 switch (xid
->flags
& 0x03) {
528 info
->s
= xid
->slotnr
;
530 discovery_info
= skb_pull(skb
, sizeof(struct xid_frame
));
533 * Check if last frame
535 if (info
->s
== 0xff) {
536 /* Check if things are sane at this point... */
537 if((discovery_info
== NULL
) ||
538 !pskb_may_pull(skb
, 3)) {
539 IRDA_ERROR("%s: discovery frame too short!\n",
545 * We now have some discovery info to deliver!
547 discovery
= kmalloc(sizeof(discovery_t
), GFP_ATOMIC
);
549 IRDA_WARNING("%s: unable to malloc!\n", __func__
);
553 discovery
->data
.daddr
= info
->daddr
;
554 discovery
->data
.saddr
= self
->saddr
;
555 discovery
->timestamp
= jiffies
;
557 discovery
->data
.hints
[0] = discovery_info
[0];
558 if (discovery_info
[0] & HINT_EXTENSION
) {
559 discovery
->data
.hints
[1] = discovery_info
[1];
560 discovery
->data
.charset
= discovery_info
[2];
561 text
= (char *) &discovery_info
[3];
563 discovery
->data
.hints
[1] = 0;
564 discovery
->data
.charset
= discovery_info
[1];
565 text
= (char *) &discovery_info
[2];
568 * Terminate string, should be safe since this is where the
571 skb
->data
[skb
->len
] = '\0';
572 strncpy(discovery
->data
.info
, text
, NICKNAME_MAX_LEN
);
573 discovery
->name_len
= strlen(discovery
->data
.info
);
575 info
->discovery
= discovery
;
577 info
->discovery
= NULL
;
579 irlap_do_event(self
, RECV_DISCOVERY_XID_CMD
, skb
, info
);
583 * Function irlap_send_rr_frame (self, command)
585 * Build and transmit RR (Receive Ready) frame. Notice that it is currently
586 * only possible to send RR frames with the poll bit set.
588 void irlap_send_rr_frame(struct irlap_cb
*self
, int command
)
590 struct sk_buff
*tx_skb
;
591 struct rr_frame
*frame
;
593 tx_skb
= alloc_skb(sizeof(struct rr_frame
), GFP_ATOMIC
);
597 frame
= (struct rr_frame
*)skb_put(tx_skb
, 2);
599 frame
->caddr
= self
->caddr
;
600 frame
->caddr
|= (command
) ? CMD_FRAME
: 0;
602 frame
->control
= RR
| PF_BIT
| (self
->vr
<< 5);
604 irlap_queue_xmit(self
, tx_skb
);
608 * Function irlap_send_rd_frame (self)
610 * Request disconnect. Used by a secondary station to request the
611 * disconnection of the link.
613 void irlap_send_rd_frame(struct irlap_cb
*self
)
615 struct sk_buff
*tx_skb
;
616 struct rd_frame
*frame
;
618 tx_skb
= alloc_skb(sizeof(struct rd_frame
), GFP_ATOMIC
);
622 frame
= (struct rd_frame
*)skb_put(tx_skb
, 2);
624 frame
->caddr
= self
->caddr
;
625 frame
->caddr
= RD_RSP
| PF_BIT
;
627 irlap_queue_xmit(self
, tx_skb
);
631 * Function irlap_recv_rr_frame (skb, info)
633 * Received RR (Receive Ready) frame from peer station, no harm in
634 * making it inline since its called only from one single place
635 * (irlap_driver_rcv).
637 static inline void irlap_recv_rr_frame(struct irlap_cb
*self
,
639 struct irlap_info
*info
, int command
)
641 info
->nr
= skb
->data
[1] >> 5;
643 /* Check if this is a command or a response frame */
645 irlap_do_event(self
, RECV_RR_CMD
, skb
, info
);
647 irlap_do_event(self
, RECV_RR_RSP
, skb
, info
);
651 * Function irlap_recv_rnr_frame (self, skb, info)
653 * Received RNR (Receive Not Ready) frame from peer station
656 static void irlap_recv_rnr_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
657 struct irlap_info
*info
, int command
)
659 info
->nr
= skb
->data
[1] >> 5;
661 IRDA_DEBUG(4, "%s(), nr=%d, %ld\n", __func__
, info
->nr
, jiffies
);
664 irlap_do_event(self
, RECV_RNR_CMD
, skb
, info
);
666 irlap_do_event(self
, RECV_RNR_RSP
, skb
, info
);
669 static void irlap_recv_rej_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
670 struct irlap_info
*info
, int command
)
672 IRDA_DEBUG(0, "%s()\n", __func__
);
674 info
->nr
= skb
->data
[1] >> 5;
676 /* Check if this is a command or a response frame */
678 irlap_do_event(self
, RECV_REJ_CMD
, skb
, info
);
680 irlap_do_event(self
, RECV_REJ_RSP
, skb
, info
);
683 static void irlap_recv_srej_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
684 struct irlap_info
*info
, int command
)
686 IRDA_DEBUG(0, "%s()\n", __func__
);
688 info
->nr
= skb
->data
[1] >> 5;
690 /* Check if this is a command or a response frame */
692 irlap_do_event(self
, RECV_SREJ_CMD
, skb
, info
);
694 irlap_do_event(self
, RECV_SREJ_RSP
, skb
, info
);
697 static void irlap_recv_disc_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
698 struct irlap_info
*info
, int command
)
700 IRDA_DEBUG(2, "%s()\n", __func__
);
702 /* Check if this is a command or a response frame */
704 irlap_do_event(self
, RECV_DISC_CMD
, skb
, info
);
706 irlap_do_event(self
, RECV_RD_RSP
, skb
, info
);
710 * Function irlap_recv_ua_frame (skb, frame)
712 * Received UA (Unnumbered Acknowledgement) frame
715 static inline void irlap_recv_ua_frame(struct irlap_cb
*self
,
717 struct irlap_info
*info
)
719 irlap_do_event(self
, RECV_UA_RSP
, skb
, info
);
723 * Function irlap_send_data_primary(self, skb)
725 * Send I-frames as the primary station but without the poll bit set
728 void irlap_send_data_primary(struct irlap_cb
*self
, struct sk_buff
*skb
)
730 struct sk_buff
*tx_skb
;
732 if (skb
->data
[1] == I_FRAME
) {
735 * Insert frame sequence number (Vs) in control field before
736 * inserting into transmit window queue.
738 skb
->data
[1] = I_FRAME
| (self
->vs
<< 1);
741 * Insert frame in store, in case of retransmissions
742 * Increase skb reference count, see irlap_do_event()
745 skb_queue_tail(&self
->wx_list
, skb
);
748 tx_skb
= skb_clone(skb
, GFP_ATOMIC
);
749 if (tx_skb
== NULL
) {
753 self
->vs
= (self
->vs
+ 1) % 8;
754 self
->ack_required
= FALSE
;
757 irlap_send_i_frame( self
, tx_skb
, CMD_FRAME
);
759 IRDA_DEBUG(4, "%s(), sending unreliable frame\n", __func__
);
760 irlap_send_ui_frame(self
, skb_get(skb
), self
->caddr
, CMD_FRAME
);
765 * Function irlap_send_data_primary_poll (self, skb)
767 * Send I(nformation) frame as primary with poll bit set
769 void irlap_send_data_primary_poll(struct irlap_cb
*self
, struct sk_buff
*skb
)
771 struct sk_buff
*tx_skb
;
772 int transmission_time
;
775 del_timer(&self
->poll_timer
);
777 /* Is this reliable or unreliable data? */
778 if (skb
->data
[1] == I_FRAME
) {
781 * Insert frame sequence number (Vs) in control field before
782 * inserting into transmit window queue.
784 skb
->data
[1] = I_FRAME
| (self
->vs
<< 1);
787 * Insert frame in store, in case of retransmissions
788 * Increase skb reference count, see irlap_do_event()
791 skb_queue_tail(&self
->wx_list
, skb
);
794 tx_skb
= skb_clone(skb
, GFP_ATOMIC
);
795 if (tx_skb
== NULL
) {
800 * Set poll bit if necessary. We do this to the copied
801 * skb, since retransmitted need to set or clear the poll
802 * bit depending on when they are sent.
804 tx_skb
->data
[1] |= PF_BIT
;
806 self
->vs
= (self
->vs
+ 1) % 8;
807 self
->ack_required
= FALSE
;
809 irlap_next_state(self
, LAP_NRM_P
);
810 irlap_send_i_frame(self
, tx_skb
, CMD_FRAME
);
812 IRDA_DEBUG(4, "%s(), sending unreliable frame\n", __func__
);
814 if (self
->ack_required
) {
815 irlap_send_ui_frame(self
, skb_get(skb
), self
->caddr
, CMD_FRAME
);
816 irlap_next_state(self
, LAP_NRM_P
);
817 irlap_send_rr_frame(self
, CMD_FRAME
);
818 self
->ack_required
= FALSE
;
820 skb
->data
[1] |= PF_BIT
;
821 irlap_next_state(self
, LAP_NRM_P
);
822 irlap_send_ui_frame(self
, skb_get(skb
), self
->caddr
, CMD_FRAME
);
826 /* How much time we took for transmission of all frames.
827 * We don't know, so let assume we used the full window. Jean II */
828 transmission_time
= self
->final_timeout
;
830 /* Reset parameter so that we can fill next window */
831 self
->window
= self
->window_size
;
833 #ifdef CONFIG_IRDA_DYNAMIC_WINDOW
834 /* Remove what we have not used. Just do a prorata of the
835 * bytes left in window to window capacity.
836 * See max_line_capacities[][] in qos.c for details. Jean II */
837 transmission_time
-= (self
->final_timeout
* self
->bytes_left
838 / self
->line_capacity
);
839 IRDA_DEBUG(4, "%s() adjusting transmission_time : ft=%d, bl=%d, lc=%d -> tt=%d\n", __func__
, self
->final_timeout
, self
->bytes_left
, self
->line_capacity
, transmission_time
);
841 /* We are allowed to transmit a maximum number of bytes again. */
842 self
->bytes_left
= self
->line_capacity
;
843 #endif /* CONFIG_IRDA_DYNAMIC_WINDOW */
846 * The network layer has a intermediate buffer between IrLAP
847 * and the IrDA driver which can contain 8 frames. So, even
848 * though IrLAP is currently sending the *last* frame of the
849 * tx-window, the driver most likely has only just started
850 * sending the *first* frame of the same tx-window.
851 * I.e. we are always at the very begining of or Tx window.
852 * Now, we are supposed to set the final timer from the end
853 * of our tx-window to let the other peer reply. So, we need
854 * to add extra time to compensate for the fact that we
855 * are really at the start of tx-window, otherwise the final timer
856 * might expire before he can answer...
859 irlap_start_final_timer(self
, self
->final_timeout
+ transmission_time
);
862 * The clever amongst you might ask why we do this adjustement
863 * only here, and not in all the other cases in irlap_event.c.
864 * In all those other case, we only send a very short management
865 * frame (few bytes), so the adjustement would be lost in the
867 * The exception of course is irlap_resend_rejected_frame().
872 * Function irlap_send_data_secondary_final (self, skb)
874 * Send I(nformation) frame as secondary with final bit set
877 void irlap_send_data_secondary_final(struct irlap_cb
*self
,
880 struct sk_buff
*tx_skb
= NULL
;
882 IRDA_ASSERT(self
!= NULL
, return;);
883 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
884 IRDA_ASSERT(skb
!= NULL
, return;);
886 /* Is this reliable or unreliable data? */
887 if (skb
->data
[1] == I_FRAME
) {
890 * Insert frame sequence number (Vs) in control field before
891 * inserting into transmit window queue.
893 skb
->data
[1] = I_FRAME
| (self
->vs
<< 1);
896 * Insert frame in store, in case of retransmissions
897 * Increase skb reference count, see irlap_do_event()
900 skb_queue_tail(&self
->wx_list
, skb
);
902 tx_skb
= skb_clone(skb
, GFP_ATOMIC
);
903 if (tx_skb
== NULL
) {
907 tx_skb
->data
[1] |= PF_BIT
;
909 self
->vs
= (self
->vs
+ 1) % 8;
910 self
->ack_required
= FALSE
;
912 irlap_send_i_frame(self
, tx_skb
, RSP_FRAME
);
914 if (self
->ack_required
) {
915 irlap_send_ui_frame(self
, skb_get(skb
), self
->caddr
, RSP_FRAME
);
916 irlap_send_rr_frame(self
, RSP_FRAME
);
917 self
->ack_required
= FALSE
;
919 skb
->data
[1] |= PF_BIT
;
920 irlap_send_ui_frame(self
, skb_get(skb
), self
->caddr
, RSP_FRAME
);
924 self
->window
= self
->window_size
;
925 #ifdef CONFIG_IRDA_DYNAMIC_WINDOW
926 /* We are allowed to transmit a maximum number of bytes again. */
927 self
->bytes_left
= self
->line_capacity
;
928 #endif /* CONFIG_IRDA_DYNAMIC_WINDOW */
930 irlap_start_wd_timer(self
, self
->wd_timeout
);
934 * Function irlap_send_data_secondary (self, skb)
936 * Send I(nformation) frame as secondary without final bit set
939 void irlap_send_data_secondary(struct irlap_cb
*self
, struct sk_buff
*skb
)
941 struct sk_buff
*tx_skb
= NULL
;
943 /* Is this reliable or unreliable data? */
944 if (skb
->data
[1] == I_FRAME
) {
947 * Insert frame sequence number (Vs) in control field before
948 * inserting into transmit window queue.
950 skb
->data
[1] = I_FRAME
| (self
->vs
<< 1);
953 * Insert frame in store, in case of retransmissions
954 * Increase skb reference count, see irlap_do_event()
957 skb_queue_tail(&self
->wx_list
, skb
);
959 tx_skb
= skb_clone(skb
, GFP_ATOMIC
);
960 if (tx_skb
== NULL
) {
964 self
->vs
= (self
->vs
+ 1) % 8;
965 self
->ack_required
= FALSE
;
968 irlap_send_i_frame(self
, tx_skb
, RSP_FRAME
);
970 irlap_send_ui_frame(self
, skb_get(skb
), self
->caddr
, RSP_FRAME
);
976 * Function irlap_resend_rejected_frames (nr)
978 * Resend frames which has not been acknowledged. Should be safe to
979 * traverse the list without locking it since this function will only be
980 * called from interrupt context (BH)
982 void irlap_resend_rejected_frames(struct irlap_cb
*self
, int command
)
984 struct sk_buff
*tx_skb
;
987 IRDA_ASSERT(self
!= NULL
, return;);
988 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
990 /* Resend unacknowledged frame(s) */
991 skb_queue_walk(&self
->wx_list
, skb
) {
992 irlap_wait_min_turn_around(self
, &self
->qos_tx
);
994 /* We copy the skb to be retransmitted since we will have to
995 * modify it. Cloning will confuse packet sniffers
997 /* tx_skb = skb_clone( skb, GFP_ATOMIC); */
998 tx_skb
= skb_copy(skb
, GFP_ATOMIC
);
1000 IRDA_DEBUG(0, "%s(), unable to copy\n", __func__
);
1004 /* Clear old Nr field + poll bit */
1005 tx_skb
->data
[1] &= 0x0f;
1008 * Set poll bit on the last frame retransmitted
1010 if (skb_queue_is_last(&self
->wx_list
, skb
))
1011 tx_skb
->data
[1] |= PF_BIT
; /* Set p/f bit */
1013 tx_skb
->data
[1] &= ~PF_BIT
; /* Clear p/f bit */
1015 irlap_send_i_frame(self
, tx_skb
, command
);
1019 void irlap_resend_rejected_frame(struct irlap_cb
*self
, int command
)
1021 struct sk_buff
*tx_skb
;
1022 struct sk_buff
*skb
;
1024 IRDA_ASSERT(self
!= NULL
, return;);
1025 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
1027 /* Resend unacknowledged frame(s) */
1028 skb
= skb_peek(&self
->wx_list
);
1030 irlap_wait_min_turn_around(self
, &self
->qos_tx
);
1032 /* We copy the skb to be retransmitted since we will have to
1033 * modify it. Cloning will confuse packet sniffers
1035 /* tx_skb = skb_clone( skb, GFP_ATOMIC); */
1036 tx_skb
= skb_copy(skb
, GFP_ATOMIC
);
1038 IRDA_DEBUG(0, "%s(), unable to copy\n", __func__
);
1042 /* Clear old Nr field + poll bit */
1043 tx_skb
->data
[1] &= 0x0f;
1045 /* Set poll/final bit */
1046 tx_skb
->data
[1] |= PF_BIT
; /* Set p/f bit */
1048 irlap_send_i_frame(self
, tx_skb
, command
);
1053 * Function irlap_send_ui_frame (self, skb, command)
1055 * Contruct and transmit an Unnumbered Information (UI) frame
1058 void irlap_send_ui_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
1059 __u8 caddr
, int command
)
1061 IRDA_DEBUG(4, "%s()\n", __func__
);
1063 IRDA_ASSERT(self
!= NULL
, return;);
1064 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
1065 IRDA_ASSERT(skb
!= NULL
, return;);
1067 /* Insert connection address */
1068 skb
->data
[0] = caddr
| ((command
) ? CMD_FRAME
: 0);
1070 irlap_queue_xmit(self
, skb
);
1074 * Function irlap_send_i_frame (skb)
1076 * Contruct and transmit Information (I) frame
1078 static void irlap_send_i_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
1081 /* Insert connection address */
1082 skb
->data
[0] = self
->caddr
;
1083 skb
->data
[0] |= (command
) ? CMD_FRAME
: 0;
1085 /* Insert next to receive (Vr) */
1086 skb
->data
[1] |= (self
->vr
<< 5); /* insert nr */
1088 irlap_queue_xmit(self
, skb
);
1092 * Function irlap_recv_i_frame (skb, frame)
1094 * Receive and parse an I (Information) frame, no harm in making it inline
1095 * since it's called only from one single place (irlap_driver_rcv).
1097 static inline void irlap_recv_i_frame(struct irlap_cb
*self
,
1098 struct sk_buff
*skb
,
1099 struct irlap_info
*info
, int command
)
1101 info
->nr
= skb
->data
[1] >> 5; /* Next to receive */
1102 info
->pf
= skb
->data
[1] & PF_BIT
; /* Final bit */
1103 info
->ns
= (skb
->data
[1] >> 1) & 0x07; /* Next to send */
1105 /* Check if this is a command or a response frame */
1107 irlap_do_event(self
, RECV_I_CMD
, skb
, info
);
1109 irlap_do_event(self
, RECV_I_RSP
, skb
, info
);
1113 * Function irlap_recv_ui_frame (self, skb, info)
1115 * Receive and parse an Unnumbered Information (UI) frame
1118 static void irlap_recv_ui_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
1119 struct irlap_info
*info
)
1121 IRDA_DEBUG( 4, "%s()\n", __func__
);
1123 info
->pf
= skb
->data
[1] & PF_BIT
; /* Final bit */
1125 irlap_do_event(self
, RECV_UI_FRAME
, skb
, info
);
1129 * Function irlap_recv_frmr_frame (skb, frame)
1131 * Received Frame Reject response.
1134 static void irlap_recv_frmr_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
1135 struct irlap_info
*info
)
1140 IRDA_DEBUG(0, "%s()\n", __func__
);
1142 IRDA_ASSERT(self
!= NULL
, return;);
1143 IRDA_ASSERT(self
->magic
== LAP_MAGIC
, return;);
1144 IRDA_ASSERT(skb
!= NULL
, return;);
1145 IRDA_ASSERT(info
!= NULL
, return;);
1147 if (!pskb_may_pull(skb
, 4)) {
1148 IRDA_ERROR("%s: frame too short!\n", __func__
);
1154 info
->nr
= frame
[2] >> 5; /* Next to receive */
1155 info
->pf
= frame
[2] & PF_BIT
; /* Final bit */
1156 info
->ns
= (frame
[2] >> 1) & 0x07; /* Next to send */
1158 w
= frame
[3] & 0x01;
1159 x
= frame
[3] & 0x02;
1160 y
= frame
[3] & 0x04;
1161 z
= frame
[3] & 0x08;
1164 IRDA_DEBUG(0, "Rejected control field is undefined or not "
1168 IRDA_DEBUG(0, "Rejected control field was invalid because it "
1169 "contained a non permitted I field.\n");
1172 IRDA_DEBUG(0, "Received I field exceeded the maximum negotiated "
1173 "for the existing connection or exceeded the maximum "
1174 "this station supports if no connection exists.\n");
1177 IRDA_DEBUG(0, "Rejected control field control field contained an "
1178 "invalid Nr count.\n");
1180 irlap_do_event(self
, RECV_FRMR_RSP
, skb
, info
);
1184 * Function irlap_send_test_frame (self, daddr)
1186 * Send a test frame response
1189 void irlap_send_test_frame(struct irlap_cb
*self
, __u8 caddr
, __u32 daddr
,
1190 struct sk_buff
*cmd
)
1192 struct sk_buff
*tx_skb
;
1193 struct test_frame
*frame
;
1196 tx_skb
= alloc_skb(cmd
->len
+ sizeof(struct test_frame
), GFP_ATOMIC
);
1200 /* Broadcast frames must include saddr and daddr fields */
1201 if (caddr
== CBROADCAST
) {
1202 frame
= (struct test_frame
*)
1203 skb_put(tx_skb
, sizeof(struct test_frame
));
1205 /* Insert the swapped addresses */
1206 frame
->saddr
= cpu_to_le32(self
->saddr
);
1207 frame
->daddr
= cpu_to_le32(daddr
);
1209 frame
= (struct test_frame
*) skb_put(tx_skb
, LAP_ADDR_HEADER
+ LAP_CTRL_HEADER
);
1211 frame
->caddr
= caddr
;
1212 frame
->control
= TEST_RSP
| PF_BIT
;
1215 info
= skb_put(tx_skb
, cmd
->len
);
1216 memcpy(info
, cmd
->data
, cmd
->len
);
1218 /* Return to sender */
1219 irlap_wait_min_turn_around(self
, &self
->qos_tx
);
1220 irlap_queue_xmit(self
, tx_skb
);
1224 * Function irlap_recv_test_frame (self, skb)
1226 * Receive a test frame
1229 static void irlap_recv_test_frame(struct irlap_cb
*self
, struct sk_buff
*skb
,
1230 struct irlap_info
*info
, int command
)
1232 struct test_frame
*frame
;
1234 IRDA_DEBUG(2, "%s()\n", __func__
);
1236 if (!pskb_may_pull(skb
, sizeof(*frame
))) {
1237 IRDA_ERROR("%s: frame too short!\n", __func__
);
1240 frame
= (struct test_frame
*) skb
->data
;
1242 /* Broadcast frames must carry saddr and daddr fields */
1243 if (info
->caddr
== CBROADCAST
) {
1244 if (skb
->len
< sizeof(struct test_frame
)) {
1245 IRDA_DEBUG(0, "%s() test frame too short!\n",
1250 /* Read and swap addresses */
1251 info
->daddr
= le32_to_cpu(frame
->saddr
);
1252 info
->saddr
= le32_to_cpu(frame
->daddr
);
1254 /* Make sure frame is addressed to us */
1255 if ((info
->saddr
!= self
->saddr
) &&
1256 (info
->saddr
!= BROADCAST
)) {
1262 irlap_do_event(self
, RECV_TEST_CMD
, skb
, info
);
1264 irlap_do_event(self
, RECV_TEST_RSP
, skb
, info
);
1268 * Function irlap_driver_rcv (skb, netdev, ptype)
1270 * Called when a frame is received. Dispatches the right receive function
1271 * for processing of the frame.
1273 * Note on skb management :
1274 * After calling the higher layers of the IrDA stack, we always
1275 * kfree() the skb, which drop the reference count (and potentially
1277 * If a higher layer of the stack want to keep the skb around (to put
1278 * in a queue or pass it to the higher layer), it will need to use
1279 * skb_get() to keep a reference on it. This is usually done at the
1280 * LMP level in irlmp.c.
1283 int irlap_driver_rcv(struct sk_buff
*skb
, struct net_device
*dev
,
1284 struct packet_type
*ptype
, struct net_device
*orig_dev
)
1286 struct irlap_info info
;
1287 struct irlap_cb
*self
;
1292 if (!net_eq(dev_net(dev
), &init_net
))
1295 self
= (struct irlap_cb
*) dev
->atalk_ptr
;
1297 /* If the net device is down, then IrLAP is gone! */
1298 if (!self
|| self
->magic
!= LAP_MAGIC
)
1301 /* We are no longer an "old" protocol, so we need to handle
1302 * share and non linear skbs. This should never happen, so
1303 * we don't need to be clever about it. Jean II */
1304 if ((skb
= skb_share_check(skb
, GFP_ATOMIC
)) == NULL
) {
1305 IRDA_ERROR("%s: can't clone shared skb!\n", __func__
);
1309 /* Check if frame is large enough for parsing */
1310 if (!pskb_may_pull(skb
, 2)) {
1311 IRDA_ERROR("%s: frame too short!\n", __func__
);
1315 command
= skb
->data
[0] & CMD_FRAME
;
1316 info
.caddr
= skb
->data
[0] & CBROADCAST
;
1318 info
.pf
= skb
->data
[1] & PF_BIT
;
1319 info
.control
= skb
->data
[1] & ~PF_BIT
; /* Mask away poll/final bit */
1321 control
= info
.control
;
1323 /* First we check if this frame has a valid connection address */
1324 if ((info
.caddr
!= self
->caddr
) && (info
.caddr
!= CBROADCAST
)) {
1325 IRDA_DEBUG(0, "%s(), wrong connection address!\n",
1330 * Optimize for the common case and check if the frame is an
1331 * I(nformation) frame. Only I-frames have bit 0 set to 0
1333 if (~control
& 0x01) {
1334 irlap_recv_i_frame(self
, skb
, &info
, command
);
1338 * We now check is the frame is an S(upervisory) frame. Only
1339 * S-frames have bit 0 set to 1 and bit 1 set to 0
1341 if (~control
& 0x02) {
1343 * Received S(upervisory) frame, check which frame type it is
1344 * only the first nibble is of interest
1346 switch (control
& 0x0f) {
1348 irlap_recv_rr_frame(self
, skb
, &info
, command
);
1351 irlap_recv_rnr_frame(self
, skb
, &info
, command
);
1354 irlap_recv_rej_frame(self
, skb
, &info
, command
);
1357 irlap_recv_srej_frame(self
, skb
, &info
, command
);
1360 IRDA_WARNING("%s: Unknown S-frame %02x received!\n",
1361 __func__
, info
.control
);
1367 * This must be a C(ontrol) frame
1371 irlap_recv_discovery_xid_rsp(self
, skb
, &info
);
1374 irlap_recv_discovery_xid_cmd(self
, skb
, &info
);
1377 irlap_recv_snrm_cmd(self
, skb
, &info
);
1380 irlap_do_event(self
, RECV_DM_RSP
, skb
, &info
);
1382 case DISC_CMD
: /* And RD_RSP since they have the same value */
1383 irlap_recv_disc_frame(self
, skb
, &info
, command
);
1386 irlap_recv_test_frame(self
, skb
, &info
, command
);
1389 irlap_recv_ua_frame(self
, skb
, &info
);
1392 irlap_recv_frmr_frame(self
, skb
, &info
);
1395 irlap_recv_ui_frame(self
, skb
, &info
);
1398 IRDA_WARNING("%s: Unknown frame %02x received!\n",
1399 __func__
, info
.control
);
1405 /* Always drop our reference on the skb */