bus/selinux.c

   1 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*-
   2  * selinux.c  SELinux security checks for D-Bus
   3  *
   4  * Author: Matthew Rickard <mjricka@epoch.ncsc.mil>
   5  *
   6  * Licensed under the Academic Free License version 2.1
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  21  *
  22  */
  23
  24 #include <config.h>
  25 #include <dbus/dbus-internals.h>
  26 #include <dbus/dbus-string.h>
  27 #ifndef DBUS_WIN
  28 #include <dbus/dbus-userdb.h>
  29 #endif
  30 #include "selinux.h"
  31 #include "audit.h"
  32 #include "services.h"
  33 #include "policy.h"
  34 #include "utils.h"
  35 #include "config-parser.h"
  36
  37 #ifdef HAVE_ERRNO_H
  38 #include <errno.h>
  39 #endif
  40 #ifdef HAVE_SELINUX
  41 #include <sys/types.h>
  42 #include <unistd.h>
  43 #include <limits.h>
  44 #include <pthread.h>
  45 #include <syslog.h>
  46 #include <selinux/selinux.h>
  47 #include <selinux/avc.h>
  48 #include <signal.h>
  49 #include <stdarg.h>
  50 #include <stdio.h>
  51 #include <grp.h>
  52 #endif /* HAVE_SELINUX */
  53 #ifdef HAVE_LIBAUDIT
  54 #include <libaudit.h>
  55 #endif /* HAVE_LIBAUDIT */
  56
  57 #define BUS_SID_FROM_SELINUX(sid)  ((BusSELinuxID*) (sid))
  58 #define SELINUX_SID_FROM_BUS(sid)  ((security_id_t) (sid))
  59
  60 #ifdef HAVE_SELINUX
  61 /* Store the value telling us if SELinux is enabled in the kernel. */
  62 static dbus_bool_t selinux_enabled = FALSE;
  63
  64 /* Store an avc_entry_ref to speed AVC decisions. */
  65 static struct avc_entry_ref aeref;
  66
  67 /* Store the SID of the bus itself to use as the default. */
  68 static security_id_t bus_sid = SECSID_WILD;
  69
  70 /* Thread to listen for SELinux status changes via netlink. */
  71 static pthread_t avc_notify_thread;
  72
  73 /* Prototypes for AVC callback functions.  */
  74 static void log_callback (const char *fmt, ...);
  75 static void log_audit_callback (void *data, security_class_t class, char *buf, size_t bufleft);
  76 static void *avc_create_thread (void (*run) (void));
  77 static void avc_stop_thread (void *thread);
  78 static void *avc_alloc_lock (void);
  79 static void avc_get_lock (void *lock);
  80 static void avc_release_lock (void *lock);
  81 static void avc_free_lock (void *lock);
  82
  83 /* AVC callback structures for use in avc_init.  */
  84 static const struct avc_memory_callback mem_cb =
  85 {
  86   .func_malloc = dbus_malloc,
  87   .func_free = dbus_free
  88 };
  89 static const struct avc_log_callback log_cb =
  90 {
  91   .func_log = log_callback,
  92   .func_audit = log_audit_callback
  93 };
  94 static const struct avc_thread_callback thread_cb =
  95 {
  96   .func_create_thread = avc_create_thread,
  97   .func_stop_thread = avc_stop_thread
  98 };
  99 static const struct avc_lock_callback lock_cb =
 100 {
 101   .func_alloc_lock = avc_alloc_lock,
 102   .func_get_lock = avc_get_lock,
 103   .func_release_lock = avc_release_lock,
 104   .func_free_lock = avc_free_lock
 105 };
 106 #endif /* HAVE_SELINUX */
 107
 108 /**
 109  * Log callback to log denial messages from the AVC.
 110  * This is used in avc_init.  Logs to both standard
 111  * error and syslogd.
 112  *
 113  * @param fmt the format string
 114  * @param variable argument list
 115  */
 116 #ifdef HAVE_SELINUX
 117
 118 static void
 119 log_callback (const char *fmt, ...)
 120 {
 121   va_list ap;
 122 #ifdef HAVE_LIBAUDIT
 123   int audit_fd;
 124 #endif
 125
 126   va_start(ap, fmt);
 127
 128 #ifdef HAVE_LIBAUDIT
 129   audit_fd = bus_audit_get_fd ();
 130
 131   if (audit_fd >= 0)
 132   {
 133     /* This should really be a DBusString, but DBusString allocates
 134      * memory dynamically; before switching it, we need to check with
 135      * SELinux people that it would be OK for this to fall back to
 136      * syslog if OOM, like the equivalent AppArmor code does. */
 137     char buf[PATH_MAX*2];
 138
 139     /* FIXME: need to change this to show real user */
 140     vsnprintf(buf, sizeof(buf), fmt, ap);
 141     audit_log_user_avc_message(audit_fd, AUDIT_USER_AVC, buf, NULL, NULL,
 142                              NULL, getuid());
 143     goto out;
 144   }
 145 #endif /* HAVE_LIBAUDIT */
 146
 147   vsyslog (LOG_USER | LOG_INFO, fmt, ap);
 148
 149 out:
 150   va_end(ap);
 151 }
 152
 153 /**
 154  * On a policy reload we need to reparse the SELinux configuration file, since
 155  * this could have changed.  Send a SIGHUP to reload all configs.
 156  */
 157 static int
 158 policy_reload_callback (u_int32_t event, security_id_t ssid,
 159                         security_id_t tsid, security_class_t tclass,
 160                         access_vector_t perms, access_vector_t *out_retained)
 161 {
 162   if (event == AVC_CALLBACK_RESET)
 163     return raise (SIGHUP);
 164
 165   return 0;
 166 }
 167
 168 /**
 169  * Log any auxiliary data
 170  */
 171 static void
 172 log_audit_callback (void *data, security_class_t class, char *buf, size_t bufleft)
 173 {
 174   DBusString *audmsg = data;
 175
 176   if (bufleft > (size_t) _dbus_string_get_length(audmsg))
 177     {
 178       _dbus_string_copy_to_buffer_with_nul (audmsg, buf, bufleft);
 179     }
 180   else
 181     {
 182       DBusString s;
 183
 184       _dbus_string_init_const(&s, "Buffer too small for audit message");
 185
 186       if (bufleft > (size_t) _dbus_string_get_length(&s))
 187         _dbus_string_copy_to_buffer_with_nul (&s, buf, bufleft);
 188     }
 189 }
 190
 191 /**
 192  * Create thread to notify the AVC of enforcing and policy reload
 193  * changes via netlink.
 194  *
 195  * @param run the thread run function
 196  * @return pointer to the thread
 197  */
 198 static void *
 199 avc_create_thread (void (*run) (void))
 200 {
 201   int rc;
 202
 203   rc = pthread_create (&avc_notify_thread, NULL, (void *(*) (void *)) run, NULL);
 204   if (rc != 0)
 205     {
 206       _dbus_warn ("Failed to start AVC thread: %s\n", _dbus_strerror (rc));
 207       exit (1);
 208     }
 209   return &avc_notify_thread;
 210 }
 211
 212 /* Stop AVC netlink thread.  */
 213 static void
 214 avc_stop_thread (void *thread)
 215 {
 216   pthread_cancel (*(pthread_t *) thread);
 217 }
 218
 219 /* Allocate a new AVC lock.  */
 220 static void *
 221 avc_alloc_lock (void)
 222 {
 223   pthread_mutex_t *avc_mutex;
 224
 225   avc_mutex = dbus_new (pthread_mutex_t, 1);
 226   if (avc_mutex == NULL)
 227     {
 228       _dbus_warn ("Could not create mutex: %s\n", _dbus_strerror (errno));
 229       exit (1);
 230     }
 231   pthread_mutex_init (avc_mutex, NULL);
 232
 233   return avc_mutex;
 234 }
 235
 236 /* Acquire an AVC lock.  */
 237 static void
 238 avc_get_lock (void *lock)
 239 {
 240   pthread_mutex_lock (lock);
 241 }
 242
 243 /* Release an AVC lock.  */
 244 static void
 245 avc_release_lock (void *lock)
 246 {
 247   pthread_mutex_unlock (lock);
 248 }
 249
 250 /* Free an AVC lock.  */
 251 static void
 252 avc_free_lock (void *lock)
 253 {
 254   pthread_mutex_destroy (lock);
 255   dbus_free (lock);
 256 }
 257 #endif /* HAVE_SELINUX */
 258
 259 /**
 260  * Return whether or not SELinux is enabled; must be
 261  * called after bus_selinux_init.
 262  */
 263 dbus_bool_t
 264 bus_selinux_enabled (void)
 265 {
 266 #ifdef HAVE_SELINUX
 267   return selinux_enabled;
 268 #else
 269   return FALSE;
 270 #endif /* HAVE_SELINUX */
 271 }
 272
 273 /**
 274  * Do early initialization; determine whether SELinux is enabled.
 275  */
 276 dbus_bool_t
 277 bus_selinux_pre_init (void)
 278 {
 279 #ifdef HAVE_SELINUX
 280   int r;
 281   _dbus_assert (bus_sid == SECSID_WILD);
 282
 283   /* Determine if we are running an SELinux kernel. */
 284   r = is_selinux_enabled ();
 285   if (r < 0)
 286     {
 287       _dbus_warn ("Could not tell if SELinux is enabled: %s\n",
 288                   _dbus_strerror (errno));
 289       return FALSE;
 290     }
 291
 292   selinux_enabled = r != 0;
 293   return TRUE;
 294 #else
 295   return TRUE;
 296 #endif
 297 }
 298
 299 /*
 300  * Private Flask definitions; the order of these constants must
 301  * exactly match that of the structure array below!
 302  */
 303 /* security dbus class constants */
 304 #define SECCLASS_DBUS       1
 305
 306 /* dbus's per access vector constants */
 307 #define DBUS__ACQUIRE_SVC   1
 308 #define DBUS__SEND_MSG      2
 309
 310 #ifdef HAVE_SELINUX
 311 static struct security_class_mapping dbus_map[] = {
 312   { "dbus", { "acquire_svc", "send_msg", NULL } },
 313   { NULL }
 314 };
 315 #endif /* HAVE_SELINUX */
 316
 317 /**
 318  * Establish dynamic object class and permission mapping and
 319  * initialize the user space access vector cache (AVC) for D-Bus and set up
 320  * logging callbacks.
 321  */
 322 dbus_bool_t
 323 bus_selinux_full_init (void)
 324 {
 325 #ifdef HAVE_SELINUX
 326   char *bus_context;
 327
 328   _dbus_assert (bus_sid == SECSID_WILD);
 329
 330   if (!selinux_enabled)
 331     {
 332       _dbus_verbose ("SELinux not enabled in this kernel.\n");
 333       return TRUE;
 334     }
 335
 336   _dbus_verbose ("SELinux is enabled in this kernel.\n");
 337
 338   if (selinux_set_mapping (dbus_map) < 0)
 339     {
 340       _dbus_warn ("Failed to set up security class mapping (selinux_set_mapping():%s).\n",
 341                    strerror (errno));
 342       return FALSE;
 343     }
 344
 345   avc_entry_ref_init (&aeref);
 346   if (avc_init ("avc", &mem_cb, &log_cb, &thread_cb, &lock_cb) < 0)
 347     {
 348       _dbus_warn ("Failed to start Access Vector Cache (AVC).\n");
 349       return FALSE;
 350     }
 351   else
 352     {
 353       _dbus_verbose ("Access Vector Cache (AVC) started.\n");
 354     }
 355
 356   if (avc_add_callback (policy_reload_callback, AVC_CALLBACK_RESET,
 357                        NULL, NULL, 0, 0) < 0)
 358     {
 359       _dbus_warn ("Failed to add policy reload callback: %s\n",
 360                   _dbus_strerror (errno));
 361       avc_destroy ();
 362       return FALSE;
 363     }
 364
 365   bus_context = NULL;
 366   bus_sid = SECSID_WILD;
 367
 368   if (getcon (&bus_context) < 0)
 369     {
 370       _dbus_verbose ("Error getting context of bus: %s\n",
 371                      _dbus_strerror (errno));
 372       return FALSE;
 373     }
 374
 375   if (avc_context_to_sid (bus_context, &bus_sid) < 0)
 376     {
 377       _dbus_verbose ("Error getting SID from bus context: %s\n",
 378                      _dbus_strerror (errno));
 379       freecon (bus_context);
 380       return FALSE;
 381     }
 382
 383   freecon (bus_context);
 384
 385 #endif /* HAVE_SELINUX */
 386   return TRUE;
 387 }
 388
 389 /**
 390  * Decrement SID reference count.
 391  *
 392  * @param sid the SID to decrement
 393  */
 394 void
 395 bus_selinux_id_unref (BusSELinuxID *sid)
 396 {
 397 #ifdef HAVE_SELINUX
 398   if (!selinux_enabled)
 399     return;
 400
 401   _dbus_assert (sid != NULL);
 402
 403   sidput (SELINUX_SID_FROM_BUS (sid));
 404 #endif /* HAVE_SELINUX */
 405 }
 406
 407 void
 408 bus_selinux_id_ref (BusSELinuxID *sid)
 409 {
 410 #ifdef HAVE_SELINUX
 411   if (!selinux_enabled)
 412     return;
 413
 414   _dbus_assert (sid != NULL);
 415
 416   sidget (SELINUX_SID_FROM_BUS (sid));
 417 #endif /* HAVE_SELINUX */
 418 }
 419
 420 /**
 421  * Determine if the SELinux security policy allows the given sender
 422  * security context to go to the given recipient security context.
 423  * This function determines if the requested permissions are to be
 424  * granted from the connection to the message bus or to another
 425  * optionally supplied security identifier (e.g. for a service
 426  * context).  Currently these permissions are either send_msg or
 427  * acquire_svc in the dbus class.
 428  *
 429  * @param sender_sid source security context
 430  * @param override_sid is the target security context.  If SECSID_WILD this will
 431  *        use the context of the bus itself (e.g. the default).
 432  * @param target_class is the target security class.
 433  * @param requested is the requested permissions.
 434  * @returns #TRUE if security policy allows the send.
 435  */
 436 #ifdef HAVE_SELINUX
 437 static dbus_bool_t
 438 bus_selinux_check (BusSELinuxID        *sender_sid,
 439                    BusSELinuxID        *override_sid,
 440                    security_class_t     target_class,
 441                    access_vector_t      requested,
 442                    DBusString          *auxdata)
 443 {
 444   if (!selinux_enabled)
 445     return TRUE;
 446
 447   /* Make the security check.  AVC checks enforcing mode here as well. */
 448   if (avc_has_perm (SELINUX_SID_FROM_BUS (sender_sid),
 449                     override_sid ?
 450                     SELINUX_SID_FROM_BUS (override_sid) :
 451                     SELINUX_SID_FROM_BUS (bus_sid),
 452                     target_class, requested, &aeref, auxdata) < 0)
 453     {
 454     switch (errno)
 455       {
 456       case EACCES:
 457         _dbus_verbose ("SELinux denying due to security policy.\n");
 458         return FALSE;
 459       case EINVAL:
 460         _dbus_verbose ("SELinux denying due to invalid security context.\n");
 461         return FALSE;
 462       default:
 463         _dbus_verbose ("SELinux denying due to: %s\n", _dbus_strerror (errno));
 464         return FALSE;
 465       }
 466     }
 467   else
 468     return TRUE;
 469 }
 470 #endif /* HAVE_SELINUX */
 471
 472 /**
 473  * Returns true if the given connection can acquire a service,
 474  * assuming the given security ID is needed for that service.
 475  *
 476  * @param connection connection that wants to own the service
 477  * @param service_sid the SID of the service from the table
 478  * @returns #TRUE if acquire is permitted.
 479  */
 480 dbus_bool_t
 481 bus_selinux_allows_acquire_service (DBusConnection     *connection,
 482                                     BusSELinuxID       *service_sid,
 483                                     const char         *service_name,
 484                                     DBusError          *error)
 485 {
 486 #ifdef HAVE_SELINUX
 487   BusSELinuxID *connection_sid;
 488   unsigned long spid;
 489   DBusString auxdata;
 490   dbus_bool_t ret;
 491
 492   if (!selinux_enabled)
 493     return TRUE;
 494
 495   connection_sid = bus_connection_get_selinux_id (connection);
 496   if (!dbus_connection_get_unix_process_id (connection, &spid))
 497     spid = 0;
 498
 499   if (!_dbus_string_init (&auxdata))
 500     goto oom;
 501
 502   if (!_dbus_string_append (&auxdata, "service="))
 503     goto oom;
 504
 505   if (!_dbus_string_append (&auxdata, service_name))
 506     goto oom;
 507
 508   if (spid)
 509     {
 510       if (!_dbus_string_append (&auxdata, " spid="))
 511         goto oom;
 512
 513       if (!_dbus_string_append_uint (&auxdata, spid))
 514         goto oom;
 515     }
 516
 517   ret = bus_selinux_check (connection_sid,
 518                            service_sid,
 519                            SECCLASS_DBUS,
 520                            DBUS__ACQUIRE_SVC,
 521                            &auxdata);
 522
 523   _dbus_string_free (&auxdata);
 524   return ret;
 525
 526  oom:
 527   _dbus_string_free (&auxdata);
 528   BUS_SET_OOM (error);
 529   return FALSE;
 530
 531 #else
 532   return TRUE;
 533 #endif /* HAVE_SELINUX */
 534 }
 535
 536 /**
 537  * Check if SELinux security controls allow the message to be sent to a
 538  * particular connection based on the security context of the sender and
 539  * that of the receiver. The destination connection need not be the
 540  * addressed recipient, it could be an "eavesdropper"
 541  *
 542  * @param sender the sender of the message.
 543  * @param proposed_recipient the connection the message is to be sent to.
 544  * @returns whether to allow the send
 545  */
 546 dbus_bool_t
 547 bus_selinux_allows_send (DBusConnection     *sender,
 548                          DBusConnection     *proposed_recipient,
 549                          const char         *msgtype,
 550                          const char         *interface,
 551                          const char         *member,
 552                          const char         *error_name,
 553                          const char         *destination,
 554                          DBusError          *error)
 555 {
 556 #ifdef HAVE_SELINUX
 557   BusSELinuxID *recipient_sid;
 558   BusSELinuxID *sender_sid;
 559   unsigned long spid, tpid;
 560   DBusString auxdata;
 561   dbus_bool_t ret;
 562   dbus_bool_t string_alloced;
 563
 564   if (!selinux_enabled)
 565     return TRUE;
 566
 567   if (!sender || !dbus_connection_get_unix_process_id (sender, &spid))
 568     spid = 0;
 569   if (!proposed_recipient || !dbus_connection_get_unix_process_id (proposed_recipient, &tpid))
 570     tpid = 0;
 571
 572   string_alloced = FALSE;
 573   if (!_dbus_string_init (&auxdata))
 574     goto oom;
 575   string_alloced = TRUE;
 576
 577   if (!_dbus_string_append (&auxdata, "msgtype="))
 578     goto oom;
 579
 580   if (!_dbus_string_append (&auxdata, msgtype))
 581     goto oom;
 582
 583   if (interface)
 584     {
 585       if (!_dbus_string_append (&auxdata, " interface="))
 586         goto oom;
 587       if (!_dbus_string_append (&auxdata, interface))
 588         goto oom;
 589     }
 590
 591   if (member)
 592     {
 593       if (!_dbus_string_append (&auxdata, " member="))
 594         goto oom;
 595       if (!_dbus_string_append (&auxdata, member))
 596         goto oom;
 597     }
 598
 599   if (error_name)
 600     {
 601       if (!_dbus_string_append (&auxdata, " error_name="))
 602         goto oom;
 603       if (!_dbus_string_append (&auxdata, error_name))
 604         goto oom;
 605     }
 606
 607   if (destination)
 608     {
 609       if (!_dbus_string_append (&auxdata, " dest="))
 610         goto oom;
 611       if (!_dbus_string_append (&auxdata, destination))
 612         goto oom;
 613     }
 614
 615   if (spid)
 616     {
 617       if (!_dbus_string_append (&auxdata, " spid="))
 618         goto oom;
 619
 620       if (!_dbus_string_append_uint (&auxdata, spid))
 621         goto oom;
 622     }
 623
 624   if (tpid)
 625     {
 626       if (!_dbus_string_append (&auxdata, " tpid="))
 627         goto oom;
 628
 629       if (!_dbus_string_append_uint (&auxdata, tpid))
 630         goto oom;
 631     }
 632
 633   sender_sid = bus_connection_get_selinux_id (sender);
 634   /* A NULL proposed_recipient means the bus itself. */
 635   if (proposed_recipient)
 636     recipient_sid = bus_connection_get_selinux_id (proposed_recipient);
 637   else
 638     recipient_sid = BUS_SID_FROM_SELINUX (bus_sid);
 639
 640   ret = bus_selinux_check (sender_sid,
 641                            recipient_sid,
 642                            SECCLASS_DBUS,
 643                            DBUS__SEND_MSG,
 644                            &auxdata);
 645
 646   _dbus_string_free (&auxdata);
 647
 648   return ret;
 649
 650  oom:
 651   if (string_alloced)
 652     _dbus_string_free (&auxdata);
 653   BUS_SET_OOM (error);
 654   return FALSE;
 655
 656 #else
 657   return TRUE;
 658 #endif /* HAVE_SELINUX */
 659 }
 660
 661 dbus_bool_t
 662 bus_selinux_append_context (DBusMessage    *message,
 663                             BusSELinuxID   *sid,
 664                             DBusError      *error)
 665 {
 666 #ifdef HAVE_SELINUX
 667   char *context;
 668
 669   if (avc_sid_to_context (SELINUX_SID_FROM_BUS (sid), &context) < 0)
 670     {
 671       if (errno == ENOMEM)
 672         BUS_SET_OOM (error);
 673       else
 674         dbus_set_error (error, DBUS_ERROR_FAILED,
 675                         "Error getting context from SID: %s\n",
 676                         _dbus_strerror (errno));
 677       return FALSE;
 678     }
 679   if (!dbus_message_append_args (message,
 680                                  DBUS_TYPE_ARRAY,
 681                                  DBUS_TYPE_BYTE,
 682                                  &context,
 683                                  strlen (context),
 684                                  DBUS_TYPE_INVALID))
 685     {
 686       _DBUS_SET_OOM (error);
 687       return FALSE;
 688     }
 689   freecon (context);
 690   return TRUE;
 691 #else
 692   return TRUE;
 693 #endif
 694 }
 695
 696 /**
 697  * Gets the security context of a connection to the bus. It is up to
 698  * the caller to freecon() when they are done.
 699  *
 700  * @param connection the connection to get the context of.
 701  * @param con the location to store the security context.
 702  * @returns #TRUE if context is successfully obtained.
 703  */
 704 #ifdef HAVE_SELINUX
 705 static dbus_bool_t
 706 bus_connection_read_selinux_context (DBusConnection     *connection,
 707                                      char              **con)
 708 {
 709   int fd;
 710
 711   if (!selinux_enabled)
 712     return FALSE;
 713
 714   _dbus_assert (connection != NULL);
 715
 716   if (!dbus_connection_get_unix_fd (connection, &fd))
 717     {
 718       _dbus_verbose ("Failed to get file descriptor of socket.\n");
 719       return FALSE;
 720     }
 721
 722   if (getpeercon (fd, con) < 0)
 723     {
 724       _dbus_verbose ("Error getting context of socket peer: %s\n",
 725                      _dbus_strerror (errno));
 726       return FALSE;
 727     }
 728
 729   _dbus_verbose ("Successfully read connection context.\n");
 730   return TRUE;
 731 }
 732 #endif /* HAVE_SELINUX */
 733
 734 /**
 735  * Read the SELinux ID from the connection.
 736  *
 737  * @param connection the connection to read from
 738  * @returns the SID if successfully determined, #NULL otherwise.
 739  */
 740 BusSELinuxID*
 741 bus_selinux_init_connection_id (DBusConnection *connection,
 742                                 DBusError      *error)
 743 {
 744 #ifdef HAVE_SELINUX
 745   char *con;
 746   security_id_t sid;
 747
 748   if (!selinux_enabled)
 749     return NULL;
 750
 751   if (!bus_connection_read_selinux_context (connection, &con))
 752     {
 753       dbus_set_error (error, DBUS_ERROR_FAILED,
 754                       "Failed to read an SELinux context from connection");
 755       _dbus_verbose ("Error getting peer context.\n");
 756       return NULL;
 757     }
 758
 759   _dbus_verbose ("Converting context to SID to store on connection\n");
 760
 761   if (avc_context_to_sid (con, &sid) < 0)
 762     {
 763       if (errno == ENOMEM)
 764         BUS_SET_OOM (error);
 765       else
 766         dbus_set_error (error, DBUS_ERROR_FAILED,
 767                         "Error getting SID from context \"%s\": %s\n",
 768                         con, _dbus_strerror (errno));
 769
 770       _dbus_warn ("Error getting SID from context \"%s\": %s\n",
 771                   con, _dbus_strerror (errno));
 772
 773       freecon (con);
 774       return NULL;
 775     }
 776
 777   freecon (con);
 778   return BUS_SID_FROM_SELINUX (sid);
 779 #else
 780   return NULL;
 781 #endif /* HAVE_SELINUX */
 782 }
 783
 784
 785 /**
 786  * Function for freeing hash table data.  These SIDs
 787  * should no longer be referenced.
 788  */
 789 static void
 790 bus_selinux_id_table_free_value (BusSELinuxID *sid)
 791 {
 792 #ifdef HAVE_SELINUX
 793   /* NULL sometimes due to how DBusHashTable works */
 794   if (sid)
 795     bus_selinux_id_unref (sid);
 796 #endif /* HAVE_SELINUX */
 797 }
 798
 799 /**
 800  * Creates a new table mapping service names to security ID.
 801  * A security ID is a "compiled" security context, a security
 802  * context is just a string.
 803  *
 804  * @returns the new table or #NULL if no memory
 805  */
 806 DBusHashTable*
 807 bus_selinux_id_table_new (void)
 808 {
 809   return _dbus_hash_table_new (DBUS_HASH_STRING,
 810                                (DBusFreeFunction) dbus_free,
 811                                (DBusFreeFunction) bus_selinux_id_table_free_value);
 812 }
 813
 814 /**
 815  * Hashes a service name and service context into the service SID
 816  * table as a string and a SID.
 817  *
 818  * @param service_name is the name of the service.
 819  * @param service_context is the context of the service.
 820  * @param service_table is the table to hash them into.
 821  * @return #FALSE if not enough memory
 822  */
 823 dbus_bool_t
 824 bus_selinux_id_table_insert (DBusHashTable *service_table,
 825                              const char    *service_name,
 826                              const char    *service_context)
 827 {
 828 #ifdef HAVE_SELINUX
 829   dbus_bool_t retval;
 830   security_id_t sid;
 831   char *key;
 832
 833   if (!selinux_enabled)
 834     return TRUE;
 835
 836   sid = SECSID_WILD;
 837   retval = FALSE;
 838
 839   key = _dbus_strdup (service_name);
 840   if (key == NULL)
 841     return retval;
 842
 843   if (avc_context_to_sid ((char *) service_context, &sid) < 0)
 844     {
 845       if (errno == ENOMEM)
 846         {
 847           dbus_free (key);
 848           return FALSE;
 849         }
 850
 851       _dbus_warn ("Error getting SID from context \"%s\": %s\n",
 852                   (char *) service_context,
 853                   _dbus_strerror (errno));
 854       goto out;
 855     }
 856
 857   if (!_dbus_hash_table_insert_string (service_table,
 858                                        key,
 859                                        BUS_SID_FROM_SELINUX (sid)))
 860     goto out;
 861
 862   _dbus_verbose ("Parsed \tservice: %s \n\t\tcontext: %s\n",
 863                   key,
 864                   sid->ctx);
 865
 866   /* These are owned by the hash, so clear them to avoid unref */
 867   key = NULL;
 868   sid = SECSID_WILD;
 869
 870   retval = TRUE;
 871
 872  out:
 873   if (sid != SECSID_WILD)
 874     sidput (sid);
 875
 876   if (key)
 877     dbus_free (key);
 878
 879   return retval;
 880 #else
 881   return TRUE;
 882 #endif /* HAVE_SELINUX */
 883 }
 884
 885
 886 /**
 887  * Find the security identifier associated with a particular service
 888  * name.  Return a pointer to this SID, or #NULL/SECSID_WILD if the
 889  * service is not found in the hash table.  This should be nearly a
 890  * constant time operation.  If SELinux support is not available,
 891  * always return NULL.
 892  *
 893  * @param service_table the hash table to check for service name.
 894  * @param service_name the name of the service to look for.
 895  * @returns the SELinux ID associated with the service
 896  */
 897 BusSELinuxID*
 898 bus_selinux_id_table_lookup (DBusHashTable    *service_table,
 899                              const DBusString *service_name)
 900 {
 901 #ifdef HAVE_SELINUX
 902   security_id_t sid;
 903
 904   sid = SECSID_WILD;     /* default context */
 905
 906   if (!selinux_enabled)
 907     return NULL;
 908
 909   _dbus_verbose ("Looking up service SID for %s\n",
 910                  _dbus_string_get_const_data (service_name));
 911
 912   sid = _dbus_hash_table_lookup_string (service_table,
 913                                         _dbus_string_get_const_data (service_name));
 914
 915   if (sid == SECSID_WILD)
 916     _dbus_verbose ("Service %s not found\n",
 917                    _dbus_string_get_const_data (service_name));
 918   else
 919     _dbus_verbose ("Service %s found\n",
 920                    _dbus_string_get_const_data (service_name));
 921
 922   return BUS_SID_FROM_SELINUX (sid);
 923 #endif /* HAVE_SELINUX */
 924   return NULL;
 925 }
 926
 927 /**
 928  * Get the SELinux policy root.  This is used to find the D-Bus
 929  * specific config file within the policy.
 930  */
 931 const char *
 932 bus_selinux_get_policy_root (void)
 933 {
 934 #ifdef HAVE_SELINUX
 935   return selinux_policy_root ();
 936 #else
 937   return NULL;
 938 #endif /* HAVE_SELINUX */
 939 }
 940
 941 /**
 942  * For debugging:  Print out the current hash table of service SIDs.
 943  */
 944 void
 945 bus_selinux_id_table_print (DBusHashTable *service_table)
 946 {
 947 #if defined (DBUS_ENABLE_VERBOSE_MODE) && defined (HAVE_SELINUX)
 948   DBusHashIter iter;
 949
 950   if (!selinux_enabled)
 951     return;
 952
 953   _dbus_verbose ("Service SID Table:\n");
 954   _dbus_hash_iter_init (service_table, &iter);
 955   while (_dbus_hash_iter_next (&iter))
 956     {
 957       const char *key = _dbus_hash_iter_get_string_key (&iter);
 958       security_id_t sid = _dbus_hash_iter_get_value (&iter);
 959       _dbus_verbose ("The key is %s\n", key);
 960       _dbus_verbose ("The context is %s\n", sid->ctx);
 961       _dbus_verbose ("The refcount is %d\n", sid->refcnt);
 962     }
 963 #endif /* DBUS_ENABLE_VERBOSE_MODE && HAVE_SELINUX */
 964 }
 965
 966
 967 /**
 968  * Print out some AVC statistics.
 969  */
 970 #ifdef HAVE_SELINUX
 971 static void
 972 bus_avc_print_stats (void)
 973 {
 974 #ifdef DBUS_ENABLE_VERBOSE_MODE
 975   struct avc_cache_stats cstats;
 976
 977   if (!selinux_enabled)
 978     return;
 979
 980   _dbus_verbose ("AVC Statistics:\n");
 981   avc_cache_stats (&cstats);
 982   avc_av_stats ();
 983   _dbus_verbose ("AVC Cache Statistics:\n");
 984   _dbus_verbose ("Entry lookups: %d\n", cstats.entry_lookups);
 985   _dbus_verbose ("Entry hits: %d\n", cstats.entry_hits);
 986   _dbus_verbose ("Entry misses %d\n", cstats.entry_misses);
 987   _dbus_verbose ("Entry discards: %d\n", cstats.entry_discards);
 988   _dbus_verbose ("CAV lookups: %d\n", cstats.cav_lookups);
 989   _dbus_verbose ("CAV hits: %d\n", cstats.cav_hits);
 990   _dbus_verbose ("CAV probes: %d\n", cstats.cav_probes);
 991   _dbus_verbose ("CAV misses: %d\n", cstats.cav_misses);
 992 #endif /* DBUS_ENABLE_VERBOSE_MODE */
 993 }
 994 #endif /* HAVE_SELINUX */
 995
 996 /**
 997  * Destroy the AVC before we terminate.
 998  */
 999 void
1000 bus_selinux_shutdown (void)
1001 {
1002 #ifdef HAVE_SELINUX
1003   if (!selinux_enabled)
1004     return;
1005
1006   _dbus_verbose ("AVC shutdown\n");
1007
1008   if (bus_sid != SECSID_WILD)
1009     {
1010       sidput (bus_sid);
1011       bus_sid = SECSID_WILD;
1012
1013       bus_avc_print_stats ();
1014
1015       avc_destroy ();
1016     }
1017 #endif /* HAVE_SELINUX */
1018 }