bus.c 37 KB
Newer Older
1 2 3
/* -*- mode: C; c-file-style: "gnu" -*- */
/* bus.c  message bus context object
 *
4
 * Copyright (C) 2003, 2004 Red Hat, Inc.
5
 *
6
 * Licensed under the Academic Free License version 2.1
7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
 * 
 * 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 "activation.h"
#include "connection.h"
#include "services.h"
#include "utils.h"
29
#include "policy.h"
30
#include "config-parser.h"
31
#include "signals.h"
32
#include "selinux.h"
33
#include "dir-watch.h"
34 35
#include <dbus/dbus-list.h>
#include <dbus/dbus-hash.h>
36 37 38 39 40
#include <dbus/dbus-internals.h>

struct BusContext
{
  int refcount;
41
  char *config_file;
42
  char *type;
43
  char *address;
44
  char *pidfile;
45
  char *user;
46
  DBusLoop *loop;
47
  DBusList *servers;
48 49 50
  BusConnections *connections;
  BusActivation *activation;
  BusRegistry *registry;
51
  BusPolicy *policy;
52
  BusMatchmaker *matchmaker;
53
  DBusUserDatabase *user_database;
54
  BusLimits limits;
55
  unsigned int fork : 1;
56 57
};

58
static dbus_int32_t server_data_slot = -1;
59 60 61 62 63 64 65 66 67 68 69 70 71 72

typedef struct
{
  BusContext *context;
} BusServerData;

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

static BusContext*
server_get_context (DBusServer *server)
{
  BusContext *context;
  BusServerData *bd;
  
73
  if (!dbus_server_allocate_data_slot (&server_data_slot))
74 75 76 77
    return NULL;

  bd = BUS_SERVER_DATA (server);
  if (bd == NULL)
78
    {
79
      dbus_server_free_data_slot (&server_data_slot);
80 81
      return NULL;
    }
82 83 84

  context = bd->context;

85
  dbus_server_free_data_slot (&server_data_slot);
86 87 88 89

  return context;
}

90
static dbus_bool_t
91 92 93 94
server_watch_callback (DBusWatch     *watch,
                       unsigned int   condition,
                       void          *data)
{
95 96 97 98 99 100
  /* FIXME this can be done in dbus-mainloop.c
   * if the code in activation.c for the babysitter
   * watch handler is fixed.
   */
  
  return dbus_watch_handle (watch, condition);
101 102
}

103
static dbus_bool_t
104
add_server_watch (DBusWatch  *watch,
105
                  void       *data)
106
{
107 108 109 110 111
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);
  
112 113 114
  return _dbus_loop_add_watch (context->loop,
                               watch, server_watch_callback, server,
                               NULL);
115 116 117 118
}

static void
remove_server_watch (DBusWatch  *watch,
119
                     void       *data)
120
{
121 122 123 124 125
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);
  
126 127
  _dbus_loop_remove_watch (context->loop,
                           watch, server_watch_callback, server);
128 129
}

130

131 132 133 134
static void
server_timeout_callback (DBusTimeout   *timeout,
                         void          *data)
{
135
  /* can return FALSE on OOM but we just let it fire again later */
136 137 138 139 140
  dbus_timeout_handle (timeout);
}

static dbus_bool_t
add_server_timeout (DBusTimeout *timeout,
141
                    void        *data)
142
{
143 144 145 146 147
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);

148 149
  return _dbus_loop_add_timeout (context->loop,
                                 timeout, server_timeout_callback, server, NULL);
150 151 152 153
}

static void
remove_server_timeout (DBusTimeout *timeout,
154
                       void        *data)
155
{
156 157 158 159 160
  DBusServer *server = data;
  BusContext *context;
  
  context = server_get_context (server);
  
161 162
  _dbus_loop_remove_timeout (context->loop,
                             timeout, server_timeout_callback, server);
163 164
}

165 166 167 168 169 170 171 172
static void
new_connection_callback (DBusServer     *server,
                         DBusConnection *new_connection,
                         void           *data)
{
  BusContext *context = data;
  
  if (!bus_connections_setup_connection (context->connections, new_connection))
173 174
    {
      _dbus_verbose ("No memory to setup new connection\n");
175

176 177 178 179 180
      /* 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.
       */
181
      dbus_connection_close (new_connection);
182
    }
183 184

  dbus_connection_set_max_received_size (new_connection,
185
                                         context->limits.max_incoming_bytes);
186 187

  dbus_connection_set_max_message_size (new_connection,
188
                                        context->limits.max_message_size);
189
  
190
  /* on OOM, we won't have ref'd the connection so it will die. */
191 192
}

