nonlocal-group.c

   1 /*
   2  * nonlocal-group.c
   3  * group database for nss_nonlocal proxy
   4  *
   5  * Copyright © 2007 Anders Kaseorg <andersk@mit.edu> and Tim Abbott
   6  * <tabbott@mit.edu>
   7  *
   8  * Permission is hereby granted, free of charge, to any person
   9  * obtaining a copy of this software and associated documentation
  10  * files (the "Software"), to deal in the Software without
  11  * restriction, including without limitation the rights to use, copy,
  12  * modify, merge, publish, distribute, sublicense, and/or sell copies
  13  * of the Software, and to permit persons to whom the Software is
  14  * furnished to do so, subject to the following conditions:
  15  *
  16  * The above copyright notice and this permission notice shall be
  17  * included in all copies or substantial portions of the Software.
  18  *
  19  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  20  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  21  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  22  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  23  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  24  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  25  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  26  * SOFTWARE.
  27  */
  28
  29 #define _GNU_SOURCE
  30 #include <sys/types.h>
  31 #include <unistd.h>
  32 #include <stdlib.h>
  33 #include <stdint.h>
  34 #include <string.h>
  35 #include <dlfcn.h>
  36 #include <stdio.h>
  37 #include <syslog.h>
  38 #include <errno.h>
  39 #include <grp.h>
  40 #include <nss.h>
  41 #include "nsswitch-internal.h"
  42 #include "nonlocal.h"
  43
  44 #define MAGIC_NONLOCAL_GROUPNAME "nss-nonlocal-users"
  45 #define MAGIC_LOCAL_GROUPNAME "nss-local-users"
  46
  47
  48 enum nss_status
  49 _nss_nonlocal_getgrnam_r(const char *name, struct group *grp,
  50                          char *buffer, size_t buflen, int *errnop);
  51
  52 enum nss_status
  53 _nss_nonlocal_getgrgid_r(gid_t gid, struct group *grp,
  54                          char *buffer, size_t buflen, int *errnop);
  55
  56
  57 static service_user *
  58 nss_group_nonlocal_database(void)
  59 {
  60     static service_user *nip = NULL;
  61     if (nip == NULL)
  62         __nss_database_lookup("group_nonlocal", NULL, "", &nip);
  63
  64     return nip;
  65 }
  66
  67
  68 enum nss_status
  69 check_nonlocal_gid(const char *user, gid_t gid, int *errnop)
  70 {
  71     static const char *fct_name = "getgrgid_r";
  72     static service_user *startp = NULL;
  73     static void *fct_start = NULL;
  74     enum nss_status status;
  75     service_user *nip;
  76     union {
  77         enum nss_status (*l)(gid_t gid, struct group *grp,
  78                              char *buffer, size_t buflen, int *errnop);
  79         void *ptr;
  80     } fct;
  81     struct group gbuf;
  82     int old_errno = errno;
  83
  84     size_t buflen = sysconf(_SC_GETGR_R_SIZE_MAX);
  85     char *buf = malloc(buflen);
  86     if (buf == NULL) {
  87         *errnop = ENOMEM;
  88         errno = old_errno;
  89         return NSS_STATUS_TRYAGAIN;
  90     }
  91
  92     if (fct_start == NULL &&
  93         __nss_group_lookup(&startp, fct_name, &fct_start) != 0) {
  94         free(buf);
  95         return NSS_STATUS_UNAVAIL;
  96     }
  97     nip = startp;
  98     fct.ptr = fct_start;
  99     do {
 100     morebuf:
 101         if (fct.l == _nss_nonlocal_getgrgid_r)
 102             status = NSS_STATUS_NOTFOUND;
 103         else
 104             status = DL_CALL_FCT(fct.l, (gid, &gbuf, buf, buflen, errnop));
 105         if (status == NSS_STATUS_TRYAGAIN && *errnop == ERANGE) {
 106             free(buf);
 107             buflen *= 2;
 108             buf = malloc(buflen);
 109             if (buf == NULL) {
 110                 *errnop = ENOMEM;
 111                 errno = old_errno;
 112                 return NSS_STATUS_TRYAGAIN;
 113             }
 114             goto morebuf;
 115         }
 116     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 117
 118     if (status == NSS_STATUS_SUCCESS) {
 119         syslog(LOG_WARNING, "nss_nonlocal: removing local group %u (%s) from non-local user %s\n", gbuf.gr_gid, gbuf.gr_name, user);
 120         status = NSS_STATUS_NOTFOUND;
 121     } else if (status != NSS_STATUS_TRYAGAIN) {
 122         status = NSS_STATUS_SUCCESS;
 123     }
 124
 125     free(buf);
 126     return status;
 127 }
 128
 129 enum nss_status
 130 check_nonlocal_group(const char *user, struct group *grp, int *errnop)
 131 {
 132     return check_nonlocal_gid(user, grp->gr_gid, errnop);
 133 }
 134
 135 enum nss_status
 136 get_local_group(const char *name, struct group *grp, char **buffer, int *errnop)
 137 {
 138     static const char *fct_name = "getgrnam_r";
 139     static service_user *startp = NULL;
 140     static void *fct_start = NULL;
 141     enum nss_status status;
 142     service_user *nip;
 143     union {
 144         enum nss_status (*l)(const char *name, struct group *grp,
 145                              char *buffer, size_t buflen, int *errnop);
 146         void *ptr;
 147     } fct;
 148     size_t buflen;
 149     int old_errno = errno;
 150
 151     buflen = sysconf(_SC_GETGR_R_SIZE_MAX);
 152     *buffer = malloc(buflen);
 153     if (*buffer == NULL) {
 154         *errnop = ENOMEM;
 155         errno = old_errno;
 156         return NSS_STATUS_TRYAGAIN;
 157     }
 158
 159     if (fct_start == NULL &&
 160         __nss_group_lookup(&startp, fct_name, &fct_start) != 0) {
 161         free(*buffer);
 162         *buffer = NULL;
 163         return NSS_STATUS_UNAVAIL;
 164     }
 165     nip = startp;
 166     fct.ptr = fct_start;
 167     do {
 168     morebuf:
 169         if (fct.l == _nss_nonlocal_getgrnam_r)
 170             status = NSS_STATUS_NOTFOUND;
 171         else
 172             status = DL_CALL_FCT(fct.l, (name, grp, *buffer, buflen, errnop));
 173         if (status == NSS_STATUS_TRYAGAIN && *errnop == ERANGE) {
 174             free(*buffer);
 175             buflen *= 2;
 176             *buffer = malloc(buflen);
 177             if (*buffer == NULL) {
 178                 *errnop = ENOMEM;
 179                 errno = old_errno;
 180                 return NSS_STATUS_TRYAGAIN;
 181             }
 182             goto morebuf;
 183         }
 184     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 185
 186     if (status != NSS_STATUS_SUCCESS) {
 187         free(*buffer);
 188         *buffer = NULL;
 189     }
 190
 191     return status;
 192 }
 193
 194 static service_user *grent_nip = NULL;
 195 static void *grent_fct_start;
 196 static union {
 197     enum nss_status (*l)(struct group *grp, char *buffer, size_t buflen,
 198                          int *errnop);
 199     void *ptr;
 200 } grent_fct;
 201 static const char *grent_fct_name = "getgrent_r";
 202
 203 enum nss_status
 204 _nss_nonlocal_setgrent(int stayopen)
 205 {
 206     static const char *fct_name = "setgrent";
 207     static void *fct_start = NULL;
 208     enum nss_status status;
 209     service_user *nip;
 210     union {
 211         enum nss_status (*l)(int stayopen);
 212         void *ptr;
 213     } fct;
 214
 215     nip = nss_group_nonlocal_database();
 216     if (nip == NULL)
 217         return NSS_STATUS_UNAVAIL;
 218     if (fct_start == NULL)
 219         fct_start = __nss_lookup_function(nip, fct_name);
 220     fct.ptr = fct_start;
 221     do {
 222         if (fct.ptr == NULL)
 223             status = NSS_STATUS_UNAVAIL;
 224         else
 225             status = DL_CALL_FCT(fct.l, (stayopen));
 226     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 227     if (status != NSS_STATUS_SUCCESS)
 228         return status;
 229
 230     grent_nip = nip;
 231     if (grent_fct_start == NULL)
 232         grent_fct_start = __nss_lookup_function(nip, grent_fct_name);
 233     grent_fct.ptr = grent_fct_start;
 234     return NSS_STATUS_SUCCESS;
 235 }
 236
 237 enum nss_status
 238 _nss_nonlocal_endgrent(void)
 239 {
 240     static const char *fct_name = "endgrent";
 241     static void *fct_start = NULL;
 242     enum nss_status status;
 243     service_user *nip;
 244     union {
 245         enum nss_status (*l)(void);
 246         void *ptr;
 247     } fct;
 248
 249     grent_nip = NULL;
 250
 251     nip = nss_group_nonlocal_database();
 252     if (nip == NULL)
 253         return NSS_STATUS_UNAVAIL;
 254     if (fct_start == NULL)
 255         fct_start = __nss_lookup_function(nip, fct_name);
 256     fct.ptr = fct_start;
 257     do {
 258         if (fct.ptr == NULL)
 259             status = NSS_STATUS_UNAVAIL;
 260         else
 261             status = DL_CALL_FCT(fct.l, ());
 262     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 263     return status;
 264 }
 265
 266 enum nss_status
 267 _nss_nonlocal_getgrent_r(struct group *grp, char *buffer, size_t buflen,
 268                          int *errnop)
 269 {
 270     enum nss_status status;
 271
 272     char *nonlocal_ignore = getenv(NONLOCAL_IGNORE_ENV);
 273     if (nonlocal_ignore != NULL && nonlocal_ignore[0] != '\0')
 274         return NSS_STATUS_UNAVAIL;
 275
 276     if (grent_nip == NULL) {
 277         status = _nss_nonlocal_setgrent(0);
 278         if (status != NSS_STATUS_SUCCESS)
 279             return status;
 280     }
 281     do {
 282         if (grent_fct.ptr == NULL)
 283             status = NSS_STATUS_UNAVAIL;
 284         else {
 285             int nonlocal_errno;
 286             do
 287                 status = DL_CALL_FCT(grent_fct.l, (grp, buffer, buflen, errnop));
 288             while (status == NSS_STATUS_SUCCESS &&
 289                    check_nonlocal_group("(unknown)", grp, &nonlocal_errno) != NSS_STATUS_SUCCESS);
 290         }
 291         if (status == NSS_STATUS_TRYAGAIN && *errnop == ERANGE)
 292             return status;
 293
 294         if (status == NSS_STATUS_SUCCESS)
 295             return NSS_STATUS_SUCCESS;
 296     } while (__nss_next(&grent_nip, grent_fct_name, &grent_fct.ptr, status, 0) == 0);
 297
 298     grent_nip = NULL;
 299     return NSS_STATUS_NOTFOUND;
 300 }
 301
 302
 303 enum nss_status
 304 _nss_nonlocal_getgrnam_r(const char *name, struct group *grp,
 305                          char *buffer, size_t buflen, int *errnop)
 306 {
 307     static const char *fct_name = "getgrnam_r";
 308     static void *fct_start = NULL;
 309     enum nss_status status;
 310     service_user *nip;
 311     union {
 312         enum nss_status (*l)(const char *name, struct group *grp,
 313                              char *buffer, size_t buflen, int *errnop);
 314         void *ptr;
 315     } fct;
 316
 317     char *nonlocal_ignore = getenv(NONLOCAL_IGNORE_ENV);
 318     if (nonlocal_ignore != NULL && nonlocal_ignore[0] != '\0')
 319         return NSS_STATUS_UNAVAIL;
 320
 321     nip = nss_group_nonlocal_database();
 322     if (nip == NULL)
 323         return NSS_STATUS_UNAVAIL;
 324     if (fct_start == NULL)
 325         fct_start = __nss_lookup_function(nip, fct_name);
 326     fct.ptr = fct_start;
 327     do {
 328         if (fct.ptr == NULL)
 329             status = NSS_STATUS_UNAVAIL;
 330         else
 331             status = DL_CALL_FCT(fct.l, (name, grp, buffer, buflen, errnop));
 332         if (status == NSS_STATUS_TRYAGAIN && *errnop == ERANGE)
 333             break;
 334     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 335     if (status != NSS_STATUS_SUCCESS)
 336         return status;
 337
 338     if (strcmp(name, grp->gr_name) != 0) {
 339         syslog(LOG_ERR, "nss_nonlocal: discarding group %s from lookup for group %s\n", grp->gr_name, name);
 340         return NSS_STATUS_NOTFOUND;
 341     }
 342
 343     return check_nonlocal_group(name, grp, errnop);
 344 }
 345
 346 enum nss_status
 347 _nss_nonlocal_getgrgid_r(gid_t gid, struct group *grp,
 348                          char *buffer, size_t buflen, int *errnop)
 349 {
 350     static const char *fct_name = "getgrgid_r";
 351     static void *fct_start = NULL;
 352     enum nss_status status;
 353     service_user *nip;
 354     union {
 355         enum nss_status (*l)(gid_t gid, struct group *grp,
 356                              char *buffer, size_t buflen, int *errnop);
 357         void *ptr;
 358     } fct;
 359
 360     char *nonlocal_ignore = getenv(NONLOCAL_IGNORE_ENV);
 361     if (nonlocal_ignore != NULL && nonlocal_ignore[0] != '\0')
 362         return NSS_STATUS_UNAVAIL;
 363
 364     nip = nss_group_nonlocal_database();
 365     if (nip == NULL)
 366         return NSS_STATUS_UNAVAIL;
 367     if (fct_start == NULL)
 368         fct_start = __nss_lookup_function(nip, fct_name);
 369     fct.ptr = fct_start;
 370     do {
 371         if (fct.ptr == NULL)
 372             status = NSS_STATUS_UNAVAIL;
 373         else
 374             status = DL_CALL_FCT(fct.l, (gid, grp, buffer, buflen, errnop));
 375         if (status == NSS_STATUS_TRYAGAIN && *errnop == ERANGE)
 376             break;
 377     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 378     if (status != NSS_STATUS_SUCCESS)
 379         return status;
 380
 381     return check_nonlocal_group(grp->gr_name, grp, errnop);
 382 }
 383
 384 enum nss_status
 385 _nss_nonlocal_initgroups_dyn(const char *user, gid_t group, long int *start,
 386                              long int *size, gid_t **groupsp, long int limit,
 387                              int *errnop)
 388 {
 389     static const char *fct_name = "initgroups_dyn";
 390     static void *fct_start = NULL;
 391     enum nss_status status;
 392     service_user *nip;
 393     union {
 394         enum nss_status (*l)(const char *user, gid_t group, long int *start,
 395                              long int *size, gid_t **groupsp, long int limit,
 396                              int *errnop);
 397         void *ptr;
 398     } fct;
 399
 400     struct group local_users_group, nonlocal_users_group;
 401     gid_t local_users_gid, gid;
 402     int is_local = 0;
 403     char *buffer;
 404     int old_errno;
 405     int in, out, i;
 406
 407     /* Check that the user is a nonlocal user before adding any groups. */
 408     status = check_nonlocal_user(user, errnop);
 409     if (status == NSS_STATUS_TRYAGAIN)
 410         return status;
 411     else if (status != NSS_STATUS_SUCCESS)
 412         is_local = 1;
 413
 414     old_errno = errno;
 415
 416     status = get_local_group(MAGIC_LOCAL_GROUPNAME,
 417                              &local_users_group, &buffer, errnop);
 418     if (status == NSS_STATUS_SUCCESS) {
 419         local_users_gid = local_users_group.gr_gid;
 420         free(buffer);
 421     } else if (status == NSS_STATUS_TRYAGAIN) {
 422         return status;
 423     } else {
 424         syslog(LOG_WARNING, "nss_nonlocal: Group %s does not exist locally!",
 425                MAGIC_LOCAL_GROUPNAME);
 426         local_users_gid = -1;
 427     }
 428
 429     if (is_local) {
 430         gid = local_users_gid;
 431     } else {
 432         status = get_local_group(MAGIC_NONLOCAL_GROUPNAME,
 433                                  &nonlocal_users_group, &buffer, errnop);
 434         if (status == NSS_STATUS_SUCCESS) {
 435             gid = nonlocal_users_group.gr_gid;
 436             free(buffer);
 437         } else if (status == NSS_STATUS_TRYAGAIN) {
 438             return status;
 439         } else {
 440             syslog(LOG_WARNING, "nss_nonlocal: Group %s does not exist locally!",
 441                    MAGIC_NONLOCAL_GROUPNAME);
 442             gid = -1;
 443         }
 444     }
 445
 446     if (gid != -1) {
 447         int i;
 448         for (i = 0; i < *start; ++i)
 449             if ((*groupsp)[i] == gid)
 450                 break;
 451         if (i >= *start) {
 452             if (*start + 1 > *size) {
 453                 gid_t *newgroups;
 454                 long int newsize = 2 * *size;
 455                 if (limit > 0) {
 456                     if (*size >= limit)
 457                         return NSS_STATUS_SUCCESS;
 458                     if (newsize > limit)
 459                         newsize = limit;
 460                 }
 461                 newgroups = realloc(*groupsp, newsize * sizeof((*groupsp)[0]));
 462                 if (newgroups == NULL) {
 463                     *errnop = ENOMEM;
 464                     errno = old_errno;
 465                     return NSS_STATUS_TRYAGAIN;
 466                 }
 467                 *groupsp = newgroups;
 468                 *size = newsize;
 469             }
 470             (*groupsp)[(*start)++] = gid;
 471         }
 472     }
 473
 474     if (is_local)
 475         return NSS_STATUS_SUCCESS;
 476
 477     in = out = *start;
 478
 479     nip = nss_group_nonlocal_database();
 480     if (nip == NULL)
 481         return NSS_STATUS_UNAVAIL;
 482     if (fct_start == NULL)
 483         fct_start = __nss_lookup_function(nip, fct_name);
 484     fct.ptr = fct_start;
 485
 486     do {
 487         if (fct.ptr == NULL)
 488             status = NSS_STATUS_UNAVAIL;
 489         else
 490             status = DL_CALL_FCT(fct.l, (user, group, start, size, groupsp, limit, errnop));
 491         if (status == NSS_STATUS_TRYAGAIN && *errnop == ERANGE)
 492             break;
 493     } while (__nss_next(&nip, fct_name, &fct.ptr, status, 0) == 0);
 494     if (status != NSS_STATUS_SUCCESS)
 495         return status;
 496
 497     for (; in < *start; ++in) {
 498         int nonlocal_errno = *errnop;
 499
 500         for (i = 0; i < out; ++i)
 501             if ((*groupsp)[i] == (*groupsp)[in])
 502                 break;
 503         if (i < out)
 504             continue;
 505
 506         /* Don't let users get into MAGIC_LOCAL_GROUPNAME from nonlocal reasons. */
 507         if (local_users_gid == (*groupsp)[in]) {
 508             syslog(LOG_WARNING, "nss_nonlocal: Nonlocal user %s removed from special local users group %s",
 509                    user, MAGIC_LOCAL_GROUPNAME);
 510             continue;
 511         }
 512
 513         status = check_nonlocal_gid(user, (*groupsp)[in], &nonlocal_errno);
 514         if (status == NSS_STATUS_SUCCESS) {
 515             (*groupsp)[out++] = (*groupsp)[in];
 516         } else if (status == NSS_STATUS_TRYAGAIN) {
 517             *start = out;
 518             *errnop = nonlocal_errno;
 519             return status;
 520         }
 521     }
 522
 523     *start = out;
 524     return NSS_STATUS_SUCCESS;
 525 }