liblddbg/common/got.c

	got.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 *  Copyright 2003 Sun Microsystems, Inc.  All rights reserved.
 *  Use is subject to license terms.
 */
#pragma ident   "%Z%%M% %I% %E% SMI"

#include    <stdlib.h>
#include    "_debug.h"
#include    "msg.h"
#include    "libld.h"


static int
comparegotsym(Gottable * gtp1, Gottable * gtp2)
{
    Gotndx *    gnp1 = &gtp1->gt_gndx;
    Gotndx *    gnp2 = &gtp2->gt_gndx;

    if (gnp1->gn_gotndx > gnp2->gn_gotndx)
        return (1);
    if (gnp1->gn_gotndx < gnp2->gn_gotndx)
        return (-1);

    return (0);
}

void
Dbg_got_display(Gottable * gtp, Ofl_desc *ofl)
{
    Word    gotndx;

    if (DBG_NOTCLASS(DBG_GOT))
        return;

    if (ofl->ofl_gotcnt == M_GOT_XNumber)
        return;

    dbg_print(MSG_ORIG(MSG_STR_EMPTY));
    dbg_print(MSG_INTL(MSG_GOT_TITLE), EC_WORD(ofl->ofl_gotcnt));

    if (DBG_NOTDETAIL())
        return;

    qsort((char *)gtp, ofl->ofl_gotcnt, sizeof (Gottable),
        (int(*)(const void *, const void *))comparegotsym);

    dbg_print(MSG_ORIG(MSG_GOT_COLUMNS));

    for (gotndx = 0; gotndx < ofl->ofl_gotcnt; gotndx++, gtp++) {
        Sym_desc    *sdp;
        const char  *refstr, *name;
        Gotndx      *gnp = &gtp->gt_gndx;

        if ((sdp = gtp->gt_sym) == 0)
            continue;

        if (sdp->sd_flags & FLG_SY_SMGOT)
            refstr = MSG_ORIG(MSG_GOT_SMALL_PIC);
        else
            refstr = MSG_ORIG(MSG_GOT_PIC);

        if (sdp->sd_name)
            name = _Dbg_sym_dem(sdp->sd_name);
        else
            name = MSG_INTL(MSG_STR_UNKNOWN);

        if ((sdp->sd_sym->st_shndx == SHN_UNDEF) ||
            (sdp->sd_file == 0)) {
            dbg_print(MSG_ORIG(MSG_GOT_FORMAT1),
                EC_SWORD(gnp->gn_gotndx), refstr,
                EC_LWORD(gnp->gn_addend), name);
        } else {
            dbg_print(MSG_ORIG(MSG_GOT_FORMAT2),
                EC_SWORD(gnp->gn_gotndx), refstr,
                EC_LWORD(gnp->gn_addend),
                sdp->sd_file->ifl_name, name);
        }
    }
}


#if !defined(_ELF64)
void
Gelf_got_title(uchar_t class)
{
    if (class == ELFCLASS64)
        dbg_print(MSG_ORIG(MSG_GOT_ECOLUMNS_64));
    else
        dbg_print(MSG_ORIG(MSG_GOT_ECOLUMNS));
}

void
Gelf_got_entry(GElf_Ehdr *ehdr, Sword gotndx, GElf_Addr addr, GElf_Xword value,
    GElf_Word rshtype, void *rel, const char *sname)
{
    GElf_Word   rtype;
    GElf_Sxword addend;
    const char  *rstring, * fmt;

    if (rel) {
        if (rshtype == SHT_RELA) {
            /* LINTED */
            rtype = (GElf_Word)GELF_R_TYPE(
                ((GElf_Rela *)rel)->r_info);
            addend = ((GElf_Rela *)rel)->r_addend;
        } else {
            /* LINTED */
            rtype = (GElf_Word)GELF_R_TYPE(
                ((GElf_Rel *)rel)->r_info);
            addend = 0;
        }
        rstring = conv_reloc_type_str(ehdr->e_machine, rtype);
    } else {
        addend = 0;
        rstring = MSG_ORIG(MSG_STR_EMPTY);
    }

    if (sname)
        sname = _Dbg_sym_dem(sname);
    else
        sname = MSG_ORIG(MSG_STR_EMPTY);

    if ((int)ehdr->e_ident[EI_CLASS] == ELFCLASS64)
        fmt = MSG_ORIG(MSG_GOT_EFORMAT_64);
    else
        fmt = MSG_ORIG(MSG_GOT_EFORMAT);

    dbg_print(fmt, EC_SWORD(gotndx), EC_ADDR(addr), EC_XWORD(value),
        rstring, EC_SXWORD(addend), sname);
}
#endif  /* !defined(_ELF64) */