bus.c 21.3 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
/* -*- mode: C; c-file-style: "gnu" -*- */
/* bus.c  message bus context object
 *
 * Copyright (C) 2003 Red Hat, Inc.
 *
 * Licensed under the Academic Free License version 1.2
 * 
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */

#include "bus.h"
#include "loop.h"
#include "activation.h"
#include "connection.h"
#include "services.h"
#include "utils.h"
30
#include "policy.h"
31
#include "config-parser.h"
32 33
#include <dbus/dbus-list.h>
#include <dbus/dbus-hash.h>
34 35 36 37 38
#include <dbus/dbus-internals.h>

struct BusContext
{
  int refcount;
39
  char *type;
40
  char *address;
41
  BusLoop *loop;
42
  DBusList *servers;
43 44 45
  BusConnections *connections;
  BusActivation *activation;
  BusRegistry *registry;
46 47 48 49 50 51 52 53 54
  DBusList *default_rules;       /**< Default policy rules */
  DBusList *mandatory_rules;     /**< Mandatory policy rules */
  DBusHashTable *rules_by_uid;   /**< per-UID policy rules */
  DBusHashTable *rules_by_gid;   /**< per-GID policy rules */
  int activation_timeout;        /**< How long to wait for an activation to time out */
  int auth_timeout;              /**< How long to wait for an authentication to time out */
  int max_completed_connections;    /**< Max number of authorized connections */
  int max_incomplete_connections;   /**< Max number of incomplete connections */
  int max_connections_per_user;     /**< Max number of connections auth'd as same user */
55 56
};

57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118
static int server_data_slot = -1;
static int server_data_slot_refcount = 0;

typedef struct
{
  BusContext *context;
} BusServerData;

#define BUS_SERVER_DATA(server) (dbus_server_get_data ((server), server_data_slot))

static dbus_bool_t
server_data_slot_ref (void)
{
  if (server_data_slot < 0)
    {
      server_data_slot = dbus_server_allocate_data_slot ();
      
      if (server_data_slot < 0)
        return FALSE;

      _dbus_assert (server_data_slot_refcount == 0);
    }  

  server_data_slot_refcount += 1;

  return TRUE;
}

static void
server_data_slot_unref (void)
{
  _dbus_assert (server_data_slot_refcount > 0);

  server_data_slot_refcount -= 1;
  
  if (server_data_slot_refcount == 0)
    {
      dbus_server_free_data_slot (server_data_slot);
      server_data_slot = -1;
    }
}

static BusContext*
server_get_context (DBusServer *server)
{
  BusContext *context;
  BusServerData *bd;
  
  if (!server_data_slot_ref ())
    return NULL;

  bd = BUS_SERVER_DATA (server);
  if (bd == NULL)
    return NULL;

  context = bd->context;

  server_data_slot_unref ();

  return context;
}

119
static dbus_bool_t
120 121 122 123
server_watch_callback (DBusWatch     *watch,
                       unsigned int   condition,
                       void          *data)
{
124
  DBusServer *server = data;
125

126
  return dbus_server_handle_watch (server, watch, condition);
127 128
}

129
static dbus_bool_t
130
add_server_watch (DBusWatch  *watch,
131
                  void       *data)
132
{
133 134 135 136 137 138 139
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);
  
  return bus_loop_add_watch (context->loop,
                             watch, server_watch_callback, server,
140
                             NULL);
141 142 143 144
}

static void
remove_server_watch (DBusWatch  *watch,
145
                     void       *data)
146
{
147 148 149 150 151 152 153
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);
  
  bus_loop_remove_watch (context->loop,
                         watch, server_watch_callback, server);
154 155
}

156

157 158 159 160
static void
server_timeout_callback (DBusTimeout   *timeout,
                         void          *data)
{
161
  /* can return FALSE on OOM but we just let it fire again later */
162 163 164 165 166
  dbus_timeout_handle (timeout);
}

static dbus_bool_t
add_server_timeout (DBusTimeout *timeout,
167
                    void        *data)
168
{
169 170 171 172 173 174 175
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);

  return bus_loop_add_timeout (context->loop,
                               timeout, server_timeout_callback, server, NULL);
176 177 178 179
}

static void
remove_server_timeout (DBusTimeout *timeout,
180
                       void        *data)
181
{
182 183 184 185 186 187 188
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);
  
  bus_loop_remove_timeout (context->loop,
                           timeout, server_timeout_callback, server);
