bus/bus.c

   1 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
   2 /* bus.c  message bus context object
   3  *
   4  * Copyright (C) 2003, 2004 Red Hat, Inc.
   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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  *
  22  */
  23
  24 #include "bus.h"
  25 #include "activation.h"
  26 #include "connection.h"
  27 #include "services.h"
  28 #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 #include <dbus/dbus-list.h>
  35 #include <dbus/dbus-hash.h>
  36 #include <dbus/dbus-internals.h>
  37
  38 struct BusContext
  39 {
  40   int refcount;
  41   DBusGUID uuid;
  42   char *config_file;
  43   char *type;
  44   char *servicehelper;
  45   char *address;
  46   char *pidfile;
  47   char *user;
  48   DBusLoop *loop;
  49   DBusList *servers;
  50   BusConnections *connections;
  51   BusActivation *activation;
  52   BusRegistry *registry;
  53   BusPolicy *policy;
  54   BusMatchmaker *matchmaker;
  55   BusLimits limits;
  56   unsigned int fork : 1;
  57 };
  58
  59 static dbus_int32_t server_data_slot = -1;
  60
  61 typedef struct
  62 {
  63   BusContext *context;
  64 } BusServerData;
  65
  66 #define BUS_SERVER_DATA(server) (dbus_server_get_data ((server), server_data_slot))
  67
  68 static BusContext*
  69 server_get_context (DBusServer *server)
  70 {
  71   BusContext *context;
  72   BusServerData *bd;
  73
  74   if (!dbus_server_allocate_data_slot (&server_data_slot))
  75     return NULL;
  76
  77   bd = BUS_SERVER_DATA (server);
  78   if (bd == NULL)
  79     {
  80       dbus_server_free_data_slot (&server_data_slot);
  81       return NULL;
  82     }
  83
  84   context = bd->context;
  85
  86   dbus_server_free_data_slot (&server_data_slot);
  87
  88   return context;
  89 }
  90
  91 static dbus_bool_t
  92 server_watch_callback (DBusWatch     *watch,
  93                        unsigned int   condition,
  94                        void          *data)
  95 {
  96   /* FIXME this can be done in dbus-mainloop.c
  97    * if the code in activation.c for the babysitter
  98    * watch handler is fixed.
  99    */
 100
 101   return dbus_watch_handle (watch, condition);
 102 }
 103
 104 static dbus_bool_t
 105 add_server_watch (DBusWatch  *watch,
 106                   void       *data)
 107 {
 108   DBusServer *server = data;
 109   BusContext *context;
 110
 111   context = server_get_context (server);
 112
 113   return _dbus_loop_add_watch (context->loop,
 114                                watch, server_watch_callback, server,
 115                                NULL);
 116 }
 117
 118 static void
 119 remove_server_watch (DBusWatch  *watch,
 120                      void       *data)
 121 {
 122   DBusServer *server = data;
 123   BusContext *context;
 124
 125   context = server_get_context (server);
 126
 127   _dbus_loop_remove_watch (context->loop,
 128                            watch, server_watch_callback, server);
 129 }
 130
 131
 132 static void
 133 server_timeout_callback (DBusTimeout   *timeout,
 134                          void          *data)
 135 {
 136   /* can return FALSE on OOM but we just let it fire again later */
 137   dbus_timeout_handle (timeout);
 138 }
 139
 140 static dbus_bool_t
 141 add_server_timeout (DBusTimeout *timeout,
 142                     void        *data)
 143 {
 144   DBusServer *server = data;
 145   BusContext *context;
 146
 147   context = server_get_context (server);
 148
 149   return _dbus_loop_add_timeout (context->loop,
 150                                  timeout, server_timeout_callback, server, NULL);
 151 }
 152
 153 static void
 154 remove_server_timeout (DBusTimeout *timeout,
 155                        void        *data)
 156 {
 157   DBusServer *server = data;
 158   BusContext *context;
 159
 160   context = server_get_context (server);
 161
 162   _dbus_loop_remove_timeout (context->loop,
 163                              timeout, server_timeout_callback, server);
 164 }
 165
 166 static void
 167 new_connection_callback (DBusServer     *server,
 168                          DBusConnection *new_connection,
 169                          void           *data)
 170 {
 171   BusContext *context = data;
 172
 173   if (!bus_connections_setup_connection (context->connections, new_connection))
 174     {
 175       _dbus_verbose ("No memory to setup new connection\n");
 176
 177       /* if we don't do this, it will get unref'd without
 178        * being disconnected... kind of strange really
 179        * that we have to do this, people won't get it right
 180        * in general.
 181        */
 182       dbus_connection_close (new_connection);
 183     }
 184
 185   dbus_connection_set_max_received_size (new_connection,
 186                                          context->limits.max_incoming_bytes);
 187
 188   dbus_connection_set_max_message_size (new_connection,
 189                                         context->limits.max_message_size);
 190
 191   /* on OOM, we won't have ref'd the connection so it will die. */
 192 }
 193
 194 static void
 195 free_server_data (void *data)
 196 {
 197   BusServerData *bd = data;
 198
 199   dbus_free (bd);
 200 }
 201
 202 static dbus_bool_t
 203 setup_server (BusContext *context,
 204               DBusServer *server,
 205               char      **auth_mechanisms,
 206               DBusError  *error)
 207 {
 208   BusServerData *bd;
 209
 210   bd = dbus_new0 (BusServerData, 1);
 211   if (!dbus_server_set_data (server,
 212                              server_data_slot,
 213                              bd, free_server_data))
 214     {
 215       dbus_free (bd);
 216       BUS_SET_OOM (error);
 217       return FALSE;
 218     }
 219
 220   bd->context = context;
 221
 222   if (!dbus_server_set_auth_mechanisms (server, (const char**) auth_mechanisms))
 223     {
 224       BUS_SET_OOM (error);
 225       return FALSE;
 226     }
 227
 228   dbus_server_set_new_connection_function (server,
 229                                            new_connection_callback,
 230                                            context, NULL);
 231
 232   if (!dbus_server_set_watch_functions (server,
 233                                         add_server_watch,
 234                                         remove_server_watch,
 235                                         NULL,
 236                                         server,
 237                                         NULL))
 238     {
 239       BUS_SET_OOM (error);
 240       return FALSE;
 241     }
 242
 243   if (!dbus_server_set_timeout_functions (server,
 244                                           add_server_timeout,
 245                                           remove_server_timeout,
 246                                           NULL,
 247                                           server, NULL))
 248     {
 249       BUS_SET_OOM (error);
 250       return FALSE;
 251     }
 252
 253   return TRUE;
 254 }
 255
 256 /* This code only gets executed the first time the
 257  * config files are parsed.  It is not executed
 258  * when config files are reloaded.
 259  */
 260 static dbus_bool_t
 261 process_config_first_time_only (BusContext      *context,
 262                                 BusConfigParser *parser,
 263                                 DBusError       *error)
 264 {
 265   DBusList *link;
 266   DBusList **addresses;
 267   const char *user, *pidfile;
 268   char **auth_mechanisms;
 269   DBusList **auth_mechanisms_list;
 270   int len;
 271   dbus_bool_t retval;
 272
 273   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
 274
 275   retval = FALSE;
 276   auth_mechanisms = NULL;
 277
 278   /* Check for an existing pid file. Of course this is a race;
 279    * we'd have to use fcntl() locks on the pid file to
 280    * avoid that. But we want to check for the pid file
 281    * before overwriting any existing sockets, etc.
 282    */
 283   pidfile = bus_config_parser_get_pidfile (parser);
 284   if (pidfile != NULL)
 285     {
 286       DBusString u;
 287       DBusStat stbuf;
 288
 289       _dbus_string_init_const (&u, pidfile);
 290
 291       if (_dbus_stat (&u, &stbuf, NULL))
 292         {
 293           dbus_set_error (error, DBUS_ERROR_FAILED,
 294                           "The pid file \"%s\" exists, if the message bus is not running, remove this file",
 295                           pidfile);
 296           goto failed;
 297         }
 298     }
 299
 300   /* keep around the pid filename so we can delete it later */
 301   context->pidfile = _dbus_strdup (pidfile);
 302
 303   /* Build an array of auth mechanisms */
 304
 305   auth_mechanisms_list = bus_config_parser_get_mechanisms (parser);
 306   len = _dbus_list_get_length (auth_mechanisms_list);
 307
 308   if (len > 0)
 309     {
 310       int i;
 311
 312       auth_mechanisms = dbus_new0 (char*, len + 1);
 313       if (auth_mechanisms == NULL)
 314         {
 315           BUS_SET_OOM (error);
 316           goto failed;
 317         }
 318
 319       i = 0;
 320       link = _dbus_list_get_first_link (auth_mechanisms_list);
 321       while (link != NULL)
 322         {
 323           auth_mechanisms[i] = _dbus_strdup (link->data);
 324           if (auth_mechanisms[i] == NULL)
 325             {
 326               BUS_SET_OOM (error);
 327               goto failed;
 328             }
 329           link = _dbus_list_get_next_link (auth_mechanisms_list, link);
 330         }
 331     }
 332   else
 333     {
 334       auth_mechanisms = NULL;
 335     }
 336
 337   /* Listen on our addresses */
 338
 339   addresses = bus_config_parser_get_addresses (parser);
 340
 341   link = _dbus_list_get_first_link (addresses);
 342   while (link != NULL)
 343     {
 344       DBusServer *server;
 345
 346       server = dbus_server_listen (link->data, error);
 347       if (server == NULL)
 348         {
 349           _DBUS_ASSERT_ERROR_IS_SET (error);
 350           goto failed;
 351         }
 352       else if (!setup_server (context, server, auth_mechanisms, error))
 353         {
 354           _DBUS_ASSERT_ERROR_IS_SET (error);
 355           goto failed;
 356         }
 357
 358       if (!_dbus_list_append (&context->servers, server))
 359         {
 360           BUS_SET_OOM (error);
 361           goto failed;
 362         }
 363
 364       link = _dbus_list_get_next_link (addresses, link);
 365     }
 366
 367   /* note that type may be NULL */
 368   context->type = _dbus_strdup (bus_config_parser_get_type (parser));
 369   if (bus_config_parser_get_type (parser) != NULL && context->type == NULL)
 370     {
 371       BUS_SET_OOM (error);
 372       goto failed;
 373     }
 374
 375   user = bus_config_parser_get_user (parser);
 376   if (user != NULL)
 377     {
 378       context->user = _dbus_strdup (user);
 379       if (context->user == NULL)
 380         {
 381           BUS_SET_OOM (error);
 382           goto failed;
 383         }
 384     }
 385
 386   context->fork = bus_config_parser_get_fork (parser);
 387
 388   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
 389   retval = TRUE;
 390
 391  failed:
 392   dbus_free_string_array (auth_mechanisms);
 393   return retval;
 394 }
 395
 396 /* This code gets executed every time the config files
 397  * are parsed: both during BusContext construction
 398  * and on reloads. This function is slightly screwy
 399  * since it can do a "half reload" in out-of-memory
 400  * situations. Realistically, unlikely to ever matter.
 401  */
 402 static dbus_bool_t
 403 process_config_every_time (BusContext      *context,
 404                            BusConfigParser *parser,
 405                            dbus_bool_t      is_reload,
 406                            DBusError       *error)
 407 {
 408   DBusString full_address;
 409   DBusList *link;
 410   DBusList **dirs;
 411   BusActivation *new_activation;
 412   char *addr;
 413   const char *servicehelper;
 414   char *s;
 415
 416   dbus_bool_t retval;
 417
 418   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
 419
 420   addr = NULL;
 421   retval = FALSE;
 422
 423   if (!_dbus_string_init (&full_address))
 424     {
 425       BUS_SET_OOM (error);
 426       return FALSE;
 427     }
 428
 429   /* get our limits and timeout lengths */
 430   bus_config_parser_get_limits (parser, &context->limits);
 431
 432   context->policy = bus_config_parser_steal_policy (parser);
 433   _dbus_assert (context->policy != NULL);
 434
 435   /* We have to build the address backward, so that
 436    * <listen> later in the config file have priority
 437    */
 438   link = _dbus_list_get_last_link (&context->servers);
 439   while (link != NULL)
 440     {
 441       addr = dbus_server_get_address (link->data);
 442       if (addr == NULL)
 443         {
 444           BUS_SET_OOM (error);
 445           goto failed;
 446         }
 447
 448       if (_dbus_string_get_length (&full_address) > 0)
 449         {
 450           if (!_dbus_string_append (&full_address, ";"))
 451             {
 452               BUS_SET_OOM (error);
 453               goto failed;
 454             }
 455         }
 456
 457       if (!_dbus_string_append (&full_address, addr))
 458         {
 459           BUS_SET_OOM (error);
 460           goto failed;
 461         }
 462
 463       dbus_free (addr);
 464       addr = NULL;
 465
 466       link = _dbus_list_get_prev_link (&context->servers, link);
 467     }
 468
 469   if (is_reload)
 470     dbus_free (context->address);
 471
 472   if (!_dbus_string_copy_data (&full_address, &context->address))
 473     {
 474       BUS_SET_OOM (error);
 475       goto failed;
 476     }
 477
 478   /* get the service directories */
 479   dirs = bus_config_parser_get_service_dirs (parser);
 480
 481   /* and the service helper */
 482   servicehelper = bus_config_parser_get_servicehelper (parser);
 483
 484   s = _dbus_strdup(servicehelper);
 485   if (s == NULL && servicehelper != NULL)
 486     {
 487       BUS_SET_OOM (error);
 488       goto failed;
 489     }
 490   else
 491     {
 492       dbus_free(context->servicehelper);
 493       context->servicehelper = s;
 494     }
 495
 496   /* Create activation subsystem */
 497   new_activation = bus_activation_new (context, &full_address,
 498                                        dirs, error);
 499   if (new_activation == NULL)
 500     {
 501       _DBUS_ASSERT_ERROR_IS_SET (error);
 502       goto failed;
 503     }
 504
 505   if (is_reload)
 506     bus_activation_unref (context->activation);
 507
 508   context->activation = new_activation;
 509
 510   /* Drop existing conf-dir watches (if applicable) */
 511
 512   if (is_reload)
 513     bus_drop_all_directory_watches ();
 514
 515   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
 516   retval = TRUE;
 517
 518  failed:
 519   _dbus_string_free (&full_address);
 520
 521   if (addr)
 522     dbus_free (addr);
 523
 524   return retval;
 525 }
 526
 527 static dbus_bool_t
 528 process_config_postinit (BusContext      *context,
 529                          BusConfigParser *parser,
 530                          DBusError       *error)
 531 {
 532   DBusHashTable *service_context_table;
 533
 534   service_context_table = bus_config_parser_steal_service_context_table (parser);
 535   if (!bus_registry_set_service_context_table (context->registry,
 536                                                service_context_table))
 537     {
 538       BUS_SET_OOM (error);
 539       return FALSE;
 540     }
 541
 542   _dbus_hash_table_unref (service_context_table);
 543
 544   /* Watch all conf directories */
 545   _dbus_list_foreach (bus_config_parser_get_conf_dirs (parser),
 546                       (DBusForeachFunction) bus_watch_directory,
 547                       context);
 548
 549   return TRUE;
 550 }
 551
 552 BusContext*
 553 bus_context_new (const DBusString *config_file,
 554                  ForceForkSetting  force_fork,
 555                  DBusPipe         *print_addr_pipe,
 556                  DBusPipe         *print_pid_pipe,
 557                  DBusError        *error)
 558 {
 559   BusContext *context;
 560   BusConfigParser *parser;
 561
 562   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
 563
 564   context = NULL;
 565   parser = NULL;
 566
 567   if (!dbus_server_allocate_data_slot (&server_data_slot))
 568     {
 569       BUS_SET_OOM (error);
 570       return NULL;
 571     }
 572
 573   context = dbus_new0 (BusContext, 1);
 574   if (context == NULL)
 575     {
 576       BUS_SET_OOM (error);
 577       goto failed;
 578     }
 579   context->refcount = 1;
 580
 581   _dbus_generate_uuid (&context->uuid);
 582
 583   if (!_dbus_string_copy_data (config_file, &context->config_file))
 584     {
 585       BUS_SET_OOM (error);
 586       goto failed;
 587     }
 588
 589   context->loop = _dbus_loop_new ();
 590   if (context->loop == NULL)
 591     {
 592       BUS_SET_OOM (error);
 593       goto failed;
 594     }
 595
 596   context->registry = bus_registry_new (context);
 597   if (context->registry == NULL)
 598     {
 599       BUS_SET_OOM (error);
 600       goto failed;
 601     }
 602
 603   parser = bus_config_load (config_file, TRUE, NULL, error);
 604   if (parser == NULL)
 605     {
 606       _DBUS_ASSERT_ERROR_IS_SET (error);
 607       goto failed;
 608     }
 609
 610   if (!process_config_first_time_only (context, parser, error))
 611     {
 612       _DBUS_ASSERT_ERROR_IS_SET (error);
 613       goto failed;
 614     }
 615   if (!process_config_every_time (context, parser, FALSE, error))
 616     {
 617       _DBUS_ASSERT_ERROR_IS_SET (error);
 618       goto failed;
 619     }
 620
 621   /* we need another ref of the server data slot for the context
 622    * to own
 623    */
 624   if (!dbus_server_allocate_data_slot (&server_data_slot))
 625     _dbus_assert_not_reached ("second ref of server data slot failed");
 626
 627   /* Note that we don't know whether the print_addr_pipe is
 628    * one of the sockets we're using to listen on, or some
 629    * other random thing. But I think the answer is "don't do
 630    * that then"
 631    */
 632   if (print_addr_pipe != NULL && _dbus_pipe_is_valid (print_addr_pipe))
 633     {
 634       DBusString addr;
 635       const char *a = bus_context_get_address (context);
 636       int bytes;
 637
 638       _dbus_assert (a != NULL);
 639       if (!_dbus_string_init (&addr))
 640         {
 641           BUS_SET_OOM (error);
 642           goto failed;
 643         }
 644
 645       if (!_dbus_string_append (&addr, a) ||
 646           !_dbus_string_append (&addr, "\n"))
 647         {
 648           _dbus_string_free (&addr);
 649           BUS_SET_OOM (error);
 650           goto failed;
 651         }
 652
 653       bytes = _dbus_string_get_length (&addr);
 654       if (_dbus_pipe_write (print_addr_pipe, &addr, 0, bytes, error) != bytes)
 655         {
 656           /* pipe write returns an error on failure but not short write */
 657           if (error != NULL && !dbus_error_is_set (error))
 658             {
 659               dbus_set_error (error, DBUS_ERROR_FAILED,
 660                               "Printing message bus address: did not write all bytes\n");
 661             }
 662           _dbus_string_free (&addr);
 663           goto failed;
 664         }
 665
 666       if (!_dbus_pipe_is_stdout_or_stderr (print_addr_pipe))
 667         _dbus_pipe_close (print_addr_pipe, NULL);
 668
 669       _dbus_string_free (&addr);
 670     }
 671
 672   context->connections = bus_connections_new (context);
 673   if (context->connections == NULL)
 674     {
 675       BUS_SET_OOM (error);
 676       goto failed;
 677     }
 678
 679   context->matchmaker = bus_matchmaker_new ();
 680   if (context->matchmaker == NULL)
 681     {
 682       BUS_SET_OOM (error);
 683       goto failed;
 684     }
 685
 686   /* check user before we fork */
 687   if (context->user != NULL)
 688     {
 689       if (!_dbus_verify_daemon_user (context->user))
 690         {
 691           dbus_set_error (error, DBUS_ERROR_FAILED,
 692                           "Could not get UID and GID for username \"%s\"",
 693                           context->user);
 694           goto failed;
 695         }
 696     }
 697
 698   /* Now become a daemon if appropriate and write out pid file in any case */
 699   {
 700     DBusString u;
 701
 702     if (context->pidfile)
 703       _dbus_string_init_const (&u, context->pidfile);
 704
 705     if ((force_fork != FORK_NEVER && context->fork) || force_fork == FORK_ALWAYS)
 706       {
 707         _dbus_verbose ("Forking and becoming daemon\n");
 708
 709         if (!_dbus_become_daemon (context->pidfile ? &u : NULL,
 710                                   print_pid_pipe,
 711                                   error))
 712           {
 713             _DBUS_ASSERT_ERROR_IS_SET (error);
 714             goto failed;
 715           }
 716       }
 717     else
 718       {
 719         _dbus_verbose ("Fork not requested\n");
 720
 721         /* Need to write PID file and to PID pipe for ourselves,
 722          * not for the child process. This is a no-op if the pidfile
 723          * is NULL and print_pid_pipe is NULL.
 724          */
 725         if (!_dbus_write_pid_to_file_and_pipe (context->pidfile ? &u : NULL,
 726                                                print_pid_pipe,
 727                                                _dbus_getpid (),
 728                                                error))
 729           {
 730             _DBUS_ASSERT_ERROR_IS_SET (error);
 731             goto failed;
 732           }
 733       }
 734   }
 735
 736   if (print_pid_pipe && _dbus_pipe_is_valid (print_pid_pipe) &&
 737       !_dbus_pipe_is_stdout_or_stderr (print_pid_pipe))
 738     _dbus_pipe_close (print_pid_pipe, NULL);
 739
 740   if (!process_config_postinit (context, parser, error))
 741     {
 742       _DBUS_ASSERT_ERROR_IS_SET (error);
 743       goto failed;
 744     }
 745
 746   if (parser != NULL)
 747     {
 748       bus_config_parser_unref (parser);
 749       parser = NULL;
 750     }
 751
 752   /* Here we change our credentials if required,
 753    * as soon as we've set up our sockets and pidfile
 754    */
 755   if (context->user != NULL)
 756     {
 757       if (!_dbus_change_to_daemon_user (context->user, error))
 758         {
 759           _DBUS_ASSERT_ERROR_IS_SET (error);
 760           goto failed;
 761         }
 762     }
 763
 764   if (!bus_selinux_full_init ())
 765     {
 766       _dbus_warn ("SELinux initialization failed\n");
 767     }
 768
 769   dbus_server_free_data_slot (&server_data_slot);
 770
 771   return context;
 772
 773  failed:
 774   if (parser != NULL)
 775     bus_config_parser_unref (parser);
 776   if (context != NULL)
 777     bus_context_unref (context);
 778
 779   if (server_data_slot >= 0)
 780     dbus_server_free_data_slot (&server_data_slot);
 781
 782   return NULL;
 783 }
 784
 785 dbus_bool_t
 786 bus_context_get_id (BusContext       *context,
 787                     DBusString       *uuid)
 788 {
 789   return _dbus_uuid_encode (&context->uuid, uuid);
 790 }
 791
 792 dbus_bool_t
 793 bus_context_reload_config (BusContext *context,
 794                            DBusError  *error)
 795 {
 796   BusConfigParser *parser;
 797   DBusString config_file;
 798   dbus_bool_t ret;
 799
 800   /* Flush the user database cache */
 801   _dbus_flush_caches ();
 802
 803   ret = FALSE;
 804   _dbus_string_init_const (&config_file, context->config_file);
 805   parser = bus_config_load (&config_file, TRUE, NULL, error);
 806   if (parser == NULL)
 807     {
 808       _DBUS_ASSERT_ERROR_IS_SET (error);
 809       goto failed;
 810     }
 811
 812   if (!process_config_every_time (context, parser, TRUE, error))
 813     {
 814       _DBUS_ASSERT_ERROR_IS_SET (error);
 815       goto failed;
 816     }
 817   if (!process_config_postinit (context, parser, error))
 818     {
 819       _DBUS_ASSERT_ERROR_IS_SET (error);
 820       goto failed;
 821     }
 822   ret = TRUE;
 823
 824  failed:
 825   if (parser != NULL)
 826     bus_config_parser_unref (parser);
 827   return ret;
 828 }
 829
 830 static void
 831 shutdown_server (BusContext *context,
 832                  DBusServer *server)
 833 {
 834   if (server == NULL ||
 835       !dbus_server_get_is_connected (server))
 836     return;
 837
 838   if (!dbus_server_set_watch_functions (server,
 839                                         NULL, NULL, NULL,
 840                                         context,
 841                                         NULL))
 842     _dbus_assert_not_reached ("setting watch functions to NULL failed");
 843
 844   if (!dbus_server_set_timeout_functions (server,
 845                                           NULL, NULL, NULL,
 846                                           context,
 847                                           NULL))
 848     _dbus_assert_not_reached ("setting timeout functions to NULL failed");
 849
 850   dbus_server_disconnect (server);
 851 }
 852
 853 void
 854 bus_context_shutdown (BusContext  *context)
 855 {
 856   DBusList *link;
 857
 858   link = _dbus_list_get_first_link (&context->servers);
 859   while (link != NULL)
 860     {
 861       shutdown_server (context, link->data);
 862
 863       link = _dbus_list_get_next_link (&context->servers, link);
 864     }
 865 }
 866
 867 BusContext *
 868 bus_context_ref (BusContext *context)
 869 {
 870   _dbus_assert (context->refcount > 0);
 871   context->refcount += 1;
 872
 873   return context;
 874 }
 875
 876 void
 877 bus_context_unref (BusContext *context)
 878 {
 879   _dbus_assert (context->refcount > 0);
 880   context->refcount -= 1;
 881
 882   if (context->refcount == 0)
 883     {
 884       DBusList *link;
 885
 886       _dbus_verbose ("Finalizing bus context %p\n", context);
 887
 888       bus_context_shutdown (context);
 889
 890       if (context->connections)
 891         {
 892           bus_connections_unref (context->connections);
 893           context->connections = NULL;
 894         }
 895
 896       if (context->registry)
 897         {
 898           bus_registry_unref (context->registry);
 899           context->registry = NULL;
 900         }
 901
 902       if (context->activation)
 903         {
 904           bus_activation_unref (context->activation);
 905           context->activation = NULL;
 906         }
 907
 908       link = _dbus_list_get_first_link (&context->servers);
 909       while (link != NULL)
 910         {
 911           dbus_server_unref (link->data);
 912
 913           link = _dbus_list_get_next_link (&context->servers, link);
 914         }
 915       _dbus_list_clear (&context->servers);
 916
 917       if (context->policy)
 918         {
 919           bus_policy_unref (context->policy);
 920           context->policy = NULL;
 921         }
 922
 923       if (context->loop)
 924         {
 925           _dbus_loop_unref (context->loop);
 926           context->loop = NULL;
 927         }
 928
 929       if (context->matchmaker)
 930         {
 931           bus_matchmaker_unref (context->matchmaker);
 932           context->matchmaker = NULL;
 933         }
 934
 935       dbus_free (context->config_file);
 936       dbus_free (context->type);
 937       dbus_free (context->address);
 938       dbus_free (context->user);
 939       dbus_free (context->servicehelper);
 940
 941       if (context->pidfile)
 942         {
 943           DBusString u;
 944           _dbus_string_init_const (&u, context->pidfile);
 945
 946           /* Deliberately ignore errors here, since there's not much
 947            * we can do about it, and we're exiting anyways.
 948            */
 949           _dbus_delete_file (&u, NULL);
 950
 951           dbus_free (context->pidfile);
 952         }
 953       dbus_free (context);
 954
 955       dbus_server_free_data_slot (&server_data_slot);
 956     }
 957 }
 958
 959 /* type may be NULL */
 960 const char*
 961 bus_context_get_type (BusContext *context)
 962 {
 963   return context->type;
 964 }
 965
 966 const char*
 967 bus_context_get_address (BusContext *context)
 968 {
 969   return context->address;
 970 }
 971
 972 const char*
 973 bus_context_get_servicehelper (BusContext *context)
 974 {
 975   return context->servicehelper;
 976 }
 977
 978 BusRegistry*
 979 bus_context_get_registry (BusContext  *context)
 980 {
 981   return context->registry;
 982 }
 983
 984 BusConnections*
 985 bus_context_get_connections (BusContext  *context)
 986 {
 987   return context->connections;
 988 }
 989
 990 BusActivation*
 991 bus_context_get_activation (BusContext  *context)
 992 {
 993   return context->activation;
 994 }
 995
 996 BusMatchmaker*
 997 bus_context_get_matchmaker (BusContext  *context)
 998 {
 999   return context->matchmaker;
1000 }
1001
1002 DBusLoop*
1003 bus_context_get_loop (BusContext *context)
1004 {
1005   return context->loop;
1006 }
1007
1008 dbus_bool_t
1009 bus_context_allow_unix_user (BusContext   *context,
1010                              unsigned long uid)
1011 {
1012   return bus_policy_allow_unix_user (context->policy,
1013                                      uid);
1014 }
1015
1016 /* For now this is never actually called because the default
1017  * DBusConnection behavior of 'same user that owns the bus can connect'
1018  * is all it would do.
1019  */
1020 dbus_bool_t
1021 bus_context_allow_windows_user (BusContext       *context,
1022                                 const char       *windows_sid)
1023 {
1024   return bus_policy_allow_windows_user (context->policy,
1025                                         windows_sid);
1026 }
1027
1028 BusPolicy *
1029 bus_context_get_policy (BusContext *context)
1030 {
1031   return context->policy;
1032 }
1033
1034 BusClientPolicy*
1035 bus_context_create_client_policy (BusContext      *context,
1036                                   DBusConnection  *connection,
1037                                   DBusError       *error)
1038 {
1039   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
1040   return bus_policy_create_client_policy (context->policy, connection,
1041                                           error);
1042 }
1043
1044 int
1045 bus_context_get_activation_timeout (BusContext *context)
1046 {
1047
1048   return context->limits.activation_timeout;
1049 }
1050
1051 int
1052 bus_context_get_auth_timeout (BusContext *context)
1053 {
1054   return context->limits.auth_timeout;
1055 }
1056
1057 int
1058 bus_context_get_max_completed_connections (BusContext *context)
1059 {
1060   return context->limits.max_completed_connections;
1061 }
1062
1063 int
1064 bus_context_get_max_incomplete_connections (BusContext *context)
1065 {
1066   return context->limits.max_incomplete_connections;
1067 }
1068
1069 int
1070 bus_context_get_max_connections_per_user (BusContext *context)
1071 {
1072   return context->limits.max_connections_per_user;
1073 }
1074
1075 int
1076 bus_context_get_max_pending_activations (BusContext *context)
1077 {
1078   return context->limits.max_pending_activations;
1079 }
1080
1081 int
1082 bus_context_get_max_services_per_connection (BusContext *context)
1083 {
1084   return context->limits.max_services_per_connection;
1085 }
1086
1087 int
1088 bus_context_get_max_match_rules_per_connection (BusContext *context)
1089 {
1090   return context->limits.max_match_rules_per_connection;
1091 }
1092
1093 int
1094 bus_context_get_max_replies_per_connection (BusContext *context)
1095 {
1096   return context->limits.max_replies_per_connection;
1097 }
1098
1099 int
1100 bus_context_get_reply_timeout (BusContext *context)
1101 {
1102   return context->limits.reply_timeout;
1103 }
1104
1105 /*
1106  * addressed_recipient is the recipient specified in the message.
1107  *
1108  * proposed_recipient is the recipient we're considering sending
1109  * to right this second, and may be an eavesdropper.
1110  *
1111  * sender is the sender of the message.
1112  *
1113  * NULL for proposed_recipient or sender definitely means the bus driver.
1114  *
1115  * NULL for addressed_recipient may mean the bus driver, or may mean
1116  * no destination was specified in the message (e.g. a signal).
1117  */
1118 dbus_bool_t
1119 bus_context_check_security_policy (BusContext     *context,
1120                                    BusTransaction *transaction,
1121                                    DBusConnection *sender,
1122                                    DBusConnection *addressed_recipient,
1123                                    DBusConnection *proposed_recipient,
1124                                    DBusMessage    *message,
1125                                    DBusError      *error)
1126 {
1127   BusClientPolicy *sender_policy;
1128   BusClientPolicy *recipient_policy;
1129   int type;
1130   dbus_bool_t requested_reply;
1131
1132   type = dbus_message_get_type (message);
1133
1134   /* dispatch.c was supposed to ensure these invariants */
1135   _dbus_assert (dbus_message_get_destination (message) != NULL ||
1136                 type == DBUS_MESSAGE_TYPE_SIGNAL ||
1137                 (sender == NULL && !bus_connection_is_active (proposed_recipient)));
1138   _dbus_assert (type == DBUS_MESSAGE_TYPE_SIGNAL ||
1139                 addressed_recipient != NULL ||
1140                 strcmp (dbus_message_get_destination (message), DBUS_SERVICE_DBUS) == 0);
1141
1142   switch (type)
1143     {
1144     case DBUS_MESSAGE_TYPE_METHOD_CALL:
1145     case DBUS_MESSAGE_TYPE_SIGNAL:
1146     case DBUS_MESSAGE_TYPE_METHOD_RETURN:
1147     case DBUS_MESSAGE_TYPE_ERROR:
1148       break;
1149
1150     default:
1151       _dbus_verbose ("security check disallowing message of unknown type %d\n",
1152                      type);
1153
1154       dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1155                       "Message bus will not accept messages of unknown type\n");
1156
1157       return FALSE;
1158     }
1159
1160   requested_reply = FALSE;
1161
1162   if (sender != NULL)
1163     {
1164       const char *dest;
1165
1166       dest = dbus_message_get_destination (message);
1167
1168       /* First verify the SELinux access controls.  If allowed then
1169        * go on with the standard checks.
1170        */
1171       if (!bus_selinux_allows_send (sender, proposed_recipient,
1172                                     dbus_message_type_to_string (dbus_message_get_type (message)),
1173                                     dbus_message_get_interface (message),
1174                                     dbus_message_get_member (message),
1175                                     dbus_message_get_error_name (message),
1176                                     dest ? dest : DBUS_SERVICE_DBUS, error))
1177         {
1178
1179           if (dbus_error_is_set (error) &&
1180               dbus_error_has_name (error, DBUS_ERROR_NO_MEMORY))
1181             {
1182               return FALSE;
1183             }
1184
1185
1186           dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1187                           "An SELinux policy prevents this sender "
1188                           "from sending this message to this recipient "
1189                           "(rejected message had interface \"%s\" "
1190                           "member \"%s\" error name \"%s\" destination \"%s\")",
1191                           dbus_message_get_interface (message) ?
1192                           dbus_message_get_interface (message) : "(unset)",
1193                           dbus_message_get_member (message) ?
1194                           dbus_message_get_member (message) : "(unset)",
1195                           dbus_message_get_error_name (message) ?
1196                           dbus_message_get_error_name (message) : "(unset)",
1197                           dest ? dest : DBUS_SERVICE_DBUS);
1198           _dbus_verbose ("SELinux security check denying send to service\n");
1199           return FALSE;
1200         }
1201
1202       if (bus_connection_is_active (sender))
1203         {
1204           sender_policy = bus_connection_get_policy (sender);
1205           _dbus_assert (sender_policy != NULL);
1206
1207           /* Fill in requested_reply variable with TRUE if this is a
1208            * reply and the reply was pending.
1209            */
1210           if (dbus_message_get_reply_serial (message) != 0)
1211             {
1212               if (proposed_recipient != NULL /* not to the bus driver */ &&
1213                   addressed_recipient == proposed_recipient /* not eavesdropping */)
1214                 {
1215                   DBusError error2;
1216
1217                   dbus_error_init (&error2);
1218                   requested_reply = bus_connections_check_reply (bus_connection_get_connections (sender),
1219                                                                  transaction,
1220                                                                  sender, addressed_recipient, message,
1221                                                                  &error2);
1222                   if (dbus_error_is_set (&error2))
1223                     {
1224                       dbus_move_error (&error2, error);
1225                       return FALSE;
1226                     }
1227                 }
1228             }
1229         }
1230       else
1231         {
1232           /* Policy for inactive connections is that they can only send
1233            * the hello message to the bus driver
1234            */
1235           if (proposed_recipient == NULL &&
1236               dbus_message_is_method_call (message,
1237                                            DBUS_INTERFACE_DBUS,
1238                                            "Hello"))
1239             {
1240               _dbus_verbose ("security check allowing %s message\n",
1241                              "Hello");
1242               return TRUE;
1243             }
1244           else
1245             {
1246               _dbus_verbose ("security check disallowing non-%s message\n",
1247                              "Hello");
1248
1249               dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1250                               "Client tried to send a message other than %s without being registered",
1251                               "Hello");
1252
1253               return FALSE;
1254             }
1255         }
1256     }
1257   else
1258     {
1259       sender_policy = NULL;
1260
1261       /* If the sender is the bus driver, we assume any reply was a
1262        * requested reply as bus driver won't send bogus ones
1263        */
1264       if (addressed_recipient == proposed_recipient /* not eavesdropping */ &&
1265           dbus_message_get_reply_serial (message) != 0)
1266         requested_reply = TRUE;
1267     }
1268
1269   _dbus_assert ((sender != NULL && sender_policy != NULL) ||
1270                 (sender == NULL && sender_policy == NULL));
1271
1272   if (proposed_recipient != NULL)
1273     {
1274       /* only the bus driver can send to an inactive recipient (as it
1275        * owns no services, so other apps can't address it). Inactive
1276        * recipients can receive any message.
1277        */
1278       if (bus_connection_is_active (proposed_recipient))
1279         {
1280           recipient_policy = bus_connection_get_policy (proposed_recipient);
1281           _dbus_assert (recipient_policy != NULL);
1282         }
1283       else if (sender == NULL)
1284         {
1285           _dbus_verbose ("security check using NULL recipient policy for message from bus\n");
1286           recipient_policy = NULL;
1287         }
1288       else
1289         {
1290           _dbus_assert_not_reached ("a message was somehow sent to an inactive recipient from a source other than the message bus\n");
1291           recipient_policy = NULL;
1292         }
1293     }
1294   else
1295     recipient_policy = NULL;
1296
1297   _dbus_assert ((proposed_recipient != NULL && recipient_policy != NULL) ||
1298                 (proposed_recipient != NULL && sender == NULL && recipient_policy == NULL) ||
1299                 (proposed_recipient == NULL && recipient_policy == NULL));
1300
1301   if (sender_policy &&
1302       !bus_client_policy_check_can_send (sender_policy,
1303                                          context->registry,
1304                                          requested_reply,
1305                                          proposed_recipient,
1306                                          message))
1307     {
1308       const char *dest;
1309
1310       dest = dbus_message_get_destination (message);
1311       dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1312                       "A security policy in place prevents this sender "
1313                       "from sending this message to this recipient, "
1314                       "see message bus configuration file (rejected message "
1315                       "had interface \"%s\" member \"%s\" error name \"%s\" destination \"%s\")",
1316                       dbus_message_get_interface (message) ?
1317                       dbus_message_get_interface (message) : "(unset)",
1318                       dbus_message_get_member (message) ?
1319                       dbus_message_get_member (message) : "(unset)",
1320                       dbus_message_get_error_name (message) ?
1321                       dbus_message_get_error_name (message) : "(unset)",
1322                       dest ? dest : DBUS_SERVICE_DBUS);
1323       _dbus_verbose ("security policy disallowing message due to sender policy\n");
1324       return FALSE;
1325     }
1326
1327   if (recipient_policy &&
1328       !bus_client_policy_check_can_receive (recipient_policy,
1329                                             context->registry,
1330                                             requested_reply,
1331                                             sender,
1332                                             addressed_recipient, proposed_recipient,
1333                                             message))
1334     {
1335       const char *dest;
1336
1337       dest = dbus_message_get_destination (message);
1338       dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1339                       "A security policy in place prevents this recipient "
1340                       "from receiving this message from this sender, "
1341                       "see message bus configuration file (rejected message "
1342                       "had interface \"%s\" member \"%s\" error name \"%s\" destination \"%s\" reply serial %u requested_reply=%d)",
1343                       dbus_message_get_interface (message) ?
1344                       dbus_message_get_interface (message) : "(unset)",
1345                       dbus_message_get_member (message) ?
1346                       dbus_message_get_member (message) : "(unset)",
1347                       dbus_message_get_error_name (message) ?
1348                       dbus_message_get_error_name (message) : "(unset)",
1349                       dest ? dest : DBUS_SERVICE_DBUS,
1350                       dbus_message_get_reply_serial (message),
1351                       requested_reply);
1352       _dbus_verbose ("security policy disallowing message due to recipient policy\n");
1353       return FALSE;
1354     }
1355
1356   /* See if limits on size have been exceeded */
1357   if (proposed_recipient &&
1358       dbus_connection_get_outgoing_size (proposed_recipient) >
1359       context->limits.max_outgoing_bytes)
1360     {
1361       const char *dest;
1362
1363       dest = dbus_message_get_destination (message);
1364       dbus_set_error (error, DBUS_ERROR_LIMITS_EXCEEDED,
1365                       "The destination service \"%s\" has a full message queue",
1366                       dest ? dest : (proposed_recipient ?
1367                                      bus_connection_get_name (proposed_recipient) :
1368                                      DBUS_SERVICE_DBUS));
1369       _dbus_verbose ("security policy disallowing message due to full message queue\n");
1370       return FALSE;
1371     }
1372
1373   /* Record that we will allow a reply here in the future (don't
1374    * bother if the recipient is the bus or this is an eavesdropping
1375    * connection). Only the addressed recipient may reply.
1376    */
1377   if (type == DBUS_MESSAGE_TYPE_METHOD_CALL &&
1378       sender &&
1379       addressed_recipient &&
1380       addressed_recipient == proposed_recipient && /* not eavesdropping */
1381       !bus_connections_expect_reply (bus_connection_get_connections (sender),
1382                                      transaction,
1383                                      sender, addressed_recipient,
1384                                      message, error))
1385     {
1386       _dbus_verbose ("Failed to record reply expectation or problem with the message expecting a reply\n");
1387       return FALSE;
1388     }
1389
1390   _dbus_verbose ("security policy allowing message\n");
1391   return TRUE;
1392 }