libexec/ld.so/dlfcn.c

59 	elf_object_t *object;
91 	object = _dl_load_shlib(libname, _dl_objects, OBJTYPE_DLO, obj_flags, 0);
92 	if (object == 0) {
99 		object->obj_flags |= DF_1_NODELETE;
100 		object->nodelete = 1;
103 	_dl_link_dlopen(object);
105 	if (OBJECT_REF_CNT(object) > 1) {
106 		_dl_handle_nodelete(object);
109 		if (object->grpsym_vec.len == 0)
110 			_dl_cache_grpsym_list_setup(object);
112 			_dl_show_objects(object);
113 			_dl_unload_shlib(object);
120 	_dl_add_object(object);
122 	DL_DEB(("head [%s]\n", object->load_name));
124 	if ((failed = _dl_load_dep_libs(object, obj_flags, 0)) == 1) {
125 		_dl_real_close(object);
126 		object = NULL;
130 		DL_DEB(("tail %s\n", object->load_name));
132 			_dl_show_objects(object);
133 			_dl_unload_shlib(object);
136 		err = _dl_rtld(object);
138 			_dl_real_close(object);
140 			object = NULL;
143 			_dl_call_init(object);
160 	return((void *)object);
166 	elf_object_t	*object;
178 		if ((object = obj_from_addr(retaddr)) == NULL) {
193 		object = (elf_object_t *)handle;
197 		while (dynobj && dynobj != object)
200 		if (!dynobj || object != dynobj) {
206 	sr = _dl_find_symbol(name, flags|SYM_NOWARNNOTFOUND, NULL, object);
219 	    name, object->load_name, (void *)addr));
322 	elf_object_t	*object;
325 	object = (elf_object_t *)handle;
328 	while (dynobj && dynobj != object)
331 	if (!dynobj || object != dynobj) {
336 	if (object->opencount == 0) {
341 	object->opencount--;
342 	_dl_notify_unload_shlib(object);
344 	_dl_unload_shlib(object);
369 		errmsg = "File not an ELF object";
372 		errmsg = "Can't open referenced object";
375 		errmsg = "Can't map ELF object";
387 		errmsg = "No shared object contains address";
390 		errmsg = "Cannot determine caller's shared object";
393 		errmsg = "Cannot load specified object";
407 _dl_tracefmt(int fd, elf_object_t *object, const char *fmt1, const char *fmt2,
413 	fmt = object->sod.sod_library ? fmt1 : fmt2;
437 				    (void *)(object->load_base +
438 				    object->load_size));
441 				_dl_dprintf(fd, "%d", object->grprefcount);
444 				_dl_dprintf(fd, "%d", object->sod.sod_major);
447 				_dl_dprintf(fd, "%d", object->sod.sod_minor);
450 				_dl_dprintf(fd, "%d", object->opencount);
453 				_dl_dprintf(fd, "%s", object->sod.sod_name);
456 				_dl_dprintf(fd, "%s", object->load_name);
459 				_dl_dprintf(fd, "%d", object->refcount);
465 				_dl_dprintf(fd, "%lX", object->load_base);
494 	elf_object_t *object;
500 	object = _dl_objects;
521 		for (; object != NULL; object = object->next) {
522 			if (object == trace)
524 			if (object->obj_type == OBJTYPE_LDR) {
525 				object = object->next;
531 	for (; object != NULL; object = object->next) {
532 		switch (object->obj_type) {
549 		_dl_tracefmt(outputfd, object, fmt1, fmt2, objtypename);
574 	elf_object_t *object;
578 	for (object = _dl_objects; object != NULL; object = object->next) {
579 		if (object->phdrp == NULL)
582 		info.dlpi_addr = object->obj_base;
583 		info.dlpi_name = object->load_name;
584 		info.dlpi_phdr = object->phdrp;
585 		info.dlpi_phnum = object->phdrc;
626 	const elf_object_t *object;
631 	object = obj_from_addr(addr);
633 	if (object == NULL) {
638 	info->dli_fname = (char *)object->load_name;
639 	info->dli_fbase = (void *)object->load_base;
647 	for (symoffset = 0; symoffset < object->nchains; symoffset++) {
648 		sym = object->dyn.symtab + symoffset;
662 		symbol_addr = (void *)(object->obj_base + sym->st_value);
667 		info->dli_sname = object->dyn.strtab + sym->st_name;