1 /*********************************************************************
3 * Filename: irlan_client.c
5 * Description: IrDA LAN Access Protocol (IrLAN) Client
6 * Status: Experimental.
7 * Author: Dag Brattli <dagb@cs.uit.no>
8 * Created at: Sun Aug 31 20:14:37 1997
9 * Modified at: Tue Dec 14 15:47:02 1999
10 * Modified by: Dag Brattli <dagb@cs.uit.no>
11 * Sources: skeleton.c by Donald Becker <becker@CESDIS.gsfc.nasa.gov>
12 * slip.c by Laurence Culhane, <loz@holmes.demon.co.uk>
13 * Fred N. van Kempen, <waltje@uwalt.nl.mugnet.org>
15 * Copyright (c) 1998-1999 Dag Brattli <dagb@cs.uit.no>,
16 * All Rights Reserved.
18 * This program is free software; you can redistribute it and/or
19 * modify it under the terms of the GNU General Public License as
20 * published by the Free Software Foundation; either version 2 of
21 * the License, or (at your option) any later version.
23 * Neither Dag Brattli nor University of Tromsø admit liability nor
24 * provide warranty for any of this software. This material is
25 * provided "AS-IS" and at no charge.
27 ********************************************************************/
29 #include <linux/kernel.h>
30 #include <linux/string.h>
31 #include <linux/slab.h>
32 #include <linux/errno.h>
33 #include <linux/init.h>
34 #include <linux/netdevice.h>
35 #include <linux/etherdevice.h>
36 #include <linux/if_arp.h>
37 #include <linux/bitops.h>
40 #include <asm/system.h>
41 #include <asm/byteorder.h>
43 #include <net/irda/irda.h>
44 #include <net/irda/irttp.h>
45 #include <net/irda/irlmp.h>
46 #include <net/irda/irias_object.h>
47 #include <net/irda/iriap.h>
48 #include <net/irda/timer.h>
50 #include <net/irda/irlan_common.h>
51 #include <net/irda/irlan_event.h>
52 #include <net/irda/irlan_eth.h>
53 #include <net/irda/irlan_provider.h>
54 #include <net/irda/irlan_client.h>
56 #undef CONFIG_IRLAN_GRATUITOUS_ARP
58 static void irlan_client_ctrl_disconnect_indication(void *instance
, void *sap
,
61 static int irlan_client_ctrl_data_indication(void *instance
, void *sap
,
63 static void irlan_client_ctrl_connect_confirm(void *instance
, void *sap
,
68 static void irlan_check_response_param(struct irlan_cb
*self
, char *param
,
69 char *value
, int val_len
);
70 static void irlan_client_open_ctrl_tsap(struct irlan_cb
*self
);
72 static void irlan_client_kick_timer_expired(void *data
)
74 struct irlan_cb
*self
= (struct irlan_cb
*) data
;
76 IRDA_DEBUG(2, "%s()\n", __func__
);
78 IRDA_ASSERT(self
!= NULL
, return;);
79 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
82 * If we are in peer mode, the client may not have got the discovery
83 * indication it needs to make progress. If the client is still in
84 * IDLE state, we must kick it to, but only if the provider is not IDLE
86 if ((self
->provider
.access_type
== ACCESS_PEER
) &&
87 (self
->client
.state
== IRLAN_IDLE
) &&
88 (self
->provider
.state
!= IRLAN_IDLE
)) {
89 irlan_client_wakeup(self
, self
->saddr
, self
->daddr
);
93 static void irlan_client_start_kick_timer(struct irlan_cb
*self
, int timeout
)
95 IRDA_DEBUG(4, "%s()\n", __func__
);
97 irda_start_timer(&self
->client
.kick_timer
, timeout
, (void *) self
,
98 irlan_client_kick_timer_expired
);
102 * Function irlan_client_wakeup (self, saddr, daddr)
107 void irlan_client_wakeup(struct irlan_cb
*self
, __u32 saddr
, __u32 daddr
)
109 IRDA_DEBUG(1, "%s()\n", __func__
);
111 IRDA_ASSERT(self
!= NULL
, return;);
112 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
115 * Check if we are already awake, or if we are a provider in direct
116 * mode (in that case we must leave the client idle
118 if ((self
->client
.state
!= IRLAN_IDLE
) ||
119 (self
->provider
.access_type
== ACCESS_DIRECT
))
121 IRDA_DEBUG(0, "%s(), already awake!\n", __func__
);
125 /* Addresses may have changed! */
129 if (self
->disconnect_reason
== LM_USER_REQUEST
) {
130 IRDA_DEBUG(0, "%s(), still stopped by user\n", __func__
);
135 irlan_client_open_ctrl_tsap(self
);
136 irlan_open_data_tsap(self
);
138 irlan_do_client_event(self
, IRLAN_DISCOVERY_INDICATION
, NULL
);
140 /* Start kick timer */
141 irlan_client_start_kick_timer(self
, 2*HZ
);
145 * Function irlan_discovery_indication (daddr)
147 * Remote device with IrLAN server support discovered
150 void irlan_client_discovery_indication(discinfo_t
*discovery
,
154 struct irlan_cb
*self
;
157 IRDA_DEBUG(1, "%s()\n", __func__
);
159 IRDA_ASSERT(discovery
!= NULL
, return;);
162 * I didn't check it, but I bet that IrLAN suffer from the same
163 * deficiency as IrComm and doesn't handle two instances
164 * simultaneously connecting to each other.
165 * Same workaround, drop passive discoveries.
167 if(mode
== DISCOVERY_PASSIVE
)
170 saddr
= discovery
->saddr
;
171 daddr
= discovery
->daddr
;
175 self
= irlan_get_any();
177 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, goto out
;);
179 IRDA_DEBUG(1, "%s(), Found instance (%08x)!\n", __func__
,
182 irlan_client_wakeup(self
, saddr
, daddr
);
184 IRDA_ASSERT_LABEL(out
:)
189 * Function irlan_client_data_indication (handle, skb)
191 * This function gets the data that is received on the control channel
194 static int irlan_client_ctrl_data_indication(void *instance
, void *sap
,
197 struct irlan_cb
*self
;
199 IRDA_DEBUG(2, "%s()\n", __func__
);
203 IRDA_ASSERT(self
!= NULL
, return -1;);
204 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return -1;);
205 IRDA_ASSERT(skb
!= NULL
, return -1;);
207 irlan_do_client_event(self
, IRLAN_DATA_INDICATION
, skb
);
209 /* Ready for a new command */
210 IRDA_DEBUG(2, "%s(), clearing tx_busy\n", __func__
);
211 self
->client
.tx_busy
= FALSE
;
213 /* Check if we have some queued commands waiting to be sent */
214 irlan_run_ctrl_tx_queue(self
);
219 static void irlan_client_ctrl_disconnect_indication(void *instance
, void *sap
,
221 struct sk_buff
*userdata
)
223 struct irlan_cb
*self
;
224 struct tsap_cb
*tsap
;
227 IRDA_DEBUG(4, "%s(), reason=%d\n", __func__
, reason
);
232 IRDA_ASSERT(self
!= NULL
, return;);
233 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
234 IRDA_ASSERT(tsap
!= NULL
, return;);
235 IRDA_ASSERT(tsap
->magic
== TTP_TSAP_MAGIC
, return;);
237 IRDA_ASSERT(tsap
== self
->client
.tsap_ctrl
, return;);
239 /* Remove frames queued on the control channel */
240 while ((skb
= skb_dequeue(&self
->client
.txq
)) != NULL
) {
243 self
->client
.tx_busy
= FALSE
;
245 irlan_do_client_event(self
, IRLAN_LMP_DISCONNECT
, NULL
);
249 * Function irlan_client_open_tsaps (self)
251 * Initialize callbacks and open IrTTP TSAPs
254 static void irlan_client_open_ctrl_tsap(struct irlan_cb
*self
)
256 struct tsap_cb
*tsap
;
259 IRDA_DEBUG(4, "%s()\n", __func__
);
261 IRDA_ASSERT(self
!= NULL
, return;);
262 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
264 /* Check if already open */
265 if (self
->client
.tsap_ctrl
)
268 irda_notify_init(¬ify
);
270 /* Set up callbacks */
271 notify
.data_indication
= irlan_client_ctrl_data_indication
;
272 notify
.connect_confirm
= irlan_client_ctrl_connect_confirm
;
273 notify
.disconnect_indication
= irlan_client_ctrl_disconnect_indication
;
274 notify
.instance
= self
;
275 strlcpy(notify
.name
, "IrLAN ctrl (c)", sizeof(notify
.name
));
277 tsap
= irttp_open_tsap(LSAP_ANY
, DEFAULT_INITIAL_CREDIT
, ¬ify
);
279 IRDA_DEBUG(2, "%s(), Got no tsap!\n", __func__
);
282 self
->client
.tsap_ctrl
= tsap
;
286 * Function irlan_client_connect_confirm (handle, skb)
288 * Connection to peer IrLAN laye confirmed
291 static void irlan_client_ctrl_connect_confirm(void *instance
, void *sap
,
292 struct qos_info
*qos
,
294 __u8 max_header_size
,
297 struct irlan_cb
*self
;
299 IRDA_DEBUG(4, "%s()\n", __func__
);
303 IRDA_ASSERT(self
!= NULL
, return;);
304 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
306 self
->client
.max_sdu_size
= max_sdu_size
;
307 self
->client
.max_header_size
= max_header_size
;
309 /* TODO: we could set the MTU depending on the max_sdu_size */
311 irlan_do_client_event(self
, IRLAN_CONNECT_COMPLETE
, NULL
);
315 * Function print_ret_code (code)
317 * Print return code of request to peer IrLAN layer.
320 static void print_ret_code(__u8 code
)
324 printk(KERN_INFO
"Success\n");
327 IRDA_WARNING("IrLAN: Insufficient resources\n");
330 IRDA_WARNING("IrLAN: Invalid command format\n");
333 IRDA_WARNING("IrLAN: Command not supported\n");
336 IRDA_WARNING("IrLAN: Parameter not supported\n");
339 IRDA_WARNING("IrLAN: Value not supported\n");
342 IRDA_WARNING("IrLAN: Not open\n");
345 IRDA_WARNING("IrLAN: Authentication required\n");
348 IRDA_WARNING("IrLAN: Invalid password\n");
351 IRDA_WARNING("IrLAN: Protocol error\n");
354 IRDA_WARNING("IrLAN: Asynchronous status\n");
360 * Function irlan_client_parse_response (self, skb)
362 * Extract all parameters from received buffer, then feed them to
363 * check_params for parsing
365 void irlan_client_parse_response(struct irlan_cb
*self
, struct sk_buff
*skb
)
376 IRDA_ASSERT(skb
!= NULL
, return;);
378 IRDA_DEBUG(4, "%s() skb->len=%d\n", __func__
, (int) skb
->len
);
380 IRDA_ASSERT(self
!= NULL
, return;);
381 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
384 IRDA_ERROR("%s(), Got NULL skb!\n", __func__
);
390 * Check return code and print it if not success
393 print_ret_code(frame
[0]);
397 name
= kmalloc(255, GFP_ATOMIC
);
400 value
= kmalloc(1016, GFP_ATOMIC
);
406 /* How many parameters? */
409 IRDA_DEBUG(4, "%s(), got %d parameters\n", __func__
, count
);
413 /* For all parameters */
414 for (i
=0; i
<count
;i
++) {
415 ret
= irlan_extract_param(ptr
, name
, value
, &val_len
);
417 IRDA_DEBUG(2, "%s(), IrLAN, Error!\n", __func__
);
421 irlan_check_response_param(self
, name
, value
, val_len
);
429 * Function irlan_check_response_param (self, param, value, val_len)
431 * Check which parameter is received and update local variables
434 static void irlan_check_response_param(struct irlan_cb
*self
, char *param
,
435 char *value
, int val_len
)
437 __u16 tmp_cpu
; /* Temporary value in host order */
441 IRDA_DEBUG(4, "%s(), parm=%s\n", __func__
, param
);
443 IRDA_ASSERT(self
!= NULL
, return;);
444 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
447 if (strcmp(param
, "MEDIA") == 0) {
448 if (strcmp(value
, "802.3") == 0)
449 self
->media
= MEDIA_802_3
;
451 self
->media
= MEDIA_802_5
;
454 if (strcmp(param
, "FILTER_TYPE") == 0) {
455 if (strcmp(value
, "DIRECTED") == 0)
456 self
->client
.filter_type
|= IRLAN_DIRECTED
;
457 else if (strcmp(value
, "FUNCTIONAL") == 0)
458 self
->client
.filter_type
|= IRLAN_FUNCTIONAL
;
459 else if (strcmp(value
, "GROUP") == 0)
460 self
->client
.filter_type
|= IRLAN_GROUP
;
461 else if (strcmp(value
, "MAC_FRAME") == 0)
462 self
->client
.filter_type
|= IRLAN_MAC_FRAME
;
463 else if (strcmp(value
, "MULTICAST") == 0)
464 self
->client
.filter_type
|= IRLAN_MULTICAST
;
465 else if (strcmp(value
, "BROADCAST") == 0)
466 self
->client
.filter_type
|= IRLAN_BROADCAST
;
467 else if (strcmp(value
, "IPX_SOCKET") == 0)
468 self
->client
.filter_type
|= IRLAN_IPX_SOCKET
;
471 if (strcmp(param
, "ACCESS_TYPE") == 0) {
472 if (strcmp(value
, "DIRECT") == 0)
473 self
->client
.access_type
= ACCESS_DIRECT
;
474 else if (strcmp(value
, "PEER") == 0)
475 self
->client
.access_type
= ACCESS_PEER
;
476 else if (strcmp(value
, "HOSTED") == 0)
477 self
->client
.access_type
= ACCESS_HOSTED
;
479 IRDA_DEBUG(2, "%s(), unknown access type!\n", __func__
);
483 if (strcmp(param
, "IRLAN_VER") == 0) {
484 IRDA_DEBUG(4, "IrLAN version %d.%d\n", (__u8
) value
[0],
487 self
->version
[0] = value
[0];
488 self
->version
[1] = value
[1];
491 /* Which remote TSAP to use for data channel */
492 if (strcmp(param
, "DATA_CHAN") == 0) {
493 self
->dtsap_sel_data
= value
[0];
494 IRDA_DEBUG(4, "Data TSAP = %02x\n", self
->dtsap_sel_data
);
497 if (strcmp(param
, "CON_ARB") == 0) {
498 memcpy(&tmp_cpu
, value
, 2); /* Align value */
499 le16_to_cpus(&tmp_cpu
); /* Convert to host order */
500 self
->client
.recv_arb_val
= tmp_cpu
;
501 IRDA_DEBUG(2, "%s(), receive arb val=%d\n", __func__
,
502 self
->client
.recv_arb_val
);
504 if (strcmp(param
, "MAX_FRAME") == 0) {
505 memcpy(&tmp_cpu
, value
, 2); /* Align value */
506 le16_to_cpus(&tmp_cpu
); /* Convert to host order */
507 self
->client
.max_frame
= tmp_cpu
;
508 IRDA_DEBUG(4, "%s(), max frame=%d\n", __func__
,
509 self
->client
.max_frame
);
512 /* RECONNECT_KEY, in case the link goes down! */
513 if (strcmp(param
, "RECONNECT_KEY") == 0) {
514 IRDA_DEBUG(4, "Got reconnect key: ");
515 /* for (i = 0; i < val_len; i++) */
516 /* printk("%02x", value[i]); */
517 memcpy(self
->client
.reconnect_key
, value
, val_len
);
518 self
->client
.key_len
= val_len
;
521 /* FILTER_ENTRY, have we got an ethernet address? */
522 if (strcmp(param
, "FILTER_ENTRY") == 0) {
524 IRDA_DEBUG(4, "Ethernet address = %pM\n", bytes
);
525 for (i
= 0; i
< 6; i
++)
526 self
->dev
->dev_addr
[i
] = bytes
[i
];
531 * Function irlan_client_get_value_confirm (obj_id, value)
533 * Got results from remote LM-IAS
536 void irlan_client_get_value_confirm(int result
, __u16 obj_id
,
537 struct ias_value
*value
, void *priv
)
539 struct irlan_cb
*self
;
541 IRDA_DEBUG(4, "%s()\n", __func__
);
543 IRDA_ASSERT(priv
!= NULL
, return;);
546 IRDA_ASSERT(self
->magic
== IRLAN_MAGIC
, return;);
548 /* We probably don't need to make any more queries */
549 iriap_close(self
->client
.iriap
);
550 self
->client
.iriap
= NULL
;
552 /* Check if request succeeded */
553 if (result
!= IAS_SUCCESS
) {
554 IRDA_DEBUG(2, "%s(), got NULL value!\n", __func__
);
555 irlan_do_client_event(self
, IRLAN_IAS_PROVIDER_NOT_AVAIL
,
560 switch (value
->type
) {
562 self
->dtsap_sel_ctrl
= value
->t
.integer
;
564 if (value
->t
.integer
!= -1) {
565 irlan_do_client_event(self
, IRLAN_IAS_PROVIDER_AVAIL
,
569 irias_delete_value(value
);
572 IRDA_DEBUG(2, "%s(), unknown type!\n", __func__
);
575 irlan_do_client_event(self
, IRLAN_IAS_PROVIDER_NOT_AVAIL
, NULL
);