packet-tcp.c

   1 /* packet-tcp.c
   2  * Routines for TCP packet disassembly
   3  *
   4  * $Id: packet-tcp.c,v 1.98 2001/01/22 03:33:45 guy Exp $
   5  *
   6  * Ethereal - Network traffic analyzer
   7  * By Gerald Combs <gerald@zing.org>
   8  * Copyright 1998 Gerald Combs
   9  *
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License
  13  * as published by the Free Software Foundation; either version 2
  14  * of the License, or (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  24  */
  25
  26 #ifdef HAVE_CONFIG_H
  27 # include "config.h"
  28 #endif
  29
  30 #ifdef HAVE_SYS_TYPES_H
  31 # include <sys/types.h>
  32 #endif
  33
  34 #ifdef HAVE_NETINET_IN_H
  35 # include <netinet/in.h>
  36 #endif
  37
  38 #include <stdio.h>
  39 #include <string.h>
  40 #include <glib.h>
  41 #include "in_cksum.h"
  42
  43 #ifdef NEED_SNPRINTF_H
  44 # include "snprintf.h"
  45 #endif
  46
  47 #include "globals.h"
  48 #include "resolv.h"
  49 #include "follow.h"
  50 #include "prefs.h"
  51 #include "plugins.h"
  52 #include "packet-tcp.h"
  53 #include "packet-ip.h"
  54 #include "conversation.h"
  55 #include "strutil.h"
  56
  57 /* Place TCP summary in proto tree */
  58 static gboolean tcp_summary_in_tree = TRUE;
  59
  60 extern FILE* data_out_file;
  61
  62 guint16 tcp_urgent_pointer;
  63
  64 static int proto_tcp = -1;
  65 static int hf_tcp_srcport = -1;
  66 static int hf_tcp_dstport = -1;
  67 static int hf_tcp_port = -1;
  68 static int hf_tcp_seq = -1;
  69 static int hf_tcp_nxtseq = -1;
  70 static int hf_tcp_ack = -1;
  71 static int hf_tcp_hdr_len = -1;
  72 static int hf_tcp_flags = -1;
  73 static int hf_tcp_flags_cwr = -1;
  74 static int hf_tcp_flags_ecn = -1;
  75 static int hf_tcp_flags_urg = -1;
  76 static int hf_tcp_flags_ack = -1;
  77 static int hf_tcp_flags_push = -1;
  78 static int hf_tcp_flags_reset = -1;
  79 static int hf_tcp_flags_syn = -1;
  80 static int hf_tcp_flags_fin = -1;
  81 static int hf_tcp_window_size = -1;
  82 static int hf_tcp_checksum = -1;
  83 static int hf_tcp_urgent_pointer = -1;
  84
  85 static gint ett_tcp = -1;
  86 static gint ett_tcp_flags = -1;
  87 static gint ett_tcp_options = -1;
  88 static gint ett_tcp_option_sack = -1;
  89
  90 static dissector_table_t subdissector_table;
  91 static heur_dissector_list_t heur_subdissector_list;
  92 static conv_dissector_list_t conv_subdissector_list;
  93
  94 /* TCP Ports */
  95
  96 #define TCP_PORT_SMTP                   25
  97
  98 /* TCP structs and definitions */
  99
 100 typedef struct _e_tcphdr {
 101   guint16 th_sport;
 102   guint16 th_dport;
 103   guint32 th_seq;
 104   guint32 th_ack;
 105   guint8  th_off_x2; /* combines th_off and th_x2 */
 106   guint8  th_flags;
 107 #define TH_FIN  0x01
 108 #define TH_SYN  0x02
 109 #define TH_RST  0x04
 110 #define TH_PUSH 0x08
 111 #define TH_ACK  0x10
 112 #define TH_URG  0x20
 113 #define TH_ECN  0x40
 114 #define TH_CWR  0x80
 115   guint16 th_win;
 116   guint16 th_sum;
 117   guint16 th_urp;
 118 } e_tcphdr;
 119
 120 /*
 121  *      TCP option
 122  */
 123
 124 #define TCPOPT_NOP              1       /* Padding */
 125 #define TCPOPT_EOL              0       /* End of options */
 126 #define TCPOPT_MSS              2       /* Segment size negotiating */
 127 #define TCPOPT_WINDOW           3       /* Window scaling */
 128 #define TCPOPT_SACK_PERM        4       /* SACK Permitted */
 129 #define TCPOPT_SACK             5       /* SACK Block */
 130 #define TCPOPT_ECHO             6
 131 #define TCPOPT_ECHOREPLY        7
 132 #define TCPOPT_TIMESTAMP        8       /* Better RTT estimations/PAWS */
 133 #define TCPOPT_CC               11
 134 #define TCPOPT_CCNEW            12
 135 #define TCPOPT_CCECHO           13
 136 #define TCPOPT_MD5              19      /* RFC2385 */
 137
 138 /*
 139  *     TCP option lengths
 140  */
 141
 142 #define TCPOLEN_MSS            4
 143 #define TCPOLEN_WINDOW         3
 144 #define TCPOLEN_SACK_PERM      2
 145 #define TCPOLEN_SACK_MIN       2
 146 #define TCPOLEN_ECHO           6
 147 #define TCPOLEN_ECHOREPLY      6
 148 #define TCPOLEN_TIMESTAMP      10
 149 #define TCPOLEN_CC             6
 150 #define TCPOLEN_CCNEW          6
 151 #define TCPOLEN_CCECHO         6
 152 #define TCPOLEN_MD5            18
 153
 154 static void
 155 tcp_info_append_uint(frame_data *fd, const char *abbrev, guint32 val)
 156 {
 157   if (check_col(fd, COL_INFO))
 158     col_append_fstr(fd, COL_INFO, " %s=%u", abbrev, val);
 159 }
 160
 161 static void
 162 dissect_tcpopt_maxseg(const ip_tcp_opt *optp, tvbuff_t *tvb,
 163     int offset, guint optlen, frame_data *fd, proto_tree *opt_tree)
 164 {
 165   guint16 mss;
 166
 167   mss = tvb_get_ntohs(tvb, offset + 2);
 168   proto_tree_add_text(opt_tree, tvb, offset,      optlen,
 169                         "%s: %u bytes", optp->name, mss);
 170   tcp_info_append_uint(fd, "MSS", mss);
 171 }
 172
 173 static void
 174 dissect_tcpopt_wscale(const ip_tcp_opt *optp, tvbuff_t *tvb,
 175     int offset, guint optlen, frame_data *fd, proto_tree *opt_tree)
 176 {
 177   guint8 ws;
 178
 179   ws = tvb_get_guint8(tvb, offset + 2);
 180   proto_tree_add_text(opt_tree, tvb, offset,      optlen,
 181                         "%s: %u bytes", optp->name, ws);
 182   tcp_info_append_uint(fd, "WS", ws);
 183 }
 184
 185 static void
 186 dissect_tcpopt_sack(const ip_tcp_opt *optp, tvbuff_t *tvb,
 187     int offset, guint optlen, frame_data *fd, proto_tree *opt_tree)
 188 {
 189   proto_tree *field_tree = NULL;
 190   proto_item *tf;
 191   guint leftedge, rightedge;
 192
 193   tf = proto_tree_add_text(opt_tree, tvb, offset,      optlen, "%s:", optp->name);
 194   offset += 2;  /* skip past type and length */
 195   optlen -= 2;  /* subtract size of type and length */
 196   while (optlen > 0) {
 197     if (field_tree == NULL) {
 198       /* Haven't yet made a subtree out of this option.  Do so. */
 199       field_tree = proto_item_add_subtree(tf, *optp->subtree_index);
 200     }
 201     if (optlen < 4) {
 202       proto_tree_add_text(field_tree, tvb, offset,      optlen,
 203         "(suboption would go past end of option)");
 204       break;
 205     }
 206     leftedge = tvb_get_ntohl(tvb, offset);
 207     optlen -= 4;
 208     if (optlen < 4) {
 209       proto_tree_add_text(field_tree, tvb, offset,      optlen,
 210         "(suboption would go past end of option)");
 211       break;
 212     }
 213     /* XXX - check whether it goes past end of packet */
 214     rightedge = tvb_get_ntohl(tvb, offset + 4);
 215     optlen -= 4;
 216     proto_tree_add_text(field_tree, tvb, offset,      8,
 217         "left edge = %u, right edge = %u", leftedge, rightedge);
 218     tcp_info_append_uint(fd, "SLE", leftedge);
 219     tcp_info_append_uint(fd, "SRE", rightedge);
 220     offset += 8;
 221   }
 222 }
 223
 224 static void
 225 dissect_tcpopt_echo(const ip_tcp_opt *optp, tvbuff_t *tvb,
 226     int offset, guint optlen, frame_data *fd, proto_tree *opt_tree)
 227 {
 228   guint32 echo;
 229
 230   echo = tvb_get_ntohl(tvb, offset + 2);
 231   proto_tree_add_text(opt_tree, tvb, offset,      optlen,
 232                         "%s: %u", optp->name, echo);
 233   tcp_info_append_uint(fd, "ECHO", echo);
 234 }
 235
 236 static void
 237 dissect_tcpopt_timestamp(const ip_tcp_opt *optp, tvbuff_t *tvb,
 238     int offset, guint optlen, frame_data *fd, proto_tree *opt_tree)
 239 {
 240   guint32 tsv, tser;
 241
 242   tsv = tvb_get_ntohl(tvb, offset + 2);
 243   tser = tvb_get_ntohl(tvb, offset + 6);
 244   proto_tree_add_text(opt_tree, tvb, offset,      optlen,
 245     "%s: tsval %u, tsecr %u", optp->name, tsv, tser);
 246   tcp_info_append_uint(fd, "TSV", tsv);
 247   tcp_info_append_uint(fd, "TSER", tser);
 248 }
 249
 250 static void
 251 dissect_tcpopt_cc(const ip_tcp_opt *optp, tvbuff_t *tvb,
 252     int offset, guint optlen, frame_data *fd, proto_tree *opt_tree)
 253 {
 254   guint32 cc;
 255
 256   cc = tvb_get_ntohl(tvb, offset + 2);
 257   proto_tree_add_text(opt_tree, tvb, offset,      optlen,
 258                         "%s: %u", optp->name, cc);
 259   tcp_info_append_uint(fd, "CC", cc);
 260 }
 261
 262 static const ip_tcp_opt tcpopts[] = {
 263   {
 264     TCPOPT_EOL,
 265     "EOL",
 266     NULL,
 267     NO_LENGTH,
 268     0,
 269     NULL,
 270   },
 271   {
 272     TCPOPT_NOP,
 273     "NOP",
 274     NULL,
 275     NO_LENGTH,
 276     0,
 277     NULL,
 278   },
 279   {
 280     TCPOPT_MSS,
 281     "Maximum segment size",
 282     NULL,
 283     FIXED_LENGTH,
 284     TCPOLEN_MSS,
 285     dissect_tcpopt_maxseg
 286   },
 287   {
 288     TCPOPT_WINDOW,
 289     "Window scale",
 290     NULL,
 291     FIXED_LENGTH,
 292     TCPOLEN_WINDOW,
 293     dissect_tcpopt_wscale
 294   },
 295   {
 296     TCPOPT_SACK_PERM,
 297     "SACK permitted",
 298     NULL,
 299     FIXED_LENGTH,
 300     TCPOLEN_SACK_PERM,
 301     NULL,
 302   },
 303   {
 304     TCPOPT_SACK,
 305     "SACK",
 306     &ett_tcp_option_sack,
 307     VARIABLE_LENGTH,
 308     TCPOLEN_SACK_MIN,
 309     dissect_tcpopt_sack
 310   },
 311   {
 312     TCPOPT_ECHO,
 313     "Echo",
 314     NULL,
 315     FIXED_LENGTH,
 316     TCPOLEN_ECHO,
 317     dissect_tcpopt_echo
 318   },
 319   {
 320     TCPOPT_ECHOREPLY,
 321     "Echo reply",
 322     NULL,
 323     FIXED_LENGTH,
 324     TCPOLEN_ECHOREPLY,
 325     dissect_tcpopt_echo
 326   },
 327   {
 328     TCPOPT_TIMESTAMP,
 329     "Time stamp",
 330     NULL,
 331     FIXED_LENGTH,
 332     TCPOLEN_TIMESTAMP,
 333     dissect_tcpopt_timestamp
 334   },
 335   {
 336     TCPOPT_CC,
 337     "CC",
 338     NULL,
 339     FIXED_LENGTH,
 340     TCPOLEN_CC,
 341     dissect_tcpopt_cc
 342   },
 343   {
 344     TCPOPT_CCNEW,
 345     "CC.NEW",
 346     NULL,
 347     FIXED_LENGTH,
 348     TCPOPT_CCNEW,
 349     dissect_tcpopt_cc
 350   },
 351   {
 352     TCPOPT_CCECHO,
 353     "CC.ECHO",
 354     NULL,
 355     FIXED_LENGTH,
 356     TCPOLEN_CCECHO,
 357     dissect_tcpopt_cc
 358   },
 359   {
 360     TCPOPT_MD5,
 361     "TCP MD5 signature",
 362     NULL,
 363     FIXED_LENGTH,
 364     TCPOLEN_MD5,
 365     NULL
 366   }
 367 };
 368
 369 #define N_TCP_OPTS      (sizeof tcpopts / sizeof tcpopts[0])
 370
 371 /* TCP flags flag */
 372 static const true_false_string flags_set_truth = {
 373   "Set",
 374   "Not set"
 375 };
 376
 377
 378 /* Determine if there is a sub-dissector and call it.  This has been */
 379 /* separated into a stand alone routine to other protocol dissectors */
 380 /* can call to it, ie. socks    */
 381
 382 void
 383 decode_tcp_ports(tvbuff_t *tvb, int offset, packet_info *pinfo,
 384         proto_tree *tree, int src_port, int dst_port)
 385 {
 386   tvbuff_t *next_tvb;
 387 #ifdef HAVE_PLUGINS
 388   const u_char *next_pd;
 389   int next_offset;
 390 #endif
 391
 392   next_tvb = tvb_new_subset(tvb, offset, -1, -1);
 393
 394 /* determine if this packet is part of a conversation and call dissector */
 395 /* for the conversation if available */
 396
 397   if (try_conversation_dissector(&pinfo->src, &pinfo->dst, PT_TCP,
 398                 src_port, dst_port, next_tvb, pinfo, tree))
 399         return;
 400
 401   /* try to apply the plugins */
 402 #ifdef HAVE_PLUGINS
 403   {
 404     plugin *pt_plug = plugin_list;
 405
 406     if (enabled_plugins_number > 0) {
 407       tvb_compat(next_tvb, &next_pd, &next_offset);
 408       while (pt_plug) {
 409         if (pt_plug->enabled && strstr(pt_plug->protocol, "tcp") &&
 410             tree && dfilter_apply(pt_plug->filter, tree, next_pd, pinfo->fd->cap_len)) {
 411           pt_plug->dissector(next_pd, next_offset, pinfo->fd, tree);
 412           return;
 413         }
 414         pt_plug = pt_plug->next;
 415       }
 416     }
 417   }
 418 #endif
 419
 420   /* do lookup with the subdissector table */
 421   if (dissector_try_port(subdissector_table, src_port, next_tvb, pinfo, tree) ||
 422       dissector_try_port(subdissector_table, dst_port, next_tvb, pinfo, tree))
 423     return;
 424
 425   /* do lookup with the heuristic subdissector table */
 426   if (dissector_try_heuristic(heur_subdissector_list, next_tvb, pinfo, tree))
 427     return;
 428
 429   /* Oh, well, we don't know this; dissect it as data. */
 430   dissect_data(next_tvb, 0, pinfo, tree);
 431 }
 432
 433
 434 static void
 435 dissect_tcp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
 436 {
 437   e_tcphdr   th;
 438   proto_tree *tcp_tree = NULL, *field_tree = NULL;
 439   proto_item *ti, *tf;
 440   int        offset = 0;
 441   gchar      flags[64] = "<None>";
 442   gchar     *fstr[] = {"FIN", "SYN", "RST", "PSH", "ACK", "URG", "ECN", "CWR" };
 443   gint       fpos = 0, i;
 444   guint      bpos;
 445   guint      hlen;
 446   guint      optlen;
 447   guint32    seglen;
 448   guint32    nxtseq;
 449   guint      len;
 450   guint      reported_len;
 451   vec_t      cksum_vec[4];
 452   guint32    phdr[2];
 453   guint16    computed_cksum;
 454   guint      length_remaining;
 455
 456   if (check_col(pinfo->fd, COL_PROTOCOL))
 457     col_set_str(pinfo->fd, COL_PROTOCOL, "TCP");
 458
 459   /* Clear out the Info column. */
 460   if (check_col(pinfo->fd, COL_INFO))
 461     col_clear(pinfo->fd, COL_INFO);
 462
 463   /* Avoids alignment problems on many architectures. */
 464   tvb_memcpy(tvb, (guint8 *)&th, offset, sizeof(e_tcphdr));
 465   th.th_sport = ntohs(th.th_sport);
 466   th.th_dport = ntohs(th.th_dport);
 467   th.th_win   = ntohs(th.th_win);
 468   th.th_sum   = ntohs(th.th_sum);
 469   th.th_urp   = ntohs(th.th_urp);
 470   th.th_seq   = ntohl(th.th_seq);
 471   th.th_ack   = ntohl(th.th_ack);
 472
 473   /* Export the urgent pointer, for the benefit of protocols such as
 474      rlogin. */
 475   tcp_urgent_pointer = th.th_urp;
 476
 477   if (check_col(pinfo->fd, COL_INFO) || tree) {
 478     for (i = 0; i < 8; i++) {
 479       bpos = 1 << i;
 480       if (th.th_flags & bpos) {
 481         if (fpos) {
 482           strcpy(&flags[fpos], ", ");
 483           fpos += 2;
 484         }
 485         strcpy(&flags[fpos], fstr[i]);
 486         fpos += 3;
 487       }
 488     }
 489     flags[fpos] = '\0';
 490   }
 491
 492   hlen = hi_nibble(th.th_off_x2) * 4;  /* TCP header length, in bytes */
 493
 494   reported_len = tvb_reported_length(tvb);
 495   len = tvb_length(tvb);
 496
 497   /* Compute the length of data in this segment. */
 498   seglen = reported_len - hlen;
 499
 500   /* Compute the sequence number of next octet after this segment. */
 501   nxtseq = th.th_seq + seglen;
 502
 503   if (check_col(pinfo->fd, COL_INFO)) {
 504     if (th.th_flags & TH_URG)
 505       col_append_fstr(pinfo->fd, COL_INFO, "%s > %s [%s] Seq=%u Ack=%u Win=%u Urg=%u Len=%d",
 506         get_tcp_port(th.th_sport), get_tcp_port(th.th_dport), flags,
 507         th.th_seq, th.th_ack, th.th_win, th.th_urp, seglen);
 508     else
 509       col_append_fstr(pinfo->fd, COL_INFO, "%s > %s [%s] Seq=%u Ack=%u Win=%u Len=%d",
 510         get_tcp_port(th.th_sport), get_tcp_port(th.th_dport), flags,
 511         th.th_seq, th.th_ack, th.th_win, seglen);
 512   }
 513
 514   if (tree) {
 515     if (tcp_summary_in_tree) {
 516             ti = proto_tree_add_protocol_format(tree, proto_tcp, tvb, offset, hlen, "Transmission Control Protocol, Src Port: %s (%u), Dst Port: %s (%u), Seq: %u, Ack: %u", get_tcp_port(th.th_sport), th.th_sport, get_tcp_port(th.th_dport), th.th_dport, th.th_seq, th.th_ack);
 517     }
 518     else {
 519             ti = proto_tree_add_item(tree, proto_tcp, tvb, offset, hlen, FALSE);
 520     }
 521     tcp_tree = proto_item_add_subtree(ti, ett_tcp);
 522     proto_tree_add_uint_format(tcp_tree, hf_tcp_srcport, tvb, offset, 2, th.th_sport,
 523         "Source port: %s (%u)", get_tcp_port(th.th_sport), th.th_sport);
 524     proto_tree_add_uint_format(tcp_tree, hf_tcp_dstport, tvb, offset + 2, 2, th.th_dport,
 525         "Destination port: %s (%u)", get_tcp_port(th.th_dport), th.th_dport);
 526     proto_tree_add_uint_hidden(tcp_tree, hf_tcp_port, tvb, offset, 2, th.th_sport);
 527     proto_tree_add_uint_hidden(tcp_tree, hf_tcp_port, tvb, offset + 2, 2, th.th_dport);
 528     proto_tree_add_uint(tcp_tree, hf_tcp_seq, tvb, offset + 4, 4, th.th_seq);
 529     if (nxtseq != th.th_seq)
 530       proto_tree_add_uint(tcp_tree, hf_tcp_nxtseq, tvb, offset, 0, nxtseq);
 531     if (th.th_flags & TH_ACK)
 532       proto_tree_add_uint(tcp_tree, hf_tcp_ack, tvb, offset + 8, 4, th.th_ack);
 533     proto_tree_add_uint_format(tcp_tree, hf_tcp_hdr_len, tvb, offset + 12, 1, hlen,
 534         "Header length: %u bytes", hlen);
 535     tf = proto_tree_add_uint_format(tcp_tree, hf_tcp_flags, tvb, offset + 13, 1,
 536         th.th_flags, "Flags: 0x%04x (%s)", th.th_flags, flags);
 537     field_tree = proto_item_add_subtree(tf, ett_tcp_flags);
 538     proto_tree_add_boolean(field_tree, hf_tcp_flags_cwr, tvb, offset + 13, 1, th.th_flags);
 539     proto_tree_add_boolean(field_tree, hf_tcp_flags_ecn, tvb, offset + 13, 1, th.th_flags);
 540     proto_tree_add_boolean(field_tree, hf_tcp_flags_urg, tvb, offset + 13, 1, th.th_flags);
 541     proto_tree_add_boolean(field_tree, hf_tcp_flags_ack, tvb, offset + 13, 1, th.th_flags);
 542     proto_tree_add_boolean(field_tree, hf_tcp_flags_push, tvb, offset + 13, 1, th.th_flags);
 543     proto_tree_add_boolean(field_tree, hf_tcp_flags_reset, tvb, offset + 13, 1, th.th_flags);
 544     proto_tree_add_boolean(field_tree, hf_tcp_flags_syn, tvb, offset + 13, 1, th.th_flags);
 545     proto_tree_add_boolean(field_tree, hf_tcp_flags_fin, tvb, offset + 13, 1, th.th_flags);
 546     proto_tree_add_uint(tcp_tree, hf_tcp_window_size, tvb, offset + 14, 2, th.th_win);
 547     if (!pinfo->fragmented && len >= reported_len) {
 548       /* The packet isn't part of a fragmented datagram and isn't
 549          truncated, so we can checksum it.
 550          XXX - make a bigger scatter-gather list once we do fragment
 551          reassembly? */
 552
 553       /* Set up the fields of the pseudo-header. */
 554       cksum_vec[0].ptr = pinfo->src.data;
 555       cksum_vec[0].len = pinfo->src.len;
 556       cksum_vec[1].ptr = pinfo->dst.data;
 557       cksum_vec[1].len = pinfo->dst.len;
 558       cksum_vec[2].ptr = (const guint8 *)&phdr;
 559       switch (pinfo->src.type) {
 560
 561       case AT_IPv4:
 562         phdr[0] = htonl((IP_PROTO_TCP<<16) + reported_len);
 563         cksum_vec[2].len = 4;
 564         break;
 565
 566       case AT_IPv6:
 567         phdr[0] = htonl(reported_len);
 568         phdr[1] = htonl(IP_PROTO_TCP);
 569         cksum_vec[2].len = 8;
 570         break;
 571
 572       default:
 573         /* TCP runs only atop IPv4 and IPv6.... */
 574         g_assert_not_reached();
 575         break;
 576       }
 577       cksum_vec[3].ptr = tvb_get_ptr(tvb, offset, len);
 578       cksum_vec[3].len = reported_len;
 579       computed_cksum = in_cksum(&cksum_vec[0], 4);
 580       if (computed_cksum == 0) {
 581         proto_tree_add_uint_format(tcp_tree, hf_tcp_checksum, tvb,
 582            offset + 16, 2, th.th_sum, "Checksum: 0x%04x (correct)", th.th_sum);
 583       } else {
 584         proto_tree_add_uint_format(tcp_tree, hf_tcp_checksum, tvb,
 585            offset + 16, 2, th.th_sum,
 586            "Checksum: 0x%04x (incorrect, should be 0x%04x)", th.th_sum,
 587            in_cksum_shouldbe(th.th_sum, computed_cksum));
 588       }
 589     } else {
 590       proto_tree_add_uint_format(tcp_tree, hf_tcp_checksum, tvb,
 591        offset + 16, 2, th.th_sum, "Checksum: 0x%04x", th.th_sum);
 592     }
 593     if (th.th_flags & TH_URG)
 594       proto_tree_add_uint(tcp_tree, hf_tcp_urgent_pointer, tvb, offset + 18, 2, th.th_urp);
 595   }
 596
 597   /* Decode TCP options, if any. */
 598   if (tree  && hlen > sizeof (e_tcphdr)) {
 599     /* There's more than just the fixed-length header.  Decode the
 600        options. */
 601     optlen = hlen - sizeof (e_tcphdr); /* length of options, in bytes */
 602     tf = proto_tree_add_text(tcp_tree, tvb, offset +  20, optlen,
 603       "Options: (%d bytes)", optlen);
 604     field_tree = proto_item_add_subtree(tf, ett_tcp_options);
 605     dissect_ip_tcp_options(tvb, offset + 20, optlen,
 606       tcpopts, N_TCP_OPTS, TCPOPT_EOL, pinfo->fd, field_tree);
 607   }
 608
 609   /* Skip over header + options */
 610   offset += hlen;
 611
 612   pinfo->ptype = PT_TCP;
 613   pinfo->srcport = th.th_sport;
 614   pinfo->destport = th.th_dport;
 615
 616   /* Check the packet length to see if there's more data
 617      (it could be an ACK-only packet) */
 618   length_remaining = tvb_length_remaining(tvb, offset);
 619   if (length_remaining != 0) {
 620     if (th.th_flags & TH_RST) {
 621       /*
 622        * RFC1122 says:
 623        *
 624        *        4.2.2.12  RST Segment: RFC-793 Section 3.4
 625        *
 626        *          A TCP SHOULD allow a received RST segment to include data.
 627        *
 628        *          DISCUSSION
 629        *               It has been suggested that a RST segment could contain
 630        *               ASCII text that encoded and explained the cause of the
 631        *               RST.  No standard has yet been established for such
 632        *               data.
 633        *
 634        * so for segments with RST we just display the data as text.
 635        */
 636       proto_tree_add_text(tcp_tree, tvb, offset, length_remaining,
 637                             "Reset cause: %s",
 638                             tvb_format_text(tvb, offset, length_remaining));
 639     } else
 640       decode_tcp_ports( tvb, offset, pinfo, tree, th.th_sport, th.th_dport);
 641   }
 642
 643   if( data_out_file ) {
 644     reassemble_tcp( th.th_seq,          /* sequence number */
 645         seglen,                         /* data length */
 646         tvb_get_ptr(tvb, offset, length_remaining),     /* data */
 647         length_remaining,               /* captured data length */
 648         ( th.th_flags & TH_SYN ),       /* is syn set? */
 649         &pinfo->net_src,
 650         &pinfo->net_dst,
 651         pinfo->srcport,
 652         pinfo->destport);
 653   }
 654 }
 655
 656 void
 657 proto_register_tcp(void)
 658 {
 659         static hf_register_info hf[] = {
 660
 661                 { &hf_tcp_srcport,
 662                 { "Source Port",                "tcp.srcport", FT_UINT16, BASE_DEC, NULL, 0x0,
 663                         "" }},
 664
 665                 { &hf_tcp_dstport,
 666                 { "Destination Port",           "tcp.dstport", FT_UINT16, BASE_DEC, NULL, 0x0,
 667                         "" }},
 668
 669                 { &hf_tcp_port,
 670                 { "Source or Destination Port", "tcp.port", FT_UINT16, BASE_DEC, NULL, 0x0,
 671                         "" }},
 672
 673                 { &hf_tcp_seq,
 674                 { "Sequence number",            "tcp.seq", FT_UINT32, BASE_DEC, NULL, 0x0,
 675                         "" }},
 676
 677                 { &hf_tcp_nxtseq,
 678                 { "Next sequence number",       "tcp.nxtseq", FT_UINT32, BASE_DEC, NULL, 0x0,
 679                         "" }},
 680
 681                 { &hf_tcp_ack,
 682                 { "Acknowledgement number",     "tcp.ack", FT_UINT32, BASE_DEC, NULL, 0x0,
 683                         "" }},
 684
 685                 { &hf_tcp_hdr_len,
 686                 { "Header Length",              "tcp.hdr_len", FT_UINT8, BASE_DEC, NULL, 0x0,
 687                         "" }},
 688
 689                 { &hf_tcp_flags,
 690                 { "Flags",                      "tcp.flags", FT_UINT8, BASE_HEX, NULL, 0x0,
 691                         "" }},
 692
 693                 { &hf_tcp_flags_cwr,
 694                 { "Congestion Window Reduced (CWR)",                    "tcp.flags.cwr", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_CWR,
 695                         "" }},
 696
 697                 { &hf_tcp_flags_ecn,
 698                 { "ECN-Echo",                   "tcp.flags.ecn", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_ECN,
 699                         "" }},
 700
 701                 { &hf_tcp_flags_urg,
 702                 { "Urgent",                     "tcp.flags.urg", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_URG,
 703                         "" }},
 704
 705                 { &hf_tcp_flags_ack,
 706                 { "Acknowledgment",             "tcp.flags.ack", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_ACK,
 707                         "" }},
 708
 709                 { &hf_tcp_flags_push,
 710                 { "Push",                       "tcp.flags.push", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_PUSH,
 711                         "" }},
 712
 713                 { &hf_tcp_flags_reset,
 714                 { "Reset",                      "tcp.flags.reset", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_RST,
 715                         "" }},
 716
 717                 { &hf_tcp_flags_syn,
 718                 { "Syn",                        "tcp.flags.syn", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_SYN,
 719                         "" }},
 720
 721                 { &hf_tcp_flags_fin,
 722                 { "Fin",                        "tcp.flags.fin", FT_BOOLEAN, 8, TFS(&flags_set_truth), TH_FIN,
 723                         "" }},
 724
 725                 { &hf_tcp_window_size,
 726                 { "Window size",                "tcp.window_size", FT_UINT16, BASE_DEC, NULL, 0x0,
 727                         "" }},
 728
 729                 { &hf_tcp_checksum,
 730                 { "Checksum",                   "tcp.checksum", FT_UINT16, BASE_HEX, NULL, 0x0,
 731                         "" }},
 732
 733                 { &hf_tcp_urgent_pointer,
 734                 { "Urgent pointer",             "tcp.urgent_pointer", FT_UINT16, BASE_DEC, NULL, 0x0,
 735                         "" }},
 736         };
 737         static gint *ett[] = {
 738                 &ett_tcp,
 739                 &ett_tcp_flags,
 740                 &ett_tcp_options,
 741                 &ett_tcp_option_sack,
 742         };
 743         module_t *tcp_module;
 744
 745         proto_tcp = proto_register_protocol("Transmission Control Protocol",
 746             "TCP", "tcp");
 747         proto_register_field_array(proto_tcp, hf, array_length(hf));
 748         proto_register_subtree_array(ett, array_length(ett));
 749
 750         /* subdissector code */
 751         subdissector_table = register_dissector_table("tcp.port");
 752         register_heur_dissector_list("tcp", &heur_subdissector_list);
 753         register_conv_dissector_list("tcp", &conv_subdissector_list);
 754
 755         /* Register configuration preferences */
 756         tcp_module = prefs_register_protocol(proto_tcp, NULL);
 757         prefs_register_bool_preference(tcp_module, "tcp_summary_in_tree",
 758             "Show TCP summary in protocol tree",
 759 "Whether the TCP summary line should be shown in the protocol tree",
 760             &tcp_summary_in_tree);
 761 }
 762
 763 void
 764 proto_reg_handoff_tcp(void)
 765 {
 766         dissector_add("ip.proto", IP_PROTO_TCP, dissect_tcp, proto_tcp);
 767 }