WebSVN – HelenOS-historic – Diff – /kernel/trunk/generic/src/debug/symtab.c


/*
 * Copyright (C) 2005 Ondrej Palkovsky
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
 
#include <symtab.h>
#include <typedefs.h>
#include <arch/byteorder.h>
#include <func.h>
#include <print.h>
 
/** Return entry that seems most likely to correspond to address
 *
 * Return entry that seems most likely to correspond
 * to address passed in the argument.
 *
 * @param addr Address.
 *
 * @return Pointer to respective symbol string on success, NULL otherwise.
 */
char * get_symtab_entry(__native addr)
{
    count_t i;
 
    for (i=1;symbol_table[i].address_le;++i) {
        if (addr < __u64_le2host(symbol_table[i].address_le))
            break;
    }
    if (addr >= __u64_le2host(symbol_table[i-1].address_le))
        return symbol_table[i-1].symbol_name;
    return NULL;
}
 
/** Find symbols that match the parameter forward and print them
 *
 * @param name - search string
 * @param startpos - starting position, changes to found position
 * @return Pointer to the part of string that should be completed or NULL
 */
static char * symtab_search_one(const char *name, int *startpos)
{
    int namelen = strlen(name);
    char *curname;
    int i,j;
    int colonoffset = -1;
 
    for (i=0;name[i];i++)
        if (name[i] == ':') {
            colonoffset = i;
            break;
        }
 
    for (i=*startpos;symbol_table[i].address_le;++i) {
        /* Find a ':' in name */
        curname = symbol_table[i].symbol_name;
        for (j=0; curname[j] && curname[j] != ':'; j++)
            ;
        if (!curname[j])
            continue;
        j -= colonoffset;
        curname += j;
        if (strlen(curname) < namelen)
            continue;
        if (strncmp(curname, name, namelen) == 0) {
            *startpos = i;
            return curname+namelen;
        }
    }
    return NULL;
}
 
/** Return address that corresponds to the entry
 *
 * Search symbol table, and if there is one match, return it
 *
 * @param name Name of the symbol
 * @return 0 - Not found, -1 - Duplicate symbol, other - address of symbol
 */
__address get_symbol_addr(const char *name)
{
    count_t found = 0;
    __address addr = NULL;
    char *hint;
    int i;
 
    i = 0;
    while ((hint=symtab_search_one(name, &i))) {
        if (!strlen(hint)) {
            addr =  __u64_le2host(symbol_table[i].address_le);
            found++;
        }
        i++;
    }
    if (found > 1)
        return ((__address) -1);
    return addr;
}
 
/** Find symbols that match parameter and prints them */
void symtab_print_search(const char *name)
{
    int i;
    __address addr;
    char *realname;
 
 
    i = 0;
    while (symtab_search_one(name, &i)) {
        addr =  __u64_le2host(symbol_table[i].address_le);
        realname = symbol_table[i].symbol_name;
        printf("%.*p: %s\n", sizeof(__address) * 2, addr, realname);
        i++;
    }
}
 
/** Symtab completion
 *
 * @param name - Search string, completes to symbol name
 * @returns - 0 - nothing found, 1 - success, >1 print duplicates
 */
int symtab_compl(char *input)
{
    char output[MAX_SYMBOL_NAME+1];
    int startpos = 0;
    char *foundtxt;
    int found = 0;
    int i;
    char *name = input;
 
    /* Allow completion of pointers  */
    if (name[0] == '*' || name[0] == '&')
        name++;
 
    /* Do not print everything */
    if (!strlen(name))
        return 0;
   
 
    output[0] = '\0';
 
    while ((foundtxt = symtab_search_one(name, &startpos))) {
        startpos++;
        if (!found)
            strncpy(output, foundtxt, strlen(foundtxt)+1);
        else {
            for (i=0; output[i] && foundtxt[i] && output[i]==foundtxt[i]; i++)
                ;
            output[i] = '\0';
        }
        found++;
    }
    if (!found)
        return 0;
 
    if (found > 1 && !strlen(output)) {
        printf("\n");
        startpos = 0;
        while ((foundtxt = symtab_search_one(name, &startpos))) {
            printf("%s\n", symbol_table[startpos].symbol_name);
            startpos++;
        }
    }
    strncpy(input, output, MAX_SYMBOL_NAME);
    return found;
   
}
 

