xref: /illumos-gate/usr/src/lib/libc/port/gen/catgets.c (revision 1f5207b7604fb44407eb4342aff613f7c4508508)
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 (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright 2008 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 "lint.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