1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
/*
* This file is part of ltrace.
* Copyright (C) 2011, 2012 Petr Machata, Red Hat Inc.
*
* 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 St, Fifth Floor, Boston, MA
* 02110-1301 USA
*/
#include <stdlib.h>
#include <assert.h>
#include <string.h>
#include "lens_enum.h"
#include "lens_default.h"
#include "value.h"
#include "sysdep.h"
#include "type.h"
struct enum_entry {
char *key;
int own_key;
struct value *value;
int own_value;
};
static void
enum_entry_dtor(struct enum_entry *entry, void *data)
{
if (entry->own_key)
free(entry->key);
if (entry->own_value) {
value_destroy(entry->value);
free(entry->value);
}
}
static void
enum_lens_destroy_cb(struct lens *lens)
{
struct enum_lens *self = (void *)lens;
VECT_DESTROY(&self->entries, struct enum_entry,
enum_entry_dtor, NULL);
}
enum {
#ifdef ARCH_ENDIAN_BIG
big_endian = 1,
#elif defined (ARCH_ENDIAN_LITTLE)
big_endian = 0,
#else
# error Undefined endianness.
#endif
};
/* Returns 0 if they are not equal, >0 if they are, and <0 if there
* was an error. */
static int
enum_values_equal(struct value *inf_value, struct value *enum_value,
struct value_dict *arguments)
{
/* Width may not match between what's defined in config file
* and what arrives from the back end. Typically, if there is
* a mismatch, the config file size will be larger, as we are
* in a situation where 64-bit tracer traces 32-bit process.
* But opposite situation can occur e.g. on PPC, where it's
* apparently possible for 32-bit tracer to trace 64-bit
* inferior, or hypothetically in a x32/x86_64 situation. */
unsigned char *inf_data = value_get_data(inf_value, arguments);
size_t inf_sz = value_size(inf_value, arguments);
if (inf_data == NULL || inf_sz == (size_t)-1)
return -1;
assert(inf_value->type->type == enum_value->type->type);
unsigned char *enum_data = value_get_data(enum_value, arguments);
size_t enum_sz = value_size(enum_value, arguments);
if (enum_data == NULL || enum_sz == (size_t)-1)
return -1;
size_t sz = enum_sz > inf_sz ? inf_sz : enum_sz;
if (big_endian)
return memcmp(enum_data + enum_sz - sz,
inf_data + inf_sz - sz, sz) == 0;
else
return memcmp(enum_data, inf_data, sz) == 0;
}
static const char *
enum_get(struct enum_lens *lens, struct value *value,
struct value_dict *arguments)
{
size_t i;
for (i = 0; i < vect_size(&lens->entries); ++i) {
struct enum_entry *entry = VECT_ELEMENT(&lens->entries,
struct enum_entry, i);
int st = enum_values_equal(value, entry->value, arguments);
if (st < 0)
return NULL;
else if (st != 0)
return entry->key;
}
return NULL;
}
static int
enum_lens_format_cb(struct lens *lens, FILE *stream,
struct value *value, struct value_dict *arguments)
{
struct enum_lens *self = (void *)lens;
const char *name = enum_get(self, value, arguments);
if (name != NULL)
return fprintf(stream, "%s", name);
return lens_format(&default_lens, stream, value, arguments);
}
void
lens_init_enum(struct enum_lens *lens)
{
*lens = (struct enum_lens){
{
.format_cb = enum_lens_format_cb,
.destroy_cb = enum_lens_destroy_cb,
},
};
VECT_INIT(&lens->entries, struct enum_entry);
}
int
lens_enum_add(struct enum_lens *lens,
const char *key, int own_key,
struct value *value, int own_value)
{
struct enum_entry entry = { (char *)key, own_key, value, own_value };
return VECT_PUSHBACK(&lens->entries, &entry);
}
size_t
lens_enum_size(struct enum_lens *lens)
{
return vect_size(&lens->entries);
}
|