189 190
}

191 192 193 194 195 196 197 198
static void
new_connection_callback (DBusServer     *server,
                         DBusConnection *new_connection,
                         void           *data)
{
  BusContext *context = data;
  
  if (!bus_connections_setup_connection (context->connections, new_connection))
199 200
    {
      _dbus_verbose ("No memory to setup new connection\n");
201

202 203 204 205 206 207 208 209
      /* if we don't do this, it will get unref'd without
       * being disconnected... kind of strange really
       * that we have to do this, people won't get it right
       * in general.
       */
      dbus_connection_disconnect (new_connection);
    }
  
210
  /* on OOM, we won't have ref'd the connection so it will die. */
211 212
}

213
static void
214 215
free_rule_func (void *data,
                void *user_data)
216 217 218 219 220 221
{
  BusPolicyRule *rule = data;

  bus_policy_rule_unref (rule);
}

222 223 224 225 226 227 228 229 230 231 232 233
static void
free_rule_list_func (void *data)
{
  DBusList **list = data;

  _dbus_list_foreach (list, free_rule_func, NULL);
  
  _dbus_list_clear (list);

  dbus_free (list);
}

234 235 236 237 238 239 240 241
static void
free_server_data (void *data)
{
  BusServerData *bd = data;  
  
  dbus_free (bd);
}

242 243 244
static dbus_bool_t
setup_server (BusContext *context,
              DBusServer *server,
245
              char      **auth_mechanisms,
246
              DBusError  *error)
247
{
248
  BusServerData *bd;
249 250 251 252 253 254 255 256 257 258 259 260

  bd = dbus_new0 (BusServerData, 1);
  if (!dbus_server_set_data (server,
                             server_data_slot,
                             bd, free_server_data))
    {
      dbus_free (bd);
      BUS_SET_OOM (error);
      return FALSE;
    }

  bd->context = context;
261
  
262 263 264 265 266 267
  if (!dbus_server_set_auth_mechanisms (server, (const char**) auth_mechanisms))
    {
      BUS_SET_OOM (error);
      return FALSE;
    }
  
268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291
  dbus_server_set_new_connection_function (server,
                                           new_connection_callback,
                                           context, NULL);
  
  if (!dbus_server_set_watch_functions (server,
                                        add_server_watch,
                                        remove_server_watch,
                                        NULL,
                                        server,
                                        NULL))
    {
      BUS_SET_OOM (error);
      return FALSE;
    }

  if (!dbus_server_set_timeout_functions (server,
                                          add_server_timeout,
                                          remove_server_timeout,
                                          NULL,
                                          server, NULL))
    {
      BUS_SET_OOM (error);
      return FALSE;
    }
292
  
293 294 295
  return TRUE;
}

296
BusContext*
297 298
bus_context_new (const DBusString *config_file,
                 DBusError        *error)
