bus.c 23.9 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
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)
110 111 112 113
    {
      server_data_slot_unref ();
      return NULL;
    }
114 115 116 117 118 119 120 121

  context = bd->context;

  server_data_slot_unref ();

  return context;
}

122
static dbus_bool_t
123 124 125 126
server_watch_callback (DBusWatch     *watch,
                       unsigned int   condition,
                       void          *data)
{
127
  DBusServer *server = data;
128

129
  return dbus_server_handle_watch (server, watch, condition);
130 131
}

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

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

159

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

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

  return bus_loop_add_timeout (context->loop,
                               timeout, server_timeout_callback, server, NULL);
179 180 181 182
}

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

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

205 206 207 208 209 210 211 212
      /* 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);
    }
  
213
  /* on OOM, we won't have ref'd the connection so it will die. */
214 215
}

216
static void
217 218
free_rule_func (void *data,
                void *user_data)
219 220 221 222 223 224
{
  BusPolicyRule *rule = data;

  bus_policy_rule_unref (rule);
}

225 226 227 228 229 230 231 232 233 234 235 236
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);
}

237 238 239 240 241 242 243 244
static void
free_server_data (void *data)
{
  BusServerData *bd = data;  
  
  dbus_free (bd);
}

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

  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;
264
  
265 266 267 268 269 270
  if (!dbus_server_set_auth_mechanisms (server, (const char**) auth_mechanisms))
    {
      BUS_SET_OOM (error);
      return FALSE;
    }
  
271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294
  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;
    }
295
  
296 297 298
  return TRUE;
}

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

316
  if (!_dbus_string_init (&full_address))
317 318 319 320
    {
      BUS_SET_OOM (error);
      return NULL;
    }
321

322 323 324 325 326 327 328
  if (!server_data_slot_ref ())
    {
      BUS_SET_OOM (error);
      _dbus_string_free (&full_address);
      return NULL;
    }
  
329 330
  parser = NULL;
  context = NULL;
331
  auth_mechanisms = NULL;
332 333 334 335
  
  parser = bus_config_load (config_file, error);
  if (parser == NULL)
    goto failed;
336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360

  /* 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;
      DBusError tmp_error;
      
      dbus_error_init (&tmp_error);
      _dbus_string_init_const (&u, pidfile);
      
      if (_dbus_stat (&u, &stbuf, &tmp_error))
	{
	  dbus_set_error (error, DBUS_ERROR_FAILED,
			  "The pid file \"%s\" exists, if the message bus is not running, remove this file",
			  pidfile);
	  dbus_error_free (&tmp_error);
	  goto failed;
	}
    }
361 362 363 364 365
  
  context = dbus_new0 (BusContext, 1);
  if (context == NULL)
    {
      BUS_SET_OOM (error);
366
      goto failed;
367 368 369
    }
  
  context->refcount = 1;
370

371 372 373 374 375 376
  /* we need another ref of the server data slot for the context
   * to own
   */
  if (!server_data_slot_ref ())
    _dbus_assert_not_reached ("second ref of server data slot failed");
  
377
#ifdef DBUS_BUILD_TESTS
378
  context->activation_timeout = 6000;  /* 6 seconds */
379
#else
380
  context->activation_timeout = 15000; /* 15 seconds */
381
#endif
382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397

  /* 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;
398
  
399 400 401 402 403 404 405
  context->loop = bus_loop_new ();
  if (context->loop == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  
406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434
  /* 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 */
435 436 437 438 439 440 441 442 443 444 445
  
  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;
446
      else if (!setup_server (context, server, auth_mechanisms, error))
447 448 449 450 451 452 453 454 455 456 457
        goto failed;

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

458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481
  /* 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;
    }
482 483 484

  /* note that type may be NULL */
  context->type = _dbus_strdup (bus_config_parser_get_type (parser));
485
  
486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508
  /* 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;
            }
        }
509

510 511 512 513 514 515 516 517 518 519 520 521
      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))
522 523 524 525
    {
      BUS_SET_OOM (error);
      goto failed;
    }
526

527 528 529 530 531 532 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 560 561 562 563 564 565 566 567 568
  /* 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);
    }
  
569
  /* Create activation subsystem */
570
  
571
  context->activation = bus_activation_new (context, &full_address,
572 573
                                            bus_config_parser_get_service_dirs (parser),
                                            error);
574 575 576 577 578 579 580 581 582 583 584 585 586
  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;
    }

587
  context->registry = bus_registry_new (context);
