workbench/c/SymbolDump.c

   1 /*
   2     Copyright © 2013-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7  */
   8
   9 /******************************************************************************
  10
  11
  12     NAME
  13
  14         SymbolDump
  15
  16     SYNOPSIS
  17
  18         (N/A)
  19
  20     LOCATION
  21
  22         C:
  23
  24     FUNCTION
  25
  26          Dumps debug symbols to the file "SYS:symbols.out" to be used with
  27          Callgrind. See "Debugging manual" at www.aros.org.
  28
  29     INPUTS
  30
  31     RESULT
  32
  33     NOTES
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40
  41     INTERNALS
  42
  43     HISTORY
  44
  45 ******************************************************************************/
  46
  47 #include <utility/hooks.h>
  48 #include <libraries/debug.h>
  49 #include <proto/exec.h>
  50 #include <proto/dos.h>
  51 #include <proto/debug.h>
  52
  53 const TEXT version[] = "$VER: SymbolDump 1.1 (18.5.2014)\n";
  54
  55 struct Library * DebugBase = NULL;
  56
  57 AROS_UFH3(static void, symbolhandler,
  58         AROS_UFHA(struct Hook *,        hook, A0),
  59         AROS_UFHA(APTR,                 object, A2),
  60         AROS_UFHA(struct SymbolInfo *,  message, A1))
  61 {
  62     AROS_USERFUNC_INIT
  63
  64     FPrintf((BPTR)hook->h_Data, "S|%s|%s|0x%p|0x%p\n", message->si_ModuleName, message->si_SymbolName,
  65             message->si_SymbolStart, message->si_SymbolEnd);
  66
  67     AROS_USERFUNC_EXIT
  68 }
  69
  70 static void OpenLibraries()
  71 {
  72     DebugBase = OpenLibrary("debug.library", 0L);
  73 }
  74
  75 static void CloseLibraries()
  76 {
  77     CloseLibrary(DebugBase);
  78     DebugBase = NULL;
  79 }
  80
  81 int main(void)
  82 {
  83     BPTR output = BNULL;
  84
  85     OpenLibraries();
  86
  87     output = Open("SYS:symbols.out", MODE_NEWFILE);
  88
  89     if (output != BNULL)
  90     {
  91         struct Hook handler;
  92         handler.h_Entry = (HOOKFUNC)symbolhandler;
  93         handler.h_Data = (APTR)output;
  94
  95         EnumerateSymbolsA(&handler, NULL);
  96
  97         Close(output);
  98     }
  99
 100     CloseLibraries();
 101
 102     return 0;
 103 }