WebSVN – HelenOS – Diff – /branches/dynload/uspace/lib/libc/generic/dlfcn.c


/*
 * Copyright (c) 2008 Jiri Svoboda
 * 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.
 */
 
/** @addtogroup rtld rtld
 * @brief
 * @{
 */
/**
 * @file
 */
 
#include <stdio.h>
#include <stdlib.h>
#include <dlfcn.h>
 
/* From librtld. */
#include <module.h>
#include <symbol.h>
 
void *dlopen(const char *path, int flag)
{
    module_t *m;
 
    if (runtime_env == NULL) {
        printf("Dynamic linker not set up -- initializing.\n");
        rtld_init_static();
    }
 
    printf("dlopen(\"%s\", %d)\n", path, flag);
 
    printf("module_find('%s')\n", path);
    m = module_find(path);
    if (m == NULL) {
        printf("NULL. module_load('%s')\n", path);
        m = module_load(path);
        printf("module_load_deps(m)\n");
        module_load_deps(m);
        /* Now relocate. */
        printf("module_process_relocs(m)\n");
        module_process_relocs(m);
    } else {
        printf("not NULL\n");
    }
 
    return (void *) m;
}
 
/*
 * @note Symbols with NULL values are not accounted for.
 */
void *dlsym(void *mod, const char *sym_name)
{
    elf_symbol_t *sd;
    module_t *sm;
 
    printf("dlsym(0x%lx, \"%s\")\n", (long)mod, sym_name);
    sd = symbol_bfs_find(sym_name, (module_t *) mod, &sm);
    if (sd != NULL) {
        return symbol_get_addr(sd, sm);
    }
 
    return NULL;
}
 
/** @}
 */
 

Rev 3689	Rev 3869
1	/*	1	/*
2	* Copyright (c) 2008 Jiri Svoboda	2	* Copyright (c) 2008 Jiri Svoboda
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	/** @addtogroup rtld rtld	29	/** @addtogroup rtld rtld
30	* @brief	30	* @brief
31	* @{	31	* @{
32	*/	32	*/
33	/**	33	/**
34	* @file	34	* @file
35	*/	35	*/
36		36
37	#include <stdio.h>	37	#include <stdio.h>
38	#include <stdlib.h>	38	#include <stdlib.h>
39	#include <dlfcn.h>	39	#include <dlfcn.h>
40		40
41	/* From librtld. */	41	/* From librtld. */
42	#include <module.h>	42	#include <module.h>
43	#include <symbol.h>	43	#include <symbol.h>
44		44
45	void dlopen(const char path, int flag)	45	void dlopen(const char path, int flag)
46	{	46	{
47	module_t *m;	47	module_t *m;
48		48
-		49	if (runtime_env == NULL) {
-		50	printf("Dynamic linker not set up -- initializing.\n");
-		51	rtld_init_static();
-		52	}
-		53
49	printf("dlopen(\"%s\", %d)\n", path, flag);	54	printf("dlopen(\"%s\", %d)\n", path, flag);
50		55
51	printf("module_find('%s')\n", path);	56	printf("module_find('%s')\n", path);
52	m = module_find(path);	57	m = module_find(path);
53	if (m == NULL) {	58	if (m == NULL) {
54	printf("NULL. module_load('%s')\n", path);	59	printf("NULL. module_load('%s')\n", path);
55	m = module_load(path);	60	m = module_load(path);
56	printf("module_load_deps(m)\n");	61	printf("module_load_deps(m)\n");
57	module_load_deps(m);	62	module_load_deps(m);
58	/* Now relocate. */	63	/* Now relocate. */
59	printf("module_process_relocs(m)\n");	64	printf("module_process_relocs(m)\n");
60	module_process_relocs(m);	65	module_process_relocs(m);
61	} else {	66	} else {
62	printf("not NULL\n");	67	printf("not NULL\n");
63	}	68	}
64		69
65	return (void *) m;	70	return (void *) m;
66	}	71	}
67		72
68	/*	73	/*
69	* @note Symbols with NULL values are not accounted for.	74	* @note Symbols with NULL values are not accounted for.
70	*/	75	*/
71	void dlsym(void mod, const char *sym_name)	76	void dlsym(void mod, const char *sym_name)
72	{	77	{
73	elf_symbol_t *sd;	78	elf_symbol_t *sd;
74	module_t *sm;	79	module_t *sm;
75		80
76	printf("dlsym(0x%lx, \"%s\")\n", (long)mod, sym_name);	81	printf("dlsym(0x%lx, \"%s\")\n", (long)mod, sym_name);
77	sd = symbol_bfs_find(sym_name, (module_t *) mod, &sm);	82	sd = symbol_bfs_find(sym_name, (module_t *) mod, &sm);
78	if (sd != NULL) {	83	if (sd != NULL) {
79	return symbol_get_addr(sd, sm);	84	return symbol_get_addr(sd, sm);
80	}	85	}
81		86
82	return NULL;	87	return NULL;
83	}	88	}
84		89
85	/** @}	90	/** @}
86	*/	91	*/
87		92

Subversion Repositories HelenOS

(root)/branches/dynload/uspace/lib/libc/generic/dlfcn.c – Rev 3689 → 3869