1210678Srpaulo/* 2210678Srpaulo * Copyright (c) 2010 The FreeBSD Foundation 3210678Srpaulo * All rights reserved. 4210678Srpaulo * 5210678Srpaulo * This software was developed by Rui Paulo under sponsorship from the 6210678Srpaulo * FreeBSD Foundation. 7210678Srpaulo * 8210678Srpaulo * Redistribution and use in source and binary forms, with or without 9210678Srpaulo * modification, are permitted provided that the following conditions 10210678Srpaulo * are met: 11210678Srpaulo * 1. Redistributions of source code must retain the above copyright 12210678Srpaulo * notice, this list of conditions and the following disclaimer. 13210678Srpaulo * 2. Redistributions in binary form must reproduce the above copyright 14210678Srpaulo * notice, this list of conditions and the following disclaimer in the 15210678Srpaulo * documentation and/or other materials provided with the distribution. 16210678Srpaulo * 17210678Srpaulo * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 18210678Srpaulo * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19210678Srpaulo * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20210678Srpaulo * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 21210678Srpaulo * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22210678Srpaulo * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23210678Srpaulo * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24210678Srpaulo * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25210678Srpaulo * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26210678Srpaulo * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27210678Srpaulo * SUCH DAMAGE. 28210678Srpaulo */ 29210678Srpaulo#include <sys/cdefs.h> 30210678Srpaulo__FBSDID("$FreeBSD$"); 31210678Srpaulo 32210678Srpaulo#include <machine/_inttypes.h> 33210678Srpaulo#include <sys/types.h> 34210678Srpaulo#include <sys/user.h> 35210678Srpaulo 36210678Srpaulo#include <err.h> 37210678Srpaulo#include <stdio.h> 38210678Srpaulo#include <stdlib.h> 39210678Srpaulo#include <string.h> 40210678Srpaulo#include <limits.h> 41210678Srpaulo#include <libproc.h> 42210678Srpaulo#include <libutil.h> 43210678Srpaulo 44210678Srpaulo#include "rtld_db.h" 45210678Srpaulo 46210678Srpaulostatic int _librtld_db_debug = 0; 47210678Srpaulo#define DPRINTF(...) do { \ 48210678Srpaulo if (_librtld_db_debug) { \ 49210678Srpaulo fprintf(stderr, "librtld_db: DEBUG: "); \ 50210678Srpaulo fprintf(stderr, __VA_ARGS__); \ 51210678Srpaulo } \ 52210678Srpaulo} while (0) 53210678Srpaulo 54210678Srpaulovoid 55210678Srpaulord_delete(rd_agent_t *rdap) 56210678Srpaulo{ 57210678Srpaulo 58210678Srpaulo free(rdap); 59210678Srpaulo} 60210678Srpaulo 61210678Srpauloconst char * 62210678Srpaulord_errstr(rd_err_e rderr) 63210678Srpaulo{ 64210678Srpaulo 65210678Srpaulo switch (rderr) { 66210678Srpaulo case RD_ERR: 67210678Srpaulo return "generic error"; 68210678Srpaulo case RD_OK: 69210678Srpaulo return "no error"; 70210678Srpaulo case RD_NOCAPAB: 71210678Srpaulo return "capability not supported"; 72210678Srpaulo case RD_DBERR: 73210678Srpaulo return "database error"; 74210678Srpaulo case RD_NOBASE: 75210678Srpaulo return "NOBASE"; 76210678Srpaulo case RD_NOMAPS: 77210678Srpaulo return "NOMAPS"; 78210678Srpaulo default: 79210678Srpaulo return "unknown error"; 80210678Srpaulo } 81210678Srpaulo} 82210678Srpaulo 83210678Srpaulord_err_e 84269720Smarkjrd_event_addr(rd_agent_t *rdap, rd_event_e event, rd_notify_t *notify) 85210678Srpaulo{ 86269720Smarkj rd_err_e ret; 87210678Srpaulo 88269720Smarkj DPRINTF("%s rdap %p event %d notify %p\n", __func__, rdap, event, 89269720Smarkj notify); 90210678Srpaulo 91269720Smarkj ret = RD_OK; 92269720Smarkj switch (event) { 93269720Smarkj case RD_NONE: 94269720Smarkj break; 95269720Smarkj case RD_PREINIT: 96269720Smarkj notify->type = RD_NOTIFY_BPT; 97269720Smarkj notify->u.bptaddr = rdap->rda_preinit_addr; 98269720Smarkj break; 99269720Smarkj case RD_POSTINIT: 100269720Smarkj notify->type = RD_NOTIFY_BPT; 101269720Smarkj notify->u.bptaddr = rdap->rda_postinit_addr; 102269720Smarkj break; 103269720Smarkj case RD_DLACTIVITY: 104269720Smarkj notify->type = RD_NOTIFY_BPT; 105269720Smarkj notify->u.bptaddr = rdap->rda_dlactivity_addr; 106269720Smarkj break; 107269720Smarkj default: 108269720Smarkj ret = RD_ERR; 109269720Smarkj break; 110269720Smarkj } 111269720Smarkj return (ret); 112210678Srpaulo} 113210678Srpaulo 114210678Srpaulord_err_e 115210678Srpaulord_event_enable(rd_agent_t *rdap __unused, int onoff) 116210678Srpaulo{ 117269720Smarkj DPRINTF("%s onoff %d\n", __func__, onoff); 118210678Srpaulo 119210678Srpaulo return (RD_OK); 120210678Srpaulo} 121210678Srpaulo 122210678Srpaulord_err_e 123210678Srpaulord_event_getmsg(rd_agent_t *rdap __unused, rd_event_msg_t *msg) 124210678Srpaulo{ 125210678Srpaulo DPRINTF("%s\n", __func__); 126210678Srpaulo 127210678Srpaulo msg->type = RD_POSTINIT; 128210678Srpaulo msg->u.state = RD_CONSISTENT; 129210678Srpaulo 130210678Srpaulo return (RD_OK); 131210678Srpaulo} 132210678Srpaulo 133210678Srpaulord_err_e 134210678Srpaulord_init(int version) 135210678Srpaulo{ 136210678Srpaulo char *debug = NULL; 137210678Srpaulo 138210678Srpaulo if (version == RD_VERSION) { 139210678Srpaulo debug = getenv("LIBRTLD_DB_DEBUG"); 140210678Srpaulo _librtld_db_debug = debug ? atoi(debug) : 0; 141210678Srpaulo return (RD_OK); 142210678Srpaulo } else 143210678Srpaulo return (RD_NOCAPAB); 144210678Srpaulo} 145210678Srpaulo 146210678Srpaulord_err_e 147210678Srpaulord_loadobj_iter(rd_agent_t *rdap, rl_iter_f *cb, void *clnt_data) 148210678Srpaulo{ 149210678Srpaulo int cnt, i, lastvn = 0; 150210678Srpaulo rd_loadobj_t rdl; 151210678Srpaulo struct kinfo_vmentry *kves, *kve; 152210678Srpaulo 153210678Srpaulo DPRINTF("%s\n", __func__); 154210678Srpaulo 155210678Srpaulo if ((kves = kinfo_getvmmap(proc_getpid(rdap->rda_php), &cnt)) == NULL) { 156210678Srpaulo warn("ERROR: kinfo_getvmmap() failed"); 157210678Srpaulo return (RD_ERR); 158210678Srpaulo } 159210678Srpaulo for (i = 0; i < cnt; i++) { 160210678Srpaulo kve = kves + i; 161210678Srpaulo if (kve->kve_type == KVME_TYPE_VNODE) 162210678Srpaulo lastvn = i; 163210678Srpaulo memset(&rdl, 0, sizeof(rdl)); 164210678Srpaulo /* 165210678Srpaulo * Map the kinfo_vmentry struct to the rd_loadobj structure. 166210678Srpaulo */ 167210678Srpaulo rdl.rdl_saddr = kve->kve_start; 168210678Srpaulo rdl.rdl_eaddr = kve->kve_end; 169210678Srpaulo rdl.rdl_offset = kve->kve_offset; 170210678Srpaulo if (kve->kve_protection & KVME_PROT_READ) 171210678Srpaulo rdl.rdl_prot |= RD_RDL_R; 172210678Srpaulo if (kve->kve_protection & KVME_PROT_WRITE) 173210678Srpaulo rdl.rdl_prot |= RD_RDL_W; 174210678Srpaulo if (kve->kve_protection & KVME_PROT_EXEC) 175210678Srpaulo rdl.rdl_prot |= RD_RDL_X; 176210678Srpaulo strlcpy(rdl.rdl_path, kves[lastvn].kve_path, 177210678Srpaulo sizeof(rdl.rdl_path)); 178210678Srpaulo (*cb)(&rdl, clnt_data); 179210678Srpaulo } 180210678Srpaulo free(kves); 181210678Srpaulo 182210678Srpaulo return (RD_OK); 183210678Srpaulo} 184210678Srpaulo 185210678Srpaulovoid 186210678Srpaulord_log(const int onoff) 187210678Srpaulo{ 188210678Srpaulo DPRINTF("%s\n", __func__); 189210678Srpaulo 190210678Srpaulo (void)onoff; 191210678Srpaulo} 192210678Srpaulo 193210678Srpaulord_agent_t * 194210678Srpaulord_new(struct proc_handle *php) 195210678Srpaulo{ 196210678Srpaulo rd_agent_t *rdap; 197210678Srpaulo 198210678Srpaulo rdap = malloc(sizeof(rd_agent_t)); 199210678Srpaulo if (rdap) { 200210678Srpaulo memset(rdap, 0, sizeof(rd_agent_t)); 201210678Srpaulo rdap->rda_php = php; 202210678Srpaulo rd_reset(rdap); 203210678Srpaulo } 204210678Srpaulo 205210678Srpaulo return (rdap); 206210678Srpaulo} 207210678Srpaulo 208210678Srpaulord_err_e 209210678Srpaulord_objpad_enable(rd_agent_t *rdap, size_t padsize) 210210678Srpaulo{ 211210678Srpaulo DPRINTF("%s\n", __func__); 212210678Srpaulo 213210678Srpaulo (void)rdap; 214210678Srpaulo (void)padsize; 215210678Srpaulo 216210678Srpaulo return (RD_ERR); 217210678Srpaulo} 218210678Srpaulo 219210678Srpaulord_err_e 220210678Srpaulord_plt_resolution(rd_agent_t *rdap, uintptr_t pc, struct proc *proc, 221210678Srpaulo uintptr_t plt_base, rd_plt_info_t *rpi) 222210678Srpaulo{ 223210678Srpaulo DPRINTF("%s\n", __func__); 224210678Srpaulo 225210678Srpaulo (void)rdap; 226210678Srpaulo (void)pc; 227210678Srpaulo (void)proc; 228210678Srpaulo (void)plt_base; 229210678Srpaulo (void)rpi; 230210678Srpaulo 231210678Srpaulo return (RD_ERR); 232210678Srpaulo} 233210678Srpaulo 234210678Srpaulord_err_e 235210678Srpaulord_reset(rd_agent_t *rdap) 236210678Srpaulo{ 237210678Srpaulo GElf_Sym sym; 238210678Srpaulo 239210678Srpaulo if (proc_name2sym(rdap->rda_php, "ld-elf.so.1", "r_debug_state", 240210678Srpaulo &sym) < 0) 241210678Srpaulo return (RD_ERR); 242210678Srpaulo DPRINTF("found r_debug_state at 0x%lx\n", (unsigned long)sym.st_value); 243269720Smarkj rdap->rda_preinit_addr = sym.st_value; 244269720Smarkj rdap->rda_dlactivity_addr = sym.st_value; 245210678Srpaulo 246269720Smarkj if (proc_name2sym(rdap->rda_php, "ld-elf.so.1", "_r_debug_postinit", 247269720Smarkj &sym) < 0) 248269720Smarkj return (RD_ERR); 249269720Smarkj DPRINTF("found _r_debug_postinit at 0x%lx\n", 250269720Smarkj (unsigned long)sym.st_value); 251269720Smarkj rdap->rda_postinit_addr = sym.st_value; 252269720Smarkj 253210678Srpaulo return (RD_OK); 254210678Srpaulo} 255