/*

 * 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 2008 Sun Microsystems, Inc.  All rights reserved.

 * Use is subject to license terms.

 */

#pragma ident	"%Z%%M%	%I%	%E% SMI"

/*

 * catgets.c

 */

#pragma weak _catgets = catgets

#include "lint.h"

#include <sys/types.h>

#include <nl_types.h>

#include <errno.h>

#include "nlspath_checks.h"

char *

catgets(nl_catd catd_st, int set_id, int msg_id, const char *def_str)

{

	int			hi, lo, mid;

	struct	_cat_hdr 	*p;

	struct	_cat_set_hdr	*q;

	struct	_cat_msg_hdr	*r;

	void			*catd;

	if ((catd_st == NULL) || (catd_st == (nl_catd)-1)) {

		/* invalid message catalog descriptor */

		errno = EBADF;

		return ((char *)def_str);

	}

	if ((catd_st->__content == NULL) &&

	    (catd_st->__size == 0) && (catd_st->__trust == 1)) {

		/* special message catalog descriptor for C locale */

		return ((char *)def_str);

	} else if ((catd_st->__content == NULL) || (catd_st->__size == 0)) {

		/* invalid message catalog descriptor */

		errno = EBADF;

		return ((char *)def_str);

	}

	catd = catd_st->__content;

	p = (struct _cat_hdr *)catd_st->__content;

	hi = p->__nsets - 1;

	lo = 0;

	/*

	 * Two while loops will perform binary search.

	 * Outer loop searches the set and inner loop searches

	 * message id

	 */

	while (hi >= lo) {

		mid = (hi + lo) / 2;

		q = (struct _cat_set_hdr *)

		    ((uintptr_t)catd

		    + _CAT_HDR_SIZE

		    + _CAT_SET_HDR_SIZE * mid);

		if (q->__set_no == set_id) {

			lo = q->__first_msg_hdr;

			hi = lo + q->__nmsgs - 1;

			while (hi >= lo) {

				mid = (hi + lo) / 2;

				r = (struct _cat_msg_hdr *)

				    ((uintptr_t)catd

				    + _CAT_HDR_SIZE

				    + p->__msg_hdr_offset

				    + _CAT_MSG_HDR_SIZE * mid);

				if (r->__msg_no == msg_id) {

					char *msg = (char *)catd

					    + _CAT_HDR_SIZE

					    + p->__msg_text_offset

					    + r->__msg_offset;

					if (!catd_st->__trust) {

						int errno_save = errno;

						char *cmsg = check_format(

						    def_str, msg, 0);

						if (cmsg == def_str) {

							/* security */

							return ((char *)

							    def_str);

						} else {

							errno = errno_save;

							return (msg);

						}

					} else {

						return (msg);

					}

				} else if (r->__msg_no < msg_id)

					lo = mid + 1;

				else

					hi = mid - 1;

			} /* while */

			/* In case set number not found */

			errno = ENOMSG;

			return ((char *)def_str);

		} else if (q->__set_no < set_id)

			lo = mid + 1;

		else

			hi = mid - 1;

	} /* while */

	/* In case msg_id not found. */

	errno = ENOMSG;

	return ((char *)def_str);

}