193 194 195 196 197 198 199 200
static void
free_server_data (void *data)
{
  BusServerData *bd = data;  
  
  dbus_free (bd);
}

201 202 203
static dbus_bool_t
setup_server (BusContext *context,
              DBusServer *server,
204
              char      **auth_mechanisms,
205
              DBusError  *error)
206
{
207
  BusServerData *bd;
208 209 210 211 212 213 214 215 216 217 218 219

  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;
220
  
221 222 223 224 225 226
  if (!dbus_server_set_auth_mechanisms (server, (const char**) auth_mechanisms))
    {
      BUS_SET_OOM (error);
      return FALSE;
    }
  
227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250
  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;
    }
251
  
252 253 254
  return TRUE;
}

255 256 257 258 259 260 261
/* This code only gets executed the first time the
   config files are parsed.  It is not executed
   when config files are reloaded.*/
static dbus_bool_t
process_config_first_time_only (BusContext      *context,
				BusConfigParser *parser,
				DBusError       *error)
262
{
263 264
  DBusList *link;
  DBusList **addresses;
265
  const char *user, *pidfile;
266 267 268
  char **auth_mechanisms;
  DBusList **auth_mechanisms_list;
  int len;
269
  dbus_bool_t retval;
270

271
  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
272

273
  retval = FALSE;
274
  auth_mechanisms = NULL;
275 276 277 278 279 280 281 282 283 284 285 286 287 288

  /* Check for an existing pid file. Of course this is a race;
   * we'd have to use fcntl() locks on the pid file to
   * avoid that. But we want to check for the pid file
   * before overwriting any existing sockets, etc.
   */
  pidfile = bus_config_parser_get_pidfile (parser);
  if (pidfile != NULL)
    {
      DBusString u;
      DBusStat stbuf;
      
      _dbus_string_init_const (&u, pidfile);
      
289
      if (_dbus_stat (&u, &stbuf, NULL))
290 291 292 293 294 295 296
	{
	  dbus_set_error (error, DBUS_ERROR_FAILED,
			  "The pid file \"%s\" exists, if the message bus is not running, remove this file",
			  pidfile);
	  goto failed;
	}
    }
297
  
298 299
  /* keep around the pid filename so we can delete it later */
  context->pidfile = _dbus_strdup (pidfile);
300 301 302 303 304 305 306 307 308 309 310 311

  /* 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)
312 313 314 315
	{
	  BUS_SET_OOM (error);
	  goto failed;
	}
316 317 318 319 320 321 322
      
      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)
323 324 325 326
	    {
	      BUS_SET_OOM (error);
	      goto failed;
	    }
327 328 329 330 331 332 333 334 335
          link = _dbus_list_get_next_link (auth_mechanisms_list, link);
        }
    }
  else
    {
      auth_mechanisms = NULL;
    }

  /* Listen on our addresses */
336 337 338 339 340 341 342 343 344 345
  
  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)
346 347 348 349
	{
	  _DBUS_ASSERT_ERROR_IS_SET (error);
	  goto failed;
	}
350
      else if (!setup_server (context, server, auth_mechanisms, error))
351 352 353 354
	{
	  _DBUS_ASSERT_ERROR_IS_SET (error);
	  goto failed;
	}
355 356 357 358 359 360 361 362 363 364

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

365 366
  /* note that type may be NULL */
  context->type = _dbus_strdup (bus_config_parser_get_type (parser));
367 368 369 370 371
  if (bus_config_parser_get_type (parser) != NULL && context->type == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
372 373 374 375 376 377 378 379 380 381 382 383 384

  user = bus_config_parser_get_user (parser);
  if (user != NULL)
    {
      context->user = _dbus_strdup (user);
      if (context->user == NULL)
	{
	  BUS_SET_OOM (error);
	  goto failed;
	}
    }

  context->fork = bus_config_parser_get_fork (parser);
385
  
386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423
  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
  retval = TRUE;

 failed:
  dbus_free_string_array (auth_mechanisms);
  return retval;
}

/* This code gets executed every time the config files
   are parsed: both during BusContext construction
   and on reloads. */
