/*
 * 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 (c) 2006, 2010, Oracle and/or its affiliates. All rights reserved.
 */
#include        <sgs.h>
#include        <stdio.h>
#include        <debug.h>
#include        <msg.h>

void
Elf_syminfo_title(Lm_list *lml)
{
        dbg_print(lml, MSG_INTL(MSG_SYMINFO_TITLE));
}

#define FLAGSZ  16
#define NDXSZ   10

void
Elf_syminfo_entry(Lm_list *lml, Word ndx, Syminfo *sip, const char *name,
    const char *needed)
{
        const char      *bndstr = NULL, *str;
        char            flagstr[FLAGSZ], sndxstr[NDXSZ], dndxstr[NDXSZ];
        int             flgndx = 0;
        Half            flags = sip->si_flags;

        if (flags & SYMINFO_FLG_CAP) {
                bndstr = MSG_INTL(MSG_SYMINFO_CAP);
                flagstr[flgndx++] = 'S';
                flags &= ~SYMINFO_FLG_CAP;
        }

        if (flags & SYMINFO_FLG_DIRECT) {
                if (bndstr == NULL) {
                        if (sip->si_boundto == SYMINFO_BT_SELF)
                                bndstr = MSG_INTL(MSG_SYMINFO_SELF);
                        else if (sip->si_boundto == SYMINFO_BT_PARENT)
                                bndstr = MSG_INTL(MSG_SYMINFO_PARENT);
                        else
                                bndstr = needed;
                }
                flagstr[flgndx++] = 'D';
                flags &= ~SYMINFO_FLG_DIRECT;

        } else if (flags & SYMINFO_FLG_FILTER) {
                bndstr = needed;
                flagstr[flgndx++] = 'F';
                flags &= ~SYMINFO_FLG_FILTER;

        } else if (flags & SYMINFO_FLG_AUXILIARY) {
                bndstr = needed;
                flagstr[flgndx++] = 'A';
                flags &= ~SYMINFO_FLG_AUXILIARY;

        } else if (sip->si_boundto == SYMINFO_BT_EXTERN)
                bndstr = MSG_INTL(MSG_SYMINFO_EXTERN);
        else if (bndstr == NULL)
                bndstr = MSG_ORIG(MSG_STR_EMPTY);

        if (flags & SYMINFO_FLG_DIRECTBIND) {
                flagstr[flgndx++] = 'B';
                flags &= ~SYMINFO_FLG_DIRECTBIND;
        }
        if (flags & SYMINFO_FLG_COPY) {
                flagstr[flgndx++] = 'C';
                flags &= ~SYMINFO_FLG_COPY;
        }
        if (flags & SYMINFO_FLG_LAZYLOAD) {
                flagstr[flgndx++] = 'L';
                flags &= ~SYMINFO_FLG_LAZYLOAD;
        }
        if (flags & SYMINFO_FLG_NOEXTDIRECT) {
                flagstr[flgndx++] = 'N';
                flags &= ~SYMINFO_FLG_NOEXTDIRECT;
        }
        if (flags & SYMINFO_FLG_INTERPOSE) {
                flagstr[flgndx++] = 'I';
                flags &= ~SYMINFO_FLG_INTERPOSE;
        }
        if (flags & SYMINFO_FLG_DEFERRED) {
                flagstr[flgndx++] = 'P';
                flags &= ~SYMINFO_FLG_DEFERRED;
        }

        /*
         * Did we account for all of the flags?
         */
        if (flags)
                (void) snprintf(&flagstr[flgndx], FLAGSZ - flgndx,
                    MSG_ORIG(MSG_SYMINFO_UNKFLAG), flags);
        else
                flagstr[flgndx] = '\0';

        /*
         * If we've bound to a dependency, determine the dynamic entry index.
         */
        if (bndstr == needed) {
                (void) snprintf(dndxstr, NDXSZ, MSG_ORIG(MSG_FMT_INDEX),
                    sip->si_boundto);
                str = dndxstr;
        } else
                str = MSG_ORIG(MSG_STR_EMPTY);

        (void) snprintf(sndxstr, NDXSZ, MSG_ORIG(MSG_FMT_INDEX), ndx);

        dbg_print(lml, MSG_INTL(MSG_SYMINFO_ENTRY), sndxstr, flagstr, str,
            bndstr, Elf_demangle_name(name));
}