1 /* Copyright (C) 1996-2013 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper, <drepper@gnu.org>.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
28 #include "catgetsinfo.h"
31 /* Open the catalog and return a descriptor for the catalog. */
33 catopen (const char *cat_name
, int flag
)
36 const char *env_var
= NULL
;
37 const char *nlspath
= NULL
;
39 if (strchr (cat_name
, '/') == NULL
)
41 if (flag
== NL_CAT_LOCALE
)
42 /* Use the current locale setting for LC_MESSAGES. */
43 env_var
= setlocale (LC_MESSAGES
, NULL
);
45 /* Use the LANG environment variable. */
46 env_var
= getenv ("LANG");
48 if (env_var
== NULL
|| *env_var
== '\0'
49 || (__libc_enable_secure
&& strchr (env_var
, '/') != NULL
))
52 nlspath
= getenv ("NLSPATH");
53 if (nlspath
!= NULL
&& *nlspath
!= '\0')
55 /* Append the system dependent directory. */
56 size_t len
= strlen (nlspath
) + 1 + sizeof NLSPATH
;
57 char *tmp
= alloca (len
);
59 __stpcpy (__stpcpy (__stpcpy (tmp
, nlspath
), ":"), NLSPATH
);
66 result
= (__nl_catd
) malloc (sizeof (*result
));
68 /* We cannot get enough memory. */
71 if (__open_catalog (cat_name
, nlspath
, env_var
, result
) != 0)
73 /* Couldn't open the file. */
74 free ((void *) result
);
78 return (nl_catd
) result
;
82 /* Return message from message catalog. */
84 catgets (nl_catd catalog_desc
, int set
, int message
, const char *string
)
90 /* Be generous if catalog which failed to be open is used. */
91 if (catalog_desc
== (nl_catd
) -1 || ++set
<= 0 || message
< 0)
92 return (char *) string
;
94 catalog
= (__nl_catd
) catalog_desc
;
96 idx
= ((set
* message
) % catalog
->plane_size
) * 3;
100 if (catalog
->name_ptr
[idx
+ 0] == (u_int32_t
) set
101 && catalog
->name_ptr
[idx
+ 1] == (u_int32_t
) message
)
102 return (char *) &catalog
->strings
[catalog
->name_ptr
[idx
+ 2]];
104 idx
+= catalog
->plane_size
* 3;
106 while (++cnt
< catalog
->plane_depth
);
108 __set_errno (ENOMSG
);
109 return (char *) string
;
113 /* Return resources used for loaded message catalog. */
115 catclose (nl_catd catalog_desc
)
119 /* Be generous if catalog which failed to be open is used. */
120 if (catalog_desc
== (nl_catd
) -1)
126 catalog
= (__nl_catd
) catalog_desc
;
128 #ifdef _POSIX_MAPPED_FILES
129 if (catalog
->status
== mmapped
)
130 __munmap ((void *) catalog
->file_ptr
, catalog
->file_size
);
132 #endif /* _POSIX_MAPPED_FILES */
133 if (catalog
->status
== malloced
)
134 free ((void *) catalog
->file_ptr
);
141 free ((void *) catalog
);