nexmon – Rev 1
?pathlinks?
/* packet-ipars.c
* Routines for IPARS/ALC (International Passenger Airline Reservation System/Airline Link Control) WAN protocol dissection
* Copyright 2007, Fulko Hew, SITA INC Canada, Inc.
*
* Wireshark - Network traffic analyzer
* By Gerald Combs <gerald@wireshark.org>
* Copyright 1998 Gerald Combs
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*/
/* NOTE: This should be rewritten to be more in line with how packet-uts.c is
* written so that there are filterable fields available for IPARS too.
*/
#include "config.h"
#include <epan/packet.h>
#include <wsutil/str_util.h>
void proto_register_ipars(void);
static int proto_ipars = -1;
static guint8 ipars_eomtype = G_MAXUINT8;
static gint ett_ipars = -1;
#define S1 (0x00)
#define S2 (0x20)
#define GA (0x03)
#define EOMpb (0x10)
#define EOMc (0x11)
#define EOMu (0x12)
#define EOMi (0x13)
#define MAX_EOM_MSG_SIZE (16) /* max size of an EOMx indicator string */
static int
dissect_ipars(tvbuff_t *tvb, packet_info *pinfo _U_ , proto_tree *tree, void* data _U_)
{
int bytes;
guint8 ia = 0, ta = 0, cmd = 0, la = 0;
tvbuff_t *next_tvb;
int offset = 0;
gchar *eom_msg;
eom_msg = (gchar *)wmem_alloc(wmem_packet_scope(), MAX_EOM_MSG_SIZE);
eom_msg[0] = 0;
col_clear(pinfo->cinfo, COL_INFO);
col_set_str(pinfo->cinfo, COL_PROTOCOL, "IPARS");
if (tvb_captured_length_remaining(tvb, 0) >= 2 ) {
ia = tvb_get_guint8(tvb, 0) & 0x3f;
ta = tvb_get_guint8(tvb, 1) & 0x3f;
if (ia == S1 && ta == S2) { /* if the first two bytes are S1/S2 skip over them */
offset = 2;
}
}
if (tvb_captured_length_remaining(tvb, offset) >= 1) ia = tvb_get_guint8(tvb, offset + 0);
if (tvb_captured_length_remaining(tvb, offset) >= 2) ta = tvb_get_guint8(tvb, offset + 1);
if (ia == 0x83 || ia == 0x43 || ia == GA) { /* if it's an FPGA or 'corresponsdance code' 'go ahead'... */
if (tvb_captured_length_remaining(tvb, offset) > 2) { /* if the msg is long, it must have been a 'poll' */
col_add_fstr(pinfo->cinfo, COL_INFO, "Poll IA: %2.2X", ta);
} else { /* if it's short, then it was a 'no traffic' response */
if (tvb_captured_length_remaining(tvb, offset) >= 2 ) {
col_add_fstr(pinfo->cinfo, COL_INFO, "GoAhead NextIA (0x%2.2X)", ta);
} else {
col_set_str(pinfo->cinfo, COL_INFO, "GoAhead NextIA");
}
}
} else { /* if it's not a 'go ahead'... it must be some kind of data message */
ia &= 0x3f;
ta &= 0x3f;
if (ta == 0x20) {
col_add_fstr(pinfo->cinfo, COL_INFO, "Reset IA: %2.2X", ia); /* the TA character was the 'reset' command */
}
if (tvb_captured_length_remaining(tvb, offset) >= 3) cmd = tvb_get_guint8(tvb, offset + 2) & 0x3f; /* get the first two bytes of the data message */
if (tvb_captured_length_remaining(tvb, offset) >= 4) la = tvb_get_guint8(tvb, offset + 3) & 0x3f;
if (cmd == 0x1f && la == 0x38) {
col_add_fstr(pinfo->cinfo, COL_INFO, "Please Resend - IA: %2.2X TA: %2.2X", ia, ta); /* light the resend indicator */
} else if (cmd == 0x2a && la == 0x05) {
col_add_fstr(pinfo->cinfo, COL_INFO, "Unsolicited Msg Indicator - IA: %2.2X TA: %2.2X", ia, ta); /* light the unsolicited msg indicator */
} else {
col_add_fstr(pinfo->cinfo, COL_INFO, "Data Msg - IA: %2.2X TA: %2.2X", ia, ta); /* it was a data message (display or printer */
}
}
if (tree) {
bytes = tvb_captured_length_remaining(tvb, 0);
if (bytes > 0) {
proto_tree *ipars_tree;
proto_item *ti;
ia = tvb_get_guint8(tvb, 0) & 0x3f;
ti = proto_tree_add_protocol_format(tree, proto_ipars, tvb, 0, -1, "Ipars");
ipars_tree = proto_item_add_subtree(ti, ett_ipars);
if (ia == 0x03) {
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb, 0, 1, "GoAhead Next IA");
col_set_str(pinfo->cinfo, COL_INFO, "GoAhead");
return tvb_captured_length(tvb);
} else if (ia != S1) {
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb,
0,
bytes, "Unknown format - Data (%d byte%s)", bytes,
plurality(bytes, "", "s"));
return tvb_captured_length(tvb);
}
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb, 0, 1, "S1");
ia = tvb_get_guint8(tvb, 1) & 0x3f;
if (ia != S2) {
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb,
0,
bytes, "Unknown format - Data (%d byte%s)", bytes,
plurality(bytes, "", "s"));
return tvb_captured_length(tvb);
}
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb, 1, 1, "S2");
ia = tvb_get_guint8(tvb, 2) & 0x3f;
if (ia == GA) {
ia = tvb_get_guint8(tvb, 3) & 0x3f;
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb, 2, 2, "GoAhead IA: %2.2X", ia);
ipars_eomtype = tvb_get_guint8(tvb, 4) & 0x3f;
switch (ipars_eomtype) {
case EOMc: g_snprintf(eom_msg, MAX_EOM_MSG_SIZE, "EOMc"); break;
case EOMi: g_snprintf(eom_msg, MAX_EOM_MSG_SIZE, "EOMi"); break;
case EOMu: g_snprintf(eom_msg, MAX_EOM_MSG_SIZE, "EOMu"); break;
case EOMpb: g_snprintf(eom_msg, MAX_EOM_MSG_SIZE, "EOMpb"); break;
default: g_snprintf(eom_msg, MAX_EOM_MSG_SIZE, "Unknown EOM type (0x%2.2X)", ia); break;
}
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb, 4, 1, "%s", eom_msg);
proto_tree_add_protocol_format(ipars_tree, proto_ipars, tvb, 5, 1, "Good BCC");
} else {
next_tvb = tvb_new_subset_remaining(tvb, 3);
proto_tree_add_protocol_format(ipars_tree, proto_ipars, next_tvb,
0,
bytes, "Data (%d byte%s)", bytes,
plurality(bytes, "", "s"));
return tvb_captured_length(tvb);
}
}
}
return tvb_captured_length(tvb);
}
void
proto_register_ipars(void)
{
static gint *ett[] = {
&ett_ipars,
};
proto_ipars = proto_register_protocol("International Passenger Airline Reservation System", "IPARS", "ipars");
proto_register_subtree_array(ett, array_length(ett));
register_dissector("ipars", dissect_ipars, proto_ipars);
}
/*
* Editor modelines - http://www.wireshark.org/tools/modelines.html
*
* Local variables:
* c-basic-offset: 4
* tab-width: 8
* indent-tabs-mode: nil
* End:
*
* vi: set shiftwidth=4 tabstop=8 expandtab:
* :indentSize=4:tabSize=8:noTabs=true:
*/