2 * Routines for Fibre Channel Decoding (FC Header, Link Ctl & Basic Link Svc)
3 * Copyright 2001, Dinesh G Dutt <ddutt@cisco.com>
5 * $Id: packet-fc.c,v 1.7 2003/06/23 09:15:08 sahlberg Exp $
7 * Ethereal - Network traffic analyzer
8 * By Gerald Combs <gerald@ethereal.com>
9 * Copyright 1998 Gerald Combs
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.
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.
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.
34 #ifdef HAVE_SYS_TYPES_H
35 # include <sys/types.h>
38 #ifdef HAVE_NETINET_IN_H
39 # include <netinet/in.h>
44 #ifdef NEED_SNPRINTF_H
45 # include "snprintf.h"
48 #include <epan/packet.h>
50 #include "reassemble.h"
52 #include "packet-fc.h"
53 #include "packet-fclctl.h"
54 #include "packet-fcbls.h"
56 #define FC_HEADER_SIZE 24
57 #define FC_RCTL_EISL 0x50
58 #define MDSHDR_TRAILER_SIZE 6
60 /* Size of various fields in FC header in bytes */
61 #define FC_RCTL_SIZE 1
63 #define FC_CSCTL_SIZE 1
65 #define FC_TYPE_SIZE 1
66 #define FC_FCTL_SIZE 3
67 #define FC_SEQID_SIZE 1
68 #define FC_DFCTL_SIZE 1
69 #define FC_SEQCNT_SIZE 2
70 #define FC_OXID_SIZE 2
71 #define FC_RXID_SIZE 2
72 #define FC_PARAM_SIZE 4
74 /* Initialize the protocol and registered fields */
75 static int proto_fc = -1;
76 static int hf_fc_rctl = -1;
77 static int hf_fc_did = -1;
78 static int hf_fc_csctl = -1;
79 static int hf_fc_sid = -1;
80 static int hf_fc_id = -1;
81 static int hf_fc_type = -1;
82 static int hf_fc_fctl = -1;
83 static int hf_fc_seqid = -1;
84 static int hf_fc_dfctl = -1;
85 static int hf_fc_seqcnt = -1;
86 static int hf_fc_oxid = -1;
87 static int hf_fc_rxid = -1;
88 static int hf_fc_param = -1;
89 static int hf_fc_ftype = -1; /* Derived field, non-existent in FC hdr */
90 static int hf_fc_exchg_orig = -1;
91 static int hf_fc_exchg_resp = -1;
92 static int hf_fc_reassembled = -1;
94 /* Network_Header fields */
95 static int hf_fc_nh_da = -1;
96 static int hf_fc_nh_sa = -1;
98 /* For Basic Link Svc */
99 static int hf_fc_bls_seqid_vld = -1;
100 static int hf_fc_bls_lastvld_seqid = -1;
101 static int hf_fc_bls_oxid = -1;
102 static int hf_fc_bls_rxid = -1;
103 static int hf_fc_bls_lowseqcnt = -1;
104 static int hf_fc_bls_hiseqcnt = -1;
105 static int hf_fc_bls_rjtcode = -1;
106 static int hf_fc_bls_rjtdetail = -1;
107 static int hf_fc_bls_vendor = -1;
110 /* Initialize the subtree pointers */
111 static gint ett_fc = -1;
112 static gint ett_fcbls = -1;
114 static dissector_table_t fcftype_dissector_table;
115 static dissector_handle_t data_handle;
117 /* Reassembly stuff */
118 static gboolean fc_reassemble = TRUE;
119 static guint32 fc_max_frame_size = 1024;
120 static GHashTable *fc_fragment_table = NULL;
122 const value_string fc_fc4_val[] = {
123 {FC_TYPE_ELS , "Ext Link Svc"},
124 {FC_TYPE_LLCSNAP , "LLC_SNAP"},
125 {FC_TYPE_IP , "IP/FC"},
126 {FC_TYPE_SCSI , "FCP"},
127 {FC_TYPE_FCCT , "FC_CT"},
128 {FC_TYPE_SWILS , "SW_ILS"},
130 {FC_TYPE_SNMP , "SNMP"},
134 static const value_string fc_ftype_vals [] = {
135 {FC_FTYPE_UNDEF , "Unknown frame"},
136 {FC_FTYPE_SWILS, "SW_ILS"},
137 {FC_FTYPE_IP , "IP/FC"},
138 {FC_FTYPE_SCSI , "FCP"},
139 {FC_FTYPE_BLS , "Basic Link Svc"},
140 {FC_FTYPE_ELS , "ELS"},
141 {FC_FTYPE_FCCT , "FC_CT"},
142 {FC_FTYPE_LINKDATA, "Link Data"},
143 {FC_FTYPE_VDO, "Video Data"},
144 {FC_FTYPE_LINKCTL, "Link Ctl"},
148 static const value_string fc_wka_vals[] = {
149 {FC_WKA_MULTICAST, "Multicast Server"},
150 {FC_WKA_CLKSYNC, "Clock Sync Server"},
151 {FC_WKA_KEYDIST, "Key Distribution Server"},
152 {FC_WKA_ALIAS, "Alias Server"},
153 {FC_WKA_QOSF, "QoS Facilitator"},
154 {FC_WKA_MGMT, "Management Server"},
155 {FC_WKA_TIME, "Time Server"},
156 {FC_WKA_DNS, "Directory Server"},
157 {FC_WKA_FABRIC_CTRLR, "Fabric Ctlr"},
158 {FC_WKA_FPORT, "F_Port Server"},
159 {FC_WKA_BCAST, "Broadcast ID"},
163 static const value_string fc_iu_val[] = {
164 {FC_IU_UNCATEGORIZED , "Uncategorized Data"},
165 {FC_IU_SOLICITED_DATA , "Solicited Data"},
166 {FC_IU_UNSOLICITED_CTL , "Unsolicited Control"},
167 {FC_IU_SOLICITED_CTL , "Solicited Control"},
168 {FC_IU_UNSOLICITED_DATA, "Solicited Data"},
169 {FC_IU_DATA_DESCRIPTOR , "Data Descriptor"},
170 {FC_IU_UNSOLICITED_CMD , "Unsolicited Command"},
171 {FC_IU_CMD_STATUS , "Command Status"},
175 static void fc_defragment_init(void)
177 fragment_table_init(&fc_fragment_table);
182 fctl_to_str (const guint8 *fctl, gchar *str, gboolean is_ack)
190 if (fctl[0] & 0x80) {
191 strcpy (str, "Exchange Responder, ");
195 strcpy (str, "Exchange Originator, ");
199 if (fctl[0] & 0x40) {
200 strcpy (&str[stroff], "Seq Recipient, ");
204 strcpy (&str[stroff], "Seq Initiator, ");
208 if (fctl[0] & 0x20) {
209 strcpy (&str[stroff], "Exchg First, ");
213 if (fctl[0] & 0x10) {
214 strcpy (&str[stroff], "Exchg Last, ");
219 strcpy (&str[stroff], "Seq Last, ");
224 strcpy (&str[stroff], "Priority, ");
228 strcpy (&str[stroff], "CS_CTL, ");
233 strcpy (&str[stroff], "Transfer Seq Initiative, ");
237 if (fctl[1] & 0x30) {
238 strcpy (&str[stroff], "ACK_0 Reqd, ");
241 else if (fctl[1] & 0x10) {
242 strcpy (&str[stroff], "ACK_1 Reqd, ");
247 strcpy (&str[stroff], "Rexmitted Seq, ");
251 tmp = fctl[2] & 0xC0;
254 strcpy (&str[stroff], "Last Data Frame - No Info, ");
258 strcpy (&str[stroff], "Last Data Frame - Seq Imm, ");
262 strcpy (&str[stroff], "Last Data Frame - Seq Soon, ");
266 strcpy (&str[stroff], "Last Data Frame - Seq Delyd, ");
271 tmp = fctl[2] & 0x30;
275 strcpy (&str[stroff], "ABTS - Cont, ");
279 strcpy (&str[stroff], "ABTS - Abort/MS, ");
285 strcpy (&str[stroff], "ABTS - Abort, ");
289 strcpy (&str[stroff], "ABTS - Abort/SS, ");
295 strcpy (&str[stroff], "ABTS - Stop, ");
299 strcpy (&str[stroff], "ABTS - Process/IB, ");
305 strcpy (&str[stroff], "ABTS - Imm Seq Retx, ");
309 strcpy (&str[stroff], "ABTS - Discard/MS/Imm Retx, ");
316 strcpy (&str[stroff], "Rel Offset = 1");
323 /* BA_ACC & BA_RJT are decoded in this file itself instead of a traditional
324 * dedicated file and dissector format because the dissector would require some
325 * fields of the FC_HDR such as param in some cases, type in some others, the
326 * lower 4 bits of r_ctl in some other cases etc. So, we decode BLS & Link Ctl
327 * in this file itself.
330 dissect_fc_ba_acc (tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
332 /* Set up structures needed to add the protocol subtree and manage it */
334 proto_tree *acc_tree;
337 /* Make entries in Protocol column and Info column on summary display */
338 if (check_col(pinfo->cinfo, COL_PROTOCOL))
339 col_set_str(pinfo->cinfo, COL_PROTOCOL, "BLS");
341 if (check_col(pinfo->cinfo, COL_INFO))
342 col_set_str(pinfo->cinfo, COL_INFO, "BA_ACC");
345 ti = proto_tree_add_text (tree, tvb, 0, tvb_length (tvb), "Basic Link Svc");
346 acc_tree = proto_item_add_subtree (ti, ett_fcbls);
348 proto_tree_add_item (acc_tree, hf_fc_bls_seqid_vld, tvb, offset++, 1, FALSE);
349 proto_tree_add_item (acc_tree, hf_fc_bls_lastvld_seqid, tvb, offset++, 1, FALSE);
350 offset += 2; /* Skip reserved field */
351 proto_tree_add_item (acc_tree, hf_fc_bls_oxid, tvb, offset, 2, FALSE);
353 proto_tree_add_item (acc_tree, hf_fc_bls_rxid, tvb, offset, 2, FALSE);
355 proto_tree_add_item (acc_tree, hf_fc_bls_lowseqcnt, tvb, offset, 2, FALSE);
357 proto_tree_add_item (acc_tree, hf_fc_bls_hiseqcnt, tvb, offset, 2, FALSE);
362 dissect_fc_ba_rjt (tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
364 /* Set up structures needed to add the protocol subtree and manage it */
366 proto_tree *rjt_tree;
369 /* Make entries in Protocol column and Info column on summary display */
370 if (check_col(pinfo->cinfo, COL_PROTOCOL))
371 col_set_str(pinfo->cinfo, COL_PROTOCOL, "BLS");
373 if (check_col(pinfo->cinfo, COL_INFO))
374 col_set_str(pinfo->cinfo, COL_INFO, "BA_RJT");
377 ti = proto_tree_add_text (tree, tvb, 0, tvb_length (tvb), "Basic Link Svc");
378 rjt_tree = proto_item_add_subtree (ti, ett_fcbls);
380 proto_tree_add_item (rjt_tree, hf_fc_bls_rjtcode, tvb, offset+1, 1, FALSE);
381 proto_tree_add_item (rjt_tree, hf_fc_bls_rjtdetail, tvb, offset+2, 1, FALSE);
382 proto_tree_add_item (rjt_tree, hf_fc_bls_vendor, tvb, offset+3, 1, FALSE);
387 fc_get_ftype (guint8 r_ctl, guint8 type)
389 /* A simple attempt to determine the upper level protocol based on the
390 * r_ctl & type fields.
392 switch (r_ctl & 0xF0) {
393 case FC_RCTL_DEV_DATA:
396 if ((r_ctl == 0x2) || (r_ctl == 0x3))
397 return FC_FTYPE_SWILS;
399 return FC_FTYPE_UNDEF;
403 return FC_FTYPE_SCSI;
405 return FC_FTYPE_FCCT;
407 return FC_FTYPE_UNDEF;
411 if (((r_ctl & 0x0F) == 0x2) || ((r_ctl & 0x0F) == 0x3))
414 return FC_FTYPE_UNDEF;
416 case FC_RCTL_LINK_DATA:
417 return FC_FTYPE_LINKDATA;
426 return FC_FTYPE_UNDEF;
428 case FC_RCTL_LINK_CTL:
429 return FC_FTYPE_LINKCTL;
432 return FC_FTYPE_UNDEF;
436 /* Code to actually dissect the packets */
438 dissect_fc (tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
440 /* Set up structures needed to add the protocol subtree and manage it */
442 proto_tree *fc_tree = NULL;
444 int offset = 0, next_offset;
445 gboolean is_lastframe_inseq;
446 gboolean is_exchg_resp = 0;
447 fragment_data *fcfrag_head;
450 guint8 r_ctl, type, df_ctl;
461 /* Make entries in Protocol column and Info column on summary display */
462 if (check_col(pinfo->cinfo, COL_PROTOCOL))
463 col_set_str(pinfo->cinfo, COL_PROTOCOL, "FC");
465 r_ctl = tvb_get_guint8 (tvb, offset);
467 /* If the R_CTL is the EISL field, skip the first 8 bytes to retrieve the
468 * real FC header. EISL is Cisco-proprietary and is not decoded.
470 if (r_ctl == FC_RCTL_EISL) {
472 r_ctl = tvb_get_guint8 (tvb, offset);
475 type = tvb_get_guint8 (tvb, offset+8);
476 seqcnt = tvb_get_ntohs (tvb, offset+14);
477 param = tvb_get_ntohl (tvb, offset+20);
479 SET_ADDRESS (&pinfo->dst, AT_FC, 3, tvb_get_ptr (tvb, offset+1, 3));
480 SET_ADDRESS (&pinfo->src, AT_FC, 3, tvb_get_ptr (tvb, offset+5, 3));
481 pinfo->oxid = tvb_get_ntohs (tvb, offset+16);
482 pinfo->rxid = tvb_get_ntohs (tvb, offset+18);
483 pinfo->ptype = PT_EXCHG;
484 pinfo->r_ctl = r_ctl;
486 is_ack = ((r_ctl == 0xC0) || (r_ctl == 0xC1));
488 ftype = fc_get_ftype (r_ctl, type);
490 if (check_col (pinfo->cinfo, COL_INFO)) {
491 col_add_str (pinfo->cinfo, COL_INFO, match_strval (ftype, fc_ftype_vals));
493 if (ftype == FC_FTYPE_LINKCTL)
494 col_append_fstr (pinfo->cinfo, COL_INFO, ", %s",
495 match_strval ((r_ctl & 0x0F),
499 /* In the interest of speed, if "tree" is NULL, don't do any work not
500 necessary to generate protocol tree items. */
502 ti = proto_tree_add_protocol_format (tree, proto_fc, tvb, offset,
503 FC_HEADER_SIZE, "Fibre Channel");
504 fc_tree = proto_item_add_subtree (ti, ett_fc);
506 if (ftype == FC_FTYPE_LINKCTL) {
507 /* the lower 4 bits of R_CTL indicate the type of link ctl frame */
508 proto_tree_add_uint_format (fc_tree, hf_fc_rctl, tvb, offset,
512 val_to_str ((r_ctl & 0x0F),
513 fc_lctl_proto_val, "0x%x"));
515 else if (ftype == FC_FTYPE_BLS) {
516 /* the lower 4 bits of R_CTL indicate the type of BLS frame */
517 proto_tree_add_uint_format (fc_tree, hf_fc_rctl, tvb, offset,
521 val_to_str ((r_ctl & 0x0F),
522 fc_bls_proto_val, "0x%x"));
525 proto_tree_add_item (fc_tree, hf_fc_rctl, tvb, offset, 1, FALSE);
528 proto_tree_add_uint_hidden (fc_tree, hf_fc_ftype, tvb, offset, 1,
531 d_id=tvb_get_letoh24(tvb, offset+1);
532 proto_tree_add_string (fc_tree, hf_fc_did, tvb, offset+1, 3,
534 proto_tree_add_string_hidden (fc_tree, hf_fc_id, tvb, offset+1, 3,
537 proto_tree_add_item (fc_tree, hf_fc_csctl, tvb, offset+4, 1, FALSE);
539 s_id=tvb_get_letoh24(tvb, offset+5);
540 proto_tree_add_string (fc_tree, hf_fc_sid, tvb, offset+5, 3,
542 proto_tree_add_string_hidden (fc_tree, hf_fc_id, tvb, offset+5, 3,
545 if (ftype == FC_FTYPE_LINKCTL) {
546 if (((r_ctl & 0x0F) == FC_LCTL_FBSYB) ||
547 ((r_ctl & 0x0F) == FC_LCTL_FBSYL)) {
548 /* for F_BSY frames, the upper 4 bits of the type field specify the
549 * reason for the BSY.
551 proto_tree_add_uint_format (fc_tree, hf_fc_type, tvb,
552 offset+8, FC_TYPE_SIZE,
553 type, "Type: 0x%x(%s)", type,
554 fclctl_get_typestr (r_ctl & 0x0F,
558 proto_tree_add_item (fc_tree, hf_fc_type, tvb, offset+8, 1, FALSE);
562 proto_tree_add_item (fc_tree, hf_fc_type, tvb, offset+8, 1, FALSE);
565 proto_tree_add_uint_format (fc_tree, hf_fc_fctl, tvb, offset+9,
566 3, tvb_get_ntoh24 (tvb, offset+9),
568 tvb_get_ntoh24 (tvb, offset+9),
569 fctl_to_str (tvb_get_ptr (tvb, offset+9, 3),
572 /* Bit 23 if set => this frame is from the exchange originator */
573 if (tvb_get_guint8 (tvb, offset+9) & 0x80) {
574 proto_tree_add_boolean_hidden (fc_tree, hf_fc_exchg_orig, tvb,
576 proto_tree_add_boolean_hidden (fc_tree, hf_fc_exchg_resp, tvb,
580 proto_tree_add_boolean_hidden (fc_tree, hf_fc_exchg_orig, tvb,
582 proto_tree_add_boolean_hidden (fc_tree, hf_fc_exchg_resp, tvb,
586 proto_tree_add_item (fc_tree, hf_fc_seqid, tvb, offset+12, 1, FALSE);
588 df_ctl = tvb_get_guint8(tvb, offset+13);
590 proto_tree_add_uint (fc_tree, hf_fc_dfctl, tvb, offset+13, 1, df_ctl);
591 proto_tree_add_item (fc_tree, hf_fc_seqcnt, tvb, offset+14, 2, FALSE);
592 proto_tree_add_item (fc_tree, hf_fc_oxid, tvb, offset+16, 2, FALSE);
593 proto_tree_add_item (fc_tree, hf_fc_rxid, tvb, offset+18, 2, FALSE);
595 if (ftype == FC_FTYPE_LINKCTL) {
596 if (((r_ctl & 0x0F) == FC_LCTL_FRJT) ||
597 ((r_ctl & 0x0F) == FC_LCTL_PRJT) ||
598 ((r_ctl & 0x0F) == FC_LCTL_PBSY)) {
599 /* In all these cases of Link Ctl frame, the parameter field
600 * encodes the detailed error message
602 proto_tree_add_uint_format (fc_tree, hf_fc_param, tvb,
604 "Parameter: 0x%x(%s)", param,
605 fclctl_get_paramstr ((r_ctl & 0x0F),
609 proto_tree_add_item (fc_tree, hf_fc_param, tvb, offset+20, 4, FALSE);
612 else if (ftype == FC_FTYPE_BLS) {
613 if ((r_ctl & 0x0F) == FC_BLS_ABTS) {
614 proto_tree_add_uint_format (fc_tree, hf_fc_param, tvb,
616 "Parameter: 0x%x(%s)", param,
617 ((param & 0x0F) == 1 ? "Abort Sequence" :
621 proto_tree_add_item (fc_tree, hf_fc_param, tvb, offset+20,
626 proto_tree_add_item (fc_tree, hf_fc_param, tvb, offset+20, 4, FALSE);
630 /* Skip the Frame_Header */
631 next_offset = offset + FC_HEADER_SIZE;
633 /* Network_Header present? */
634 if (df_ctl & FC_DFCTL_NH) {
635 /* Yes - dissect it. */
637 proto_tree_add_string (fc_tree, hf_fc_nh_da, tvb, next_offset, 8,
638 fcwwn_to_str (tvb_get_ptr (tvb, offset, 8)));
639 proto_tree_add_string (fc_tree, hf_fc_nh_sa, tvb, offset+8, 8,
640 fcwwn_to_str (tvb_get_ptr (tvb, offset+8, 8)));
645 /* XXX - handle Association_Header and Device_Header here */
647 if (ftype == FC_FTYPE_LINKCTL) {
648 /* ACK_1 frames and other LINK_CTL frames echo the last seq bit if the
649 * packet they're ack'ing did not have it set. So, we'll incorrectly
650 * flag them as being fragmented when they're not. This fixes the
653 is_lastframe_inseq = TRUE;
656 is_lastframe_inseq = tvb_get_guint8 (tvb, offset+9) & 0x08;
657 is_exchg_resp = ((tvb_get_guint8 (tvb, offset+20) & 0x80) == 0x80);
660 frag_size = tvb_reported_length (tvb)-FC_HEADER_SIZE;
662 /* If there is an MDS header, we need to subtract the MDS trailer size */
663 if ((pinfo->ethertype == ETHERTYPE_UNK) || (pinfo->ethertype == ETHERTYPE_FCFT)) {
664 frag_size -= MDSHDR_TRAILER_SIZE;
666 else if (pinfo->ethertype == ETHERTYPE_BRDWALK) {
667 frag_size -= 8; /* 4 byte of FC CRC +
668 4 bytes of error+EOF = 8 bytes */
671 if (!is_lastframe_inseq) {
672 /* Show this only as a fragmented FC frame */
673 if (check_col (pinfo->cinfo, COL_INFO)) {
674 col_append_str (pinfo->cinfo, COL_INFO, " (Fragmented)");
678 /* If this is a fragment, attempt to check if fully reassembled frame is
679 * present, if we're configured to reassemble.
681 if ((ftype != FC_FTYPE_LINKCTL) && (ftype != FC_FTYPE_BLS) &&
682 (!is_lastframe_inseq || seqcnt) && fc_reassemble &&
683 tvb_bytes_exist(tvb, FC_HEADER_SIZE, frag_size)) {
684 /* Add this to the list of fragments */
685 frag_id = (pinfo->oxid << 16) | is_exchg_resp;
687 /* We assume that all frames are of the same max size */
688 fcfrag_head = fragment_add (tvb, FC_HEADER_SIZE, pinfo, frag_id,
690 seqcnt * fc_max_frame_size,
692 !is_lastframe_inseq);
695 next_tvb = tvb_new_real_data (fcfrag_head->data,
696 fcfrag_head->datalen,
697 fcfrag_head->datalen);
698 tvb_set_child_real_data_tvbuff(tvb, next_tvb);
700 /* Add the defragmented data to the data source list. */
701 add_new_data_source(pinfo, next_tvb, "Reassembled FC");
704 proto_tree_add_boolean_hidden (fc_tree, hf_fc_reassembled,
705 tvb, offset+9, 1, 1);
710 proto_tree_add_boolean_hidden (fc_tree, hf_fc_reassembled,
711 tvb, offset+9, 1, 0);
713 next_tvb = tvb_new_subset (tvb, next_offset, -1, -1);
714 call_dissector (data_handle, next_tvb, pinfo, tree);
720 proto_tree_add_boolean_hidden (fc_tree, hf_fc_reassembled,
721 tvb, offset+9, 1, 0);
723 next_tvb = tvb_new_subset (tvb, next_offset, -1, -1);
726 if ((ftype != FC_FTYPE_LINKCTL) && (ftype != FC_FTYPE_BLS)) {
727 if (!dissector_try_port (fcftype_dissector_table, ftype, next_tvb,
729 call_dissector (data_handle, next_tvb, pinfo, tree);
732 else if (ftype == FC_FTYPE_BLS) {
733 if ((r_ctl & 0x0F) == FC_BLS_BAACC) {
734 dissect_fc_ba_acc (next_tvb, pinfo, tree);
736 else if ((r_ctl & 0x0F) == FC_BLS_BARJT) {
737 dissect_fc_ba_rjt (next_tvb, pinfo, tree);
743 /* Register the protocol with Ethereal */
745 /* this format is require because a script is used to build the C function
746 that calls all the protocol registration.
750 proto_register_fc(void)
753 /* Setup list of header fields See Section 1.6.1 for details*/
754 static hf_register_info hf[] = {
756 { "R_CTL", "fc.r_ctl", FT_UINT8, BASE_HEX, NULL, 0x0,
759 {"Frame type", "fc.ftype", FT_UINT8, BASE_HEX, VALS(fc_ftype_vals),
760 0x0, "Derived Type", HFILL}},
762 { "Dest Addr", "fc.d_id", FT_STRING, BASE_HEX, NULL, 0x0,
763 "Destination Address", HFILL}},
765 {"CS_CTL", "fc.cs_ctl", FT_UINT8, BASE_HEX, NULL, 0x0,
768 {"Src Addr", "fc.s_id", FT_STRING, BASE_HEX, NULL, 0x0,
769 "Source Address", HFILL}},
771 {"Addr", "fc.id", FT_STRING, BASE_HEX, NULL, 0x0,
772 "Source or Destination Address", HFILL}},
774 {"Type", "fc.type", FT_UINT8, BASE_HEX, VALS (fc_fc4_val), 0x0,
777 {"F_CTL", "fc.f_ctl", FT_UINT24, BASE_HEX, NULL, 0x0, "", HFILL}},
779 {"SEQ_ID", "fc.seq_id", FT_UINT8, BASE_HEX, NULL, 0x0,
780 "Sequence ID", HFILL}},
782 {"DF_CTL", "fc.df_ctl", FT_UINT8, BASE_HEX, NULL, 0x0, "", HFILL}},
784 {"SEQ_CNT", "fc.seq_cnt", FT_UINT16, BASE_DEC, NULL, 0x0,
785 "Sequence Count", HFILL}},
787 {"OX_ID", "fc.ox_id", FT_UINT16, BASE_HEX, NULL, 0x0, "Originator ID",
790 {"RX_ID", "fc.rx_id", FT_UINT16, BASE_HEX, NULL, 0x0, "Receiver ID",
793 {"Parameter", "fc.parameter", FT_UINT32, BASE_HEX, NULL, 0x0, "Parameter",
797 {"Exchange Originator", "fc.xchg_orig", FT_BOOLEAN, BASE_HEX, NULL,
800 {"Exchange Responder", "fc.xchg_resp", FT_BOOLEAN, BASE_HEX, NULL,
802 { &hf_fc_reassembled,
803 {"Reassembled Frame", "fc.reassembled", FT_BOOLEAN, BASE_HEX, NULL,
806 {"Network DA", "fc.nethdr.da", FT_STRING, BASE_HEX, NULL,
809 {"Network SA", "fc.nethdr.sa", FT_STRING, BASE_HEX, NULL,
812 /* Basic Link Svc field definitions */
813 { &hf_fc_bls_seqid_vld,
814 {"SEQID Valid", "fc.bls_seqidvld", FT_UINT8, BASE_HEX,
815 VALS (fc_bls_seqid_val), 0x0, "", HFILL}},
816 { &hf_fc_bls_lastvld_seqid,
817 {"Last Valid SEQID", "fc.bls_lastseqid", FT_UINT8, BASE_HEX, NULL,
820 {"OXID", "fc.bls_oxid", FT_UINT16, BASE_HEX, NULL, 0x0, "", HFILL}},
822 {"RXID", "fc.bls_rxid", FT_UINT16, BASE_HEX, NULL, 0x0, "", HFILL}},
823 { &hf_fc_bls_lowseqcnt,
824 {"Low SEQCNT", "fc.bls_lseqcnt", FT_UINT16, BASE_HEX, NULL, 0x0, "",
826 { &hf_fc_bls_hiseqcnt,
827 {"High SEQCNT", "fc.bls_hseqcnt", FT_UINT16, BASE_HEX, NULL, 0x0, "",
829 { &hf_fc_bls_rjtcode,
830 {"Reason", "fc.bls_reason", FT_UINT8, BASE_HEX, VALS(fc_bls_barjt_val),
832 { &hf_fc_bls_rjtdetail,
833 {"Reason Explanantion", "fc.bls_rjtdetail", FT_UINT8, BASE_HEX,
834 VALS (fc_bls_barjt_det_val), 0x0, "", HFILL}},
836 {"Vendor Unique Reason", "fc.bls_vnduniq", FT_UINT8, BASE_HEX, NULL,
840 /* Setup protocol subtree array */
841 static gint *ett[] = {
848 /* Register the protocol name and description */
849 proto_fc = proto_register_protocol ("Fibre Channel", "FC", "fc");
850 register_dissector ("fc", dissect_fc, proto_fc);
852 /* Required function calls to register the header fields and subtrees used */
853 proto_register_field_array(proto_fc, hf, array_length(hf));
854 proto_register_subtree_array(ett, array_length(ett));
856 fcftype_dissector_table = register_dissector_table ("fc.ftype",
860 /* Register preferences */
861 fc_module = prefs_register_protocol (proto_fc, NULL);
862 prefs_register_bool_preference (fc_module,
864 "Reassemble multi-frame sequences",
865 "If enabled, reassembly of multi-frame "
868 prefs_register_uint_preference (fc_module,
869 "max_frame_size", "Max FC Frame Size",
870 "This is the size of non-last frames in a "
871 "multi-frame sequence", 10,
874 register_init_routine(fc_defragment_init);
878 /* If this dissector uses sub-dissector registration add a registration routine.
879 This format is required because a script is used to find these routines and
880 create the code that calls these routines.
883 proto_reg_handoff_fc (void)
885 dissector_handle_t fc_handle;
887 fc_handle = create_dissector_handle (dissect_fc, proto_fc);
889 data_handle = find_dissector("data");