[1] | 1 | /* Copyright (C) 2003 Manuel Novoa III
|
---|
| 2 | *
|
---|
| 3 | * This library is free software; you can redistribute it and/or
|
---|
| 4 | * modify it under the terms of the GNU Library General Public
|
---|
| 5 | * License as published by the Free Software Foundation; either
|
---|
| 6 | * version 2 of the License, or (at your option) any later version.
|
---|
| 7 | *
|
---|
| 8 | * This library is distributed in the hope that it will be useful,
|
---|
| 9 | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
| 10 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
---|
| 11 | * Library General Public License for more details.
|
---|
| 12 | *
|
---|
| 13 | * You should have received a copy of the GNU Library General Public
|
---|
| 14 | * License along with this library; if not, write to the Free
|
---|
| 15 | * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
---|
| 16 | */
|
---|
| 17 |
|
---|
| 18 | /* Nov 6, 2003 Initial version.
|
---|
| 19 | *
|
---|
| 20 | * NOTE: This implementation is quite strict about requiring all
|
---|
| 21 | * field seperators. It also does not allow leading whitespace
|
---|
| 22 | * except when processing the numeric fields. glibc is more
|
---|
| 23 | * lenient. See the various glibc difference comments below.
|
---|
| 24 | *
|
---|
| 25 | * TODO:
|
---|
| 26 | * Move to dynamic allocation of (currently staticly allocated)
|
---|
| 27 | * buffers; especially for the group-related functions since
|
---|
| 28 | * large group member lists will cause error returns.
|
---|
| 29 | *
|
---|
| 30 | */
|
---|
| 31 |
|
---|
| 32 | /* Jul 20, 2004 Adapted for samhain. Rainer Wichmann.
|
---|
| 33 | *
|
---|
| 34 | * Stripped all unneeded code.
|
---|
| 35 | */
|
---|
| 36 |
|
---|
| 37 | #include "config_xor.h"
|
---|
| 38 |
|
---|
| 39 | #if defined(SH_COMPILE_STATIC) && defined(__linux__)
|
---|
| 40 |
|
---|
| 41 | #define _GNU_SOURCE
|
---|
| 42 | #include <features.h>
|
---|
| 43 | #include <stdio.h>
|
---|
| 44 | #include <stdlib.h>
|
---|
| 45 | #include <stdint.h>
|
---|
| 46 | #include <string.h>
|
---|
| 47 | #include <stddef.h>
|
---|
| 48 | #include <errno.h>
|
---|
| 49 | #include <assert.h>
|
---|
| 50 | #include <ctype.h>
|
---|
| 51 | #include <pwd.h>
|
---|
| 52 | #include <grp.h>
|
---|
| 53 |
|
---|
[134] | 54 | #include "sh_pthread.h"
|
---|
| 55 |
|
---|
[252] | 56 | extern int sl_close_fd (const char * file, int line, int fd);
|
---|
| 57 | extern int sl_fclose (const char * file, int line, FILE * fp);
|
---|
| 58 |
|
---|
| 59 |
|
---|
[1] | 60 | #ifndef _PATH_PASSWD
|
---|
| 61 | #define _PATH_PASSWD "/etc/passwd"
|
---|
| 62 | #endif
|
---|
| 63 | #ifndef _PATH_GROUP
|
---|
| 64 | #define _PATH_GROUP "/etc/group"
|
---|
| 65 | #endif
|
---|
| 66 |
|
---|
[252] | 67 | #undef FIL__
|
---|
| 68 | #define FIL__ _("sh_static.c")
|
---|
| 69 |
|
---|
[22] | 70 | extern int sl_strlcpy(char * dst, /*@null@*/const char * src, size_t siz);
|
---|
| 71 | extern int sl_strlcat(char * dst, /*@null@*/const char * src, size_t siz);
|
---|
[1] | 72 |
|
---|
| 73 |
|
---|
| 74 | /**********************************************************************/
|
---|
| 75 | /* Sizes for staticly allocated buffers. */
|
---|
| 76 |
|
---|
| 77 | #define PWD_BUFFER_SIZE 256
|
---|
[428] | 78 | #define GRP_BUFFER_SIZE 3584
|
---|
| 79 | #define GRP_BUFFER_SIZE_MALLOC 32768
|
---|
[1] | 80 |
|
---|
| 81 | /**********************************************************************/
|
---|
| 82 | /* Prototypes for internal functions. */
|
---|
| 83 |
|
---|
| 84 | static int __parsepwent(void *pw, char *line);
|
---|
| 85 | static int __parsegrent(void *gr, char *line);
|
---|
| 86 |
|
---|
| 87 | static int __pgsreader(int (*__parserfunc)(void *d, char *line), void *data,
|
---|
| 88 | char *__restrict line_buff,
|
---|
| 89 | size_t buflen, FILE *f);
|
---|
| 90 |
|
---|
| 91 | #undef GETXXKEY_R_FUNC
|
---|
| 92 | #undef GETXXKEY_R_PARSER
|
---|
| 93 | #undef GETXXKEY_R_ENTTYPE
|
---|
| 94 | #undef GETXXKEY_R_TEST
|
---|
| 95 | #undef DO_GETXXKEY_R_KEYTYPE
|
---|
| 96 | #undef DO_GETXXKEY_R_PATHNAME
|
---|
| 97 | #define GETXXKEY_R_FUNC sh_getpwnam_r
|
---|
| 98 | #define GETXXKEY_R_PARSER __parsepwent
|
---|
| 99 | #define GETXXKEY_R_ENTTYPE struct passwd
|
---|
| 100 | #define GETXXKEY_R_TEST(ENT) (!strcmp((ENT)->pw_name, key))
|
---|
| 101 | #define DO_GETXXKEY_R_KEYTYPE const char *__restrict
|
---|
| 102 | #define DO_GETXXKEY_R_PATHNAME _PATH_PASSWD
|
---|
| 103 |
|
---|
[145] | 104 | int GETXXKEY_R_FUNC(DO_GETXXKEY_R_KEYTYPE key,
|
---|
| 105 | GETXXKEY_R_ENTTYPE *__restrict resultbuf,
|
---|
| 106 | char *__restrict buffer, size_t buflen,
|
---|
| 107 | GETXXKEY_R_ENTTYPE **__restrict result)
|
---|
[1] | 108 | {
|
---|
| 109 | FILE *stream;
|
---|
| 110 | int rv;
|
---|
| 111 |
|
---|
| 112 | *result = NULL;
|
---|
| 113 |
|
---|
| 114 | if (!(stream = fopen(DO_GETXXKEY_R_PATHNAME, "r"))) {
|
---|
| 115 | rv = errno;
|
---|
| 116 | } else {
|
---|
| 117 | /* __STDIO_SET_USER_LOCKING(stream); */
|
---|
| 118 | do {
|
---|
| 119 | if (!(rv = __pgsreader(GETXXKEY_R_PARSER, resultbuf,
|
---|
| 120 | buffer, buflen, stream))
|
---|
| 121 | ) {
|
---|
| 122 | if (GETXXKEY_R_TEST(resultbuf)) { /* Found key? */
|
---|
| 123 | *result = resultbuf;
|
---|
| 124 | break;
|
---|
| 125 | }
|
---|
| 126 | } else {
|
---|
| 127 | if (rv == ENOENT) { /* end-of-file encountered. */
|
---|
| 128 | rv = 0;
|
---|
| 129 | }
|
---|
| 130 | break;
|
---|
| 131 | }
|
---|
| 132 | } while (1);
|
---|
[252] | 133 | sl_fclose(FIL__, __LINE__, stream);
|
---|
[1] | 134 | }
|
---|
| 135 |
|
---|
| 136 | return rv;
|
---|
| 137 | }
|
---|
| 138 |
|
---|
| 139 | #undef GETXXKEY_R_FUNC
|
---|
| 140 | #undef GETXXKEY_R_PARSER
|
---|
| 141 | #undef GETXXKEY_R_ENTTYPE
|
---|
| 142 | #undef GETXXKEY_R_TEST
|
---|
| 143 | #undef DO_GETXXKEY_R_KEYTYPE
|
---|
| 144 | #undef DO_GETXXKEY_R_PATHNAME
|
---|
| 145 | #define GETXXKEY_R_FUNC sh_getgrnam_r
|
---|
| 146 | #define GETXXKEY_R_PARSER __parsegrent
|
---|
| 147 | #define GETXXKEY_R_ENTTYPE struct group
|
---|
| 148 | #define GETXXKEY_R_TEST(ENT) (!strcmp((ENT)->gr_name, key))
|
---|
| 149 | #define DO_GETXXKEY_R_KEYTYPE const char *__restrict
|
---|
| 150 | #define DO_GETXXKEY_R_PATHNAME _PATH_GROUP
|
---|
| 151 |
|
---|
[145] | 152 | int GETXXKEY_R_FUNC(DO_GETXXKEY_R_KEYTYPE key,
|
---|
| 153 | GETXXKEY_R_ENTTYPE *__restrict resultbuf,
|
---|
| 154 | char *__restrict buffer, size_t buflen,
|
---|
| 155 | GETXXKEY_R_ENTTYPE **__restrict result)
|
---|
[1] | 156 | {
|
---|
| 157 | FILE *stream;
|
---|
| 158 | int rv;
|
---|
| 159 |
|
---|
| 160 | *result = NULL;
|
---|
| 161 |
|
---|
| 162 | if (!(stream = fopen(DO_GETXXKEY_R_PATHNAME, "r"))) {
|
---|
| 163 | rv = errno;
|
---|
| 164 | } else {
|
---|
| 165 | /* __STDIO_SET_USER_LOCKING(stream); */
|
---|
| 166 | do {
|
---|
| 167 | if (!(rv = __pgsreader(GETXXKEY_R_PARSER, resultbuf,
|
---|
| 168 | buffer, buflen, stream))
|
---|
| 169 | ) {
|
---|
| 170 | if (GETXXKEY_R_TEST(resultbuf)) { /* Found key? */
|
---|
| 171 | *result = resultbuf;
|
---|
| 172 | break;
|
---|
| 173 | }
|
---|
| 174 | } else {
|
---|
| 175 | if (rv == ENOENT) { /* end-of-file encountered. */
|
---|
| 176 | rv = 0;
|
---|
| 177 | }
|
---|
| 178 | break;
|
---|
| 179 | }
|
---|
| 180 | } while (1);
|
---|
[252] | 181 | sl_fclose(FIL__, __LINE__, stream);
|
---|
[1] | 182 | }
|
---|
| 183 |
|
---|
| 184 | return rv;
|
---|
| 185 | }
|
---|
| 186 |
|
---|
| 187 | #undef GETXXKEY_R_FUNC
|
---|
| 188 | #undef GETXXKEY_R_PARSER
|
---|
| 189 | #undef GETXXKEY_R_ENTTYPE
|
---|
| 190 | #undef GETXXKEY_R_TEST
|
---|
| 191 | #undef DO_GETXXKEY_R_KEYTYPE
|
---|
| 192 | #undef DO_GETXXKEY_R_PATHNAME
|
---|
| 193 | #define GETXXKEY_R_FUNC sh_getpwuid_r
|
---|
| 194 | #define GETXXKEY_R_PARSER __parsepwent
|
---|
| 195 | #define GETXXKEY_R_ENTTYPE struct passwd
|
---|
| 196 | #define GETXXKEY_R_TEST(ENT) ((ENT)->pw_uid == key)
|
---|
| 197 | #define DO_GETXXKEY_R_KEYTYPE uid_t
|
---|
| 198 | #define DO_GETXXKEY_R_PATHNAME _PATH_PASSWD
|
---|
| 199 |
|
---|
[145] | 200 | int GETXXKEY_R_FUNC(DO_GETXXKEY_R_KEYTYPE key,
|
---|
| 201 | GETXXKEY_R_ENTTYPE *__restrict resultbuf,
|
---|
| 202 | char *__restrict buffer, size_t buflen,
|
---|
| 203 | GETXXKEY_R_ENTTYPE **__restrict result)
|
---|
[1] | 204 | {
|
---|
| 205 | FILE *stream;
|
---|
| 206 | int rv;
|
---|
| 207 |
|
---|
| 208 | *result = NULL;
|
---|
| 209 |
|
---|
| 210 | if (!(stream = fopen(DO_GETXXKEY_R_PATHNAME, "r"))) {
|
---|
| 211 | rv = errno;
|
---|
| 212 | } else {
|
---|
| 213 | /* __STDIO_SET_USER_LOCKING(stream); */
|
---|
| 214 | do {
|
---|
| 215 | if (!(rv = __pgsreader(GETXXKEY_R_PARSER, resultbuf,
|
---|
| 216 | buffer, buflen, stream))
|
---|
| 217 | ) {
|
---|
| 218 | if (GETXXKEY_R_TEST(resultbuf)) { /* Found key? */
|
---|
| 219 | *result = resultbuf;
|
---|
| 220 | break;
|
---|
| 221 | }
|
---|
| 222 | } else {
|
---|
| 223 | if (rv == ENOENT) { /* end-of-file encountered. */
|
---|
| 224 | rv = 0;
|
---|
| 225 | }
|
---|
| 226 | break;
|
---|
| 227 | }
|
---|
| 228 | } while (1);
|
---|
[252] | 229 | sl_fclose(FIL__, __LINE__, stream);
|
---|
[1] | 230 | }
|
---|
| 231 |
|
---|
| 232 | return rv;
|
---|
| 233 | }
|
---|
| 234 |
|
---|
| 235 | #undef GETXXKEY_R_FUNC
|
---|
| 236 | #undef GETXXKEY_R_PARSER
|
---|
| 237 | #undef GETXXKEY_R_ENTTYPE
|
---|
| 238 | #undef GETXXKEY_R_TEST
|
---|
| 239 | #undef DO_GETXXKEY_R_KEYTYPE
|
---|
| 240 | #undef DO_GETXXKEY_R_PATHNAME
|
---|
| 241 | #define GETXXKEY_R_FUNC sh_getgrgid_r
|
---|
| 242 | #define GETXXKEY_R_PARSER __parsegrent
|
---|
| 243 | #define GETXXKEY_R_ENTTYPE struct group
|
---|
| 244 | #define GETXXKEY_R_TEST(ENT) ((ENT)->gr_gid == key)
|
---|
| 245 | #define DO_GETXXKEY_R_KEYTYPE gid_t
|
---|
| 246 | #define DO_GETXXKEY_R_PATHNAME _PATH_GROUP
|
---|
| 247 |
|
---|
[145] | 248 | int GETXXKEY_R_FUNC(DO_GETXXKEY_R_KEYTYPE key,
|
---|
| 249 | GETXXKEY_R_ENTTYPE *__restrict resultbuf,
|
---|
| 250 | char *__restrict buffer, size_t buflen,
|
---|
| 251 | GETXXKEY_R_ENTTYPE **__restrict result)
|
---|
[1] | 252 | {
|
---|
| 253 | FILE *stream;
|
---|
| 254 | int rv;
|
---|
| 255 |
|
---|
| 256 | *result = NULL;
|
---|
| 257 |
|
---|
| 258 | if (!(stream = fopen(DO_GETXXKEY_R_PATHNAME, "r"))) {
|
---|
| 259 | rv = errno;
|
---|
| 260 | } else {
|
---|
| 261 | /* __STDIO_SET_USER_LOCKING(stream); */
|
---|
| 262 | do {
|
---|
| 263 | if (!(rv = __pgsreader(GETXXKEY_R_PARSER, resultbuf,
|
---|
| 264 | buffer, buflen, stream))
|
---|
| 265 | ) {
|
---|
| 266 | if (GETXXKEY_R_TEST(resultbuf)) { /* Found key? */
|
---|
| 267 | *result = resultbuf;
|
---|
| 268 | break;
|
---|
| 269 | }
|
---|
| 270 | } else {
|
---|
| 271 | if (rv == ENOENT) { /* end-of-file encountered. */
|
---|
| 272 | rv = 0;
|
---|
| 273 | }
|
---|
| 274 | break;
|
---|
| 275 | }
|
---|
| 276 | } while (1);
|
---|
[252] | 277 | sl_fclose(FIL__, __LINE__, stream);
|
---|
[1] | 278 | }
|
---|
| 279 |
|
---|
| 280 | return rv;
|
---|
| 281 | }
|
---|
| 282 |
|
---|
| 283 | struct passwd * sh_getpwuid(uid_t uid)
|
---|
| 284 | {
|
---|
| 285 | static char buffer[PWD_BUFFER_SIZE];
|
---|
| 286 | static struct passwd resultbuf;
|
---|
| 287 | struct passwd *result;
|
---|
| 288 |
|
---|
| 289 | sh_getpwuid_r(uid, &resultbuf, buffer, sizeof(buffer), &result);
|
---|
| 290 | return result;
|
---|
| 291 | }
|
---|
| 292 |
|
---|
[170] | 293 | struct passwd * getpwuid(uid_t uid)
|
---|
| 294 | {
|
---|
| 295 | return sh_getpwuid(uid);
|
---|
| 296 | }
|
---|
| 297 |
|
---|
[1] | 298 | struct group * sh_getgrgid(gid_t gid)
|
---|
| 299 | {
|
---|
| 300 | static char buffer[GRP_BUFFER_SIZE];
|
---|
| 301 | static struct group resultbuf;
|
---|
| 302 | struct group *result;
|
---|
| 303 |
|
---|
| 304 | sh_getgrgid_r(gid, &resultbuf, buffer, sizeof(buffer), &result);
|
---|
| 305 | return result;
|
---|
| 306 | }
|
---|
| 307 |
|
---|
[170] | 308 | struct group * getgrgid(gid_t gid)
|
---|
| 309 | {
|
---|
| 310 | return sh_getgrgid(gid);
|
---|
| 311 | }
|
---|
[1] | 312 |
|
---|
| 313 | struct passwd * sh_getpwnam(const char *name)
|
---|
| 314 | {
|
---|
| 315 | static char buffer[PWD_BUFFER_SIZE];
|
---|
| 316 | static struct passwd resultbuf;
|
---|
| 317 | struct passwd *result;
|
---|
| 318 |
|
---|
| 319 | sh_getpwnam_r(name, &resultbuf, buffer, sizeof(buffer), &result);
|
---|
| 320 | return result;
|
---|
| 321 | }
|
---|
| 322 |
|
---|
| 323 | struct group * sh_getgrnam(const char *name)
|
---|
| 324 | {
|
---|
| 325 | static char buffer[GRP_BUFFER_SIZE];
|
---|
| 326 | static struct group resultbuf;
|
---|
| 327 | struct group *result;
|
---|
| 328 |
|
---|
| 329 | sh_getgrnam_r(name, &resultbuf, buffer, sizeof(buffer), &result);
|
---|
| 330 | return result;
|
---|
| 331 | }
|
---|
| 332 |
|
---|
[134] | 333 | SH_MUTEX_STATIC(pwf_lock, PTHREAD_MUTEX_INITIALIZER);
|
---|
[1] | 334 |
|
---|
[134] | 335 |
|
---|
[1] | 336 | static FILE *pwf = NULL;
|
---|
| 337 |
|
---|
| 338 | void sh_setpwent(void)
|
---|
| 339 | {
|
---|
[134] | 340 | SH_MUTEX_LOCK(pwf_lock);
|
---|
[1] | 341 | if (pwf) {
|
---|
| 342 | rewind(pwf);
|
---|
| 343 | }
|
---|
[134] | 344 | SH_MUTEX_UNLOCK(pwf_lock);
|
---|
[1] | 345 | }
|
---|
| 346 |
|
---|
| 347 | void sh_endpwent(void)
|
---|
| 348 | {
|
---|
[134] | 349 | SH_MUTEX_LOCK(pwf_lock);
|
---|
[1] | 350 | if (pwf) {
|
---|
[252] | 351 | sl_fclose(FIL__, __LINE__, pwf);
|
---|
[1] | 352 | pwf = NULL;
|
---|
| 353 | }
|
---|
[134] | 354 | SH_MUTEX_UNLOCK(pwf_lock);
|
---|
[1] | 355 | }
|
---|
| 356 |
|
---|
| 357 |
|
---|
| 358 | static int sh_getpwent_r(struct passwd *__restrict resultbuf,
|
---|
| 359 | char *__restrict buffer, size_t buflen,
|
---|
| 360 | struct passwd **__restrict result)
|
---|
| 361 | {
|
---|
| 362 | int rv;
|
---|
| 363 |
|
---|
[134] | 364 | SH_MUTEX_LOCK(pwf_lock);
|
---|
[1] | 365 |
|
---|
| 366 | *result = NULL; /* In case of error... */
|
---|
| 367 |
|
---|
| 368 | if (!pwf) {
|
---|
| 369 | if (!(pwf = fopen(_PATH_PASSWD, "r"))) {
|
---|
| 370 | rv = errno;
|
---|
| 371 | goto ERR;
|
---|
| 372 | }
|
---|
| 373 | /* __STDIO_SET_USER_LOCKING(pwf); */
|
---|
| 374 | }
|
---|
| 375 |
|
---|
| 376 | if (!(rv = __pgsreader(__parsepwent, resultbuf,
|
---|
| 377 | buffer, buflen, pwf))) {
|
---|
| 378 | *result = resultbuf;
|
---|
| 379 | }
|
---|
| 380 |
|
---|
| 381 | ERR:
|
---|
[150] | 382 | ; /* 'label at end of compound statement' */
|
---|
[134] | 383 | SH_MUTEX_UNLOCK(pwf_lock);
|
---|
[1] | 384 |
|
---|
| 385 | return rv;
|
---|
| 386 | }
|
---|
| 387 |
|
---|
[134] | 388 | SH_MUTEX_STATIC(grf_lock, PTHREAD_MUTEX_INITIALIZER);
|
---|
[1] | 389 |
|
---|
| 390 | static FILE *grf = NULL;
|
---|
| 391 |
|
---|
| 392 | void sh_setgrent(void)
|
---|
| 393 | {
|
---|
[134] | 394 | SH_MUTEX_LOCK(grf_lock);
|
---|
[1] | 395 | if (grf) {
|
---|
| 396 | rewind(grf);
|
---|
| 397 | }
|
---|
[134] | 398 | SH_MUTEX_UNLOCK(grf_lock);
|
---|
[1] | 399 | }
|
---|
| 400 |
|
---|
| 401 | void sh_endgrent(void)
|
---|
| 402 | {
|
---|
[134] | 403 | SH_MUTEX_LOCK(grf_lock);
|
---|
[1] | 404 | if (grf) {
|
---|
[252] | 405 | sl_fclose(FIL__, __LINE__, grf);
|
---|
[1] | 406 | grf = NULL;
|
---|
| 407 | }
|
---|
[134] | 408 | SH_MUTEX_UNLOCK(grf_lock);
|
---|
[1] | 409 | }
|
---|
| 410 |
|
---|
| 411 | static int sh_getgrent_r(struct group *__restrict resultbuf,
|
---|
| 412 | char *__restrict buffer, size_t buflen,
|
---|
| 413 | struct group **__restrict result)
|
---|
| 414 | {
|
---|
| 415 | int rv;
|
---|
| 416 |
|
---|
[134] | 417 | SH_MUTEX_LOCK(grf_lock);
|
---|
[1] | 418 |
|
---|
| 419 | *result = NULL; /* In case of error... */
|
---|
| 420 |
|
---|
| 421 | if (!grf) {
|
---|
| 422 | if (!(grf = fopen(_PATH_GROUP, "r"))) {
|
---|
| 423 | rv = errno;
|
---|
| 424 | goto ERR;
|
---|
| 425 | }
|
---|
| 426 | /* __STDIO_SET_USER_LOCKING(grf); */
|
---|
| 427 | }
|
---|
| 428 |
|
---|
| 429 | if (!(rv = __pgsreader(__parsegrent, resultbuf,
|
---|
| 430 | buffer, buflen, grf))) {
|
---|
| 431 | *result = resultbuf;
|
---|
| 432 | }
|
---|
| 433 |
|
---|
| 434 | ERR:
|
---|
[150] | 435 | ; /* 'label at end of compound statement' */
|
---|
[134] | 436 | SH_MUTEX_UNLOCK(grf_lock);
|
---|
[1] | 437 |
|
---|
| 438 | return rv;
|
---|
| 439 | }
|
---|
| 440 |
|
---|
| 441 |
|
---|
| 442 | struct passwd * sh_getpwent(void)
|
---|
| 443 | {
|
---|
| 444 | static char line_buff[PWD_BUFFER_SIZE];
|
---|
| 445 | static struct passwd pwd;
|
---|
| 446 | struct passwd *result;
|
---|
| 447 |
|
---|
| 448 | sh_getpwent_r(&pwd, line_buff, sizeof(line_buff), &result);
|
---|
| 449 | return result;
|
---|
| 450 | }
|
---|
| 451 |
|
---|
| 452 |
|
---|
| 453 | struct group * sh_getgrent(void)
|
---|
| 454 | {
|
---|
| 455 | static char line_buff[GRP_BUFFER_SIZE];
|
---|
| 456 | static struct group gr;
|
---|
| 457 | struct group *result;
|
---|
| 458 |
|
---|
[134] | 459 | sh_getgrent_r(&gr, line_buff, sizeof(line_buff), &result);
|
---|
[1] | 460 | return result;
|
---|
| 461 | }
|
---|
| 462 |
|
---|
| 463 | int sh_initgroups(const char *user, gid_t gid)
|
---|
| 464 | {
|
---|
| 465 | FILE *grf;
|
---|
[570] | 466 | gid_t *group_list = NULL;
|
---|
| 467 | size_t num_groups;
|
---|
| 468 | int rv;
|
---|
[1] | 469 | char **m;
|
---|
| 470 | struct group group;
|
---|
| 471 |
|
---|
[454] | 472 | char * buff = calloc(1,GRP_BUFFER_SIZE_MALLOC);
|
---|
[428] | 473 |
|
---|
[1] | 474 | rv = -1;
|
---|
| 475 |
|
---|
| 476 | /* We alloc space for 8 gids at a time. */
|
---|
[570] | 477 | if (buff && ((group_list = calloc(8,sizeof(gid_t *))) != NULL)
|
---|
[1] | 478 | && ((grf = fopen(_PATH_GROUP, "r")) != NULL)
|
---|
| 479 | ) {
|
---|
| 480 |
|
---|
| 481 | /* __STDIO_SET_USER_LOCKING(grf); */
|
---|
| 482 |
|
---|
| 483 | *group_list = gid;
|
---|
| 484 | num_groups = 1;
|
---|
| 485 |
|
---|
[428] | 486 | while (!__pgsreader(__parsegrent, &group, buff, GRP_BUFFER_SIZE_MALLOC, grf)) {
|
---|
[1] | 487 | assert(group.gr_mem); /* Must have at least a NULL terminator. */
|
---|
| 488 | if (group.gr_gid != gid) {
|
---|
| 489 | for (m=group.gr_mem ; *m ; m++) {
|
---|
| 490 | if (!strcmp(*m, user)) {
|
---|
| 491 | if (!(num_groups & 7)) {
|
---|
[570] | 492 | gid_t *tmp = NULL;
|
---|
| 493 | if (num_groups > (SIZE_MAX - 8)) {
|
---|
| 494 | rv = -1;
|
---|
| 495 | goto DO_CLOSE;
|
---|
| 496 | }
|
---|
| 497 | if ((num_groups+8) <= (SIZE_MAX / sizeof(gid_t *))) {
|
---|
| 498 | tmp = (gid_t *)
|
---|
| 499 | realloc(group_list,
|
---|
| 500 | (num_groups+8) * sizeof(gid_t *));
|
---|
| 501 | }
|
---|
| 502 | if (!tmp) {
|
---|
| 503 | rv = -1;
|
---|
| 504 | goto DO_CLOSE;
|
---|
| 505 | }
|
---|
| 506 | group_list = tmp;
|
---|
[1] | 507 | }
|
---|
| 508 | group_list[num_groups++] = group.gr_gid;
|
---|
| 509 | break;
|
---|
| 510 | }
|
---|
| 511 | }
|
---|
| 512 | }
|
---|
| 513 | }
|
---|
| 514 |
|
---|
| 515 | rv = setgroups(num_groups, group_list);
|
---|
| 516 | DO_CLOSE:
|
---|
[252] | 517 | sl_fclose(FIL__, __LINE__, grf);
|
---|
[1] | 518 | }
|
---|
| 519 |
|
---|
| 520 | /* group_list will be NULL if initial malloc failed, which may trigger
|
---|
| 521 | * warnings from various malloc debuggers. */
|
---|
[570] | 522 | if (group_list) free(group_list);
|
---|
| 523 | if (buff) free(buff);
|
---|
| 524 | /* cppcheck-suppress resourceLeak */
|
---|
[1] | 525 | return rv;
|
---|
| 526 | }
|
---|
| 527 |
|
---|
| 528 |
|
---|
| 529 | /**********************************************************************/
|
---|
| 530 | /* Internal uClibc functions. */
|
---|
| 531 | /**********************************************************************/
|
---|
| 532 |
|
---|
| 533 | static const unsigned char pw_off[] = {
|
---|
| 534 | offsetof(struct passwd, pw_name), /* 0 */
|
---|
| 535 | offsetof(struct passwd, pw_passwd), /* 1 */
|
---|
| 536 | offsetof(struct passwd, pw_uid), /* 2 - not a char ptr */
|
---|
| 537 | offsetof(struct passwd, pw_gid), /* 3 - not a char ptr */
|
---|
| 538 | offsetof(struct passwd, pw_gecos), /* 4 */
|
---|
| 539 | offsetof(struct passwd, pw_dir), /* 5 */
|
---|
| 540 | offsetof(struct passwd, pw_shell) /* 6 */
|
---|
| 541 | };
|
---|
| 542 |
|
---|
| 543 | static int __parsepwent(void *data, char *line)
|
---|
| 544 | {
|
---|
| 545 | char *endptr;
|
---|
| 546 | char *p;
|
---|
| 547 | int i;
|
---|
| 548 |
|
---|
| 549 | i = 0;
|
---|
| 550 | do {
|
---|
| 551 | p = ((char *) ((struct passwd *) data)) + pw_off[i];
|
---|
| 552 |
|
---|
| 553 | if ((i & 6) ^ 2) { /* i!=2 and i!=3 */
|
---|
| 554 | *((char **) p) = line;
|
---|
| 555 | if (i==6) {
|
---|
| 556 | return 0;
|
---|
| 557 | }
|
---|
| 558 | /* NOTE: glibc difference - glibc allows omission of
|
---|
| 559 | * ':' seperators after the gid field if all remaining
|
---|
| 560 | * entries are empty. We require all separators. */
|
---|
| 561 | if (!(line = strchr(line, ':'))) {
|
---|
| 562 | break;
|
---|
| 563 | }
|
---|
| 564 | } else {
|
---|
| 565 | unsigned long t = strtoul(line, &endptr, 10);
|
---|
| 566 | /* Make sure we had at least one digit, and that the
|
---|
| 567 | * failing char is the next field seperator ':'. See
|
---|
| 568 | * glibc difference note above. */
|
---|
| 569 | /* TODO: Also check for leading whitespace? */
|
---|
| 570 | if ((endptr == line) || (*endptr != ':')) {
|
---|
| 571 | break;
|
---|
| 572 | }
|
---|
| 573 | line = endptr;
|
---|
| 574 | if (i & 1) { /* i == 3 -- gid */
|
---|
| 575 | *((gid_t *) p) = t;
|
---|
| 576 | } else { /* i == 2 -- uid */
|
---|
| 577 | *((uid_t *) p) = t;
|
---|
| 578 | }
|
---|
| 579 | }
|
---|
| 580 |
|
---|
| 581 | *line++ = 0;
|
---|
| 582 | ++i;
|
---|
| 583 | } while (1);
|
---|
| 584 |
|
---|
| 585 | return -1;
|
---|
| 586 | }
|
---|
| 587 |
|
---|
| 588 | static const unsigned char gr_off[] = {
|
---|
| 589 | offsetof(struct group, gr_name), /* 0 */
|
---|
| 590 | offsetof(struct group, gr_passwd), /* 1 */
|
---|
| 591 | offsetof(struct group, gr_gid) /* 2 - not a char ptr */
|
---|
| 592 | };
|
---|
| 593 |
|
---|
| 594 | static int __parsegrent(void *data, char *line)
|
---|
| 595 | {
|
---|
| 596 | char *endptr;
|
---|
| 597 | char *p;
|
---|
| 598 | int i;
|
---|
| 599 | char **members;
|
---|
| 600 | char *end_of_buf;
|
---|
| 601 |
|
---|
| 602 | end_of_buf = ((struct group *) data)->gr_name; /* Evil hack! */
|
---|
| 603 | i = 0;
|
---|
| 604 | do {
|
---|
| 605 | p = ((char *) ((struct group *) data)) + gr_off[i];
|
---|
| 606 |
|
---|
| 607 | if (i < 2) {
|
---|
| 608 | *((char **) p) = line;
|
---|
| 609 | if (!(line = strchr(line, ':'))) {
|
---|
| 610 | break;
|
---|
| 611 | }
|
---|
| 612 | *line++ = 0;
|
---|
| 613 | ++i;
|
---|
| 614 | } else {
|
---|
| 615 | *((gid_t *) p) = strtoul(line, &endptr, 10);
|
---|
| 616 |
|
---|
| 617 | /* NOTE: glibc difference - glibc allows omission of the
|
---|
| 618 | * trailing colon when there is no member list. We treat
|
---|
| 619 | * this as an error. */
|
---|
| 620 |
|
---|
| 621 | /* Make sure we had at least one digit, and that the
|
---|
| 622 | * failing char is the next field seperator ':'. See
|
---|
| 623 | * glibc difference note above. */
|
---|
| 624 | if ((endptr == line) || (*endptr != ':')) {
|
---|
| 625 | break;
|
---|
| 626 | }
|
---|
| 627 |
|
---|
| 628 | i = 1; /* Count terminating NULL ptr. */
|
---|
| 629 | p = endptr;
|
---|
| 630 |
|
---|
| 631 | if (p[1]) { /* We have a member list to process. */
|
---|
| 632 | /* Overwrite the last ':' with a ',' before counting.
|
---|
| 633 | * This allows us to test for initial ',' and adds
|
---|
| 634 | * one ',' so that the ',' count equals the member
|
---|
| 635 | * count. */
|
---|
| 636 | *p = ',';
|
---|
| 637 | do {
|
---|
| 638 | /* NOTE: glibc difference - glibc allows and trims leading
|
---|
| 639 | * (but not trailing) space. We treat this as an error. */
|
---|
| 640 | /* NOTE: glibc difference - glibc allows consecutive and
|
---|
| 641 | * trailing commas, and ignores "empty string" users. We
|
---|
| 642 | * treat this as an error. */
|
---|
| 643 | if (*p == ',') {
|
---|
| 644 | ++i;
|
---|
| 645 | *p = 0; /* nul-terminate each member string. */
|
---|
| 646 | if (!*++p || (*p == ',') || isspace(*p)) {
|
---|
| 647 | goto ERR;
|
---|
| 648 | }
|
---|
| 649 | }
|
---|
| 650 | } while (*++p);
|
---|
| 651 | }
|
---|
| 652 |
|
---|
| 653 | /* Now align (p+1), rounding up. */
|
---|
| 654 | /* Assumes sizeof(char **) is a power of 2. */
|
---|
| 655 | members = (char **)( (((intptr_t) p) + sizeof(char **))
|
---|
| 656 | & ~((intptr_t)(sizeof(char **) - 1)) );
|
---|
| 657 |
|
---|
| 658 | if (((char *)(members + i)) > end_of_buf) { /* No space. */
|
---|
| 659 | break;
|
---|
| 660 | }
|
---|
| 661 |
|
---|
| 662 | ((struct group *) data)->gr_mem = members;
|
---|
| 663 |
|
---|
| 664 | if (--i) {
|
---|
| 665 | p = endptr; /* Pointing to char prior to first member. */
|
---|
| 666 | do {
|
---|
| 667 | *members++ = ++p;
|
---|
| 668 | if (!--i) break;
|
---|
| 669 | while (*++p) {}
|
---|
| 670 | } while (1);
|
---|
| 671 | }
|
---|
| 672 | *members = NULL;
|
---|
| 673 |
|
---|
| 674 | return 0;
|
---|
| 675 | }
|
---|
| 676 | } while (1);
|
---|
| 677 |
|
---|
| 678 | ERR:
|
---|
| 679 | return -1;
|
---|
| 680 | }
|
---|
| 681 |
|
---|
| 682 | /* Reads until if EOF, or until if finds a line which fits in the buffer
|
---|
| 683 | * and for which the parser function succeeds.
|
---|
| 684 | *
|
---|
| 685 | * Returns 0 on success and ENOENT for end-of-file (glibc concession).
|
---|
| 686 | */
|
---|
| 687 |
|
---|
| 688 | static int __pgsreader(int (*__parserfunc)(void *d, char *line), void *data,
|
---|
| 689 | char *__restrict line_buff, size_t buflen, FILE *f)
|
---|
| 690 | {
|
---|
| 691 | size_t line_len; /* int -> size_t R.W. */
|
---|
| 692 | int skip;
|
---|
| 693 | int rv = ERANGE;
|
---|
| 694 |
|
---|
| 695 | if (buflen < PWD_BUFFER_SIZE) {
|
---|
| 696 | errno = rv;
|
---|
| 697 | } else {
|
---|
| 698 | /* __STDIO_THREADLOCK(f); */
|
---|
| 699 |
|
---|
| 700 | skip = 0;
|
---|
| 701 | do {
|
---|
[134] | 702 | if (!fgets(line_buff, buflen, f)) {
|
---|
| 703 | if (feof(f)) {
|
---|
[1] | 704 | rv = ENOENT;
|
---|
| 705 | }
|
---|
| 706 | break;
|
---|
| 707 | }
|
---|
| 708 |
|
---|
| 709 | line_len = strlen(line_buff) - 1; /* strlen() must be > 0. */
|
---|
| 710 | if (line_buff[line_len] == '\n') {
|
---|
| 711 | line_buff[line_len] = 0;
|
---|
| 712 | } else if (line_len + 2 == buflen) { /* line too long */
|
---|
[428] | 713 | rv = ERANGE;
|
---|
| 714 | break;
|
---|
| 715 | /*
|
---|
[1] | 716 | ++skip;
|
---|
| 717 | continue;
|
---|
[428] | 718 | */
|
---|
[1] | 719 | }
|
---|
| 720 |
|
---|
| 721 | if (skip) {
|
---|
| 722 | --skip;
|
---|
| 723 | continue;
|
---|
| 724 | }
|
---|
| 725 |
|
---|
| 726 | /* NOTE: glibc difference - glibc strips leading whitespace from
|
---|
| 727 | * records. We do not allow leading whitespace. */
|
---|
| 728 |
|
---|
| 729 | /* Skip empty lines, comment lines, and lines with leading
|
---|
| 730 | * whitespace. */
|
---|
| 731 | if (*line_buff && (*line_buff != '#') && !isspace(*line_buff)) {
|
---|
| 732 | if (__parserfunc == __parsegrent) { /* Do evil group hack. */
|
---|
| 733 | /* The group entry parsing function needs to know where
|
---|
| 734 | * the end of the buffer is so that it can construct the
|
---|
| 735 | * group member ptr table. */
|
---|
| 736 | ((struct group *) data)->gr_name = line_buff + buflen;
|
---|
| 737 | }
|
---|
| 738 |
|
---|
| 739 | if (!__parserfunc(data, line_buff)) {
|
---|
| 740 | rv = 0;
|
---|
| 741 | break;
|
---|
| 742 | }
|
---|
| 743 | }
|
---|
| 744 | } while (1);
|
---|
| 745 |
|
---|
| 746 | /* __STDIO_THREADUNLOCK(f); */
|
---|
| 747 | }
|
---|
| 748 |
|
---|
| 749 | return rv;
|
---|
| 750 | }
|
---|
| 751 |
|
---|
| 752 | /* resolv.c: DNS Resolver
|
---|
| 753 | *
|
---|
| 754 | * Copyright (C) 1998 Kenneth Albanowski <kjahds@kjahds.com>,
|
---|
| 755 | * The Silver Hammer Group, Ltd.
|
---|
| 756 | *
|
---|
| 757 | * This library is free software; you can redistribute it and/or
|
---|
| 758 | * modify it under the terms of the GNU Library General Public
|
---|
| 759 | * License as published by the Free Software Foundation; either
|
---|
| 760 | * version 2 of the License, or (at your option) any later version.
|
---|
| 761 | */
|
---|
| 762 |
|
---|
| 763 | /*
|
---|
| 764 | * Portions Copyright (c) 1985, 1993
|
---|
| 765 | * The Regents of the University of California. All rights reserved.
|
---|
| 766 | *
|
---|
| 767 | * Redistribution and use in source and binary forms, with or without
|
---|
| 768 | * modification, are permitted provided that the following conditions
|
---|
| 769 | * are met:
|
---|
| 770 | * 1. Redistributions of source code must retain the above copyright
|
---|
| 771 | * notice, this list of conditions and the following disclaimer.
|
---|
| 772 | * 2. Redistributions in binary form must reproduce the above copyright
|
---|
| 773 | * notice, this list of conditions and the following disclaimer in the
|
---|
| 774 | * documentation and/or other materials provided with the distribution.
|
---|
| 775 | * 4. Neither the name of the University nor the names of its contributors
|
---|
| 776 | * may be used to endorse or promote products derived from this software
|
---|
| 777 | * without specific prior written permission.
|
---|
| 778 | *
|
---|
| 779 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
---|
| 780 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
---|
| 781 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
---|
| 782 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
---|
| 783 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
---|
| 784 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
---|
| 785 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
---|
| 786 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
---|
| 787 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
---|
| 788 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
---|
| 789 | * SUCH DAMAGE.
|
---|
| 790 | */
|
---|
| 791 |
|
---|
| 792 | /*
|
---|
| 793 | * Portions Copyright (c) 1993 by Digital Equipment Corporation.
|
---|
| 794 | *
|
---|
| 795 | * Permission to use, copy, modify, and distribute this software for any
|
---|
| 796 | * purpose with or without fee is hereby granted, provided that the above
|
---|
| 797 | * copyright notice and this permission notice appear in all copies, and that
|
---|
| 798 | * the name of Digital Equipment Corporation not be used in advertising or
|
---|
| 799 | * publicity pertaining to distribution of the document or software without
|
---|
| 800 | * specific, written prior permission.
|
---|
| 801 | *
|
---|
| 802 | * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
|
---|
| 803 | * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
|
---|
| 804 | * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT
|
---|
| 805 | * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
|
---|
| 806 | * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
|
---|
| 807 | * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
|
---|
| 808 | * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
|
---|
| 809 | * SOFTWARE.
|
---|
| 810 | */
|
---|
| 811 |
|
---|
| 812 | /*
|
---|
| 813 | * Portions Copyright (c) 1996-1999 by Internet Software Consortium.
|
---|
| 814 | *
|
---|
| 815 | * Permission to use, copy, modify, and distribute this software for any
|
---|
| 816 | * purpose with or without fee is hereby granted, provided that the above
|
---|
| 817 | * copyright notice and this permission notice appear in all copies.
|
---|
| 818 | *
|
---|
| 819 | * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
|
---|
| 820 | * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
|
---|
| 821 | * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
|
---|
| 822 | * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
|
---|
| 823 | * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
|
---|
| 824 | * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
|
---|
| 825 | * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
|
---|
| 826 | * SOFTWARE.
|
---|
| 827 | */
|
---|
| 828 |
|
---|
| 829 | /*
|
---|
| 830 | *
|
---|
| 831 | * 5-Oct-2000 W. Greathouse wgreathouse@smva.com
|
---|
| 832 | * Fix memory leak and memory corruption.
|
---|
| 833 | * -- Every name resolution resulted in
|
---|
| 834 | * a new parse of resolv.conf and new
|
---|
| 835 | * copy of nameservers allocated by
|
---|
| 836 | * strdup.
|
---|
| 837 | * -- Every name resolution resulted in
|
---|
| 838 | * a new read of resolv.conf without
|
---|
| 839 | * resetting index from prior read...
|
---|
| 840 | * resulting in exceeding array bounds.
|
---|
| 841 | *
|
---|
| 842 | * Limit nameservers read from resolv.conf
|
---|
| 843 | *
|
---|
| 844 | * Add "search" domains from resolv.conf
|
---|
| 845 | *
|
---|
| 846 | * Some systems will return a security
|
---|
| 847 | * signature along with query answer for
|
---|
| 848 | * dynamic DNS entries.
|
---|
| 849 | * -- skip/ignore this answer
|
---|
| 850 | *
|
---|
| 851 | * Include arpa/nameser.h for defines.
|
---|
| 852 | *
|
---|
| 853 | * General cleanup
|
---|
| 854 | *
|
---|
| 855 | * 20-Jun-2001 Michal Moskal <malekith@pld.org.pl>
|
---|
| 856 | * partial IPv6 support (i.e. gethostbyname2() and resolve_address2()
|
---|
| 857 | * functions added), IPv6 nameservers are also supported.
|
---|
| 858 | *
|
---|
| 859 | * 6-Oct-2001 Jari Korva <jari.korva@iki.fi>
|
---|
| 860 | * more IPv6 support (IPv6 support for gethostbyaddr();
|
---|
| 861 | * address family parameter and improved IPv6 support for get_hosts_byname
|
---|
| 862 | * and read_etc_hosts; getnameinfo() port from glibc; defined
|
---|
| 863 | * defined ip6addr_any and in6addr_loopback)
|
---|
| 864 | *
|
---|
| 865 | * 2-Feb-2002 Erik Andersen <andersee@debian.org>
|
---|
| 866 | * Added gethostent(), sethostent(), and endhostent()
|
---|
| 867 | *
|
---|
| 868 | * 17-Aug-2002 Manuel Novoa III <mjn3@codepoet.org>
|
---|
| 869 | * Fixed __read_etc_hosts_r to return alias list, and modified buffer
|
---|
| 870 | * allocation accordingly. See MAX_ALIASES and ALIAS_DIM below.
|
---|
| 871 | * This fixes the segfault in the Python 2.2.1 socket test.
|
---|
| 872 | *
|
---|
| 873 | * 04-Jan-2003 Jay Kulpinski <jskulpin@berkshire.rr.com>
|
---|
| 874 | * Fixed __decode_dotted to count the terminating null character
|
---|
| 875 | * in a host name.
|
---|
| 876 | *
|
---|
| 877 | * 02-Oct-2003 Tony J. White <tjw@tjw.org>
|
---|
| 878 | * Lifted dn_expand() and dependent ns_name_uncompress(), ns_name_unpack(),
|
---|
| 879 | * and ns_name_ntop() from glibc 2.3.2 for compatibility with ipsec-tools
|
---|
| 880 | * and openldap.
|
---|
| 881 | *
|
---|
| 882 | */
|
---|
| 883 |
|
---|
| 884 | #include <sys/socket.h>
|
---|
| 885 | #include <netinet/in.h>
|
---|
| 886 | #include <arpa/inet.h>
|
---|
| 887 |
|
---|
[252] | 888 | /* sl_close_fd(FIL__, __LINE__, )
|
---|
[1] | 889 | */
|
---|
| 890 | #include <unistd.h>
|
---|
| 891 |
|
---|
| 892 | /* 'struct hostent'
|
---|
| 893 | */
|
---|
| 894 | #include <netdb.h>
|
---|
| 895 |
|
---|
| 896 | /* constanst like HFIXEDSZ
|
---|
| 897 | */
|
---|
| 898 | #include <arpa/nameser.h>
|
---|
| 899 |
|
---|
[134] | 900 | SH_MUTEX_STATIC(resolv_lock, PTHREAD_MUTEX_INITIALIZER);
|
---|
[1] | 901 |
|
---|
| 902 | #define __UCLIBC_HAS_IPV6__
|
---|
| 903 | #define MAX_RECURSE 5
|
---|
| 904 | #define REPLY_TIMEOUT 10
|
---|
| 905 | #define MAX_RETRIES 3
|
---|
| 906 | #define MAX_SERVERS 3
|
---|
| 907 | #define MAX_SEARCH 4
|
---|
| 908 | #define MAX_ALIASES 5
|
---|
| 909 |
|
---|
| 910 | /* 1:ip + 1:full + MAX_ALIASES:aliases + 1:NULL */
|
---|
| 911 | #define ALIAS_DIM (2 + MAX_ALIASES + 1)
|
---|
| 912 |
|
---|
| 913 | static int __nameservers;
|
---|
| 914 | static char * __nameserver[MAX_SERVERS];
|
---|
| 915 | static int __searchdomains;
|
---|
| 916 | static char * __searchdomain[MAX_SEARCH];
|
---|
| 917 |
|
---|
| 918 | #undef DEBUG
|
---|
[533] | 919 | /* #define DEBUG */
|
---|
[1] | 920 |
|
---|
| 921 | #ifdef DEBUG
|
---|
[22] | 922 | /* flawfinder: ignore *//* definition of debug macro */
|
---|
[1] | 923 | #define DPRINTF(X,args...) fprintf(stderr, X, ##args)
|
---|
| 924 | #else
|
---|
| 925 | #define DPRINTF(X,args...)
|
---|
| 926 | #endif /* DEBUG */
|
---|
| 927 |
|
---|
| 928 | struct resolv_header {
|
---|
| 929 | int id;
|
---|
| 930 | int qr,opcode,aa,tc,rd,ra,rcode;
|
---|
| 931 | int qdcount;
|
---|
| 932 | int ancount;
|
---|
| 933 | int nscount;
|
---|
| 934 | int arcount;
|
---|
| 935 | };
|
---|
| 936 |
|
---|
| 937 | struct resolv_question {
|
---|
| 938 | char * dotted;
|
---|
| 939 | int qtype;
|
---|
| 940 | int qclass;
|
---|
| 941 | };
|
---|
| 942 |
|
---|
| 943 | struct resolv_answer {
|
---|
| 944 | char * dotted;
|
---|
| 945 | int atype;
|
---|
| 946 | int aclass;
|
---|
| 947 | int ttl;
|
---|
| 948 | int rdlength;
|
---|
| 949 | unsigned char * rdata;
|
---|
| 950 | int rdoffset;
|
---|
| 951 | };
|
---|
| 952 |
|
---|
| 953 | enum etc_hosts_action {
|
---|
| 954 | GET_HOSTS_BYNAME = 0,
|
---|
| 955 | GETHOSTENT,
|
---|
| 956 | GET_HOSTS_BYADDR,
|
---|
| 957 | };
|
---|
| 958 |
|
---|
| 959 | static int __encode_header(struct resolv_header *h, unsigned char *dest, int maxlen)
|
---|
| 960 | {
|
---|
| 961 | if (maxlen < HFIXEDSZ)
|
---|
| 962 | return -1;
|
---|
| 963 |
|
---|
| 964 | dest[0] = (h->id & 0xff00) >> 8;
|
---|
| 965 | dest[1] = (h->id & 0x00ff) >> 0;
|
---|
| 966 | dest[2] = (h->qr ? 0x80 : 0) |
|
---|
| 967 | ((h->opcode & 0x0f) << 3) |
|
---|
| 968 | (h->aa ? 0x04 : 0) |
|
---|
| 969 | (h->tc ? 0x02 : 0) |
|
---|
| 970 | (h->rd ? 0x01 : 0);
|
---|
| 971 | dest[3] = (h->ra ? 0x80 : 0) | (h->rcode & 0x0f);
|
---|
| 972 | dest[4] = (h->qdcount & 0xff00) >> 8;
|
---|
| 973 | dest[5] = (h->qdcount & 0x00ff) >> 0;
|
---|
| 974 | dest[6] = (h->ancount & 0xff00) >> 8;
|
---|
| 975 | dest[7] = (h->ancount & 0x00ff) >> 0;
|
---|
| 976 | dest[8] = (h->nscount & 0xff00) >> 8;
|
---|
| 977 | dest[9] = (h->nscount & 0x00ff) >> 0;
|
---|
| 978 | dest[10] = (h->arcount & 0xff00) >> 8;
|
---|
| 979 | dest[11] = (h->arcount & 0x00ff) >> 0;
|
---|
| 980 |
|
---|
| 981 | return HFIXEDSZ;
|
---|
| 982 | }
|
---|
| 983 |
|
---|
| 984 | static int __decode_header(unsigned char *data, struct resolv_header *h)
|
---|
| 985 | {
|
---|
| 986 | h->id = (data[0] << 8) | data[1];
|
---|
| 987 | h->qr = (data[2] & 0x80) ? 1 : 0;
|
---|
| 988 | h->opcode = (data[2] >> 3) & 0x0f;
|
---|
| 989 | h->aa = (data[2] & 0x04) ? 1 : 0;
|
---|
| 990 | h->tc = (data[2] & 0x02) ? 1 : 0;
|
---|
| 991 | h->rd = (data[2] & 0x01) ? 1 : 0;
|
---|
| 992 | h->ra = (data[3] & 0x80) ? 1 : 0;
|
---|
| 993 | h->rcode = data[3] & 0x0f;
|
---|
| 994 | h->qdcount = (data[4] << 8) | data[5];
|
---|
| 995 | h->ancount = (data[6] << 8) | data[7];
|
---|
| 996 | h->nscount = (data[8] << 8) | data[9];
|
---|
| 997 | h->arcount = (data[10] << 8) | data[11];
|
---|
| 998 |
|
---|
| 999 | return HFIXEDSZ;
|
---|
| 1000 | }
|
---|
| 1001 |
|
---|
| 1002 | static int __length_dotted(const unsigned char *data, int offset)
|
---|
| 1003 | {
|
---|
| 1004 | int orig_offset = offset;
|
---|
| 1005 | int l;
|
---|
| 1006 |
|
---|
| 1007 | if (!data)
|
---|
| 1008 | return -1;
|
---|
| 1009 |
|
---|
[501] | 1010 | do {
|
---|
[533] | 1011 | l = data[offset];
|
---|
| 1012 | if (offset < INT_MAX)
|
---|
[481] | 1013 | offset++;
|
---|
| 1014 | else
|
---|
| 1015 | return -1;
|
---|
[533] | 1016 | if (!l)
|
---|
| 1017 | break;
|
---|
| 1018 |
|
---|
| 1019 | DPRINTF("l[%d] = %d\n", offset, l);
|
---|
[481] | 1020 |
|
---|
[1] | 1021 | if ((l & 0xc0) == (0xc0)) {
|
---|
[481] | 1022 | if (offset < INT_MAX)
|
---|
| 1023 | offset++;
|
---|
| 1024 | else
|
---|
| 1025 | return -1;
|
---|
[1] | 1026 | break;
|
---|
| 1027 | }
|
---|
| 1028 |
|
---|
[481] | 1029 | if (offset <= (INT_MAX - l))
|
---|
| 1030 | offset += l;
|
---|
| 1031 | else
|
---|
| 1032 | return -1;
|
---|
[1] | 1033 |
|
---|
[501] | 1034 | } while (l);
|
---|
| 1035 |
|
---|
[533] | 1036 | DPRINTF("orig: %d now %d\n", orig_offset, offset);
|
---|
[1] | 1037 | return offset - orig_offset;
|
---|
| 1038 | }
|
---|
| 1039 |
|
---|
| 1040 | static int __length_question(unsigned char *message, int offset)
|
---|
| 1041 | {
|
---|
| 1042 | int i;
|
---|
| 1043 |
|
---|
| 1044 | i = __length_dotted(message, offset);
|
---|
| 1045 | if (i < 0)
|
---|
| 1046 | return i;
|
---|
[481] | 1047 | if (i < (INT_MAX - 4))
|
---|
| 1048 | return i + 4;
|
---|
| 1049 | else
|
---|
| 1050 | return -1;
|
---|
[1] | 1051 | }
|
---|
| 1052 |
|
---|
| 1053 | /* Decode a dotted string from nameserver transport-level encoding.
|
---|
| 1054 | This routine understands compressed data. */
|
---|
| 1055 |
|
---|
| 1056 | static int __decode_dotted(const unsigned char *data, int offset,
|
---|
| 1057 | char *dest, int maxlen)
|
---|
| 1058 | {
|
---|
| 1059 | int l;
|
---|
| 1060 | int measure = 1;
|
---|
| 1061 | int total = 0;
|
---|
| 1062 | int used = 0;
|
---|
| 1063 |
|
---|
| 1064 | if (!data)
|
---|
| 1065 | return -1;
|
---|
[502] | 1066 | if ((offset < 0) || (offset > (PACKETSZ-1)))
|
---|
| 1067 | return -1;
|
---|
[481] | 1068 | while ((l=data[offset])) {
|
---|
[502] | 1069 | if (offset < (PACKETSZ-1)) offset++;
|
---|
[481] | 1070 | else return -1;
|
---|
[501] | 1071 | if (measure)
|
---|
| 1072 | { if (total < INT_MAX) total++; else return -1; }
|
---|
[1] | 1073 | if ((l & 0xc0) == (0xc0)) {
|
---|
[501] | 1074 | if (measure)
|
---|
| 1075 | { if (total < INT_MAX) total++; else return -1; }
|
---|
[481] | 1076 | /* compressed item, redirect */
|
---|
[1] | 1077 | offset = ((l & 0x3f) << 8) | data[offset];
|
---|
[502] | 1078 | if ((offset < 0) || (offset > (PACKETSZ-1)))
|
---|
[481] | 1079 | return -1;
|
---|
[1] | 1080 | measure = 0;
|
---|
| 1081 | continue;
|
---|
| 1082 | }
|
---|
[481] | 1083 |
|
---|
| 1084 | if (used >= (INT_MAX - l))
|
---|
| 1085 | return -1;
|
---|
[1] | 1086 |
|
---|
| 1087 | if ((used + l + 1) >= maxlen)
|
---|
[481] | 1088 | return -1;
|
---|
[1] | 1089 |
|
---|
| 1090 | memcpy(dest + used, data + offset, l);
|
---|
[481] | 1091 |
|
---|
[502] | 1092 | if (offset <= ((PACKETSZ-1) - l))
|
---|
[481] | 1093 | offset += l;
|
---|
| 1094 | else
|
---|
| 1095 | return -1;
|
---|
| 1096 |
|
---|
| 1097 | if (used <= (INT_MAX - l))
|
---|
| 1098 | used += l;
|
---|
| 1099 | else
|
---|
| 1100 | return -1;
|
---|
[501] | 1101 | if (measure)
|
---|
| 1102 | { if (total <= (INT_MAX -l)) total += l; else return -1; }
|
---|
[1] | 1103 |
|
---|
[502] | 1104 | if (used >= maxlen)
|
---|
[481] | 1105 | return -1;
|
---|
[1] | 1106 | if (data[offset] != 0)
|
---|
| 1107 | dest[used++] = '.';
|
---|
| 1108 | else
|
---|
| 1109 | dest[used++] = '\0';
|
---|
| 1110 | }
|
---|
| 1111 |
|
---|
| 1112 | /* The null byte must be counted too */
|
---|
[501] | 1113 | if (measure) {
|
---|
| 1114 | if (total < INT_MAX) total++; else return -1;
|
---|
[1] | 1115 | }
|
---|
| 1116 |
|
---|
| 1117 | DPRINTF("Total decode len = %d\n", total);
|
---|
| 1118 |
|
---|
| 1119 | return total;
|
---|
| 1120 | }
|
---|
| 1121 |
|
---|
| 1122 | static int __decode_answer(unsigned char *message, int offset,
|
---|
| 1123 | struct resolv_answer *a)
|
---|
| 1124 | {
|
---|
| 1125 | char temp[256];
|
---|
[481] | 1126 | int i = 0;
|
---|
[1] | 1127 |
|
---|
| 1128 | i = __decode_dotted(message, offset, temp, sizeof(temp));
|
---|
[502] | 1129 | if (i < 0 || i > PACKETSZ)
|
---|
| 1130 | return -1;
|
---|
[1] | 1131 |
|
---|
[502] | 1132 | if (offset <= ((PACKETSZ - 10) - i))
|
---|
[481] | 1133 | message += offset + i;
|
---|
| 1134 | else
|
---|
| 1135 | return -1;
|
---|
[1] | 1136 |
|
---|
| 1137 | a->dotted = strdup(temp);
|
---|
| 1138 | a->atype = (message[0] << 8) | message[1];
|
---|
| 1139 | message += 2;
|
---|
| 1140 | a->aclass = (message[0] << 8) | message[1];
|
---|
| 1141 | message += 2;
|
---|
| 1142 | a->ttl = (message[0] << 24) |
|
---|
| 1143 | (message[1] << 16) | (message[2] << 8) | (message[3] << 0);
|
---|
| 1144 | message += 4;
|
---|
| 1145 | a->rdlength = (message[0] << 8) | message[1];
|
---|
| 1146 | message += 2;
|
---|
| 1147 | a->rdata = message;
|
---|
| 1148 | a->rdoffset = offset + i + RRFIXEDSZ;
|
---|
| 1149 |
|
---|
| 1150 | DPRINTF("i=%d,rdlength=%d\n", i, a->rdlength);
|
---|
| 1151 |
|
---|
[481] | 1152 | if (RRFIXEDSZ <= (INT_MAX - i))
|
---|
| 1153 | i += RRFIXEDSZ;
|
---|
| 1154 | else
|
---|
| 1155 | return -1;
|
---|
| 1156 | if (a->rdlength <= (INT_MAX - i))
|
---|
| 1157 | return i + a->rdlength;
|
---|
| 1158 | else
|
---|
| 1159 | return -1;
|
---|
[1] | 1160 | }
|
---|
| 1161 |
|
---|
| 1162 |
|
---|
| 1163 | /* Encode a dotted string into nameserver transport-level encoding.
|
---|
| 1164 | This routine is fairly dumb, and doesn't attempt to compress
|
---|
| 1165 | the data */
|
---|
| 1166 |
|
---|
| 1167 | static int __encode_dotted(const char *dotted, unsigned char *dest, int maxlen)
|
---|
| 1168 | {
|
---|
| 1169 | unsigned int used = 0;
|
---|
| 1170 |
|
---|
| 1171 | while (dotted && *dotted) {
|
---|
| 1172 | char *c = strchr(dotted, '.');
|
---|
| 1173 | unsigned int l = c ? (unsigned int)(c - dotted) : strlen(dotted);
|
---|
| 1174 |
|
---|
| 1175 | if (l >= ((unsigned int)maxlen - used - 1))
|
---|
| 1176 | return -1;
|
---|
| 1177 |
|
---|
| 1178 | dest[used++] = l;
|
---|
| 1179 | memcpy(dest + used, dotted, l);
|
---|
| 1180 | used += l;
|
---|
| 1181 |
|
---|
| 1182 | if (c)
|
---|
| 1183 | dotted = c + 1;
|
---|
| 1184 | else
|
---|
| 1185 | break;
|
---|
| 1186 | }
|
---|
| 1187 |
|
---|
| 1188 | if (maxlen < 1)
|
---|
| 1189 | return -1;
|
---|
| 1190 |
|
---|
| 1191 | dest[used++] = 0;
|
---|
| 1192 |
|
---|
| 1193 | return used;
|
---|
| 1194 | }
|
---|
| 1195 |
|
---|
| 1196 | static int __encode_question(struct resolv_question *q,
|
---|
| 1197 | unsigned char *dest, int maxlen)
|
---|
| 1198 | {
|
---|
| 1199 | int i;
|
---|
| 1200 |
|
---|
| 1201 | i = __encode_dotted(q->dotted, dest, maxlen);
|
---|
| 1202 | if (i < 0)
|
---|
| 1203 | return i;
|
---|
| 1204 |
|
---|
| 1205 | dest += i;
|
---|
[481] | 1206 | if (maxlen < i)
|
---|
| 1207 | return -1;
|
---|
[1] | 1208 | maxlen -= i;
|
---|
| 1209 |
|
---|
| 1210 | if (maxlen < 4)
|
---|
| 1211 | return -1;
|
---|
| 1212 |
|
---|
| 1213 | dest[0] = (q->qtype & 0xff00) >> 8;
|
---|
| 1214 | dest[1] = (q->qtype & 0x00ff) >> 0;
|
---|
| 1215 | dest[2] = (q->qclass & 0xff00) >> 8;
|
---|
| 1216 | dest[3] = (q->qclass & 0x00ff) >> 0;
|
---|
| 1217 |
|
---|
[481] | 1218 | if (i <= (INT_MAX - 4))
|
---|
| 1219 | return i + 4;
|
---|
| 1220 | else
|
---|
| 1221 | return -1;
|
---|
[1] | 1222 | }
|
---|
| 1223 |
|
---|
| 1224 |
|
---|
| 1225 | /* Just for the record, having to lock __dns_lookup() just for these two globals
|
---|
| 1226 | * is pretty lame. I think these two variables can probably be de-global-ized,
|
---|
| 1227 | * which should eliminate the need for doing locking here... Needs a closer
|
---|
| 1228 | * look anyways. */
|
---|
| 1229 | static int ns=0, id=1;
|
---|
| 1230 |
|
---|
| 1231 | static int __dns_lookup(const char *name, int type, int nscount, char **nsip,
|
---|
| 1232 | unsigned char **outpacket, struct resolv_answer *a)
|
---|
| 1233 | {
|
---|
| 1234 | int i, j, len, fd, pos, rc;
|
---|
| 1235 | struct timeval tv;
|
---|
| 1236 | fd_set fds;
|
---|
| 1237 | struct resolv_header h;
|
---|
| 1238 | struct resolv_question q;
|
---|
| 1239 | int retries = 0;
|
---|
[454] | 1240 | unsigned char * packet = calloc(1,PACKETSZ);
|
---|
| 1241 | char *dns, *lookup = calloc(1,MAXDNAME);
|
---|
[1] | 1242 | int variant = 0;
|
---|
| 1243 | struct sockaddr_in sa;
|
---|
| 1244 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1245 | int v6;
|
---|
| 1246 | struct sockaddr_in6 sa6;
|
---|
| 1247 | #endif
|
---|
| 1248 |
|
---|
| 1249 | fd = -1;
|
---|
| 1250 |
|
---|
| 1251 | if (!packet || !lookup || !nscount)
|
---|
| 1252 | goto fail;
|
---|
| 1253 |
|
---|
| 1254 | DPRINTF("Looking up type %d answer for '%s'\n", type, name);
|
---|
| 1255 |
|
---|
[145] | 1256 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1257 | ns %= nscount;
|
---|
[145] | 1258 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1259 |
|
---|
| 1260 | while (retries++ < MAX_RETRIES) {
|
---|
| 1261 | if (fd != -1)
|
---|
[252] | 1262 | sl_close_fd(FIL__, __LINE__, fd);
|
---|
[1] | 1263 |
|
---|
| 1264 | memset(packet, 0, PACKETSZ);
|
---|
| 1265 |
|
---|
| 1266 | memset(&h, 0, sizeof(h));
|
---|
| 1267 |
|
---|
| 1268 | /* Mess with globals while under lock */
|
---|
[145] | 1269 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1270 | ++id;
|
---|
| 1271 | id &= 0xffff;
|
---|
| 1272 | h.id = id;
|
---|
| 1273 | dns = nsip[ns];
|
---|
[145] | 1274 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1275 |
|
---|
| 1276 | h.qdcount = 1;
|
---|
| 1277 | h.rd = 1;
|
---|
| 1278 |
|
---|
[533] | 1279 | DPRINTF("encoding header %d\n", h.rd);
|
---|
[1] | 1280 |
|
---|
| 1281 | i = __encode_header(&h, packet, PACKETSZ);
|
---|
| 1282 | if (i < 0)
|
---|
| 1283 | goto fail;
|
---|
| 1284 |
|
---|
[22] | 1285 | sl_strlcpy(lookup,name,MAXDNAME);
|
---|
[134] | 1286 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1287 | if (variant < __searchdomains && strchr(lookup, '.') == NULL)
|
---|
| 1288 | {
|
---|
[22] | 1289 | sl_strlcat(lookup,".", MAXDNAME);
|
---|
| 1290 | sl_strlcat(lookup,__searchdomain[variant], MAXDNAME);
|
---|
[1] | 1291 | }
|
---|
[134] | 1292 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1293 | DPRINTF("lookup name: %s\n", lookup);
|
---|
| 1294 | q.dotted = (char *)lookup;
|
---|
| 1295 | q.qtype = type;
|
---|
| 1296 | q.qclass = C_IN; /* CLASS_IN */
|
---|
| 1297 |
|
---|
| 1298 | j = __encode_question(&q, packet+i, PACKETSZ-i);
|
---|
| 1299 | if (j < 0)
|
---|
| 1300 | goto fail;
|
---|
| 1301 |
|
---|
| 1302 | len = i + j;
|
---|
| 1303 |
|
---|
| 1304 | DPRINTF("On try %d, sending query to port %d of machine %s\n",
|
---|
| 1305 | retries, NAMESERVER_PORT, dns);
|
---|
| 1306 |
|
---|
| 1307 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1308 | v6 = inet_pton(AF_INET6, dns, &sa6.sin6_addr) > 0;
|
---|
| 1309 | fd = socket(v6 ? AF_INET6 : AF_INET, SOCK_DGRAM, IPPROTO_UDP);
|
---|
| 1310 | #else
|
---|
| 1311 | fd = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
|
---|
| 1312 | #endif
|
---|
| 1313 | if (fd < 0) {
|
---|
| 1314 | continue;
|
---|
| 1315 | }
|
---|
| 1316 |
|
---|
| 1317 | /* Connect to the UDP socket so that asyncronous errors are returned */
|
---|
| 1318 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1319 | if (v6) {
|
---|
| 1320 | sa6.sin6_family = AF_INET6;
|
---|
| 1321 | sa6.sin6_port = htons(NAMESERVER_PORT);
|
---|
| 1322 | /* sa6.sin6_addr is already here */
|
---|
| 1323 | rc = connect(fd, (struct sockaddr *) &sa6, sizeof(sa6));
|
---|
| 1324 | } else {
|
---|
| 1325 | #endif
|
---|
| 1326 | sa.sin_family = AF_INET;
|
---|
| 1327 | sa.sin_port = htons(NAMESERVER_PORT);
|
---|
| 1328 | sa.sin_addr.s_addr = inet_addr(dns);
|
---|
| 1329 | rc = connect(fd, (struct sockaddr *) &sa, sizeof(sa));
|
---|
| 1330 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1331 | }
|
---|
| 1332 | #endif
|
---|
| 1333 | if (rc < 0) {
|
---|
| 1334 | if (errno == ENETUNREACH) {
|
---|
| 1335 | /* routing error, presume not transient */
|
---|
| 1336 | goto tryall;
|
---|
| 1337 | } else
|
---|
| 1338 | /* retry */
|
---|
| 1339 | continue;
|
---|
| 1340 | }
|
---|
| 1341 |
|
---|
| 1342 | DPRINTF("Transmitting packet of length %d, id=%d, qr=%d\n",
|
---|
| 1343 | len, h.id, h.qr);
|
---|
| 1344 |
|
---|
| 1345 | send(fd, packet, len, 0);
|
---|
| 1346 |
|
---|
| 1347 | FD_ZERO(&fds);
|
---|
| 1348 | FD_SET(fd, &fds);
|
---|
| 1349 | tv.tv_sec = REPLY_TIMEOUT;
|
---|
| 1350 | tv.tv_usec = 0;
|
---|
| 1351 | if (select(fd + 1, &fds, NULL, NULL, &tv) <= 0) {
|
---|
| 1352 | DPRINTF("Timeout\n");
|
---|
| 1353 |
|
---|
| 1354 | /* timed out, so retry send and receive,
|
---|
| 1355 | * to next nameserver on queue */
|
---|
| 1356 | goto again;
|
---|
| 1357 | }
|
---|
| 1358 |
|
---|
| 1359 | i = recv(fd, packet, 512, 0);
|
---|
| 1360 | if (i < HFIXEDSZ) {
|
---|
| 1361 | /* too short ! */
|
---|
| 1362 | goto again;
|
---|
| 1363 | }
|
---|
| 1364 |
|
---|
[502] | 1365 | /* ok because we have checked that recv at least HFIXEDSZ */
|
---|
[1] | 1366 | __decode_header(packet, &h);
|
---|
| 1367 |
|
---|
| 1368 | DPRINTF("id = %d, qr = %d\n", h.id, h.qr);
|
---|
| 1369 |
|
---|
[145] | 1370 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1371 | if ((h.id != id) || (!h.qr)) {
|
---|
[145] | 1372 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1373 | /* unsolicited */
|
---|
| 1374 | goto again;
|
---|
| 1375 | }
|
---|
[145] | 1376 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1377 |
|
---|
| 1378 |
|
---|
| 1379 | DPRINTF("Got response %s\n", "(i think)!");
|
---|
| 1380 | DPRINTF("qrcount=%d,ancount=%d,nscount=%d,arcount=%d\n",
|
---|
| 1381 | h.qdcount, h.ancount, h.nscount, h.arcount);
|
---|
| 1382 | DPRINTF("opcode=%d,aa=%d,tc=%d,rd=%d,ra=%d,rcode=%d\n",
|
---|
| 1383 | h.opcode, h.aa, h.tc, h.rd, h.ra, h.rcode);
|
---|
| 1384 |
|
---|
| 1385 | if ((h.rcode) || (h.ancount < 1)) {
|
---|
| 1386 | /* negative result, not present */
|
---|
| 1387 | goto again;
|
---|
| 1388 | }
|
---|
| 1389 |
|
---|
| 1390 | pos = HFIXEDSZ;
|
---|
| 1391 |
|
---|
| 1392 | for (j = 0; j < h.qdcount; j++) {
|
---|
| 1393 | DPRINTF("Skipping question %d at %d\n", j, pos);
|
---|
| 1394 | i = __length_question(packet, pos);
|
---|
| 1395 | DPRINTF("Length of question %d is %d\n", j, i);
|
---|
| 1396 | if (i < 0)
|
---|
| 1397 | goto again;
|
---|
| 1398 | pos += i;
|
---|
[502] | 1399 | if (pos >= PACKETSZ)
|
---|
| 1400 | goto again;
|
---|
[1] | 1401 | }
|
---|
| 1402 | DPRINTF("Decoding answer at pos %d\n", pos);
|
---|
| 1403 |
|
---|
| 1404 | for (j=0;j<h.ancount;j++)
|
---|
| 1405 | {
|
---|
| 1406 | i = __decode_answer(packet, pos, a);
|
---|
| 1407 |
|
---|
| 1408 | if (i<0) {
|
---|
| 1409 | DPRINTF("failed decode %d\n", i);
|
---|
| 1410 | goto again;
|
---|
| 1411 | }
|
---|
| 1412 | /* For all but T_SIG, accept first answer */
|
---|
| 1413 | if (a->atype != T_SIG)
|
---|
| 1414 | break;
|
---|
| 1415 |
|
---|
| 1416 | DPRINTF("skipping T_SIG %d\n", i);
|
---|
| 1417 | free(a->dotted);
|
---|
| 1418 | pos += i;
|
---|
[502] | 1419 | if (pos >= PACKETSZ)
|
---|
| 1420 | goto again;
|
---|
[1] | 1421 | }
|
---|
| 1422 |
|
---|
| 1423 | DPRINTF("Answer name = |%s|\n", a->dotted);
|
---|
| 1424 | DPRINTF("Answer type = |%d|\n", a->atype);
|
---|
| 1425 |
|
---|
[252] | 1426 | sl_close_fd(FIL__, __LINE__, fd);
|
---|
[1] | 1427 |
|
---|
| 1428 | if (outpacket)
|
---|
| 1429 | *outpacket = packet;
|
---|
| 1430 | else
|
---|
| 1431 | free(packet);
|
---|
| 1432 | free(lookup);
|
---|
| 1433 | return (0); /* success! */
|
---|
| 1434 |
|
---|
| 1435 | tryall:
|
---|
| 1436 | /* if there are other nameservers, give them a go,
|
---|
| 1437 | otherwise return with error */
|
---|
| 1438 | {
|
---|
| 1439 | int sdomains;
|
---|
| 1440 |
|
---|
[134] | 1441 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1442 | sdomains=__searchdomains;
|
---|
[134] | 1443 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1444 | variant = 0;
|
---|
| 1445 | if (retries >= nscount*(sdomains+1))
|
---|
| 1446 | goto fail;
|
---|
| 1447 | }
|
---|
| 1448 |
|
---|
| 1449 | again:
|
---|
| 1450 | /* if there are searchdomains, try them or fallback as passed */
|
---|
| 1451 | {
|
---|
| 1452 | int sdomains;
|
---|
[134] | 1453 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1454 | sdomains=__searchdomains;
|
---|
[134] | 1455 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1456 |
|
---|
| 1457 | if (variant < sdomains) {
|
---|
| 1458 | /* next search */
|
---|
| 1459 | variant++;
|
---|
| 1460 | } else {
|
---|
| 1461 | /* next server, first search */
|
---|
[145] | 1462 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1463 | ns = (ns + 1) % nscount;
|
---|
[145] | 1464 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1465 | variant = 0;
|
---|
| 1466 | }
|
---|
| 1467 | }
|
---|
| 1468 | }
|
---|
| 1469 |
|
---|
| 1470 | fail:
|
---|
| 1471 | if (fd != -1)
|
---|
[252] | 1472 | sl_close_fd(FIL__, __LINE__, fd);
|
---|
[1] | 1473 | if (lookup)
|
---|
| 1474 | free(lookup);
|
---|
| 1475 | if (packet)
|
---|
| 1476 | free(packet);
|
---|
| 1477 | return -1;
|
---|
| 1478 | }
|
---|
| 1479 |
|
---|
| 1480 | static void __open_etc_hosts(FILE **fp)
|
---|
| 1481 | {
|
---|
| 1482 | if ((*fp = fopen("/etc/hosts", "r")) == NULL) {
|
---|
| 1483 | *fp = fopen("/etc/config/hosts", "r");
|
---|
| 1484 | }
|
---|
[539] | 1485 | /* cppcheck-suppress resourceLeak */
|
---|
[1] | 1486 | return;
|
---|
| 1487 | }
|
---|
| 1488 |
|
---|
| 1489 | static int __read_etc_hosts_r(FILE * fp, const char * name, int type,
|
---|
| 1490 | enum etc_hosts_action action,
|
---|
| 1491 | struct hostent * result_buf,
|
---|
| 1492 | char * buf, size_t buflen,
|
---|
| 1493 | struct hostent ** result,
|
---|
| 1494 | int * h_errnop)
|
---|
| 1495 | {
|
---|
| 1496 | struct in_addr *in=NULL;
|
---|
| 1497 | struct in_addr **addr_list=NULL;
|
---|
| 1498 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1499 | struct in6_addr *in6=NULL;
|
---|
| 1500 | struct in6_addr **addr_list6=NULL;
|
---|
| 1501 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1502 | char *cp;
|
---|
| 1503 | char **alias;
|
---|
| 1504 | int aliases, i;
|
---|
| 1505 | int ret=HOST_NOT_FOUND;
|
---|
| 1506 |
|
---|
| 1507 | if (buflen < sizeof(char *)*(ALIAS_DIM))
|
---|
| 1508 | return ERANGE;
|
---|
| 1509 | alias=(char **)buf;
|
---|
| 1510 | buf+=sizeof(char **)*(ALIAS_DIM);
|
---|
| 1511 | buflen-=sizeof(char **)*(ALIAS_DIM);
|
---|
| 1512 |
|
---|
| 1513 | if (action!=GETHOSTENT) {
|
---|
| 1514 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1515 | char *p=buf;
|
---|
| 1516 | size_t len=buflen;
|
---|
| 1517 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1518 | *h_errnop=NETDB_INTERNAL;
|
---|
| 1519 | if (buflen < sizeof(*in))
|
---|
| 1520 | return ERANGE;
|
---|
| 1521 | in=(struct in_addr*)buf;
|
---|
| 1522 | buf+=sizeof(*in);
|
---|
| 1523 | buflen-=sizeof(*in);
|
---|
| 1524 |
|
---|
| 1525 | if (buflen < sizeof(*addr_list)*2)
|
---|
| 1526 | return ERANGE;
|
---|
| 1527 | addr_list=(struct in_addr **)buf;
|
---|
| 1528 | buf+=sizeof(*addr_list)*2;
|
---|
| 1529 | buflen-=sizeof(*addr_list)*2;
|
---|
| 1530 |
|
---|
| 1531 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1532 | if (len < sizeof(*in6))
|
---|
| 1533 | return ERANGE;
|
---|
| 1534 | in6=(struct in6_addr*)p;
|
---|
| 1535 | p+=sizeof(*in6);
|
---|
| 1536 | len-=sizeof(*in6);
|
---|
| 1537 |
|
---|
| 1538 | if (len < sizeof(*addr_list6)*2)
|
---|
| 1539 | return ERANGE;
|
---|
| 1540 | addr_list6=(struct in6_addr**)p;
|
---|
| 1541 | p+=sizeof(*addr_list6)*2;
|
---|
| 1542 | len-=sizeof(*addr_list6)*2;
|
---|
| 1543 |
|
---|
| 1544 | if (len < buflen) {
|
---|
| 1545 | buflen=len;
|
---|
| 1546 | buf=p;
|
---|
| 1547 | }
|
---|
| 1548 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1549 |
|
---|
| 1550 | if (buflen < 80)
|
---|
| 1551 | return ERANGE;
|
---|
| 1552 |
|
---|
| 1553 | __open_etc_hosts(&fp);
|
---|
| 1554 | if (fp == NULL) {
|
---|
| 1555 | result=NULL;
|
---|
| 1556 | return errno;
|
---|
| 1557 | }
|
---|
| 1558 | }
|
---|
| 1559 |
|
---|
| 1560 | *h_errnop=HOST_NOT_FOUND;
|
---|
[539] | 1561 | if (fp == NULL) {
|
---|
| 1562 | return ret;
|
---|
| 1563 | }
|
---|
[1] | 1564 | while (fgets(buf, buflen, fp)) {
|
---|
| 1565 | if ((cp = strchr(buf, '#')))
|
---|
| 1566 | *cp = '\0';
|
---|
| 1567 | DPRINTF("Looking at: %s\n", buf);
|
---|
| 1568 | aliases = 0;
|
---|
| 1569 |
|
---|
| 1570 | cp = buf;
|
---|
| 1571 | while (*cp) {
|
---|
| 1572 | while (*cp && isspace(*cp))
|
---|
| 1573 | *cp++ = '\0';
|
---|
| 1574 | if (!*cp)
|
---|
| 1575 | continue;
|
---|
| 1576 | if (aliases < (2+MAX_ALIASES))
|
---|
| 1577 | alias[aliases++] = cp;
|
---|
| 1578 | while (*cp && !isspace(*cp))
|
---|
| 1579 | cp++;
|
---|
| 1580 | }
|
---|
| 1581 | alias[aliases] = 0;
|
---|
| 1582 |
|
---|
| 1583 | if (aliases < 2)
|
---|
| 1584 | continue; /* syntax error really */
|
---|
| 1585 |
|
---|
| 1586 | if (action==GETHOSTENT) {
|
---|
| 1587 | /* Return whatever the next entry happens to be. */
|
---|
| 1588 | break;
|
---|
| 1589 | } else if (action==GET_HOSTS_BYADDR) {
|
---|
| 1590 | if (strcmp(name, alias[0]) != 0)
|
---|
| 1591 | continue;
|
---|
| 1592 | } else {
|
---|
| 1593 | /* GET_HOSTS_BYNAME */
|
---|
| 1594 | for (i = 1; i < aliases; i++)
|
---|
| 1595 | if (strcasecmp(name, alias[i]) == 0)
|
---|
| 1596 | break;
|
---|
| 1597 | if (i >= aliases)
|
---|
| 1598 | continue;
|
---|
| 1599 | }
|
---|
| 1600 |
|
---|
| 1601 | if (type == AF_INET && inet_pton(AF_INET, alias[0], in) > 0) {
|
---|
| 1602 | DPRINTF("Found INET\n");
|
---|
| 1603 | addr_list[0] = in;
|
---|
| 1604 | addr_list[1] = 0;
|
---|
| 1605 | result_buf->h_name = alias[1];
|
---|
| 1606 | result_buf->h_addrtype = AF_INET;
|
---|
| 1607 | result_buf->h_length = sizeof(*in);
|
---|
| 1608 | result_buf->h_addr_list = (char**) addr_list;
|
---|
| 1609 | result_buf->h_aliases = alias + 2;
|
---|
| 1610 | *result=result_buf;
|
---|
| 1611 | ret=NETDB_SUCCESS;
|
---|
| 1612 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1613 | } else if (type == AF_INET6 && inet_pton(AF_INET6, alias[0], in6) > 0) {
|
---|
| 1614 | DPRINTF("Found INET6\n");
|
---|
| 1615 | addr_list6[0] = in6;
|
---|
| 1616 | addr_list6[1] = 0;
|
---|
| 1617 | result_buf->h_name = alias[1];
|
---|
| 1618 | result_buf->h_addrtype = AF_INET6;
|
---|
| 1619 | result_buf->h_length = sizeof(*in6);
|
---|
| 1620 | result_buf->h_addr_list = (char**) addr_list6;
|
---|
| 1621 | result_buf->h_aliases = alias + 2;
|
---|
| 1622 | *result=result_buf;
|
---|
| 1623 | ret=NETDB_SUCCESS;
|
---|
| 1624 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1625 | } else {
|
---|
| 1626 | DPRINTF("Error\n");
|
---|
| 1627 | ret=TRY_AGAIN;
|
---|
| 1628 | break; /* bad ip address */
|
---|
| 1629 | }
|
---|
| 1630 |
|
---|
| 1631 | if (action!=GETHOSTENT) {
|
---|
[252] | 1632 | sl_fclose(FIL__, __LINE__, fp);
|
---|
[1] | 1633 | }
|
---|
| 1634 | return ret;
|
---|
| 1635 | }
|
---|
| 1636 | if (action!=GETHOSTENT) {
|
---|
[252] | 1637 | sl_fclose(FIL__, __LINE__, fp);
|
---|
[1] | 1638 | }
|
---|
| 1639 | return ret;
|
---|
| 1640 | }
|
---|
| 1641 |
|
---|
| 1642 | /*
|
---|
| 1643 | * we currently read formats not quite the same as that on normal
|
---|
| 1644 | * unix systems, we can have a list of nameservers after the keyword.
|
---|
| 1645 | */
|
---|
| 1646 | int __get_hosts_byname_r(const char * name, int type,
|
---|
| 1647 | struct hostent * result_buf,
|
---|
| 1648 | char * buf, size_t buflen,
|
---|
| 1649 | struct hostent ** result,
|
---|
| 1650 | int * h_errnop)
|
---|
| 1651 | {
|
---|
| 1652 | return(__read_etc_hosts_r(NULL, name, type, GET_HOSTS_BYNAME, result_buf, buf, buflen, result, h_errnop));
|
---|
| 1653 | }
|
---|
| 1654 |
|
---|
[170] | 1655 | static int __open_nameservers(void)
|
---|
[1] | 1656 | {
|
---|
| 1657 | FILE *fp;
|
---|
| 1658 | int i;
|
---|
| 1659 | #define RESOLV_ARGS 5
|
---|
| 1660 | char szBuffer[128], *p, *argv[RESOLV_ARGS];
|
---|
| 1661 | int argc;
|
---|
| 1662 |
|
---|
[134] | 1663 | SH_MUTEX_LOCK(resolv_lock);
|
---|
| 1664 | if (__nameservers > 0) {
|
---|
| 1665 | goto the_end;
|
---|
[1] | 1666 | }
|
---|
| 1667 |
|
---|
| 1668 | if ((fp = fopen("/etc/resolv.conf", "r")) ||
|
---|
| 1669 | (fp = fopen("/etc/config/resolv.conf", "r"))) {
|
---|
| 1670 |
|
---|
| 1671 | while (fgets(szBuffer, sizeof(szBuffer), fp) != NULL) {
|
---|
| 1672 |
|
---|
| 1673 | for (p = szBuffer; *p && isspace(*p); p++)
|
---|
| 1674 | /* skip white space */;
|
---|
| 1675 | if (*p == '\0' || *p == '\n' || *p == '#') /* skip comments etc */
|
---|
| 1676 | continue;
|
---|
| 1677 | argc = 0;
|
---|
| 1678 | while (*p && argc < RESOLV_ARGS) {
|
---|
| 1679 | argv[argc++] = p;
|
---|
| 1680 | while (*p && !isspace(*p) && *p != '\n')
|
---|
| 1681 | p++;
|
---|
| 1682 | while (*p && (isspace(*p) || *p == '\n')) /* remove spaces */
|
---|
| 1683 | *p++ = '\0';
|
---|
| 1684 | }
|
---|
| 1685 |
|
---|
| 1686 | if (strcmp(argv[0], "nameserver") == 0) {
|
---|
| 1687 | for (i = 1; i < argc && __nameservers < MAX_SERVERS; i++) {
|
---|
| 1688 | __nameserver[__nameservers++] = strdup(argv[i]);
|
---|
| 1689 | DPRINTF("adding nameserver %s\n", argv[i]);
|
---|
| 1690 | }
|
---|
| 1691 | }
|
---|
| 1692 |
|
---|
| 1693 | /* domain and search are mutually exclusive, the last one wins */
|
---|
| 1694 | if (strcmp(argv[0],"domain")==0 || strcmp(argv[0],"search")==0) {
|
---|
| 1695 | while (__searchdomains > 0) {
|
---|
| 1696 | free(__searchdomain[--__searchdomains]);
|
---|
| 1697 | __searchdomain[__searchdomains] = NULL;
|
---|
| 1698 | }
|
---|
| 1699 | for (i=1; i < argc && __searchdomains < MAX_SEARCH; i++) {
|
---|
| 1700 | __searchdomain[__searchdomains++] = strdup(argv[i]);
|
---|
| 1701 | DPRINTF("adding search %s\n", argv[i]);
|
---|
| 1702 | }
|
---|
| 1703 | }
|
---|
| 1704 | }
|
---|
[252] | 1705 | sl_fclose(FIL__, __LINE__, fp);
|
---|
[1] | 1706 | } else {
|
---|
| 1707 | DPRINTF("failed to open %s\n", "resolv.conf");
|
---|
| 1708 | }
|
---|
| 1709 | DPRINTF("nameservers = %d\n", __nameservers);
|
---|
[134] | 1710 | the_end:
|
---|
[150] | 1711 | ; /* 'label at end of compound statement' */
|
---|
[134] | 1712 | SH_MUTEX_UNLOCK(resolv_lock);
|
---|
[473] | 1713 | /* cppcheck-suppress resourceLeak */
|
---|
[1] | 1714 | return 0;
|
---|
| 1715 | }
|
---|
| 1716 |
|
---|
| 1717 | static int sh_gethostbyname_r(const char * name,
|
---|
| 1718 | struct hostent * result_buf,
|
---|
| 1719 | char * buf, size_t buflen,
|
---|
| 1720 | struct hostent ** result,
|
---|
| 1721 | int * h_errnop)
|
---|
| 1722 | {
|
---|
| 1723 | struct in_addr *in;
|
---|
| 1724 | struct in_addr **addr_list;
|
---|
| 1725 | unsigned char *packet;
|
---|
| 1726 | struct resolv_answer a;
|
---|
| 1727 | int i;
|
---|
| 1728 | int nest = 0;
|
---|
| 1729 | int __nameserversXX;
|
---|
| 1730 | char ** __nameserverXX;
|
---|
| 1731 |
|
---|
[533] | 1732 | DPRINTF("sh_gethostbyname_r: /%s/\n", name);
|
---|
[1] | 1733 | __open_nameservers();
|
---|
| 1734 |
|
---|
| 1735 | *result=NULL;
|
---|
| 1736 | if (!name)
|
---|
| 1737 | return EINVAL;
|
---|
| 1738 |
|
---|
| 1739 | /* do /etc/hosts first */
|
---|
| 1740 | if ((i=__get_hosts_byname_r(name, AF_INET, result_buf,
|
---|
| 1741 | buf, buflen, result, h_errnop))==0)
|
---|
| 1742 | return i;
|
---|
| 1743 | switch (*h_errnop) {
|
---|
| 1744 | case HOST_NOT_FOUND:
|
---|
| 1745 | case NO_ADDRESS:
|
---|
| 1746 | break;
|
---|
| 1747 | case NETDB_INTERNAL:
|
---|
| 1748 | if (errno == ENOENT) {
|
---|
| 1749 | break;
|
---|
| 1750 | }
|
---|
| 1751 | /* else fall through */
|
---|
| 1752 | default:
|
---|
| 1753 | return i;
|
---|
| 1754 | }
|
---|
| 1755 |
|
---|
| 1756 | DPRINTF("Nothing found in /etc/hosts\n");
|
---|
| 1757 |
|
---|
| 1758 | *h_errnop = NETDB_INTERNAL;
|
---|
| 1759 | if (buflen < sizeof(*in))
|
---|
| 1760 | return ERANGE;
|
---|
| 1761 | in=(struct in_addr*)buf;
|
---|
| 1762 | buf+=sizeof(*in);
|
---|
| 1763 | buflen-=sizeof(*in);
|
---|
| 1764 |
|
---|
| 1765 | if (buflen < sizeof(*addr_list)*2)
|
---|
| 1766 | return ERANGE;
|
---|
| 1767 | addr_list=(struct in_addr**)buf;
|
---|
| 1768 | buf+=sizeof(*addr_list)*2;
|
---|
| 1769 | buflen-=sizeof(*addr_list)*2;
|
---|
| 1770 |
|
---|
| 1771 | addr_list[0] = in;
|
---|
| 1772 | addr_list[1] = 0;
|
---|
| 1773 |
|
---|
| 1774 | if (buflen<256)
|
---|
| 1775 | return ERANGE;
|
---|
[552] | 1776 | strncpy(buf, name, buflen-1);
|
---|
[1] | 1777 |
|
---|
| 1778 | /* First check if this is already an address */
|
---|
| 1779 | if (inet_aton(name, in)) {
|
---|
| 1780 | result_buf->h_name = buf;
|
---|
| 1781 | result_buf->h_addrtype = AF_INET;
|
---|
| 1782 | result_buf->h_length = sizeof(*in);
|
---|
| 1783 | result_buf->h_addr_list = (char **) addr_list;
|
---|
| 1784 | *result=result_buf;
|
---|
| 1785 | *h_errnop = NETDB_SUCCESS;
|
---|
| 1786 | return NETDB_SUCCESS;
|
---|
| 1787 | }
|
---|
| 1788 |
|
---|
| 1789 | for (;;) {
|
---|
| 1790 |
|
---|
[134] | 1791 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1792 | __nameserversXX=__nameservers;
|
---|
| 1793 | __nameserverXX=__nameserver;
|
---|
[134] | 1794 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 1795 | i = __dns_lookup(buf, T_A, __nameserversXX, __nameserverXX, &packet, &a);
|
---|
| 1796 |
|
---|
| 1797 | if (i < 0) {
|
---|
| 1798 | *h_errnop = HOST_NOT_FOUND;
|
---|
| 1799 | DPRINTF("__dns_lookup\n");
|
---|
| 1800 | return TRY_AGAIN;
|
---|
| 1801 | }
|
---|
| 1802 |
|
---|
[552] | 1803 | strncpy(buf, a.dotted, buflen-1);
|
---|
[1] | 1804 | free(a.dotted);
|
---|
| 1805 |
|
---|
| 1806 | if (a.atype == T_CNAME) { /* CNAME */
|
---|
| 1807 | DPRINTF("Got a CNAME in gethostbyname()\n");
|
---|
| 1808 | i = __decode_dotted(packet, a.rdoffset, buf, buflen);
|
---|
| 1809 | free(packet);
|
---|
| 1810 |
|
---|
| 1811 | if (i < 0) {
|
---|
| 1812 | *h_errnop = NO_RECOVERY;
|
---|
| 1813 | DPRINTF("__decode_dotted\n");
|
---|
| 1814 | return -1;
|
---|
| 1815 | }
|
---|
| 1816 | if (++nest > MAX_RECURSE) {
|
---|
| 1817 | *h_errnop = NO_RECOVERY;
|
---|
| 1818 | DPRINTF("recursion\n");
|
---|
| 1819 | return -1;
|
---|
| 1820 | }
|
---|
| 1821 | continue;
|
---|
| 1822 | } else if (a.atype == T_A) { /* ADDRESS */
|
---|
| 1823 | memcpy(in, a.rdata, sizeof(*in));
|
---|
| 1824 | result_buf->h_name = buf;
|
---|
| 1825 | result_buf->h_addrtype = AF_INET;
|
---|
| 1826 | result_buf->h_length = sizeof(*in);
|
---|
| 1827 | result_buf->h_addr_list = (char **) addr_list;
|
---|
| 1828 | free(packet);
|
---|
| 1829 | break;
|
---|
| 1830 | } else {
|
---|
| 1831 | free(packet);
|
---|
| 1832 | *h_errnop=HOST_NOT_FOUND;
|
---|
[533] | 1833 | DPRINTF("host_not_found\n");
|
---|
[1] | 1834 | return TRY_AGAIN;
|
---|
| 1835 | }
|
---|
| 1836 | }
|
---|
| 1837 |
|
---|
| 1838 | *result=result_buf;
|
---|
| 1839 | *h_errnop = NETDB_SUCCESS;
|
---|
| 1840 | return NETDB_SUCCESS;
|
---|
| 1841 | }
|
---|
| 1842 |
|
---|
| 1843 | struct hostent * sh_gethostbyname(const char *name)
|
---|
| 1844 | {
|
---|
| 1845 | static struct hostent h;
|
---|
| 1846 | static char buf[sizeof(struct in_addr) +
|
---|
| 1847 | sizeof(struct in_addr *)*2 +
|
---|
| 1848 | sizeof(char *)*(ALIAS_DIM) + 256/*namebuffer*/ + 32/* margin */];
|
---|
| 1849 | struct hostent *hp;
|
---|
[533] | 1850 |
|
---|
| 1851 | DPRINTF("sh_gethostbyname: /%s/\n", name);
|
---|
[1] | 1852 | sh_gethostbyname_r(name, &h, buf, sizeof(buf), &hp, &h_errno);
|
---|
| 1853 | return hp;
|
---|
| 1854 | }
|
---|
| 1855 |
|
---|
| 1856 | static int __get_hosts_byaddr_r(const char * addr, int len, int type,
|
---|
| 1857 | struct hostent * result_buf,
|
---|
| 1858 | char * buf, size_t buflen,
|
---|
| 1859 | struct hostent ** result,
|
---|
| 1860 | int * h_errnop)
|
---|
| 1861 | {
|
---|
| 1862 | #ifndef __UCLIBC_HAS_IPV6__
|
---|
| 1863 | char ipaddr[INET_ADDRSTRLEN];
|
---|
| 1864 | #else
|
---|
| 1865 | char ipaddr[INET6_ADDRSTRLEN];
|
---|
| 1866 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1867 |
|
---|
| 1868 | switch (type) {
|
---|
| 1869 | case AF_INET:
|
---|
| 1870 | if (len != sizeof(struct in_addr))
|
---|
| 1871 | return 0;
|
---|
| 1872 | break;
|
---|
| 1873 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1874 | case AF_INET6:
|
---|
| 1875 | if (len != sizeof(struct in6_addr))
|
---|
| 1876 | return 0;
|
---|
| 1877 | break;
|
---|
| 1878 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1879 | default:
|
---|
| 1880 | return 0;
|
---|
| 1881 | }
|
---|
| 1882 |
|
---|
| 1883 | inet_ntop(type, addr, ipaddr, sizeof(ipaddr));
|
---|
| 1884 |
|
---|
| 1885 | return(__read_etc_hosts_r(NULL, ipaddr, type, GET_HOSTS_BYADDR,
|
---|
| 1886 | result_buf, buf, buflen, result, h_errnop));
|
---|
| 1887 | }
|
---|
| 1888 |
|
---|
| 1889 | static int sh_gethostbyaddr_r (const void *addr, socklen_t len, int type,
|
---|
| 1890 | struct hostent * result_buf,
|
---|
| 1891 | char * buf, size_t buflen,
|
---|
| 1892 | struct hostent ** result,
|
---|
| 1893 | int * h_errnop)
|
---|
| 1894 |
|
---|
| 1895 | {
|
---|
| 1896 | struct in_addr *in;
|
---|
| 1897 | struct in_addr **addr_list;
|
---|
| 1898 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1899 | char *qp;
|
---|
| 1900 | size_t plen;
|
---|
| 1901 | struct in6_addr *in6;
|
---|
| 1902 | struct in6_addr **addr_list6;
|
---|
| 1903 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1904 | unsigned char *packet;
|
---|
| 1905 | struct resolv_answer a;
|
---|
| 1906 | int i;
|
---|
| 1907 | int nest = 0;
|
---|
| 1908 | int __nameserversXX;
|
---|
| 1909 | char ** __nameserverXX;
|
---|
| 1910 |
|
---|
[533] | 1911 | DPRINTF("sh_gethostbyaddr_r called\n");
|
---|
[1] | 1912 | *result=NULL;
|
---|
| 1913 | if (!addr)
|
---|
| 1914 | return EINVAL;
|
---|
| 1915 |
|
---|
| 1916 | switch (type) {
|
---|
| 1917 | case AF_INET:
|
---|
| 1918 | if (len != sizeof(struct in_addr))
|
---|
| 1919 | return EINVAL;
|
---|
| 1920 | break;
|
---|
| 1921 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1922 | case AF_INET6:
|
---|
| 1923 | if (len != sizeof(struct in6_addr))
|
---|
| 1924 | return EINVAL;
|
---|
| 1925 | break;
|
---|
| 1926 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1927 | default:
|
---|
| 1928 | return EINVAL;
|
---|
| 1929 | }
|
---|
| 1930 |
|
---|
| 1931 | /* do /etc/hosts first */
|
---|
| 1932 | if ((i=__get_hosts_byaddr_r(addr, len, type, result_buf,
|
---|
| 1933 | buf, buflen, result, h_errnop))==0)
|
---|
| 1934 | return i;
|
---|
| 1935 | switch (*h_errnop) {
|
---|
| 1936 | case HOST_NOT_FOUND:
|
---|
| 1937 | case NO_ADDRESS:
|
---|
| 1938 | break;
|
---|
| 1939 | default:
|
---|
| 1940 | return i;
|
---|
| 1941 | }
|
---|
| 1942 |
|
---|
| 1943 | __open_nameservers();
|
---|
| 1944 |
|
---|
| 1945 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1946 | qp=buf;
|
---|
| 1947 | plen=buflen;
|
---|
| 1948 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1949 |
|
---|
| 1950 | *h_errnop = NETDB_INTERNAL;
|
---|
| 1951 | if (buflen < sizeof(*in))
|
---|
| 1952 | return ERANGE;
|
---|
| 1953 | in=(struct in_addr*)buf;
|
---|
| 1954 | buf+=sizeof(*in);
|
---|
| 1955 | buflen-=sizeof(*in);
|
---|
| 1956 |
|
---|
| 1957 | if (buflen < sizeof(*addr_list)*2)
|
---|
| 1958 | return ERANGE;
|
---|
| 1959 | addr_list=(struct in_addr**)buf;
|
---|
| 1960 | buf+=sizeof(*addr_list)*2;
|
---|
| 1961 | buflen-=sizeof(*addr_list)*2;
|
---|
| 1962 |
|
---|
| 1963 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1964 | if (plen < sizeof(*in6))
|
---|
| 1965 | return ERANGE;
|
---|
| 1966 | in6=(struct in6_addr*)qp;
|
---|
| 1967 | qp+=sizeof(*in6);
|
---|
| 1968 | plen-=sizeof(*in6);
|
---|
| 1969 |
|
---|
| 1970 | if (plen < sizeof(*addr_list6)*2)
|
---|
| 1971 | return ERANGE;
|
---|
| 1972 | addr_list6=(struct in6_addr**)qp;
|
---|
| 1973 | qp+=sizeof(*addr_list6)*2;
|
---|
| 1974 | plen-=sizeof(*addr_list6)*2;
|
---|
| 1975 |
|
---|
| 1976 | if (plen < buflen) {
|
---|
| 1977 | buflen=plen;
|
---|
| 1978 | buf=qp;
|
---|
| 1979 | }
|
---|
| 1980 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 1981 |
|
---|
| 1982 | if (buflen<256)
|
---|
| 1983 | return ERANGE;
|
---|
| 1984 |
|
---|
| 1985 | if(type == AF_INET) {
|
---|
[170] | 1986 | const unsigned char *tmp_addr = (const unsigned char *)addr;
|
---|
[1] | 1987 |
|
---|
| 1988 | memcpy(&in->s_addr, addr, len);
|
---|
| 1989 |
|
---|
| 1990 | addr_list[0] = in;
|
---|
| 1991 |
|
---|
| 1992 | sprintf(buf, "%u.%u.%u.%u.in-addr.arpa",
|
---|
| 1993 | tmp_addr[3], tmp_addr[2], tmp_addr[1], tmp_addr[0]);
|
---|
| 1994 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 1995 | } else {
|
---|
| 1996 | memcpy(in6->s6_addr, addr, len);
|
---|
| 1997 |
|
---|
| 1998 | addr_list6[0] = in6;
|
---|
| 1999 | qp = buf;
|
---|
| 2000 |
|
---|
| 2001 | for (i = len - 1; i >= 0; i--) {
|
---|
| 2002 | qp += sprintf(qp, "%x.%x.", in6->s6_addr[i] & 0xf,
|
---|
| 2003 | (in6->s6_addr[i] >> 4) & 0xf);
|
---|
| 2004 | }
|
---|
| 2005 | strcpy(qp, "ip6.int");
|
---|
| 2006 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 2007 | }
|
---|
| 2008 |
|
---|
| 2009 | addr_list[1] = 0;
|
---|
| 2010 |
|
---|
| 2011 | for (;;) {
|
---|
| 2012 |
|
---|
[134] | 2013 | SH_MUTEX_LOCK_UNSAFE(resolv_lock);
|
---|
[1] | 2014 | __nameserversXX=__nameservers;
|
---|
| 2015 | __nameserverXX=__nameserver;
|
---|
[134] | 2016 | SH_MUTEX_UNLOCK_UNSAFE(resolv_lock);
|
---|
[1] | 2017 | i = __dns_lookup(buf, T_PTR, __nameserversXX, __nameserverXX, &packet, &a);
|
---|
| 2018 |
|
---|
| 2019 | if (i < 0) {
|
---|
| 2020 | *h_errnop = HOST_NOT_FOUND;
|
---|
| 2021 | return TRY_AGAIN;
|
---|
| 2022 | }
|
---|
| 2023 |
|
---|
[552] | 2024 | strncpy(buf, a.dotted, buflen-1);
|
---|
[1] | 2025 | free(a.dotted);
|
---|
| 2026 |
|
---|
| 2027 | if (a.atype == T_CNAME) { /* CNAME */
|
---|
| 2028 | DPRINTF("Got a CNAME in gethostbyaddr()\n");
|
---|
| 2029 | i = __decode_dotted(packet, a.rdoffset, buf, buflen);
|
---|
| 2030 | free(packet);
|
---|
| 2031 |
|
---|
| 2032 | if (i < 0) {
|
---|
| 2033 | *h_errnop = NO_RECOVERY;
|
---|
| 2034 | return -1;
|
---|
| 2035 | }
|
---|
| 2036 | if (++nest > MAX_RECURSE) {
|
---|
| 2037 | *h_errnop = NO_RECOVERY;
|
---|
| 2038 | return -1;
|
---|
| 2039 | }
|
---|
| 2040 | continue;
|
---|
| 2041 | } else if (a.atype == T_PTR) { /* ADDRESS */
|
---|
| 2042 | i = __decode_dotted(packet, a.rdoffset, buf, buflen);
|
---|
| 2043 | free(packet);
|
---|
| 2044 |
|
---|
| 2045 | result_buf->h_name = buf;
|
---|
| 2046 | result_buf->h_addrtype = type;
|
---|
| 2047 |
|
---|
| 2048 | if(type == AF_INET) {
|
---|
| 2049 | result_buf->h_length = sizeof(*in);
|
---|
| 2050 | #ifdef __UCLIBC_HAS_IPV6__
|
---|
| 2051 | } else {
|
---|
| 2052 | result_buf->h_length = sizeof(*in6);
|
---|
| 2053 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 2054 | }
|
---|
| 2055 |
|
---|
| 2056 | result_buf->h_addr_list = (char **) addr_list;
|
---|
| 2057 | break;
|
---|
| 2058 | } else {
|
---|
| 2059 | free(packet);
|
---|
| 2060 | *h_errnop = NO_ADDRESS;
|
---|
| 2061 | return TRY_AGAIN;
|
---|
| 2062 | }
|
---|
| 2063 | }
|
---|
| 2064 |
|
---|
| 2065 | *result=result_buf;
|
---|
| 2066 | *h_errnop = NETDB_SUCCESS;
|
---|
| 2067 | return NETDB_SUCCESS;
|
---|
| 2068 | }
|
---|
| 2069 |
|
---|
| 2070 | struct hostent * sh_gethostbyaddr (const void *addr, socklen_t len, int type)
|
---|
| 2071 | {
|
---|
| 2072 | static struct hostent h;
|
---|
| 2073 | static char buf[
|
---|
| 2074 | #ifndef __UCLIBC_HAS_IPV6__
|
---|
| 2075 | sizeof(struct in_addr) + sizeof(struct in_addr *)*2 +
|
---|
| 2076 | #else
|
---|
| 2077 | sizeof(struct in6_addr) + sizeof(struct in6_addr *)*2 +
|
---|
| 2078 | #endif /* __UCLIBC_HAS_IPV6__ */
|
---|
| 2079 | sizeof(char *)*(ALIAS_DIM) + 256/*namebuffer*/ + 32/* margin */];
|
---|
| 2080 | struct hostent *hp;
|
---|
| 2081 |
|
---|
[533] | 2082 | DPRINTF("sh_gethostbyaddr called\n");
|
---|
[1] | 2083 | sh_gethostbyaddr_r(addr, len, type, &h, buf, sizeof(buf), &hp, &h_errno);
|
---|
| 2084 |
|
---|
| 2085 | return hp;
|
---|
| 2086 | }
|
---|
| 2087 |
|
---|
| 2088 | /* NEED_STATIC_LIBS */
|
---|
| 2089 | #else
|
---|
| 2090 |
|
---|
| 2091 | /* include something to avoid empty compilation unit */
|
---|
| 2092 | #include <stdio.h>
|
---|
| 2093 |
|
---|
| 2094 | #endif
|
---|
| 2095 |
|
---|