xref: /dragonfly/contrib/tcpdump/print-sctp.c (revision 59c07fbdf8168fa08c76c515186d561b5a92690c)
1 /* Copyright (c) 2001 NETLAB, Temple University
2  * Copyright (c) 2001 Protocol Engineering Lab, University of Delaware
3  *
4  * Jerry Heinz <gheinz@astro.temple.edu>
5  * John Fiore <jfiore@joda.cis.temple.edu>
6  * Armando L. Caro Jr. <acaro@cis.udel.edu>
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * 3. Neither the name of the University nor of the Laboratory may be used
20  *    to endorse or promote products derived from this software without
21  *    specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35 
36 /* \summary: Stream Control Transmission Protocol (SCTP) printer */
37 
38 #ifdef HAVE_CONFIG_H
39 #include <config.h>
40 #endif
41 
42 #include "netdissect-stdinc.h"
43 
44 #include "netdissect.h"
45 #include "addrtoname.h"
46 #include "extract.h"
47 #include "ip.h"
48 #include "ip6.h"
49 
50 /* Definitions from:
51  *
52  * SCTP reference Implementation Copyright (C) 1999 Cisco And Motorola
53  *
54  * Redistribution and use in source and binary forms, with or without
55  * modification, are permitted provided that the following conditions
56  * are met:
57  *
58  * 1. Redistributions of source code must retain the above copyright
59  *    notice, this list of conditions and the following disclaimer.
60  *
61  * 2. Redistributions in binary form must reproduce the above copyright
62  *    notice, this list of conditions and the following disclaimer in the
63  *    documentation and/or other materials provided with the distribution.
64  *
65  * 3. Neither the name of Cisco nor of Motorola may be used
66  *    to endorse or promote products derived from this software without
67  *    specific prior written permission.
68  *
69  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
70  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
71  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
72  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
73  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
74  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
75  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
76  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
77  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
78  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
79  * SUCH DAMAGE.
80  *
81  * This file is part of the SCTP reference Implementation
82  *
83  *
84  * Please send any bug reports or fixes you make to one of the following email
85  * addresses:
86  *
87  * rstewar1@email.mot.com
88  * kmorneau@cisco.com
89  * qxie1@email.mot.com
90  *
91  * Any bugs reported given to us we will try to fix... any fixes shared will
92  * be incorporated into the next SCTP release.
93  */
94 
95 /* The valid defines for all message
96  * types know to SCTP. 0 is reserved
97  */
98 #define SCTP_DATA             0x00
99 #define SCTP_INITIATION                 0x01
100 #define SCTP_INITIATION_ACK   0x02
101 #define SCTP_SELECTIVE_ACK    0x03
102 #define SCTP_HEARTBEAT_REQUEST          0x04
103 #define SCTP_HEARTBEAT_ACK    0x05
104 #define SCTP_ABORT_ASSOCIATION          0x06
105 #define SCTP_SHUTDOWN                   0x07
106 #define SCTP_SHUTDOWN_ACK     0x08
107 #define SCTP_OPERATION_ERR    0x09
108 #define SCTP_COOKIE_ECHO      0x0a
109 #define SCTP_COOKIE_ACK         0x0b
110 #define SCTP_ECN_ECHO                   0x0c
111 #define SCTP_ECN_CWR                    0x0d
112 #define SCTP_SHUTDOWN_COMPLETE          0x0e
113 #define SCTP_FORWARD_CUM_TSN    0xc0
114 #define SCTP_RELIABLE_CNTL      0xc1
115 #define SCTP_RELIABLE_CNTL_ACK  0xc2
116 
117 static const struct tok sctp_chunkid_str[] = {
118           { SCTP_DATA,              "DATA"              },
119           { SCTP_INITIATION,        "INIT"              },
120           { SCTP_INITIATION_ACK,    "INIT ACK"          },
121           { SCTP_SELECTIVE_ACK,     "SACK"              },
122           { SCTP_HEARTBEAT_REQUEST, "HB REQ"            },
123           { SCTP_HEARTBEAT_ACK,     "HB ACK"            },
124           { SCTP_ABORT_ASSOCIATION, "ABORT"             },
125           { SCTP_SHUTDOWN,          "SHUTDOWN"          },
126           { SCTP_SHUTDOWN_ACK,      "SHUTDOWN ACK"      },
127           { SCTP_OPERATION_ERR,     "OP ERR"            },
128           { SCTP_COOKIE_ECHO,       "COOKIE ECHO"       },
129           { SCTP_COOKIE_ACK,        "COOKIE ACK"        },
130           { SCTP_ECN_ECHO,          "ECN ECHO"          },
131           { SCTP_ECN_CWR,           "ECN CWR"           },
132           { SCTP_SHUTDOWN_COMPLETE, "SHUTDOWN COMPLETE" },
133           { SCTP_FORWARD_CUM_TSN,   "FOR CUM TSN"       },
134           { SCTP_RELIABLE_CNTL,     "REL CTRL"          },
135           { SCTP_RELIABLE_CNTL_ACK, "REL CTRL ACK"      },
136           { 0, NULL }
137 };
138 
139 /* Data Chuck Specific Flags */
140 #define SCTP_DATA_FRAG_MASK   0x03
141 #define SCTP_DATA_MIDDLE_FRAG 0x00
142 #define SCTP_DATA_LAST_FRAG   0x01
143 #define SCTP_DATA_FIRST_FRAG  0x02
144 #define SCTP_DATA_NOT_FRAG    0x03
145 #define SCTP_DATA_UNORDERED   0x04
146 
147 #define SCTP_ADDRMAX 60
148 
149 #define CHAN_HP 6704
150 #define CHAN_MP 6705
151 #define CHAN_LP 6706
152 
153 /* the sctp common header */
154 
155 struct sctpHeader{
156   nd_uint16_t source;
157   nd_uint16_t destination;
158   nd_uint32_t verificationTag;
159   nd_uint32_t adler32;
160 };
161 
162 /* various descriptor parsers */
163 
164 struct sctpChunkDesc{
165   nd_uint8_t  chunkID;
166   nd_uint8_t  chunkFlg;
167   nd_uint16_t chunkLength;
168 };
169 
170 struct sctpParamDesc{
171   nd_uint16_t paramType;
172   nd_uint16_t paramLength;
173 };
174 
175 
176 struct sctpRelChunkDesc{
177   struct sctpChunkDesc chk;
178   nd_uint32_t serialNumber;
179 };
180 
181 struct sctpVendorSpecificParam {
182   struct sctpParamDesc p;  /* type must be 0xfffe */
183   nd_uint32_t vendorId;          /* vendor ID from RFC 1700 */
184   nd_uint16_t vendorSpecificType;
185   nd_uint16_t vendorSpecificLen;
186 };
187 
188 
189 /* Structures for the control parts */
190 
191 
192 
193 /* Sctp association init request/ack */
194 
195 /* this is used for init ack, too */
196 struct sctpInitiation{
197   nd_uint32_t initTag;                            /* tag of mine */
198   nd_uint32_t rcvWindowCredit;                    /* rwnd */
199   nd_uint16_t NumPreopenStreams;        /* OS */
200   nd_uint16_t MaxInboundStreams;        /* MIS */
201   nd_uint32_t initialTSN;
202   /* optional param's follow in sctpParamDesc form */
203 };
204 
205 struct sctpV4IpAddress{
206   struct sctpParamDesc p;     /* type is set to SCTP_IPV4_PARAM_TYPE, len=10 */
207   nd_ipv4  ipAddress;
208 };
209 
210 
211 struct sctpV6IpAddress{
212   struct sctpParamDesc p;     /* type is set to SCTP_IPV6_PARAM_TYPE, len=22 */
213   nd_ipv6  ipAddress;
214 };
215 
216 struct sctpDNSName{
217   struct sctpParamDesc param;
218   nd_byte name[1];
219 };
220 
221 
222 struct sctpCookiePreserve{
223   struct sctpParamDesc p;     /* type is set to SCTP_COOKIE_PRESERVE, len=8 */
224   nd_uint32_t extraTime;
225 };
226 
227 
228 struct sctpTimeStamp{
229   nd_uint32_t ts_sec;
230   nd_uint32_t ts_usec;
231 };
232 
233 
234 /* this guy is for use when
235  * I have a initiate message gloming the
236  * things together.
237 
238  */
239 struct sctpUnifiedInit{
240   struct sctpChunkDesc uh;
241   struct sctpInitiation initm;
242 };
243 
244 struct sctpSendableInit{
245   struct sctpHeader mh;
246   struct sctpUnifiedInit msg;
247 };
248 
249 
250 /* Selective Acknowledgement
251  * has the following structure with
252  * a optional amount of trailing int's
253  * on the last part (based on the numberOfDesc
254  * field).
255  */
256 
257 struct sctpSelectiveAck{
258   nd_uint32_t highestConseqTSN;
259   nd_uint32_t updatedRwnd;
260   nd_uint16_t numberOfdesc;
261   nd_uint16_t numDupTsns;
262 };
263 
264 struct sctpSelectiveFrag{
265   nd_uint16_t fragmentStart;
266   nd_uint16_t fragmentEnd;
267 };
268 
269 
270 struct sctpUnifiedSack{
271   struct sctpChunkDesc uh;
272   struct sctpSelectiveAck sack;
273 };
274 
275 /* for the abort and shutdown ACK
276  * we must carry the init tag in the common header. Just the
277  * common header is all that is needed with a chunk descriptor.
278  */
279 struct sctpUnifiedAbort{
280   struct sctpChunkDesc uh;
281 };
282 
283 struct sctpUnifiedAbortLight{
284   struct sctpHeader mh;
285   struct sctpChunkDesc uh;
286 };
287 
288 struct sctpUnifiedAbortHeavy{
289   struct sctpHeader mh;
290   struct sctpChunkDesc uh;
291   nd_uint16_t causeCode;
292   nd_uint16_t causeLen;
293 };
294 
295 /* For the graceful shutdown we must carry
296  * the tag (in common header)  and the highest consequitive acking value
297  */
298 struct sctpShutdown {
299   nd_uint32_t TSN_Seen;
300 };
301 
302 struct sctpUnifiedShutdown{
303   struct sctpChunkDesc uh;
304   struct sctpShutdown shut;
305 };
306 
307 /* in the unified message we add the trailing
308  * stream id since it is the only message
309  * that is defined as a operation error.
310  */
311 struct sctpOpErrorCause{
312   nd_uint16_t cause;
313   nd_uint16_t causeLen;
314 };
315 
316 struct sctpUnifiedOpError{
317   struct sctpChunkDesc uh;
318   struct sctpOpErrorCause c;
319 };
320 
321 struct sctpUnifiedStreamError{
322   struct sctpHeader mh;
323   struct sctpChunkDesc uh;
324   struct sctpOpErrorCause c;
325   nd_uint16_t strmNum;
326   nd_uint16_t reserved;
327 };
328 
329 struct staleCookieMsg{
330   struct sctpHeader mh;
331   struct sctpChunkDesc uh;
332   struct sctpOpErrorCause c;
333   nd_uint32_t moretime;
334 };
335 
336 /* the following is used in all sends
337  * where nothing is needed except the
338  * chunk/type i.e. shutdownAck Abort */
339 
340 struct sctpUnifiedSingleMsg{
341   struct sctpHeader mh;
342   struct sctpChunkDesc uh;
343 };
344 
345 struct sctpDataPart{
346   nd_uint32_t TSN;
347   nd_uint16_t streamId;
348   nd_uint16_t sequence;
349   nd_uint32_t payloadtype;
350 };
351 
352 struct sctpUnifiedDatagram{
353   struct sctpChunkDesc uh;
354   struct sctpDataPart dp;
355 };
356 
357 struct sctpECN_echo{
358   struct sctpChunkDesc uh;
359   nd_uint32_t Lowest_TSN;
360 };
361 
362 
363 struct sctpCWR{
364   struct sctpChunkDesc uh;
365   nd_uint32_t TSN_reduced_at;
366 };
367 
368 static const struct tok ForCES_channels[] = {
369           { CHAN_HP, "ForCES HP" },
370           { CHAN_MP, "ForCES MP" },
371           { CHAN_LP, "ForCES LP" },
372           { 0, NULL }
373 };
374 
375 /* data chunk's payload protocol identifiers */
376 
377 #define SCTP_PPID_IUA 1
378 #define SCTP_PPID_M2UA 2
379 #define SCTP_PPID_M3UA 3
380 #define SCTP_PPID_SUA 4
381 #define SCTP_PPID_M2PA 5
382 #define SCTP_PPID_V5UA 6
383 #define SCTP_PPID_H248 7
384 #define SCTP_PPID_BICC 8
385 #define SCTP_PPID_TALI 9
386 #define SCTP_PPID_DUA 10
387 #define SCTP_PPID_ASAP 11
388 #define SCTP_PPID_ENRP 12
389 #define SCTP_PPID_H323 13
390 #define SCTP_PPID_QIPC 14
391 #define SCTP_PPID_SIMCO 15
392 #define SCTP_PPID_DDPSC 16
393 #define SCTP_PPID_DDPSSC 17
394 #define SCTP_PPID_S1AP 18
395 #define SCTP_PPID_RUA 19
396 #define SCTP_PPID_HNBAP 20
397 #define SCTP_PPID_FORCES_HP 21
398 #define SCTP_PPID_FORCES_MP 22
399 #define SCTP_PPID_FORCES_LP 23
400 #define SCTP_PPID_SBC_AP 24
401 #define SCTP_PPID_NBAP 25
402 /* 26 */
403 #define SCTP_PPID_X2AP 27
404 
405 static const struct tok PayloadProto_idents[] = {
406           { SCTP_PPID_IUA,    "ISDN Q.921" },
407           { SCTP_PPID_M2UA,   "M2UA"   },
408           { SCTP_PPID_M3UA,   "M3UA"   },
409           { SCTP_PPID_SUA,    "SUA"    },
410           { SCTP_PPID_M2PA,   "M2PA"   },
411           { SCTP_PPID_V5UA,   "V5.2"   },
412           { SCTP_PPID_H248,   "H.248"  },
413           { SCTP_PPID_BICC,   "BICC"   },
414           { SCTP_PPID_TALI,   "TALI"   },
415           { SCTP_PPID_DUA,    "DUA"    },
416           { SCTP_PPID_ASAP,   "ASAP"   },
417           { SCTP_PPID_ENRP,   "ENRP"   },
418           { SCTP_PPID_H323,   "H.323"  },
419           { SCTP_PPID_QIPC,   "Q.IPC"  },
420           { SCTP_PPID_SIMCO,  "SIMCO"  },
421           { SCTP_PPID_DDPSC,  "DDPSC"  },
422           { SCTP_PPID_DDPSSC, "DDPSSC" },
423           { SCTP_PPID_S1AP,   "S1AP"   },
424           { SCTP_PPID_RUA,    "RUA"    },
425           { SCTP_PPID_HNBAP,  "HNBAP"  },
426           { SCTP_PPID_FORCES_HP, "ForCES HP" },
427           { SCTP_PPID_FORCES_MP, "ForCES MP" },
428           { SCTP_PPID_FORCES_LP, "ForCES LP" },
429           { SCTP_PPID_SBC_AP, "SBc-AP" },
430           { SCTP_PPID_NBAP,   "NBAP"   },
431           /* 26 */
432           { SCTP_PPID_X2AP,   "X2AP"   },
433           { 0, NULL }
434 };
435 
436 
437 static int
isForCES_port(u_short Port)438 isForCES_port(u_short Port)
439 {
440           if (Port == CHAN_HP)
441                     return 1;
442           if (Port == CHAN_MP)
443                     return 1;
444           if (Port == CHAN_LP)
445                     return 1;
446 
447           return 0;
448 }
449 
450 void
sctp_print(netdissect_options * ndo,const u_char * bp,const u_char * bp2,u_int sctpPacketLength)451 sctp_print(netdissect_options *ndo,
452              const u_char *bp,        /* beginning of sctp packet */
453              const u_char *bp2,       /* beginning of enclosing */
454              u_int sctpPacketLength)  /* ip packet */
455 {
456   u_int sctpPacketLengthRemaining;
457   const struct sctpHeader *sctpPktHdr;
458   const struct ip *ip;
459   const struct ip6_hdr *ip6;
460   uint8_t chunkID;
461   u_short sourcePort, destPort;
462   u_int chunkCount;
463   const struct sctpChunkDesc *chunkDescPtr;
464   const char *sep;
465   int isforces = 0;
466 
467   ndo->ndo_protocol = "sctp";
468   if (sctpPacketLength < sizeof(struct sctpHeader))
469     {
470       ND_PRINT("truncated-sctp - %zu bytes missing!",
471                sizeof(struct sctpHeader) - sctpPacketLength);
472       return;
473     }
474   sctpPktHdr = (const struct sctpHeader*) bp;
475   ND_TCHECK_SIZE(sctpPktHdr);
476   sctpPacketLengthRemaining = sctpPacketLength;
477 
478   sourcePort = GET_BE_U_2(sctpPktHdr->source);
479   destPort = GET_BE_U_2(sctpPktHdr->destination);
480 
481   ip = (const struct ip *)bp2;
482   if (IP_V(ip) == 6)
483     ip6 = (const struct ip6_hdr *)bp2;
484   else
485     ip6 = NULL;
486 
487   if (ip6) {
488     ND_PRINT("%s.%u > %s.%u: sctp",
489       GET_IP6ADDR_STRING(ip6->ip6_src),
490       sourcePort,
491       GET_IP6ADDR_STRING(ip6->ip6_dst),
492       destPort);
493   } else {
494     ND_PRINT("%s.%u > %s.%u: sctp",
495       GET_IPADDR_STRING(ip->ip_src),
496       sourcePort,
497       GET_IPADDR_STRING(ip->ip_dst),
498       destPort);
499   }
500 
501   if (isForCES_port(sourcePort)) {
502            ND_PRINT("[%s]", tok2str(ForCES_channels, NULL, sourcePort));
503            isforces = 1;
504   }
505   if (isForCES_port(destPort)) {
506            ND_PRINT("[%s]", tok2str(ForCES_channels, NULL, destPort));
507            isforces = 1;
508   }
509 
510   bp += sizeof(struct sctpHeader);
511   sctpPacketLengthRemaining -= sizeof(struct sctpHeader);
512 
513   if (ndo->ndo_vflag >= 2)
514     sep = "\n\t";
515   else
516     sep = " (";
517   /* cycle through all chunks, printing information on each one */
518   for (chunkCount = 0, chunkDescPtr = (const struct sctpChunkDesc *)bp;
519       sctpPacketLengthRemaining != 0;
520       chunkCount++)
521     {
522       uint16_t chunkLength, chunkLengthRemaining;
523       uint16_t align;
524 
525       chunkDescPtr = (const struct sctpChunkDesc *)bp;
526       if (sctpPacketLengthRemaining < sizeof(*chunkDescPtr)) {
527           ND_PRINT("%s%u) [chunk descriptor cut off at end of packet]", sep, chunkCount+1);
528           break;
529       }
530       ND_TCHECK_SIZE(chunkDescPtr);
531       chunkLength = GET_BE_U_2(chunkDescPtr->chunkLength);
532       if (chunkLength < sizeof(*chunkDescPtr)) {
533           ND_PRINT("%s%u) [Bad chunk length %u, < size of chunk descriptor]", sep, chunkCount+1, chunkLength);
534           break;
535       }
536       chunkLengthRemaining = chunkLength;
537 
538       align = chunkLength % 4;
539       if (align != 0)
540           align = 4 - align;
541 
542       if (sctpPacketLengthRemaining < align) {
543           ND_PRINT("%s%u) [Bad chunk length %u, > remaining data in packet]", sep, chunkCount+1, chunkLength);
544           break;
545       }
546 
547       ND_TCHECK_LEN(bp, chunkLength);
548 
549       bp += sizeof(*chunkDescPtr);
550       sctpPacketLengthRemaining -= sizeof(*chunkDescPtr);
551       chunkLengthRemaining -= sizeof(*chunkDescPtr);
552 
553       ND_PRINT("%s%u) ", sep, chunkCount+1);
554       chunkID = GET_U_1(chunkDescPtr->chunkID);
555       ND_PRINT("[%s] ", tok2str(sctp_chunkid_str, "Unknown chunk type: 0x%x",
556                  chunkID));
557       switch (chunkID)
558           {
559           case SCTP_DATA :
560             {
561               const struct sctpDataPart *dataHdrPtr;
562               uint8_t chunkFlg;
563               uint32_t ppid;
564               uint16_t payload_size;
565 
566               chunkFlg = GET_U_1(chunkDescPtr->chunkFlg);
567               if ((chunkFlg & SCTP_DATA_UNORDERED) == SCTP_DATA_UNORDERED)
568                 ND_PRINT("(U)");
569 
570               if ((chunkFlg & SCTP_DATA_FIRST_FRAG) == SCTP_DATA_FIRST_FRAG)
571                 ND_PRINT("(B)");
572 
573               if ((chunkFlg & SCTP_DATA_LAST_FRAG) == SCTP_DATA_LAST_FRAG)
574                 ND_PRINT("(E)");
575 
576               if( ((chunkFlg & SCTP_DATA_UNORDERED) == SCTP_DATA_UNORDERED) ||
577                     ((chunkFlg & SCTP_DATA_FIRST_FRAG) == SCTP_DATA_FIRST_FRAG) ||
578                     ((chunkFlg & SCTP_DATA_LAST_FRAG) == SCTP_DATA_LAST_FRAG) )
579                 ND_PRINT(" ");
580 
581               if (chunkLengthRemaining < sizeof(*dataHdrPtr)) {
582                     ND_PRINT("bogus chunk length %u]", chunkLength);
583                     return;
584               }
585               dataHdrPtr=(const struct sctpDataPart*)bp;
586 
587               ppid = GET_BE_U_4(dataHdrPtr->payloadtype);
588               ND_PRINT("[TSN: %u] ", GET_BE_U_4(dataHdrPtr->TSN));
589               ND_PRINT("[SID: %u] ", GET_BE_U_2(dataHdrPtr->streamId));
590               ND_PRINT("[SSEQ %u] ", GET_BE_U_2(dataHdrPtr->sequence));
591               ND_PRINT("[PPID %s] ",
592                         tok2str(PayloadProto_idents, "0x%x", ppid));
593 
594               if (!isforces) {
595                     isforces = (ppid == SCTP_PPID_FORCES_HP) ||
596                         (ppid == SCTP_PPID_FORCES_MP) ||
597                         (ppid == SCTP_PPID_FORCES_LP);
598               }
599 
600               bp += sizeof(*dataHdrPtr);
601               sctpPacketLengthRemaining -= sizeof(*dataHdrPtr);
602               chunkLengthRemaining -= sizeof(*dataHdrPtr);
603               payload_size = chunkLengthRemaining;
604               if (payload_size == 0) {
605                     ND_PRINT("bogus chunk length %u]", chunkLength);
606                     return;
607               }
608 
609               if (isforces) {
610                     forces_print(ndo, bp, payload_size);
611                     /* ndo_protocol reassignment after forces_print() call */
612                     ndo->ndo_protocol = "sctp";
613               } else if (ndo->ndo_vflag >= 2) {   /* if verbose output is specified */
614                                                   /* at the command line */
615                     switch (ppid) {
616                     case SCTP_PPID_M3UA :
617                               m3ua_print(ndo, bp, payload_size);
618                               /* ndo_protocol reassignment after m3ua_print() call */
619                               ndo->ndo_protocol = "sctp";
620                               break;
621                     default:
622                               ND_PRINT("[Payload");
623                               if (!ndo->ndo_suppress_default_print) {
624                                         ND_PRINT(":");
625                                         ND_DEFAULTPRINT(bp, payload_size);
626                               }
627                               ND_PRINT("]");
628                               break;
629                     }
630               }
631               bp += payload_size;
632               sctpPacketLengthRemaining -= payload_size;
633               chunkLengthRemaining -= payload_size;
634               break;
635             }
636           case SCTP_INITIATION :
637             {
638               const struct sctpInitiation *init;
639 
640               if (chunkLengthRemaining < sizeof(*init)) {
641                     ND_PRINT("bogus chunk length %u]", chunkLength);
642                     return;
643               }
644               init=(const struct sctpInitiation*)bp;
645               ND_PRINT("[init tag: %u] ", GET_BE_U_4(init->initTag));
646               ND_PRINT("[rwnd: %u] ", GET_BE_U_4(init->rcvWindowCredit));
647               ND_PRINT("[OS: %u] ", GET_BE_U_2(init->NumPreopenStreams));
648               ND_PRINT("[MIS: %u] ", GET_BE_U_2(init->MaxInboundStreams));
649               ND_PRINT("[init TSN: %u] ", GET_BE_U_4(init->initialTSN));
650               bp += sizeof(*init);
651               sctpPacketLengthRemaining -= sizeof(*init);
652               chunkLengthRemaining -= sizeof(*init);
653 
654 #if 0 /* ALC you can add code for optional params here */
655               if( chunkLengthRemaining != 0 )
656                 ND_PRINT(" @@@@@ UNFINISHED @@@@@@%s\n",
657                          "Optional params present, but not printed.");
658 #endif
659               bp += chunkLengthRemaining;
660               sctpPacketLengthRemaining -= chunkLengthRemaining;
661               chunkLengthRemaining = 0;
662               break;
663             }
664           case SCTP_INITIATION_ACK :
665             {
666               const struct sctpInitiation *init;
667 
668               if (chunkLengthRemaining < sizeof(*init)) {
669                     ND_PRINT("bogus chunk length %u]", chunkLength);
670                     return;
671               }
672               init=(const struct sctpInitiation*)bp;
673               ND_PRINT("[init tag: %u] ", GET_BE_U_4(init->initTag));
674               ND_PRINT("[rwnd: %u] ", GET_BE_U_4(init->rcvWindowCredit));
675               ND_PRINT("[OS: %u] ", GET_BE_U_2(init->NumPreopenStreams));
676               ND_PRINT("[MIS: %u] ", GET_BE_U_2(init->MaxInboundStreams));
677               ND_PRINT("[init TSN: %u] ", GET_BE_U_4(init->initialTSN));
678               bp += sizeof(*init);
679               sctpPacketLengthRemaining -= sizeof(*init);
680               chunkLengthRemaining -= sizeof(*init);
681 
682 #if 0 /* ALC you can add code for optional params here */
683               if( chunkLengthRemaining != 0 )
684                 ND_PRINT(" @@@@@ UNFINISHED @@@@@@%s\n",
685                          "Optional params present, but not printed.");
686 #endif
687               bp += chunkLengthRemaining;
688               sctpPacketLengthRemaining -= chunkLengthRemaining;
689               chunkLengthRemaining = 0;
690               break;
691             }
692           case SCTP_SELECTIVE_ACK:
693             {
694               const struct sctpSelectiveAck *sack;
695               const struct sctpSelectiveFrag *frag;
696               u_int fragNo, tsnNo;
697               const u_char *dupTSN;
698 
699               if (chunkLengthRemaining < sizeof(*sack)) {
700                 ND_PRINT("bogus chunk length %u]", chunkLength);
701                 return;
702               }
703               sack=(const struct sctpSelectiveAck*)bp;
704               ND_PRINT("[cum ack %u] ", GET_BE_U_4(sack->highestConseqTSN));
705               ND_PRINT("[a_rwnd %u] ", GET_BE_U_4(sack->updatedRwnd));
706               ND_PRINT("[#gap acks %u] ", GET_BE_U_2(sack->numberOfdesc));
707               ND_PRINT("[#dup tsns %u] ", GET_BE_U_2(sack->numDupTsns));
708               bp += sizeof(*sack);
709               sctpPacketLengthRemaining -= sizeof(*sack);
710               chunkLengthRemaining -= sizeof(*sack);
711 
712 
713               /* print gaps */
714               for (fragNo=0;
715                      chunkLengthRemaining != 0 && fragNo < GET_BE_U_2(sack->numberOfdesc);
716                      bp += sizeof(*frag), sctpPacketLengthRemaining -= sizeof(*frag), chunkLengthRemaining -= sizeof(*frag), fragNo++) {
717                 if (chunkLengthRemaining < sizeof(*frag)) {
718                     ND_PRINT("bogus chunk length %u]", chunkLength);
719                     return;
720                 }
721                 frag = (const struct sctpSelectiveFrag *)bp;
722                 ND_PRINT("\n\t\t[gap ack block #%u: start = %u, end = %u] ",
723                          fragNo+1,
724                          GET_BE_U_4(sack->highestConseqTSN) + GET_BE_U_2(frag->fragmentStart),
725                          GET_BE_U_4(sack->highestConseqTSN) + GET_BE_U_2(frag->fragmentEnd));
726               }
727 
728               /* print duplicate TSNs */
729               for (tsnNo=0;
730                      chunkLengthRemaining != 0 && tsnNo<GET_BE_U_2(sack->numDupTsns);
731                      bp += 4, sctpPacketLengthRemaining -= 4, chunkLengthRemaining -= 4, tsnNo++) {
732                 if (chunkLengthRemaining < 4) {
733                     ND_PRINT("bogus chunk length %u]", chunkLength);
734                     return;
735                 }
736                 dupTSN = (const u_char *)bp;
737                 ND_PRINT("\n\t\t[dup TSN #%u: %u] ", tsnNo+1,
738                            GET_BE_U_4(dupTSN));
739               }
740               break;
741             }
742           default :
743             {
744               bp += chunkLengthRemaining;
745               sctpPacketLengthRemaining -= chunkLengthRemaining;
746               chunkLengthRemaining = 0;
747               break;
748             }
749           }
750 
751       /*
752        * Any extra stuff at the end of the chunk?
753        * XXX - report this?
754        */
755       bp += chunkLengthRemaining;
756       sctpPacketLengthRemaining -= chunkLengthRemaining;
757 
758       if (ndo->ndo_vflag < 2)
759           sep = ", (";
760 
761       if (align != 0) {
762           /*
763            * Fail if the alignment padding isn't in the captured data.
764            * Otherwise, skip it.
765            */
766           ND_TCHECK_LEN(bp, align);
767           bp += align;
768           sctpPacketLengthRemaining -= align;
769       }
770     }
771     return;
772 
773 trunc:
774     nd_print_trunc(ndo);
775 }
776