Rooba
/
boinc
mirror of https://github.com/BOINC/boinc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
boinc/lib/MoreAddrToSym.c

362 lines
11 KiB
C
Raw Blame History

// Berkeley Open Infrastructure for Network Computing
// http://boinc.berkeley.edu
// Copyright (C) 2005 University of California
//
// This is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation;
// either version 2.1 of the License, or (at your option) any later version.
//
// This software 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 Lesser General Public License for more details.
//
// To view the GNU Lesser General Public License visit
// http://www.gnu.org/copyleft/lesser.html
// or write to the Free Software Foundation, Inc.,
// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
/*
File: MoreAddrToSym.c
Contains: Code for mapping addresses to their symbolic names.
Written by: DTS
Copyright: Copyright (c) 2006 by Apple Computer, Inc., All Rights Reserved.
Disclaimer: IMPORTANT: This Apple software is supplied to you by Apple Computer, Inc.
("Apple") in consideration of your agreement to the following terms, and your
use, installation, modification or redistribution of this Apple software
constitutes acceptance of these terms. If you do not agree with these terms,
please do not use, install, modify or redistribute this Apple software.
In consideration of your agreement to abide by the following terms, and subject
to these terms, Apple grants you a personal, non-exclusive license, under AppleÕs
copyrights in this original Apple software (the "Apple Software"), to use,
reproduce, modify and redistribute the Apple Software, with or without
modifications, in source and/or binary forms; provided that if you redistribute
the Apple Software in its entirety and without modifications, you must retain
this notice and the following text and disclaimers in all such redistributions of
the Apple Software. Neither the name, trademarks, service marks or logos of
Apple Computer, Inc. may be used to endorse or promote products derived from the
Apple Software without specific prior written permission from Apple. Except as
expressly stated in this notice, no other rights or licenses, express or implied,
are granted by Apple herein, including but not limited to any patent rights that
may be infringed by your derivative works or by other works in which the Apple
Software may be incorporated.
The Apple Software is provided by Apple on an "AS IS" basis. APPLE MAKES NO
WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED
WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN
COMBINATION WITH YOUR PRODUCTS.
IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION
OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT
(INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN
ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
Change History (most recent first):
$Log$
Revision 1.1 2006/02/10 17:27:12 charlief
*** empty log message ***
Revision 1.2 2006/01/22 22:47:13 eskimo1
Significant rewrite to account for changes in MoreBacktrace. Still not as functional as I'd like.
Revision 1.1 2003/04/04 15:02:57 eskimo1
First checked in. This code still has bugs, but I've written enough code that checking in is a good idea.
*/
/////////////////////////////////////////////////////////////////
// Our Prototypes
#include "MoreAddrToSym.h"
// Mac OS Interfaces
#include <assert.h>
#include <string.h>
#include <stdbool.h>
#include <errno.h>
#include <stdlib.h>
#include <mach-o/dyld.h>
#include <mach-o/loader.h>
#include <mach-o/nlist.h>
#include <mach-o/stab.h>
// MIB Prototypes
/////////////////////////////////////////////////////////////////
extern int MoreAToSCreate(size_t count, MoreAToSSymInfo *symbols[])
// See comments in header.
{
int err;
assert(symbols != NULL);
assert(*symbols == NULL);
err = 0;
*symbols = calloc(count, sizeof(MoreAToSSymInfo));
if (*symbols == NULL) {
err = ENOMEM;
}
assert( (err == 0) == (*symbols != NULL) );
return err;
}
extern void MoreAToSDestroy(size_t count, MoreAToSSymInfo symbols[])
// See comments in header.
{
size_t index;
if (symbols != NULL) {
for (index = 0; index < count; index++) {
free( (void *) symbols[index].symbolName );
}
free(symbols);
}
}
static int ReplaceSymbolIfBetter(
MoreAToSSymInfo * existingSymbol,
MoreAToSSymbolType symbolType,
const char * symbolName,
MoreAToSOffset symbolOffset
)
// Check to see whether the symbolic information defined by symbolType,
// symbolName, and symbolOffset is 'better' than the symbolic information
// in existingSymbol. If so, replace the old information with the new.
// In this case, 'better' is defined as being having a smaller
// symbolOffset, that is, we've found a symbol that's closer to the
// requested address.
//
// The idea behind this code is that one day I'll come up with multiple
// ways to get at symbolic information, and then I'll only keep the best
// result. However, I don't really use this functionality yet.
{
int err;
bool replace;
assert(existingSymbol != NULL);
assert(symbolType != kMoreAToSNoSymbol);
assert(symbolName != NULL);
assert( (existingSymbol->symbolType == kMoreAToSNoSymbol) == (existingSymbol->symbolName == NULL) );
err = 0;
if (existingSymbol->symbolType == kMoreAToSNoSymbol) {
replace = true;
} else {
replace = (symbolOffset < existingSymbol->symbolOffset);
}
if (replace) {
char * tmp;
tmp = strdup(symbolName);
if (tmp == NULL) {
err = ENOMEM;
} else {
free( (void *) existingSymbol->symbolName );
existingSymbol->symbolType = symbolType;
existingSymbol->symbolName = tmp;
existingSymbol->symbolOffset = symbolOffset;
}
}
return err;
}
// FindOwnerOfPC and GetFunctionName countesy of Ed Wynne. Don't ask me
// how it works, or I'll start to whimper. Actually, I have a fairly good idea
// how it works, and a fairly good idea how to fix its more serious problems,
// but I just don't have time at the moment.
static const struct mach_header *FindOwnerOfPC(unsigned int pc)
{
unsigned int count,index,offset,cmdex;
struct segment_command * seg;
struct load_command * cmd;
const struct mach_header * header;
count = _dyld_image_count();
for (index = 0;index < count;index += 1)
{
header = _dyld_get_image_header(index);
offset = _dyld_get_image_vmaddr_slide(index);
cmd = (struct load_command*)((char*)header + sizeof(struct mach_header));
for (cmdex = 0;cmdex < header->ncmds;cmdex += 1,cmd = (struct load_command*)((char*)cmd + cmd->cmdsize))
{
switch(cmd->cmd)
{
case LC_SEGMENT:
seg = (struct segment_command*)cmd;
if ((pc >= (seg->vmaddr + offset)) && (pc < (seg->vmaddr + offset + seg->vmsize)))
return header;
break;
}
}
}
return NULL;
}
static const char *GetFunctionName(unsigned int pc,unsigned int *offset, bool *publicSymbol)
{
struct segment_command *seg_linkedit = NULL;
struct segment_command *seg_text = NULL;
struct symtab_command *symtab = NULL;
struct load_command *cmd;
const struct mach_header*header;
unsigned int vm_slide,file_slide;
struct nlist *sym,*symbase;
char *strings,*name;
unsigned int base,index;
header = FindOwnerOfPC(pc);
if (header != NULL)
{
cmd = (struct load_command*)((char*)header + sizeof(struct mach_header));
for (index = 0;index < header->ncmds;index += 1,cmd = (struct load_command*)((char*)cmd + cmd->cmdsize))
{
switch(cmd->cmd)
{
case LC_SEGMENT:
if (!strcmp(((struct segment_command*)cmd)->segname,SEG_TEXT))
seg_text = (struct segment_command*)cmd;
else if (!strcmp(((struct segment_command*)cmd)->segname,SEG_LINKEDIT))
seg_linkedit = (struct segment_command*)cmd;
break;
case LC_SYMTAB:
symtab = (struct symtab_command*)cmd;
break;
}
}
if ((seg_text == NULL) || (seg_linkedit == NULL) || (symtab == NULL))
{
*offset = 0;
return NULL;
}
vm_slide = (unsigned long)header - (unsigned long)seg_text->vmaddr;
file_slide = ((unsigned long)seg_linkedit->vmaddr - (unsigned long)seg_text->vmaddr) - seg_linkedit->fileoff;
symbase = (struct nlist*)((unsigned long)header + (symtab->symoff + file_slide));
strings = (char*)((unsigned long)header + (symtab->stroff + file_slide));
// Look for a global symbol.
for (index = 0,sym = symbase;index < symtab->nsyms;index += 1,sym += 1)
{
if (sym->n_type != N_FUN)
continue;
name = sym->n_un.n_strx ? (strings + sym->n_un.n_strx) : NULL;
base = sym->n_value + vm_slide;
for (index += 1,sym += 1;index < symtab->nsyms;index += 1,sym += 1)
if (sym->n_type == N_FUN)
break;
if ((pc >= base) && (pc <= (base + sym->n_value)) && (name != NULL) && (strlen(name) > 0))
{
*offset = pc - base;
*publicSymbol = true;
return strdup(name);
}
}
// Look for a reasonably close private symbol.
for (name = NULL,base = 0xFFFFFFFF,index = 0,sym = symbase;index < symtab->nsyms;index += 1,sym += 1)
{
if ((sym->n_type & 0x0E) != 0x0E)
continue;
if ((sym->n_value + vm_slide) > pc)
continue;
if ((base != 0xFFFFFFFF) && ((pc - (sym->n_value + vm_slide)) >= (pc - base)))
continue;
name = sym->n_un.n_strx ? (strings + sym->n_un.n_strx) : NULL;
base = sym->n_value + vm_slide;
}
*offset = pc - base;
*publicSymbol = false;
return (name != NULL) ? strdup(name) : NULL;
}
*offset = 0;
return NULL;
}
extern int MoreAToSCopySymbolNamesUsingDyld(
size_t count,
MoreAToSAddr addresses[],
MoreAToSSymInfo symbols[]
)
// See comments in header.
{
int err;
size_t index;
assert(addresses != NULL);
assert(symbols != NULL);
err = 0;
for (index = 0; index < count; index++) {
const char * thisSymbol;
const char * cleanSymbol;
unsigned int thisSymbolOffset;
bool thisSymbolPublic;
MoreAToSSymbolType thisSymbolType;
thisSymbol = NULL;
if (addresses[index] != 0) { // NULL is never a useful symbol
thisSymbol = GetFunctionName( (unsigned int) addresses[index], &thisSymbolOffset, &thisSymbolPublic);
}
if (thisSymbol != NULL) {
// Mach-O symbols virtually always start with '_'. If there's one there,
// let's strip it.
if (thisSymbol[0] == '_') {
cleanSymbol = &thisSymbol[1];
} else {
cleanSymbol = thisSymbol;
}
if (thisSymbolPublic) {
thisSymbolType = kMoreAToSDyldPubliSymbol;
} else {
thisSymbolType = kMoreAToSDyldPrivateSymbol;
}
err = ReplaceSymbolIfBetter(&symbols[index], thisSymbolType, cleanSymbol, thisSymbolOffset);
}
free( (void *) thisSymbol);
if (err != 0) {
break;
}
}
return err;
}
Reference in New Issue View Git Blame Copy Permalink