static dbus_bool_t
process_config_every_time (BusContext      *context,
			   BusConfigParser *parser,
			   dbus_bool_t      is_reload,
			   DBusError       *error)
{
  DBusString full_address;
  DBusList *link;
  
  dbus_bool_t retval;

  _DBUS_ASSERT_ERROR_IS_CLEAR (error);

  retval = FALSE;

  if (!_dbus_string_init (&full_address))
    {
      BUS_SET_OOM (error);
      return FALSE;
    }

  /* get our limits and timeout lengths */
  bus_config_parser_get_limits (parser, &context->limits);

  context->policy = bus_config_parser_steal_policy (parser);
  _dbus_assert (context->policy != NULL);

424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446
  /* 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;
            }
        }
447

448 449 450 451 452 453 454 455 456 457 458
      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);
    }

459 460 461
  if (is_reload)
    dbus_free (context->address);

462
  if (!_dbus_string_copy_data (&full_address, &context->address))
463 464 465 466
    {
      BUS_SET_OOM (error);
      goto failed;
    }
467

468 469 470 471 472 473 474 475 476 477 478 479 480 481
  /* Create activation subsystem */
  
  if (is_reload)
    bus_activation_unref (context->activation);
  
  context->activation = bus_activation_new (context, &full_address,
                                            bus_config_parser_get_service_dirs (parser),
                                            error);
  if (context->activation == NULL)
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }

482 483 484 485 486 487 488 489 490
  /* Drop existing conf-dir watches (if applicable) and watch all conf directories */

  if (is_reload)
    bus_drop_all_directory_watches ();

  _dbus_list_foreach (bus_config_parser_get_conf_dirs (parser),
		      (DBusForeachFunction) bus_watch_directory,
		      NULL);

491 492 493 494 495 496 497 498 499
  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
  retval = TRUE;

 failed:
  _dbus_string_free (&full_address);
  return retval;
}

static dbus_bool_t
500 501 502
process_config_postinit (BusContext *context,
			 BusConfigParser *parser,
			 DBusError *error)
503
{
504
  DBusHashTable *service_context_table;
505

506 507 508
  service_context_table = bus_config_parser_steal_service_context_table (parser);
  if (!bus_registry_set_service_context_table (context->registry,
					       service_context_table))
509
    {
510 511
      BUS_SET_OOM (error);
      return FALSE;
512 513
    }

514 515
  _dbus_hash_table_unref (service_context_table);
  return TRUE;
516 517 518 519
}

