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 84210678Srpaulord_event_addr(rd_agent_t *rdap, rd_event_e event __unused, rd_notify_t *notify) 85210678Srpaulo{ 86210678Srpaulo DPRINTF("%s rdap %p notify %p\n", __func__, rdap, notify); 87210678Srpaulo 88210678Srpaulo notify->type = RD_NOTIFY_BPT; 89210678Srpaulo notify->u.bptaddr = rdap->rda_addr; 90210678Srpaulo 91210678Srpaulo return (RD_OK); 92210678Srpaulo} 93210678Srpaulo 94210678Srpaulord_err_e 95210678Srpaulord_event_enable(rd_agent_t *rdap __unused, int onoff) 96210678Srpaulo{ 97210678Srpaulo DPRINTF("%s onoff %d\n", __func__, onoff); 98210678Srpaulo 99210678Srpaulo return (RD_OK); 100210678Srpaulo} 101210678Srpaulo 102210678Srpaulord_err_e 103210678Srpaulord_event_getmsg(rd_agent_t *rdap __unused, rd_event_msg_t *msg) 104210678Srpaulo{ 105210678Srpaulo DPRINTF("%s\n", __func__); 106210678Srpaulo 107210678Srpaulo msg->type = RD_POSTINIT; 108210678Srpaulo msg->u.state = RD_CONSISTENT; 109210678Srpaulo 110210678Srpaulo return (RD_OK); 111210678Srpaulo} 112210678Srpaulo 113210678Srpaulord_err_e 114210678Srpaulord_init(int version) 115210678Srpaulo{ 116210678Srpaulo char *debug = NULL; 117210678Srpaulo 118210678Srpaulo if (version == RD_VERSION) { 119210678Srpaulo debug = getenv("LIBRTLD_DB_DEBUG"); 120210678Srpaulo _librtld_db_debug = debug ? atoi(debug) : 0; 121210678Srpaulo return (RD_OK); 122210678Srpaulo } else 123210678Srpaulo return (RD_NOCAPAB); 124210678Srpaulo} 125210678Srpaulo 126210678Srpaulord_err_e 127210678Srpaulord_loadobj_iter(rd_agent_t *rdap, rl_iter_f *cb, void *clnt_data) 128210678Srpaulo{ 129210678Srpaulo int cnt, i, lastvn = 0; 130210678Srpaulo rd_loadobj_t rdl; 131210678Srpaulo struct kinfo_vmentry *kves, *kve; 132210678Srpaulo 133210678Srpaulo DPRINTF("%s\n", __func__); 134210678Srpaulo 135210678Srpaulo if ((kves = kinfo_getvmmap(proc_getpid(rdap->rda_php), &cnt)) == NULL) { 136210678Srpaulo warn("ERROR: kinfo_getvmmap() failed"); 137210678Srpaulo return (RD_ERR); 138210678Srpaulo } 139210678Srpaulo for (i = 0; i < cnt; i++) { 140210678Srpaulo kve = kves + i; 141210678Srpaulo if (kve->kve_type == KVME_TYPE_VNODE) 142210678Srpaulo lastvn = i; 143210678Srpaulo memset(&rdl, 0, sizeof(rdl)); 144210678Srpaulo /* 145210678Srpaulo * Map the kinfo_vmentry struct to the rd_loadobj structure. 146210678Srpaulo */ 147210678Srpaulo rdl.rdl_saddr = kve->kve_start; 148210678Srpaulo rdl.rdl_eaddr = kve->kve_end; 149210678Srpaulo rdl.rdl_offset = kve->kve_offset; 150210678Srpaulo if (kve->kve_protection & KVME_PROT_READ) 151210678Srpaulo rdl.rdl_prot |= RD_RDL_R; 152210678Srpaulo if (kve->kve_protection & KVME_PROT_WRITE) 153210678Srpaulo rdl.rdl_prot |= RD_RDL_W; 154210678Srpaulo if (kve->kve_protection & KVME_PROT_EXEC) 155210678Srpaulo rdl.rdl_prot |= RD_RDL_X; 156210678Srpaulo strlcpy(rdl.rdl_path, kves[lastvn].kve_path, 157210678Srpaulo sizeof(rdl.rdl_path)); 158210678Srpaulo (*cb)(&rdl, clnt_data); 159210678Srpaulo } 160210678Srpaulo free(kves); 161210678Srpaulo 162210678Srpaulo return (RD_OK); 163210678Srpaulo} 164210678Srpaulo 165210678Srpaulovoid 166210678Srpaulord_log(const int onoff) 167210678Srpaulo{ 168210678Srpaulo DPRINTF("%s\n", __func__); 169210678Srpaulo 170210678Srpaulo (void)onoff; 171210678Srpaulo} 172210678Srpaulo 173210678Srpaulord_agent_t * 174210678Srpaulord_new(struct proc_handle *php) 175210678Srpaulo{ 176210678Srpaulo rd_agent_t *rdap; 177210678Srpaulo 178210678Srpaulo rdap = malloc(sizeof(rd_agent_t)); 179210678Srpaulo if (rdap) { 180210678Srpaulo memset(rdap, 0, sizeof(rd_agent_t)); 181210678Srpaulo rdap->rda_php = php; 182210678Srpaulo rd_reset(rdap); 183210678Srpaulo } 184210678Srpaulo 185210678Srpaulo return (rdap); 186210678Srpaulo} 187210678Srpaulo 188210678Srpaulord_err_e 189210678Srpaulord_objpad_enable(rd_agent_t *rdap, size_t padsize) 190210678Srpaulo{ 191210678Srpaulo DPRINTF("%s\n", __func__); 192210678Srpaulo 193210678Srpaulo (void)rdap; 194210678Srpaulo (void)padsize; 195210678Srpaulo 196210678Srpaulo return (RD_ERR); 197210678Srpaulo} 198210678Srpaulo 199210678Srpaulord_err_e 200210678Srpaulord_plt_resolution(rd_agent_t *rdap, uintptr_t pc, struct proc *proc, 201210678Srpaulo uintptr_t plt_base, rd_plt_info_t *rpi) 202210678Srpaulo{ 203210678Srpaulo DPRINTF("%s\n", __func__); 204210678Srpaulo 205210678Srpaulo (void)rdap; 206210678Srpaulo (void)pc; 207210678Srpaulo (void)proc; 208210678Srpaulo (void)plt_base; 209210678Srpaulo (void)rpi; 210210678Srpaulo 211210678Srpaulo return (RD_ERR); 212210678Srpaulo} 213210678Srpaulo 214210678Srpaulord_err_e 215210678Srpaulord_reset(rd_agent_t *rdap) 216210678Srpaulo{ 217210678Srpaulo GElf_Sym sym; 218210678Srpaulo 219210678Srpaulo if (proc_name2sym(rdap->rda_php, "ld-elf.so.1", "r_debug_state", 220210678Srpaulo &sym) < 0) 221210678Srpaulo return (RD_ERR); 222210678Srpaulo DPRINTF("found r_debug_state at 0x%lx\n", (unsigned long)sym.st_value); 223210678Srpaulo rdap->rda_addr = sym.st_value; 224210678Srpaulo 225210678Srpaulo return (RD_OK); 226210678Srpaulo} 227