bus/connection.c

   1 /* -*- mode: C; c-file-style: "gnu" -*- */
   2 /* connection.c  Client connections
   3  *
   4  * Copyright (C) 2003  Red Hat, Inc.
   5  *
   6  * Licensed under the Academic Free License version 1.2
   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 #include "connection.h"
  24 #include "dispatch.h"
  25 #include "policy.h"
  26 #include "services.h"
  27 #include "utils.h"
  28 #include "signals.h"
  29 #include "expirelist.h"
  30 #include <dbus/dbus-list.h>
  31 #include <dbus/dbus-hash.h>
  32 #include <dbus/dbus-timeout.h>
  33
  34 static void bus_connection_remove_transactions (DBusConnection *connection);
  35
  36 typedef struct
  37 {
  38   BusExpireItem expire_item;
  39
  40   DBusConnection *will_get_reply;
  41   DBusConnection *will_send_reply;
  42
  43   dbus_uint32_t reply_serial;
  44
  45 } BusPendingReply;
  46
  47 struct BusConnections
  48 {
  49   int refcount;
  50   DBusList *completed;  /**< List of all completed connections */
  51   int n_completed;      /**< Length of completed list */
  52   DBusList *incomplete; /**< List of all not-yet-active connections */
  53   int n_incomplete;     /**< Length of incomplete list */
  54   BusContext *context;
  55   DBusHashTable *completed_by_user; /**< Number of completed connections for each UID */
  56   DBusTimeout *expire_timeout; /**< Timeout for expiring incomplete connections. */
  57   int stamp;                   /**< Incrementing number */
  58   BusExpireList *pending_replies; /**< List of pending replies */
  59 };
  60
  61 static dbus_int32_t connection_data_slot = -1;
  62
  63 typedef struct
  64 {
  65   BusConnections *connections;
  66   DBusList *link_in_connection_list;
  67   DBusConnection *connection;
  68   DBusList *services_owned;
  69   int n_services_owned;
  70   DBusList *match_rules;
  71   int n_match_rules;
  72   char *name;
  73   DBusList *transaction_messages; /**< Stuff we need to send as part of a transaction */
  74   DBusMessage *oom_message;
  75   DBusPreallocatedSend *oom_preallocated;
  76   BusClientPolicy *policy;
  77
  78   long connection_tv_sec;  /**< Time when we connected (seconds component) */
  79   long connection_tv_usec; /**< Time when we connected (microsec component) */
  80   int stamp;               /**< connections->stamp last time we were traversed */
  81 } BusConnectionData;
  82
  83 static void bus_pending_reply_expired (BusExpireList *list,
  84                                        DBusList      *link,
  85                                        void          *data);
  86
  87 static void bus_connection_drop_pending_replies (BusConnections  *connections,
  88                                                  DBusConnection  *connection);
  89
  90 static dbus_bool_t expire_incomplete_timeout (void *data);
  91
  92 #define BUS_CONNECTION_DATA(connection) (dbus_connection_get_data ((connection), connection_data_slot))
  93
  94 static DBusLoop*
  95 connection_get_loop (DBusConnection *connection)
  96 {
  97   BusConnectionData *d;
  98
  99   d = BUS_CONNECTION_DATA (connection);
 100
 101   return bus_context_get_loop (d->connections->context);
 102 }
 103
 104
 105 static int
 106 get_connections_for_uid (BusConnections *connections,
 107                          dbus_uid_t      uid)
 108 {
 109   void *val;
 110   int current_count;
 111
 112   /* val is NULL is 0 when it isn't in the hash yet */
 113
 114   val = _dbus_hash_table_lookup_ulong (connections->completed_by_user,
 115                                        uid);
 116
 117   current_count = _DBUS_POINTER_TO_INT (val);
 118
 119   return current_count;
 120 }
 121
 122 static dbus_bool_t
 123 adjust_connections_for_uid (BusConnections *connections,
 124                             dbus_uid_t      uid,
 125                             int             adjustment)
 126 {
 127   int current_count;
 128
 129   current_count = get_connections_for_uid (connections, uid);
 130
 131   _dbus_verbose ("Adjusting connection count for UID " DBUS_UID_FORMAT
 132                  ": was %d adjustment %d making %d\n",
 133                  uid, current_count, adjustment, current_count + adjustment);
 134
 135   _dbus_assert (current_count >= 0);
 136
 137   current_count += adjustment;
 138
 139   _dbus_assert (current_count >= 0);
 140
 141   if (current_count == 0)
 142     {
 143       _dbus_hash_table_remove_ulong (connections->completed_by_user, uid);
 144       return TRUE;
 145     }
 146   else
 147     {
 148       dbus_bool_t retval;
 149
 150       retval = _dbus_hash_table_insert_ulong (connections->completed_by_user,
 151                                               uid, _DBUS_INT_TO_POINTER (current_count));
 152
 153       /* only positive adjustment can fail as otherwise
 154        * a hash entry should already exist
 155        */
 156       _dbus_assert (adjustment > 0 ||
 157                     (adjustment <= 0 && retval));
 158
 159       return retval;
 160     }
 161 }
 162
 163 void
 164 bus_connection_disconnected (DBusConnection *connection)
 165 {
 166   BusConnectionData *d;
 167   BusService *service;
 168   BusMatchmaker *matchmaker;
 169
 170   d = BUS_CONNECTION_DATA (connection);
 171   _dbus_assert (d != NULL);
 172
 173   _dbus_verbose ("%s disconnected, dropping all service ownership and releasing\n",
 174                  d->name ? d->name : "(inactive)");
 175
 176   /* Delete our match rules */
 177   if (d->n_match_rules > 0)
 178     {
 179       matchmaker = bus_context_get_matchmaker (d->connections->context);
 180       bus_matchmaker_disconnected (matchmaker, connection);
 181     }
 182
 183   /* Drop any service ownership. FIXME Unfortunately, this requires
 184    * memory allocation and there doesn't seem to be a good way to
 185    * handle it other than sleeping; we can't "fail" the operation of
 186    * disconnecting a client, and preallocating a broadcast "service is
 187    * now gone" message for every client-service pair seems kind of
 188    * involved. Probably we need to do that though.
 189    */
 190   while ((service = _dbus_list_get_last (&d->services_owned)))
 191     {
 192       BusTransaction *transaction;
 193       DBusError error;
 194
 195     retry:
 196
 197       dbus_error_init (&error);
 198
 199       transaction = NULL;
 200       while (transaction == NULL)
 201         {
 202           transaction = bus_transaction_new (d->connections->context);
 203           _dbus_wait_for_memory ();
 204         }
 205
 206       if (!bus_service_remove_owner (service, connection,
 207                                      transaction, &error))
 208         {
 209           _DBUS_ASSERT_ERROR_IS_SET (&error);
 210
 211           if (dbus_error_has_name (&error, DBUS_ERROR_NO_MEMORY))
 212             {
 213               dbus_error_free (&error);
 214               bus_transaction_cancel_and_free (transaction);
 215               _dbus_wait_for_memory ();
 216               goto retry;
 217             }
 218           else
 219             {
 220               _dbus_verbose ("Failed to remove service owner: %s %s\n",
 221                              error.name, error.message);
 222               _dbus_assert_not_reached ("Removing service owner failed for non-memory-related reason");
 223             }
 224         }
 225
 226       bus_transaction_execute_and_free (transaction);
 227     }
 228
 229   bus_dispatch_remove_connection (connection);
 230
 231   /* no more watching */
 232   if (!dbus_connection_set_watch_functions (connection,
 233                                             NULL, NULL, NULL,
 234                                             connection,
 235                                             NULL))
 236     _dbus_assert_not_reached ("setting watch functions to NULL failed");
 237
 238   if (!dbus_connection_set_timeout_functions (connection,
 239                                               NULL, NULL, NULL,
 240                                               connection,
 241                                               NULL))
 242     _dbus_assert_not_reached ("setting timeout functions to NULL failed");
 243
 244   dbus_connection_set_unix_user_function (connection,
 245                                           NULL, NULL, NULL);
 246
 247   dbus_connection_set_dispatch_status_function (connection,
 248                                                 NULL, NULL, NULL);
 249
 250   bus_connection_remove_transactions (connection);
 251
 252   if (d->link_in_connection_list != NULL)
 253     {
 254       if (d->name != NULL)
 255         {
 256           unsigned long uid;
 257
 258           _dbus_list_remove_link (&d->connections->completed, d->link_in_connection_list);
 259           d->link_in_connection_list = NULL;
 260           d->connections->n_completed -= 1;
 261
 262           if (dbus_connection_get_unix_user (connection, &uid))
 263             {
 264               if (!adjust_connections_for_uid (d->connections,
 265                                                uid, -1))
 266                 _dbus_assert_not_reached ("adjusting downward should never fail");
 267             }
 268         }
 269       else
 270         {
 271           _dbus_list_remove_link (&d->connections->incomplete, d->link_in_connection_list);
 272           d->link_in_connection_list = NULL;
 273           d->connections->n_incomplete -= 1;
 274         }
 275
 276       _dbus_assert (d->connections->n_incomplete >= 0);
 277       _dbus_assert (d->connections->n_completed >= 0);
 278     }
 279
 280   bus_connection_drop_pending_replies (d->connections, connection);
 281
 282   /* frees "d" as side effect */
 283   dbus_connection_set_data (connection,
 284                             connection_data_slot,
 285                             NULL, NULL);
 286
 287   dbus_connection_unref (connection);
 288 }
 289
 290 static dbus_bool_t
 291 connection_watch_callback (DBusWatch     *watch,
 292                            unsigned int   condition,
 293                            void          *data)
 294 {
 295  /* FIXME this can be done in dbus-mainloop.c
 296   * if the code in activation.c for the babysitter
 297   * watch handler is fixed.
 298   */
 299
 300 #if 0
 301   _dbus_verbose ("Calling handle_watch\n");
 302 #endif
 303   return dbus_watch_handle (watch, condition);
 304 }
 305
 306 static dbus_bool_t
 307 add_connection_watch (DBusWatch      *watch,
 308                       void           *data)
 309 {
 310   DBusConnection *connection = data;
 311
 312   return _dbus_loop_add_watch (connection_get_loop (connection),
 313                                watch, connection_watch_callback, connection,
 314                                NULL);
 315 }
 316
 317 static void
 318 remove_connection_watch (DBusWatch      *watch,
 319                          void           *data)
 320 {
 321   DBusConnection *connection = data;
 322
 323   _dbus_loop_remove_watch (connection_get_loop (connection),
 324                            watch, connection_watch_callback, connection);
 325 }
 326
 327 static void
 328 connection_timeout_callback (DBusTimeout   *timeout,
 329                              void          *data)
 330 {
 331   /* DBusConnection *connection = data; */
 332
 333   /* can return FALSE on OOM but we just let it fire again later */
 334   dbus_timeout_handle (timeout);
 335 }
 336
 337 static dbus_bool_t
 338 add_connection_timeout (DBusTimeout    *timeout,
 339                         void           *data)
 340 {
 341   DBusConnection *connection = data;
 342
 343   return _dbus_loop_add_timeout (connection_get_loop (connection),
 344                                  timeout, connection_timeout_callback, connection, NULL);
 345 }
 346
 347 static void
 348 remove_connection_timeout (DBusTimeout    *timeout,
 349                            void           *data)
 350 {
 351   DBusConnection *connection = data;
 352
 353   _dbus_loop_remove_timeout (connection_get_loop (connection),
 354                              timeout, connection_timeout_callback, connection);
 355 }
 356
 357 static void
 358 dispatch_status_function (DBusConnection    *connection,
 359                           DBusDispatchStatus new_status,
 360                           void              *data)
 361 {
 362   DBusLoop *loop = data;
 363
 364   if (new_status != DBUS_DISPATCH_COMPLETE)
 365     {
 366       while (!_dbus_loop_queue_dispatch (loop, connection))
 367         _dbus_wait_for_memory ();
 368     }
 369 }
 370
 371 static dbus_bool_t
 372 allow_user_function (DBusConnection *connection,
 373                      unsigned long   uid,
 374                      void           *data)
 375 {
 376   BusConnectionData *d;
 377
 378   d = BUS_CONNECTION_DATA (connection);
 379
 380   _dbus_assert (d != NULL);
 381
 382   return bus_context_allow_user (d->connections->context, uid);
 383 }
 384
 385 static void
 386 free_connection_data (void *data)
 387 {
 388   BusConnectionData *d = data;
 389
 390   /* services_owned should be NULL since we should be disconnected */
 391   _dbus_assert (d->services_owned == NULL);
 392   _dbus_assert (d->n_services_owned == 0);
 393   /* similarly */
 394   _dbus_assert (d->transaction_messages == NULL);
 395
 396   if (d->oom_preallocated)
 397     dbus_connection_free_preallocated_send (d->connection, d->oom_preallocated);
 398
 399   if (d->oom_message)
 400     dbus_message_unref (d->oom_message);
 401
 402   if (d->policy)
 403     bus_client_policy_unref (d->policy);
 404
 405   dbus_free (d->name);
 406
 407   dbus_free (d);
 408 }
 409
 410 static void
 411 call_timeout_callback (DBusTimeout   *timeout,
 412                        void          *data)
 413 {
 414   /* can return FALSE on OOM but we just let it fire again later */
 415   dbus_timeout_handle (timeout);
 416 }
 417
 418 BusConnections*
 419 bus_connections_new (BusContext *context)
 420 {
 421   BusConnections *connections;
 422
 423   if (!dbus_connection_allocate_data_slot (&connection_data_slot))
 424     goto failed_0;
 425
 426   connections = dbus_new0 (BusConnections, 1);
 427   if (connections == NULL)
 428     goto failed_1;
 429
 430   connections->completed_by_user = _dbus_hash_table_new (DBUS_HASH_ULONG,
 431                                                          NULL, NULL);
 432   if (connections->completed_by_user == NULL)
 433     goto failed_2;
 434
 435   connections->expire_timeout = _dbus_timeout_new (100, /* irrelevant */
 436                                                    expire_incomplete_timeout,
 437                                                    connections, NULL);
 438   if (connections->expire_timeout == NULL)
 439     goto failed_3;
 440
 441   _dbus_timeout_set_enabled (connections->expire_timeout, FALSE);
 442
 443   connections->pending_replies = bus_expire_list_new (bus_context_get_loop (context),
 444                                                       bus_context_get_reply_timeout (context),
 445                                                       bus_pending_reply_expired,
 446                                                       connections);
 447   if (connections->pending_replies == NULL)
 448     goto failed_4;
 449
 450   if (!_dbus_loop_add_timeout (bus_context_get_loop (context),
 451                                connections->expire_timeout,
 452                                call_timeout_callback, NULL, NULL))
 453     goto failed_5;
 454
 455   connections->refcount = 1;
 456   connections->context = context;
 457
 458   return connections;
 459
 460  failed_5:
 461   bus_expire_list_free (connections->pending_replies);
 462  failed_4:
 463   _dbus_timeout_unref (connections->expire_timeout);
 464  failed_3:
 465   _dbus_hash_table_unref (connections->completed_by_user);
 466  failed_2:
 467   dbus_free (connections);
 468  failed_1:
 469   dbus_connection_free_data_slot (&connection_data_slot);
 470  failed_0:
 471   return NULL;
 472 }
 473
 474 void
 475 bus_connections_ref (BusConnections *connections)
 476 {
 477   _dbus_assert (connections->refcount > 0);
 478   connections->refcount += 1;
 479 }
 480
 481 void
 482 bus_connections_unref (BusConnections *connections)
 483 {
 484   _dbus_assert (connections->refcount > 0);
 485   connections->refcount -= 1;
 486   if (connections->refcount == 0)
 487     {
 488       /* drop all incomplete */
 489       while (connections->incomplete != NULL)
 490         {
 491           DBusConnection *connection;
 492
 493           connection = connections->incomplete->data;
 494
 495           dbus_connection_ref (connection);
 496           dbus_connection_disconnect (connection);
 497           bus_connection_disconnected (connection);
 498           dbus_connection_unref (connection);
 499         }
 500
 501       _dbus_assert (connections->n_incomplete == 0);
 502
 503       /* drop all real connections */
 504       while (connections->completed != NULL)
 505         {
 506           DBusConnection *connection;
 507
 508           connection = connections->completed->data;
 509
 510           dbus_connection_ref (connection);
 511           dbus_connection_disconnect (connection);
 512           bus_connection_disconnected (connection);
 513           dbus_connection_unref (connection);
 514         }
 515
 516       _dbus_assert (connections->n_completed == 0);
 517
 518       _dbus_assert (connections->pending_replies->n_items == 0);
 519       bus_expire_list_free (connections->pending_replies);
 520
 521       _dbus_loop_remove_timeout (bus_context_get_loop (connections->context),
 522                                  connections->expire_timeout,
 523                                  call_timeout_callback, NULL);
 524
 525       _dbus_timeout_unref (connections->expire_timeout);
 526
 527       _dbus_hash_table_unref (connections->completed_by_user);
 528
 529       dbus_free (connections);
 530
 531       dbus_connection_free_data_slot (&connection_data_slot);
 532     }
 533 }
 534
 535 dbus_bool_t
 536 bus_connections_setup_connection (BusConnections *connections,
 537                                   DBusConnection *connection)
 538 {
 539   BusConnectionData *d;
 540   dbus_bool_t retval;
 541
 542   d = dbus_new0 (BusConnectionData, 1);
 543
 544   if (d == NULL)
 545     return FALSE;
 546
 547   d->connections = connections;
 548   d->connection = connection;
 549
 550   _dbus_get_current_time (&d->connection_tv_sec,
 551                           &d->connection_tv_usec);
 552
 553   _dbus_assert (connection_data_slot >= 0);
 554
 555   if (!dbus_connection_set_data (connection,
 556                                  connection_data_slot,
 557                                  d, free_connection_data))
 558     {
 559       dbus_free (d);
 560       return FALSE;
 561     }
 562
 563   retval = FALSE;
 564
 565   if (!dbus_connection_set_watch_functions (connection,
 566                                             add_connection_watch,
 567                                             remove_connection_watch,
 568                                             NULL,
 569                                             connection,
 570                                             NULL))
 571     goto out;
 572
 573   if (!dbus_connection_set_timeout_functions (connection,
 574                                               add_connection_timeout,
 575                                               remove_connection_timeout,
 576                                               NULL,
 577                                               connection, NULL))
 578     goto out;
 579
 580   dbus_connection_set_unix_user_function (connection,
 581                                           allow_user_function,
 582                                           NULL, NULL);
 583
 584   dbus_connection_set_dispatch_status_function (connection,
 585                                                 dispatch_status_function,
 586                                                 bus_context_get_loop (connections->context),
 587                                                 NULL);
 588
 589   d->link_in_connection_list = _dbus_list_alloc_link (connection);
 590   if (d->link_in_connection_list == NULL)
 591     goto out;
 592
 593   /* Setup the connection with the dispatcher */
 594   if (!bus_dispatch_add_connection (connection))
 595     goto out;
 596
 597   if (dbus_connection_get_dispatch_status (connection) != DBUS_DISPATCH_COMPLETE)
 598     {
 599       if (!_dbus_loop_queue_dispatch (bus_context_get_loop (connections->context), connection))
 600         {
 601           bus_dispatch_remove_connection (connection);
 602           goto out;
 603         }
 604     }
 605
 606   _dbus_list_append_link (&connections->incomplete, d->link_in_connection_list);
 607   connections->n_incomplete += 1;
 608
 609   dbus_connection_ref (connection);
 610
 611   /* Note that we might disconnect ourselves here, but it only takes
 612    * effect on return to the main loop. We call this to free up
 613    * expired connections if possible, and to queue the timeout for our
 614    * own expiration.
 615    */
 616   bus_connections_expire_incomplete (connections);
 617
 618   /* And we might also disconnect ourselves here, but again it
 619    * only takes effect on return to main loop.
 620    */
 621   if (connections->n_incomplete >
 622       bus_context_get_max_incomplete_connections (connections->context))
 623     {
 624       _dbus_verbose ("Number of incomplete connections exceeds max, dropping oldest one\n");
 625
 626       _dbus_assert (connections->incomplete != NULL);
 627       /* Disconnect the oldest unauthenticated connection.  FIXME
 628        * would it be more secure to drop a *random* connection?  This
 629        * algorithm seems to mean that if someone can create new
 630        * connections quickly enough, they can keep anyone else from
 631        * completing authentication. But random may or may not really
 632        * help with that, a more elaborate solution might be required.
 633        */
 634       dbus_connection_disconnect (connections->incomplete->data);
 635     }
 636
 637   retval = TRUE;
 638
 639  out:
 640   if (!retval)
 641     {
 642       if (!dbus_connection_set_watch_functions (connection,
 643                                                 NULL, NULL, NULL,
 644                                                 connection,
 645                                                 NULL))
 646         _dbus_assert_not_reached ("setting watch functions to NULL failed");
 647
 648       if (!dbus_connection_set_timeout_functions (connection,
 649                                                   NULL, NULL, NULL,
 650                                                   connection,
 651                                                   NULL))
 652         _dbus_assert_not_reached ("setting timeout functions to NULL failed");
 653
 654       dbus_connection_set_unix_user_function (connection,
 655                                               NULL, NULL, NULL);
 656
 657       dbus_connection_set_dispatch_status_function (connection,
 658                                                     NULL, NULL, NULL);
 659
 660       if (d->link_in_connection_list != NULL)
 661         {
 662           _dbus_assert (d->link_in_connection_list->next == NULL);
 663           _dbus_assert (d->link_in_connection_list->prev == NULL);
 664           _dbus_list_free_link (d->link_in_connection_list);
 665           d->link_in_connection_list = NULL;
 666         }
 667
 668       if (!dbus_connection_set_data (connection,
 669                                      connection_data_slot,
 670                                      NULL, NULL))
 671         _dbus_assert_not_reached ("failed to set connection data to null");
 672
 673       /* "d" has now been freed */
 674     }
 675
 676   return retval;
 677 }
 678
 679 void
 680 bus_connections_expire_incomplete (BusConnections *connections)
 681 {
 682   int next_interval;
 683
 684   next_interval = -1;
 685
 686   if (connections->incomplete != NULL)
 687     {
 688       long tv_sec, tv_usec;
 689       DBusList *link;
 690       int auth_timeout;
 691
 692       _dbus_get_current_time (&tv_sec, &tv_usec);
 693       auth_timeout = bus_context_get_auth_timeout (connections->context);
 694
 695       link = _dbus_list_get_first_link (&connections->incomplete);
 696       while (link != NULL)
 697         {
 698           DBusList *next = _dbus_list_get_next_link (&connections->incomplete, link);
 699           DBusConnection *connection;
 700           BusConnectionData *d;
 701           double elapsed;
 702
 703           connection = link->data;
 704
 705           d = BUS_CONNECTION_DATA (connection);
 706
 707           _dbus_assert (d != NULL);
 708
 709           elapsed = ELAPSED_MILLISECONDS_SINCE (d->connection_tv_sec,
 710                                                 d->connection_tv_usec,
 711                                                 tv_sec, tv_usec);
 712
 713           if (elapsed >= (double) auth_timeout)
 714             {
 715               _dbus_verbose ("Timing out authentication for connection %p\n", connection);
 716               dbus_connection_disconnect (connection);
 717             }
 718           else
 719             {
 720               /* We can end the loop, since the connections are in oldest-first order */
 721               next_interval = ((double)auth_timeout) - elapsed;
 722               _dbus_verbose ("Connection %p authentication expires in %d milliseconds\n",
 723                              connection, next_interval);
 724
 725               break;
 726             }
 727
 728           link = next;
 729         }
 730     }
 731
 732   bus_expire_timeout_set_interval (connections->expire_timeout,
 733                                    next_interval);
 734 }
 735
 736 static dbus_bool_t
 737 expire_incomplete_timeout (void *data)
 738 {
 739   BusConnections *connections = data;
 740
 741   _dbus_verbose ("Running %s\n", _DBUS_FUNCTION_NAME);
 742
 743   /* note that this may remove the timeout */
 744   bus_connections_expire_incomplete (connections);
 745
 746   return TRUE;
 747 }
 748
 749 dbus_bool_t
 750 bus_connection_get_groups  (DBusConnection   *connection,
 751                             unsigned long   **groups,
 752                             int              *n_groups,
 753                             DBusError        *error)
 754 {
 755   BusConnectionData *d;
 756   unsigned long uid;
 757   DBusUserDatabase *user_database;
 758
 759   d = BUS_CONNECTION_DATA (connection);
 760
 761   _dbus_assert (d != NULL);
 762
 763   user_database = bus_context_get_user_database (d->connections->context);
 764
 765   *groups = NULL;
 766   *n_groups = 0;
 767
 768   if (dbus_connection_get_unix_user (connection, &uid))
 769     {
 770       if (!_dbus_user_database_get_groups (user_database,
 771                                            uid, groups, n_groups,
 772                                            error))
 773         {
 774           _DBUS_ASSERT_ERROR_IS_SET (error);
 775           _dbus_verbose ("Did not get any groups for UID %lu\n",
 776                          uid);
 777           return FALSE;
 778         }
 779       else
 780         {
 781           _dbus_verbose ("Got %d groups for UID %lu\n",
 782                          *n_groups, uid);
 783           return TRUE;
 784         }
 785     }
 786   else
 787     return TRUE; /* successfully got 0 groups */
 788 }
 789
 790 dbus_bool_t
 791 bus_connection_is_in_group (DBusConnection *connection,
 792                             unsigned long   gid)
 793 {
 794   int i;
 795   unsigned long *group_ids;
 796   int n_group_ids;
 797
 798   if (!bus_connection_get_groups (connection, &group_ids, &n_group_ids,
 799                                   NULL))
 800     return FALSE;
 801
 802   i = 0;
 803   while (i < n_group_ids)
 804     {
 805       if (group_ids[i] == gid)
 806         {
 807           dbus_free (group_ids);
 808           return TRUE;
 809         }
 810       ++i;
 811     }
 812
 813   dbus_free (group_ids);
 814   return FALSE;
 815 }
 816
 817 BusClientPolicy*
 818 bus_connection_get_policy (DBusConnection *connection)
 819 {
 820   BusConnectionData *d;
 821
 822   d = BUS_CONNECTION_DATA (connection);
 823
 824   _dbus_assert (d != NULL);
 825   _dbus_assert (d->policy != NULL);
 826
 827   return d->policy;
 828 }
 829
 830 static dbus_bool_t
 831 foreach_active (BusConnections               *connections,
 832                 BusConnectionForeachFunction  function,
 833                 void                         *data)
 834 {
 835   DBusList *link;
 836
 837   link = _dbus_list_get_first_link (&connections->completed);
 838   while (link != NULL)
 839     {
 840       DBusConnection *connection = link->data;
 841       DBusList *next = _dbus_list_get_next_link (&connections->completed, link);
 842
 843       if (!(* function) (connection, data))
 844         return FALSE;
 845
 846       link = next;
 847     }
 848
 849   return TRUE;
 850 }
 851
 852 static dbus_bool_t
 853 foreach_inactive (BusConnections               *connections,
 854                   BusConnectionForeachFunction  function,
 855                   void                         *data)
 856 {
 857   DBusList *link;
 858
 859   link = _dbus_list_get_first_link (&connections->incomplete);
 860   while (link != NULL)
 861     {
 862       DBusConnection *connection = link->data;
 863       DBusList *next = _dbus_list_get_next_link (&connections->incomplete, link);
 864
 865       if (!(* function) (connection, data))
 866         return FALSE;
 867
 868       link = next;
 869     }
 870
 871   return TRUE;
 872 }
 873
 874 /**
 875  * Calls function on each active connection; if the function returns
 876  * #FALSE, stops iterating. Active connections are authenticated
 877  * and have sent a Hello message.
 878  *
 879  * @param connections the connections object
 880  * @param function the function
 881  * @param data data to pass to it as a second arg
 882  */
 883 void
 884 bus_connections_foreach_active (BusConnections               *connections,
 885                                 BusConnectionForeachFunction  function,
 886                                 void                         *data)
 887 {
 888   foreach_active (connections, function, data);
 889 }
 890
 891 /**
 892  * Calls function on each connection; if the function returns
 893  * #FALSE, stops iterating.
 894  *
 895  * @param connections the connections object
 896  * @param function the function
 897  * @param data data to pass to it as a second arg
 898  */
 899 void
 900 bus_connections_foreach (BusConnections               *connections,
 901                          BusConnectionForeachFunction  function,
 902                          void                         *data)
 903 {
 904   if (!foreach_active (connections, function, data))
 905     return;
 906
 907   foreach_inactive (connections, function, data);
 908 }
 909
 910 BusContext*
 911 bus_connections_get_context (BusConnections *connections)
 912 {
 913   return connections->context;
 914 }
 915
 916 /*
 917  * This is used to avoid covering the same connection twice when
 918  * traversing connections. Note that it assumes we will
 919  * bus_connection_mark_stamp() each connection at least once per
 920  * INT_MAX increments of the global stamp, or wraparound would break
 921  * things.
 922  */
 923 void
 924 bus_connections_increment_stamp (BusConnections *connections)
 925 {
 926   connections->stamp += 1;
 927 }
 928
 929 /* Mark connection with current stamp, return TRUE if it
 930  * didn't already have that stamp
 931  */
 932 dbus_bool_t
 933 bus_connection_mark_stamp (DBusConnection *connection)
 934 {
 935   BusConnectionData *d;
 936
 937   d = BUS_CONNECTION_DATA (connection);
 938
 939   _dbus_assert (d != NULL);
 940
 941   if (d->stamp == d->connections->stamp)
 942     return FALSE;
 943   else
 944     {
 945       d->stamp = d->connections->stamp;
 946       return TRUE;
 947     }
 948 }
 949
 950 BusContext*
 951 bus_connection_get_context (DBusConnection *connection)
 952 {
 953   BusConnectionData *d;
 954
 955   d = BUS_CONNECTION_DATA (connection);
 956
 957   _dbus_assert (d != NULL);
 958
 959   return d->connections->context;
 960 }
 961
 962 BusConnections*
 963 bus_connection_get_connections (DBusConnection *connection)
 964 {
 965   BusConnectionData *d;
 966
 967   d = BUS_CONNECTION_DATA (connection);
 968
 969   _dbus_assert (d != NULL);
 970
 971   return d->connections;
 972 }
 973
 974 BusRegistry*
 975 bus_connection_get_registry (DBusConnection *connection)
 976 {
 977   BusConnectionData *d;
 978
 979   d = BUS_CONNECTION_DATA (connection);
 980
 981   _dbus_assert (d != NULL);
 982
 983   return bus_context_get_registry (d->connections->context);
 984 }
 985
 986 BusActivation*
 987 bus_connection_get_activation (DBusConnection *connection)
 988 {
 989   BusConnectionData *d;
 990
 991   d = BUS_CONNECTION_DATA (connection);
 992
 993   _dbus_assert (d != NULL);
 994
 995   return bus_context_get_activation (d->connections->context);
 996 }
 997
 998 BusMatchmaker*
 999 bus_connection_get_matchmaker (DBusConnection *connection)