BusContext*
bus_context_new (const DBusString *config_file,
520
                 ForceForkSetting  force_fork,
521 522 523 524 525
                 int               print_addr_fd,
                 int               print_pid_fd,
                 DBusError        *error)
{
  BusContext *context;
526
  BusConfigParser *parser;
527 528 529
  
  _DBUS_ASSERT_ERROR_IS_CLEAR (error);

530 531 532
  context = NULL;
  parser = NULL;

533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559
  if (!dbus_server_allocate_data_slot (&server_data_slot))
    {
      BUS_SET_OOM (error);
      return NULL;
    }

  context = dbus_new0 (BusContext, 1);
  if (context == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  context->refcount = 1;

  if (!_dbus_string_copy_data (config_file, &context->config_file))
    {
      BUS_SET_OOM (error);
      goto failed;
    }

  context->loop = _dbus_loop_new ();
  if (context->loop == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }

560 561 562 563 564 565
  context->registry = bus_registry_new (context);
  if (context->registry == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
566 567 568 569 570 571 572

  parser = bus_config_load (config_file, TRUE, NULL, error);
  if (parser == NULL)
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
573
  
574 575 576 577 578 579
  if (!process_config_first_time_only (context, parser, error))
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
  if (!process_config_every_time (context, parser, FALSE, error))
580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
  
  /* we need another ref of the server data slot for the context
   * to own
   */
  if (!dbus_server_allocate_data_slot (&server_data_slot))
    _dbus_assert_not_reached ("second ref of server data slot failed");

  context->user_database = _dbus_user_database_new ();
  if (context->user_database == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  
598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639
  /* Note that we don't know whether the print_addr_fd is
   * one of the sockets we're using to listen on, or some
   * other random thing. But I think the answer is "don't do
   * that then"
   */
  if (print_addr_fd >= 0)
    {
      DBusString addr;
      const char *a = bus_context_get_address (context);
      int bytes;
      
      _dbus_assert (a != NULL);
      if (!_dbus_string_init (&addr))
        {
          BUS_SET_OOM (error);
          goto failed;
        }
      
      if (!_dbus_string_append (&addr, a) ||
          !_dbus_string_append (&addr, "\n"))
        {
          _dbus_string_free (&addr);
          BUS_SET_OOM (error);
          goto failed;
        }

      bytes = _dbus_string_get_length (&addr);
      if (_dbus_write (print_addr_fd, &addr, 0, bytes) != bytes)
        {
          dbus_set_error (error, DBUS_ERROR_FAILED,
                          "Printing message bus address: %s\n",
                          _dbus_strerror (errno));
          _dbus_string_free (&addr);
          goto failed;
        }

      if (print_addr_fd > 2)
        _dbus_close (print_addr_fd, NULL);

      _dbus_string_free (&addr);
    }
  
640 641 642 643 644 645 646
  context->connections = bus_connections_new (context);
  if (context->connections == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }

647 648 649 650 651 652 653
  context->matchmaker = bus_matchmaker_new ();
  if (context->matchmaker == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  
654
  /* Now become a daemon if appropriate */
655
  if ((force_fork != FORK_NEVER && context->fork) || force_fork == FORK_ALWAYS)
656
    {
657 658
      DBusString u;

659 660
      if (context->pidfile)
        _dbus_string_init_const (&u, context->pidfile);
661
      
662 663 664
      if (!_dbus_become_daemon (context->pidfile ? &u : NULL, 
				print_pid_fd,
				error))
665 666 667 668
	{
	  _DBUS_ASSERT_ERROR_IS_SET (error);
	  goto failed;
	}
669
    }
670 671 672
  else
    {
      /* Need to write PID file for ourselves, not for the child process */
673
      if (context->pidfile != NULL)
674 675 676
        {
          DBusString u;

677
          _dbus_string_init_const (&u, context->pidfile);
678 679
          
          if (!_dbus_write_pid_file (&u, _dbus_getpid (), error))
680 681 682 683
	    {
	      _DBUS_ASSERT_ERROR_IS_SET (error);
	      goto failed;
	    }
684 685
        }
    }
686

687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721
  /* Write PID if requested */
  if (print_pid_fd >= 0)
    {
      DBusString pid;
      int bytes;

      if (!_dbus_string_init (&pid))
        {
          BUS_SET_OOM (error);
          goto failed;
        }
      
      if (!_dbus_string_append_int (&pid, _dbus_getpid ()) ||
          !_dbus_string_append (&pid, "\n"))
        {
          _dbus_string_free (&pid);
          BUS_SET_OOM (error);
          goto failed;
        }

      bytes = _dbus_string_get_length (&pid);
      if (_dbus_write (print_pid_fd, &pid, 0, bytes) != bytes)
        {
          dbus_set_error (error, DBUS_ERROR_FAILED,
                          "Printing message bus PID: %s\n",
                          _dbus_strerror (errno));
          _dbus_string_free (&pid);
          goto failed;
        }

      if (print_pid_fd > 2)
        _dbus_close (print_pid_fd, NULL);
      
      _dbus_string_free (&pid);
    }
722 723 724 725 726 727 728 729 730 731 732

  if (!bus_selinux_full_init ())
    {
      _dbus_warn ("SELinux initialization failed\n");
    }

  if (!process_config_postinit (context, parser, error))
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
733

734 735
  if (parser != NULL)
    bus_config_parser_unref (parser);
736
  
737 738 739
  /* Here we change our credentials if required,
   * as soon as we've set up our sockets and pidfile
   */
740
  if (context->user != NULL)
741 742 743 744
    {
      DBusCredentials creds;
      DBusString u;

745
      _dbus_string_init_const (&u, context->user);
746 747 748 749 750 751 752

      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\"",
753
                          context->user);
754 755 756 757
          goto failed;
        }
      
      if (!_dbus_change_identity (creds.uid, creds.gid, error))
758 759 760 761
	{
	  _DBUS_ASSERT_ERROR_IS_SET (error);
	  goto failed;
	}
762
    }
763
  
764
  dbus_server_free_data_slot (&server_data_slot);
765 766 767
  
  return context;
  
768
 failed:  
769 770
  if (parser != NULL)
    bus_config_parser_unref (parser);
771 772 773
  if (context != NULL)
    bus_context_unref (context);

774 775
  if (server_data_slot >= 0)
    dbus_server_free_data_slot (&server_data_slot);
776
  
777 778 779
  return NULL;
}

780 781 782 783
dbus_bool_t
bus_context_reload_config (BusContext *context,
			   DBusError  *error)
{
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
  BusConfigParser *parser;
  DBusString config_file;
  dbus_bool_t ret;

  ret = FALSE;
  _dbus_string_init_const (&config_file, context->config_file);
  parser = bus_config_load (&config_file, TRUE, NULL, error);
  if (parser == NULL)
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
  
  if (!process_config_every_time (context, parser, TRUE, error))
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
  if (!process_config_postinit (context, parser, error))
    {
      _DBUS_ASSERT_ERROR_IS_SET (error);
      goto failed;
    }
  ret = TRUE;

 failed:  
  if (parser != NULL)
    bus_config_parser_unref (parser);
  return ret;
813 814
}

815 816 817
static void
shutdown_server (BusContext *context,
                 DBusServer *server)
818
{
819 820
  if (server == NULL ||
      !dbus_server_get_is_connected (server))
821 822
    return;
  
823
  if (!dbus_server_set_watch_functions (server,
824
                                        NULL, NULL, NULL,
825 826 827 828
                                        context,
                                        NULL))
    _dbus_assert_not_reached ("setting watch functions to NULL failed");
  
829
  if (!dbus_server_set_timeout_functions (server,
830
                                          NULL, NULL, NULL,
831 832 833 834
                                          context,
                                          NULL))
    _dbus_assert_not_reached ("setting timeout functions to NULL failed");
  
835 836 837 838 839 840 841 842 843 844 845 846 847 848 849
  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);
    }
850 851
}

