/* Do not modify this file. */ /* It is created automatically by the ASN.1 to Wireshark dissector compiler */ /* packet-ros.c */ /* ../../tools/asn2wrs.py -b -e -p ros -c ros.cnf -s packet-ros-template ros.asn Remote-Operations-Information-Objects.asn */ /* Input file: packet-ros-template.c */ #line 1 "packet-ros-template.c" /* packet-ros_asn1.c * Routines for ROS packet dissection * Graeme Lunt 2005 * * $Id: packet-ros.c 26670 2008-11-01 22:30:14Z etxrab $ * * Wireshark - Network traffic analyzer * By Gerald Combs * 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #ifdef HAVE_CONFIG_H # include "config.h" #endif #include #include #include #include #include #include #include #include "packet-ber.h" #include "packet-pres.h" #include "packet-ros.h" #define PNAME "X.880 OSI Remote Operations Service" #define PSNAME "ROS" #define PFNAME "ros" /* Initialize the protocol and registered fields */ int proto_ros = -1; static struct SESSION_DATA_STRUCTURE* session = NULL; static proto_tree *top_tree=NULL; static guint32 opcode; static guint32 invokeid; static dissector_handle_t ros_handle = NULL; typedef struct ros_conv_info_t { struct ros_conv_info_t *next; GHashTable *unmatched; /* unmatched operations */ GHashTable *matched; /* matched operations */ } ros_conv_info_t; static ros_conv_info_t *ros_info_items = NULL; typedef struct ros_call_response { gboolean is_request; guint32 req_frame; nstime_t req_time; guint32 rep_frame; guint invokeId; } ros_call_response_t; static int hf_ros_response_in = -1; static int hf_ros_response_to = -1; static int hf_ros_time = -1; /*--- Included file: packet-ros-hf.c ---*/ #line 1 "packet-ros-hf.c" static int hf_ros_invoke = -1; /* Invoke */ static int hf_ros_returnResult = -1; /* ReturnResult */ static int hf_ros_returnError = -1; /* ReturnError */ static int hf_ros_reject = -1; /* T_reject */ static int hf_ros_bind_invoke = -1; /* T_bind_invoke */ static int hf_ros_bind_result = -1; /* T_bind_result */ static int hf_ros_bind_error = -1; /* T_bind_error */ static int hf_ros_unbind_invoke = -1; /* T_unbind_invoke */ static int hf_ros_unbind_result = -1; /* T_unbind_result */ static int hf_ros_unbind_error = -1; /* T_unbind_error */ static int hf_ros_invokeId = -1; /* InvokeId */ static int hf_ros_linkedId = -1; /* INTEGER */ static int hf_ros_opcode = -1; /* OperationCode */ static int hf_ros_argument = -1; /* T_argument */ static int hf_ros_result = -1; /* T_result */ static int hf_ros_operationResult = -1; /* OperationResult */ static int hf_ros_errcode = -1; /* ErrorCode */ static int hf_ros_parameter = -1; /* T_parameter */ static int hf_ros_problem = -1; /* T_problem */ static int hf_ros_general = -1; /* GeneralProblem */ static int hf_ros_invokeProblem = -1; /* InvokeProblem */ static int hf_ros_rejectResult = -1; /* ReturnResultProblem */ static int hf_ros_rejectError = -1; /* ReturnErrorProblem */ static int hf_ros_present = -1; /* T_present */ static int hf_ros_absent = -1; /* NULL */ static int hf_ros_local = -1; /* INTEGER */ static int hf_ros_global = -1; /* OBJECT_IDENTIFIER */ /*--- End of included file: packet-ros-hf.c ---*/ #line 80 "packet-ros-template.c" /* Initialize the subtree pointers */ static gint ett_ros = -1; /*--- Included file: packet-ros-ett.c ---*/ #line 1 "packet-ros-ett.c" static gint ett_ros_ROS = -1; static gint ett_ros_Invoke = -1; static gint ett_ros_ReturnResult = -1; static gint ett_ros_T_result = -1; static gint ett_ros_ReturnError = -1; static gint ett_ros_Reject = -1; static gint ett_ros_T_problem = -1; static gint ett_ros_InvokeId = -1; static gint ett_ros_Code = -1; /*--- End of included file: packet-ros-ett.c ---*/ #line 84 "packet-ros-template.c" static dissector_table_t ros_oid_dissector_table=NULL; static GHashTable *oid_table=NULL; static GHashTable *protocol_table=NULL; static gint ett_ros_unknown = -1; void register_ros_oid_dissector_handle(const char *oid, dissector_handle_t dissector, int proto _U_, const char *name, gboolean uses_rtse) { dissector_add_string("ros.oid", oid, dissector); g_hash_table_insert(oid_table, (gpointer)oid, (gpointer)name); if(!uses_rtse) /* if we are not using RTSE, then we must register ROS with BER (ACSE) */ register_ber_oid_dissector_handle(oid, ros_handle, proto, name); } void register_ros_protocol_info(const char *oid, const ros_info_t *rinfo, int proto _U_, const char *name, gboolean uses_rtse) { g_hash_table_insert(protocol_table, (gpointer)oid, (gpointer)rinfo); g_hash_table_insert(oid_table, (gpointer)oid, (gpointer)name); if(!uses_rtse) /* if we are not using RTSE, then we must register ROS with BER (ACSE) */ register_ber_oid_dissector_handle(oid, ros_handle, proto, name); } static new_dissector_t ros_lookup_opr_dissector(gint32 opcode, const ros_opr_t *operations, gboolean argument) { /* we don't know what order asn2wrs/module definition is, so ... */ if(operations) { for(;operations->arg_pdu != (new_dissector_t)(-1); operations++) if(operations->opcode == opcode) return argument ? operations->arg_pdu : operations->res_pdu; } return NULL; } static new_dissector_t ros_lookup_err_dissector(gint32 errcode, const ros_err_t *errors) { /* we don't know what order asn2wrs/module definition is, so ... */ if(errors) { for(;errors->err_pdu != (new_dissector_t) (-1); errors++) { if(errors->errcode == errcode) return errors->err_pdu; } } return NULL; } static gboolean ros_try_string(const char *oid, tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { ros_info_t *rinfo; gint32 opcode = 0; const gchar *opname = NULL; const gchar *suffix = NULL; int offset = 0; new_dissector_t opdissector = NULL; const value_string *lookup; proto_item *item=NULL; proto_tree *ros_tree=NULL; if((rinfo = (ros_info_t*)g_hash_table_lookup(protocol_table, oid)) != NULL) { if(tree){ item = proto_tree_add_item(tree, *(rinfo->proto), tvb, 0, -1, FALSE); ros_tree = proto_item_add_subtree(item, *(rinfo->ett_proto)); } if (check_col(pinfo->cinfo, COL_PROTOCOL)) col_set_str(pinfo->cinfo, COL_PROTOCOL, rinfo->name); /* if this is a bind operation */ if((session->ros_op & ROS_OP_TYPE_MASK) == ROS_OP_BIND) { /* use the in-built operation codes */ if((session->ros_op & ROS_OP_PDU_MASK) == ROS_OP_ERROR) opcode = err_ros_bind; else opcode = op_ros_bind; } else /* otherwise just take the opcode */ opcode = session->ros_op & ROS_OP_OPCODE_MASK; /* default lookup in the operations */ lookup = rinfo->opr_code_strings; switch(session->ros_op & ROS_OP_PDU_MASK) { case ROS_OP_ARGUMENT: opdissector = ros_lookup_opr_dissector(opcode, rinfo->opr_code_dissectors, TRUE); suffix = "_argument"; break; case ROS_OP_RESULT: opdissector = ros_lookup_opr_dissector(opcode, rinfo->opr_code_dissectors, FALSE); suffix = "_result"; break; case ROS_OP_ERROR: opdissector = ros_lookup_err_dissector(opcode, rinfo->err_code_dissectors); lookup = rinfo->err_code_strings; break; default: break; } if(opdissector) { opname = val_to_str(opcode, lookup, "Unknown opcode (%d)"); if (check_col(pinfo->cinfo, COL_INFO)) { col_set_str(pinfo->cinfo, COL_INFO, opname); if(suffix) col_append_str(pinfo->cinfo, COL_INFO, suffix); } offset = (*opdissector)(tvb, pinfo, ros_tree); return TRUE; } } return FALSE; } static int call_ros_oid_callback(const char *oid, tvbuff_t *tvb, int offset, packet_info *pinfo, proto_tree *tree) { tvbuff_t *next_tvb; next_tvb = tvb_new_subset(tvb, offset, tvb_length_remaining(tvb, offset), tvb_reported_length_remaining(tvb, offset)); if(!ros_try_string(oid, next_tvb, pinfo, tree) && !dissector_try_string(ros_oid_dissector_table, oid, next_tvb, pinfo, tree)){ proto_item *item=NULL; proto_tree *next_tree=NULL; item=proto_tree_add_text(tree, next_tvb, 0, tvb_length_remaining(tvb, offset), "ROS: Dissector for OID:%s not implemented. Contact Wireshark developers if you want this supported", oid); if(item){ next_tree=proto_item_add_subtree(item, ett_ros_unknown); } dissect_unknown_ber(pinfo, next_tvb, offset, next_tree); } /*XXX until we change the #.REGISTER signature for _PDU()s * into new_dissector_t we have to do this kludge with * manually step past the content in the ANY type. */ offset+=tvb_length_remaining(tvb, offset); return offset; } static guint ros_info_hash_matched(gconstpointer k) { const ros_call_response_t *key = k; return key->invokeId; } static gint ros_info_equal_matched(gconstpointer k1, gconstpointer k2) { const ros_call_response_t *key1 = k1; const ros_call_response_t *key2 = k2; if( key1->req_frame && key2->req_frame && (key1->req_frame!=key2->req_frame) ){ return 0; } /* a response may span multiple frames if( key1->rep_frame && key2->rep_frame && (key1->rep_frame!=key2->rep_frame) ){ return 0; } */ return key1->invokeId==key2->invokeId; } static guint ros_info_hash_unmatched(gconstpointer k) { const ros_call_response_t *key = k; return key->invokeId; } static gint ros_info_equal_unmatched(gconstpointer k1, gconstpointer k2) { const ros_call_response_t *key1 = k1; const ros_call_response_t *key2 = k2; return key1->invokeId==key2->invokeId; } static ros_call_response_t * ros_match_call_response(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, guint invokeId, gboolean isInvoke) { ros_call_response_t rcr, *rcrp=NULL; ros_conv_info_t *ros_info = ros_info_items; /* first see if we have already matched this */ rcr.invokeId=invokeId; rcr.is_request = isInvoke; if(isInvoke) { rcr.req_frame=pinfo->fd->num; rcr.rep_frame=0; } else { rcr.req_frame=0; rcr.rep_frame=pinfo->fd->num; } rcrp=g_hash_table_lookup(ros_info->matched, &rcr); if(rcrp) { /* we have found a match */ rcrp->is_request=rcr.is_request; } else { /* we haven't found a match - try and match it up */ if(isInvoke) { /* this a a request - add it to the unmatched list */ /* check that we dont already have one of those in the unmatched list and if so remove it */ rcr.invokeId=invokeId; rcrp=g_hash_table_lookup(ros_info->unmatched, &rcr); if(rcrp){ g_hash_table_remove(ros_info->unmatched, rcrp); } /* if we cant reuse the old one, grab a new chunk */ if(!rcrp){ rcrp=se_alloc(sizeof(ros_call_response_t)); } rcrp->invokeId=invokeId; rcrp->req_frame=pinfo->fd->num; rcrp->req_time=pinfo->fd->abs_ts; rcrp->rep_frame=0; rcrp->is_request=TRUE; g_hash_table_insert(ros_info->unmatched, rcrp, rcrp); return NULL; } else { /* this is a result - it should be in our unmatched list */ rcr.invokeId=invokeId; rcrp=g_hash_table_lookup(ros_info->unmatched, &rcr); if(rcrp){ if(!rcrp->rep_frame){ g_hash_table_remove(ros_info->unmatched, rcrp); rcrp->rep_frame=pinfo->fd->num; rcrp->is_request=FALSE; g_hash_table_insert(ros_info->matched, rcrp, rcrp); } } } } if(rcrp){ /* we have found a match */ proto_item *item = NULL; if(rcrp->is_request){ item=proto_tree_add_uint(tree, hf_ros_response_in, tvb, 0, 0, rcrp->rep_frame); PROTO_ITEM_SET_GENERATED (item); } else { nstime_t ns; item=proto_tree_add_uint(tree, hf_ros_response_to, tvb, 0, 0, rcrp->req_frame); PROTO_ITEM_SET_GENERATED (item); nstime_delta(&ns, &pinfo->fd->abs_ts, &rcrp->req_time); item=proto_tree_add_time(tree, hf_ros_time, tvb, 0, 0, &ns); PROTO_ITEM_SET_GENERATED (item); } } return rcrp; } /*--- Included file: packet-ros-fn.c ---*/ #line 1 "packet-ros-fn.c" static int dissect_ros_T_present(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &invokeid); return offset; } static int dissect_ros_NULL(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_null(implicit_tag, actx, tree, tvb, offset, hf_index); return offset; } const value_string ros_InvokeId_vals[] = { { 0, "present" }, { 1, "absent" }, { 0, NULL } }; static const ber_choice_t InvokeId_choice[] = { { 0, &hf_ros_present , BER_CLASS_UNI, BER_UNI_TAG_INTEGER, BER_FLAGS_NOOWNTAG, dissect_ros_T_present }, { 1, &hf_ros_absent , BER_CLASS_UNI, BER_UNI_TAG_NULL, BER_FLAGS_NOOWNTAG, dissect_ros_NULL }, { 0, NULL, 0, 0, 0, NULL } }; int dissect_ros_InvokeId(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_choice(actx, tree, tvb, offset, InvokeId_choice, hf_index, ett_ros_InvokeId, NULL); return offset; } static int dissect_ros_INTEGER(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, NULL); return offset; } static int dissect_ros_OperationCode(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &opcode); return offset; } static int dissect_ros_T_argument(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 30 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "invoke argument"); ros_match_call_response(tvb, actx->pinfo, tree, invokeid, TRUE); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_INVOKE | ROS_OP_ARGUMENT); /* now add the opcode */ session->ros_op |= opcode; offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static const ber_sequence_t Invoke_sequence[] = { { &hf_ros_invokeId , BER_CLASS_ANY/*choice*/, -1/*choice*/, BER_FLAGS_NOOWNTAG|BER_FLAGS_NOTCHKTAG, dissect_ros_InvokeId }, { &hf_ros_linkedId , BER_CLASS_CON, 0, BER_FLAGS_OPTIONAL|BER_FLAGS_IMPLTAG, dissect_ros_INTEGER }, { &hf_ros_opcode , BER_CLASS_UNI, BER_UNI_TAG_INTEGER, BER_FLAGS_NOOWNTAG, dissect_ros_OperationCode }, { &hf_ros_argument , BER_CLASS_ANY, 0, BER_FLAGS_OPTIONAL|BER_FLAGS_NOOWNTAG, dissect_ros_T_argument }, { NULL, 0, 0, 0, NULL } }; static int dissect_ros_Invoke(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_sequence(implicit_tag, actx, tree, tvb, offset, Invoke_sequence, hf_index, ett_ros_Invoke); return offset; } static int dissect_ros_OperationResult(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 45 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "return result"); ros_match_call_response(tvb, actx->pinfo, tree, invokeid, FALSE); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_INVOKE | ROS_OP_RESULT); /* now add the opcode */ session->ros_op |= opcode; offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static const ber_sequence_t T_result_sequence[] = { { &hf_ros_opcode , BER_CLASS_UNI, BER_UNI_TAG_INTEGER, BER_FLAGS_NOOWNTAG, dissect_ros_OperationCode }, { &hf_ros_operationResult , BER_CLASS_ANY, 0, BER_FLAGS_NOOWNTAG, dissect_ros_OperationResult }, { NULL, 0, 0, 0, NULL } }; static int dissect_ros_T_result(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_sequence(implicit_tag, actx, tree, tvb, offset, T_result_sequence, hf_index, ett_ros_T_result); return offset; } static const ber_sequence_t ReturnResult_sequence[] = { { &hf_ros_invokeId , BER_CLASS_ANY/*choice*/, -1/*choice*/, BER_FLAGS_NOOWNTAG|BER_FLAGS_NOTCHKTAG, dissect_ros_InvokeId }, { &hf_ros_result , BER_CLASS_UNI, BER_UNI_TAG_SEQUENCE, BER_FLAGS_OPTIONAL|BER_FLAGS_NOOWNTAG, dissect_ros_T_result }, { NULL, 0, 0, 0, NULL } }; static int dissect_ros_ReturnResult(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_sequence(implicit_tag, actx, tree, tvb, offset, ReturnResult_sequence, hf_index, ett_ros_ReturnResult); return offset; } static int dissect_ros_ErrorCode(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &opcode); return offset; } static int dissect_ros_T_parameter(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 60 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "return result"); ros_match_call_response(tvb, actx->pinfo, tree, invokeid, FALSE); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_INVOKE | ROS_OP_ERROR); /* now add the opcode (really the error code) */ session->ros_op |= opcode; offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static const ber_sequence_t ReturnError_sequence[] = { { &hf_ros_invokeId , BER_CLASS_ANY/*choice*/, -1/*choice*/, BER_FLAGS_NOOWNTAG|BER_FLAGS_NOTCHKTAG, dissect_ros_InvokeId }, { &hf_ros_errcode , BER_CLASS_UNI, BER_UNI_TAG_INTEGER, BER_FLAGS_NOOWNTAG, dissect_ros_ErrorCode }, { &hf_ros_parameter , BER_CLASS_ANY, 0, BER_FLAGS_OPTIONAL|BER_FLAGS_NOOWNTAG, dissect_ros_T_parameter }, { NULL, 0, 0, 0, NULL } }; static int dissect_ros_ReturnError(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_sequence(implicit_tag, actx, tree, tvb, offset, ReturnError_sequence, hf_index, ett_ros_ReturnError); return offset; } static const value_string ros_GeneralProblem_vals[] = { { 0, "unrecognizedPDU" }, { 1, "mistypedPDU" }, { 2, "badlyStructuredPDU" }, { 0, NULL } }; static int dissect_ros_GeneralProblem(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 152 "ros.cnf" guint32 problem; offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &problem); if (check_col(actx->pinfo->cinfo, COL_INFO)) { col_append_fstr(actx->pinfo->cinfo, COL_INFO, " %s", val_to_str(problem, ros_GeneralProblem_vals, "GeneralProblem(%d)")); } return offset; } static const value_string ros_InvokeProblem_vals[] = { { 0, "duplicateInvocation" }, { 1, "unrecognizedOperation" }, { 2, "mistypedArgument" }, { 3, "resourceLimitation" }, { 4, "releaseInProgress" }, { 5, "unrecognizedLinkedId" }, { 6, "linkedResponseUnexpected" }, { 7, "unexpectedLinkedOperation" }, { 0, NULL } }; static int dissect_ros_InvokeProblem(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 164 "ros.cnf" guint32 problem; offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &problem); if (check_col(actx->pinfo->cinfo, COL_INFO)) { col_append_fstr(actx->pinfo->cinfo, COL_INFO, " %s", val_to_str(problem, ros_InvokeProblem_vals, "InvokeProblem(%d)")); } return offset; } static const value_string ros_ReturnResultProblem_vals[] = { { 0, "unrecognizedInvocation" }, { 1, "resultResponseUnexpected" }, { 2, "mistypedResult" }, { 0, NULL } }; static int dissect_ros_ReturnResultProblem(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 176 "ros.cnf" guint32 problem; offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &problem); if (check_col(actx->pinfo->cinfo, COL_INFO)) { col_append_fstr(actx->pinfo->cinfo, COL_INFO, " %s", val_to_str(problem, ros_ReturnResultProblem_vals, "ReturnResultProblem(%d)")); } return offset; } static const value_string ros_ReturnErrorProblem_vals[] = { { 0, "unrecognizedInvocation" }, { 1, "errorResponseUnexpected" }, { 2, "unrecognizedError" }, { 3, "unexpectedError" }, { 4, "mistypedParameter" }, { 0, NULL } }; static int dissect_ros_ReturnErrorProblem(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 188 "ros.cnf" guint32 problem; offset = dissect_ber_integer(implicit_tag, actx, tree, tvb, offset, hf_index, &problem); if (check_col(actx->pinfo->cinfo, COL_INFO)) { col_append_fstr(actx->pinfo->cinfo, COL_INFO, " %s", val_to_str(problem, ros_ReturnErrorProblem_vals, "ReturnErrorProblem(%d)")); } return offset; } static const value_string ros_T_problem_vals[] = { { 0, "general" }, { 1, "invoke" }, { 2, "returnResult" }, { 3, "returnError" }, { 0, NULL } }; static const ber_choice_t T_problem_choice[] = { { 0, &hf_ros_general , BER_CLASS_CON, 0, BER_FLAGS_IMPLTAG, dissect_ros_GeneralProblem }, { 1, &hf_ros_invokeProblem , BER_CLASS_CON, 1, BER_FLAGS_IMPLTAG, dissect_ros_InvokeProblem }, { 2, &hf_ros_rejectResult , BER_CLASS_CON, 2, BER_FLAGS_IMPLTAG, dissect_ros_ReturnResultProblem }, { 3, &hf_ros_rejectError , BER_CLASS_CON, 3, BER_FLAGS_IMPLTAG, dissect_ros_ReturnErrorProblem }, { 0, NULL, 0, 0, 0, NULL } }; static int dissect_ros_T_problem(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_choice(actx, tree, tvb, offset, T_problem_choice, hf_index, ett_ros_T_problem, NULL); return offset; } static const ber_sequence_t Reject_sequence[] = { { &hf_ros_invokeId , BER_CLASS_ANY/*choice*/, -1/*choice*/, BER_FLAGS_NOOWNTAG|BER_FLAGS_NOTCHKTAG, dissect_ros_InvokeId }, { &hf_ros_problem , BER_CLASS_ANY/*choice*/, -1/*choice*/, BER_FLAGS_NOOWNTAG|BER_FLAGS_NOTCHKTAG, dissect_ros_T_problem }, { NULL, 0, 0, 0, NULL } }; static int dissect_ros_Reject(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_sequence(implicit_tag, actx, tree, tvb, offset, Reject_sequence, hf_index, ett_ros_Reject); return offset; } static int dissect_ros_T_reject(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 144 "ros.cnf" if(check_col(actx->pinfo->cinfo, COL_INFO)) col_set_str(actx->pinfo->cinfo, COL_INFO, "Reject"); offset = dissect_ros_Reject(implicit_tag, tvb, offset, actx, tree, hf_index); return offset; } static int dissect_ros_T_bind_invoke(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 76 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "bind-invoke"); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_BIND | ROS_OP_ARGUMENT); offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static int dissect_ros_T_bind_result(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 87 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "bind-result"); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_BIND | ROS_OP_RESULT); offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static int dissect_ros_T_bind_error(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 98 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "bind-error"); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_BIND | ROS_OP_ERROR); offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static int dissect_ros_T_unbind_invoke(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 110 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "unbind-invoke"); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_UNBIND | ROS_OP_ARGUMENT); offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static int dissect_ros_T_unbind_result(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 122 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "unbind-result"); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_UNBIND | ROS_OP_RESULT); offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } static int dissect_ros_T_unbind_error(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { #line 133 "ros.cnf" char *oid; /* not sure what the length should be - -1 for now */ proto_tree_add_text(tree, tvb, offset,-1, "unbind-error"); if(session && session->pres_ctx_id && (oid = find_oid_by_pres_ctx_id(actx->pinfo, session->pres_ctx_id))) { /* this should be ROS! */ session->ros_op = (ROS_OP_UNBIND | ROS_OP_ERROR); offset = call_ros_oid_callback(oid, tvb, offset, actx->pinfo, top_tree); } return offset; } const value_string ros_ROS_vals[] = { { 1, "invoke" }, { 2, "returnResult" }, { 3, "returnError" }, { 4, "reject" }, { 16, "bind-invoke" }, { 17, "bind-result" }, { 18, "bind-error" }, { 19, "unbind-invoke" }, { 20, "unbind-result" }, { 21, "unbind-error" }, { 0, NULL } }; static const ber_choice_t ROS_choice[] = { { 1, &hf_ros_invoke , BER_CLASS_CON, 1, BER_FLAGS_IMPLTAG, dissect_ros_Invoke }, { 2, &hf_ros_returnResult , BER_CLASS_CON, 2, BER_FLAGS_IMPLTAG, dissect_ros_ReturnResult }, { 3, &hf_ros_returnError , BER_CLASS_CON, 3, BER_FLAGS_IMPLTAG, dissect_ros_ReturnError }, { 4, &hf_ros_reject , BER_CLASS_CON, 4, BER_FLAGS_IMPLTAG, dissect_ros_T_reject }, { 16, &hf_ros_bind_invoke , BER_CLASS_CON, 16, BER_FLAGS_IMPLTAG, dissect_ros_T_bind_invoke }, { 17, &hf_ros_bind_result , BER_CLASS_CON, 17, BER_FLAGS_IMPLTAG, dissect_ros_T_bind_result }, { 18, &hf_ros_bind_error , BER_CLASS_CON, 18, BER_FLAGS_IMPLTAG, dissect_ros_T_bind_error }, { 19, &hf_ros_unbind_invoke , BER_CLASS_CON, 19, BER_FLAGS_IMPLTAG, dissect_ros_T_unbind_invoke }, { 20, &hf_ros_unbind_result , BER_CLASS_CON, 20, BER_FLAGS_IMPLTAG, dissect_ros_T_unbind_result }, { 21, &hf_ros_unbind_error , BER_CLASS_CON, 21, BER_FLAGS_IMPLTAG, dissect_ros_T_unbind_error }, { 0, NULL, 0, 0, 0, NULL } }; int dissect_ros_ROS(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_choice(actx, tree, tvb, offset, ROS_choice, hf_index, ett_ros_ROS, NULL); return offset; } static int dissect_ros_OBJECT_IDENTIFIER(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_object_identifier(implicit_tag, actx, tree, tvb, offset, hf_index, NULL); return offset; } const value_string ros_Code_vals[] = { { 0, "local" }, { 1, "global" }, { 0, NULL } }; static const ber_choice_t Code_choice[] = { { 0, &hf_ros_local , BER_CLASS_UNI, BER_UNI_TAG_INTEGER, BER_FLAGS_NOOWNTAG, dissect_ros_INTEGER }, { 1, &hf_ros_global , BER_CLASS_UNI, BER_UNI_TAG_OID, BER_FLAGS_NOOWNTAG, dissect_ros_OBJECT_IDENTIFIER }, { 0, NULL, 0, 0, 0, NULL } }; int dissect_ros_Code(gboolean implicit_tag _U_, tvbuff_t *tvb _U_, int offset _U_, asn1_ctx_t *actx _U_, proto_tree *tree _U_, int hf_index _U_) { offset = dissect_ber_choice(actx, tree, tvb, offset, Code_choice, hf_index, ett_ros_Code, NULL); return offset; } /*--- End of included file: packet-ros-fn.c ---*/ #line 376 "packet-ros-template.c" /* * Dissect ROS PDUs inside a PPDU. */ static void dissect_ros(tvbuff_t *tvb, packet_info *pinfo, proto_tree *parent_tree) { int offset = 0; int old_offset; proto_item *item=NULL; proto_tree *tree=NULL; proto_tree *next_tree=NULL; conversation_t *conversation; ros_conv_info_t *ros_info = NULL; asn1_ctx_t asn1_ctx; asn1_ctx_init(&asn1_ctx, ASN1_ENC_BER, TRUE, pinfo); /* save parent_tree so subdissectors can create new top nodes */ top_tree=parent_tree; /* do we have application context from the acse dissector? */ if( !pinfo->private_data ){ if(parent_tree){ proto_tree_add_text(parent_tree, tvb, offset, -1, "Internal error:can't get application context from ACSE dissector."); } return ; } else { session = ( (struct SESSION_DATA_STRUCTURE*)(pinfo->private_data) ); } /* * Do we have a conversation for this connection? */ conversation = find_conversation(pinfo->fd->num, &pinfo->src, &pinfo->dst, pinfo->ptype, pinfo->srcport, pinfo->destport, 0); if (conversation == NULL) { /* We don't yet have a conversation, so create one. */ conversation = conversation_new(pinfo->fd->num, &pinfo->src, &pinfo->dst, pinfo->ptype, pinfo->srcport, pinfo->destport, 0); } /* * Do we already have our info */ ros_info = conversation_get_proto_data(conversation, proto_ros); if (ros_info == NULL) { /* No. Attach that information to the conversation. */ ros_info = se_alloc(sizeof(ros_conv_info_t)); ros_info->matched=g_hash_table_new(ros_info_hash_matched, ros_info_equal_matched); ros_info->unmatched=g_hash_table_new(ros_info_hash_unmatched, ros_info_equal_unmatched); conversation_add_proto_data(conversation, proto_ros, ros_info); ros_info->next = ros_info_items; ros_info_items = ros_info; } /* pinfo->private_data = ros_info; */ if(parent_tree){ item = proto_tree_add_item(parent_tree, proto_ros, tvb, 0, -1, FALSE); tree = proto_item_add_subtree(item, ett_ros); } if (check_col(pinfo->cinfo, COL_PROTOCOL)) col_set_str(pinfo->cinfo, COL_PROTOCOL, "ROS"); if (check_col(pinfo->cinfo, COL_INFO)) col_clear(pinfo->cinfo, COL_INFO); while (tvb_reported_length_remaining(tvb, offset) > 0){ old_offset=offset; offset=dissect_ros_ROS(FALSE, tvb, offset, &asn1_ctx , tree, -1); if(offset == old_offset){ item = proto_tree_add_text(tree, tvb, offset, -1,"Unknown ROS PDU"); if(item){ next_tree=proto_item_add_subtree(item, ett_ros_unknown); dissect_unknown_ber(pinfo, tvb, offset, next_tree); } offset = tvb_length(tvb); break; } } } static void ros_reinit(void) { ros_conv_info_t *ros_info; /* Free up state attached to the ros_info structures */ for (ros_info = ros_info_items; ros_info != NULL; ros_info = ros_info->next) { g_hash_table_destroy(ros_info->matched); ros_info->matched=NULL; g_hash_table_destroy(ros_info->unmatched); ros_info->unmatched=NULL; } ros_info_items = NULL; } /*--- proto_register_ros -------------------------------------------*/ void proto_register_ros(void) { /* List of fields */ static hf_register_info hf[] = { { &hf_ros_response_in, { "Response In", "ros.response_in", FT_FRAMENUM, BASE_DEC, NULL, 0x0, "The response to this remote operation invocation is in this frame", HFILL }}, { &hf_ros_response_to, { "Response To", "ros.response_to", FT_FRAMENUM, BASE_DEC, NULL, 0x0, "This is a response to the remote operation invocation in this frame", HFILL }}, { &hf_ros_time, { "Time", "ros.time", FT_RELATIVE_TIME, BASE_NONE, NULL, 0x0, "The time between the Invoke and the Response", HFILL }}, /*--- Included file: packet-ros-hfarr.c ---*/ #line 1 "packet-ros-hfarr.c" { &hf_ros_invoke, { "invoke", "ros.invoke", FT_NONE, BASE_NONE, NULL, 0, "ros.Invoke", HFILL }}, { &hf_ros_returnResult, { "returnResult", "ros.returnResult", FT_NONE, BASE_NONE, NULL, 0, "ros.ReturnResult", HFILL }}, { &hf_ros_returnError, { "returnError", "ros.returnError", FT_NONE, BASE_NONE, NULL, 0, "ros.ReturnError", HFILL }}, { &hf_ros_reject, { "reject", "ros.reject", FT_NONE, BASE_NONE, NULL, 0, "ros.T_reject", HFILL }}, { &hf_ros_bind_invoke, { "bind-invoke", "ros.bind_invoke", FT_NONE, BASE_NONE, NULL, 0, "ros.T_bind_invoke", HFILL }}, { &hf_ros_bind_result, { "bind-result", "ros.bind_result", FT_NONE, BASE_NONE, NULL, 0, "ros.T_bind_result", HFILL }}, { &hf_ros_bind_error, { "bind-error", "ros.bind_error", FT_NONE, BASE_NONE, NULL, 0, "ros.T_bind_error", HFILL }}, { &hf_ros_unbind_invoke, { "unbind-invoke", "ros.unbind_invoke", FT_NONE, BASE_NONE, NULL, 0, "ros.T_unbind_invoke", HFILL }}, { &hf_ros_unbind_result, { "unbind-result", "ros.unbind_result", FT_NONE, BASE_NONE, NULL, 0, "ros.T_unbind_result", HFILL }}, { &hf_ros_unbind_error, { "unbind-error", "ros.unbind_error", FT_NONE, BASE_NONE, NULL, 0, "ros.T_unbind_error", HFILL }}, { &hf_ros_invokeId, { "invokeId", "ros.invokeId", FT_UINT32, BASE_DEC, VALS(ros_InvokeId_vals), 0, "ros.InvokeId", HFILL }}, { &hf_ros_linkedId, { "linkedId", "ros.linkedId", FT_INT32, BASE_DEC, NULL, 0, "ros.INTEGER", HFILL }}, { &hf_ros_opcode, { "opcode", "ros.opcode", FT_INT32, BASE_DEC, NULL, 0, "ros.OperationCode", HFILL }}, { &hf_ros_argument, { "argument", "ros.argument", FT_NONE, BASE_NONE, NULL, 0, "ros.T_argument", HFILL }}, { &hf_ros_result, { "result", "ros.result", FT_NONE, BASE_NONE, NULL, 0, "ros.T_result", HFILL }}, { &hf_ros_operationResult, { "result", "ros.result", FT_NONE, BASE_NONE, NULL, 0, "ros.OperationResult", HFILL }}, { &hf_ros_errcode, { "errcode", "ros.errcode", FT_INT32, BASE_DEC, NULL, 0, "ros.ErrorCode", HFILL }}, { &hf_ros_parameter, { "parameter", "ros.parameter", FT_NONE, BASE_NONE, NULL, 0, "ros.T_parameter", HFILL }}, { &hf_ros_problem, { "problem", "ros.problem", FT_UINT32, BASE_DEC, VALS(ros_T_problem_vals), 0, "ros.T_problem", HFILL }}, { &hf_ros_general, { "general", "ros.general", FT_INT32, BASE_DEC, VALS(ros_GeneralProblem_vals), 0, "ros.GeneralProblem", HFILL }}, { &hf_ros_invokeProblem, { "invoke", "ros.invoke", FT_INT32, BASE_DEC, VALS(ros_InvokeProblem_vals), 0, "ros.InvokeProblem", HFILL }}, { &hf_ros_rejectResult, { "returnResult", "ros.returnResult", FT_INT32, BASE_DEC, VALS(ros_ReturnResultProblem_vals), 0, "ros.ReturnResultProblem", HFILL }}, { &hf_ros_rejectError, { "returnError", "ros.returnError", FT_INT32, BASE_DEC, VALS(ros_ReturnErrorProblem_vals), 0, "ros.ReturnErrorProblem", HFILL }}, { &hf_ros_present, { "present", "ros.present", FT_INT32, BASE_DEC, NULL, 0, "ros.T_present", HFILL }}, { &hf_ros_absent, { "absent", "ros.absent", FT_NONE, BASE_NONE, NULL, 0, "ros.NULL", HFILL }}, { &hf_ros_local, { "local", "ros.local", FT_INT32, BASE_DEC, NULL, 0, "ros.INTEGER", HFILL }}, { &hf_ros_global, { "global", "ros.global", FT_OID, BASE_NONE, NULL, 0, "ros.OBJECT_IDENTIFIER", HFILL }}, /*--- End of included file: packet-ros-hfarr.c ---*/ #line 505 "packet-ros-template.c" }; /* List of subtrees */ static gint *ett[] = { &ett_ros, &ett_ros_unknown, /*--- Included file: packet-ros-ettarr.c ---*/ #line 1 "packet-ros-ettarr.c" &ett_ros_ROS, &ett_ros_Invoke, &ett_ros_ReturnResult, &ett_ros_T_result, &ett_ros_ReturnError, &ett_ros_Reject, &ett_ros_T_problem, &ett_ros_InvokeId, &ett_ros_Code, /*--- End of included file: packet-ros-ettarr.c ---*/ #line 512 "packet-ros-template.c" }; /* Register protocol */ proto_ros = proto_register_protocol(PNAME, PSNAME, PFNAME); register_dissector("ros", dissect_ros, proto_ros); /* Register fields and subtrees */ proto_register_field_array(proto_ros, hf, array_length(hf)); proto_register_subtree_array(ett, array_length(ett)); ros_oid_dissector_table = register_dissector_table("ros.oid", "ROS OID Dissectors", FT_STRING, BASE_NONE); oid_table=g_hash_table_new(g_str_hash, g_str_equal); protocol_table=g_hash_table_new(g_str_hash, g_str_equal); ros_handle = find_dissector("ros"); register_init_routine(ros_reinit); } /*--- proto_reg_handoff_ros --- */ void proto_reg_handoff_ros(void) { }