1000 {
1001   BusConnectionData *d;
1002
1003   d = BUS_CONNECTION_DATA (connection);
1004
1005   _dbus_assert (d != NULL);
1006
1007   return bus_context_get_matchmaker (d->connections->context);
1008 }
1009
1010 /**
1011  * Checks whether the connection is registered with the message bus.
1012  *
1013  * @param connection the connection
1014  * @returns #TRUE if we're an active message bus participant
1015  */
1016 dbus_bool_t
1017 bus_connection_is_active (DBusConnection *connection)
1018 {
1019   BusConnectionData *d;
1020
1021   d = BUS_CONNECTION_DATA (connection);
1022
1023   return d != NULL && d->name != NULL;
1024 }
1025
1026 dbus_bool_t
1027 bus_connection_preallocate_oom_error (DBusConnection *connection)
1028 {
1029   DBusMessage *message;
1030   DBusPreallocatedSend *preallocated;
1031   BusConnectionData *d;
1032
1033   d = BUS_CONNECTION_DATA (connection);
1034
1035   _dbus_assert (d != NULL);
1036
1037   if (d->oom_preallocated != NULL)
1038     return TRUE;
1039
1040   preallocated = dbus_connection_preallocate_send (connection);
1041   if (preallocated == NULL)
1042     return FALSE;
1043
1044   message = dbus_message_new (DBUS_MESSAGE_TYPE_ERROR);
1045
1046   if (message == NULL)
1047     {
1048       dbus_connection_free_preallocated_send (connection, preallocated);
1049       return FALSE;
1050     }
1051
1052   /* d->name may be NULL, but that is OK */
1053   if (!dbus_message_set_error_name (message, DBUS_ERROR_NO_MEMORY) ||
1054       !dbus_message_set_destination (message, d->name) ||
1055       !dbus_message_set_sender (message,
1056                                 DBUS_SERVICE_ORG_FREEDESKTOP_DBUS))
1057     {
1058       dbus_connection_free_preallocated_send (connection, preallocated);
1059       dbus_message_unref (message);
1060       return FALSE;
1061     }
1062
1063   /* set reply serial to placeholder value just so space is already allocated
1064    * for it.
1065    */
1066   if (!dbus_message_set_reply_serial (message, 14))
1067     {
1068       dbus_connection_free_preallocated_send (connection, preallocated);
1069       dbus_message_unref (message);
1070       return FALSE;
1071     }
1072
1073   d->oom_message = message;
1074   d->oom_preallocated = preallocated;
1075
1076   return TRUE;
1077 }
1078
1079 void
1080 bus_connection_send_oom_error (DBusConnection *connection,
1081                                DBusMessage    *in_reply_to)
1082 {
1083   BusConnectionData *d;
1084
1085   d = BUS_CONNECTION_DATA (connection);
1086
1087   _dbus_assert (d != NULL);
1088   _dbus_assert (d->oom_message != NULL);
1089
1090   /* should always succeed since we set it to a placeholder earlier */
1091   if (!dbus_message_set_reply_serial (d->oom_message,
1092                                       dbus_message_get_serial (in_reply_to)))
1093     _dbus_assert_not_reached ("Failed to set reply serial for preallocated oom message");
1094
1095   _dbus_assert (dbus_message_get_sender (d->oom_message) != NULL);
1096
1097   dbus_connection_send_preallocated (connection, d->oom_preallocated,
1098                                      d->oom_message, NULL);
1099
1100   dbus_message_unref (d->oom_message);
1101   d->oom_message = NULL;
1102   d->oom_preallocated = NULL;
1103 }
1104
1105 void
1106 bus_connection_add_match_rule_link (DBusConnection *connection,
1107                                     DBusList       *link)
1108 {
1109   BusConnectionData *d;
1110
1111   d = BUS_CONNECTION_DATA (connection);
1112   _dbus_assert (d != NULL);
1113
1114   _dbus_list_append_link (&d->match_rules, link);
1115
1116   d->n_match_rules += 1;
1117 }
1118
1119 dbus_bool_t
1120 bus_connection_add_match_rule (DBusConnection *connection,
1121                                BusMatchRule   *rule)
1122 {
1123     DBusList *link;
1124
1125   link = _dbus_list_alloc_link (rule);
1126
1127   if (link == NULL)
1128     return FALSE;
1129
1130   bus_connection_add_match_rule_link (connection, link);
1131
1132   return TRUE;
1133 }
1134
1135 void
1136 bus_connection_remove_match_rule (DBusConnection *connection,
1137                                   BusMatchRule   *rule)
1138 {
1139   BusConnectionData *d;
1140
1141   d = BUS_CONNECTION_DATA (connection);
1142   _dbus_assert (d != NULL);
1143
1144   _dbus_list_remove_last (&d->match_rules, rule);
1145
1146   d->n_match_rules -= 1;
1147   _dbus_assert (d->n_match_rules >= 0);
1148 }
1149
1150 int
1151 bus_connection_get_n_match_rules (DBusConnection *connection)
1152 {
1153   BusConnectionData *d;
1154
1155   d = BUS_CONNECTION_DATA (connection);
1156   _dbus_assert (d != NULL);
1157
1158   return d->n_match_rules;
1159 }
1160
1161 void
1162 bus_connection_add_owned_service_link (DBusConnection *connection,
1163                                        DBusList       *link)
1164 {
1165   BusConnectionData *d;
1166
1167   d = BUS_CONNECTION_DATA (connection);
1168   _dbus_assert (d != NULL);
1169
1170   _dbus_list_append_link (&d->services_owned, link);
1171
1172   d->n_services_owned += 1;
1173 }
1174
1175 dbus_bool_t
1176 bus_connection_add_owned_service (DBusConnection *connection,
1177                                   BusService     *service)
1178 {
1179   DBusList *link;
1180
1181   link = _dbus_list_alloc_link (service);
1182
1183   if (link == NULL)
1184     return FALSE;
1185
1186   bus_connection_add_owned_service_link (connection, link);
1187
1188   return TRUE;
1189 }
1190
1191 void
1192 bus_connection_remove_owned_service (DBusConnection *connection,
1193                                      BusService     *service)
1194 {
1195   BusConnectionData *d;
1196
1197   d = BUS_CONNECTION_DATA (connection);
1198   _dbus_assert (d != NULL);
1199
1200   _dbus_list_remove_last (&d->services_owned, service);
1201
1202   d->n_services_owned -= 1;
1203   _dbus_assert (d->n_services_owned >= 0);
1204 }
1205
1206 int
1207 bus_connection_get_n_services_owned (DBusConnection *connection)
1208 {
1209   BusConnectionData *d;
1210
1211   d = BUS_CONNECTION_DATA (connection);
1212   _dbus_assert (d != NULL);
1213
1214   return d->n_services_owned;
1215 }
1216
1217 dbus_bool_t
1218 bus_connection_complete (DBusConnection   *connection,
1219                          const DBusString *name,
1220                          DBusError        *error)
1221 {
1222   BusConnectionData *d;
1223   unsigned long uid;
1224
1225   d = BUS_CONNECTION_DATA (connection);
1226   _dbus_assert (d != NULL);
1227   _dbus_assert (d->name == NULL);
1228   _dbus_assert (d->policy == NULL);
1229
1230   _dbus_assert (!bus_connection_is_active (connection));
1231
1232   if (!_dbus_string_copy_data (name, &d->name))
1233     {
1234       BUS_SET_OOM (error);
1235       return FALSE;
1236     }
1237
1238   _dbus_assert (d->name != NULL);
1239
1240   _dbus_verbose ("Name %s assigned to %p\n", d->name, connection);
1241
1242   d->policy = bus_context_create_client_policy (d->connections->context,
1243                                                 connection,
1244                                                 error);
1245
1246   /* we may have a NULL policy on OOM or error getting list of
1247    * groups for a user. In the latter case we don't handle it so
1248    * well currently, as it will just keep failing over and over.
1249    */
1250
1251   if (d->policy == NULL)
1252     {
1253       _dbus_verbose ("Failed to create security policy for connection %p\n",
1254                      connection);
1255       _DBUS_ASSERT_ERROR_IS_SET (error);
1256       dbus_free (d->name);
1257       d->name = NULL;
1258       return FALSE;
1259     }
1260
1261   if (dbus_connection_get_unix_user (connection, &uid))
1262     {
1263       if (!adjust_connections_for_uid (d->connections,
1264                                        uid, 1))
1265         {
1266           BUS_SET_OOM (error);
1267           dbus_free (d->name);
1268           d->name = NULL;
1269           return FALSE;
1270         }
1271     }
1272
1273   /* Now the connection is active, move it between lists */
1274   _dbus_list_unlink (&d->connections->incomplete,
1275                      d->link_in_connection_list);
1276   d->connections->n_incomplete -= 1;
1277   _dbus_list_append_link (&d->connections->completed,
1278                           d->link_in_connection_list);
1279   d->connections->n_completed += 1;
1280
1281   _dbus_assert (d->connections->n_incomplete >= 0);
1282   _dbus_assert (d->connections->n_completed > 0);
1283
1284   /* See if we can remove the timeout */
1285   bus_connections_expire_incomplete (d->connections);
1286
1287   _dbus_assert (bus_connection_is_active (connection));
1288
1289   return TRUE;
1290 }
1291
1292 const char *
1293 bus_connection_get_name (DBusConnection *connection)
1294 {
1295   BusConnectionData *d;
1296
1297   d = BUS_CONNECTION_DATA (connection);
1298   _dbus_assert (d != NULL);
1299
1300   return d->name;
1301 }
1302
1303 /**
1304  * Check whether completing the passed-in connection would
1305  * exceed limits, and if so set error and return #FALSE
1306  */
1307 dbus_bool_t
1308 bus_connections_check_limits (BusConnections  *connections,
1309                               DBusConnection  *requesting_completion,
1310                               DBusError       *error)
1311 {
1312   BusConnectionData *d;
1313   unsigned long uid;
1314
1315   d = BUS_CONNECTION_DATA (requesting_completion);
1316   _dbus_assert (d != NULL);
1317
1318   _dbus_assert (d->name == NULL);
1319
1320   if (connections->n_completed >=
1321       bus_context_get_max_completed_connections (connections->context))
1322     {
1323       dbus_set_error (error, DBUS_ERROR_LIMITS_EXCEEDED,
1324                       "The maximum number of active connections has been reached");
1325       return FALSE;
1326     }
1327
1328   if (dbus_connection_get_unix_user (requesting_completion, &uid))
1329     {
1330       if (get_connections_for_uid (connections, uid) >=
1331           bus_context_get_max_connections_per_user (connections->context))
1332         {
1333           dbus_set_error (error, DBUS_ERROR_LIMITS_EXCEEDED,
1334                           "The maximum number of active connections for UID %lu has been reached",
1335                           uid);
1336           return FALSE;
1337         }
1338     }
1339
1340   return TRUE;
1341 }
1342
1343 static void
1344 bus_pending_reply_free (BusPendingReply *pending)
1345 {
1346   _dbus_verbose ("Freeing pending reply %p, replier %p receiver %p serial %u\n",
1347                  pending,
1348                  pending->will_send_reply,
1349                  pending->will_get_reply,
1350                  pending->reply_serial);
1351
1352   dbus_free (pending);
1353 }
1354
1355 static dbus_bool_t
1356 bus_pending_reply_send_no_reply (BusConnections  *connections,
1357                                  BusTransaction  *transaction,
1358                                  BusPendingReply *pending)
1359 {
1360   DBusMessage *message;
1361   DBusMessageIter iter;
1362   dbus_bool_t retval;
1363
1364   retval = FALSE;
1365
1366   message = dbus_message_new (DBUS_MESSAGE_TYPE_ERROR);
1367   if (message == NULL)
1368     return FALSE;
1369
1370   dbus_message_set_no_reply (message, TRUE);
1371
1372   if (!dbus_message_set_reply_serial (message,
1373                                       pending->reply_serial))
1374     goto out;
1375
1376   if (!dbus_message_set_error_name (message,
1377                                     DBUS_ERROR_NO_REPLY))
1378     goto out;
1379
1380   dbus_message_append_iter_init (message, &iter);
1381   if (!dbus_message_iter_append_string (&iter, "Message did not receive a reply (timeout by message bus)"))
1382     goto out;
1383
1384   if (!bus_transaction_send_from_driver (transaction, pending->will_get_reply,
1385                                          message))
1386     goto out;
1387
1388   retval = TRUE;
1389
1390  out:
1391   dbus_message_unref (message);
1392   return retval;
1393 }
1394
1395 static void
1396 bus_pending_reply_expired (BusExpireList *list,
1397                            DBusList      *link,
1398                            void          *data)
1399 {
1400   BusPendingReply *pending = link->data;
1401   BusConnections *connections = data;
1402   BusTransaction *transaction;
1403
1404   /* No reply is forthcoming. So nuke it if we can. If not,
1405    * leave it in the list to try expiring again later when we
1406    * get more memory.
1407    */
1408
1409   _dbus_verbose ("Expiring pending reply %p, replier %p receiver %p serial %u\n",
1410                  pending,
1411                  pending->will_send_reply,
1412                  pending->will_get_reply,
1413                  pending->reply_serial);
1414
1415   transaction = bus_transaction_new (connections->context);
1416   if (transaction == NULL)
1417     return;
1418
1419   if (!bus_pending_reply_send_no_reply (connections,
1420                                         transaction,
1421                                         pending))
1422     {
1423       bus_transaction_cancel_and_free (transaction);
1424       return;
1425     }
1426
1427   _dbus_list_remove_link (&connections->pending_replies->items,
1428                           link);
1429   bus_pending_reply_free (pending);
1430   bus_transaction_execute_and_free (transaction);
1431 }
1432
1433 static void
1434 bus_connection_drop_pending_replies (BusConnections  *connections,
1435                                      DBusConnection  *connection)
1436 {
1437   /* The DBusConnection is almost 100% finalized here, so you can't
1438    * do anything with it except check for pointer equality
1439    */
1440   DBusList *link;
1441
1442   _dbus_verbose ("Dropping pending replies that involve connection %p\n",
1443                  connection);
1444
1445   link = _dbus_list_get_first_link (&connections->pending_replies->items);
1446   while (link != NULL)
1447     {
1448       DBusList *next;
1449       BusPendingReply *pending;
1450
1451       next = _dbus_list_get_next_link (&connections->pending_replies->items,
1452                                        link);
1453       pending = link->data;
1454
1455       if (pending->will_get_reply == connection)
1456         {
1457           /* We don't need to track this pending reply anymore */
1458
1459           _dbus_verbose ("Dropping pending reply %p, replier %p receiver %p serial %u\n",
1460                          pending,
1461                          pending->will_send_reply,
1462                          pending->will_get_reply,
1463                          pending->reply_serial);
1464
1465           _dbus_list_remove_link (&connections->pending_replies->items,
1466                                   link);
1467           bus_pending_reply_free (pending);
1468         }
1469       else if (pending->will_send_reply == connection)
1470         {
1471           /* The reply isn't going to be sent, so set things
1472            * up so it will be expired right away
1473            */
1474           _dbus_verbose ("Will expire pending reply %p, replier %p receiver %p serial %u\n",
1475                          pending,
1476                          pending->will_send_reply,
1477                          pending->will_get_reply,
1478                          pending->reply_serial);
1479
1480           pending->will_send_reply = NULL;
1481           pending->expire_item.added_tv_sec = 0;
1482           pending->expire_item.added_tv_usec = 0;
1483
1484           bus_expire_timeout_set_interval (connections->pending_replies->timeout,
1485                                            0);
1486         }
1487
1488       link = next;
1489     }
1490 }
1491
1492
1493 typedef struct
1494 {
1495   BusPendingReply *pending;
1496   BusConnections  *connections;
1497 } CancelPendingReplyData;
1498
1499 static void
1500 cancel_pending_reply (void *data)
1501 {
1502   CancelPendingReplyData *d = data;
1503
1504   _dbus_verbose ("%s: d = %p\n", _DBUS_FUNCTION_NAME, d);
1505
1506   if (!_dbus_list_remove (&d->connections->pending_replies->items,
1507                           d->pending))
1508     _dbus_assert_not_reached ("pending reply did not exist to be cancelled");
1509
1510   bus_pending_reply_free (d->pending); /* since it's been cancelled */
1511 }
1512
1513 static void
1514 cancel_pending_reply_data_free (void *data)
1515 {
1516   CancelPendingReplyData *d = data;
1517
1518   _dbus_verbose ("%s: d = %p\n", _DBUS_FUNCTION_NAME, d);
1519
1520   /* d->pending should be either freed or still
1521    * in the list of pending replies (owned by someone
1522    * else)
1523    */
1524
1525   dbus_free (d);
1526 }
1527
1528 /*
1529  * Record that a reply is allowed; return TRUE on success.
1530  */
1531 dbus_bool_t
1532 bus_connections_expect_reply (BusConnections  *connections,
1533                               BusTransaction  *transaction,
1534                               DBusConnection  *will_get_reply,
1535                               DBusConnection  *will_send_reply,
1536                               DBusMessage     *reply_to_this,
1537                               DBusError       *error)
1538 {
1539   BusPendingReply *pending;
1540   dbus_uint32_t reply_serial;
1541   DBusList *link;
1542   CancelPendingReplyData *cprd;
1543
1544   _dbus_assert (will_get_reply != NULL);
1545   _dbus_assert (will_send_reply != NULL);
1546   _dbus_assert (reply_to_this != NULL);
1547
1548   if (dbus_message_get_no_reply (reply_to_this))
1549     return TRUE; /* we won't allow a reply, since client doesn't care for one. */
1550
1551   reply_serial = dbus_message_get_serial (reply_to_this);
1552
1553   link = _dbus_list_get_first_link (&connections->pending_replies->items);
1554   while (link != NULL)
1555     {
1556       pending = link->data;
1557
1558       if (pending->reply_serial == reply_serial &&
1559           pending->will_get_reply == will_get_reply &&
1560           pending->will_send_reply == will_send_reply)
1561         {
1562           dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1563                           "Message has the same reply serial as a currently-outstanding existing method call");
1564           return FALSE;
1565         }
1566
1567       link = _dbus_list_get_next_link (&connections->pending_replies->items,
1568                                        link);
1569     }
1570
1571   pending = dbus_new0 (BusPendingReply, 1);
1572   if (pending == NULL)
1573     {
1574       BUS_SET_OOM (error);
1575       return FALSE;
1576     }
1577
1578 #ifdef DBUS_ENABLE_VERBOSE_MODE
1579   /* so we can see a not-yet-added pending reply */
1580   pending->expire_item.added_tv_sec = 1;
1581   pending->expire_item.added_tv_usec = 1;
1582 #endif
1583
1584   pending->will_get_reply = will_get_reply;
1585   pending->will_send_reply = will_send_reply;
1586   pending->reply_serial = reply_serial;
1587
1588   cprd = dbus_new0 (CancelPendingReplyData, 1);
1589   if (cprd == NULL)
1590     {
1591       BUS_SET_OOM (error);
1592       bus_pending_reply_free (pending);
1593       return FALSE;
1594     }
1595
1596   if (!_dbus_list_prepend (&connections->pending_replies->items,
1597                            pending))
1598     {
1599       BUS_SET_OOM (error);
1600       dbus_free (cprd);
1601       bus_pending_reply_free (pending);
1602       return FALSE;
1603     }
1604
1605   if (!bus_transaction_add_cancel_hook (transaction,
1606                                         cancel_pending_reply,
1607                                         cprd,
1608                                         cancel_pending_reply_data_free))
1609     {
1610       BUS_SET_OOM (error);
1611       _dbus_list_remove (&connections->pending_replies->items, pending);
1612       dbus_free (cprd);
1613       bus_pending_reply_free (pending);
1614       return FALSE;
1615     }
1616
1617   cprd->pending = pending;
1618   cprd->connections = connections;
1619
1620   _dbus_get_current_time (&pending->expire_item.added_tv_sec,
1621                           &pending->expire_item.added_tv_usec);
1622
1623   _dbus_verbose ("Added pending reply %p, replier %p receiver %p serial %u\n",
1624                  pending,
1625                  pending->will_send_reply,
1626                  pending->will_get_reply,
1627                  pending->reply_serial);
1628
1629   return TRUE;
1630 }
1631
1632 typedef struct
1633 {
1634   DBusList        *link;
1635   BusConnections  *connections;
1636 } CheckPendingReplyData;
1637
1638 static void
1639 cancel_check_pending_reply (void *data)
1640 {
1641   CheckPendingReplyData *d = data;
1642
1643   _dbus_verbose ("%s: d = %p\n", _DBUS_FUNCTION_NAME, d);
1644
1645   _dbus_list_prepend_link (&d->connections->pending_replies->items,
1646                            d->link);
1647   d->link = NULL;
1648 }
1649
1650 static void
1651 check_pending_reply_data_free (void *data)
1652 {
1653   CheckPendingReplyData *d = data;
1654
1655   _dbus_verbose ("%s: d = %p\n", _DBUS_FUNCTION_NAME, d);
1656
1657   if (d->link != NULL)
1658     {
1659       BusPendingReply *pending = d->link->data;
1660
1661       _dbus_assert (_dbus_list_find_last (&d->connections->pending_replies->items,
1662                                           pending) == NULL);
1663
1664       bus_pending_reply_free (pending);
1665       _dbus_list_free_link (d->link);
1666     }
1667
1668   dbus_free (d);
1669 }
1670
1671 /*
1672  * Check whether a reply is allowed, remove BusPendingReply
1673  * if so, return TRUE if so.
1674  */
1675 dbus_bool_t
1676 bus_connections_check_reply (BusConnections *connections,
1677                              BusTransaction *transaction,
1678                              DBusConnection *sending_reply,
1679                              DBusConnection *receiving_reply,
1680                              DBusMessage    *reply,
1681                              DBusError      *error)
1682 {
1683   CheckPendingReplyData *cprd;
1684   DBusList *link;
1685   dbus_uint32_t reply_serial;
1686
1687   _dbus_assert (sending_reply != NULL);
1688   _dbus_assert (receiving_reply != NULL);
1689
1690   reply_serial = dbus_message_get_reply_serial (reply);
1691
1692   link = _dbus_list_get_first_link (&connections->pending_replies->items);
1693   while (link != NULL)
1694     {
1695       BusPendingReply *pending = link->data;
1696
1697       if (pending->reply_serial == reply_serial &&
1698           pending->will_get_reply == receiving_reply &&
1699           pending->will_send_reply == sending_reply)
1700         {
1701           _dbus_verbose ("Found pending reply with serial %u\n", reply_serial);
1702           break;
1703         }
1704
1705       link = _dbus_list_get_next_link (&connections->pending_replies->items,
1706                                        link);
1707     }
1708
1709   if (link == NULL)
1710     {
1711       _dbus_verbose ("No pending reply expected\n");
1712
1713       return FALSE;
1714     }
1715
1716   cprd = dbus_new0 (CheckPendingReplyData, 1);
1717   if (cprd == NULL)
1718     {
1719       BUS_SET_OOM (error);
1720       return FALSE;
1721     }
1722
1723   if (!bus_transaction_add_cancel_hook (transaction,
1724                                         cancel_check_pending_reply,
1725                                         cprd,
1726                                         check_pending_reply_data_free))
1727     {
1728       BUS_SET_OOM (error);
1729       dbus_free (cprd);
1730       return FALSE;
1731     }
1732
1733   cprd->link = link;
1734   cprd->connections = connections;
1735
1736   _dbus_list_unlink (&connections->pending_replies->items,
1737                      link);
1738
1739   _dbus_assert (_dbus_list_find_last (&connections->pending_replies->items,
1740                                       link->data) == NULL);
1741
1742   return TRUE;
1743 }
1744
1745 /*
1746  * Transactions
1747  *
1748  * Note that this is fairly fragile; in particular, don't try to use
1749  * one transaction across any main loop iterations.
1750  */
1751
1752 typedef struct
1753 {
1754   BusTransaction *transaction;
1755   DBusMessage    *message;
1756   DBusPreallocatedSend *preallocated;
1757 } MessageToSend;
1758
1759 typedef struct
1760 {
1761   BusTransactionCancelFunction cancel_function;
1762   DBusFreeFunction free_data_function;
1763   void *data;
1764 } CancelHook;
1765
1766 struct BusTransaction
1767 {
1768   DBusList *connections;
1769   BusContext *context;
1770   DBusList *cancel_hooks;
1771 };
1772
1773 static void
1774 message_to_send_free (DBusConnection *connection,
1775                       MessageToSend  *to_send)
1776 {
1777   if (to_send->message)
1778     dbus_message_unref (to_send->message);
1779
1780   if (to_send->preallocated)
1781     dbus_connection_free_preallocated_send (connection, to_send->preallocated);
1782
1783   dbus_free (to_send);
1784 }
1785
1786 static void
1787 cancel_hook_cancel (void *element,
1788                     void *data)
1789 {
1790   CancelHook *ch = element;
1791
1792   _dbus_verbose ("Running transaction cancel hook\n");
1793
1794   if (ch->cancel_function)
1795     (* ch->cancel_function) (ch->data);
1796 }
1797
1798 static void
1799 cancel_hook_free (void *element,
1800                   void *data)
1801 {
1802   CancelHook *ch = element;
1803
1804   if (ch->free_data_function)
1805     (* ch->free_data_function) (ch->data);
1806
1807   dbus_free (ch);
1808 }
1809
1810 static void
1811 free_cancel_hooks (BusTransaction *transaction)
1812 {
1813   _dbus_list_foreach (&transaction->cancel_hooks,
1814                       cancel_hook_free, NULL);
1815
1816   _dbus_list_clear (&transaction->cancel_hooks);
1817 }
1818
1819 BusTransaction*
1820 bus_transaction_new (BusContext *context)
1821 {
1822   BusTransaction *transaction;
1823
1824   transaction = dbus_new0 (BusTransaction, 1);
1825   if (transaction == NULL)
1826     return NULL;
1827
1828   transaction->context = context;
1829
1830   return transaction;
1831 }
1832
1833 BusContext*
1834 bus_transaction_get_context (BusTransaction  *transaction)
1835 {
1836   return transaction->context;
1837 }
1838
1839 BusConnections*
1840 bus_transaction_get_connections (BusTransaction  *transaction)
1841 {
1842   return bus_context_get_connections (transaction->context);
1843 }
1844
1845 dbus_bool_t
1846 bus_transaction_send_from_driver (BusTransaction *transaction,
1847                                   DBusConnection *connection,
1848                                   DBusMessage    *message)
1849 {
1850   /* We have to set the sender to the driver, and have
1851    * to check security policy since it was not done in
1852    * dispatch.c
1853    */
1854   _dbus_verbose ("Sending %s %s %s from driver\n",
1855                  dbus_message_get_interface (message) ?
1856                  dbus_message_get_interface (message) : "(no interface)",
1857                  dbus_message_get_member (message) ?
1858                  dbus_message_get_member (message) : "(no member)",
1859                  dbus_message_get_error_name (message) ?
1860                  dbus_message_get_error_name (message) : "(no error name)");
1861
1862   if (!dbus_message_set_sender (message, DBUS_SERVICE_ORG_FREEDESKTOP_DBUS))
1863     return FALSE;
1864
1865   if (bus_connection_is_active (connection))
1866     {
1867       if (!dbus_message_set_destination (message,
1868                                          bus_connection_get_name (connection)))
1869         return FALSE;
1870     }
1871
1872   /* bus driver never wants a reply */
1873   dbus_message_set_no_reply (message, TRUE);
1874
1875   /* If security policy doesn't allow the message, we silently
1876    * eat it; the driver doesn't care about getting a reply.
1877    */
1878   if (!bus_context_check_security_policy (bus_transaction_get_context (transaction),
1879                                           transaction,
1880                                           NULL, connection, connection, message, NULL))
1881     return TRUE;
1882
1883   return bus_transaction_send (transaction, connection, message);
1884 }
1885
1886 dbus_bool_t
1887 bus_transaction_send (BusTransaction *transaction,
1888                       DBusConnection *connection,
1889                       DBusMessage    *message)
1890 {
1891   MessageToSend *to_send;
1892   BusConnectionData *d;
1893   DBusList *link;
1894
1895   _dbus_verbose ("  trying to add %s interface=%s member=%s error=%s to transaction%s\n",
1896                  dbus_message_get_type (message) == DBUS_MESSAGE_TYPE_ERROR ? "error" :
1897                  dbus_message_get_reply_serial (message) != 0 ? "reply" :
1898                  "message",
1899                  dbus_message_get_interface (message) ?
1900                  dbus_message_get_interface (message) : "(unset)",
1901                  dbus_message_get_member (message) ?
1902                  dbus_message_get_member (message) : "(unset)",
1903                  dbus_message_get_error_name (message) ?
1904                  dbus_message_get_error_name (message) : "(unset)",
1905                  dbus_connection_get_is_connected (connection) ?
1906                  "" : " (disconnected)");
1907
1908   _dbus_assert (dbus_message_get_sender (message) != NULL);
1909
1910   if (!dbus_connection_get_is_connected (connection))
1911     return TRUE; /* silently ignore disconnected connections */
1912
1913   d = BUS_CONNECTION_DATA (connection);
1914   _dbus_assert (d != NULL);
1915
1916   to_send = dbus_new (MessageToSend, 1);
1917   if (to_send == NULL)
1918     {
1919       return FALSE;
1920     }
1921
1922   to_send->preallocated = dbus_connection_preallocate_send (connection);
1923   if (to_send->preallocated == NULL)
1924     {
1925       dbus_free (to_send);
1926       return FALSE;
1927     }
1928
1929   dbus_message_ref (message);
1930   to_send->message = message;
1931   to_send->transaction = transaction;
1932
1933   _dbus_verbose ("about to prepend message\n");
1934
1935   if (!_dbus_list_prepend (&d->transaction_messages, to_send))
1936     {
1937       message_to_send_free (connection, to_send);
1938       return FALSE;
1939     }
1940
1941   _dbus_verbose ("prepended message\n");
1942
1943   /* See if we already had this connection in the list
1944    * for this transaction. If we have a pending message,
1945    * then we should already be in transaction->connections
1946    */
1947   link = _dbus_list_get_first_link (&d->transaction_messages);
1948   _dbus_assert (link->data == to_send);
1949   link = _dbus_list_get_next_link (&d->transaction_messages, link);
1950   while (link != NULL)
1951     {
1952       MessageToSend *m = link->data;
1953       DBusList *next = _dbus_list_get_next_link (&d->transaction_messages, link);
1954
1955       if (m->transaction == transaction)
1956         break;
1957
1958       link = next;
1959     }
1960
1961   if (link == NULL)
1962     {
1963       if (!_dbus_list_prepend (&transaction->connections, connection))
1964         {
1965           _dbus_list_remove (&d->transaction_messages, to_send);
1966           message_to_send_free (connection, to_send);
1967           return FALSE;
1968         }
1969     }
1970
1971   return TRUE;
1972 }
1973
1974 static void
1975 connection_cancel_transaction (DBusConnection *connection,
1976                                BusTransaction *transaction)
1977 {
1978   DBusList *link;
1979   BusConnectionData *d;
1980
1981   d = BUS_CONNECTION_DATA (connection);
1982   _dbus_assert (d != NULL);
1983
1984   link = _dbus_list_get_first_link (&d->transaction_messages);
1985   while (link != NULL)
1986     {
1987       MessageToSend *m = link->data;
1988       DBusList *next = _dbus_list_get_next_link (&d->transaction_messages, link);
1989
1990       if (m->transaction == transaction)
1991         {
1992           _dbus_list_remove_link (&d->transaction_messages,
1993                                   link);
1994
1995           message_to_send_free (connection, m);
1996         }
1997
1998       link = next;
1999     }
2000 }
2001
2002 void
2003 bus_transaction_cancel_and_free (BusTransaction *transaction)
2004 {
2005   DBusConnection *connection;
2006
2007   _dbus_verbose ("TRANSACTION: cancelled\n");
2008
2009   while ((connection = _dbus_list_pop_first (&transaction->connections)))
2010     connection_cancel_transaction (connection, transaction);
2011
2012   _dbus_assert (transaction->connections == NULL);
2013
2014   _dbus_list_foreach (&transaction->cancel_hooks,
2015                       cancel_hook_cancel, NULL);
2016
2017   free_cancel_hooks (transaction);
2018
2019   dbus_free (transaction);
2020 }
2021
2022 static void
2023 connection_execute_transaction (DBusConnection *connection,
2024                                 BusTransaction *transaction)
2025 {
2026   DBusList *link;
2027   BusConnectionData *d;
2028
2029   d = BUS_CONNECTION_DATA (connection);
2030   _dbus_assert (d != NULL);
2031
2032   /* Send the queue in order (FIFO) */
2033   link = _dbus_list_get_last_link (&d->transaction_messages);
2034   while (link != NULL)
2035     {
2036       MessageToSend *m = link->data;
2037       DBusList *prev = _dbus_list_get_prev_link (&d->transaction_messages, link);
2038
2039       if (m->transaction == transaction)
2040         {
2041           _dbus_list_remove_link (&d->transaction_messages,
2042                                   link);
2043
2044           _dbus_assert (dbus_message_get_sender (m->message) != NULL);
2045
2046           dbus_connection_send_preallocated (connection,
2047                                              m->preallocated,
2048                                              m->message,
2049                                              NULL);
2050
2051           m->preallocated = NULL; /* so we don't double-free it */
2052
2053           message_to_send_free (connection, m);
2054         }
2055
2056       link = prev;
2057     }
2058 }
2059
2060 void
2061 bus_transaction_execute_and_free (BusTransaction *transaction)
2062 {
2063   /* For each connection in transaction->connections
2064    * send the messages
2065    */
2066   DBusConnection *connection;
2067
2068   _dbus_verbose ("TRANSACTION: executing\n");
2069
2070   while ((connection = _dbus_list_pop_first (&transaction->connections)))
2071     connection_execute_transaction (connection, transaction);
2072
2073   _dbus_assert (transaction->connections == NULL);
2074
2075   free_cancel_hooks (transaction);
2076
2077   dbus_free (transaction);
2078 }
2079
2080 static void
2081 bus_connection_remove_transactions (DBusConnection *connection)
2082 {
2083   MessageToSend *to_send;
2084   BusConnectionData *d;
2085
2086   d = BUS_CONNECTION_DATA (connection);
2087   _dbus_assert (d != NULL);
2088
2089   while ((to_send = _dbus_list_get_first (&d->transaction_messages)))
2090     {
2091       /* only has an effect for the first MessageToSend listing this transaction */
2092       _dbus_list_remove (&to_send->transaction->connections,
2093                          connection);
2094
2095       _dbus_list_remove (&d->transaction_messages, to_send);
2096       message_to_send_free (connection, to_send);
2097     }
2098 }
2099
2100 /**
2101  * Converts the DBusError to a message reply
2102  */
2103 dbus_bool_t
2104 bus_transaction_send_error_reply (BusTransaction  *transaction,
2105                                   DBusConnection  *connection,
2106                                   const DBusError *error,
2107                                   DBusMessage     *in_reply_to)
2108 {
2109   DBusMessage *reply;
2110
2111   _dbus_assert (error != NULL);
2112   _DBUS_ASSERT_ERROR_IS_SET (error);
2113
2114   _dbus_verbose ("Sending error reply %s \"%s\"\n",
2115                  error->name, error->message);
2116
2117   reply = dbus_message_new_error (in_reply_to,
2118                                   error->name,
2119                                   error->message);
2120   if (reply == NULL)
2121     return FALSE;
2122
2123   if (!bus_transaction_send_from_driver (transaction, connection, reply))
2124     {
2125       dbus_message_unref (reply);
2126       return FALSE;
2127     }
2128
2129   dbus_message_unref (reply);
2130
2131   return TRUE;
2132 }
2133
2134 dbus_bool_t
2135 bus_transaction_add_cancel_hook (BusTransaction               *transaction,
2136                                  BusTransactionCancelFunction  cancel_function,
2137                                  void                         *data,
2138                                  DBusFreeFunction              free_data_function)
2139 {
2140   CancelHook *ch;
2141
2142   ch = dbus_new (CancelHook, 1);
2143   if (ch == NULL)
2144     return FALSE;
2145
2146   _dbus_verbose ("     adding cancel hook function = %p data = %p\n",
2147                  cancel_function, data);
2148
2149   ch->cancel_function = cancel_function;
2150   ch->data = data;
2151   ch->free_data_function = free_data_function;
2152
2153   /* It's important that the hooks get run in reverse order that they
2154    * were added
2155    */
2156   if (!_dbus_list_prepend (&transaction->cancel_hooks, ch))
2157     {
2158       dbus_free (ch);
2159       return FALSE;
2160     }
2161
2162   return TRUE;
2163 }