1 /* Write formatted list with names for addresses in backtrace to a file.
2 Copyright (C) 1998 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Library General Public License as
8 published by the Free Software Foundation; either version 2 of the
9 License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Library General Public License for more details.
16 You should have received a copy of the GNU Library General Public
17 License along with the GNU C Library; see the file COPYING.LIB. If not,
18 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
25 #include <stdio-common/_itoa.h>
26 #include <elf/ldsodefs.h>
28 #if __ELF_NATIVE_CLASS == 32
31 /* We assyme 64bits. */
32 # define WORD_WIDTH 16
37 __backtrace_symbols_fd (array
, size
, fd
)
45 for (cnt
= 0; cnt
< size
; ++cnt
)
51 if (_dl_addr (array
[cnt
], &info
)
52 && info
.dli_fname
&& info
.dli_fname
[0] != '\0')
54 /* Name of the file. */
55 iov
[0].iov_base
= (void *) info
.dli_fname
;
56 iov
[0].iov_len
= strlen (info
.dli_fname
);
60 if (info
.dli_sname
!= NULL
)
62 char buf2
[WORD_WIDTH
];
65 iov
[1].iov_base
= (void *) "(";
67 iov
[2].iov_base
= (void *) info
.dli_sname
;
68 iov
[2].iov_len
= strlen (info
.dli_sname
);
70 if (array
[cnt
] >= (void *) info
.dli_saddr
)
72 iov
[3].iov_base
= (void *) "+0x";
73 diff
= array
[cnt
] - info
.dli_saddr
;
77 iov
[3].iov_base
= (void *) "-0x";
78 diff
= info
.dli_saddr
- array
[cnt
];
82 iov
[4].iov_base
= _itoa_word ((unsigned long int) diff
,
83 &buf2
[WORD_WIDTH
], 16, 0);
84 iov
[4].iov_len
= &buf2
[WORD_WIDTH
] - (char *) iov
[4].iov_base
;
86 iov
[5].iov_base
= (void *) ")";
93 iov
[last
].iov_base
= (void *) "[0x";
94 iov
[last
].iov_len
= 3;
97 iov
[last
].iov_base
= _itoa_word ((unsigned long int) array
[cnt
],
98 &buf
[WORD_WIDTH
], 16, 0);
99 iov
[last
].iov_len
= &buf
[WORD_WIDTH
] - (char *) iov
[last
].iov_base
;
102 iov
[last
].iov_base
= (void *) "]\n";
103 iov
[last
].iov_len
= 2;
106 __writev (fd
, iov
, last
);
109 weak_alias (__backtrace_symbols_fd
, backtrace_symbols_fd
)