diff options
Diffstat (limited to 'lib/libc/nls/catopen.c')
| -rw-r--r-- | lib/libc/nls/catopen.c | 154 |
1 files changed, 139 insertions, 15 deletions
diff --git a/lib/libc/nls/catopen.c b/lib/libc/nls/catopen.c index 0e2f9716fbb..225f35515b6 100644 --- a/lib/libc/nls/catopen.c +++ b/lib/libc/nls/catopen.c @@ -1,26 +1,150 @@ -/* $NetBSD: catopen.c,v 1.5 1995/03/23 19:59:06 jtc Exp $ */ +/* $NetBSD: catopen.c,v 1.6 1996/05/13 23:29:39 jtc Exp $ */ -/* - * Written by J.T. Conklin, 10/05/94 - * Public domain. +/*- + * Copyright (c) 1996 The NetBSD Foundation, Inc. + * All rights reserved. + * + * This code is derived from software contributed to The NetBSD Foundation + * by J.T. Conklin. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the NetBSD + * Foundation, Inc. and its contributors. + * 4. Neither the name of The NetBSD Foundation nor the names of its + * contributors may be used to endorse or promote products derived + * from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS + * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED + * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR + * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. */ -#include <sys/cdefs.h> - -#ifdef __indr_reference -__indr_reference(_catopen,catopen); -#else +#define _NLS_PRIVATE +#include <limits.h> +#include <stdlib.h> +#include <string.h> +#include <sys/types.h> +#include <sys/param.h> +#include <sys/stat.h> +#include <sys/mman.h> +#include <unistd.h> +#include <fcntl.h> #include <nl_types.h> -extern nl_catd _catopen __P((__const char *, int)); +#define NLS_DEFAULT_PATH "/usr/share/nls/%L/%N.cat:/usr/share/nls/%N/%L" +#define NLS_DEFAULT_LANG "C" nl_catd -catopen(name, oflag) - __const char *name; +_catopen(name, oflag) + const char *name; int oflag; { - return _catopen(name, oflag); -} + const char *path; + struct stat st; + nl_catd catd; + int fd; + + struct _nls_cat_hdr *cat_hdr; + + if (name == NULL || *name == '\0') + return (nl_catd) -1; + + /* absolute or relative path? */ + if (strchr (name, '/')) { + if (stat (name, &st)) { + return (nl_catd) 0; + } + path = name; + } else { + char tmppath[PATH_MAX]; + char *nlspath; + char *lang; + char *s, *t; + + if ((nlspath = getenv ("NLSPATH")) == NULL) { + nlspath = NLS_DEFAULT_PATH; + } + if ((lang = getenv ("LANG")) == NULL) { + lang = NLS_DEFAULT_LANG; + } + + for (s = nlspath, t = tmppath; *s; ) { + if (*s == '%') { + if (*(s + 1) == 'L') { + strcpy(t, lang); + t += strlen(lang); + s += 2; + } else if (*(s + 1) == 'N') { + strcpy(t, name); + t += strlen(name); + s += 2; + } else { + *t++ = *s++; + } + } else if (*s == ':') { + *t = '\0'; + + if (stat (tmppath, &st) == 0) { + path = tmppath; + goto load_msgcat; + } + + t = tmppath; + } else { + *t++ = *s++; + } + } -#endif + return (nl_catd) 0; + } + +load_msgcat: + if ((fd = open (path, O_RDONLY)) == -1) + return (nl_catd) 0; + + if (fstat(fd, &st) != 0) { + close (fd); + return (nl_catd) 0; + } + + if ((catd = malloc (sizeof (*catd))) == 0) { + close (fd); + return (nl_catd) 0; + } + + catd->__data = mmap(0, (size_t) st.st_size, PROT_READ, MAP_SHARED, fd, 0); + close (fd); + + if (catd->__data == (void *) -1) { + free (catd); + return (nl_catd) 0; + } + catd->__size = st.st_size; + + cat_hdr = (struct _nls_cat_hdr *) catd->__data; + if (ntohl(cat_hdr->__magic) != _NLS_MAGIC) { + free (catd); + close (fd); + return (nl_catd) 0; + } + + return catd; +} |