1 /* $NetBSD: print-tcp.c,v 1.9 2007/07/26 18:15:12 plunky Exp $ */
4 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997
5 * The Regents of the University of California. All rights reserved.
7 * Copyright (c) 1999-2004 The tcpdump.org project
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that: (1) source code distributions
11 * retain the above copyright notice and this paragraph in its entirety, (2)
12 * distributions including binary code include the above copyright notice and
13 * this paragraph in its entirety in the documentation or other materials
14 * provided with the distribution, and (3) all advertising materials mentioning
15 * features or use of this software display the following acknowledgement:
16 * ``This product includes software developed by the University of California,
17 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
18 * the University nor the names of its contributors may be used to endorse
19 * or promote products derived from this software without specific prior
21 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
22 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
23 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
26 /* \summary: TCP printer */
30 __RCSID("$NetBSD: print-tcp.c,v 1.8 2007/07/24 11:53:48 drochner Exp $");
37 #include "netdissect-stdinc.h"
42 #include "netdissect.h"
43 #include "addrtoname.h"
55 #include <openssl/md5.h>
56 #include "signature.h"
58 static int tcp_verify_signature(netdissect_options
*ndo
,
59 const struct ip
*ip
, const struct tcphdr
*tp
,
60 const u_char
*data
, u_int length
, const u_char
*rcvsig
);
63 static void print_tcp_rst_data(netdissect_options
*, const u_char
*sp
, u_int length
);
64 static void print_tcp_fastopen_option(netdissect_options
*ndo
, const u_char
*cp
,
65 u_int datalen
, int exp
);
67 #define MAX_RST_DATA_LEN 30
77 struct tcp_seq_hash
*nxt
;
89 struct tcp_seq_hash6
{
90 struct tcp_seq_hash6
*nxt
;
96 #define TSEQ_HASHSIZE 919
98 /* These tcp optinos do not have the size octet */
99 #define ZEROLENOPT(o) ((o) == TCPOPT_EOL || (o) == TCPOPT_NOP)
101 static struct tcp_seq_hash tcp_seq_hash4
[TSEQ_HASHSIZE
];
102 static struct tcp_seq_hash6 tcp_seq_hash6
[TSEQ_HASHSIZE
];
104 static const struct tok tcp_flag_values
[] = {
116 static const struct tok tcp_option_values
[] = {
117 { TCPOPT_EOL
, "eol" },
118 { TCPOPT_NOP
, "nop" },
119 { TCPOPT_MAXSEG
, "mss" },
120 { TCPOPT_WSCALE
, "wscale" },
121 { TCPOPT_SACKOK
, "sackOK" },
122 { TCPOPT_SACK
, "sack" },
123 { TCPOPT_ECHO
, "echo" },
124 { TCPOPT_ECHOREPLY
, "echoreply" },
125 { TCPOPT_TIMESTAMP
, "TS" },
127 { TCPOPT_CCNEW
, "ccnew" },
128 { TCPOPT_CCECHO
, "" },
129 { TCPOPT_SIGNATURE
, "md5" },
130 { TCPOPT_SCPS
, "scps" },
131 { TCPOPT_UTO
, "uto" },
132 { TCPOPT_TCPAO
, "tcp-ao" },
133 { TCPOPT_MPTCP
, "mptcp" },
134 { TCPOPT_FASTOPEN
, "tfo" },
135 { TCPOPT_EXPERIMENT2
, "exp" },
140 tcp_cksum(netdissect_options
*ndo
,
142 const struct tcphdr
*tp
,
145 return nextproto4_cksum(ndo
, ip
, (const uint8_t *)tp
, len
, len
,
150 tcp6_cksum(netdissect_options
*ndo
,
151 const struct ip6_hdr
*ip6
,
152 const struct tcphdr
*tp
,
155 return nextproto6_cksum(ndo
, ip6
, (const uint8_t *)tp
, len
, len
,
160 tcp_print(netdissect_options
*ndo
,
161 const u_char
*bp
, u_int length
,
162 const u_char
*bp2
, int fragmented
)
164 const struct tcphdr
*tp
;
169 uint16_t sport
, dport
, win
, urp
;
170 uint32_t seq
, ack
, thseq
, thack
;
174 const struct ip6_hdr
*ip6
;
176 tp
= (const struct tcphdr
*)bp
;
177 ip
= (const struct ip
*)bp2
;
179 ip6
= (const struct ip6_hdr
*)bp2
;
183 if (!ND_TTEST_2(tp
->th_dport
)) {
185 ND_PRINT("%s > %s: ",
186 ip6addr_string(ndo
, ip6
->ip6_src
),
187 ip6addr_string(ndo
, ip6
->ip6_dst
));
189 ND_PRINT("%s > %s: [|tcp]",
190 ipaddr_string(ndo
, ip
->ip_src
),
191 ipaddr_string(ndo
, ip
->ip_dst
));
196 sport
= EXTRACT_BE_U_2(tp
->th_sport
);
197 dport
= EXTRACT_BE_U_2(tp
->th_dport
);
200 if (EXTRACT_U_1(ip6
->ip6_nxt
) == IPPROTO_TCP
) {
201 ND_PRINT("%s.%s > %s.%s: ",
202 ip6addr_string(ndo
, ip6
->ip6_src
),
203 tcpport_string(ndo
, sport
),
204 ip6addr_string(ndo
, ip6
->ip6_dst
),
205 tcpport_string(ndo
, dport
));
207 ND_PRINT("%s > %s: ",
208 tcpport_string(ndo
, sport
), tcpport_string(ndo
, dport
));
211 if (EXTRACT_U_1(ip
->ip_p
) == IPPROTO_TCP
) {
212 ND_PRINT("%s.%s > %s.%s: ",
213 ipaddr_string(ndo
, ip
->ip_src
),
214 tcpport_string(ndo
, sport
),
215 ipaddr_string(ndo
, ip
->ip_dst
),
216 tcpport_string(ndo
, dport
));
218 ND_PRINT("%s > %s: ",
219 tcpport_string(ndo
, sport
), tcpport_string(ndo
, dport
));
225 hlen
= TH_OFF(tp
) * 4;
227 if (hlen
< sizeof(*tp
)) {
228 ND_PRINT(" tcp %u [bad hdr length %u - too short, < %lu]",
229 length
- hlen
, hlen
, (unsigned long)sizeof(*tp
));
233 seq
= EXTRACT_BE_U_4(tp
->th_seq
);
234 ack
= EXTRACT_BE_U_4(tp
->th_ack
);
235 win
= EXTRACT_BE_U_2(tp
->th_win
);
236 urp
= EXTRACT_BE_U_2(tp
->th_urp
);
238 if (ndo
->ndo_qflag
) {
239 ND_PRINT("tcp %u", length
- hlen
);
241 ND_PRINT(" [bad hdr length %u - too long, > %u]",
247 flags
= EXTRACT_U_1(tp
->th_flags
);
248 ND_PRINT("Flags [%s]", bittok2str_nosep(tcp_flag_values
, "none", flags
));
250 if (!ndo
->ndo_Sflag
&& (flags
& TH_ACK
)) {
252 * Find (or record) the initial sequence numbers for
253 * this conversation. (we pick an arbitrary
254 * collating order so there's only one entry for
259 struct tcp_seq_hash6
*th
;
260 struct tcp_seq_hash6
*tcp_seq_hash
;
261 const void *src
, *dst
;
264 tcp_seq_hash
= tcp_seq_hash6
;
265 src
= (const void *)ip6
->ip6_src
;
266 dst
= (const void *)ip6
->ip6_dst
;
269 else if (sport
== dport
) {
270 if (UNALIGNED_MEMCMP(src
, dst
, sizeof(ip6
->ip6_dst
)) > 0)
274 UNALIGNED_MEMCPY(&tha
.src
, dst
, sizeof(ip6
->ip6_dst
));
275 UNALIGNED_MEMCPY(&tha
.dst
, src
, sizeof(ip6
->ip6_src
));
276 tha
.port
= dport
<< 16 | sport
;
278 UNALIGNED_MEMCPY(&tha
.dst
, dst
, sizeof(ip6
->ip6_dst
));
279 UNALIGNED_MEMCPY(&tha
.src
, src
, sizeof(ip6
->ip6_src
));
280 tha
.port
= sport
<< 16 | dport
;
283 for (th
= &tcp_seq_hash
[tha
.port
% TSEQ_HASHSIZE
];
284 th
->nxt
; th
= th
->nxt
)
285 if (memcmp((char *)&tha
, (char *)&th
->addr
,
286 sizeof(th
->addr
)) == 0)
289 if (!th
->nxt
|| (flags
& TH_SYN
)) {
290 /* didn't find it or new conversation */
291 if (th
->nxt
== NULL
) {
292 th
->nxt
= (struct tcp_seq_hash6
*)
293 calloc(1, sizeof(*th
));
295 (*ndo
->ndo_error
)(ndo
,
296 "tcp_print: calloc");
300 th
->ack
= seq
, th
->seq
= ack
- 1;
302 th
->seq
= seq
, th
->ack
= ack
- 1;
305 seq
-= th
->ack
, ack
-= th
->seq
;
307 seq
-= th
->seq
, ack
-= th
->ack
;
313 struct tcp_seq_hash
*th
;
314 struct tcp_seq_hash
*tcp_seq_hash
;
317 tcp_seq_hash
= tcp_seq_hash4
;
320 else if (sport
== dport
) {
321 if (UNALIGNED_MEMCMP(ip
->ip_src
, ip
->ip_dst
, sizeof(ip
->ip_dst
)) > 0)
325 UNALIGNED_MEMCPY(&tha
.src
, ip
->ip_dst
,
327 UNALIGNED_MEMCPY(&tha
.dst
, ip
->ip_src
,
329 tha
.port
= dport
<< 16 | sport
;
331 UNALIGNED_MEMCPY(&tha
.dst
, ip
->ip_dst
,
333 UNALIGNED_MEMCPY(&tha
.src
, ip
->ip_src
,
335 tha
.port
= sport
<< 16 | dport
;
338 for (th
= &tcp_seq_hash
[tha
.port
% TSEQ_HASHSIZE
];
339 th
->nxt
; th
= th
->nxt
)
340 if (memcmp((char *)&tha
, (char *)&th
->addr
,
341 sizeof(th
->addr
)) == 0)
344 if (!th
->nxt
|| (flags
& TH_SYN
)) {
345 /* didn't find it or new conversation */
346 if (th
->nxt
== NULL
) {
347 th
->nxt
= (struct tcp_seq_hash
*)
348 calloc(1, sizeof(*th
));
350 (*ndo
->ndo_error
)(ndo
,
351 "tcp_print: calloc");
355 th
->ack
= seq
, th
->seq
= ack
- 1;
357 th
->seq
= seq
, th
->ack
= ack
- 1;
360 seq
-= th
->ack
, ack
-= th
->seq
;
362 seq
-= th
->seq
, ack
-= th
->ack
;
370 thseq
= thack
= rev
= 0;
373 ND_PRINT(" [bad hdr length %u - too long, > %u]",
378 if (ndo
->ndo_vflag
&& !ndo
->ndo_Kflag
&& !fragmented
) {
379 /* Check the checksum, if possible. */
380 uint16_t sum
, tcp_sum
;
383 if (ND_TTEST_LEN(tp
->th_sport
, length
)) {
384 sum
= tcp_cksum(ndo
, ip
, tp
, length
);
385 tcp_sum
= EXTRACT_BE_U_2(tp
->th_sum
);
387 ND_PRINT(", cksum 0x%04x", tcp_sum
);
389 ND_PRINT(" (incorrect -> 0x%04x)",
390 in_cksum_shouldbe(tcp_sum
, sum
));
392 ND_PRINT(" (correct)");
394 } else if (IP_V(ip
) == 6 && ip6
->ip6_plen
) {
395 if (ND_TTEST_LEN(tp
->th_sport
, length
)) {
396 sum
= tcp6_cksum(ndo
, ip6
, tp
, length
);
397 tcp_sum
= EXTRACT_BE_U_2(tp
->th_sum
);
399 ND_PRINT(", cksum 0x%04x", tcp_sum
);
401 ND_PRINT(" (incorrect -> 0x%04x)",
402 in_cksum_shouldbe(tcp_sum
, sum
));
404 ND_PRINT(" (correct)");
411 if (ndo
->ndo_vflag
> 1 || length
> 0 || flags
& (TH_SYN
| TH_FIN
| TH_RST
)) {
412 ND_PRINT(", seq %u", seq
);
415 ND_PRINT(":%u", seq
+ length
);
419 if (flags
& TH_ACK
) {
420 ND_PRINT(", ack %u", ack
);
423 ND_PRINT(", win %u", win
);
426 ND_PRINT(", urg %u", urp
);
428 * Handle any options.
430 if (hlen
> sizeof(*tp
)) {
432 u_int i
, opt
, datalen
;
436 cp
= (const u_char
*)tp
+ sizeof(*tp
);
437 ND_PRINT(", options [");
442 opt
= EXTRACT_U_1(cp
);
448 len
= EXTRACT_U_1(cp
);
449 cp
++; /* total including type, len */
450 if (len
< 2 || len
> hlen
)
452 --hlen
; /* account for length byte */
454 --hlen
; /* account for type byte */
457 /* Bail if "l" bytes of data are not left or were not captured */
458 #define LENCHECK(l) { if ((l) > hlen) goto bad; ND_TCHECK_LEN(cp, l); }
461 ND_PRINT("%s", tok2str(tcp_option_values
, "unknown-%u", opt
));
468 ND_PRINT(" %u", EXTRACT_BE_U_2(cp
));
474 ND_PRINT(" %u", EXTRACT_U_1(cp
));
479 if (datalen
% 8 != 0) {
480 ND_PRINT(" invalid sack");
484 ND_PRINT(" %u ", datalen
/ 8);
485 for (i
= 0; i
< datalen
; i
+= 8) {
487 s
= EXTRACT_BE_U_4(cp
+ i
);
489 e
= EXTRACT_BE_U_4(cp
+ i
+ 4);
497 ND_PRINT("{%u:%u}", s
, e
);
506 case TCPOPT_ECHOREPLY
:
509 * those options share their semantics.
514 ND_PRINT(" %u", EXTRACT_BE_U_4(cp
));
517 case TCPOPT_TIMESTAMP
:
520 ND_PRINT(" val %u ecr %u",
522 EXTRACT_BE_U_4(cp
+ 4));
525 case TCPOPT_SIGNATURE
:
526 datalen
= TCP_SIGLEN
;
529 #ifdef HAVE_LIBCRYPTO
530 switch (tcp_verify_signature(ndo
, ip
, tp
,
531 bp
+ TH_OFF(tp
) * 4, length
, cp
)) {
533 case SIGNATURE_VALID
:
537 case SIGNATURE_INVALID
:
541 case CANT_CHECK_SIGNATURE
:
542 ND_PRINT("can't check - ");
543 for (i
= 0; i
< TCP_SIGLEN
; ++i
)
544 ND_PRINT("%02x", EXTRACT_U_1(cp
+ i
));
548 for (i
= 0; i
< TCP_SIGLEN
; ++i
)
549 ND_PRINT("%02x", EXTRACT_U_1(cp
+ i
));
556 ND_PRINT(" cap %02x id %u", EXTRACT_U_1(cp
), EXTRACT_U_1(cp
+ 1));
561 /* RFC 5925 Section 2.2:
562 * "The Length value MUST be greater than or equal to 4."
563 * (This includes the Kind and Length fields already processed
567 ND_PRINT(" invalid");
570 ND_PRINT(" keyid %u", EXTRACT_U_1(cp
));
572 ND_PRINT(" rnextkeyid %u", EXTRACT_U_1(cp
+ 1));
575 for (i
= 2; i
< datalen
; i
++) {
577 ND_PRINT("%02x", EXTRACT_U_1(cp
+ i
));
587 * Nothing interesting.
595 utoval
= EXTRACT_BE_U_2(cp
);
596 ND_PRINT(" 0x%x", utoval
);
598 utoval
= (utoval
>> 1) * 60;
601 ND_PRINT(" %u", utoval
);
607 if (!mptcp_print(ndo
, cp
-2, len
, flags
))
611 case TCPOPT_FASTOPEN
:
615 print_tcp_fastopen_option(ndo
, cp
, datalen
, FALSE
);
618 case TCPOPT_EXPERIMENT2
:
624 magic
= EXTRACT_BE_U_2(cp
);
629 case 0xf989: /* TCP Fast Open RFC 7413 */
630 print_tcp_fastopen_option(ndo
, cp
+ 2, datalen
- 2, TRUE
);
634 /* Unknown magic number */
635 ND_PRINT("%04x", magic
);
644 for (i
= 0; i
< datalen
; ++i
) {
646 ND_PRINT("%02x", EXTRACT_U_1(cp
+ i
));
651 /* Account for data printed */
655 /* Check specification against observed length */
656 ++datalen
; /* option octet */
657 if (!ZEROLENOPT(opt
))
658 ++datalen
; /* size octet */
660 ND_PRINT("[len %u]", len
);
662 if (opt
== TCPOPT_EOL
)
669 * Print length field before crawling down the stack.
671 ND_PRINT(", length %u", length
);
677 * Decode payload if necessary.
679 bp
+= TH_OFF(tp
) * 4;
680 if ((flags
& TH_RST
) && ndo
->ndo_vflag
) {
681 print_tcp_rst_data(ndo
, bp
, length
);
685 if (ndo
->ndo_packettype
) {
686 switch (ndo
->ndo_packettype
) {
688 zmtp1_print(ndo
, bp
, length
);
691 resp_print(ndo
, bp
, length
);
697 if (IS_SRC_OR_DST_PORT(TELNET_PORT
)) {
698 telnet_print(ndo
, bp
, length
);
699 } else if (IS_SRC_OR_DST_PORT(SMTP_PORT
)) {
701 smtp_print(ndo
, bp
, length
);
702 } else if (IS_SRC_OR_DST_PORT(WHOIS_PORT
)) {
704 txtproto_print(ndo
, bp
, length
, "whois", NULL
, 0); /* RFC 3912 */
705 } else if (IS_SRC_OR_DST_PORT(BGP_PORT
))
706 bgp_print(ndo
, bp
, length
);
707 else if (IS_SRC_OR_DST_PORT(PPTP_PORT
))
709 else if (IS_SRC_OR_DST_PORT(REDIS_PORT
))
710 resp_print(ndo
, bp
, length
);
712 else if (IS_SRC_OR_DST_PORT(NETBIOS_SSN_PORT
))
713 nbt_tcp_print(ndo
, bp
, length
);
714 else if (IS_SRC_OR_DST_PORT(SMB_PORT
))
715 smb_tcp_print(ndo
, bp
, length
);
717 else if (IS_SRC_OR_DST_PORT(BEEP_PORT
))
718 beep_print(ndo
, bp
, length
);
719 else if (IS_SRC_OR_DST_PORT(OPENFLOW_PORT_OLD
) || IS_SRC_OR_DST_PORT(OPENFLOW_PORT_IANA
))
720 openflow_print(ndo
, bp
, length
);
721 else if (IS_SRC_OR_DST_PORT(FTP_PORT
)) {
723 ftp_print(ndo
, bp
, length
);
724 } else if (IS_SRC_OR_DST_PORT(HTTP_PORT
) || IS_SRC_OR_DST_PORT(HTTP_PORT_ALT
)) {
726 http_print(ndo
, bp
, length
);
727 } else if (IS_SRC_OR_DST_PORT(RTSP_PORT
) || IS_SRC_OR_DST_PORT(RTSP_PORT_ALT
)) {
729 rtsp_print(ndo
, bp
, length
);
730 } else if (length
> 2 &&
731 (IS_SRC_OR_DST_PORT(NAMESERVER_PORT
))) {
733 * TCP DNS query has 2byte length at the head.
734 * XXX packet could be unaligned, it can go strange
736 domain_print(ndo
, bp
+ 2, length
- 2, 0);
737 } else if (IS_SRC_OR_DST_PORT(MSDP_PORT
)) {
738 msdp_print(ndo
, bp
, length
);
739 } else if (IS_SRC_OR_DST_PORT(RPKI_RTR_PORT
)) {
740 rpki_rtr_print(ndo
, bp
, length
);
742 else if (length
> 0 && (IS_SRC_OR_DST_PORT(LDP_PORT
))) {
743 ldp_print(ndo
, bp
, length
);
745 else if ((IS_SRC_OR_DST_PORT(NFS_PORT
)) &&
746 length
>= 4 && ND_TTEST_4(bp
)) {
748 * If data present, header length valid, and NFS port used,
750 * Pass offset of data plus 4 bytes for RPC TCP msg length
751 * to NFS print routines.
754 const struct sunrpc_msg
*rp
;
755 enum sunrpc_msg_type direction
;
757 fraglen
= EXTRACT_BE_U_4(bp
) & 0x7FFFFFFF;
758 if (fraglen
> (length
) - 4)
759 fraglen
= (length
) - 4;
760 rp
= (const struct sunrpc_msg
*)(bp
+ 4);
761 if (ND_TTEST_4(rp
->rm_direction
)) {
762 direction
= (enum sunrpc_msg_type
) EXTRACT_BE_U_4(rp
->rm_direction
);
763 if (dport
== NFS_PORT
&& direction
== SUNRPC_CALL
) {
764 ND_PRINT(": NFS request xid %u ",
765 EXTRACT_BE_U_4(rp
->rm_xid
));
766 nfsreq_noaddr_print(ndo
, (const u_char
*)rp
, fraglen
, (const u_char
*)ip
);
769 if (sport
== NFS_PORT
&& direction
== SUNRPC_REPLY
) {
770 ND_PRINT(": NFS reply xid %u ",
771 EXTRACT_BE_U_4(rp
->rm_xid
));
772 nfsreply_noaddr_print(ndo
, (const u_char
*)rp
, fraglen
, (const u_char
*)ip
);
780 ND_PRINT("[bad opt]");
791 * RFC1122 says the following on data in RST segments:
793 * 4.2.2.12 RST Segment: RFC-793 Section 3.4
795 * A TCP SHOULD allow a received RST segment to include data.
798 * It has been suggested that a RST segment could contain
799 * ASCII text that encoded and explained the cause of the
800 * RST. No standard has yet been established for such
806 print_tcp_rst_data(netdissect_options
*ndo
,
807 const u_char
*sp
, u_int length
)
811 ND_PRINT(ND_TTEST_LEN(sp
, length
) ? " [RST" : " [!RST");
812 if (length
> MAX_RST_DATA_LEN
) {
813 length
= MAX_RST_DATA_LEN
; /* can use -X for longer */
814 ND_PRINT("+"); /* indicate we truncate */
817 while (length
-- && sp
< ndo
->ndo_snapend
) {
826 print_tcp_fastopen_option(netdissect_options
*ndo
, const u_char
*cp
,
827 u_int datalen
, int exp
)
835 /* Fast Open Cookie Request */
836 ND_PRINT(" cookiereq");
838 /* Fast Open Cookie */
839 if (datalen
% 2 != 0 || datalen
< 4 || datalen
> 16) {
840 ND_PRINT(" invalid");
842 ND_PRINT(" cookie ");
843 for (i
= 0; i
< datalen
; ++i
)
844 ND_PRINT("%02x", EXTRACT_U_1(cp
+ i
));
849 #ifdef HAVE_LIBCRYPTO
850 USES_APPLE_DEPRECATED_API
852 tcp_verify_signature(netdissect_options
*ndo
,
853 const struct ip
*ip
, const struct tcphdr
*tp
,
854 const u_char
*data
, u_int length
, const u_char
*rcvsig
)
857 u_char sig
[TCP_SIGLEN
];
860 uint16_t savecsum
, tlen
;
861 const struct ip6_hdr
*ip6
;
865 if (data
+ length
> ndo
->ndo_snapend
) {
866 ND_PRINT("snaplen too short, ");
867 return (CANT_CHECK_SIGNATURE
);
872 if (ndo
->ndo_sigsecret
== NULL
) {
873 ND_PRINT("shared secret not supplied with -M, ");
874 return (CANT_CHECK_SIGNATURE
);
879 * Step 1: Update MD5 hash with IP pseudo-header.
882 MD5_Update(&ctx
, (const char *)&ip
->ip_src
, sizeof(ip
->ip_src
));
883 MD5_Update(&ctx
, (const char *)&ip
->ip_dst
, sizeof(ip
->ip_dst
));
884 MD5_Update(&ctx
, (const char *)&zero_proto
, sizeof(zero_proto
));
885 MD5_Update(&ctx
, (const char *)&ip
->ip_p
, sizeof(ip
->ip_p
));
886 tlen
= EXTRACT_BE_U_2(ip
->ip_len
) - IP_HL(ip
) * 4;
888 MD5_Update(&ctx
, (const char *)&tlen
, sizeof(tlen
));
889 } else if (IP_V(ip
) == 6) {
890 ip6
= (const struct ip6_hdr
*)ip
;
891 MD5_Update(&ctx
, (const char *)&ip6
->ip6_src
, sizeof(ip6
->ip6_src
));
892 MD5_Update(&ctx
, (const char *)&ip6
->ip6_dst
, sizeof(ip6
->ip6_dst
));
893 len32
= htonl(EXTRACT_BE_U_2(ip6
->ip6_plen
));
894 MD5_Update(&ctx
, (const char *)&len32
, sizeof(len32
));
896 MD5_Update(&ctx
, (const char *)&nxt
, sizeof(nxt
));
897 MD5_Update(&ctx
, (const char *)&nxt
, sizeof(nxt
));
898 MD5_Update(&ctx
, (const char *)&nxt
, sizeof(nxt
));
900 MD5_Update(&ctx
, (const char *)&nxt
, sizeof(nxt
));
902 ND_PRINT("IP version not 4 or 6, ");
903 return (CANT_CHECK_SIGNATURE
);
907 * Step 2: Update MD5 hash with TCP header, excluding options.
908 * The TCP checksum must be set to zero.
910 memcpy(&savecsum
, tp1
.th_sum
, sizeof(savecsum
));
911 memset(tp1
.th_sum
, 0, sizeof(tp1
.th_sum
));
912 MD5_Update(&ctx
, (const char *)&tp1
, sizeof(struct tcphdr
));
913 memcpy(tp1
.th_sum
, &savecsum
, sizeof(tp1
.th_sum
));
915 * Step 3: Update MD5 hash with TCP segment data, if present.
918 MD5_Update(&ctx
, data
, length
);
920 * Step 4: Update MD5 hash with shared secret.
922 MD5_Update(&ctx
, ndo
->ndo_sigsecret
, strlen(ndo
->ndo_sigsecret
));
923 MD5_Final(sig
, &ctx
);
925 if (memcmp(rcvsig
, sig
, TCP_SIGLEN
) == 0)
926 return (SIGNATURE_VALID
);
928 return (SIGNATURE_INVALID
);
931 #endif /* HAVE_LIBCRYPTO */
935 * c-style: whitesmith