xref: /titanic_41/usr/src/lib/libc/port/gen/catgets.c (revision 70025d765b044c6d8594bb965a2247a61e991a99)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #pragma ident	"%Z%%M%	%I%	%E% SMI"
28 
29 /*
30  * catgets.c
31  */
32 
33 #pragma weak catgets = _catgets
34 
35 #include "synonyms.h"
36 #include <sys/types.h>
37 #include <nl_types.h>
38 #include <errno.h>
39 #include "nlspath_checks.h"
40 
41 char *
42 _catgets(nl_catd catd_st, int set_id, int msg_id, const char *def_str)
43 {
44 	int			hi, lo, mid;
45 	struct	_cat_hdr 	*p;
46 	struct	_cat_set_hdr	*q;
47 	struct	_cat_msg_hdr	*r;
48 	void			*catd;
49 
50 	if ((catd_st == NULL) || (catd_st == (nl_catd)-1)) {
51 		/* invalid message catalog descriptor */
52 		errno = EBADF;
53 		return ((char *)def_str);
54 	}
55 
56 	if ((catd_st->__content == NULL) &&
57 		(catd_st->__size == 0) && (catd_st->__trust == 1)) {
58 		/* special message catalog descriptor for C locale */
59 		return ((char *)def_str);
60 	} else if ((catd_st->__content == NULL) || (catd_st->__size == 0)) {
61 		/* invalid message catalog descriptor */
62 		errno = EBADF;
63 		return ((char *)def_str);
64 	}
65 
66 	catd = catd_st->__content;
67 	p = (struct _cat_hdr *)catd_st->__content;
68 	hi = p->__nsets - 1;
69 	lo = 0;
70 	/*
71 	 * Two while loops will perform binary search.
72 	 * Outer loop searches the set and inner loop searches
73 	 * message id
74 	 */
75 	while (hi >= lo) {
76 		mid = (hi + lo) / 2;
77 		q = (struct _cat_set_hdr *)
78 			((uintptr_t)catd
79 			+ _CAT_HDR_SIZE
80 			+ _CAT_SET_HDR_SIZE * mid);
81 		if (q->__set_no == set_id) {
82 			lo = q->__first_msg_hdr;
83 			hi = lo + q->__nmsgs - 1;
84 			while (hi >= lo) {
85 				mid = (hi + lo) / 2;
86 				r = (struct _cat_msg_hdr *)
87 					((uintptr_t)catd
88 					+ _CAT_HDR_SIZE
89 					+ p->__msg_hdr_offset
90 					+ _CAT_MSG_HDR_SIZE * mid);
91 				if (r->__msg_no == msg_id) {
92 					char *msg = (char *)catd
93 						+ _CAT_HDR_SIZE
94 						+ p->__msg_text_offset
95 						+ r->__msg_offset;
96 
97 					if (!catd_st->__trust) {
98 						int	errno_save = errno;
99 						char	*cmsg = check_format(
100 							def_str, msg, 0);
101 						if (cmsg == def_str) {
102 							/* security */
103 							return ((char *)
104 								def_str);
105 						} else {
106 							errno = errno_save;
107 							return (msg);
108 						}
109 					} else {
110 						return (msg);
111 					}
112 				} else if (r->__msg_no < msg_id)
113 					lo = mid + 1;
114 				else
115 					hi = mid - 1;
116 			} /* while */
117 
118 			/* In case set number not found */
119 			errno = ENOMSG;
120 			return ((char *)def_str);
121 		} else if (q->__set_no < set_id)
122 			lo = mid + 1;
123 		else
124 			hi = mid - 1;
125 	} /* while */
126 
127 	/* In case msg_id not found. */
128 	errno = ENOMSG;
129 	return ((char *)def_str);
130 }
131