|
1 | 1 | // SPDX-FileCopyrightText: 2014-2020 inisider <[email protected]>
|
| 2 | +// SPDX-FileCopyrightText: 2021 Basstorm <[email protected]> |
2 | 3 | // SPDX-License-Identifier: LGPL-3.0-only
|
3 | 4 |
|
4 |
| -#include "types.h" |
5 |
| -#include "dbi.h" |
6 |
| -#include "stream_file.h" |
7 |
| -#include "tpi.h" |
| 5 | +#include "pdb.h" |
8 | 6 |
|
9 |
| -#define PDB_ALIGN 4 |
10 |
| - |
11 |
| -static void free_dbi_stream(void *stream) { |
12 |
| - SDbiStream *t = (SDbiStream *)stream; |
13 |
| - SDBIExHeader *dbi_ex_header = 0; |
14 |
| - |
15 |
| - RzListIter *it = rz_list_iterator(t->dbiexhdrs); |
16 |
| - while (rz_list_iter_next(it)) { |
17 |
| - dbi_ex_header = (SDBIExHeader *)rz_list_iter_get(it); |
18 |
| - free(dbi_ex_header->modName.name); |
19 |
| - free(dbi_ex_header->objName.name); |
20 |
| - free(dbi_ex_header); |
| 7 | +RZ_IPI void rz_bin_pdb_free_dbi_stream(DbiStream *stream) { |
| 8 | + DbiStreamExHdr *ex_hdr; |
| 9 | + RzListIter *it; |
| 10 | + rz_list_foreach (stream->ex_hdrs, it, ex_hdr) { |
| 11 | + RZ_FREE(ex_hdr->ModuleName); |
| 12 | + RZ_FREE(ex_hdr->ObjFileName); |
| 13 | + RZ_FREE(ex_hdr); |
21 | 14 | }
|
22 |
| - rz_list_free(t->dbiexhdrs); |
23 |
| -} |
24 |
| - |
25 |
| -static void parse_dbi_header(SDBIHeader *dbi_header, RZ_STREAM_FILE *stream_file) { |
26 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->magic); |
27 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->version); |
28 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->age); |
29 |
| - stream_file_read(stream_file, sizeof(ut16), (char *)&dbi_header->gssymStream); |
30 |
| - stream_file_read(stream_file, sizeof(ut16), (char *)&dbi_header->vers); |
31 |
| - stream_file_read(stream_file, sizeof(st16), (char *)&dbi_header->pssymStream); |
32 |
| - stream_file_read(stream_file, sizeof(ut16), (char *)&dbi_header->pdbver); |
33 |
| - stream_file_read(stream_file, sizeof(st16), (char *)&dbi_header->symrecStream); |
34 |
| - stream_file_read(stream_file, sizeof(ut16), (char *)&dbi_header->pdbver2); |
35 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->module_size); |
36 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->seccon_size); |
37 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->secmap_size); |
38 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->filinf_size); |
39 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->tsmap_size); |
40 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->mfc_index); |
41 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->dbghdr_size); |
42 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->ecinfo_size); |
43 |
| - stream_file_read(stream_file, sizeof(ut16), (char *)&dbi_header->flags); |
44 |
| - stream_file_read(stream_file, 2, (char *)&dbi_header->machine); |
45 |
| - stream_file_read(stream_file, sizeof(ut32), (char *)&dbi_header->resvd); |
| 15 | + rz_list_free(stream->ex_hdrs); |
46 | 16 | }
|
47 | 17 |
|
48 |
| -static int parse_ssymbol_range(char *data, int max_len, SSymbolRange *symbol_range) { |
49 |
| - int read_bytes = 0; |
50 |
| - |
51 |
| - READ2(read_bytes, max_len, symbol_range->section, data, st16); |
52 |
| - READ2(read_bytes, max_len, symbol_range->padding1, data, st16); |
53 |
| - READ4(read_bytes, max_len, symbol_range->offset, data, st32); |
54 |
| - READ4(read_bytes, max_len, symbol_range->size, data, st32); |
55 |
| - READ4(read_bytes, max_len, symbol_range->flags, data, ut32); |
56 |
| - READ4(read_bytes, max_len, symbol_range->module, data, st32); |
57 |
| - |
58 |
| - // TODO: why not need to read this padding? |
59 |
| - // READ2(read_bytes, max_len, symbol_range->padding2, data, short); |
60 |
| - READ4(read_bytes, max_len, symbol_range->data_crc, data, ut32); |
61 |
| - READ4(read_bytes, max_len, symbol_range->reloc_crc, data, ut32); |
62 |
| - |
63 |
| - return read_bytes; |
| 18 | +static void parse_dbi_stream_header(DbiStream *s, RzBuffer *buf) { |
| 19 | + s->hdr.version_signature = rz_buf_read_le32(buf); |
| 20 | + s->hdr.version_header = rz_buf_read_le32(buf); |
| 21 | + s->hdr.age = rz_buf_read_le32(buf); |
| 22 | + s->hdr.global_stream_index = rz_buf_read_le16(buf); |
| 23 | + s->hdr.build_number = rz_buf_read_le16(buf); |
| 24 | + s->hdr.public_stream_index = rz_buf_read_le16(buf); |
| 25 | + s->hdr.pdb_dll_version = rz_buf_read_le16(buf); |
| 26 | + s->hdr.sym_record_stream = rz_buf_read_le16(buf); |
| 27 | + s->hdr.pdb_dll_rbld = rz_buf_read_le16(buf); |
| 28 | + s->hdr.mod_info_size = rz_buf_read_le32(buf); |
| 29 | + s->hdr.section_contribution_size = rz_buf_read_le32(buf); |
| 30 | + s->hdr.section_map_size = rz_buf_read_le32(buf); |
| 31 | + s->hdr.source_info_size = rz_buf_read_le32(buf); |
| 32 | + s->hdr.type_server_map_size = rz_buf_read_le32(buf); |
| 33 | + s->hdr.mfc_type_server_index = rz_buf_read_le32(buf); |
| 34 | + s->hdr.optional_dbg_header_size = rz_buf_read_le32(buf); |
| 35 | + s->hdr.ec_substream_size = rz_buf_read_le32(buf); |
| 36 | + s->hdr.flags = rz_buf_read_le16(buf); |
| 37 | + s->hdr.machine = rz_buf_read_le16(buf); |
| 38 | + s->hdr.padding = rz_buf_read_le32(buf); |
64 | 39 | }
|
65 | 40 |
|
66 |
| -static int parse_dbi_ex_header(char *data, int max_len, SDBIExHeader *dbi_ex_header) { |
67 |
| - ut32 read_bytes = 0, before_read_bytes = 0; |
68 |
| - |
69 |
| - READ4(read_bytes, max_len, dbi_ex_header->opened, data, ut32); |
70 |
| - |
71 |
| - before_read_bytes = read_bytes; |
72 |
| - read_bytes += parse_ssymbol_range(data, max_len, &dbi_ex_header->range); |
73 |
| - data += (read_bytes - before_read_bytes); |
74 |
| - |
75 |
| - READ2(read_bytes, max_len, dbi_ex_header->flags, data, ut16); |
76 |
| - READ2(read_bytes, max_len, dbi_ex_header->stream, data, st16); |
77 |
| - READ4(read_bytes, max_len, dbi_ex_header->symSize, data, ut32); |
78 |
| - READ4(read_bytes, max_len, dbi_ex_header->oldLineSize, data, ut32); |
79 |
| - READ4(read_bytes, max_len, dbi_ex_header->lineSize, data, ut32); |
80 |
| - READ2(read_bytes, max_len, dbi_ex_header->nSrcFiles, data, st16); |
81 |
| - READ2(read_bytes, max_len, dbi_ex_header->padding1, data, st16); |
82 |
| - READ4(read_bytes, max_len, dbi_ex_header->offsets, data, ut32); |
83 |
| - READ4(read_bytes, max_len, dbi_ex_header->niSource, data, ut32); |
84 |
| - READ4(read_bytes, max_len, dbi_ex_header->niCompiler, data, ut32); |
85 |
| - |
86 |
| - before_read_bytes = read_bytes; |
87 |
| - parse_scstring(&dbi_ex_header->modName, (unsigned char *)data, &read_bytes, max_len); |
88 |
| - data += (read_bytes - before_read_bytes); |
89 |
| - |
90 |
| - parse_scstring(&dbi_ex_header->objName, (unsigned char *)data, &read_bytes, max_len); |
91 |
| - |
92 |
| - return read_bytes; |
| 41 | +static ut32 parse_dbi_stream_section_entry(DbiStreamExHdr *hdr, RzBuffer *buf) { |
| 42 | + hdr->SectionContr.Section = rz_buf_read_le16(buf); |
| 43 | + *(ut16 *)hdr->SectionContr.Padding1 = rz_buf_read_le16(buf); |
| 44 | + hdr->SectionContr.Offset = rz_buf_read_le32(buf); |
| 45 | + hdr->SectionContr.Size = rz_buf_read_le32(buf); |
| 46 | + hdr->SectionContr.Characteristics = rz_buf_read_le32(buf); |
| 47 | + hdr->SectionContr.ModuleIndex = rz_buf_read_le16(buf); |
| 48 | + *(ut16 *)hdr->SectionContr.Padding2 = rz_buf_read_le16(buf); |
| 49 | + hdr->SectionContr.DataCrc = rz_buf_read_le32(buf); |
| 50 | + hdr->SectionContr.RelocCrc = rz_buf_read_le32(buf); |
| 51 | + return sizeof(hdr->SectionContr); |
93 | 52 | }
|
94 | 53 |
|
95 |
| -static void parse_dbg_header(SDbiDbgHeader *dbg_header, RZ_STREAM_FILE *stream_file) { |
96 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_fpo); |
97 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_exception); |
98 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_fixup); |
99 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_omap_to_src); |
100 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_omap_from_src); |
101 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_section_hdr); |
102 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_token_rid_map); |
103 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_xdata); |
104 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_pdata); |
105 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_new_fpo); |
106 |
| - stream_file_read(stream_file, sizeof(short), (char *)&dbg_header->sn_section_hdr_orig); |
107 |
| -} |
108 |
| - |
109 |
| -void init_dbi_stream(SDbiStream *dbi_stream) { |
110 |
| - dbi_stream->free_ = free_dbi_stream; |
111 |
| -} |
112 |
| - |
113 |
| -void parse_dbi_stream(void *parsed_pdb_stream, RZ_STREAM_FILE *stream_file) { |
114 |
| - SDbiStream *dbi_stream = (SDbiStream *)parsed_pdb_stream; |
115 |
| - SDBIExHeader *dbi_ex_header = 0; |
116 |
| - int pos = 0; |
117 |
| - char *dbiexhdr_data = 0, *p_tmp = 0; |
118 |
| - int size = 0, sz = 0; |
119 |
| - int i = 0; |
120 |
| - |
121 |
| - parse_dbi_header(&dbi_stream->dbi_header, stream_file); |
122 |
| - pos += sizeof(SDBIHeader) - 2; // 2 because enum in C equal to 4, but |
123 |
| - // to read just 2; |
124 |
| - stream_file_seek(stream_file, pos, 0); |
125 |
| - |
126 |
| - size = dbi_stream->dbi_header.module_size; |
127 |
| - dbiexhdr_data = (char *)malloc(size); |
128 |
| - if (!dbiexhdr_data) { |
129 |
| - return; |
| 54 | +static bool parse_dbi_stream_ex_header(DbiStream *s, RzBuffer *buf) { |
| 55 | + s->ex_hdrs = rz_list_new(); |
| 56 | + if (!s->ex_hdrs) { |
| 57 | + // free s-dbi |
| 58 | + return false; |
130 | 59 | }
|
131 |
| - stream_file_read(stream_file, size, dbiexhdr_data); |
132 |
| - |
133 |
| - dbi_stream->dbiexhdrs = rz_list_new(); |
134 |
| - p_tmp = dbiexhdr_data; |
135 |
| - while (i < size) { |
136 |
| - dbi_ex_header = (SDBIExHeader *)malloc(sizeof(SDBIExHeader)); |
137 |
| - if (!dbi_ex_header) { |
138 |
| - break; |
139 |
| - } |
140 |
| - // TODO: rewrite for signature where can to do chech CAN_READ true? |
141 |
| - sz = parse_dbi_ex_header(p_tmp, size, dbi_ex_header); |
142 |
| - if ((sz % PDB_ALIGN)) { |
143 |
| - sz = sz + (PDB_ALIGN - (sz % PDB_ALIGN)); |
| 60 | + ut32 ex_size = s->hdr.mod_info_size; |
| 61 | + ut32 read_len = 0; |
| 62 | + while (read_len < ex_size) { |
| 63 | + DbiStreamExHdr *hdr = RZ_NEW0(DbiStreamExHdr); |
| 64 | + if (!hdr) { |
| 65 | + return false; |
144 | 66 | }
|
145 |
| - i += sz; |
146 |
| - p_tmp += sz; |
147 |
| - rz_list_append(dbi_stream->dbiexhdrs, dbi_ex_header); |
| 67 | + hdr->unknown = rz_buf_read_le32(buf); |
| 68 | + read_len += sizeof(ut32); |
| 69 | + read_len += parse_dbi_stream_section_entry(hdr, buf); |
| 70 | + hdr->Flags = rz_buf_read_le16(buf); |
| 71 | + hdr->ModuleName = rz_buf_read_le16(buf); |
| 72 | + read_len += sizeof(ut16) * 2; |
| 73 | + hdr->SymByteSize = rz_buf_read_le32(buf); |
| 74 | + hdr->C11ByteSize = rz_buf_read_le32(buf); |
| 75 | + hdr->C13ByteSize = rz_buf_read_le32(buf); |
| 76 | + read_len += sizeof(ut32) * 3; |
| 77 | + hdr->SourceFileCount = rz_buf_read_le16(buf); |
| 78 | + *(ut16 *)hdr->Padding = rz_buf_read_le16(buf); |
| 79 | + read_len += sizeof(ut16) * 2; |
| 80 | + hdr->Unused2 = rz_buf_read_le32(buf); |
| 81 | + hdr->SourceFileNameIndex = rz_buf_read_le32(buf); |
| 82 | + hdr->PdbFilePathNameIndex = rz_buf_read_le32(buf); |
| 83 | + read_len += sizeof(ut32) * 3; |
| 84 | + hdr->ModuleName = rz_buf_get_string(buf, rz_buf_tell(buf)); |
| 85 | + ut32 str_length = strlen(hdr->ModuleName); |
| 86 | + rz_buf_seek(buf, rz_buf_tell(buf) + str_length, RZ_BUF_SET); |
| 87 | + read_len += str_length; |
| 88 | + hdr->ObjFileName = rz_buf_get_string(buf, rz_buf_tell(buf)); |
| 89 | + str_length = strlen(hdr->ObjFileName); |
| 90 | + rz_buf_seek(buf, rz_buf_tell(buf) + str_length, RZ_BUF_SET); |
| 91 | + read_len += str_length; |
| 92 | + rz_list_append(s->ex_hdrs, hdr); |
148 | 93 | }
|
| 94 | +} |
149 | 95 |
|
150 |
| - free(dbiexhdr_data); |
151 |
| - |
152 |
| - // "Section Contribution" |
153 |
| - stream_file_seek(stream_file, dbi_stream->dbi_header.seccon_size, 1); |
154 |
| - // "Section Map" |
155 |
| - stream_file_seek(stream_file, dbi_stream->dbi_header.secmap_size, 1); |
156 |
| - // "File Info" |
157 |
| - stream_file_seek(stream_file, dbi_stream->dbi_header.filinf_size, 1); |
158 |
| - // "TSM" |
159 |
| - stream_file_seek(stream_file, dbi_stream->dbi_header.tsmap_size, 1); |
160 |
| - // "EC" |
161 |
| - stream_file_seek(stream_file, dbi_stream->dbi_header.ecinfo_size, 1); |
| 96 | +static void parse_dbi_dbg_header(DbiStream *s, RzBuffer *buf) { |
| 97 | + s->dbg_hdr.sn_fpo = rz_buf_read_le16(buf); |
| 98 | + s->dbg_hdr.sn_exception = rz_buf_read_le16(buf); |
| 99 | + s->dbg_hdr.sn_fixup = rz_buf_read_le16(buf); |
| 100 | + s->dbg_hdr.sn_omap_to_src = rz_buf_read_le16(buf); |
| 101 | + s->dbg_hdr.sn_omap_from_src = rz_buf_read_le16(buf); |
| 102 | + s->dbg_hdr.sn_section_hdr = rz_buf_read_le16(buf); |
| 103 | + s->dbg_hdr.sn_token_rid_map = rz_buf_read_le16(buf); |
| 104 | + s->dbg_hdr.sn_xdata = rz_buf_read_le16(buf); |
| 105 | + s->dbg_hdr.sn_pdata = rz_buf_read_le16(buf); |
| 106 | + s->dbg_hdr.sn_new_fpo = rz_buf_read_le16(buf); |
| 107 | + s->dbg_hdr.sn_section_hdr_orig = rz_buf_read_le16(buf); |
| 108 | +} |
162 | 109 |
|
163 |
| - parse_dbg_header(&dbi_stream->dbg_header, stream_file); |
| 110 | +RZ_IPI bool parse_dbi_stream(RzPdb *pdb, MsfStream *stream) { |
| 111 | + if (!pdb || !stream) { |
| 112 | + return false; |
| 113 | + } |
| 114 | + pdb->s_dbi = RZ_NEW0(DbiStream); |
| 115 | + DbiStream *s = pdb->s_dbi; |
| 116 | + RzBuffer *buf = stream->stream_data; |
| 117 | + // parse header |
| 118 | + parse_dbi_stream_header(s, buf); |
| 119 | + parse_dbi_stream_ex_header(s, buf); |
| 120 | + // skip these streams |
| 121 | + ut64 seek = s->hdr.section_map_size + s->hdr.source_info_size + s->hdr.type_server_map_size + s->hdr.ec_substream_size; |
| 122 | + rz_buf_seek(buf, rz_buf_tell(buf) + seek, RZ_BUF_SET); |
164 | 123 | }
|
0 commit comments