Rev 1196	Rev 1224
1	/*	1	/*
2	* Copyright (C) 2005 Ondrej Palkovsky	2	* Copyright (C) 2005 Ondrej Palkovsky
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29		29
30	#include <symtab.h>	30	#include <symtab.h>
31	#include <typedefs.h>	31	#include <typedefs.h>
32	#include <arch/byteorder.h>	32	#include <arch/byteorder.h>
33	#include <func.h>	33	#include <func.h>
34	#include <print.h>	34	#include <print.h>
35		35
36	/** Return entry that seems most likely to correspond to address	36	/** Return entry that seems most likely to correspond to address
37	*	37	*
38	* Return entry that seems most likely to correspond	38	* Return entry that seems most likely to correspond
39	* to address passed in the argument.	39	* to address passed in the argument.
40	*	40	*
41	* @param addr Address.	41	* @param addr Address.
42	*	42	*
43	* @return Pointer to respective symbol string on success, NULL otherwise.	43	* @return Pointer to respective symbol string on success, NULL otherwise.
44	*/	44	*/
45	char * get_symtab_entry(__native addr)	45	char * get_symtab_entry(__native addr)
46	{	46	{
47	count_t i;	47	count_t i;
48		48
49	for (i=1;symbol_table[i].address_le;++i) {	49	for (i=1;symbol_table[i].address_le;++i) {
50	if (addr < __u64_le2host(symbol_table[i].address_le))	50	if (addr < __u64_le2host(symbol_table[i].address_le))
51	break;	51	break;
52	}	52	}
53	if (addr >= __u64_le2host(symbol_table[i-1].address_le))	53	if (addr >= __u64_le2host(symbol_table[i-1].address_le))
54	return symbol_table[i-1].symbol_name;	54	return symbol_table[i-1].symbol_name;
55	return NULL;	55	return NULL;
56	}	56	}
57		57
58	/** Find symbols that match the parameter forward and print them	58	/** Find symbols that match the parameter forward and print them
59	*	59	*
60	* @param name - search string	60	* @param name - search string
61	* @param startpos - starting position, changes to found position	61	* @param startpos - starting position, changes to found position
62	* @return Pointer to the part of string that should be completed or NULL	62	* @return Pointer to the part of string that should be completed or NULL
63	*/	63	*/
64	static char * symtab_search_one(const char name, int startpos)	64	static char * symtab_search_one(const char name, int startpos)
65	{	65	{
66	int namelen = strlen(name);	66	int namelen = strlen(name);
67	char *curname;	67	char *curname;
68	int i,j;	68	int i,j;
69	int colonoffset = -1;	69	int colonoffset = -1;
70		70
71	for (i=0;name[i];i++)	71	for (i=0;name[i];i++)
72	if (name[i] == ':') {	72	if (name[i] == ':') {
73	colonoffset = i;	73	colonoffset = i;
74	break;	74	break;
75	}	75	}
76		76
77	for (i=*startpos;symbol_table[i].address_le;++i) {	77	for (i=*startpos;symbol_table[i].address_le;++i) {
78	/* Find a ':' in name */	78	/* Find a ':' in name */
79	curname = symbol_table[i].symbol_name;	79	curname = symbol_table[i].symbol_name;
80	for (j=0; curname[j] && curname[j] != ':'; j++)	80	for (j=0; curname[j] && curname[j] != ':'; j++)
81	;	81	;
82	if (!curname[j])	82	if (!curname[j])
83	continue;	83	continue;
84	j -= colonoffset;	84	j -= colonoffset;
85	curname += j;	85	curname += j;
86	if (strlen(curname) < namelen)	86	if (strlen(curname) < namelen)
87	continue;	87	continue;
88	if (strncmp(curname, name, namelen) == 0) {	88	if (strncmp(curname, name, namelen) == 0) {
89	*startpos = i;	89	*startpos = i;
90	return curname+namelen;	90	return curname+namelen;
91	}	91	}
92	}	92	}
93	return NULL;	93	return NULL;
94	}	94	}
95		95
96	/** Return address that corresponds to the entry	96	/** Return address that corresponds to the entry
97	*	97	*
98	* Search symbol table, and if there is one match, return it	98	* Search symbol table, and if there is one match, return it
99	*	99	*
100	* @param name Name of the symbol	100	* @param name Name of the symbol
101	* @return 0 - Not found, -1 - Duplicate symbol, other - address of symbol	101	* @return 0 - Not found, -1 - Duplicate symbol, other - address of symbol
102	*/	102	*/
103	__address get_symbol_addr(const char *name)	103	__address get_symbol_addr(const char *name)
104	{	104	{
105	count_t found = 0;	105	count_t found = 0;
106	__address addr = NULL;	106	__address addr = NULL;
107	char *hint;	107	char *hint;
108	int i;	108	int i;
109		109
110	i = 0;	110	i = 0;
111	while ((hint=symtab_search_one(name, &i))) {	111	while ((hint=symtab_search_one(name, &i))) {
112	if (!strlen(hint)) {	112	if (!strlen(hint)) {
113	addr = __u64_le2host(symbol_table[i].address_le);	113	addr = __u64_le2host(symbol_table[i].address_le);
114	found++;	114	found++;
115	}	115	}
116	i++;	116	i++;
117	}	117	}
118	if (found > 1)	118	if (found > 1)
119	return ((__address) -1);	119	return ((__address) -1);
120	return addr;	120	return addr;
121	}	121	}
122		122
123	/** Find symbols that match parameter and prints them */	123	/** Find symbols that match parameter and prints them */
124	void symtab_print_search(const char *name)	124	void symtab_print_search(const char *name)
125	{	125	{
126	int i;	126	int i;
127	__address addr;	127	__address addr;
128	char *realname;	128	char *realname;
129		129
130		130
131	i = 0;	131	i = 0;
132	while (symtab_search_one(name, &i)) {	132	while (symtab_search_one(name, &i)) {
133	addr = __u64_le2host(symbol_table[i].address_le);	133	addr = __u64_le2host(symbol_table[i].address_le);
134	realname = symbol_table[i].symbol_name;	134	realname = symbol_table[i].symbol_name;
135	printf("%p: %s\n", addr, realname);	135	printf("%.p: %s\n", sizeof(__address) 2, addr, realname);
136	i++;	136	i++;
137	}	137	}
138	}	138	}
139		139
140	/** Symtab completion	140	/** Symtab completion
141	*	141	*
142	* @param name - Search string, completes to symbol name	142	* @param name - Search string, completes to symbol name
143	* @returns - 0 - nothing found, 1 - success, >1 print duplicates	143	* @returns - 0 - nothing found, 1 - success, >1 print duplicates
144	*/	144	*/
145	int symtab_compl(char *input)	145	int symtab_compl(char *input)
146	{	146	{
147	char output[MAX_SYMBOL_NAME+1];	147	char output[MAX_SYMBOL_NAME+1];
148	int startpos = 0;	148	int startpos = 0;
149	char *foundtxt;	149	char *foundtxt;
150	int found = 0;	150	int found = 0;
151	int i;	151	int i;
152	char *name = input;	152	char *name = input;
153		153
154	/* Allow completion of pointers */	154	/* Allow completion of pointers */
155	if (name[0] == '*' \|\| name[0] == '&')	155	if (name[0] == '*' \|\| name[0] == '&')
156	name++;	156	name++;
157		157
158	/* Do not print everything */	158	/* Do not print everything */
159	if (!strlen(name))	159	if (!strlen(name))
160	return 0;	160	return 0;
161		161
162		162
163	output[0] = '\0';	163	output[0] = '\0';
164		164
165	while ((foundtxt = symtab_search_one(name, &startpos))) {	165	while ((foundtxt = symtab_search_one(name, &startpos))) {
166	startpos++;	166	startpos++;
167	if (!found)	167	if (!found)
168	strncpy(output, foundtxt, strlen(foundtxt)+1);	168	strncpy(output, foundtxt, strlen(foundtxt)+1);
169	else {	169	else {
170	for (i=0; output[i] && foundtxt[i] && output[i]==foundtxt[i]; i++)	170	for (i=0; output[i] && foundtxt[i] && output[i]==foundtxt[i]; i++)
171	;	171	;
172	output[i] = '\0';	172	output[i] = '\0';
173	}	173	}
174	found++;	174	found++;
175	}	175	}
176	if (!found)	176	if (!found)
177	return 0;	177	return 0;
178		178
179	if (found > 1 && !strlen(output)) {	179	if (found > 1 && !strlen(output)) {
180	printf("\n");	180	printf("\n");
181	startpos = 0;	181	startpos = 0;
182	while ((foundtxt = symtab_search_one(name, &startpos))) {	182	while ((foundtxt = symtab_search_one(name, &startpos))) {
183	printf("%s\n", symbol_table[startpos].symbol_name);	183	printf("%s\n", symbol_table[startpos].symbol_name);
184	startpos++;	184	startpos++;
185	}	185	}
186	}	186	}
187	strncpy(input, output, MAX_SYMBOL_NAME);	187	strncpy(input, output, MAX_SYMBOL_NAME);
188	return found;	188	return found;
189		189
190	}	190	}
191		191

Subversion Repositories HelenOS-historic

(root)/kernel/trunk/generic/src/debug/symtab.c – Rev 1196 → 1224