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