![Alexis La Goutte](/assets/img/avatar_default.png)
(Using sed : sed -i '/^ \* \$Id\$/,+1 d') Fix manually some typo (in export_object_dicom.c and crc16-plain.c) Change-Id: I4c1ae68d1c4afeace8cb195b53c715cf9e1227a8 Reviewed-on: https://code.wireshark.org/review/497 Reviewed-by: Anders Broman <a.broman58@gmail.com>
229 lines
4 KiB
C
229 lines
4 KiB
C
/*
|
|
* Wireshark - Network traffic analyzer
|
|
* By Gerald Combs <gerald@wireshark.org>
|
|
* Copyright 2001 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.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include "syntax-tree.h"
|
|
|
|
/* Keep track of sttype_t's via their sttype_id_t number */
|
|
static sttype_t* type_list[STTYPE_NUM_TYPES];
|
|
|
|
|
|
#define STNODE_MAGIC 0xe9b00b9e
|
|
|
|
|
|
void
|
|
sttype_init(void)
|
|
{
|
|
sttype_register_function();
|
|
sttype_register_integer();
|
|
sttype_register_pointer();
|
|
sttype_register_range();
|
|
sttype_register_string();
|
|
sttype_register_test();
|
|
}
|
|
|
|
void
|
|
sttype_cleanup(void)
|
|
{
|
|
/* nothing to do */
|
|
}
|
|
|
|
|
|
void
|
|
sttype_register(sttype_t *type)
|
|
{
|
|
sttype_id_t type_id;
|
|
|
|
type_id = type->id;
|
|
|
|
/* Check input */
|
|
g_assert(type_id < STTYPE_NUM_TYPES);
|
|
|
|
/* Don't re-register. */
|
|
g_assert(type_list[type_id] == NULL);
|
|
|
|
type_list[type_id] = type;
|
|
}
|
|
|
|
static sttype_t*
|
|
sttype_lookup(sttype_id_t type_id)
|
|
{
|
|
sttype_t *result;
|
|
|
|
/* Check input */
|
|
g_assert(type_id < STTYPE_NUM_TYPES);
|
|
|
|
result = type_list[type_id];
|
|
|
|
/* Check output. */
|
|
g_assert(result != NULL);
|
|
|
|
return result;
|
|
}
|
|
|
|
|
|
stnode_t*
|
|
stnode_new(sttype_id_t type_id, gpointer data)
|
|
{
|
|
sttype_t *type;
|
|
stnode_t *node;
|
|
|
|
node = g_new(stnode_t, 1);
|
|
node->magic = STNODE_MAGIC;
|
|
node->deprecated_token = NULL;
|
|
node->inside_brackets = FALSE;
|
|
|
|
if (type_id == STTYPE_UNINITIALIZED) {
|
|
node->type = NULL;
|
|
node->data = NULL;
|
|
}
|
|
else {
|
|
type = sttype_lookup(type_id);
|
|
g_assert(type);
|
|
node->type = type;
|
|
if (type->func_new) {
|
|
node->data = type->func_new(data);
|
|
}
|
|
else {
|
|
node->data = data;
|
|
}
|
|
|
|
}
|
|
|
|
return node;
|
|
}
|
|
|
|
void
|
|
stnode_set_bracket(stnode_t *node, gboolean bracket)
|
|
{
|
|
node->inside_brackets = bracket;
|
|
}
|
|
|
|
stnode_t*
|
|
stnode_dup(const stnode_t *org)
|
|
{
|
|
sttype_t *type;
|
|
stnode_t *node;
|
|
|
|
if (!org)
|
|
return NULL;
|
|
|
|
type = org->type;
|
|
|
|
node = g_new(stnode_t, 1);
|
|
node->magic = STNODE_MAGIC;
|
|
node->deprecated_token = NULL;
|
|
node->type = type;
|
|
if (type && type->func_dup)
|
|
node->data = type->func_dup(org->data);
|
|
else
|
|
node->data = org->data;
|
|
node->value = org->value;
|
|
node->inside_brackets = org->inside_brackets;
|
|
|
|
return node;
|
|
}
|
|
|
|
void
|
|
stnode_init(stnode_t *node, sttype_id_t type_id, gpointer data)
|
|
{
|
|
sttype_t *type;
|
|
|
|
assert_magic(node, STNODE_MAGIC);
|
|
g_assert(!node->type);
|
|
g_assert(!node->data);
|
|
|
|
type = sttype_lookup(type_id);
|
|
g_assert(type);
|
|
node->type = type;
|
|
if (type->func_new) {
|
|
node->data = type->func_new(data);
|
|
}
|
|
else {
|
|
node->data = data;
|
|
}
|
|
}
|
|
|
|
void
|
|
stnode_init_int(stnode_t *node, sttype_id_t type_id, gint32 value)
|
|
{
|
|
stnode_init(node, type_id, NULL);
|
|
node->value = value;
|
|
}
|
|
|
|
void
|
|
stnode_free(stnode_t *node)
|
|
{
|
|
assert_magic(node, STNODE_MAGIC);
|
|
if (node->type) {
|
|
if (node->type->func_free) {
|
|
node->type->func_free(node->data);
|
|
}
|
|
}
|
|
else {
|
|
g_assert(!node->data);
|
|
}
|
|
g_free(node);
|
|
}
|
|
|
|
const char*
|
|
stnode_type_name(stnode_t *node)
|
|
{
|
|
assert_magic(node, STNODE_MAGIC);
|
|
if (node->type)
|
|
return node->type->name;
|
|
else
|
|
return "UNINITIALIZED";
|
|
}
|
|
|
|
sttype_id_t
|
|
stnode_type_id(stnode_t *node)
|
|
{
|
|
assert_magic(node, STNODE_MAGIC);
|
|
if (node->type)
|
|
return node->type->id;
|
|
else
|
|
return STTYPE_UNINITIALIZED;
|
|
}
|
|
|
|
gpointer
|
|
stnode_data(stnode_t *node)
|
|
{
|
|
assert_magic(node, STNODE_MAGIC);
|
|
return node->data;
|
|
}
|
|
|
|
gint32
|
|
stnode_value(stnode_t *node)
|
|
{
|
|
assert_magic(node, STNODE_MAGIC);
|
|
return node->value;
|
|
}
|
|
|
|
const char *
|
|
stnode_deprecated(stnode_t *node)
|
|
{
|
|
if (!node) {
|
|
return NULL;
|
|
}
|
|
return node->deprecated_token;
|
|
}
|