852
BusContext *
853 854 855 856
bus_context_ref (BusContext *context)
{
  _dbus_assert (context->refcount > 0);
  context->refcount += 1;
857 858

  return context;
859 860 861 862 863 864 865 866 867 868
}

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

  if (context->refcount == 0)
    {
869 870
      DBusList *link;
      
871 872
      _dbus_verbose ("Finalizing bus context %p\n", context);
      
873
      bus_context_shutdown (context);
874 875 876 877 878 879

      if (context->connections)
        {
          bus_connections_unref (context->connections);
          context->connections = NULL;
        }
880
      
881
      if (context->registry)
882 883 884 885 886
        {
          bus_registry_unref (context->registry);
          context->registry = NULL;
        }
      
887
      if (context->activation)
888 889 890 891
        {
          bus_activation_unref (context->activation);
          context->activation = NULL;
        }
892 893 894

      link = _dbus_list_get_first_link (&context->servers);
      while (link != NULL)
895
        {
896 897 898
          dbus_server_unref (link->data);
          
          link = _dbus_list_get_next_link (&context->servers, link);
899
        }
900
      _dbus_list_clear (&context->servers);
901

902
      if (context->policy)
903
        {
904 905
          bus_policy_unref (context->policy);
          context->policy = NULL;
906
        }
907
      
908 909
      if (context->loop)
        {
910
          _dbus_loop_unref (context->loop);
911 912
          context->loop = NULL;
        }
913 914 915 916 917 918

      if (context->matchmaker)
        {
          bus_matchmaker_unref (context->matchmaker);
          context->matchmaker = NULL;
        }
919
      
920
      dbus_free (context->config_file);
921
      dbus_free (context->type);
922
      dbus_free (context->address);
923
      dbus_free (context->user);
924 925 926 927 928 929 930 931 932 933 934 935 936 937

      if (context->pidfile)
	{
          DBusString u;
          _dbus_string_init_const (&u, context->pidfile);

          /* Deliberately ignore errors here, since there's not much
	   * we can do about it, and we're exiting anyways.
	   */
	  _dbus_delete_file (&u, NULL);

          dbus_free (context->pidfile); 
	}

938 939
      if (context->user_database != NULL)
	_dbus_user_database_unref (context->user_database);
940
      
941
      dbus_free (context);
942

943
      dbus_server_free_data_slot (&server_data_slot);
944 945 946
    }
}

947 948 949 950 951 952 953
/* type may be NULL */
const char*
bus_context_get_type (BusContext *context)
{
  return context->type;
}

954 955 956 957 958 959
const char*
bus_context_get_address (BusContext *context)
{
  return context->address;
}

960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976
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;
}
977

978 979 980 981 982 983
BusMatchmaker*
bus_context_get_matchmaker (BusContext  *context)
{
  return context->matchmaker;
}

984
DBusLoop*
985 986 987 988 989
bus_context_get_loop (BusContext *context)
{
  return context->loop;
}

990 991 992 993 994 995
DBusUserDatabase*
bus_context_get_user_database (BusContext *context)
{
  return context->user_database;
}