588 589 590 591 592 593
  if (context->registry == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
  
594
  context->rules_by_uid = _dbus_hash_table_new (DBUS_HASH_ULONG,
595
                                                NULL,
596
                                                free_rule_list_func);
597 598 599 600 601 602
  if (context->rules_by_uid == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }

603
  context->rules_by_gid = _dbus_hash_table_new (DBUS_HASH_ULONG,
604
                                                NULL,
605
                                                free_rule_list_func);
606 607 608 609 610
  if (context->rules_by_gid == NULL)
    {
      BUS_SET_OOM (error);
      goto failed;
    }
611

612 613 614
  /* Now become a daemon if appropriate */
  if (bus_config_parser_get_fork (parser))
    {
615 616 617 618 619 620
      DBusString u;

      if (pidfile)
        _dbus_string_init_const (&u, pidfile);
      
      if (!_dbus_become_daemon (pidfile ? &u : NULL, error))
621 622
        goto failed;
    }
623 624 625 626 627 628 629 630 631 632 633 634 635
  else
    {
      /* Need to write PID file for ourselves, not for the child process */
      if (pidfile != NULL)
        {
          DBusString u;

          _dbus_string_init_const (&u, pidfile);
          
          if (!_dbus_write_pid_file (&u, _dbus_getpid (), error))
            goto failed;
        }
    }
636
  
637 638
  bus_config_parser_unref (parser);
  _dbus_string_free (&full_address);
639
  dbus_free_string_array (auth_mechanisms);
640
  server_data_slot_unref ();
641 642 643
  
  return context;
  
644
 failed:  
645 646 647 648 649 650 651
  if (parser != NULL)
    bus_config_parser_unref (parser);

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

  _dbus_string_free (&full_address);
652
  dbus_free_string_array (auth_mechanisms);
653 654 655

  server_data_slot_unref ();
  
656 657 658
  return NULL;
}

659 660 661
static void
shutdown_server (BusContext *context,
                 DBusServer *server)
662
{
663 664
  if (server == NULL ||
      !dbus_server_get_is_connected (server))
665 666
    return;
  
667
  if (!dbus_server_set_watch_functions (server,
668
                                        NULL, NULL, NULL,
669 670 671 672
                                        context,
                                        NULL))
    _dbus_assert_not_reached ("setting watch functions to NULL failed");
  
673
  if (!dbus_server_set_timeout_functions (server,
674
                                          NULL, NULL, NULL,
675 676 677 678
                                          context,
                                          NULL))
    _dbus_assert_not_reached ("setting timeout functions to NULL failed");
  
679 680 681 682 683 684 685 686 687 688 689 690 691 692 693
  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);
    }
694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710
}

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)
    {
711 712
      DBusList *link;
      
713 714
      _dbus_verbose ("Finalizing bus context %p\n", context);
      
715
      bus_context_shutdown (context);
716 717 718 719 720 721

      if (context->connections)
        {
          bus_connections_unref (context->connections);
          context->connections = NULL;
        }
722
      
723
      if (context->registry)
724 725 726 727 728
        {
          bus_registry_unref (context->registry);
          context->registry = NULL;
        }
      
729
      if (context->activation)
730 731 732 733
        {
          bus_activation_unref (context->activation);
          context->activation = NULL;
        }
734 735 736

      link = _dbus_list_get_first_link (&context->servers);
      while (link != NULL)
737
        {
738 739 740
          dbus_server_unref (link->data);
          
          link = _dbus_list_get_next_link (&context->servers, link);
741
        }
742
      _dbus_list_clear (&context->servers);
743 744 745 746 747 748 749 750 751 752 753 754

      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;
        }
755

756 757 758 759 760 761
      if (context->loop)
        {
          bus_loop_unref (context->loop);
          context->loop = NULL;
        }
      
762
      dbus_free (context->type);
763 764
      dbus_free (context->address);
      dbus_free (context);
765 766

      server_data_slot_unref ();
767 768 769
    }
}

770 771 772 773 774 775 776
/* type may be NULL */
const char*
bus_context_get_type (BusContext *context)
{
  return context->type;
}

777 778 779 780 781 782
const char*
bus_context_get_address (BusContext *context)
{
  return context->address;
}

783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799
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;
}
800

801 802 803 804 805 806
BusLoop*
bus_context_get_loop (BusContext *context)
{
  return context->loop;
}

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 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985
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;
}
986 987 988 989 990 991 992

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