2007-05-04 08:24:06 +00:00
|
|
|
/* asn1.c
|
|
|
|
* Common routines for ASN.1
|
|
|
|
* 2007 Anders Broman
|
|
|
|
*
|
|
|
|
* $Id$
|
|
|
|
*
|
|
|
|
* 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
|
|
# include "config.h"
|
|
|
|
#endif
|
|
|
|
|
2007-05-17 14:36:32 +00:00
|
|
|
#include <glib.h>
|
|
|
|
|
|
|
|
#include <string.h>
|
2007-05-14 13:39:31 +00:00
|
|
|
#include <stdlib.h>
|
|
|
|
#include <math.h>
|
|
|
|
|
2007-05-04 08:24:06 +00:00
|
|
|
#include <epan/packet.h>
|
|
|
|
|
|
|
|
#include "asn1.h"
|
|
|
|
|
|
|
|
void asn1_ctx_init(asn1_ctx_t *actx, asn1_enc_e encoding, gboolean aligned, packet_info *pinfo) {
|
2007-05-14 13:39:31 +00:00
|
|
|
memset(actx, '\0', sizeof(*actx));
|
|
|
|
actx->signature = ASN1_CTX_SIGNATURE;
|
2007-05-04 08:24:06 +00:00
|
|
|
actx->encoding = encoding;
|
|
|
|
actx->aligned = aligned;
|
|
|
|
actx->pinfo = pinfo;
|
2007-05-14 13:39:31 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
gboolean asn1_ctx_check_signature(asn1_ctx_t *actx) {
|
2007-07-18 13:15:36 +00:00
|
|
|
return actx && (actx->signature == ASN1_CTX_SIGNATURE);
|
2007-05-04 08:24:06 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
void asn1_ctx_clean_external(asn1_ctx_t *actx) {
|
|
|
|
memset(&actx->external, '\0', sizeof(actx->external));
|
|
|
|
actx->external.hf_index = -1;
|
2007-07-18 13:15:36 +00:00
|
|
|
actx->external.encoding = -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
void asn1_ctx_clean_epdv(asn1_ctx_t *actx) {
|
|
|
|
memset(&actx->embedded_pdv, '\0', sizeof(actx->embedded_pdv));
|
|
|
|
actx->embedded_pdv.hf_index = -1;
|
|
|
|
actx->embedded_pdv.identification = -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
void rose_ctx_init(rose_ctx_t *rctx) {
|
|
|
|
memset(rctx, '\0', sizeof(*rctx));
|
|
|
|
rctx->signature = ROSE_CTX_SIGNATURE;
|
|
|
|
}
|
|
|
|
|
|
|
|
gboolean rose_ctx_check_signature(rose_ctx_t *rctx) {
|
|
|
|
return rctx && (rctx->signature == ROSE_CTX_SIGNATURE);
|
|
|
|
}
|
|
|
|
|
|
|
|
void rose_ctx_clean_data(rose_ctx_t *rctx) {
|
|
|
|
memset(&rctx->d, '\0', sizeof(rctx->d));
|
|
|
|
rctx->d.code = -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
asn1_ctx_t *get_asn1_ctx(void *ptr) {
|
|
|
|
asn1_ctx_t *actx = (asn1_ctx_t*)ptr;
|
|
|
|
|
|
|
|
if (!asn1_ctx_check_signature(actx))
|
|
|
|
actx = NULL;
|
|
|
|
|
|
|
|
return actx;
|
|
|
|
}
|
|
|
|
|
|
|
|
rose_ctx_t *get_rose_ctx(void *ptr) {
|
|
|
|
rose_ctx_t *rctx = (rose_ctx_t*)ptr;
|
|
|
|
asn1_ctx_t *actx = (asn1_ctx_t*)ptr;
|
|
|
|
|
|
|
|
if (!asn1_ctx_check_signature(actx))
|
|
|
|
actx = NULL;
|
|
|
|
|
|
|
|
if (actx)
|
|
|
|
rctx = actx->rose_ctx;
|
|
|
|
|
|
|
|
if (!rose_ctx_check_signature(rctx))
|
|
|
|
rctx = NULL;
|
|
|
|
|
|
|
|
return rctx;
|
2007-05-04 08:24:06 +00:00
|
|
|
}
|
2007-05-14 13:39:31 +00:00
|
|
|
|
|
|
|
double asn1_get_real(const guint8 *real_ptr, gint real_len) {
|
|
|
|
guint8 octet;
|
|
|
|
const guint8 *p;
|
|
|
|
guint8 *buf;
|
|
|
|
double val = 0;
|
|
|
|
|
|
|
|
if (real_len < 1) return val;
|
|
|
|
octet = real_ptr[0];
|
|
|
|
p = real_ptr + 1;
|
|
|
|
real_len -= 1;
|
|
|
|
if (octet & 0x80) { /* binary encoding */
|
|
|
|
} else if (octet & 0x40) { /* SpecialRealValue */
|
|
|
|
switch (octet & 0x3F) {
|
|
|
|
case 0x00: val = HUGE_VAL; break;
|
|
|
|
case 0x01: val = -HUGE_VAL; break;
|
|
|
|
}
|
|
|
|
} else { /* decimal encoding */
|
|
|
|
buf = ep_alloc0(real_len + 1);
|
|
|
|
memcpy(buf, p, real_len);
|
|
|
|
val = atof(buf);
|
|
|
|
}
|
|
|
|
|
|
|
|
return val;
|
|
|
|
}
|