996 997 998 999
dbus_bool_t
bus_context_allow_user (BusContext   *context,
                        unsigned long uid)
{
1000 1001 1002
  return bus_policy_allow_user (context->policy,
                                context->user_database,
                                uid);
1003 1004
}

1005 1006 1007 1008 1009 1010
BusPolicy *
bus_context_get_policy (BusContext *context)
{
  return context->policy;
}

1011 1012
BusClientPolicy*
bus_context_create_client_policy (BusContext      *context,
1013 1014
                                  DBusConnection  *connection,
                                  DBusError       *error)
1015
{
1016 1017 1018
  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
  return bus_policy_create_client_policy (context->policy, connection,
                                          error);
1019
}
1020 1021 1022 1023 1024

int
bus_context_get_activation_timeout (BusContext *context)
{
  
1025
  return context->limits.activation_timeout;
1026
}
1027

1028 1029 1030
int
bus_context_get_auth_timeout (BusContext *context)
{
1031
  return context->limits.auth_timeout;
1032 1033 1034 1035 1036
}

int
bus_context_get_max_completed_connections (BusContext *context)
{
1037
  return context->limits.max_completed_connections;
1038 1039 1040 1041 1042
}

int
bus_context_get_max_incomplete_connections (BusContext *context)
{
1043
  return context->limits.max_incomplete_connections;
1044 1045 1046 1047 1048
}

int
bus_context_get_max_connections_per_user (BusContext *context)
{
1049
  return context->limits.max_connections_per_user;
1050 1051
}

1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063
int
bus_context_get_max_pending_activations (BusContext *context)
{
  return context->limits.max_pending_activations;
}

int
bus_context_get_max_services_per_connection (BusContext *context)
{
  return context->limits.max_services_per_connection;
}

1064 1065 1066 1067 1068 1069
int
bus_context_get_max_match_rules_per_connection (BusContext *context)
{
  return context->limits.max_match_rules_per_connection;
}

1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081
int
bus_context_get_max_replies_per_connection (BusContext *context)
{
  return context->limits.max_replies_per_connection;
}

int
bus_context_get_reply_timeout (BusContext *context)
{
  return context->limits.reply_timeout;
}

1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094
/*
 * addressed_recipient is the recipient specified in the message.
 *
 * proposed_recipient is the recipient we're considering sending
 * to right this second, and may be an eavesdropper.
 *
 * sender is the sender of the message.
 *
 * NULL for proposed_recipient or sender definitely means the bus driver.
 *
 * NULL for addressed_recipient may mean the bus driver, or may mean
 * no destination was specified in the message (e.g. a signal).
 */
1095 1096
dbus_bool_t
bus_context_check_security_policy (BusContext     *context,
1097
                                   BusTransaction *transaction,
1098
                                   DBusConnection *sender,
1099 1100
                                   DBusConnection *addressed_recipient,
                                   DBusConnection *proposed_recipient,
1101 1102 1103 1104 1105
                                   DBusMessage    *message,
                                   DBusError      *error)
{
  BusClientPolicy *sender_policy;
  BusClientPolicy *recipient_policy;
1106
  int type;
1107
  dbus_bool_t requested_reply;
1108 1109 1110 1111 1112
  
  type = dbus_message_get_type (message);
  
  /* dispatch.c was supposed to ensure these invariants */
  _dbus_assert (dbus_message_get_destination (message) != NULL ||
1113 1114
                type == DBUS_MESSAGE_TYPE_SIGNAL ||
                (sender == NULL && !bus_connection_is_active (proposed_recipient)));
1115 1116
  _dbus_assert (type == DBUS_MESSAGE_TYPE_SIGNAL ||
                addressed_recipient != NULL ||
1117
                strcmp (dbus_message_get_destination (message), DBUS_SERVICE_DBUS) == 0);
1118
  
1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138
  switch (type)
    {
    case DBUS_MESSAGE_TYPE_METHOD_CALL:
    case DBUS_MESSAGE_TYPE_SIGNAL:
    case DBUS_MESSAGE_TYPE_METHOD_RETURN:
    case DBUS_MESSAGE_TYPE_ERROR:
      break;
      
    default:
      _dbus_verbose ("security check disallowing message of unknown type %d\n",
                     type);

      dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
                      "Message bus will not accept messages of unknown type\n");
              
      return FALSE;
    }

  requested_reply = FALSE;
  
