liblddbg/common/elf.c

	elf.c revision 5aefb6555731130ca4fd295960123d71f2d21fe8
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */
#pragma ident   "%Z%%M% %I% %E% SMI"

#include    <sgs.h>
#include    <_debug.h>
#include    <conv.h>
#include    <msg.h>

void
Elf_ehdr(Lm_list *lml, Ehdr *ehdr, Shdr *shdr0)
{
    Byte        *byte = &(ehdr->e_ident[0]);
    const char  *flgs;

    dbg_print(lml, MSG_ORIG(MSG_STR_EMPTY));
    dbg_print(lml, MSG_INTL(MSG_ELF_HEADER));

    dbg_print(lml, MSG_ORIG(MSG_ELF_MAGIC), byte[EI_MAG0],
        (byte[EI_MAG1] ? byte[EI_MAG1] : '0'),
        (byte[EI_MAG2] ? byte[EI_MAG2] : '0'),
        (byte[EI_MAG3] ? byte[EI_MAG3] : '0'));
    dbg_print(lml, MSG_ORIG(MSG_ELF_CLASS),
        conv_ehdr_class(ehdr->e_ident[EI_CLASS]),
        conv_ehdr_data(ehdr->e_ident[EI_DATA]));
    dbg_print(lml, MSG_ORIG(MSG_ELF_MACHINE),
        conv_ehdr_mach(ehdr->e_machine), conv_ehdr_vers(ehdr->e_version));
    dbg_print(lml, MSG_ORIG(MSG_ELF_TYPE), conv_ehdr_type(ehdr->e_type));

    /*
     * Line up the flags differently depending on wether we received a
     * numeric (e.g. "0x200") or text representation (e.g.
     * "[ EF_SPARC_SUN_US1 ]").
     */
    flgs = conv_ehdr_flags(ehdr->e_machine, ehdr->e_flags);
    if (flgs[0] == '[')
        dbg_print(lml, MSG_ORIG(MSG_ELF_FLAGS_FMT), flgs);
    else
        dbg_print(lml, MSG_ORIG(MSG_ELF_FLAGS), flgs);

    if ((ehdr->e_shnum == 0) && (ehdr->e_shstrndx == SHN_XINDEX))
        dbg_print(lml, MSG_ORIG(MSG_ELFX_ESIZE),
            EC_ADDR(ehdr->e_entry), ehdr->e_ehsize);
    else
        dbg_print(lml, MSG_ORIG(MSG_ELF_ESIZE), EC_ADDR(ehdr->e_entry),
            ehdr->e_ehsize, ehdr->e_shstrndx);

    if ((ehdr->e_shnum == 0) && shdr0 && (shdr0->sh_size != 0))
        dbg_print(lml, MSG_ORIG(MSG_ELFX_SHOFF), EC_OFF(ehdr->e_shoff),
            ehdr->e_shentsize);
    else
        dbg_print(lml, MSG_ORIG(MSG_ELF_SHOFF), EC_OFF(ehdr->e_shoff),
            ehdr->e_shentsize, ehdr->e_shnum);

    dbg_print(lml, MSG_ORIG(MSG_ELF_PHOFF), EC_OFF(ehdr->e_phoff),
        ehdr->e_phentsize, ehdr->e_phnum);

    if ((ehdr->e_shnum != 0) || (shdr0 == NULL) ||
        (shdr0->sh_size == 0))
        return;

    /*
     * If we have Extended ELF headers - print shdr0
     */
    dbg_print(lml, MSG_ORIG(MSG_SHD0_TITLE));
    dbg_print(lml, MSG_ORIG(MSG_SHD_ADDR), EC_ADDR(shdr0->sh_addr),
        conv_sec_flags(shdr0->sh_flags));
    dbg_print(lml, MSG_ORIG(MSG_SHD0_SIZE), EC_XWORD(shdr0->sh_size),
        conv_sec_type(ehdr->e_machine, shdr0->sh_type));
    dbg_print(lml, MSG_ORIG(MSG_SHD_OFFSET), EC_OFF(shdr0->sh_offset),
        EC_XWORD(shdr0->sh_entsize));

    if (ehdr->e_shstrndx == SHN_XINDEX)
        dbg_print(lml, MSG_ORIG(MSG_SHD0_LINK),
            EC_WORD(shdr0->sh_link), conv_sec_info(shdr0->sh_info,
            shdr0->sh_flags));
    else
        dbg_print(lml, MSG_ORIG(MSG_SHD_LINK), EC_WORD(shdr0->sh_link),
            conv_sec_info(shdr0->sh_info, shdr0->sh_flags));

    dbg_print(lml, MSG_ORIG(MSG_SHD_ALIGN), EC_XWORD(shdr0->sh_addralign));
}