* cplus-dem.c (cplus_demangle): Fix formatting.
(grow_vect): Ditto. (ada_demangle): Ditto. (internal_cplus_demangle): Ditto. (mop_up): Ditto. * cplus-dem.c (main): Handle java_demangling. * cplus-dem.c (grow_vect): Prototype. (ada_demangle): Cast the arg of ctype macros to unsigned char.
This commit is contained in:
parent
d57fc35284
commit
f17755262c
|
@ -1,3 +1,20 @@
|
||||||
|
2000-11-21 Hans-Peter Nilsson <hp@bitrange.com>
|
||||||
|
|
||||||
|
* cplus-dem.c (cplus_demangle): Fix formatting.
|
||||||
|
(grow_vect): Ditto.
|
||||||
|
(ada_demangle): Ditto.
|
||||||
|
(internal_cplus_demangle): Ditto.
|
||||||
|
(mop_up): Ditto.
|
||||||
|
|
||||||
|
2000-11-21 H.J. Lu <hjl@gnu.org>
|
||||||
|
|
||||||
|
* cplus-dem.c (main): Handle java_demangling.
|
||||||
|
|
||||||
|
2000-11-21 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
|
||||||
|
|
||||||
|
* cplus-dem.c (grow_vect): Prototype.
|
||||||
|
(ada_demangle): Cast the arg of ctype macros to unsigned char.
|
||||||
|
|
||||||
2000-11-15 Hans-Peter Nilsson <hp@bitrange.com>
|
2000-11-15 Hans-Peter Nilsson <hp@bitrange.com>
|
||||||
|
|
||||||
* cplus-dem.c (ada_demangle): Add back ATTRIBUTE_UNUSED for
|
* cplus-dem.c (ada_demangle): Add back ATTRIBUTE_UNUSED for
|
||||||
|
|
|
@ -52,7 +52,7 @@ char * realloc ();
|
||||||
|
|
||||||
#include "libiberty.h"
|
#include "libiberty.h"
|
||||||
|
|
||||||
static char *ada_demangle PARAMS ((const char*, int));
|
static char *ada_demangle PARAMS ((const char *, int));
|
||||||
|
|
||||||
#define min(X,Y) (((X) < (Y)) ? (X) : (Y))
|
#define min(X,Y) (((X) < (Y)) ? (X) : (Y))
|
||||||
|
|
||||||
|
@ -527,6 +527,9 @@ static void
|
||||||
recursively_demangle PARAMS ((struct work_stuff *, const char **, string *,
|
recursively_demangle PARAMS ((struct work_stuff *, const char **, string *,
|
||||||
int));
|
int));
|
||||||
|
|
||||||
|
static void
|
||||||
|
grow_vect PARAMS ((void **, size_t *, size_t, int));
|
||||||
|
|
||||||
/* Translate count to integer, consuming tokens in the process.
|
/* Translate count to integer, consuming tokens in the process.
|
||||||
Conversion terminates on the first non-digit character.
|
Conversion terminates on the first non-digit character.
|
||||||
|
|
||||||
|
@ -906,9 +909,9 @@ cplus_demangle (mangled, options)
|
||||||
char *ret;
|
char *ret;
|
||||||
struct work_stuff work[1];
|
struct work_stuff work[1];
|
||||||
memset ((char *) work, 0, sizeof (work));
|
memset ((char *) work, 0, sizeof (work));
|
||||||
work -> options = options;
|
work->options = options;
|
||||||
if ((work -> options & DMGL_STYLE_MASK) == 0)
|
if ((work->options & DMGL_STYLE_MASK) == 0)
|
||||||
work -> options |= (int) current_demangling_style & DMGL_STYLE_MASK;
|
work->options |= (int) current_demangling_style & DMGL_STYLE_MASK;
|
||||||
|
|
||||||
/* The new-ABI demangling is implemented elsewhere. */
|
/* The new-ABI demangling is implemented elsewhere. */
|
||||||
if (GNU_NEW_ABI_DEMANGLING)
|
if (GNU_NEW_ABI_DEMANGLING)
|
||||||
|
@ -925,43 +928,44 @@ cplus_demangle (mangled, options)
|
||||||
|
|
||||||
/* Assuming *OLD_VECT points to an array of *SIZE objects of size
|
/* Assuming *OLD_VECT points to an array of *SIZE objects of size
|
||||||
ELEMENT_SIZE, grow it to contain at least MIN_SIZE objects,
|
ELEMENT_SIZE, grow it to contain at least MIN_SIZE objects,
|
||||||
updating *OLD_VECT and *SIZE as necessary. */
|
updating *OLD_VECT and *SIZE as necessary. */
|
||||||
|
|
||||||
static void
|
static void
|
||||||
grow_vect (old_vect, size, min_size, element_size)
|
grow_vect (old_vect, size, min_size, element_size)
|
||||||
void** old_vect;
|
void **old_vect;
|
||||||
size_t* size;
|
size_t *size;
|
||||||
size_t min_size;
|
size_t min_size;
|
||||||
int element_size;
|
int element_size;
|
||||||
{
|
{
|
||||||
if (*size < min_size) {
|
if (*size < min_size)
|
||||||
*size *= 2;
|
{
|
||||||
if (*size < min_size)
|
*size *= 2;
|
||||||
*size = min_size;
|
if (*size < min_size)
|
||||||
*old_vect = xrealloc (*old_vect, *size * element_size);
|
*size = min_size;
|
||||||
}
|
*old_vect = xrealloc (*old_vect, *size * element_size);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Demangle ada names:
|
/* Demangle ada names:
|
||||||
1. Discard final __{DIGIT}+ or ${DIGIT}+
|
1. Discard final __{DIGIT}+ or ${DIGIT}+
|
||||||
2. Convert other instances of embedded "__" to `.'.
|
2. Convert other instances of embedded "__" to `.'.
|
||||||
3. Discard leading _ada_.
|
3. Discard leading _ada_.
|
||||||
4. Remove everything after first ___ if it is followed by
|
4. Remove everything after first ___ if it is followed by 'X'.
|
||||||
'X'.
|
|
||||||
5. Put symbols that should be suppressed in <...> brackets.
|
5. Put symbols that should be suppressed in <...> brackets.
|
||||||
The resulting string is valid until the next call of ada_demangle.
|
The resulting string is valid until the next call of ada_demangle. */
|
||||||
*/
|
|
||||||
static char *
|
static char *
|
||||||
ada_demangle (mangled, option)
|
ada_demangle (mangled, option)
|
||||||
const char* mangled;
|
const char *mangled;
|
||||||
int option ATTRIBUTE_UNUSED;
|
int option ATTRIBUTE_UNUSED;
|
||||||
{
|
{
|
||||||
int i, j;
|
int i, j;
|
||||||
int len0;
|
int len0;
|
||||||
const char* p;
|
const char* p;
|
||||||
char* demangled = NULL;
|
char *demangled = NULL;
|
||||||
int at_start_name;
|
int at_start_name;
|
||||||
int changed;
|
int changed;
|
||||||
char* demangling_buffer = NULL;
|
char *demangling_buffer = NULL;
|
||||||
size_t demangling_buffer_size = 0;
|
size_t demangling_buffer_size = 0;
|
||||||
|
|
||||||
changed = 0;
|
changed = 0;
|
||||||
|
@ -989,16 +993,16 @@ ada_demangle (mangled, option)
|
||||||
goto Suppress;
|
goto Suppress;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Make demangled big enough for possible expansion by operator name. */
|
/* Make demangled big enough for possible expansion by operator name. */
|
||||||
grow_vect ((void**) &(demangling_buffer),
|
grow_vect ((void **) &(demangling_buffer),
|
||||||
&demangling_buffer_size, 2 * len0 + 1,
|
&demangling_buffer_size, 2 * len0 + 1,
|
||||||
sizeof (char));
|
sizeof (char));
|
||||||
demangled = demangling_buffer;
|
demangled = demangling_buffer;
|
||||||
|
|
||||||
if (isdigit (mangled[len0 - 1])) {
|
if (isdigit ((unsigned char) mangled[len0 - 1])) {
|
||||||
for (i = len0-2; i >= 0 && isdigit (mangled[i]); i -= 1)
|
for (i = len0 - 2; i >= 0 && isdigit ((unsigned char) mangled[i]); i -= 1)
|
||||||
;
|
;
|
||||||
if (i > 1 && mangled[i] == '_' && mangled[i-1] == '_')
|
if (i > 1 && mangled[i] == '_' && mangled[i - 1] == '_')
|
||||||
{
|
{
|
||||||
len0 = i - 1;
|
len0 = i - 1;
|
||||||
changed = 1;
|
changed = 1;
|
||||||
|
@ -1010,7 +1014,8 @@ ada_demangle (mangled, option)
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
for (i = 0, j = 0; i < len0 && ! isalpha (mangled[i]); i += 1, j += 1)
|
for (i = 0, j = 0; i < len0 && ! isalpha ((unsigned char)mangled[i]);
|
||||||
|
i += 1, j += 1)
|
||||||
demangled[j] = mangled[i];
|
demangled[j] = mangled[i];
|
||||||
|
|
||||||
at_start_name = 1;
|
at_start_name = 1;
|
||||||
|
@ -1018,7 +1023,7 @@ ada_demangle (mangled, option)
|
||||||
{
|
{
|
||||||
at_start_name = 0;
|
at_start_name = 0;
|
||||||
|
|
||||||
if (i < len0-2 && mangled[i] == '_' && mangled[i+1] == '_')
|
if (i < len0 - 2 && mangled[i] == '_' && mangled[i + 1] == '_')
|
||||||
{
|
{
|
||||||
demangled[j] = '.';
|
demangled[j] = '.';
|
||||||
changed = at_start_name = 1;
|
changed = at_start_name = 1;
|
||||||
|
@ -1033,7 +1038,7 @@ ada_demangle (mangled, option)
|
||||||
demangled[j] = '\000';
|
demangled[j] = '\000';
|
||||||
|
|
||||||
for (i = 0; demangled[i] != '\0'; i += 1)
|
for (i = 0; demangled[i] != '\0'; i += 1)
|
||||||
if (isupper (demangled[i]) || demangled[i] == ' ')
|
if (isupper ((unsigned char)demangled[i]) || demangled[i] == ' ')
|
||||||
goto Suppress;
|
goto Suppress;
|
||||||
|
|
||||||
if (! changed)
|
if (! changed)
|
||||||
|
@ -1042,7 +1047,7 @@ ada_demangle (mangled, option)
|
||||||
return demangled;
|
return demangled;
|
||||||
|
|
||||||
Suppress:
|
Suppress:
|
||||||
grow_vect ((void**) &(demangling_buffer),
|
grow_vect ((void **) &(demangling_buffer),
|
||||||
&demangling_buffer_size, strlen (mangled) + 3,
|
&demangling_buffer_size, strlen (mangled) + 3,
|
||||||
sizeof (char));
|
sizeof (char));
|
||||||
demangled = demangling_buffer;
|
demangled = demangling_buffer;
|
||||||
|
@ -1069,7 +1074,7 @@ internal_cplus_demangle (work, mangled)
|
||||||
string decl;
|
string decl;
|
||||||
int success = 0;
|
int success = 0;
|
||||||
char *demangled = NULL;
|
char *demangled = NULL;
|
||||||
int s1,s2,s3,s4;
|
int s1, s2, s3, s4;
|
||||||
s1 = work->constructor;
|
s1 = work->constructor;
|
||||||
s2 = work->destructor;
|
s2 = work->destructor;
|
||||||
s3 = work->static_type;
|
s3 = work->static_type;
|
||||||
|
@ -1122,7 +1127,7 @@ internal_cplus_demangle (work, mangled)
|
||||||
work->destructor = s2;
|
work->destructor = s2;
|
||||||
work->static_type = s3;
|
work->static_type = s3;
|
||||||
work->type_quals = s4;
|
work->type_quals = s4;
|
||||||
return (demangled);
|
return demangled;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
@ -1283,7 +1288,7 @@ mop_up (work, declp, success)
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
string_appendn (declp, "", 1);
|
string_appendn (declp, "", 1);
|
||||||
demangled = declp -> b;
|
demangled = declp->b;
|
||||||
}
|
}
|
||||||
return (demangled);
|
return (demangled);
|
||||||
}
|
}
|
||||||
|
@ -5092,6 +5097,7 @@ main (argc, argv)
|
||||||
case gnu_demangling:
|
case gnu_demangling:
|
||||||
case lucid_demangling:
|
case lucid_demangling:
|
||||||
case arm_demangling:
|
case arm_demangling:
|
||||||
|
case java_demangling:
|
||||||
case edg_demangling:
|
case edg_demangling:
|
||||||
valid_symbols = standard_symbol_characters ();
|
valid_symbols = standard_symbol_characters ();
|
||||||
break;
|
break;
|
||||||
|
|
Loading…
Reference in New Issue