1139 1140
  if (sender != NULL)
    {
1141 1142 1143 1144
      const char *dest;

      dest = dbus_message_get_destination (message);
	
1145 1146 1147
      /* First verify the SELinux access controls.  If allowed then
       * go on with the standard checks.
       */
1148 1149 1150 1151 1152
      if (!bus_selinux_allows_send (sender, proposed_recipient,
				    dbus_message_type_to_string (dbus_message_get_type (message)),
				    dbus_message_get_interface (message),
				    dbus_message_get_member (message),
				    dbus_message_get_error_name (message),
1153
				    dest ? dest : DBUS_SERVICE_DBUS, error))
1154
        {
1155 1156 1157 1158 1159 1160 1161 1162

	  if (dbus_error_is_set (error) &&
	      dbus_error_has_name (error, DBUS_ERROR_NO_MEMORY))
	    {
	      return FALSE;
	    }
	  

1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173
          dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
                          "An SELinux policy prevents this sender "
                          "from sending this message to this recipient "
                          "(rejected message had interface \"%s\" "
                          "member \"%s\" error name \"%s\" destination \"%s\")",
                          dbus_message_get_interface (message) ?
                          dbus_message_get_interface (message) : "(unset)",
                          dbus_message_get_member (message) ?
                          dbus_message_get_member (message) : "(unset)",
                          dbus_message_get_error_name (message) ?
                          dbus_message_get_error_name (message) : "(unset)",
1174
                          dest ? dest : DBUS_SERVICE_DBUS);
1175 1176 1177 1178
          _dbus_verbose ("SELinux security check denying send to service\n");
          return FALSE;
        }
       
1179
      if (bus_connection_is_active (sender))
1180
        {
1181 1182
          sender_policy = bus_connection_get_policy (sender);
          _dbus_assert (sender_policy != NULL);
1183 1184 1185 1186 1187
          
          /* Fill in requested_reply variable with TRUE if this is a
           * reply and the reply was pending.
           */
          if (dbus_message_get_reply_serial (message) != 0)
1188 1189
            {
              if (proposed_recipient != NULL /* not to the bus driver */ &&
1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204
                  addressed_recipient == proposed_recipient /* not eavesdropping */)
                {
                  DBusError error2;                  
                  
                  dbus_error_init (&error2);
                  requested_reply = bus_connections_check_reply (bus_connection_get_connections (sender),
                                                                 transaction,
                                                                 sender, addressed_recipient, message,
                                                                 &error2);
                  if (dbus_error_is_set (&error2))
                    {
                      dbus_move_error (&error2, error);
                      return FALSE;
                    }
                }
1205
            }
1206 1207 1208 1209 1210 1211
        }
      else
        {
          /* Policy for inactive connections is that they can only send
           * the hello message to the bus driver
           */
1212
          if (proposed_recipient == NULL &&
1213
              dbus_message_is_method_call (message,
1214
                                           DBUS_INTERFACE_DBUS,
1215
                                           "Hello"))
1216 1217
            {
              _dbus_verbose ("security check allowing %s message\n",
1218
                             "Hello");
1219 1220 1221 1222 1223
              return TRUE;
            }
          else
            {
              _dbus_verbose ("security check disallowing non-%s message\n",
1224
                             "Hello");
1225 1226 1227

              dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
                              "Client tried to send a message other than %s without being registered",
1228
                              "Hello");
1229 1230 1231
              
              return FALSE;
            }
1232
        }
1233 1234
    }
  else
1235 1236 1237 1238 1239 1240 1241 1242 1243 1244
    {
      sender_policy = NULL;

      /* If the sender is the bus driver, we assume any reply was a
       * requested reply as bus driver won't send bogus ones
       */
      if (addressed_recipient == proposed_recipient /* not eavesdropping */ &&
          dbus_message_get_reply_serial (message) != 0)
        requested_reply = TRUE;
    }
1245

1246 1247 1248
  _dbus_assert ((sender != NULL && sender_policy != NULL) ||
                (sender == NULL && sender_policy == NULL));
  
1249
  if (proposed_recipient != NULL)
1250
    {
1251 1252 1253 1254
      /* only the bus driver can send to an inactive recipient (as it
       * owns no services, so other apps can't address it). Inactive
       * recipients can receive any message.
       */
1255
      if (bus_connection_is_active (proposed_recipient))
1256
        {
1257
          recipient_policy = bus_connection_get_policy (proposed_recipient);
1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268
          _dbus_assert (recipient_policy != NULL);
        }
      else if (sender == NULL)
        {
          _dbus_verbose ("security check using NULL recipient policy for message from bus\n");
          recipient_policy = NULL;
        }
      else
        {
          _dbus_assert_not_reached ("a message was somehow sent to an inactive recipient from a source other than the message bus\n");
          recipient_policy = NULL;
1269
        }
1270 1271 1272
    }
  else
    recipient_policy = NULL;
