1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2000, 2001 Alexey Zelkin <phantom@FreeBSD.org> 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __FBSDID("$FreeBSD$"); 31 32 #include "namespace.h" 33 #include <sys/types.h> 34 #include <sys/stat.h> 35 36 #include <errno.h> 37 #include <fcntl.h> 38 #include <limits.h> 39 #include <stdlib.h> 40 #include <string.h> 41 #include <unistd.h> 42 #include "un-namespace.h" 43 44 #include "ldpart.h" 45 #include "setlocale.h" 46 47 static int split_lines(char *, const char *); 48 49 int 50 __part_load_locale(const char *name, 51 int *using_locale, 52 char **locale_buf, 53 const char *category_filename, 54 int locale_buf_size_max, 55 int locale_buf_size_min, 56 const char **dst_localebuf) 57 { 58 int saverr, fd, i, num_lines; 59 char *lbuf, *p; 60 const char *plim; 61 char filename[PATH_MAX]; 62 struct stat st; 63 size_t namesize, bufsize; 64 65 /* 'name' must be already checked. */ 66 if (strcmp(name, "C") == 0 || strcmp(name, "POSIX") == 0 || 67 strncmp(name, "C.", 2) == 0) { 68 *using_locale = 0; 69 return (_LDP_CACHE); 70 } 71 72 /* 73 * If the locale name is the same as our cache, use the cache. 74 */ 75 if (*locale_buf != NULL && strcmp(name, *locale_buf) == 0) { 76 *using_locale = 1; 77 return (_LDP_CACHE); 78 } 79 80 /* 81 * Slurp the locale file into the cache. 82 */ 83 namesize = strlen(name) + 1; 84 85 /* 'PathLocale' must be already set & checked. */ 86 87 /* Range checking not needed, 'name' size is limited */ 88 strcpy(filename, _PathLocale); 89 strcat(filename, "/"); 90 strcat(filename, name); 91 strcat(filename, "/"); 92 strcat(filename, category_filename); 93 if ((fd = _open(filename, O_RDONLY | O_CLOEXEC)) < 0) 94 return (_LDP_ERROR); 95 if (_fstat(fd, &st) != 0) 96 goto bad_locale; 97 if (st.st_size <= 0) { 98 errno = EFTYPE; 99 goto bad_locale; 100 } 101 bufsize = namesize + st.st_size; 102 if ((lbuf = malloc(bufsize)) == NULL) { 103 errno = ENOMEM; 104 goto bad_locale; 105 } 106 (void)strcpy(lbuf, name); 107 p = lbuf + namesize; 108 plim = p + st.st_size; 109 if (_read(fd, p, (size_t) st.st_size) != st.st_size) 110 goto bad_lbuf; 111 /* 112 * Parse the locale file into localebuf. 113 */ 114 if (plim[-1] != '\n') { 115 errno = EFTYPE; 116 goto bad_lbuf; 117 } 118 num_lines = split_lines(p, plim); 119 if (num_lines >= locale_buf_size_max) 120 num_lines = locale_buf_size_max; 121 else if (num_lines >= locale_buf_size_min) 122 num_lines = locale_buf_size_min; 123 else { 124 errno = EFTYPE; 125 goto bad_lbuf; 126 } 127 (void)_close(fd); 128 /* 129 * Record the successful parse in the cache. 130 */ 131 if (*locale_buf != NULL) 132 free(*locale_buf); 133 *locale_buf = lbuf; 134 for (p = *locale_buf, i = 0; i < num_lines; i++) 135 dst_localebuf[i] = (p += strlen(p) + 1); 136 for (i = num_lines; i < locale_buf_size_max; i++) 137 dst_localebuf[i] = NULL; 138 *using_locale = 1; 139 140 return (_LDP_LOADED); 141 142 bad_lbuf: 143 saverr = errno; 144 free(lbuf); 145 errno = saverr; 146 bad_locale: 147 saverr = errno; 148 (void)_close(fd); 149 errno = saverr; 150 151 return (_LDP_ERROR); 152 } 153 154 static int 155 split_lines(char *p, const char *plim) 156 { 157 int i; 158 159 i = 0; 160 while (p < plim) { 161 if (*p == '\n') { 162 *p = '\0'; 163 i++; 164 } 165 p++; 166 } 167 return (i); 168 } 169 170