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
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
|
/*
Copyright (C) 2000-2006 Silicon Graphics, Inc. All Rights Reserved.
Portions Copyright 2007-2010 Sun Microsystems, Inc. All rights reserved.
Portions Copyright 2009-2012 SN Systems Ltd. All rights reserved.
Portions Copyright 2008-2016 David Anderson. All rights reserved.
This program is free software; you can redistribute it and/or
modify it under the terms of version 2 of the GNU General
Public License as published by the Free Software Foundation.
This program is distributed in the hope that it would be
useful, but WITHOUT ANY WARRANTY; without even the implied
warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
PURPOSE.
Further, this software is distributed without any warranty
that it is free of the rightful claim of any third person
regarding infringement or the like. Any license provided
herein, whether implied or otherwise, applies only to this
software file. Patent licenses, if any, provided herein
do not apply to combinations of this program with other
software, or any other product whatsoever.
You should have received a copy of the GNU General Public
License along with this program; if not, write the Free
Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
Boston MA 02110-1301, USA.
*/
#include "globals.h"
#include "naming.h"
#include "esb.h"
#include "esb_using_functions.h"
#include "print_sections.h"
#include "print_frames.h"
#include "sanitized.h"
/* print data in .debug_loc
There is no guarantee this will work because we are assuming
that all bytes are valid loclist data, that there are no
odd padding or garbage bytes. In normal use one gets
into here via an offset from .debug_info, so it could be
that bytes not referenced from .debug_info are garbage
or even zero padding. So this can fail (error off) as such bytes
can lead dwarf_get_loclist_entry() astray.
It's also wrong because we don't know what CU or frame each
loclist is from, so we don't know the address_size for sure.
*/
extern int
print_locs(Dwarf_Debug dbg, Dwarf_Error *err)
{
Dwarf_Unsigned offset = 0;
Dwarf_Addr hipc_offset = 0;
Dwarf_Addr lopc_offset = 0;
Dwarf_Ptr data = 0;
Dwarf_Unsigned entry_len = 0;
Dwarf_Unsigned next_entry = 0;
int index = 0;
int lres = 0;
int fres = 0;
Dwarf_Half address_size = 0;
Dwarf_Half offset_size = 0;
Dwarf_Half version = 2; /* FAKE */
struct esb_s exprstring;
unsigned loopct = 0;
struct esb_s secname;
glflags.current_section_id = DEBUG_LOC;
/* Do nothing if not printing. */
if (!glflags.gf_do_print_dwarf) {
return DW_DLV_OK;
}
if (!glflags.gf_use_old_dwarf_loclist) {
printf("\n");
printf("Printing location lists with -c is "
"no longer supported\n");
return DW_DLV_OK;
}
esb_constructor(&exprstring);
esb_constructor(&secname);
fres = dwarf_get_address_size(dbg, &address_size, err);
if (fres != DW_DLV_OK) {
esb_destructor(&exprstring);
return simple_err_return_msg_either_action(fres,
"\nERROR: dwarf_get_address_size() fails.");
}
fres = dwarf_get_offset_size(dbg, &offset_size, err);
if (fres != DW_DLV_OK) {
esb_destructor(&exprstring);
return simple_err_return_msg_either_action(fres,
"\nERROR: dwarf_get_offset_size() fails.");
}
{
struct esb_s truename;
char buf[DWARF_SECNAME_BUFFER_SIZE];
esb_constructor_fixed(&truename,buf,sizeof(buf));
get_true_section_name(dbg,".debug_loc",
&truename,TRUE);
esb_append(&secname,sanitized(esb_get_string(&truename)));
esb_destructor(&truename);
}
printf("Format <i o b e l>: "
"index section-offset begin-addr end-addr "
"length-of-block-entry\n");
/* Pre=October 2015 version. */
for (loopct = 0; ; ++loopct) {
lres = dwarf_get_loclist_entry(dbg, offset,
&hipc_offset, &lopc_offset,
&data, &entry_len,
&next_entry,
err);
if (lres != DW_DLV_OK) {
break;
}
fres = print_location_operations(dbg,
0, /* passing null, no die known. */
/* indent level*/ 4,
data,
entry_len,address_size,
offset_size,
version,
&exprstring,err);
if (fres == DW_DLV_ERROR) {
esb_destructor(&exprstring);
esb_destructor(&secname);
return simple_err_only_return_action(fres,
"\nERROR: getting location entry data fails.");
}
/* Display offsets */
if (!loopct) {
print_secname(dbg,esb_get_string(&secname));
}
if (glflags.gf_display_offsets) {
++index;
printf(" <iobel> [%8d] 0x%" DW_PR_XZEROS DW_PR_DUx,
index, offset);
if (glflags.verbose) {
printf(" <expr-off 0x%" DW_PR_XZEROS DW_PR_DUx ">",
next_entry - entry_len);
}
}
printf(" 0x%" DW_PR_XZEROS DW_PR_DUx
" 0x%" DW_PR_XZEROS DW_PR_DUx
" %8" DW_PR_DUu " %s\n",
(Dwarf_Unsigned) lopc_offset,
(Dwarf_Unsigned) hipc_offset, entry_len,
esb_get_string(&exprstring));
esb_empty_string(&exprstring);
offset = next_entry;
}
if (!loopct) {
/* Nothing happened, so announce the section name anyway */
print_secname(dbg,esb_get_string(&secname));
}
esb_destructor(&exprstring);
esb_destructor(&secname);
if (lres == DW_DLV_ERROR) {
int rval = 0;
struct esb_s m;
esb_constructor(&m);
esb_append(&m,
"\nERROR: dwarf_get_address_size() fails.");
esb_append_printf_u(&m,
" Offset is 0x%" DW_PR_DUx ".\n",offset);
rval = simple_err_only_return_action(lres,
esb_get_string(&m));
esb_destructor(&m);
return rval;
}
return DW_DLV_OK;
}
|
