lib/rossym/find.c

   1 /*
   2  * COPYRIGHT:       See COPYING in the top level directory
   3  * PROJECT:         ReactOS kernel
   4  * FILE:            lib/rossym/find.c
   5  * PURPOSE:         Find symbol info for an address
   6  *
   7  * PROGRAMMERS:     Ge van Geldorp (gvg@reactos.com)
   8  */
   9 /*
  10  * Parts of this file based on work Copyright (c) 1990, 1993
  11  *      The Regents of the University of California.  All rights reserved.
  12  *
  13  * Redistribution and use in source and binary forms, with or without
  14  * modification, are permitted provided that the following conditions
  15  * are met:
  16  * 1. Redistributions of source code must retain the above copyright
  17  *    notice, this list of conditions and the following disclaimer.
  18  * 2. Redistributions in binary form must reproduce the above copyright
  19  *    notice, this list of conditions and the following disclaimer in the
  20  *    documentation and/or other materials provided with the distribution.
  21  * 4. Neither the name of the University nor the names of its contributors
  22  *    may be used to endorse or promote products derived from this software
  23  *    without specific prior written permission.
  24  *
  25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  35  * SUCH DAMAGE.
  36  */
  37
  38 #include <ntddk.h>
  39 #include <reactos/rossym.h>
  40 #include "rossympriv.h"
  41
  42 #define NDEBUG
  43 #include <debug.h>
  44
  45 #include "rossym.h"
  46 #include "dwarf.h"
  47 #include "pe.h"
  48
  49 BOOLEAN
  50 RosSymGetAddressInformation
  51 (PROSSYM_INFO RosSymInfo,
  52  ULONG_PTR RelativeAddress,
  53  PROSSYM_LINEINFO RosSymLineInfo)
  54 {
  55     ROSSYM_REGISTERS registers;
  56     DwarfParam params[sizeof(RosSymLineInfo->Parameters)/sizeof(RosSymLineInfo->Parameters[0])];
  57     DwarfSym proc = { };
  58     int i;
  59         int res = dwarfpctoline
  60                 (RosSymInfo,
  61          &proc,
  62                  RelativeAddress + RosSymInfo->pe->imagebase,
  63                  &RosSymLineInfo->FileName,
  64                  &RosSymLineInfo->FunctionName,
  65                  &RosSymLineInfo->LineNumber);
  66         if (res == -1) {
  67         werrstr("Could not get basic function info");
  68                 return FALSE;
  69     }
  70
  71     if (!(RosSymLineInfo->Flags & ROSSYM_LINEINFO_HAS_REGISTERS))
  72         return TRUE;
  73
  74     registers = RosSymLineInfo->Registers;
  75
  76     DwarfExpr cfa = { };
  77     ulong cfaLocation;
  78     if (dwarfregunwind
  79         (RosSymInfo,
  80          RelativeAddress + RosSymInfo->pe->imagebase,
  81          proc.attrs.framebase.c,
  82          &cfa,
  83          &registers) == -1) {
  84         werrstr("Can't get cfa location for %s", RosSymLineInfo->FunctionName);
  85         return TRUE;
  86     }
  87
  88     res = dwarfgetparams
  89         (RosSymInfo,
  90          &proc,
  91          RelativeAddress + RosSymInfo->pe->imagebase,
  92          sizeof(params)/sizeof(params[0]),
  93          params);
  94
  95     if (res == -1) {
  96         werrstr("%s: could not get params at all", RosSymLineInfo->FunctionName);
  97         RosSymLineInfo->NumParams = 0;
  98         return TRUE;
  99     }
 100
 101     werrstr("%s: res %d", RosSymLineInfo->FunctionName, res);
 102     RosSymLineInfo->NumParams = res;
 103
 104     res = dwarfcomputecfa(RosSymInfo, &cfa, &registers, &cfaLocation);
 105     if (res == -1) {
 106         werrstr("%s: could not get our own cfa", RosSymLineInfo->FunctionName);
 107         return TRUE;
 108     }
 109
 110     for (i = 0; i < RosSymLineInfo->NumParams; i++) {
 111         werrstr("Getting arg %s, unit %x, type %x",
 112                 params[i].name, params[i].unit, params[i].type);
 113         res = dwarfargvalue
 114             (RosSymInfo,
 115              &proc,
 116              RelativeAddress + RosSymInfo->pe->imagebase,
 117              cfaLocation,
 118              &registers,
 119              &params[i]);
 120         if (res == -1) { RosSymLineInfo->NumParams = i; return TRUE; }
 121         werrstr("%s: %x", params[i].name, params[i].value);
 122         RosSymLineInfo->Parameters[i].ValueName = malloc(strlen(params[i].name)+1);
 123         strcpy(RosSymLineInfo->Parameters[i].ValueName, params[i].name);
 124         free(params[i].name);
 125         RosSymLineInfo->Parameters[i].Value = params[i].value;
 126     }
 127
 128     return TRUE;
 129 }
 130
 131 /* EOF */