nscd/selinux.c

   1 /* SELinux access controls for nscd.
   2    Copyright (C) 2004, 2005, 2006, 2007 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Matthew Rickard <mjricka@epoch.ncsc.mil>, 2004.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Lesser General Public
   8    License as published by the Free Software Foundation; either
   9    version 2.1 of the License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Lesser General Public License for more details.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; if not, write to the Free
  18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19    02111-1307 USA.  */
  20
  21 #include "config.h"
  22 #include <error.h>
  23 #include <errno.h>
  24 #include <libintl.h>
  25 #include <pthread.h>
  26 #include <stdarg.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <syslog.h>
  30 #include <unistd.h>
  31 #include <sys/prctl.h>
  32 #include <selinux/av_permissions.h>
  33 #include <selinux/avc.h>
  34 #include <selinux/flask.h>
  35 #include <selinux/selinux.h>
  36 #ifdef HAVE_LIBAUDIT
  37 # include <libaudit.h>
  38 #endif
  39
  40 #include "dbg_log.h"
  41 #include "selinux.h"
  42
  43
  44 #ifdef HAVE_SELINUX
  45 /* Global variable to tell if the kernel has SELinux support.  */
  46 int selinux_enabled;
  47
  48 /* Define mappings of access vector permissions to request types.  */
  49 static const int perms[LASTREQ] =
  50 {
  51   [GETPWBYNAME] = NSCD__GETPWD,
  52   [GETPWBYUID] = NSCD__GETPWD,
  53   [GETGRBYNAME] = NSCD__GETGRP,
  54   [GETGRBYGID] = NSCD__GETGRP,
  55   [GETHOSTBYNAME] = NSCD__GETHOST,
  56   [GETHOSTBYNAMEv6] = NSCD__GETHOST,
  57   [GETHOSTBYADDR] = NSCD__GETHOST,
  58   [GETHOSTBYADDRv6] = NSCD__GETHOST,
  59   [GETSTAT] = NSCD__GETSTAT,
  60   [SHUTDOWN] = NSCD__ADMIN,
  61   [INVALIDATE] = NSCD__ADMIN,
  62   [GETFDPW] = NSCD__SHMEMPWD,
  63   [GETFDGR] = NSCD__SHMEMGRP,
  64   [GETFDHST] = NSCD__SHMEMHOST,
  65   [GETAI] = NSCD__GETHOST,
  66   [INITGROUPS] = NSCD__GETGRP,
  67 #ifdef NSCD__GETSERV
  68   [GETSERVBYNAME] = NSCD__GETSERV,
  69   [GETSERVBYPORT] = NSCD__GETSERV,
  70   [GETFDSERV] = NSCD__SHMEMSERV,
  71 #endif
  72 };
  73
  74 /* Store an entry ref to speed AVC decisions.  */
  75 static struct avc_entry_ref aeref;
  76
  77 /* Thread to listen for SELinux status changes via netlink.  */
  78 static pthread_t avc_notify_thread;
  79
  80 #ifdef HAVE_LIBAUDIT
  81 /* Prototype for supporting the audit daemon */
  82 static void log_callback (const char *fmt, ...);
  83 #endif
  84
  85 /* Prototypes for AVC callback functions.  */
  86 static void *avc_create_thread (void (*run) (void));
  87 static void avc_stop_thread (void *thread);
  88 static void *avc_alloc_lock (void);
  89 static void avc_get_lock (void *lock);
  90 static void avc_release_lock (void *lock);
  91 static void avc_free_lock (void *lock);
  92
  93 /* AVC callback structures for use in avc_init.  */
  94 static const struct avc_log_callback log_cb =
  95 {
  96 #ifdef HAVE_LIBAUDIT
  97   .func_log = log_callback,
  98 #else
  99   .func_log = dbg_log,
 100 #endif
 101   .func_audit = NULL
 102 };
 103 static const struct avc_thread_callback thread_cb =
 104 {
 105   .func_create_thread = avc_create_thread,
 106   .func_stop_thread = avc_stop_thread
 107 };
 108 static const struct avc_lock_callback lock_cb =
 109 {
 110   .func_alloc_lock = avc_alloc_lock,
 111   .func_get_lock = avc_get_lock,
 112   .func_release_lock = avc_release_lock,
 113   .func_free_lock = avc_free_lock
 114 };
 115
 116 #ifdef HAVE_LIBAUDIT
 117 /* The audit system's netlink socket descriptor */
 118 static int audit_fd = -1;
 119
 120 /* When an avc denial occurs, log it to audit system */
 121 static void
 122 log_callback (const char *fmt, ...)
 123 {
 124   if (audit_fd >= 0)
 125     {
 126       va_list ap;
 127       va_start (ap, fmt);
 128
 129       char *buf;
 130       int e = vasprintf (&buf, fmt, ap);
 131       if (e < 0)
 132         {
 133           buf = alloca (BUFSIZ);
 134           vsnprintf (buf, BUFSIZ, fmt, ap);
 135         }
 136
 137       /* FIXME: need to attribute this to real user, using getuid for now */
 138       audit_log_user_avc_message (audit_fd, AUDIT_USER_AVC, buf, NULL, NULL,
 139                                   NULL, getuid ());
 140
 141       if (e >= 0)
 142         free (buf);
 143
 144       va_end (ap);
 145     }
 146 }
 147
 148 /* Initialize the connection to the audit system */
 149 static void
 150 audit_init (void)
 151 {
 152   audit_fd = audit_open ();
 153   if (audit_fd < 0
 154       /* If kernel doesn't support audit, bail out */
 155       && errno != EINVAL && errno != EPROTONOSUPPORT && errno != EAFNOSUPPORT)
 156     dbg_log (_("Failed opening connection to the audit subsystem: %m"));
 157 }
 158
 159
 160 # ifdef HAVE_LIBCAP
 161 static const cap_value_t new_cap_list[] =
 162   { CAP_AUDIT_WRITE };
 163 #  define nnew_cap_list (sizeof (new_cap_list) / sizeof (new_cap_list[0]))
 164 static const cap_value_t tmp_cap_list[] =
 165   { CAP_AUDIT_WRITE, CAP_SETUID, CAP_SETGID };
 166 #  define ntmp_cap_list (sizeof (tmp_cap_list) / sizeof (tmp_cap_list[0]))
 167
 168 cap_t
 169 preserve_capabilities (void)
 170 {
 171   if (getuid () != 0)
 172     /* Not root, then we cannot preserve anything.  */
 173     return NULL;
 174
 175   if (prctl (PR_SET_KEEPCAPS, 1) == -1)
 176     {
 177       dbg_log (_("Failed to set keep-capabilities"));
 178       error (EXIT_FAILURE, errno, _("prctl(KEEPCAPS) failed"));
 179       /* NOTREACHED */
 180     }
 181
 182   cap_t tmp_caps = cap_init ();
 183   cap_t new_caps = NULL;
 184   if (tmp_caps != NULL)
 185     new_caps = cap_init ();
 186
 187   if (tmp_caps == NULL || new_caps == NULL)
 188     {
 189       if (tmp_caps != NULL)
 190         cap_free (tmp_caps);
 191
 192       dbg_log (_("Failed to initialize drop of capabilities"));
 193       error (EXIT_FAILURE, 0, _("cap_init failed"));
 194     }
 195
 196   /* There is no reason why these should not work.  */
 197   cap_set_flag (new_caps, CAP_PERMITTED, nnew_cap_list,
 198                 (cap_value_t *) new_cap_list, CAP_SET);
 199   cap_set_flag (new_caps, CAP_EFFECTIVE, nnew_cap_list,
 200                 (cap_value_t *) new_cap_list, CAP_SET);
 201
 202   cap_set_flag (tmp_caps, CAP_PERMITTED, ntmp_cap_list,
 203                 (cap_value_t *) tmp_cap_list, CAP_SET);
 204   cap_set_flag (tmp_caps, CAP_EFFECTIVE, ntmp_cap_list,
 205                 (cap_value_t *) tmp_cap_list, CAP_SET);
 206
 207   int res = cap_set_proc (tmp_caps);
 208
 209   cap_free (tmp_caps);
 210
 211   if (__builtin_expect (res != 0, 0))
 212     {
 213       cap_free (new_caps);
 214       dbg_log (_("Failed to drop capabilities"));
 215       error (EXIT_FAILURE, 0, _("cap_set_proc failed"));
 216     }
 217
 218   return new_caps;
 219 }
 220
 221 void
 222 install_real_capabilities (cap_t new_caps)
 223 {
 224   /* If we have no capabilities there is nothing to do here.  */
 225   if (new_caps == NULL)
 226     return;
 227
 228   if (cap_set_proc (new_caps))
 229     {
 230       cap_free (new_caps);
 231       dbg_log (_("Failed to drop capabilities"));
 232       error (EXIT_FAILURE, 0, _("cap_set_proc failed"));
 233       /* NOTREACHED */
 234     }
 235
 236   cap_free (new_caps);
 237
 238   if (prctl (PR_SET_KEEPCAPS, 0) == -1)
 239     {
 240       dbg_log (_("Failed to unset keep-capabilities"));
 241       error (EXIT_FAILURE, errno, _("prctl(KEEPCAPS) failed"));
 242       /* NOTREACHED */
 243     }
 244 }
 245 # endif /* HAVE_LIBCAP */
 246 #endif /* HAVE_LIBAUDIT */
 247
 248 /* Determine if we are running on an SELinux kernel. Set selinux_enabled
 249    to the result.  */
 250 void
 251 nscd_selinux_enabled (int *selinux_enabled)
 252 {
 253   *selinux_enabled = is_selinux_enabled ();
 254   if (*selinux_enabled < 0)
 255     {
 256       dbg_log (_("Failed to determine if kernel supports SELinux"));
 257       exit (EXIT_FAILURE);
 258     }
 259 }
 260
 261
 262 /* Create thread for AVC netlink notification.  */
 263 static void *
 264 avc_create_thread (void (*run) (void))
 265 {
 266   int rc;
 267
 268   rc =
 269     pthread_create (&avc_notify_thread, NULL, (void *(*) (void *)) run, NULL);
 270   if (rc != 0)
 271     error (EXIT_FAILURE, rc, _("Failed to start AVC thread"));
 272
 273   return &avc_notify_thread;
 274 }
 275
 276
 277 /* Stop AVC netlink thread.  */
 278 static void
 279 avc_stop_thread (void *thread)
 280 {
 281   pthread_cancel (*(pthread_t *) thread);
 282 }
 283
 284
 285 /* Allocate a new AVC lock.  */
 286 static void *
 287 avc_alloc_lock (void)
 288 {
 289   pthread_mutex_t *avc_mutex;
 290
 291   avc_mutex = malloc (sizeof (pthread_mutex_t));
 292   if (avc_mutex == NULL)
 293     error (EXIT_FAILURE, errno, _("Failed to create AVC lock"));
 294   pthread_mutex_init (avc_mutex, NULL);
 295
 296   return avc_mutex;
 297 }
 298
 299
 300 /* Acquire an AVC lock.  */
 301 static void
 302 avc_get_lock (void *lock)
 303 {
 304   pthread_mutex_lock (lock);
 305 }
 306
 307
 308 /* Release an AVC lock.  */
 309 static void
 310 avc_release_lock (void *lock)
 311 {
 312   pthread_mutex_unlock (lock);
 313 }
 314
 315
 316 /* Free an AVC lock.  */
 317 static void
 318 avc_free_lock (void *lock)
 319 {
 320   pthread_mutex_destroy (lock);
 321   free (lock);
 322 }
 323
 324
 325 /* Initialize the user space access vector cache (AVC) for NSCD along with
 326    log/thread/lock callbacks.  */
 327 void
 328 nscd_avc_init (void)
 329 {
 330   avc_entry_ref_init (&aeref);
 331
 332   if (avc_init ("avc", NULL, &log_cb, &thread_cb, &lock_cb) < 0)
 333     error (EXIT_FAILURE, errno, _("Failed to start AVC"));
 334   else
 335     dbg_log (_("Access Vector Cache (AVC) started"));
 336 #ifdef HAVE_LIBAUDIT
 337   audit_init ();
 338 #endif
 339 }
 340
 341
 342 /* Check the permission from the caller (via getpeercon) to nscd.
 343    Returns 0 if access is allowed, 1 if denied, and -1 on error.  */
 344 int
 345 nscd_request_avc_has_perm (int fd, request_type req)
 346 {
 347   /* Initialize to NULL so we know what to free in case of failure.  */
 348   security_context_t scon = NULL;
 349   security_context_t tcon = NULL;
 350   security_id_t ssid = NULL;
 351   security_id_t tsid = NULL;
 352   int rc = -1;
 353
 354   if (getpeercon (fd, &scon) < 0)
 355     {
 356       dbg_log (_("Error getting context of socket peer"));
 357       goto out;
 358     }
 359   if (getcon (&tcon) < 0)
 360     {
 361       dbg_log (_("Error getting context of nscd"));
 362       goto out;
 363     }
 364   if (avc_context_to_sid (scon, &ssid) < 0
 365       || avc_context_to_sid (tcon, &tsid) < 0)
 366     {
 367       dbg_log (_("Error getting sid from context"));
 368       goto out;
 369     }
 370
 371 #ifndef NSCD__GETSERV
 372   if (perms[req] == 0)
 373     {
 374       dbg_log (_("compile-time support for database policy missing"));
 375       goto out;
 376     }
 377 #endif
 378
 379   rc = avc_has_perm (ssid, tsid, SECCLASS_NSCD, perms[req], &aeref, NULL) < 0;
 380
 381 out:
 382   if (scon)
 383     freecon (scon);
 384   if (tcon)
 385     freecon (tcon);
 386   if (ssid)
 387     sidput (ssid);
 388   if (tsid)
 389     sidput (tsid);
 390
 391   return rc;
 392 }
 393
 394
 395 /* Wrapper to get AVC statistics.  */
 396 void
 397 nscd_avc_cache_stats (struct avc_cache_stats *cstats)
 398 {
 399   avc_cache_stats (cstats);
 400 }
 401
 402
 403 /* Print the AVC statistics to stdout.  */
 404 void
 405 nscd_avc_print_stats (struct avc_cache_stats *cstats)
 406 {
 407   printf (_("\nSELinux AVC Statistics:\n\n"
 408             "%15u  entry lookups\n"
 409             "%15u  entry hits\n"
 410             "%15u  entry misses\n"
 411             "%15u  entry discards\n"
 412             "%15u  CAV lookups\n"
 413             "%15u  CAV hits\n"
 414             "%15u  CAV probes\n"
 415             "%15u  CAV misses\n"),
 416           cstats->entry_lookups, cstats->entry_hits, cstats->entry_misses,
 417           cstats->entry_discards, cstats->cav_lookups, cstats->cav_hits,
 418           cstats->cav_probes, cstats->cav_misses);
 419 }
 420
 421
 422 /* Clean up the AVC before exiting.  */
 423 void
 424 nscd_avc_destroy (void)
 425 {
 426   avc_destroy ();
 427 #ifdef HAVE_LIBAUDIT
 428   audit_close (audit_fd);
 429 #endif
 430 }
 431
 432 #endif /* HAVE_SELINUX */