/*
 * 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));
}