Merge commit 'origin/master'
[linux-2.6] / net / irda / ircomm / ircomm_core.c
1 /*********************************************************************
2  *
3  * Filename:      ircomm_core.c
4  * Version:       1.0
5  * Description:   IrCOMM service interface
6  * Status:        Experimental.
7  * Author:        Dag Brattli <dagb@cs.uit.no>
8  * Created at:    Sun Jun  6 20:37:34 1999
9  * Modified at:   Tue Dec 21 13:26:41 1999
10  * Modified by:   Dag Brattli <dagb@cs.uit.no>
11  *
12  *     Copyright (c) 1999 Dag Brattli, All Rights Reserved.
13  *     Copyright (c) 2000-2003 Jean Tourrilhes <jt@hpl.hp.com>
14  *
15  *     This program is free software; you can redistribute it and/or
16  *     modify it under the terms of the GNU General Public License as
17  *     published by the Free Software Foundation; either version 2 of
18  *     the License, or (at your option) any later version.
19  *
20  *     This program is distributed in the hope that it will be useful,
21  *     but WITHOUT ANY WARRANTY; without even the implied warranty of
22  *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23  *     GNU General Public License for more details.
24  *
25  *     You should have received a copy of the GNU General Public License
26  *     along with this program; if not, write to the Free Software
27  *     Foundation, Inc., 59 Temple Place, Suite 330, Boston,
28  *     MA 02111-1307 USA
29  *
30  ********************************************************************/
31
32 #include <linux/module.h>
33 #include <linux/proc_fs.h>
34 #include <linux/seq_file.h>
35 #include <linux/init.h>
36
37 #include <net/irda/irda.h>
38 #include <net/irda/irmod.h>
39 #include <net/irda/irlmp.h>
40 #include <net/irda/iriap.h>
41 #include <net/irda/irttp.h>
42 #include <net/irda/irias_object.h>
43
44 #include <net/irda/ircomm_event.h>
45 #include <net/irda/ircomm_lmp.h>
46 #include <net/irda/ircomm_ttp.h>
47 #include <net/irda/ircomm_param.h>
48 #include <net/irda/ircomm_core.h>
49
50 static int __ircomm_close(struct ircomm_cb *self);
51 static void ircomm_control_indication(struct ircomm_cb *self,
52                                       struct sk_buff *skb, int clen);
53
54 #ifdef CONFIG_PROC_FS
55 extern struct proc_dir_entry *proc_irda;
56 static int ircomm_seq_open(struct inode *, struct file *);
57
58 static const struct file_operations ircomm_proc_fops = {
59         .owner          = THIS_MODULE,
60         .open           = ircomm_seq_open,
61         .read           = seq_read,
62         .llseek         = seq_lseek,
63         .release        = seq_release,
64 };
65 #endif /* CONFIG_PROC_FS */
66
67 hashbin_t *ircomm = NULL;
68
69 static int __init ircomm_init(void)
70 {
71         ircomm = hashbin_new(HB_LOCK);
72         if (ircomm == NULL) {
73                 IRDA_ERROR("%s(), can't allocate hashbin!\n", __func__);
74                 return -ENOMEM;
75         }
76
77 #ifdef CONFIG_PROC_FS
78         { struct proc_dir_entry *ent;
79         ent = proc_create("ircomm", 0, proc_irda, &ircomm_proc_fops);
80         if (!ent) {
81                 printk(KERN_ERR "ircomm_init: can't create /proc entry!\n");
82                 return -ENODEV;
83         }
84         }
85 #endif /* CONFIG_PROC_FS */
86
87         IRDA_MESSAGE("IrCOMM protocol (Dag Brattli)\n");
88
89         return 0;
90 }
91
92 static void __exit ircomm_cleanup(void)
93 {
94         IRDA_DEBUG(2, "%s()\n", __func__ );
95
96         hashbin_delete(ircomm, (FREE_FUNC) __ircomm_close);
97
98 #ifdef CONFIG_PROC_FS
99         remove_proc_entry("ircomm", proc_irda);
100 #endif /* CONFIG_PROC_FS */
101 }
102
103 /*
104  * Function ircomm_open (client_notify)
105  *
106  *    Start a new IrCOMM instance
107  *
108  */
109 struct ircomm_cb *ircomm_open(notify_t *notify, __u8 service_type, int line)
110 {
111         struct ircomm_cb *self = NULL;
112         int ret;
113
114         IRDA_DEBUG(2, "%s(), service_type=0x%02x\n", __func__ ,
115                    service_type);
116
117         IRDA_ASSERT(ircomm != NULL, return NULL;);
118
119         self = kzalloc(sizeof(struct ircomm_cb), GFP_ATOMIC);
120         if (self == NULL)
121                 return NULL;
122
123         self->notify = *notify;
124         self->magic = IRCOMM_MAGIC;
125
126         /* Check if we should use IrLMP or IrTTP */
127         if (service_type & IRCOMM_3_WIRE_RAW) {
128                 self->flow_status = FLOW_START;
129                 ret = ircomm_open_lsap(self);
130         } else
131                 ret = ircomm_open_tsap(self);
132
133         if (ret < 0) {
134                 kfree(self);
135                 return NULL;
136         }
137
138         self->service_type = service_type;
139         self->line = line;
140
141         hashbin_insert(ircomm, (irda_queue_t *) self, line, NULL);
142
143         ircomm_next_state(self, IRCOMM_IDLE);
144
145         return self;
146 }
147
148 EXPORT_SYMBOL(ircomm_open);
149
150 /*
151  * Function ircomm_close_instance (self)
152  *
153  *    Remove IrCOMM instance
154  *
155  */
156 static int __ircomm_close(struct ircomm_cb *self)
157 {
158         IRDA_DEBUG(2, "%s()\n", __func__ );
159
160         /* Disconnect link if any */
161         ircomm_do_event(self, IRCOMM_DISCONNECT_REQUEST, NULL, NULL);
162
163         /* Remove TSAP */
164         if (self->tsap) {
165                 irttp_close_tsap(self->tsap);
166                 self->tsap = NULL;
167         }
168
169         /* Remove LSAP */
170         if (self->lsap) {
171                 irlmp_close_lsap(self->lsap);
172                 self->lsap = NULL;
173         }
174         self->magic = 0;
175
176         kfree(self);
177
178         return 0;
179 }
180
181 /*
182  * Function ircomm_close (self)
183  *
184  *    Closes and removes the specified IrCOMM instance
185  *
186  */
187 int ircomm_close(struct ircomm_cb *self)
188 {
189         struct ircomm_cb *entry;
190
191         IRDA_ASSERT(self != NULL, return -EIO;);
192         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -EIO;);
193
194         IRDA_DEBUG(0, "%s()\n", __func__ );
195
196         entry = hashbin_remove(ircomm, self->line, NULL);
197
198         IRDA_ASSERT(entry == self, return -1;);
199
200         return __ircomm_close(self);
201 }
202
203 EXPORT_SYMBOL(ircomm_close);
204
205 /*
206  * Function ircomm_connect_request (self, service_type)
207  *
208  *    Impl. of this function is differ from one of the reference. This
209  *    function does discovery as well as sending connect request
210  *
211  */
212 int ircomm_connect_request(struct ircomm_cb *self, __u8 dlsap_sel,
213                            __u32 saddr, __u32 daddr, struct sk_buff *skb,
214                            __u8 service_type)
215 {
216         struct ircomm_info info;
217         int ret;
218
219         IRDA_DEBUG(2 , "%s()\n", __func__ );
220
221         IRDA_ASSERT(self != NULL, return -1;);
222         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -1;);
223
224         self->service_type= service_type;
225
226         info.dlsap_sel = dlsap_sel;
227         info.saddr = saddr;
228         info.daddr = daddr;
229
230         ret = ircomm_do_event(self, IRCOMM_CONNECT_REQUEST, skb, &info);
231
232         return ret;
233 }
234
235 EXPORT_SYMBOL(ircomm_connect_request);
236
237 /*
238  * Function ircomm_connect_indication (self, qos, skb)
239  *
240  *    Notify user layer about the incoming connection
241  *
242  */
243 void ircomm_connect_indication(struct ircomm_cb *self, struct sk_buff *skb,
244                                struct ircomm_info *info)
245 {
246         int clen = 0;
247
248         IRDA_DEBUG(2, "%s()\n", __func__ );
249
250         /* Check if the packet contains data on the control channel */
251         if (skb->len > 0)
252                 clen = skb->data[0];
253
254         /*
255          * If there are any data hiding in the control channel, we must
256          * deliver it first. The side effect is that the control channel
257          * will be removed from the skb
258          */
259         if (self->notify.connect_indication)
260                 self->notify.connect_indication(self->notify.instance, self,
261                                                 info->qos, info->max_data_size,
262                                                 info->max_header_size, skb);
263         else {
264                 IRDA_DEBUG(0, "%s(), missing handler\n", __func__ );
265         }
266 }
267
268 /*
269  * Function ircomm_connect_response (self, userdata, max_sdu_size)
270  *
271  *    User accepts connection
272  *
273  */
274 int ircomm_connect_response(struct ircomm_cb *self, struct sk_buff *userdata)
275 {
276         int ret;
277
278         IRDA_ASSERT(self != NULL, return -1;);
279         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -1;);
280
281         IRDA_DEBUG(4, "%s()\n", __func__ );
282
283         ret = ircomm_do_event(self, IRCOMM_CONNECT_RESPONSE, userdata, NULL);
284
285         return ret;
286 }
287
288 EXPORT_SYMBOL(ircomm_connect_response);
289
290 /*
291  * Function connect_confirm (self, skb)
292  *
293  *    Notify user layer that the link is now connected
294  *
295  */
296 void ircomm_connect_confirm(struct ircomm_cb *self, struct sk_buff *skb,
297                             struct ircomm_info *info)
298 {
299         IRDA_DEBUG(4, "%s()\n", __func__ );
300
301         if (self->notify.connect_confirm )
302                 self->notify.connect_confirm(self->notify.instance,
303                                              self, info->qos,
304                                              info->max_data_size,
305                                              info->max_header_size, skb);
306         else {
307                 IRDA_DEBUG(0, "%s(), missing handler\n", __func__ );
308         }
309 }
310
311 /*
312  * Function ircomm_data_request (self, userdata)
313  *
314  *    Send IrCOMM data to peer device
315  *
316  */
317 int ircomm_data_request(struct ircomm_cb *self, struct sk_buff *skb)
318 {
319         int ret;
320
321         IRDA_DEBUG(4, "%s()\n", __func__ );
322
323         IRDA_ASSERT(self != NULL, return -EFAULT;);
324         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -EFAULT;);
325         IRDA_ASSERT(skb != NULL, return -EFAULT;);
326
327         ret = ircomm_do_event(self, IRCOMM_DATA_REQUEST, skb, NULL);
328
329         return ret;
330 }
331
332 EXPORT_SYMBOL(ircomm_data_request);
333
334 /*
335  * Function ircomm_data_indication (self, skb)
336  *
337  *    Data arrived, so deliver it to user
338  *
339  */
340 void ircomm_data_indication(struct ircomm_cb *self, struct sk_buff *skb)
341 {
342         IRDA_DEBUG(4, "%s()\n", __func__ );
343
344         IRDA_ASSERT(skb->len > 0, return;);
345
346         if (self->notify.data_indication)
347                 self->notify.data_indication(self->notify.instance, self, skb);
348         else {
349                 IRDA_DEBUG(0, "%s(), missing handler\n", __func__ );
350         }
351 }
352
353 /*
354  * Function ircomm_process_data (self, skb)
355  *
356  *    Data arrived which may contain control channel data
357  *
358  */
359 void ircomm_process_data(struct ircomm_cb *self, struct sk_buff *skb)
360 {
361         int clen;
362
363         IRDA_ASSERT(skb->len > 0, return;);
364
365         clen = skb->data[0];
366
367         /*
368          * Input validation check: a stir4200/mcp2150 combinations sometimes
369          * results in frames with clen > remaining packet size. These are
370          * illegal; if we throw away just this frame then it seems to carry on
371          * fine
372          */
373         if (unlikely(skb->len < (clen + 1))) {
374                 IRDA_DEBUG(2, "%s() throwing away illegal frame\n",
375                            __func__ );
376                 return;
377         }
378
379         /*
380          * If there are any data hiding in the control channel, we must
381          * deliver it first. The side effect is that the control channel
382          * will be removed from the skb
383          */
384         if (clen > 0)
385                 ircomm_control_indication(self, skb, clen);
386
387         /* Remove control channel from data channel */
388         skb_pull(skb, clen+1);
389
390         if (skb->len)
391                 ircomm_data_indication(self, skb);
392         else {
393                 IRDA_DEBUG(4, "%s(), data was control info only!\n",
394                            __func__ );
395         }
396 }
397
398 /*
399  * Function ircomm_control_request (self, params)
400  *
401  *    Send control data to peer device
402  *
403  */
404 int ircomm_control_request(struct ircomm_cb *self, struct sk_buff *skb)
405 {
406         int ret;
407
408         IRDA_DEBUG(2, "%s()\n", __func__ );
409
410         IRDA_ASSERT(self != NULL, return -EFAULT;);
411         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -EFAULT;);
412         IRDA_ASSERT(skb != NULL, return -EFAULT;);
413
414         ret = ircomm_do_event(self, IRCOMM_CONTROL_REQUEST, skb, NULL);
415
416         return ret;
417 }
418
419 EXPORT_SYMBOL(ircomm_control_request);
420
421 /*
422  * Function ircomm_control_indication (self, skb)
423  *
424  *    Data has arrived on the control channel
425  *
426  */
427 static void ircomm_control_indication(struct ircomm_cb *self,
428                                       struct sk_buff *skb, int clen)
429 {
430         IRDA_DEBUG(2, "%s()\n", __func__ );
431
432         /* Use udata for delivering data on the control channel */
433         if (self->notify.udata_indication) {
434                 struct sk_buff *ctrl_skb;
435
436                 /* We don't own the skb, so clone it */
437                 ctrl_skb = skb_clone(skb, GFP_ATOMIC);
438                 if (!ctrl_skb)
439                         return;
440
441                 /* Remove data channel from control channel */
442                 skb_trim(ctrl_skb, clen+1);
443
444                 self->notify.udata_indication(self->notify.instance, self,
445                                               ctrl_skb);
446
447                 /* Drop reference count -
448                  * see ircomm_tty_control_indication(). */
449                 dev_kfree_skb(ctrl_skb);
450         } else {
451                 IRDA_DEBUG(0, "%s(), missing handler\n", __func__ );
452         }
453 }
454
455 /*
456  * Function ircomm_disconnect_request (self, userdata, priority)
457  *
458  *    User layer wants to disconnect the IrCOMM connection
459  *
460  */
461 int ircomm_disconnect_request(struct ircomm_cb *self, struct sk_buff *userdata)
462 {
463         struct ircomm_info info;
464         int ret;
465
466         IRDA_DEBUG(2, "%s()\n", __func__ );
467
468         IRDA_ASSERT(self != NULL, return -1;);
469         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -1;);
470
471         ret = ircomm_do_event(self, IRCOMM_DISCONNECT_REQUEST, userdata,
472                               &info);
473         return ret;
474 }
475
476 EXPORT_SYMBOL(ircomm_disconnect_request);
477
478 /*
479  * Function disconnect_indication (self, skb)
480  *
481  *    Tell user that the link has been disconnected
482  *
483  */
484 void ircomm_disconnect_indication(struct ircomm_cb *self, struct sk_buff *skb,
485                                   struct ircomm_info *info)
486 {
487         IRDA_DEBUG(2, "%s()\n", __func__ );
488
489         IRDA_ASSERT(info != NULL, return;);
490
491         if (self->notify.disconnect_indication) {
492                 self->notify.disconnect_indication(self->notify.instance, self,
493                                                    info->reason, skb);
494         } else {
495                 IRDA_DEBUG(0, "%s(), missing handler\n", __func__ );
496         }
497 }
498
499 /*
500  * Function ircomm_flow_request (self, flow)
501  *
502  *
503  *
504  */
505 void ircomm_flow_request(struct ircomm_cb *self, LOCAL_FLOW flow)
506 {
507         IRDA_DEBUG(2, "%s()\n", __func__ );
508
509         IRDA_ASSERT(self != NULL, return;);
510         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return;);
511
512         if (self->service_type == IRCOMM_3_WIRE_RAW)
513                 return;
514
515         irttp_flow_request(self->tsap, flow);
516 }
517
518 EXPORT_SYMBOL(ircomm_flow_request);
519
520 #ifdef CONFIG_PROC_FS
521 static void *ircomm_seq_start(struct seq_file *seq, loff_t *pos)
522 {
523         struct ircomm_cb *self;
524         loff_t off = 0;
525
526         spin_lock_irq(&ircomm->hb_spinlock);
527
528         for (self = (struct ircomm_cb *) hashbin_get_first(ircomm);
529              self != NULL;
530              self = (struct ircomm_cb *) hashbin_get_next(ircomm)) {
531                 if (off++ == *pos)
532                         break;
533
534         }
535         return self;
536 }
537
538 static void *ircomm_seq_next(struct seq_file *seq, void *v, loff_t *pos)
539 {
540         ++*pos;
541
542         return (void *) hashbin_get_next(ircomm);
543 }
544
545 static void ircomm_seq_stop(struct seq_file *seq, void *v)
546 {
547         spin_unlock_irq(&ircomm->hb_spinlock);
548 }
549
550 static int ircomm_seq_show(struct seq_file *seq, void *v)
551 {
552         const struct ircomm_cb *self = v;
553
554         IRDA_ASSERT(self->magic == IRCOMM_MAGIC, return -EINVAL; );
555
556         if(self->line < 0x10)
557                 seq_printf(seq, "ircomm%d", self->line);
558         else
559                 seq_printf(seq, "irlpt%d", self->line - 0x10);
560
561         seq_printf(seq,
562                    " state: %s, slsap_sel: %#02x, dlsap_sel: %#02x, mode:",
563                    ircomm_state[ self->state],
564                    self->slsap_sel, self->dlsap_sel);
565
566         if(self->service_type & IRCOMM_3_WIRE_RAW)
567                 seq_printf(seq, " 3-wire-raw");
568         if(self->service_type & IRCOMM_3_WIRE)
569                 seq_printf(seq, " 3-wire");
570         if(self->service_type & IRCOMM_9_WIRE)
571                 seq_printf(seq, " 9-wire");
572         if(self->service_type & IRCOMM_CENTRONICS)
573                 seq_printf(seq, " Centronics");
574         seq_putc(seq, '\n');
575
576         return 0;
577 }
578
579 static const struct seq_operations ircomm_seq_ops = {
580         .start  = ircomm_seq_start,
581         .next   = ircomm_seq_next,
582         .stop   = ircomm_seq_stop,
583         .show   = ircomm_seq_show,
584 };
585
586 static int ircomm_seq_open(struct inode *inode, struct file *file)
587 {
588         return seq_open(file, &ircomm_seq_ops);
589 }
590 #endif /* CONFIG_PROC_FS */
591
592 MODULE_AUTHOR("Dag Brattli <dag@brattli.net>");
593 MODULE_DESCRIPTION("IrCOMM protocol");
594 MODULE_LICENSE("GPL");
595
596 module_init(ircomm_init);
597 module_exit(ircomm_cleanup);