1 /*
2 * This file is part of ltrace.
3 * Copyright (C) 2012,2013 Petr Machata, Red Hat Inc.
4 * Copyright (C) 1998,1999,2003,2004,2008,2009 Juan Cespedes
5 * Copyright (C) 2006 Ian Wienand
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 2 of the
10 * License, or (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
20 * 02110-1301 USA
21 */
22
23 #include "config.h"
24
25 #include <string.h>
26 #include <stdlib.h>
27 #include <stdio.h>
28
29 #include "demangle.h"
30 #include "dict.h"
31 #include "debug.h"
32
33 #ifdef USE_DEMANGLE
34
35 /*****************************************************************************/
36
37 static struct dict *name_cache = NULL;
38
39 const char *
my_demangle(const char * function_name)40 my_demangle(const char *function_name) {
41 #ifdef USE_CXA_DEMANGLE
42 extern char *__cxa_demangle(const char *, char *, size_t *, int *);
43 #endif
44
45 debug(DEBUG_FUNCTION, "my_demangle(name=%s)", function_name);
46
47 if (name_cache == NULL) {
48 name_cache = malloc(sizeof(*name_cache));
49 if (name_cache != NULL)
50 DICT_INIT(name_cache, char *, const char *,
51 dict_hash_string, dict_eq_string, NULL);
52 }
53
54 const char *tmp = NULL;
55 if (name_cache != NULL
56 && DICT_FIND_VAL(name_cache, &function_name, &tmp) == 0)
57 return tmp;
58
59 #ifdef HAVE_LIBIBERTY
60 tmp = cplus_demangle(function_name,
61 DMGL_ANSI | DMGL_PARAMS);
62 #elif defined USE_CXA_DEMANGLE
63 int status = 0;
64 tmp = __cxa_demangle(function_name, NULL, NULL, &status);
65 #endif
66 if (name_cache == NULL || tmp == NULL) {
67 fail:
68 if (tmp == NULL)
69 return function_name;
70 return tmp;
71 }
72
73 const char *fn_copy = strdup(function_name);
74 if (fn_copy == NULL)
75 goto fail;
76
77 if (DICT_INSERT(name_cache, &fn_copy, &tmp) < 0) {
78 free((char *)fn_copy);
79 goto fail;
80 }
81
82 return tmp;
83 }
84
85 #endif
86