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>
33 #include <net/pkt_sched.h>
36 #include <asm/byteorder.h>
38 #include <net/irda/irda.h>
39 #include <net/irda/irda_device.h>
40 #include <net/irda/irlap.h>
41 #include <net/irda/wrapper.h>
42 #include <net/irda/timer.h>
43 #include <net/irda/irlap_frame.h>
44 #include <net/irda/qos.h>
46 static void irlap_send_i_frame(struct irlap_cb *self, struct sk_buff *skb,
50 * Function irlap_insert_info (self, skb)
52 * Insert minimum turnaround time and speed information into the skb. We
53 * need to do this since it's per packet relevant information. Safe to
54 * have this function inlined since it's only called from one place
56 static inline void irlap_insert_info(struct irlap_cb *self,
59 struct irda_skb_cb *cb = (struct irda_skb_cb *) skb->cb;
62 * Insert MTT (min. turn time) and speed into skb, so that the
63 * device driver knows which settings to use
65 cb->magic = LAP_MAGIC;
66 cb->mtt = self->mtt_required;
67 cb->next_speed = self->speed;
70 self->mtt_required = 0;
73 * Delay equals negotiated BOFs count, plus the number of BOFs to
74 * force the negotiated minimum turnaround time
76 cb->xbofs = self->bofs_count;
77 cb->next_xbofs = self->next_bofs;
78 cb->xbofs_delay = self->xbofs_delay;
80 /* Reset XBOF's delay (used only for getting min turn time) */
81 self->xbofs_delay = 0;
82 /* Put the correct xbofs value for the next packet */
83 self->bofs_count = self->next_bofs;
87 * Function irlap_queue_xmit (self, skb)
89 * A little wrapper for dev_queue_xmit, so we can insert some common
92 void irlap_queue_xmit(struct irlap_cb *self, struct sk_buff *skb)
94 /* Some common init stuff */
95 skb->dev = self->netdev;
96 skb->h.raw = skb->nh.raw = skb->mac.raw = skb->data;
97 skb->protocol = htons(ETH_P_IRDA);
98 skb->priority = TC_PRIO_BESTEFFORT;
100 irlap_insert_info(self, skb);
106 * Function irlap_send_snrm_cmd (void)
108 * Transmits a connect SNRM command frame
110 void irlap_send_snrm_frame(struct irlap_cb *self, struct qos_info *qos)
112 struct sk_buff *tx_skb;
113 struct snrm_frame *frame;
116 IRDA_ASSERT(self != NULL, return;);
117 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
120 tx_skb = dev_alloc_skb(64);
124 frame = (struct snrm_frame *) skb_put(tx_skb, 2);
126 /* Insert connection address field */
128 frame->caddr = CMD_FRAME | CBROADCAST;
130 frame->caddr = CMD_FRAME | self->caddr;
132 /* Insert control field */
133 frame->control = SNRM_CMD | PF_BIT;
136 * If we are establishing a connection then insert QoS paramerters
139 skb_put(tx_skb, 9); /* 21 left */
140 frame->saddr = cpu_to_le32(self->saddr);
141 frame->daddr = cpu_to_le32(self->daddr);
143 frame->ncaddr = self->caddr;
145 ret = irlap_insert_qos_negotiation_params(self, tx_skb);
147 dev_kfree_skb(tx_skb);
151 irlap_queue_xmit(self, tx_skb);
155 * Function irlap_recv_snrm_cmd (skb, info)
157 * Received SNRM (Set Normal Response Mode) command frame
160 static void irlap_recv_snrm_cmd(struct irlap_cb *self, struct sk_buff *skb,
161 struct irlap_info *info)
163 struct snrm_frame *frame;
165 if (pskb_may_pull(skb,sizeof(struct snrm_frame))) {
166 frame = (struct snrm_frame *) skb->data;
168 /* Copy the new connection address ignoring the C/R bit */
169 info->caddr = frame->ncaddr & 0xFE;
171 /* Check if the new connection address is valid */
172 if ((info->caddr == 0x00) || (info->caddr == 0xfe)) {
173 IRDA_DEBUG(3, "%s(), invalid connection address!\n",
178 /* Copy peer device address */
179 info->daddr = le32_to_cpu(frame->saddr);
180 info->saddr = le32_to_cpu(frame->daddr);
182 /* Only accept if addressed directly to us */
183 if (info->saddr != self->saddr) {
184 IRDA_DEBUG(2, "%s(), not addressed to us!\n",
188 irlap_do_event(self, RECV_SNRM_CMD, skb, info);
190 /* Signal that this SNRM frame does not contain and I-field */
191 irlap_do_event(self, RECV_SNRM_CMD, skb, NULL);
196 * Function irlap_send_ua_response_frame (qos)
198 * Send UA (Unnumbered Acknowledgement) frame
201 void irlap_send_ua_response_frame(struct irlap_cb *self, struct qos_info *qos)
203 struct sk_buff *tx_skb;
204 struct ua_frame *frame;
207 IRDA_DEBUG(2, "%s() <%ld>\n", __FUNCTION__, jiffies);
209 IRDA_ASSERT(self != NULL, return;);
210 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
213 tx_skb = dev_alloc_skb(64);
217 frame = (struct ua_frame *) skb_put(tx_skb, 10);
219 /* Build UA response */
220 frame->caddr = self->caddr;
221 frame->control = UA_RSP | PF_BIT;
223 frame->saddr = cpu_to_le32(self->saddr);
224 frame->daddr = cpu_to_le32(self->daddr);
226 /* Should we send QoS negotiation parameters? */
228 ret = irlap_insert_qos_negotiation_params(self, tx_skb);
230 dev_kfree_skb(tx_skb);
235 irlap_queue_xmit(self, tx_skb);
240 * Function irlap_send_dm_frame (void)
242 * Send disconnected mode (DM) frame
245 void irlap_send_dm_frame( struct irlap_cb *self)
247 struct sk_buff *tx_skb = NULL;
250 IRDA_ASSERT(self != NULL, return;);
251 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
253 tx_skb = dev_alloc_skb(32);
257 frame = skb_put(tx_skb, 2);
259 if (self->state == LAP_NDM)
260 frame[0] = CBROADCAST;
262 frame[0] = self->caddr;
264 frame[1] = DM_RSP | PF_BIT;
266 irlap_queue_xmit(self, tx_skb);
270 * Function irlap_send_disc_frame (void)
272 * Send disconnect (DISC) frame
275 void irlap_send_disc_frame(struct irlap_cb *self)
277 struct sk_buff *tx_skb = NULL;
280 IRDA_DEBUG(3, "%s()\n", __FUNCTION__);
282 IRDA_ASSERT(self != NULL, return;);
283 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
285 tx_skb = dev_alloc_skb(16);
289 frame = skb_put(tx_skb, 2);
291 frame[0] = self->caddr | CMD_FRAME;
292 frame[1] = DISC_CMD | PF_BIT;
294 irlap_queue_xmit(self, tx_skb);
298 * Function irlap_send_discovery_xid_frame (S, s, command)
300 * Build and transmit a XID (eXchange station IDentifier) discovery
303 void irlap_send_discovery_xid_frame(struct irlap_cb *self, int S, __u8 s,
304 __u8 command, discovery_t *discovery)
306 struct sk_buff *tx_skb = NULL;
307 struct xid_frame *frame;
308 __u32 bcast = BROADCAST;
311 IRDA_DEBUG(4, "%s(), s=%d, S=%d, command=%d\n", __FUNCTION__,
314 IRDA_ASSERT(self != NULL, return;);
315 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
316 IRDA_ASSERT(discovery != NULL, return;);
318 tx_skb = dev_alloc_skb(64);
323 frame = (struct xid_frame *) tx_skb->data;
326 frame->caddr = CBROADCAST | CMD_FRAME;
327 frame->control = XID_CMD | PF_BIT;
329 frame->caddr = CBROADCAST;
330 frame->control = XID_RSP | PF_BIT;
332 frame->ident = XID_FORMAT;
334 frame->saddr = cpu_to_le32(self->saddr);
337 frame->daddr = cpu_to_le32(bcast);
339 frame->daddr = cpu_to_le32(discovery->data.daddr);
360 frame->version = 0x00;
363 * Provide info for final slot only in commands, and for all
364 * responses. Send the second byte of the hint only if the
365 * EXTENSION bit is set in the first byte.
367 if (!command || (frame->slotnr == 0xff)) {
370 if (discovery->data.hints[0] & HINT_EXTENSION) {
371 info = skb_put(tx_skb, 2);
372 info[0] = discovery->data.hints[0];
373 info[1] = discovery->data.hints[1];
375 info = skb_put(tx_skb, 1);
376 info[0] = discovery->data.hints[0];
378 info = skb_put(tx_skb, 1);
379 info[0] = discovery->data.charset;
381 len = IRDA_MIN(discovery->name_len, skb_tailroom(tx_skb));
382 info = skb_put(tx_skb, len);
383 memcpy(info, discovery->data.info, len);
385 irlap_queue_xmit(self, tx_skb);
389 * Function irlap_recv_discovery_xid_rsp (skb, info)
391 * Received a XID discovery response
394 static void irlap_recv_discovery_xid_rsp(struct irlap_cb *self,
396 struct irlap_info *info)
398 struct xid_frame *xid;
399 discovery_t *discovery = NULL;
400 __u8 *discovery_info;
403 IRDA_DEBUG(4, "%s()\n", __FUNCTION__);
405 IRDA_ASSERT(self != NULL, return;);
406 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
408 if (!pskb_may_pull(skb, sizeof(struct xid_frame))) {
409 IRDA_ERROR("%s: frame to short!\n", __FUNCTION__);
413 xid = (struct xid_frame *) skb->data;
415 info->daddr = le32_to_cpu(xid->saddr);
416 info->saddr = le32_to_cpu(xid->daddr);
418 /* Make sure frame is addressed to us */
419 if ((info->saddr != self->saddr) && (info->saddr != BROADCAST)) {
420 IRDA_DEBUG(0, "%s(), frame is not addressed to us!\n",
425 if ((discovery = kmalloc(sizeof(discovery_t), GFP_ATOMIC)) == NULL) {
426 IRDA_WARNING("%s: kmalloc failed!\n", __FUNCTION__);
429 memset(discovery, 0, sizeof(discovery_t));
431 discovery->data.daddr = info->daddr;
432 discovery->data.saddr = self->saddr;
433 discovery->timestamp = jiffies;
435 IRDA_DEBUG(4, "%s(), daddr=%08x\n", __FUNCTION__,
436 discovery->data.daddr);
438 discovery_info = skb_pull(skb, sizeof(struct xid_frame));
440 /* Get info returned from peer */
441 discovery->data.hints[0] = discovery_info[0];
442 if (discovery_info[0] & HINT_EXTENSION) {
443 IRDA_DEBUG(4, "EXTENSION\n");
444 discovery->data.hints[1] = discovery_info[1];
445 discovery->data.charset = discovery_info[2];
446 text = (char *) &discovery_info[3];
448 discovery->data.hints[1] = 0;
449 discovery->data.charset = discovery_info[1];
450 text = (char *) &discovery_info[2];
453 * Terminate info string, should be safe since this is where the
456 skb->data[skb->len] = '\0';
457 strncpy(discovery->data.info, text, NICKNAME_MAX_LEN);
458 discovery->name_len = strlen(discovery->data.info);
460 info->discovery = discovery;
462 irlap_do_event(self, RECV_DISCOVERY_XID_RSP, skb, info);
466 * Function irlap_recv_discovery_xid_cmd (skb, info)
468 * Received a XID discovery command
471 static void irlap_recv_discovery_xid_cmd(struct irlap_cb *self,
473 struct irlap_info *info)
475 struct xid_frame *xid;
476 discovery_t *discovery = NULL;
477 __u8 *discovery_info;
480 if (!pskb_may_pull(skb, sizeof(struct xid_frame))) {
481 IRDA_ERROR("%s: frame to short!\n", __FUNCTION__);
485 xid = (struct xid_frame *) skb->data;
487 info->daddr = le32_to_cpu(xid->saddr);
488 info->saddr = le32_to_cpu(xid->daddr);
490 /* Make sure frame is addressed to us */
491 if ((info->saddr != self->saddr) && (info->saddr != BROADCAST)) {
492 IRDA_DEBUG(0, "%s(), frame is not addressed to us!\n",
497 switch (xid->flags & 0x03) {
514 info->s = xid->slotnr;
516 discovery_info = skb_pull(skb, sizeof(struct xid_frame));
519 * Check if last frame
521 if (info->s == 0xff) {
522 /* Check if things are sane at this point... */
523 if((discovery_info == NULL) ||
524 !pskb_may_pull(skb, 3)) {
525 IRDA_ERROR("%s: discovery frame to short!\n",
531 * We now have some discovery info to deliver!
533 discovery = kmalloc(sizeof(discovery_t), GFP_ATOMIC);
535 IRDA_WARNING("%s: unable to malloc!\n", __FUNCTION__);
539 discovery->data.daddr = info->daddr;
540 discovery->data.saddr = self->saddr;
541 discovery->timestamp = jiffies;
543 discovery->data.hints[0] = discovery_info[0];
544 if (discovery_info[0] & HINT_EXTENSION) {
545 discovery->data.hints[1] = discovery_info[1];
546 discovery->data.charset = discovery_info[2];
547 text = (char *) &discovery_info[3];
549 discovery->data.hints[1] = 0;
550 discovery->data.charset = discovery_info[1];
551 text = (char *) &discovery_info[2];
554 * Terminate string, should be safe since this is where the
557 skb->data[skb->len] = '\0';
558 strncpy(discovery->data.info, text, NICKNAME_MAX_LEN);
559 discovery->name_len = strlen(discovery->data.info);
561 info->discovery = discovery;
563 info->discovery = NULL;
565 irlap_do_event(self, RECV_DISCOVERY_XID_CMD, skb, info);
569 * Function irlap_send_rr_frame (self, command)
571 * Build and transmit RR (Receive Ready) frame. Notice that it is currently
572 * only possible to send RR frames with the poll bit set.
574 void irlap_send_rr_frame(struct irlap_cb *self, int command)
576 struct sk_buff *tx_skb;
579 tx_skb = dev_alloc_skb(16);
583 frame = skb_put(tx_skb, 2);
585 frame[0] = self->caddr;
586 frame[0] |= (command) ? CMD_FRAME : 0;
588 frame[1] = RR | PF_BIT | (self->vr << 5);
590 irlap_queue_xmit(self, tx_skb);
594 * Function irlap_send_rd_frame (self)
596 * Request disconnect. Used by a secondary station to request the
597 * disconnection of the link.
599 void irlap_send_rd_frame(struct irlap_cb *self)
601 struct sk_buff *tx_skb;
604 tx_skb = dev_alloc_skb(16);
608 frame = skb_put(tx_skb, 2);
610 frame[0] = self->caddr;
611 frame[1] = RD_RSP | PF_BIT;
613 irlap_queue_xmit(self, tx_skb);
617 * Function irlap_recv_rr_frame (skb, info)
619 * Received RR (Receive Ready) frame from peer station, no harm in
620 * making it inline since its called only from one single place
621 * (irlap_driver_rcv).
623 static inline void irlap_recv_rr_frame(struct irlap_cb *self,
625 struct irlap_info *info, int command)
627 info->nr = skb->data[1] >> 5;
629 /* Check if this is a command or a response frame */
631 irlap_do_event(self, RECV_RR_CMD, skb, info);
633 irlap_do_event(self, RECV_RR_RSP, skb, info);
637 * Function irlap_recv_rnr_frame (self, skb, info)
639 * Received RNR (Receive Not Ready) frame from peer station
642 static void irlap_recv_rnr_frame(struct irlap_cb *self, struct sk_buff *skb,
643 struct irlap_info *info, int command)
645 info->nr = skb->data[1] >> 5;
647 IRDA_DEBUG(4, "%s(), nr=%d, %ld\n", __FUNCTION__, info->nr, jiffies);
650 irlap_do_event(self, RECV_RNR_CMD, skb, info);
652 irlap_do_event(self, RECV_RNR_RSP, skb, info);
655 static void irlap_recv_rej_frame(struct irlap_cb *self, struct sk_buff *skb,
656 struct irlap_info *info, int command)
658 IRDA_DEBUG(0, "%s()\n", __FUNCTION__);
660 info->nr = skb->data[1] >> 5;
662 /* Check if this is a command or a response frame */
664 irlap_do_event(self, RECV_REJ_CMD, skb, info);
666 irlap_do_event(self, RECV_REJ_RSP, skb, info);
669 static void irlap_recv_srej_frame(struct irlap_cb *self, struct sk_buff *skb,
670 struct irlap_info *info, int command)
672 IRDA_DEBUG(0, "%s()\n", __FUNCTION__);
674 info->nr = skb->data[1] >> 5;
676 /* Check if this is a command or a response frame */
678 irlap_do_event(self, RECV_SREJ_CMD, skb, info);
680 irlap_do_event(self, RECV_SREJ_RSP, skb, info);
683 static void irlap_recv_disc_frame(struct irlap_cb *self, struct sk_buff *skb,
684 struct irlap_info *info, int command)
686 IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
688 /* Check if this is a command or a response frame */
690 irlap_do_event(self, RECV_DISC_CMD, skb, info);
692 irlap_do_event(self, RECV_RD_RSP, skb, info);
696 * Function irlap_recv_ua_frame (skb, frame)
698 * Received UA (Unnumbered Acknowledgement) frame
701 static inline void irlap_recv_ua_frame(struct irlap_cb *self,
703 struct irlap_info *info)
705 irlap_do_event(self, RECV_UA_RSP, skb, info);
709 * Function irlap_send_data_primary(self, skb)
711 * Send I-frames as the primary station but without the poll bit set
714 void irlap_send_data_primary(struct irlap_cb *self, struct sk_buff *skb)
716 struct sk_buff *tx_skb;
718 if (skb->data[1] == I_FRAME) {
721 * Insert frame sequence number (Vs) in control field before
722 * inserting into transmit window queue.
724 skb->data[1] = I_FRAME | (self->vs << 1);
727 * Insert frame in store, in case of retransmissions
728 * Increase skb reference count, see irlap_do_event()
731 skb_queue_tail(&self->wx_list, skb);
734 tx_skb = skb_clone(skb, GFP_ATOMIC);
735 if (tx_skb == NULL) {
739 self->vs = (self->vs + 1) % 8;
740 self->ack_required = FALSE;
743 irlap_send_i_frame( self, tx_skb, CMD_FRAME);
745 IRDA_DEBUG(4, "%s(), sending unreliable frame\n", __FUNCTION__);
746 irlap_send_ui_frame(self, skb_get(skb), self->caddr, CMD_FRAME);
751 * Function irlap_send_data_primary_poll (self, skb)
753 * Send I(nformation) frame as primary with poll bit set
755 void irlap_send_data_primary_poll(struct irlap_cb *self, struct sk_buff *skb)
757 struct sk_buff *tx_skb;
758 int transmission_time;
761 del_timer(&self->poll_timer);
763 /* Is this reliable or unreliable data? */
764 if (skb->data[1] == I_FRAME) {
767 * Insert frame sequence number (Vs) in control field before
768 * inserting into transmit window queue.
770 skb->data[1] = I_FRAME | (self->vs << 1);
773 * Insert frame in store, in case of retransmissions
774 * Increase skb reference count, see irlap_do_event()
777 skb_queue_tail(&self->wx_list, skb);
780 tx_skb = skb_clone(skb, GFP_ATOMIC);
781 if (tx_skb == NULL) {
786 * Set poll bit if necessary. We do this to the copied
787 * skb, since retransmitted need to set or clear the poll
788 * bit depending on when they are sent.
790 tx_skb->data[1] |= PF_BIT;
792 self->vs = (self->vs + 1) % 8;
793 self->ack_required = FALSE;
795 irlap_send_i_frame(self, tx_skb, CMD_FRAME);
797 IRDA_DEBUG(4, "%s(), sending unreliable frame\n", __FUNCTION__);
799 if (self->ack_required) {
800 irlap_send_ui_frame(self, skb_get(skb), self->caddr, CMD_FRAME);
801 irlap_send_rr_frame(self, CMD_FRAME);
802 self->ack_required = FALSE;
804 skb->data[1] |= PF_BIT;
805 irlap_send_ui_frame(self, skb_get(skb), self->caddr, CMD_FRAME);
809 /* How much time we took for transmission of all frames.
810 * We don't know, so let assume we used the full window. Jean II */
811 transmission_time = self->final_timeout;
813 /* Reset parameter so that we can fill next window */
814 self->window = self->window_size;
816 #ifdef CONFIG_IRDA_DYNAMIC_WINDOW
817 /* Remove what we have not used. Just do a prorata of the
818 * bytes left in window to window capacity.
819 * See max_line_capacities[][] in qos.c for details. Jean II */
820 transmission_time -= (self->final_timeout * self->bytes_left
821 / self->line_capacity);
822 IRDA_DEBUG(4, "%s() adjusting transmission_time : ft=%d, bl=%d, lc=%d -> tt=%d\n", __FUNCTION__, self->final_timeout, self->bytes_left, self->line_capacity, transmission_time);
824 /* We are allowed to transmit a maximum number of bytes again. */
825 self->bytes_left = self->line_capacity;
826 #endif /* CONFIG_IRDA_DYNAMIC_WINDOW */
829 * The network layer has a intermediate buffer between IrLAP
830 * and the IrDA driver which can contain 8 frames. So, even
831 * though IrLAP is currently sending the *last* frame of the
832 * tx-window, the driver most likely has only just started
833 * sending the *first* frame of the same tx-window.
834 * I.e. we are always at the very begining of or Tx window.
835 * Now, we are supposed to set the final timer from the end
836 * of our tx-window to let the other peer reply. So, we need
837 * to add extra time to compensate for the fact that we
838 * are really at the start of tx-window, otherwise the final timer
839 * might expire before he can answer...
842 irlap_start_final_timer(self, self->final_timeout + transmission_time);
845 * The clever amongst you might ask why we do this adjustement
846 * only here, and not in all the other cases in irlap_event.c.
847 * In all those other case, we only send a very short management
848 * frame (few bytes), so the adjustement would be lost in the
850 * The exception of course is irlap_resend_rejected_frame().
855 * Function irlap_send_data_secondary_final (self, skb)
857 * Send I(nformation) frame as secondary with final bit set
860 void irlap_send_data_secondary_final(struct irlap_cb *self,
863 struct sk_buff *tx_skb = NULL;
865 IRDA_ASSERT(self != NULL, return;);
866 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
867 IRDA_ASSERT(skb != NULL, return;);
869 /* Is this reliable or unreliable data? */
870 if (skb->data[1] == I_FRAME) {
873 * Insert frame sequence number (Vs) in control field before
874 * inserting into transmit window queue.
876 skb->data[1] = I_FRAME | (self->vs << 1);
879 * Insert frame in store, in case of retransmissions
880 * Increase skb reference count, see irlap_do_event()
883 skb_queue_tail(&self->wx_list, skb);
885 tx_skb = skb_clone(skb, GFP_ATOMIC);
886 if (tx_skb == NULL) {
890 tx_skb->data[1] |= PF_BIT;
892 self->vs = (self->vs + 1) % 8;
893 self->ack_required = FALSE;
895 irlap_send_i_frame(self, tx_skb, RSP_FRAME);
897 if (self->ack_required) {
898 irlap_send_ui_frame(self, skb_get(skb), self->caddr, RSP_FRAME);
899 irlap_send_rr_frame(self, RSP_FRAME);
900 self->ack_required = FALSE;
902 skb->data[1] |= PF_BIT;
903 irlap_send_ui_frame(self, skb_get(skb), self->caddr, RSP_FRAME);
907 self->window = self->window_size;
908 #ifdef CONFIG_IRDA_DYNAMIC_WINDOW
909 /* We are allowed to transmit a maximum number of bytes again. */
910 self->bytes_left = self->line_capacity;
911 #endif /* CONFIG_IRDA_DYNAMIC_WINDOW */
913 irlap_start_wd_timer(self, self->wd_timeout);
917 * Function irlap_send_data_secondary (self, skb)
919 * Send I(nformation) frame as secondary without final bit set
922 void irlap_send_data_secondary(struct irlap_cb *self, struct sk_buff *skb)
924 struct sk_buff *tx_skb = NULL;
926 /* Is this reliable or unreliable data? */
927 if (skb->data[1] == I_FRAME) {
930 * Insert frame sequence number (Vs) in control field before
931 * inserting into transmit window queue.
933 skb->data[1] = I_FRAME | (self->vs << 1);
936 * Insert frame in store, in case of retransmissions
937 * Increase skb reference count, see irlap_do_event()
940 skb_queue_tail(&self->wx_list, skb);
942 tx_skb = skb_clone(skb, GFP_ATOMIC);
943 if (tx_skb == NULL) {
947 self->vs = (self->vs + 1) % 8;
948 self->ack_required = FALSE;
951 irlap_send_i_frame(self, tx_skb, RSP_FRAME);
953 irlap_send_ui_frame(self, skb_get(skb), self->caddr, RSP_FRAME);
959 * Function irlap_resend_rejected_frames (nr)
961 * Resend frames which has not been acknowledged. Should be safe to
962 * traverse the list without locking it since this function will only be
963 * called from interrupt context (BH)
965 void irlap_resend_rejected_frames(struct irlap_cb *self, int command)
967 struct sk_buff *tx_skb;
971 IRDA_ASSERT(self != NULL, return;);
972 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
974 /* Initialize variables */
975 count = skb_queue_len(&self->wx_list);
977 /* Resend unacknowledged frame(s) */
978 skb = skb_peek(&self->wx_list);
979 while (skb != NULL) {
980 irlap_wait_min_turn_around(self, &self->qos_tx);
982 /* We copy the skb to be retransmitted since we will have to
983 * modify it. Cloning will confuse packet sniffers
985 /* tx_skb = skb_clone( skb, GFP_ATOMIC); */
986 tx_skb = skb_copy(skb, GFP_ATOMIC);
988 IRDA_DEBUG(0, "%s(), unable to copy\n", __FUNCTION__);
991 /* Unlink tx_skb from list */
992 tx_skb->next = tx_skb->prev = NULL;
995 /* Clear old Nr field + poll bit */
996 tx_skb->data[1] &= 0x0f;
999 * Set poll bit on the last frame retransmitted
1002 tx_skb->data[1] |= PF_BIT; /* Set p/f bit */
1004 tx_skb->data[1] &= ~PF_BIT; /* Clear p/f bit */
1006 irlap_send_i_frame(self, tx_skb, command);
1009 * If our skb is the last buffer in the list, then
1010 * we are finished, if not, move to the next sk-buffer
1012 if (skb == skb_peek_tail(&self->wx_list))
1019 * We can now fill the window with additional data frames
1021 while (!skb_queue_empty(&self->txq)) {
1023 IRDA_DEBUG(0, "%s(), sending additional frames!\n", __FUNCTION__);
1024 if (self->window > 0) {
1025 skb = skb_dequeue( &self->txq);
1026 IRDA_ASSERT(skb != NULL, return;);
1029 * If send window > 1 then send frame with pf
1032 if ((self->window > 1) &&
1033 !skb_queue_empty(&self->txq)) {
1034 irlap_send_data_primary(self, skb);
1036 irlap_send_data_primary_poll(self, skb);
1044 void irlap_resend_rejected_frame(struct irlap_cb *self, int command)
1046 struct sk_buff *tx_skb;
1047 struct sk_buff *skb;
1049 IRDA_ASSERT(self != NULL, return;);
1050 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
1052 /* Resend unacknowledged frame(s) */
1053 skb = skb_peek(&self->wx_list);
1055 irlap_wait_min_turn_around(self, &self->qos_tx);
1057 /* We copy the skb to be retransmitted since we will have to
1058 * modify it. Cloning will confuse packet sniffers
1060 /* tx_skb = skb_clone( skb, GFP_ATOMIC); */
1061 tx_skb = skb_copy(skb, GFP_ATOMIC);
1063 IRDA_DEBUG(0, "%s(), unable to copy\n", __FUNCTION__);
1066 /* Unlink tx_skb from list */
1067 tx_skb->next = tx_skb->prev = NULL;
1068 tx_skb->list = NULL;
1070 /* Clear old Nr field + poll bit */
1071 tx_skb->data[1] &= 0x0f;
1073 /* Set poll/final bit */
1074 tx_skb->data[1] |= PF_BIT; /* Set p/f bit */
1076 irlap_send_i_frame(self, tx_skb, command);
1081 * Function irlap_send_ui_frame (self, skb, command)
1083 * Contruct and transmit an Unnumbered Information (UI) frame
1086 void irlap_send_ui_frame(struct irlap_cb *self, struct sk_buff *skb,
1087 __u8 caddr, int command)
1089 IRDA_DEBUG(4, "%s()\n", __FUNCTION__);
1091 IRDA_ASSERT(self != NULL, return;);
1092 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
1093 IRDA_ASSERT(skb != NULL, return;);
1095 /* Insert connection address */
1096 skb->data[0] = caddr | ((command) ? CMD_FRAME : 0);
1098 irlap_queue_xmit(self, skb);
1102 * Function irlap_send_i_frame (skb)
1104 * Contruct and transmit Information (I) frame
1106 static void irlap_send_i_frame(struct irlap_cb *self, struct sk_buff *skb,
1109 /* Insert connection address */
1110 skb->data[0] = self->caddr;
1111 skb->data[0] |= (command) ? CMD_FRAME : 0;
1113 /* Insert next to receive (Vr) */
1114 skb->data[1] |= (self->vr << 5); /* insert nr */
1116 irlap_queue_xmit(self, skb);
1120 * Function irlap_recv_i_frame (skb, frame)
1122 * Receive and parse an I (Information) frame, no harm in making it inline
1123 * since it's called only from one single place (irlap_driver_rcv).
1125 static inline void irlap_recv_i_frame(struct irlap_cb *self,
1126 struct sk_buff *skb,
1127 struct irlap_info *info, int command)
1129 info->nr = skb->data[1] >> 5; /* Next to receive */
1130 info->pf = skb->data[1] & PF_BIT; /* Final bit */
1131 info->ns = (skb->data[1] >> 1) & 0x07; /* Next to send */
1133 /* Check if this is a command or a response frame */
1135 irlap_do_event(self, RECV_I_CMD, skb, info);
1137 irlap_do_event(self, RECV_I_RSP, skb, info);
1141 * Function irlap_recv_ui_frame (self, skb, info)
1143 * Receive and parse an Unnumbered Information (UI) frame
1146 static void irlap_recv_ui_frame(struct irlap_cb *self, struct sk_buff *skb,
1147 struct irlap_info *info)
1149 IRDA_DEBUG( 4, "%s()\n", __FUNCTION__);
1151 info->pf = skb->data[1] & PF_BIT; /* Final bit */
1153 irlap_do_event(self, RECV_UI_FRAME, skb, info);
1157 * Function irlap_recv_frmr_frame (skb, frame)
1159 * Received Frame Reject response.
1162 static void irlap_recv_frmr_frame(struct irlap_cb *self, struct sk_buff *skb,
1163 struct irlap_info *info)
1168 IRDA_DEBUG(0, "%s()\n", __FUNCTION__);
1170 IRDA_ASSERT(self != NULL, return;);
1171 IRDA_ASSERT(self->magic == LAP_MAGIC, return;);
1172 IRDA_ASSERT(skb != NULL, return;);
1173 IRDA_ASSERT(info != NULL, return;);
1175 if (!pskb_may_pull(skb, 4)) {
1176 IRDA_ERROR("%s: frame to short!\n", __FUNCTION__);
1182 info->nr = frame[2] >> 5; /* Next to receive */
1183 info->pf = frame[2] & PF_BIT; /* Final bit */
1184 info->ns = (frame[2] >> 1) & 0x07; /* Next to send */
1186 w = frame[3] & 0x01;
1187 x = frame[3] & 0x02;
1188 y = frame[3] & 0x04;
1189 z = frame[3] & 0x08;
1192 IRDA_DEBUG(0, "Rejected control field is undefined or not "
1196 IRDA_DEBUG(0, "Rejected control field was invalid because it "
1197 "contained a non permitted I field.\n");
1200 IRDA_DEBUG(0, "Received I field exceeded the maximum negotiated "
1201 "for the existing connection or exceeded the maximum "
1202 "this station supports if no connection exists.\n");
1205 IRDA_DEBUG(0, "Rejected control field control field contained an "
1206 "invalid Nr count.\n");
1208 irlap_do_event(self, RECV_FRMR_RSP, skb, info);
1212 * Function irlap_send_test_frame (self, daddr)
1214 * Send a test frame response
1217 void irlap_send_test_frame(struct irlap_cb *self, __u8 caddr, __u32 daddr,
1218 struct sk_buff *cmd)
1220 struct sk_buff *tx_skb;
1221 struct test_frame *frame;
1224 tx_skb = dev_alloc_skb(cmd->len+sizeof(struct test_frame));
1228 /* Broadcast frames must include saddr and daddr fields */
1229 if (caddr == CBROADCAST) {
1230 frame = (struct test_frame *)
1231 skb_put(tx_skb, sizeof(struct test_frame));
1233 /* Insert the swapped addresses */
1234 frame->saddr = cpu_to_le32(self->saddr);
1235 frame->daddr = cpu_to_le32(daddr);
1237 frame = (struct test_frame *) skb_put(tx_skb, LAP_ADDR_HEADER + LAP_CTRL_HEADER);
1239 frame->caddr = caddr;
1240 frame->control = TEST_RSP | PF_BIT;
1243 info = skb_put(tx_skb, cmd->len);
1244 memcpy(info, cmd->data, cmd->len);
1246 /* Return to sender */
1247 irlap_wait_min_turn_around(self, &self->qos_tx);
1248 irlap_queue_xmit(self, tx_skb);
1252 * Function irlap_recv_test_frame (self, skb)
1254 * Receive a test frame
1257 static void irlap_recv_test_frame(struct irlap_cb *self, struct sk_buff *skb,
1258 struct irlap_info *info, int command)
1260 struct test_frame *frame;
1262 IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
1264 if (!pskb_may_pull(skb, sizeof(*frame))) {
1265 IRDA_ERROR("%s: frame to short!\n", __FUNCTION__);
1268 frame = (struct test_frame *) skb->data;
1270 /* Broadcast frames must carry saddr and daddr fields */
1271 if (info->caddr == CBROADCAST) {
1272 if (skb->len < sizeof(struct test_frame)) {
1273 IRDA_DEBUG(0, "%s() test frame to short!\n",
1278 /* Read and swap addresses */
1279 info->daddr = le32_to_cpu(frame->saddr);
1280 info->saddr = le32_to_cpu(frame->daddr);
1282 /* Make sure frame is addressed to us */
1283 if ((info->saddr != self->saddr) &&
1284 (info->saddr != BROADCAST)) {
1290 irlap_do_event(self, RECV_TEST_CMD, skb, info);
1292 irlap_do_event(self, RECV_TEST_RSP, skb, info);
1296 * Function irlap_driver_rcv (skb, netdev, ptype)
1298 * Called when a frame is received. Dispatches the right receive function
1299 * for processing of the frame.
1301 * Note on skb management :
1302 * After calling the higher layers of the IrDA stack, we always
1303 * kfree() the skb, which drop the reference count (and potentially
1305 * If a higher layer of the stack want to keep the skb around (to put
1306 * in a queue or pass it to the higher layer), it will need to use
1307 * skb_get() to keep a reference on it. This is usually done at the
1308 * LMP level in irlmp.c.
1311 int irlap_driver_rcv(struct sk_buff *skb, struct net_device *dev,
1312 struct packet_type *ptype)
1314 struct irlap_info info;
1315 struct irlap_cb *self;
1319 /* FIXME: should we get our own field? */
1320 self = (struct irlap_cb *) dev->atalk_ptr;
1322 /* If the net device is down, then IrLAP is gone! */
1323 if (!self || self->magic != LAP_MAGIC) {
1328 /* We are no longer an "old" protocol, so we need to handle
1329 * share and non linear skbs. This should never happen, so
1330 * we don't need to be clever about it. Jean II */
1331 if ((skb = skb_share_check(skb, GFP_ATOMIC)) == NULL) {
1332 IRDA_ERROR("%s: can't clone shared skb!\n", __FUNCTION__);
1337 /* Check if frame is large enough for parsing */
1338 if (!pskb_may_pull(skb, 2)) {
1339 IRDA_ERROR("%s: frame to short!\n", __FUNCTION__);
1344 command = skb->data[0] & CMD_FRAME;
1345 info.caddr = skb->data[0] & CBROADCAST;
1347 info.pf = skb->data[1] & PF_BIT;
1348 info.control = skb->data[1] & ~PF_BIT; /* Mask away poll/final bit */
1350 control = info.control;
1352 /* First we check if this frame has a valid connection address */
1353 if ((info.caddr != self->caddr) && (info.caddr != CBROADCAST)) {
1354 IRDA_DEBUG(0, "%s(), wrong connection address!\n",
1359 * Optimize for the common case and check if the frame is an
1360 * I(nformation) frame. Only I-frames have bit 0 set to 0
1362 if (~control & 0x01) {
1363 irlap_recv_i_frame(self, skb, &info, command);
1367 * We now check is the frame is an S(upervisory) frame. Only
1368 * S-frames have bit 0 set to 1 and bit 1 set to 0
1370 if (~control & 0x02) {
1372 * Received S(upervisory) frame, check which frame type it is
1373 * only the first nibble is of interest
1375 switch (control & 0x0f) {
1377 irlap_recv_rr_frame(self, skb, &info, command);
1380 irlap_recv_rnr_frame(self, skb, &info, command);
1383 irlap_recv_rej_frame(self, skb, &info, command);
1386 irlap_recv_srej_frame(self, skb, &info, command);
1389 IRDA_WARNING("%s: Unknown S-frame %02x received!\n",
1390 __FUNCTION__, info.control);
1396 * This must be a C(ontrol) frame
1400 irlap_recv_discovery_xid_rsp(self, skb, &info);
1403 irlap_recv_discovery_xid_cmd(self, skb, &info);
1406 irlap_recv_snrm_cmd(self, skb, &info);
1409 irlap_do_event(self, RECV_DM_RSP, skb, &info);
1411 case DISC_CMD: /* And RD_RSP since they have the same value */
1412 irlap_recv_disc_frame(self, skb, &info, command);
1415 irlap_recv_test_frame(self, skb, &info, command);
1418 irlap_recv_ua_frame(self, skb, &info);
1421 irlap_recv_frmr_frame(self, skb, &info);
1424 irlap_recv_ui_frame(self, skb, &info);
1427 IRDA_WARNING("%s: Unknown frame %02x received!\n",
1428 __FUNCTION__, info.control);
1432 /* Always drop our reference on the skb */