299 300
{
  BusContext *context;
301 302 303 304
  DBusList *link;
  DBusList **addresses;
  BusConfigParser *parser;
  DBusString full_address;
305 306 307 308
  const char *user;
  char **auth_mechanisms;
  DBusList **auth_mechanisms_list;
  int len;
309
  
310
  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
311

312
  if (!_dbus_string_init (&full_address))
313 314 315 316 317 318 319 320 321 322 323 324
    {
      BUS_SET_OOM (error);
      return NULL;
    }
  
  if (!server_data_slot_ref ())
    {
      BUS_SET_OOM (error);
      _dbus_string_free (&full_address);
      return NULL;
    }
  
325 326
  parser = NULL;
  context = NULL;
327
  auth_mechanisms = NULL;
328 329 330 331
  
  parser = bus_config_load (config_file, error);
  if (parser == NULL)
    goto failed;
332 333 334 335 336
  
  context = dbus_new0 (BusContext, 1);
  if (context == NULL)
    {
      BUS_SET_OOM (error);
337
      goto failed;
338 339 340
    }
  
  context->refcount = 1;
341

342
#ifdef DBUS_BUILD_TESTS
343
  context->activation_timeout = 6000;  /* 6 seconds */
344
#else
345
  context->activation_timeout = 15000; /* 15 seconds */
346
#endif
347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362

  /* Making this long risks making a DOS attack easier, but too short
   * and legitimate auth will fail.  If interactive auth (ask user for
   * password) is allowed, then potentially it has to be quite long.
   * Ultimately it needs to come from the configuration file.
   */     
  context->auth_timeout = 3000; /* 3 seconds */

  context->max_incomplete_connections = 32;
  context->max_connections_per_user = 128;

  /* Note that max_completed_connections / max_connections_per_user
   * is the number of users that would have to work together to
   * DOS all the other users.
   */
  context->max_completed_connections = 1024;
363
  
364 365 366 367 368 369 370
  context->loop = bus_loop_new ();
  if (context->loop == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  
371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399
  /* Build an array of auth mechanisms */
  
  auth_mechanisms_list = bus_config_parser_get_mechanisms (parser);
  len = _dbus_list_get_length (auth_mechanisms_list);

  if (len > 0)
    {
      int i;

      auth_mechanisms = dbus_new0 (char*, len + 1);
      if (auth_mechanisms == NULL)
        goto failed;
      
      i = 0;
      link = _dbus_list_get_first_link (auth_mechanisms_list);
      while (link != NULL)
        {
          auth_mechanisms[i] = _dbus_strdup (link->data);
          if (auth_mechanisms[i] == NULL)
            goto failed;
          link = _dbus_list_get_next_link (auth_mechanisms_list, link);
        }
    }
  else
    {
      auth_mechanisms = NULL;
    }

  /* Listen on our addresses */
400 401 402 403 404 405 406 407 408 409 410
  
  addresses = bus_config_parser_get_addresses (parser);  
  
  link = _dbus_list_get_first_link (addresses);
  while (link != NULL)
    {
      DBusServer *server;
      
      server = dbus_server_listen (link->data, error);
      if (server == NULL)
        goto failed;
411
      else if (!setup_server (context, server, auth_mechanisms, error))
412 413 414 415 416 417 418 419 420 421 422
        goto failed;

      if (!_dbus_list_append (&context->servers, server))
        {
          BUS_SET_OOM (error);
          goto failed;
        }          
      
      link = _dbus_list_get_next_link (addresses, link);
    }

423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446
  /* Here we change our credentials if required,
   * as soon as we've set up our sockets
   */
  user = bus_config_parser_get_user (parser);
  if (user != NULL)
    {
      DBusCredentials creds;
      DBusString u;

      _dbus_string_init_const (&u, user);

      if (!_dbus_credentials_from_username (&u, &creds) ||
          creds.uid < 0 ||
          creds.gid < 0)
        {
          dbus_set_error (error, DBUS_ERROR_FAILED,
                          "Could not get UID and GID for username \"%s\"",
                          user);
          goto failed;
        }
      
      if (!_dbus_change_identity (creds.uid, creds.gid, error))
        goto failed;
    }
447 448 449

  /* note that type may be NULL */
  context->type = _dbus_strdup (bus_config_parser_get_type (parser));
450
  
451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473
  /* We have to build the address backward, so that
   * <listen> later in the config file have priority
   */
  link = _dbus_list_get_last_link (&context->servers);
  while (link != NULL)
    {
      char *addr;
      
      addr = dbus_server_get_address (link->data);
      if (addr == NULL)
        {
          BUS_SET_OOM (error);
          goto failed;
        }

      if (_dbus_string_get_length (&full_address) > 0)
        {
          if (!_dbus_string_append (&full_address, ";"))
            {
              BUS_SET_OOM (error);
              goto failed;
            }
        }
474

475 476 477 478 479 480 481 482 483 484 485 486
      if (!_dbus_string_append (&full_address, addr))
        {
          BUS_SET_OOM (error);
          goto failed;
        }

      dbus_free (addr);

      link = _dbus_list_get_prev_link (&context->servers, link);
    }

  if (!_dbus_string_copy_data (&full_address, &context->address))
487 488 489 490
    {
      BUS_SET_OOM (error);
      goto failed;
    }
491 492

  /* Create activation subsystem */
493
  
494
  context->activation = bus_activation_new (context, &full_address,
495 496
                                            bus_config_parser_get_service_dirs (parser),
                                            error);
497 498 499 500 501 502 503 504 505 506 507 508 509
  if (context->activation == NULL)
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }

  context->connections = bus_connections_new (context);
  if (context->connections == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }

510
  context->registry = bus_registry_new (context);
511 512 513 514 515 516
  if (context->registry == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  
517
  context->rules_by_uid = _dbus_hash_table_new (DBUS_HASH_ULONG,
518
                                                NULL,
519
                                                free_rule_list_func);
520 521 522 523 524 525
  if (context->rules_by_uid == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }

526
  context->rules_by_gid = _dbus_hash_table_new (DBUS_HASH_ULONG,
527
                                                NULL,
528
                                                free_rule_list_func);
529 530 531 532 533
  if (context->rules_by_gid == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
534

535 536 537 538 539 540 541
  /* Now become a daemon if appropriate */
  if (bus_config_parser_get_fork (parser))
    {
      if (!_dbus_become_daemon (error))
        goto failed;
    }
  
542 543
  bus_config_parser_unref (parser);
  _dbus_string_free (&full_address);
544
  dbus_free_string_array (auth_mechanisms);
545 546 547
  
  return context;
  
548
 failed:  
549 550 551 552 553 554 555
  if (parser != NULL)
    bus_config_parser_unref (parser);

  if (context != NULL)
    bus_context_unref (context);

  _dbus_string_free (&full_address);
556
  dbus_free_string_array (auth_mechanisms);
557 558 559

  server_data_slot_unref ();
  
560 561 562
  return NULL;
}

563 564 565
static void
shutdown_server (BusContext *context,
                 DBusServer *server)
566
{
567 568
  if (server == NULL ||
      !dbus_server_get_is_connected (server))
569 570
    return;
  
571
  if (!dbus_server_set_watch_functions (server,
572
                                        NULL, NULL, NULL,
573 574 575 576
                                        context,
                                        NULL))
    _dbus_assert_not_reached ("setting watch functions to NULL failed");
  
577
  if (!dbus_server_set_timeout_functions (server,
578
                                          NULL, NULL, NULL,
579 580 581 582
                                          context,
                                          NULL))
    _dbus_assert_not_reached ("setting timeout functions to NULL failed");
  
583 584 585 586 587 588 589 590 591 592 593 594 595 596 597
  dbus_server_disconnect (server);
}

void
bus_context_shutdown (BusContext  *context)
{
  DBusList *link;

  link = _dbus_list_get_first_link (&context->servers);
  while (link != NULL)
    {
      shutdown_server (context, link->data);

      link = _dbus_list_get_next_link (&context->servers, link);
    }
598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614
}

void
bus_context_ref (BusContext *context)
{
  _dbus_assert (context->refcount > 0);
  context->refcount += 1;
}

void
bus_context_unref (BusContext *context)
{
  _dbus_assert (context->refcount > 0);
  context->refcount -= 1;

  if (context->refcount == 0)
    {
615 616
      DBusList *link;
      
617 618
      _dbus_verbose ("Finalizing bus context %p\n", context);
      
619
      bus_context_shutdown (context);
620 621 622 623 624 625

      if (context->connections)
        {
          bus_connections_unref (context->connections);
          context->connections = NULL;
        }
626
      
627
      if (context->registry)
628 629 630 631 632
        {
          bus_registry_unref (context->registry);
          context->registry = NULL;
        }
      
633
      if (context->activation)
634 635 636 637
        {
          bus_activation_unref (context->activation);
          context->activation = NULL;
        }
638 639 640

      link = _dbus_list_get_first_link (&context->servers);
      while (link != NULL)
641
        {
642 643 644
          dbus_server_unref (link->data);
          
          link = _dbus_list_get_next_link (&context->servers, link);
645
        }
646
      _dbus_list_clear (&context->servers);
647 648 649 650 651 652 653 654 655 656 657 658

      if (context->rules_by_uid)
        {
          _dbus_hash_table_unref (context->rules_by_uid);
          context->rules_by_uid = NULL;
        }

      if (context->rules_by_gid)
        {
          _dbus_hash_table_unref (context->rules_by_gid);
          context->rules_by_gid = NULL;
        }
659

660 661 662 663 664 665
      if (context->loop)
        {
          bus_loop_unref (context->loop);
          context->loop = NULL;
        }
      
666
      dbus_free (context->type);
667 668
      dbus_free (context->address);
      dbus_free (context);
669 670

      server_data_slot_unref ();
671 672 673
    }
}

674 675 676 677 678 679 680
/* type may be NULL */
const char*
bus_context_get_type (BusContext *context)
{
  return context->type;
}

681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697
BusRegistry*
bus_context_get_registry (BusContext  *context)
{
  return context->registry;
}

BusConnections*
bus_context_get_connections (BusContext  *context)
{
  return context->connections;
}

BusActivation*
bus_context_get_activation (BusContext  *context)
{
  return context->activation;
}
698

699 700 701 702 703 704
BusLoop*
bus_context_get_loop (BusContext *context)
{
  return context->loop;
}

705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883
static dbus_bool_t
list_allows_user (dbus_bool_t           def,
                  DBusList            **list,
                  unsigned long         uid,
                  const unsigned long  *group_ids,
                  int                   n_group_ids)
{
  DBusList *link;
  dbus_bool_t allowed;
  
  allowed = def;

  link = _dbus_list_get_first_link (list);
  while (link != NULL)
    {
      BusPolicyRule *rule = link->data;
      link = _dbus_list_get_next_link (list, link);
      
      if (rule->type == BUS_POLICY_RULE_USER)
        {
          if (rule->d.user.uid != uid)
            continue;
        }
      else if (rule->type == BUS_POLICY_RULE_GROUP)
        {
          int i;

          i = 0;
          while (i < n_group_ids)
            {
              if (rule->d.group.gid == group_ids[i])
                break;
              ++i;
            }

          if (i == n_group_ids)
            continue;
        }
      else
        continue;

      allowed = rule->allow;
    }
  
  return allowed;
}

dbus_bool_t
bus_context_allow_user (BusContext   *context,
                        unsigned long uid)
{
  dbus_bool_t allowed;
  unsigned long *group_ids;
  int n_group_ids;

  /* On OOM or error we always reject the user */
  if (!_dbus_get_groups (uid, &group_ids, &n_group_ids))
    {
      _dbus_verbose ("Did not get any groups for UID %lu\n",
                     uid);
      return FALSE;
    }
  
  allowed = FALSE;

  allowed = list_allows_user (allowed,
                              &context->default_rules,
                              uid,
                              group_ids, n_group_ids);

  allowed = list_allows_user (allowed,
                              &context->mandatory_rules,
                              uid,
                              group_ids, n_group_ids);

  dbus_free (group_ids);

  return allowed;
}

static dbus_bool_t
add_list_to_policy (DBusList       **list,
                    BusPolicy       *policy)
{
  DBusList *link;

  link = _dbus_list_get_first_link (list);
  while (link != NULL)
    {
      BusPolicyRule *rule = link->data;
      link = _dbus_list_get_next_link (list, link);

      switch (rule->type)
        {
        case BUS_POLICY_RULE_USER:
        case BUS_POLICY_RULE_GROUP:
          /* These aren't per-connection policies */
          break;

        case BUS_POLICY_RULE_OWN:
        case BUS_POLICY_RULE_SEND:
        case BUS_POLICY_RULE_RECEIVE:
          /* These are per-connection */
          if (!bus_policy_append_rule (policy, rule))
            return FALSE;
          break;
        }
    }
  
  return TRUE;
}

BusPolicy*
bus_context_create_connection_policy (BusContext      *context,
                                      DBusConnection  *connection)
{
  BusPolicy *policy;
  unsigned long uid;
  DBusList **list;

  _dbus_assert (dbus_connection_get_is_authenticated (connection));
  
  policy = bus_policy_new ();
  if (policy == NULL)
    return NULL;

  if (!add_list_to_policy (&context->default_rules,
                                      policy))
    goto failed;

  /* we avoid the overhead of looking up user's groups
   * if we don't have any group rules anyway
   */
  if (_dbus_hash_table_get_n_entries (context->rules_by_gid) > 0)
    {
      const unsigned long *groups;
      int n_groups;
      int i;
      
      if (!bus_connection_get_groups (connection, &groups, &n_groups))
        goto failed;
      
      i = 0;
      while (i < n_groups)
        {
          list = _dbus_hash_table_lookup_ulong (context->rules_by_gid,
                                                groups[i]);
          
          if (list != NULL)
            {
              if (!add_list_to_policy (list, policy))
                goto failed;
            }
          
          ++i;
        }
    }

  if (!dbus_connection_get_unix_user (connection, &uid))
    goto failed;

  list = _dbus_hash_table_lookup_ulong (context->rules_by_uid,
                                        uid);

  if (!add_list_to_policy (list, policy))
    goto failed;
  
  if (!add_list_to_policy (&context->mandatory_rules,
                           policy))
    goto failed;

  bus_policy_optimize (policy);
  
  return policy;
  
 failed:
  bus_policy_unref (policy);
  return NULL;
}
884 885 886 887 888 889 890

int
bus_context_get_activation_timeout (BusContext *context)
{
  
  return context->activation_timeout;
}