mirror of
https://github.com/davea42/libdwarf-code.git
synced 2025-10-19 12:03:39 +08:00

of the temp file to start with junk to better match what is routine in the regressiontests. And to something that works just fine with Win msys2. (in msys2 "/tmp/anything" will not work for open( "wb") whereas "anything" will work.) modified: fuzz/fuzz_aranges.c modified: fuzz/fuzz_crc.c modified: fuzz/fuzz_crc_32.c modified: fuzz/fuzz_debug_addr_access.c modified: fuzz/fuzz_debug_str.c modified: fuzz/fuzz_debuglink.c modified: fuzz/fuzz_die_cu.c modified: fuzz/fuzz_die_cu_attrs.c modified: fuzz/fuzz_die_cu_attrs_loclist.c modified: fuzz/fuzz_die_cu_e.c modified: fuzz/fuzz_die_cu_e_print.c modified: fuzz/fuzz_die_cu_info1.c modified: fuzz/fuzz_die_cu_offset.c modified: fuzz/fuzz_die_cu_print.c modified: fuzz/fuzz_dnames.c modified: fuzz/fuzz_findfuncbypc.c modified: fuzz/fuzz_gdbindex.c modified: fuzz/fuzz_globals.c modified: fuzz/fuzz_gnu_index.c modified: fuzz/fuzz_init_b.c modified: fuzz/fuzz_init_binary.c modified: fuzz/fuzz_init_path.c modified: fuzz/fuzz_macro_dwarf4.c modified: fuzz/fuzz_macro_dwarf5.c modified: fuzz/fuzz_rng.c modified: fuzz/fuzz_set_frame_all.c modified: fuzz/fuzz_showsectgrp.c modified: fuzz/fuzz_simplereader_tu.c modified: fuzz/fuzz_srcfiles.c modified: fuzz/fuzz_stack_frame_access.c modified: fuzz/fuzz_str_offsets.c modified: fuzz/fuzz_tie.c modified: fuzz/fuzz_xuindex.c modified: src/lib/libdwarf/libdwarf.h
229 lines
6.5 KiB
C
229 lines
6.5 KiB
C
/* Copyright 2021 Google LLC
|
|
Licensed under the Apache License, Version 2.0 (the "License");
|
|
you may not use this file except in compliance with the License.
|
|
You may obtain a copy of the License at
|
|
http://www.apache.org/licenses/LICENSE-2.0
|
|
Unless required by applicable law or agreed to in writing, software
|
|
distributed under the License is distributed on an "AS IS" BASIS,
|
|
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
See the License for the specific language governing permissions and
|
|
limitations under the License.
|
|
*/
|
|
#include <fcntl.h> /* open() O_RDONLY O_BINARY */
|
|
#include <stdint.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <sys/types.h>
|
|
#include <unistd.h>
|
|
|
|
#ifndef O_BINARY
|
|
#define O_BINARY 0 /* So it does nothing in Linux/Unix */
|
|
#endif
|
|
|
|
/*
|
|
* Libdwarf library callers can only use these headers.
|
|
*/
|
|
#include "dwarf.h"
|
|
#include "libdwarf.h"
|
|
|
|
int examplew(Dwarf_Debug dbg, Dwarf_Error *error);
|
|
int examplewgdbindex(Dwarf_Gdbindex gdbindex, Dwarf_Error *error);
|
|
int examplex(Dwarf_Gdbindex gdbindex, Dwarf_Error *error);
|
|
|
|
/*
|
|
* A fuzzer that simulates a small part of the simplereader.c example.
|
|
*/
|
|
int LLVMFuzzerTestOneInput(const uint8_t *data, size_t size) {
|
|
char filename[256];
|
|
|
|
#ifdef DWREGRESSIONTEMP
|
|
/* Under msys2, the /tmp/ results in an open fail,
|
|
so we discard the /tmp/ here */
|
|
sprintf(filename, "junklibfuzzer.%d", getpid());
|
|
#else
|
|
sprintf(filename, "/tmp/libfuzzer.%d", getpid());
|
|
#endif
|
|
FILE *fp = fopen(filename, "wb");
|
|
if (!fp) {
|
|
printf("FAIL libfuzzer cannot open temp as writeable %s\n",
|
|
filename);
|
|
return 0;
|
|
}
|
|
fwrite(data, size, 1, fp);
|
|
fclose(fp);
|
|
|
|
Dwarf_Debug dbg = 0;
|
|
int res = DW_DLV_ERROR;
|
|
Dwarf_Error error = 0;
|
|
Dwarf_Handler errhand = 0;
|
|
Dwarf_Ptr errarg = 0;
|
|
int regtabrulecount = 0;
|
|
int curopt = 0;
|
|
|
|
int fd = open(filename, O_RDONLY | O_BINARY);
|
|
if (fd < 0) {
|
|
exit(EXIT_FAILURE);
|
|
}
|
|
|
|
res = dwarf_init_b(fd, DW_GROUPNUMBER_ANY, errhand, errarg, &dbg, &error);
|
|
|
|
if (res != DW_DLV_OK) {
|
|
dwarf_dealloc_error(dbg, error);
|
|
} else {
|
|
examplew(dbg, &error);
|
|
}
|
|
|
|
dwarf_finish(dbg);
|
|
close(fd);
|
|
unlink(filename);
|
|
return 0;
|
|
}
|
|
|
|
int examplew(Dwarf_Debug dbg, Dwarf_Error *error) {
|
|
Dwarf_Gdbindex gindexptr = 0;
|
|
Dwarf_Unsigned version = 0;
|
|
Dwarf_Unsigned cu_list_offset = 0;
|
|
Dwarf_Unsigned types_cu_list_offset = 0;
|
|
Dwarf_Unsigned address_area_offset = 0;
|
|
Dwarf_Unsigned symbol_table_offset = 0;
|
|
Dwarf_Unsigned constant_pool_offset = 0;
|
|
Dwarf_Unsigned section_size = 0;
|
|
const char *section_name = 0;
|
|
int res = 0;
|
|
|
|
res = dwarf_gdbindex_header(dbg, &gindexptr, &version, &cu_list_offset,
|
|
&types_cu_list_offset, &address_area_offset,
|
|
&symbol_table_offset, &constant_pool_offset,
|
|
§ion_size, §ion_name, error);
|
|
if (res != DW_DLV_OK) {
|
|
return res;
|
|
}
|
|
{
|
|
Dwarf_Unsigned length = 0;
|
|
Dwarf_Unsigned typeslength = 0;
|
|
Dwarf_Unsigned i = 0;
|
|
res = dwarf_gdbindex_culist_array(gindexptr, &length, error);
|
|
if (res != DW_DLV_OK) {
|
|
dwarf_dealloc_gdbindex(gindexptr);
|
|
return res;
|
|
}
|
|
for (i = 0; i < length; ++i) {
|
|
Dwarf_Unsigned cuoffset = 0;
|
|
Dwarf_Unsigned culength = 0;
|
|
res = dwarf_gdbindex_culist_entry(gindexptr, i, &cuoffset, &culength,
|
|
error);
|
|
if (res != DW_DLV_OK) {
|
|
return res;
|
|
}
|
|
}
|
|
res = dwarf_gdbindex_types_culist_array(gindexptr, &typeslength, error);
|
|
if (res != DW_DLV_OK) {
|
|
dwarf_dealloc_gdbindex(gindexptr);
|
|
return res;
|
|
}
|
|
for (i = 0; i < typeslength; ++i) {
|
|
Dwarf_Unsigned cuoffset = 0;
|
|
Dwarf_Unsigned tuoffset = 0;
|
|
Dwarf_Unsigned type_signature = 0;
|
|
res = dwarf_gdbindex_types_culist_entry(
|
|
gindexptr, i, &cuoffset, &tuoffset, &type_signature, error);
|
|
if (res != DW_DLV_OK) {
|
|
dwarf_dealloc_gdbindex(gindexptr);
|
|
return res;
|
|
}
|
|
}
|
|
|
|
res = examplewgdbindex(gindexptr, error);
|
|
if (res != DW_DLV_OK) {
|
|
dwarf_dealloc_gdbindex(gindexptr);
|
|
return res;
|
|
}
|
|
|
|
res = examplex(gindexptr, error);
|
|
if (res != DW_DLV_OK) {
|
|
dwarf_dealloc_gdbindex(gindexptr);
|
|
return res;
|
|
}
|
|
|
|
dwarf_dealloc_gdbindex(gindexptr);
|
|
}
|
|
return DW_DLV_OK;
|
|
}
|
|
|
|
int examplewgdbindex(Dwarf_Gdbindex gdbindex, Dwarf_Error *error) {
|
|
Dwarf_Unsigned list_len = 0;
|
|
Dwarf_Unsigned i = 0;
|
|
int res = 0;
|
|
|
|
res = dwarf_gdbindex_addressarea(gdbindex, &list_len, error);
|
|
if (res != DW_DLV_OK) {
|
|
return res;
|
|
}
|
|
for (i = 0; i < list_len; i++) {
|
|
Dwarf_Unsigned lowpc = 0;
|
|
Dwarf_Unsigned highpc = 0;
|
|
Dwarf_Unsigned cu_index = 0;
|
|
res = dwarf_gdbindex_addressarea_entry(gdbindex, i, &lowpc, &highpc,
|
|
&cu_index, error);
|
|
if (res != DW_DLV_OK) {
|
|
return res;
|
|
}
|
|
}
|
|
return DW_DLV_OK;
|
|
}
|
|
|
|
int examplex(Dwarf_Gdbindex gdbindex, Dwarf_Error *error) {
|
|
Dwarf_Unsigned symtab_list_length = 0;
|
|
Dwarf_Unsigned i = 0;
|
|
int res = 0;
|
|
|
|
res = dwarf_gdbindex_symboltable_array(gdbindex, &symtab_list_length, error);
|
|
if (res != DW_DLV_OK) {
|
|
return res;
|
|
}
|
|
for (i = 0; i < symtab_list_length; i++) {
|
|
Dwarf_Unsigned symnameoffset = 0;
|
|
Dwarf_Unsigned cuvecoffset = 0;
|
|
Dwarf_Unsigned cuvec_len = 0;
|
|
Dwarf_Unsigned ii = 0;
|
|
const char *name = 0;
|
|
int resl = 0;
|
|
|
|
resl = dwarf_gdbindex_symboltable_entry(gdbindex, i, &symnameoffset,
|
|
&cuvecoffset, error);
|
|
if (resl != DW_DLV_OK) {
|
|
return resl;
|
|
}
|
|
resl =
|
|
dwarf_gdbindex_string_by_offset(gdbindex, symnameoffset, &name, error);
|
|
if (resl != DW_DLV_OK) {
|
|
return resl;
|
|
}
|
|
resl = dwarf_gdbindex_cuvector_length(gdbindex, cuvecoffset, &cuvec_len,
|
|
error);
|
|
if (resl != DW_DLV_OK) {
|
|
return resl;
|
|
}
|
|
for (ii = 0; ii < cuvec_len; ++ii) {
|
|
Dwarf_Unsigned attributes = 0;
|
|
Dwarf_Unsigned cu_index = 0;
|
|
Dwarf_Unsigned symbol_kind = 0;
|
|
Dwarf_Unsigned is_static = 0;
|
|
int res2 = 0;
|
|
|
|
res2 = dwarf_gdbindex_cuvector_inner_attributes(gdbindex, cuvecoffset, ii,
|
|
&attributes, error);
|
|
if (res2 != DW_DLV_OK) {
|
|
return res2;
|
|
}
|
|
res2 = dwarf_gdbindex_cuvector_instance_expand_value(
|
|
gdbindex, attributes, &cu_index, &symbol_kind, &is_static, error);
|
|
if (res2 != DW_DLV_OK) {
|
|
return res2;
|
|
}
|
|
}
|
|
}
|
|
return DW_DLV_OK;
|
|
}
|