1 /* Load needed message catalogs.
2 Copyright (C) 1995, 1996, 1997, 1998 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software Foundation,
16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
23 #include <sys/types.h>
26 #if defined STDC_HEADERS || defined _LIBC
30 #if defined HAVE_UNISTD_H || defined _LIBC
34 #if (defined HAVE_MMAP && defined HAVE_MUNMAP) || defined _LIBC
35 # include <sys/mman.h>
41 /* @@ end of prolog @@ */
44 /* Rename the non ISO C functions. This is required by the standard
45 because some ISO C functions will require linking with this object
46 file and the name space must not be polluted. */
48 # define close __close
51 # define munmap __munmap
54 /* We need a sign, whether a new catalog was loaded, which can be associated
55 with all translations. This is important if the translations are
56 cached by one of GCC's features. */
57 int _nl_msg_cat_cntr = 0;
60 /* Load the message catalogs specified by FILENAME. If it is no valid
61 message catalog do nothing. */
64 _nl_load_domain (domain_file)
65 struct loaded_l10nfile *domain_file;
70 struct mo_file_header *data = (struct mo_file_header *) -1;
71 #if (defined HAVE_MMAP && defined HAVE_MUNMAP && !defined DISALLOW_MMAP) \
75 struct loaded_domain *domain;
77 domain_file->decided = 1;
78 domain_file->data = NULL;
80 /* If the record does not represent a valid locale the FILENAME
81 might be NULL. This can happen when according to the given
82 specification the locale file name is different for XPG and CEN
84 if (domain_file->filename == NULL)
87 /* Try to open the addressed file. */
89 fd = open (domain_file->filename, O_RDONLY | O_BINARY);
91 fd = open (domain_file->filename, O_RDONLY);
96 /* We must know about the size of the file. */
97 if (fstat (fd, &st) != 0
98 || (size = (size_t) st.st_size) != st.st_size
99 || size < sizeof (struct mo_file_header))
101 /* Something went wrong. */
106 #if (defined HAVE_MMAP && defined HAVE_MUNMAP && !defined DISALLOW_MMAP) \
108 /* Now we are ready to load the file. If mmap() is available we try
109 this first. If not available or it failed we try to load it. */
110 data = (struct mo_file_header *) mmap (NULL, size, PROT_READ,
113 if (data != (struct mo_file_header *) -1)
115 /* mmap() call was successful. */
121 /* If the data is not yet available (i.e. mmap'ed) we try to load
123 if (data == (struct mo_file_header *) -1)
128 data = (struct mo_file_header *) malloc (size);
133 read_ptr = (char *) data;
136 long int nb = (long int) read (fd, read_ptr, to_read);
151 /* Using the magic number we can test whether it really is a message
153 if (data->magic != _MAGIC && data->magic != _MAGIC_SWAPPED)
155 /* The magic number is wrong: not a message catalog file. */
156 #if (defined HAVE_MMAP && defined HAVE_MUNMAP && !defined DISALLOW_MMAP) \
159 munmap ((caddr_t) data, size);
167 = (struct loaded_domain *) malloc (sizeof (struct loaded_domain));
168 if (domain_file->data == NULL)
171 domain = (struct loaded_domain *) domain_file->data;
172 domain->data = (char *) data;
173 #if (defined HAVE_MMAP && defined HAVE_MUNMAP && !defined DISALLOW_MMAP) \
175 domain->use_mmap = use_mmap;
177 domain->mmap_size = size;
178 domain->must_swap = data->magic != _MAGIC;
180 /* Fill in the information about the available tables. */
181 switch (W (domain->must_swap, data->revision))
184 domain->nstrings = W (domain->must_swap, data->nstrings);
185 domain->orig_tab = (struct string_desc *)
186 ((char *) data + W (domain->must_swap, data->orig_tab_offset));
187 domain->trans_tab = (struct string_desc *)
188 ((char *) data + W (domain->must_swap, data->trans_tab_offset));
189 domain->hash_size = W (domain->must_swap, data->hash_tab_size);
190 domain->hash_tab = (nls_uint32 *)
191 ((char *) data + W (domain->must_swap, data->hash_tab_offset));
194 /* This is an illegal revision. */
195 #if (defined HAVE_MMAP && defined HAVE_MUNMAP && !defined DISALLOW_MMAP) \
198 munmap ((caddr_t) data, size);
203 domain_file->data = NULL;
207 /* Show that one domain is changed. This might make some cached
208 translations invalid. */
216 _nl_unload_domain (domain)
217 struct loaded_domain *domain;
219 if (domain->use_mmap)
220 munmap ((caddr_t) domain->data, domain->mmap_size);
222 free ((void *) domain->data);