Merge /home/torvalds/linux-2.6-arm
[linux-2.6] / net / sctp / ulpevent.c
1 /* SCTP kernel reference Implementation
2  * (C) Copyright IBM Corp. 2001, 2004
3  * Copyright (c) 1999-2000 Cisco, Inc.
4  * Copyright (c) 1999-2001 Motorola, Inc.
5  * Copyright (c) 2001 Intel Corp.
6  * Copyright (c) 2001 Nokia, Inc.
7  * Copyright (c) 2001 La Monte H.P. Yarroll
8  *
9  * These functions manipulate an sctp event.   The struct ulpevent is used
10  * to carry notifications and data to the ULP (sockets).
11  * The SCTP reference implementation is free software;
12  * you can redistribute it and/or modify it under the terms of
13  * the GNU General Public License as published by
14  * the Free Software Foundation; either version 2, or (at your option)
15  * any later version.
16  *
17  * The SCTP reference implementation is distributed in the hope that it
18  * will be useful, but WITHOUT ANY WARRANTY; without even the implied
19  *                 ************************
20  * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
21  * See the GNU General Public License for more details.
22  *
23  * You should have received a copy of the GNU General Public License
24  * along with GNU CC; see the file COPYING.  If not, write to
25  * the Free Software Foundation, 59 Temple Place - Suite 330,
26  * Boston, MA 02111-1307, USA.
27  *
28  * Please send any bug reports or fixes you make to the
29  * email address(es):
30  *    lksctp developers <lksctp-developers@lists.sourceforge.net>
31  *
32  * Or submit a bug report through the following website:
33  *    http://www.sf.net/projects/lksctp
34  *
35  * Written or modified by:
36  *    Jon Grimm             <jgrimm@us.ibm.com>
37  *    La Monte H.P. Yarroll <piggy@acm.org>
38  *    Ardelle Fan           <ardelle.fan@intel.com>
39  *    Sridhar Samudrala     <sri@us.ibm.com>
40  *
41  * Any bugs reported given to us we will try to fix... any fixes shared will
42  * be incorporated into the next SCTP release.
43  */
44
45 #include <linux/types.h>
46 #include <linux/skbuff.h>
47 #include <net/sctp/structs.h>
48 #include <net/sctp/sctp.h>
49 #include <net/sctp/sm.h>
50
51 static void sctp_ulpevent_receive_data(struct sctp_ulpevent *event,
52                                        struct sctp_association *asoc);
53 static void sctp_ulpevent_release_data(struct sctp_ulpevent *event);
54
55 /* Stub skb destructor.  */
56 static void sctp_stub_rfree(struct sk_buff *skb)
57 {
58 /* WARNING:  This function is just a warning not to use the
59  * skb destructor.  If the skb is shared, we may get the destructor
60  * callback on some processor that does not own the sock_lock.  This
61  * was occuring with PACKET socket applications that were monitoring
62  * our skbs.   We can't take the sock_lock, because we can't risk
63  * recursing if we do really own the sock lock.  Instead, do all
64  * of our rwnd manipulation while we own the sock_lock outright.
65  */
66 }
67
68 /* Initialize an ULP event from an given skb.  */
69 SCTP_STATIC void sctp_ulpevent_init(struct sctp_ulpevent *event, int msg_flags)
70 {
71         memset(event, 0, sizeof(struct sctp_ulpevent));
72         event->msg_flags = msg_flags;
73 }
74
75 /* Create a new sctp_ulpevent.  */
76 SCTP_STATIC struct sctp_ulpevent *sctp_ulpevent_new(int size, int msg_flags,
77                                                     unsigned int __nocast gfp)
78 {
79         struct sctp_ulpevent *event;
80         struct sk_buff *skb;
81
82         skb = alloc_skb(size, gfp);
83         if (!skb)
84                 goto fail;
85
86         event = sctp_skb2event(skb);
87         sctp_ulpevent_init(event, msg_flags);
88
89         return event;
90
91 fail:
92         return NULL;
93 }
94
95 /* Is this a MSG_NOTIFICATION?  */
96 int sctp_ulpevent_is_notification(const struct sctp_ulpevent *event)
97 {
98         return MSG_NOTIFICATION == (event->msg_flags & MSG_NOTIFICATION);
99 }
100
101 /* Hold the association in case the msg_name needs read out of
102  * the association.
103  */
104 static inline void sctp_ulpevent_set_owner(struct sctp_ulpevent *event,
105                                            const struct sctp_association *asoc)
106 {
107         struct sk_buff *skb;
108
109         /* Cast away the const, as we are just wanting to
110          * bump the reference count.
111          */
112         sctp_association_hold((struct sctp_association *)asoc);
113         skb = sctp_event2skb(event);
114         skb->sk = asoc->base.sk;
115         event->asoc = (struct sctp_association *)asoc;
116         skb->destructor = sctp_stub_rfree;
117 }
118
119 /* A simple destructor to give up the reference to the association. */
120 static inline void sctp_ulpevent_release_owner(struct sctp_ulpevent *event)
121 {
122         sctp_association_put(event->asoc);
123 }
124
125 /* Create and initialize an SCTP_ASSOC_CHANGE event.
126  *
127  * 5.3.1.1 SCTP_ASSOC_CHANGE
128  *
129  * Communication notifications inform the ULP that an SCTP association
130  * has either begun or ended. The identifier for a new association is
131  * provided by this notification.
132  *
133  * Note: There is no field checking here.  If a field is unused it will be
134  * zero'd out.
135  */
136 struct sctp_ulpevent  *sctp_ulpevent_make_assoc_change(
137         const struct sctp_association *asoc,
138         __u16 flags, __u16 state, __u16 error, __u16 outbound,
139         __u16 inbound, unsigned int __nocast gfp)
140 {
141         struct sctp_ulpevent *event;
142         struct sctp_assoc_change *sac;
143         struct sk_buff *skb;
144
145         event = sctp_ulpevent_new(sizeof(struct sctp_assoc_change),
146                                   MSG_NOTIFICATION, gfp);
147         if (!event)
148                 goto fail;
149         skb = sctp_event2skb(event);
150         sac = (struct sctp_assoc_change *)
151                 skb_put(skb, sizeof(struct sctp_assoc_change));
152
153         /* Socket Extensions for SCTP
154          * 5.3.1.1 SCTP_ASSOC_CHANGE
155          *
156          * sac_type:
157          * It should be SCTP_ASSOC_CHANGE.
158          */
159         sac->sac_type = SCTP_ASSOC_CHANGE;
160
161         /* Socket Extensions for SCTP
162          * 5.3.1.1 SCTP_ASSOC_CHANGE
163          *
164          * sac_state: 32 bits (signed integer)
165          * This field holds one of a number of values that communicate the
166          * event that happened to the association.
167          */
168         sac->sac_state = state;
169
170         /* Socket Extensions for SCTP
171          * 5.3.1.1 SCTP_ASSOC_CHANGE
172          *
173          * sac_flags: 16 bits (unsigned integer)
174          * Currently unused.
175          */
176         sac->sac_flags = 0;
177
178         /* Socket Extensions for SCTP
179          * 5.3.1.1 SCTP_ASSOC_CHANGE
180          *
181          * sac_length: sizeof (__u32)
182          * This field is the total length of the notification data, including
183          * the notification header.
184          */
185         sac->sac_length = sizeof(struct sctp_assoc_change);
186
187         /* Socket Extensions for SCTP
188          * 5.3.1.1 SCTP_ASSOC_CHANGE
189          *
190          * sac_error:  32 bits (signed integer)
191          *
192          * If the state was reached due to a error condition (e.g.
193          * COMMUNICATION_LOST) any relevant error information is available in
194          * this field. This corresponds to the protocol error codes defined in
195          * [SCTP].
196          */
197         sac->sac_error = error;
198
199         /* Socket Extensions for SCTP
200          * 5.3.1.1 SCTP_ASSOC_CHANGE
201          *
202          * sac_outbound_streams:  16 bits (unsigned integer)
203          * sac_inbound_streams:  16 bits (unsigned integer)
204          *
205          * The maximum number of streams allowed in each direction are
206          * available in sac_outbound_streams and sac_inbound streams.
207          */
208         sac->sac_outbound_streams = outbound;
209         sac->sac_inbound_streams = inbound;
210
211         /* Socket Extensions for SCTP
212          * 5.3.1.1 SCTP_ASSOC_CHANGE
213          *
214          * sac_assoc_id: sizeof (sctp_assoc_t)
215          *
216          * The association id field, holds the identifier for the association.
217          * All notifications for a given association have the same association
218          * identifier.  For TCP style socket, this field is ignored.
219          */
220         sctp_ulpevent_set_owner(event, asoc);
221         sac->sac_assoc_id = sctp_assoc2id(asoc);
222
223         return event;
224
225 fail:
226         return NULL;
227 }
228
229 /* Create and initialize an SCTP_PEER_ADDR_CHANGE event.
230  *
231  * Socket Extensions for SCTP - draft-01
232  * 5.3.1.2 SCTP_PEER_ADDR_CHANGE
233  *
234  * When a destination address on a multi-homed peer encounters a change
235  * an interface details event is sent.
236  */
237 struct sctp_ulpevent *sctp_ulpevent_make_peer_addr_change(
238         const struct sctp_association *asoc,
239         const struct sockaddr_storage *aaddr,
240         int flags, int state, int error, unsigned int __nocast gfp)
241 {
242         struct sctp_ulpevent *event;
243         struct sctp_paddr_change  *spc;
244         struct sk_buff *skb;
245
246         event = sctp_ulpevent_new(sizeof(struct sctp_paddr_change),
247                                   MSG_NOTIFICATION, gfp);
248         if (!event)
249                 goto fail;
250
251         skb = sctp_event2skb(event);
252         spc = (struct sctp_paddr_change *)
253                 skb_put(skb, sizeof(struct sctp_paddr_change));
254
255         /* Sockets API Extensions for SCTP
256          * Section 5.3.1.2 SCTP_PEER_ADDR_CHANGE
257          *
258          * spc_type:
259          *
260          *    It should be SCTP_PEER_ADDR_CHANGE.
261          */
262         spc->spc_type = SCTP_PEER_ADDR_CHANGE;
263
264         /* Sockets API Extensions for SCTP
265          * Section 5.3.1.2 SCTP_PEER_ADDR_CHANGE
266          *
267          * spc_length: sizeof (__u32)
268          *
269          * This field is the total length of the notification data, including
270          * the notification header.
271          */
272         spc->spc_length = sizeof(struct sctp_paddr_change);
273
274         /* Sockets API Extensions for SCTP
275          * Section 5.3.1.2 SCTP_PEER_ADDR_CHANGE
276          *
277          * spc_flags: 16 bits (unsigned integer)
278          * Currently unused.
279          */
280         spc->spc_flags = 0;
281
282         /* Sockets API Extensions for SCTP
283          * Section 5.3.1.2 SCTP_PEER_ADDR_CHANGE
284          *
285          * spc_state:  32 bits (signed integer)
286          *
287          * This field holds one of a number of values that communicate the
288          * event that happened to the address.
289          */
290         spc->spc_state = state;
291
292         /* Sockets API Extensions for SCTP
293          * Section 5.3.1.2 SCTP_PEER_ADDR_CHANGE
294          *
295          * spc_error:  32 bits (signed integer)
296          *
297          * If the state was reached due to any error condition (e.g.
298          * ADDRESS_UNREACHABLE) any relevant error information is available in
299          * this field.
300          */
301         spc->spc_error = error;
302
303         /* Socket Extensions for SCTP
304          * 5.3.1.1 SCTP_ASSOC_CHANGE
305          *
306          * spc_assoc_id: sizeof (sctp_assoc_t)
307          *
308          * The association id field, holds the identifier for the association.
309          * All notifications for a given association have the same association
310          * identifier.  For TCP style socket, this field is ignored.
311          */
312         sctp_ulpevent_set_owner(event, asoc);
313         spc->spc_assoc_id = sctp_assoc2id(asoc);
314
315         /* Sockets API Extensions for SCTP
316          * Section 5.3.1.2 SCTP_PEER_ADDR_CHANGE
317          *
318          * spc_aaddr: sizeof (struct sockaddr_storage)
319          *
320          * The affected address field, holds the remote peer's address that is
321          * encountering the change of state.
322          */
323         memcpy(&spc->spc_aaddr, aaddr, sizeof(struct sockaddr_storage));
324
325         /* Map ipv4 address into v4-mapped-on-v6 address.  */
326         sctp_get_pf_specific(asoc->base.sk->sk_family)->addr_v4map(
327                                         sctp_sk(asoc->base.sk),
328                                         (union sctp_addr *)&spc->spc_aaddr);
329
330         return event;
331
332 fail:
333         return NULL;
334 }
335
336 /* Create and initialize an SCTP_REMOTE_ERROR notification.
337  *
338  * Note: This assumes that the chunk->skb->data already points to the
339  * operation error payload.
340  *
341  * Socket Extensions for SCTP - draft-01
342  * 5.3.1.3 SCTP_REMOTE_ERROR
343  *
344  * A remote peer may send an Operational Error message to its peer.
345  * This message indicates a variety of error conditions on an
346  * association. The entire error TLV as it appears on the wire is
347  * included in a SCTP_REMOTE_ERROR event.  Please refer to the SCTP
348  * specification [SCTP] and any extensions for a list of possible
349  * error formats.
350  */
351 struct sctp_ulpevent *sctp_ulpevent_make_remote_error(
352         const struct sctp_association *asoc, struct sctp_chunk *chunk,
353         __u16 flags, unsigned int __nocast gfp)
354 {
355         struct sctp_ulpevent *event;
356         struct sctp_remote_error *sre;
357         struct sk_buff *skb;
358         sctp_errhdr_t *ch;
359         __u16 cause;
360         int elen;
361
362         ch = (sctp_errhdr_t *)(chunk->skb->data);
363         cause = ch->cause;
364         elen = WORD_ROUND(ntohs(ch->length)) - sizeof(sctp_errhdr_t);
365
366         /* Pull off the ERROR header.  */
367         skb_pull(chunk->skb, sizeof(sctp_errhdr_t));
368
369         /* Copy the skb to a new skb with room for us to prepend
370          * notification with.
371          */
372         skb = skb_copy_expand(chunk->skb, sizeof(struct sctp_remote_error),
373                               0, gfp);
374
375         /* Pull off the rest of the cause TLV from the chunk.  */
376         skb_pull(chunk->skb, elen);
377         if (!skb)
378                 goto fail;
379
380         /* Embed the event fields inside the cloned skb.  */
381         event = sctp_skb2event(skb);
382         sctp_ulpevent_init(event, MSG_NOTIFICATION);
383
384         sre = (struct sctp_remote_error *)
385                 skb_push(skb, sizeof(struct sctp_remote_error));
386
387         /* Trim the buffer to the right length.  */
388         skb_trim(skb, sizeof(struct sctp_remote_error) + elen);
389
390         /* Socket Extensions for SCTP
391          * 5.3.1.3 SCTP_REMOTE_ERROR
392          *
393          * sre_type:
394          *   It should be SCTP_REMOTE_ERROR.
395          */
396         sre->sre_type = SCTP_REMOTE_ERROR;
397
398         /*
399          * Socket Extensions for SCTP
400          * 5.3.1.3 SCTP_REMOTE_ERROR
401          *
402          * sre_flags: 16 bits (unsigned integer)
403          *   Currently unused.
404          */
405         sre->sre_flags = 0;
406
407         /* Socket Extensions for SCTP
408          * 5.3.1.3 SCTP_REMOTE_ERROR
409          *
410          * sre_length: sizeof (__u32)
411          *
412          * This field is the total length of the notification data,
413          * including the notification header.
414          */
415         sre->sre_length = skb->len;
416
417         /* Socket Extensions for SCTP
418          * 5.3.1.3 SCTP_REMOTE_ERROR
419          *
420          * sre_error: 16 bits (unsigned integer)
421          * This value represents one of the Operational Error causes defined in
422          * the SCTP specification, in network byte order.
423          */
424         sre->sre_error = cause;
425
426         /* Socket Extensions for SCTP
427          * 5.3.1.3 SCTP_REMOTE_ERROR
428          *
429          * sre_assoc_id: sizeof (sctp_assoc_t)
430          *
431          * The association id field, holds the identifier for the association.
432          * All notifications for a given association have the same association
433          * identifier.  For TCP style socket, this field is ignored.
434          */
435         sctp_ulpevent_set_owner(event, asoc);
436         sre->sre_assoc_id = sctp_assoc2id(asoc);
437
438         return event;
439
440 fail:
441         return NULL;
442 }
443
444 /* Create and initialize a SCTP_SEND_FAILED notification.
445  *
446  * Socket Extensions for SCTP - draft-01
447  * 5.3.1.4 SCTP_SEND_FAILED
448  */
449 struct sctp_ulpevent *sctp_ulpevent_make_send_failed(
450         const struct sctp_association *asoc, struct sctp_chunk *chunk,
451         __u16 flags, __u32 error, unsigned int __nocast gfp)
452 {
453         struct sctp_ulpevent *event;
454         struct sctp_send_failed *ssf;
455         struct sk_buff *skb;
456
457         /* Pull off any padding. */
458         int len = ntohs(chunk->chunk_hdr->length);
459
460         /* Make skb with more room so we can prepend notification.  */
461         skb = skb_copy_expand(chunk->skb,
462                               sizeof(struct sctp_send_failed), /* headroom */
463                               0,                               /* tailroom */
464                               gfp);
465         if (!skb)
466                 goto fail;
467
468         /* Pull off the common chunk header and DATA header.  */
469         skb_pull(skb, sizeof(struct sctp_data_chunk));
470         len -= sizeof(struct sctp_data_chunk);
471
472         /* Embed the event fields inside the cloned skb.  */
473         event = sctp_skb2event(skb);
474         sctp_ulpevent_init(event, MSG_NOTIFICATION);
475
476         ssf = (struct sctp_send_failed *)
477                 skb_push(skb, sizeof(struct sctp_send_failed));
478
479         /* Socket Extensions for SCTP
480          * 5.3.1.4 SCTP_SEND_FAILED
481          *
482          * ssf_type:
483          * It should be SCTP_SEND_FAILED.
484          */
485         ssf->ssf_type = SCTP_SEND_FAILED;
486
487         /* Socket Extensions for SCTP
488          * 5.3.1.4 SCTP_SEND_FAILED
489          *
490          * ssf_flags: 16 bits (unsigned integer)
491          * The flag value will take one of the following values
492          *
493          * SCTP_DATA_UNSENT - Indicates that the data was never put on
494          *                    the wire.
495          *
496          * SCTP_DATA_SENT   - Indicates that the data was put on the wire.
497          *                    Note that this does not necessarily mean that the
498          *                    data was (or was not) successfully delivered.
499          */
500         ssf->ssf_flags = flags;
501
502         /* Socket Extensions for SCTP
503          * 5.3.1.4 SCTP_SEND_FAILED
504          *
505          * ssf_length: sizeof (__u32)
506          * This field is the total length of the notification data, including
507          * the notification header.
508          */
509         ssf->ssf_length = sizeof(struct sctp_send_failed) + len;
510         skb_trim(skb, ssf->ssf_length);
511
512         /* Socket Extensions for SCTP
513          * 5.3.1.4 SCTP_SEND_FAILED
514          *
515          * ssf_error: 16 bits (unsigned integer)
516          * This value represents the reason why the send failed, and if set,
517          * will be a SCTP protocol error code as defined in [SCTP] section
518          * 3.3.10.
519          */
520         ssf->ssf_error = error;
521
522         /* Socket Extensions for SCTP
523          * 5.3.1.4 SCTP_SEND_FAILED
524          *
525          * ssf_info: sizeof (struct sctp_sndrcvinfo)
526          * The original send information associated with the undelivered
527          * message.
528          */
529         memcpy(&ssf->ssf_info, &chunk->sinfo, sizeof(struct sctp_sndrcvinfo));
530
531         /* Per TSVWG discussion with Randy. Allow the application to
532          * ressemble a fragmented message.
533          */
534         ssf->ssf_info.sinfo_flags = chunk->chunk_hdr->flags;
535
536         /* Socket Extensions for SCTP
537          * 5.3.1.4 SCTP_SEND_FAILED
538          *
539          * ssf_assoc_id: sizeof (sctp_assoc_t)
540          * The association id field, sf_assoc_id, holds the identifier for the
541          * association.  All notifications for a given association have the
542          * same association identifier.  For TCP style socket, this field is
543          * ignored.
544          */
545         sctp_ulpevent_set_owner(event, asoc);
546         ssf->ssf_assoc_id = sctp_assoc2id(asoc);
547         return event;
548
549 fail:
550         return NULL;
551 }
552
553 /* Create and initialize a SCTP_SHUTDOWN_EVENT notification.
554  *
555  * Socket Extensions for SCTP - draft-01
556  * 5.3.1.5 SCTP_SHUTDOWN_EVENT
557  */
558 struct sctp_ulpevent *sctp_ulpevent_make_shutdown_event(
559         const struct sctp_association *asoc,
560         __u16 flags, unsigned int __nocast gfp)
561 {
562         struct sctp_ulpevent *event;
563         struct sctp_shutdown_event *sse;
564         struct sk_buff *skb;
565
566         event = sctp_ulpevent_new(sizeof(struct sctp_shutdown_event),
567                                   MSG_NOTIFICATION, gfp);
568         if (!event)
569                 goto fail;
570
571         skb = sctp_event2skb(event);
572         sse = (struct sctp_shutdown_event *)
573                 skb_put(skb, sizeof(struct sctp_shutdown_event));
574
575         /* Socket Extensions for SCTP
576          * 5.3.1.5 SCTP_SHUTDOWN_EVENT
577          *
578          * sse_type
579          * It should be SCTP_SHUTDOWN_EVENT
580          */
581         sse->sse_type = SCTP_SHUTDOWN_EVENT;
582
583         /* Socket Extensions for SCTP
584          * 5.3.1.5 SCTP_SHUTDOWN_EVENT
585          *
586          * sse_flags: 16 bits (unsigned integer)
587          * Currently unused.
588          */
589         sse->sse_flags = 0;
590
591         /* Socket Extensions for SCTP
592          * 5.3.1.5 SCTP_SHUTDOWN_EVENT
593          *
594          * sse_length: sizeof (__u32)
595          * This field is the total length of the notification data, including
596          * the notification header.
597          */
598         sse->sse_length = sizeof(struct sctp_shutdown_event);
599
600         /* Socket Extensions for SCTP
601          * 5.3.1.5 SCTP_SHUTDOWN_EVENT
602          *
603          * sse_assoc_id: sizeof (sctp_assoc_t)
604          * The association id field, holds the identifier for the association.
605          * All notifications for a given association have the same association
606          * identifier.  For TCP style socket, this field is ignored.
607          */
608         sctp_ulpevent_set_owner(event, asoc);
609         sse->sse_assoc_id = sctp_assoc2id(asoc);
610
611         return event;
612
613 fail:
614         return NULL;
615 }
616
617 /* Create and initialize a SCTP_ADAPTION_INDICATION notification.
618  *
619  * Socket Extensions for SCTP
620  * 5.3.1.6 SCTP_ADAPTION_INDICATION
621  */
622 struct sctp_ulpevent *sctp_ulpevent_make_adaption_indication(
623         const struct sctp_association *asoc, unsigned int __nocast gfp)
624 {
625         struct sctp_ulpevent *event;
626         struct sctp_adaption_event *sai;
627         struct sk_buff *skb;
628
629         event = sctp_ulpevent_new(sizeof(struct sctp_adaption_event),
630                                   MSG_NOTIFICATION, gfp);
631         if (!event)
632                 goto fail;
633
634         skb = sctp_event2skb(event);
635         sai = (struct sctp_adaption_event *)
636                 skb_put(skb, sizeof(struct sctp_adaption_event));
637
638         sai->sai_type = SCTP_ADAPTION_INDICATION;
639         sai->sai_flags = 0;
640         sai->sai_length = sizeof(struct sctp_adaption_event);
641         sai->sai_adaption_ind = asoc->peer.adaption_ind;
642         sctp_ulpevent_set_owner(event, asoc);
643         sai->sai_assoc_id = sctp_assoc2id(asoc);
644
645         return event;
646
647 fail:
648         return NULL;
649 }
650
651 /* A message has been received.  Package this message as a notification
652  * to pass it to the upper layers.  Go ahead and calculate the sndrcvinfo
653  * even if filtered out later.
654  *
655  * Socket Extensions for SCTP
656  * 5.2.2 SCTP Header Information Structure (SCTP_SNDRCV)
657  */
658 struct sctp_ulpevent *sctp_ulpevent_make_rcvmsg(struct sctp_association *asoc,
659                                                 struct sctp_chunk *chunk,
660                                                 unsigned int __nocast gfp)
661 {
662         struct sctp_ulpevent *event = NULL;
663         struct sk_buff *skb;
664         size_t padding, len;
665
666         /* Clone the original skb, sharing the data.  */
667         skb = skb_clone(chunk->skb, gfp);
668         if (!skb)
669                 goto fail;
670
671         /* First calculate the padding, so we don't inadvertently
672          * pass up the wrong length to the user.
673          *
674          * RFC 2960 - Section 3.2  Chunk Field Descriptions
675          *
676          * The total length of a chunk(including Type, Length and Value fields)
677          * MUST be a multiple of 4 bytes.  If the length of the chunk is not a
678          * multiple of 4 bytes, the sender MUST pad the chunk with all zero
679          * bytes and this padding is not included in the chunk length field.
680          * The sender should never pad with more than 3 bytes.  The receiver
681          * MUST ignore the padding bytes.
682          */
683         len = ntohs(chunk->chunk_hdr->length);
684         padding = WORD_ROUND(len) - len;
685
686         /* Fixup cloned skb with just this chunks data.  */
687         skb_trim(skb, chunk->chunk_end - padding - skb->data);
688
689         /* Embed the event fields inside the cloned skb.  */
690         event = sctp_skb2event(skb);
691
692         /* Initialize event with flags 0.  */
693         sctp_ulpevent_init(event, 0);
694
695         sctp_ulpevent_receive_data(event, asoc);
696
697         event->stream = ntohs(chunk->subh.data_hdr->stream);
698         event->ssn = ntohs(chunk->subh.data_hdr->ssn);
699         event->ppid = chunk->subh.data_hdr->ppid;
700         if (chunk->chunk_hdr->flags & SCTP_DATA_UNORDERED) {
701                 event->flags |= MSG_UNORDERED;
702                 event->cumtsn = sctp_tsnmap_get_ctsn(&asoc->peer.tsn_map);
703         }
704         event->tsn = ntohl(chunk->subh.data_hdr->tsn);
705         event->msg_flags |= chunk->chunk_hdr->flags;
706         event->iif = sctp_chunk_iif(chunk);
707
708 fail:
709         return event;
710 }
711
712 /* Create a partial delivery related event.
713  *
714  * 5.3.1.7 SCTP_PARTIAL_DELIVERY_EVENT
715  *
716  *   When a receiver is engaged in a partial delivery of a
717  *   message this notification will be used to indicate
718  *   various events.
719  */
720 struct sctp_ulpevent *sctp_ulpevent_make_pdapi(
721         const struct sctp_association *asoc, __u32 indication,
722         unsigned int __nocast gfp)
723 {
724         struct sctp_ulpevent *event;
725         struct sctp_pdapi_event *pd;
726         struct sk_buff *skb;
727
728         event = sctp_ulpevent_new(sizeof(struct sctp_pdapi_event),
729                                   MSG_NOTIFICATION, gfp);
730         if (!event)
731                 goto fail;
732
733         skb = sctp_event2skb(event);
734         pd = (struct sctp_pdapi_event *)
735                 skb_put(skb, sizeof(struct sctp_pdapi_event));
736
737         /* pdapi_type
738          *   It should be SCTP_PARTIAL_DELIVERY_EVENT
739          *
740          * pdapi_flags: 16 bits (unsigned integer)
741          *   Currently unused.
742          */
743         pd->pdapi_type = SCTP_PARTIAL_DELIVERY_EVENT;
744         pd->pdapi_flags = 0;
745
746         /* pdapi_length: 32 bits (unsigned integer)
747          *
748          * This field is the total length of the notification data, including
749          * the notification header.  It will generally be sizeof (struct
750          * sctp_pdapi_event).
751          */
752         pd->pdapi_length = sizeof(struct sctp_pdapi_event);
753
754         /*  pdapi_indication: 32 bits (unsigned integer)
755          *
756          * This field holds the indication being sent to the application.
757          */
758         pd->pdapi_indication = indication;
759
760         /*  pdapi_assoc_id: sizeof (sctp_assoc_t)
761          *
762          * The association id field, holds the identifier for the association.
763          */
764         sctp_ulpevent_set_owner(event, asoc);
765         pd->pdapi_assoc_id = sctp_assoc2id(asoc);
766
767         return event;
768 fail:
769         return NULL;
770 }
771
772 /* Return the notification type, assuming this is a notification
773  * event.
774  */
775 __u16 sctp_ulpevent_get_notification_type(const struct sctp_ulpevent *event)
776 {
777         union sctp_notification *notification;
778         struct sk_buff *skb;
779
780         skb = sctp_event2skb((struct sctp_ulpevent *)event);
781         notification = (union sctp_notification *) skb->data;
782         return notification->sn_header.sn_type;
783 }
784
785 /* Copy out the sndrcvinfo into a msghdr.  */
786 void sctp_ulpevent_read_sndrcvinfo(const struct sctp_ulpevent *event,
787                                    struct msghdr *msghdr)
788 {
789         struct sctp_sndrcvinfo sinfo;
790
791         if (sctp_ulpevent_is_notification(event))
792                 return;
793
794         /* Sockets API Extensions for SCTP
795          * Section 5.2.2 SCTP Header Information Structure (SCTP_SNDRCV)
796          *
797          * sinfo_stream: 16 bits (unsigned integer)
798          *
799          * For recvmsg() the SCTP stack places the message's stream number in
800          * this value.
801         */
802         sinfo.sinfo_stream = event->stream;
803         /* sinfo_ssn: 16 bits (unsigned integer)
804          *
805          * For recvmsg() this value contains the stream sequence number that
806          * the remote endpoint placed in the DATA chunk.  For fragmented
807          * messages this is the same number for all deliveries of the message
808          * (if more than one recvmsg() is needed to read the message).
809          */
810         sinfo.sinfo_ssn = event->ssn;
811         /* sinfo_ppid: 32 bits (unsigned integer)
812          *
813          * In recvmsg() this value is
814          * the same information that was passed by the upper layer in the peer
815          * application.  Please note that byte order issues are NOT accounted
816          * for and this information is passed opaquely by the SCTP stack from
817          * one end to the other.
818          */
819         sinfo.sinfo_ppid = event->ppid;
820         /* sinfo_flags: 16 bits (unsigned integer)
821          *
822          * This field may contain any of the following flags and is composed of
823          * a bitwise OR of these values.
824          *
825          * recvmsg() flags:
826          *
827          * MSG_UNORDERED - This flag is present when the message was sent
828          *                 non-ordered.
829          */
830         sinfo.sinfo_flags = event->flags;
831         /* sinfo_tsn: 32 bit (unsigned integer)
832          *
833          * For the receiving side, this field holds a TSN that was 
834          * assigned to one of the SCTP Data Chunks.
835          */
836         sinfo.sinfo_tsn = event->tsn;
837         /* sinfo_cumtsn: 32 bit (unsigned integer)
838          *
839          * This field will hold the current cumulative TSN as
840          * known by the underlying SCTP layer.  Note this field is
841          * ignored when sending and only valid for a receive
842          * operation when sinfo_flags are set to MSG_UNORDERED.
843          */
844         sinfo.sinfo_cumtsn = event->cumtsn;
845         /* sinfo_assoc_id: sizeof (sctp_assoc_t)
846          *
847          * The association handle field, sinfo_assoc_id, holds the identifier
848          * for the association announced in the COMMUNICATION_UP notification.
849          * All notifications for a given association have the same identifier.
850          * Ignored for one-to-one style sockets.
851          */
852         sinfo.sinfo_assoc_id = sctp_assoc2id(event->asoc);
853
854         /* These fields are not used while receiving. */
855         sinfo.sinfo_context = 0;
856         sinfo.sinfo_timetolive = 0;
857
858         put_cmsg(msghdr, IPPROTO_SCTP, SCTP_SNDRCV,
859                  sizeof(struct sctp_sndrcvinfo), (void *)&sinfo);
860 }
861
862 /* Do accounting for bytes received and hold a reference to the association
863  * for each skb.
864  */
865 static void sctp_ulpevent_receive_data(struct sctp_ulpevent *event,
866                                        struct sctp_association *asoc)
867 {
868         struct sk_buff *skb, *frag;
869
870         skb = sctp_event2skb(event);
871         /* Set the owner and charge rwnd for bytes received.  */
872         sctp_ulpevent_set_owner(event, asoc);
873         sctp_assoc_rwnd_decrease(asoc, skb_headlen(skb));
874
875         if (!skb->data_len)
876                 return;
877
878         /* Note:  Not clearing the entire event struct as this is just a
879          * fragment of the real event.  However, we still need to do rwnd
880          * accounting.
881          * In general, the skb passed from IP can have only 1 level of
882          * fragments. But we allow multiple levels of fragments. 
883          */
884         for (frag = skb_shinfo(skb)->frag_list; frag; frag = frag->next) {
885                 sctp_ulpevent_receive_data(sctp_skb2event(frag), asoc);
886         }
887 }
888
889 /* Do accounting for bytes just read by user and release the references to
890  * the association.
891  */ 
892 static void sctp_ulpevent_release_data(struct sctp_ulpevent *event)
893 {
894         struct sk_buff *skb, *frag;
895
896         /* Current stack structures assume that the rcv buffer is
897          * per socket.   For UDP style sockets this is not true as
898          * multiple associations may be on a single UDP-style socket.
899          * Use the local private area of the skb to track the owning
900          * association.
901          */
902
903         skb = sctp_event2skb(event);
904         sctp_assoc_rwnd_increase(event->asoc, skb_headlen(skb));
905
906         if (!skb->data_len)
907                 goto done;
908
909         /* Don't forget the fragments. */
910         for (frag = skb_shinfo(skb)->frag_list; frag; frag = frag->next) {
911                 /* NOTE:  skb_shinfos are recursive. Although IP returns
912                  * skb's with only 1 level of fragments, SCTP reassembly can
913                  * increase the levels.
914                  */
915                 sctp_ulpevent_release_data(sctp_skb2event(frag));
916         }
917
918 done:
919         sctp_ulpevent_release_owner(event);
920 }
921
922 /* Free a ulpevent that has an owner.  It includes releasing the reference
923  * to the owner, updating the rwnd in case of a DATA event and freeing the
924  * skb.
925  * See comments in sctp_stub_rfree().
926  */
927 void sctp_ulpevent_free(struct sctp_ulpevent *event)
928 {
929         if (sctp_ulpevent_is_notification(event))
930                 sctp_ulpevent_release_owner(event);
931         else
932                 sctp_ulpevent_release_data(event);
933
934         kfree_skb(sctp_event2skb(event));
935 }
936
937 /* Purge the skb lists holding ulpevents. */
938 void sctp_queue_purge_ulpevents(struct sk_buff_head *list)
939 {
940         struct sk_buff *skb;
941         while ((skb = skb_dequeue(list)) != NULL)
942                 sctp_ulpevent_free(sctp_skb2event(skb));
943 }