1273
  
1274 1275 1276
  _dbus_assert ((proposed_recipient != NULL && recipient_policy != NULL) ||
                (proposed_recipient != NULL && sender == NULL && recipient_policy == NULL) ||
                (proposed_recipient == NULL && recipient_policy == NULL));
1277 1278
  
  if (sender_policy &&
1279
      !bus_client_policy_check_can_send (sender_policy,
1280 1281 1282
                                         context->registry,
                                         requested_reply,
                                         proposed_recipient,
1283 1284
                                         message))
    {
1285 1286 1287
      const char *dest;

      dest = dbus_message_get_destination (message);
1288 1289 1290 1291
      dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
                      "A security policy in place prevents this sender "
                      "from sending this message to this recipient, "
                      "see message bus configuration file (rejected message "
1292 1293 1294 1295 1296 1297 1298
                      "had interface \"%s\" member \"%s\" error name \"%s\" destination \"%s\")",
                      dbus_message_get_interface (message) ?
                      dbus_message_get_interface (message) : "(unset)",
                      dbus_message_get_member (message) ?
                      dbus_message_get_member (message) : "(unset)",
                      dbus_message_get_error_name (message) ?
                      dbus_message_get_error_name (message) : "(unset)",
1299
                      dest ? dest : DBUS_SERVICE_DBUS);
1300
      _dbus_verbose ("security policy disallowing message due to sender policy\n");
1301 1302 1303
      return FALSE;
    }

1304
  if (recipient_policy &&
1305
      !bus_client_policy_check_can_receive (recipient_policy,
1306 1307 1308
                                            context->registry,
                                            requested_reply,
                                            sender,
1309
                                            addressed_recipient, proposed_recipient,
1310 1311
                                            message))
    {
1312 1313 1314
      const char *dest;

      dest = dbus_message_get_destination (message);
1315 1316 1317 1318
      dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
                      "A security policy in place prevents this recipient "
                      "from receiving this message from this sender, "
                      "see message bus configuration file (rejected message "
1319
                      "had interface \"%s\" member \"%s\" error name \"%s\" destination \"%s\" reply serial %u requested_reply=%d)",
1320 1321 1322 1323 1324 1325
                      dbus_message_get_interface (message) ?
                      dbus_message_get_interface (message) : "(unset)",
                      dbus_message_get_member (message) ?
                      dbus_message_get_member (message) : "(unset)",
                      dbus_message_get_error_name (message) ?
                      dbus_message_get_error_name (message) : "(unset)",
1326
                      dest ? dest : DBUS_SERVICE_DBUS,
1327 1328
                      dbus_message_get_reply_serial (message),
                      requested_reply);
1329
      _dbus_verbose ("security policy disallowing message due to recipient policy\n");
1330 1331 1332
      return FALSE;
    }

1333
  /* See if limits on size have been exceeded */
1334 1335
  if (proposed_recipient &&
      dbus_connection_get_outgoing_size (proposed_recipient) >
1336
      context->limits.max_outgoing_bytes)
1337
    {
1338 1339 1340
      const char *dest;

      dest = dbus_message_get_destination (message);
1341 1342
      dbus_set_error (error, DBUS_ERROR_LIMITS_EXCEEDED,
                      "The destination service \"%s\" has a full message queue",
1343 1344
                      dest ? dest : (proposed_recipient ?
                                     bus_connection_get_name (proposed_recipient) : 
1345
                                     DBUS_SERVICE_DBUS));
1346
      _dbus_verbose ("security policy disallowing message due to full message queue\n");
1347 1348
      return FALSE;
    }
1349

1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366
  if (type == DBUS_MESSAGE_TYPE_METHOD_CALL)
    {
      /* Record that we will allow a reply here in the future (don't
       * bother if the recipient is the bus). Only the addressed recipient
       * may reply.
       */
      if (sender && addressed_recipient &&
          !bus_connections_expect_reply (bus_connection_get_connections (sender),
                                         transaction,
                                         sender, addressed_recipient,
                                         message, error))
        {
          _dbus_verbose ("Failed to record reply expectation or problem with the message expecting a reply\n");
          return FALSE;
        }
    }
  
1367
  _dbus_verbose ("security policy allowing message\n");
1368 1369
  return TRUE;
}