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/byteorder.h>
42 #include <net/irda/irda.h>
43 #include <net/irda/irttp.h>
44 #include <net/irda/irlmp.h>
45 #include <net/irda/irias_object.h>
46 #include <net/irda/iriap.h>
47 #include <net/irda/timer.h>
49 #include <net/irda/irlan_common.h>
50 #include <net/irda/irlan_event.h>
51 #include <net/irda/irlan_eth.h>
52 #include <net/irda/irlan_provider.h>
53 #include <net/irda/irlan_client.h>
55 #undef CONFIG_IRLAN_GRATUITOUS_ARP
57 static void irlan_client_ctrl_disconnect_indication(void *instance, void *sap,
60 static int irlan_client_ctrl_data_indication(void *instance, void *sap,
62 static void irlan_client_ctrl_connect_confirm(void *instance, void *sap,
67 static void irlan_check_response_param(struct irlan_cb *self, char *param,
68 char *value, int val_len);
69 static void irlan_client_open_ctrl_tsap(struct irlan_cb *self);
71 static void irlan_client_kick_timer_expired(void *data)
73 struct irlan_cb *self = (struct irlan_cb *) data;
75 IRDA_ASSERT(self != NULL, return;);
76 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
79 * If we are in peer mode, the client may not have got the discovery
80 * indication it needs to make progress. If the client is still in
81 * IDLE state, we must kick it to, but only if the provider is not IDLE
83 if ((self->provider.access_type == ACCESS_PEER) &&
84 (self->client.state == IRLAN_IDLE) &&
85 (self->provider.state != IRLAN_IDLE)) {
86 irlan_client_wakeup(self, self->saddr, self->daddr);
90 static void irlan_client_start_kick_timer(struct irlan_cb *self, int timeout)
92 irda_start_timer(&self->client.kick_timer, timeout, (void *) self,
93 irlan_client_kick_timer_expired);
97 * Function irlan_client_wakeup (self, saddr, daddr)
102 void irlan_client_wakeup(struct irlan_cb *self, __u32 saddr, __u32 daddr)
104 IRDA_ASSERT(self != NULL, return;);
105 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
108 * Check if we are already awake, or if we are a provider in direct
109 * mode (in that case we must leave the client idle
111 if ((self->client.state != IRLAN_IDLE) ||
112 (self->provider.access_type == ACCESS_DIRECT))
114 pr_debug("%s(), already awake!\n", __func__);
118 /* Addresses may have changed! */
122 if (self->disconnect_reason == LM_USER_REQUEST) {
123 pr_debug("%s(), still stopped by user\n", __func__);
128 irlan_client_open_ctrl_tsap(self);
129 irlan_open_data_tsap(self);
131 irlan_do_client_event(self, IRLAN_DISCOVERY_INDICATION, NULL);
133 /* Start kick timer */
134 irlan_client_start_kick_timer(self, 2*HZ);
138 * Function irlan_discovery_indication (daddr)
140 * Remote device with IrLAN server support discovered
143 void irlan_client_discovery_indication(discinfo_t *discovery,
147 struct irlan_cb *self;
150 IRDA_ASSERT(discovery != NULL, return;);
153 * I didn't check it, but I bet that IrLAN suffer from the same
154 * deficiency as IrComm and doesn't handle two instances
155 * simultaneously connecting to each other.
156 * Same workaround, drop passive discoveries.
158 if(mode == DISCOVERY_PASSIVE)
161 saddr = discovery->saddr;
162 daddr = discovery->daddr;
166 self = irlan_get_any();
168 IRDA_ASSERT(self->magic == IRLAN_MAGIC, goto out;);
170 pr_debug("%s(), Found instance (%08x)!\n", __func__ ,
173 irlan_client_wakeup(self, saddr, daddr);
175 IRDA_ASSERT_LABEL(out:)
180 * Function irlan_client_data_indication (handle, skb)
182 * This function gets the data that is received on the control channel
185 static int irlan_client_ctrl_data_indication(void *instance, void *sap,
188 struct irlan_cb *self;
192 IRDA_ASSERT(self != NULL, return -1;);
193 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return -1;);
194 IRDA_ASSERT(skb != NULL, return -1;);
196 irlan_do_client_event(self, IRLAN_DATA_INDICATION, skb);
198 /* Ready for a new command */
199 pr_debug("%s(), clearing tx_busy\n", __func__);
200 self->client.tx_busy = FALSE;
202 /* Check if we have some queued commands waiting to be sent */
203 irlan_run_ctrl_tx_queue(self);
208 static void irlan_client_ctrl_disconnect_indication(void *instance, void *sap,
210 struct sk_buff *userdata)
212 struct irlan_cb *self;
213 struct tsap_cb *tsap;
216 pr_debug("%s(), reason=%d\n", __func__ , reason);
221 IRDA_ASSERT(self != NULL, return;);
222 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
223 IRDA_ASSERT(tsap != NULL, return;);
224 IRDA_ASSERT(tsap->magic == TTP_TSAP_MAGIC, return;);
226 IRDA_ASSERT(tsap == self->client.tsap_ctrl, return;);
228 /* Remove frames queued on the control channel */
229 while ((skb = skb_dequeue(&self->client.txq)) != NULL) {
232 self->client.tx_busy = FALSE;
234 irlan_do_client_event(self, IRLAN_LMP_DISCONNECT, NULL);
238 * Function irlan_client_open_tsaps (self)
240 * Initialize callbacks and open IrTTP TSAPs
243 static void irlan_client_open_ctrl_tsap(struct irlan_cb *self)
245 struct tsap_cb *tsap;
248 IRDA_ASSERT(self != NULL, return;);
249 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
251 /* Check if already open */
252 if (self->client.tsap_ctrl)
255 irda_notify_init(¬ify);
257 /* Set up callbacks */
258 notify.data_indication = irlan_client_ctrl_data_indication;
259 notify.connect_confirm = irlan_client_ctrl_connect_confirm;
260 notify.disconnect_indication = irlan_client_ctrl_disconnect_indication;
261 notify.instance = self;
262 strlcpy(notify.name, "IrLAN ctrl (c)", sizeof(notify.name));
264 tsap = irttp_open_tsap(LSAP_ANY, DEFAULT_INITIAL_CREDIT, ¬ify);
266 pr_debug("%s(), Got no tsap!\n", __func__);
269 self->client.tsap_ctrl = tsap;
273 * Function irlan_client_connect_confirm (handle, skb)
275 * Connection to peer IrLAN laye confirmed
278 static void irlan_client_ctrl_connect_confirm(void *instance, void *sap,
279 struct qos_info *qos,
281 __u8 max_header_size,
284 struct irlan_cb *self;
288 IRDA_ASSERT(self != NULL, return;);
289 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
291 self->client.max_sdu_size = max_sdu_size;
292 self->client.max_header_size = max_header_size;
294 /* TODO: we could set the MTU depending on the max_sdu_size */
296 irlan_do_client_event(self, IRLAN_CONNECT_COMPLETE, NULL);
300 * Function print_ret_code (code)
302 * Print return code of request to peer IrLAN layer.
305 static void print_ret_code(__u8 code)
309 printk(KERN_INFO "Success\n");
312 net_warn_ratelimited("IrLAN: Insufficient resources\n");
315 net_warn_ratelimited("IrLAN: Invalid command format\n");
318 net_warn_ratelimited("IrLAN: Command not supported\n");
321 net_warn_ratelimited("IrLAN: Parameter not supported\n");
324 net_warn_ratelimited("IrLAN: Value not supported\n");
327 net_warn_ratelimited("IrLAN: Not open\n");
330 net_warn_ratelimited("IrLAN: Authentication required\n");
333 net_warn_ratelimited("IrLAN: Invalid password\n");
336 net_warn_ratelimited("IrLAN: Protocol error\n");
339 net_warn_ratelimited("IrLAN: Asynchronous status\n");
345 * Function irlan_client_parse_response (self, skb)
347 * Extract all parameters from received buffer, then feed them to
348 * check_params for parsing
350 void irlan_client_parse_response(struct irlan_cb *self, struct sk_buff *skb)
361 IRDA_ASSERT(skb != NULL, return;);
363 pr_debug("%s() skb->len=%d\n", __func__ , (int)skb->len);
365 IRDA_ASSERT(self != NULL, return;);
366 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
369 net_err_ratelimited("%s(), Got NULL skb!\n", __func__);
375 * Check return code and print it if not success
378 print_ret_code(frame[0]);
382 name = kmalloc(255, GFP_ATOMIC);
385 value = kmalloc(1016, GFP_ATOMIC);
391 /* How many parameters? */
394 pr_debug("%s(), got %d parameters\n", __func__ , count);
398 /* For all parameters */
399 for (i=0; i<count;i++) {
400 ret = irlan_extract_param(ptr, name, value, &val_len);
402 pr_debug("%s(), IrLAN, Error!\n", __func__);
406 irlan_check_response_param(self, name, value, val_len);
414 * Function irlan_check_response_param (self, param, value, val_len)
416 * Check which parameter is received and update local variables
419 static void irlan_check_response_param(struct irlan_cb *self, char *param,
420 char *value, int val_len)
422 __u16 tmp_cpu; /* Temporary value in host order */
426 pr_debug("%s(), parm=%s\n", __func__ , param);
428 IRDA_ASSERT(self != NULL, return;);
429 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
432 if (strcmp(param, "MEDIA") == 0) {
433 if (strcmp(value, "802.3") == 0)
434 self->media = MEDIA_802_3;
436 self->media = MEDIA_802_5;
439 if (strcmp(param, "FILTER_TYPE") == 0) {
440 if (strcmp(value, "DIRECTED") == 0)
441 self->client.filter_type |= IRLAN_DIRECTED;
442 else if (strcmp(value, "FUNCTIONAL") == 0)
443 self->client.filter_type |= IRLAN_FUNCTIONAL;
444 else if (strcmp(value, "GROUP") == 0)
445 self->client.filter_type |= IRLAN_GROUP;
446 else if (strcmp(value, "MAC_FRAME") == 0)
447 self->client.filter_type |= IRLAN_MAC_FRAME;
448 else if (strcmp(value, "MULTICAST") == 0)
449 self->client.filter_type |= IRLAN_MULTICAST;
450 else if (strcmp(value, "BROADCAST") == 0)
451 self->client.filter_type |= IRLAN_BROADCAST;
452 else if (strcmp(value, "IPX_SOCKET") == 0)
453 self->client.filter_type |= IRLAN_IPX_SOCKET;
456 if (strcmp(param, "ACCESS_TYPE") == 0) {
457 if (strcmp(value, "DIRECT") == 0)
458 self->client.access_type = ACCESS_DIRECT;
459 else if (strcmp(value, "PEER") == 0)
460 self->client.access_type = ACCESS_PEER;
461 else if (strcmp(value, "HOSTED") == 0)
462 self->client.access_type = ACCESS_HOSTED;
464 pr_debug("%s(), unknown access type!\n", __func__);
468 if (strcmp(param, "IRLAN_VER") == 0) {
469 pr_debug("IrLAN version %d.%d\n", (__u8)value[0],
472 self->version[0] = value[0];
473 self->version[1] = value[1];
476 /* Which remote TSAP to use for data channel */
477 if (strcmp(param, "DATA_CHAN") == 0) {
478 self->dtsap_sel_data = value[0];
479 pr_debug("Data TSAP = %02x\n", self->dtsap_sel_data);
482 if (strcmp(param, "CON_ARB") == 0) {
483 memcpy(&tmp_cpu, value, 2); /* Align value */
484 le16_to_cpus(&tmp_cpu); /* Convert to host order */
485 self->client.recv_arb_val = tmp_cpu;
486 pr_debug("%s(), receive arb val=%d\n", __func__ ,
487 self->client.recv_arb_val);
489 if (strcmp(param, "MAX_FRAME") == 0) {
490 memcpy(&tmp_cpu, value, 2); /* Align value */
491 le16_to_cpus(&tmp_cpu); /* Convert to host order */
492 self->client.max_frame = tmp_cpu;
493 pr_debug("%s(), max frame=%d\n", __func__ ,
494 self->client.max_frame);
497 /* RECONNECT_KEY, in case the link goes down! */
498 if (strcmp(param, "RECONNECT_KEY") == 0) {
499 pr_debug("Got reconnect key: ");
500 /* for (i = 0; i < val_len; i++) */
501 /* printk("%02x", value[i]); */
502 memcpy(self->client.reconnect_key, value, val_len);
503 self->client.key_len = val_len;
506 /* FILTER_ENTRY, have we got an ethernet address? */
507 if (strcmp(param, "FILTER_ENTRY") == 0) {
509 pr_debug("Ethernet address = %pM\n", bytes);
510 for (i = 0; i < 6; i++)
511 self->dev->dev_addr[i] = bytes[i];
516 * Function irlan_client_get_value_confirm (obj_id, value)
518 * Got results from remote LM-IAS
521 void irlan_client_get_value_confirm(int result, __u16 obj_id,
522 struct ias_value *value, void *priv)
524 struct irlan_cb *self;
526 IRDA_ASSERT(priv != NULL, return;);
529 IRDA_ASSERT(self->magic == IRLAN_MAGIC, return;);
531 /* We probably don't need to make any more queries */
532 iriap_close(self->client.iriap);
533 self->client.iriap = NULL;
535 /* Check if request succeeded */
536 if (result != IAS_SUCCESS) {
537 pr_debug("%s(), got NULL value!\n", __func__);
538 irlan_do_client_event(self, IRLAN_IAS_PROVIDER_NOT_AVAIL,
543 switch (value->type) {
545 self->dtsap_sel_ctrl = value->t.integer;
547 if (value->t.integer != -1) {
548 irlan_do_client_event(self, IRLAN_IAS_PROVIDER_AVAIL,
552 irias_delete_value(value);
555 pr_debug("%s(), unknown type!\n", __func__);
558 irlan_do_client_event(self, IRLAN_IAS_PROVIDER_NOT_AVAIL, NULL);