Bug 18446: Keep umask for session bus
[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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
21  *
22  */
23
24 #include "bus.h"
25 #include "activation.h"
26 #include "connection.h"
27 #include "services.h"
28 #include "utils.h"
29 #include "policy.h"
30 #include "config-parser.h"
31 #include "signals.h"
32 #include "selinux.h"
33 #include "dir-watch.h"
34 #include <dbus/dbus-list.h>
35 #include <dbus/dbus-hash.h>
36 #include <dbus/dbus-internals.h>
37
38 struct BusContext
39 {
40   int refcount;
41   DBusGUID uuid;
42   char *config_file;
43   char *type;
44   char *servicehelper;
45   char *address;
46   char *pidfile;
47   char *user;
48   DBusLoop *loop;
49   DBusList *servers;
50   BusConnections *connections;
51   BusActivation *activation;
52   BusRegistry *registry;
53   BusPolicy *policy;
54   BusMatchmaker *matchmaker;
55   BusLimits limits;
56   unsigned int fork : 1;
57   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   context->policy = bus_config_parser_steal_policy (parser);
437   _dbus_assert (context->policy != NULL);
438
439   /* We have to build the address backward, so that
440    * <listen> later in the config file have priority
441    */
442   link = _dbus_list_get_last_link (&context->servers);
443   while (link != NULL)
444     {
445       addr = dbus_server_get_address (link->data);
446       if (addr == NULL)
447         {
448           BUS_SET_OOM (error);
449           goto failed;
450         }
451
452       if (_dbus_string_get_length (&full_address) > 0)
453         {
454           if (!_dbus_string_append (&full_address, ";"))
455             {
456               BUS_SET_OOM (error);
457               goto failed;
458             }
459         }
460
461       if (!_dbus_string_append (&full_address, addr))
462         {
463           BUS_SET_OOM (error);
464           goto failed;
465         }
466
467       dbus_free (addr);
468       addr = NULL;
469
470       link = _dbus_list_get_prev_link (&context->servers, link);
471     }
472
473   if (is_reload)
474     dbus_free (context->address);
475
476   if (!_dbus_string_copy_data (&full_address, &context->address))
477     {
478       BUS_SET_OOM (error);
479       goto failed;
480     }
481
482   /* get the service directories */
483   dirs = bus_config_parser_get_service_dirs (parser);
484
485   /* and the service helper */
486   servicehelper = bus_config_parser_get_servicehelper (parser);
487
488   s = _dbus_strdup(servicehelper);
489   if (s == NULL && servicehelper != NULL)
490     {
491       BUS_SET_OOM (error);
492       goto failed;
493     }
494   else
495     {
496       dbus_free(context->servicehelper);
497       context->servicehelper = s;
498     }
499   
500   /* Create activation subsystem */
501   new_activation = bus_activation_new (context, &full_address,
502                                        dirs, error);
503   if (new_activation == NULL)
504     {
505       _DBUS_ASSERT_ERROR_IS_SET (error);
506       goto failed;
507     }
508
509   if (is_reload)
510     bus_activation_unref (context->activation);
511
512   context->activation = new_activation;
513
514   /* Drop existing conf-dir watches (if applicable) */
515
516   if (is_reload)
517     bus_drop_all_directory_watches ();
518
519   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
520   retval = TRUE;
521
522  failed:
523   _dbus_string_free (&full_address);
524   
525   if (addr)
526     dbus_free (addr);
527
528   return retval;
529 }
530
531 static dbus_bool_t
532 process_config_postinit (BusContext      *context,
533                          BusConfigParser *parser,
534                          DBusError       *error)
535 {
536   DBusHashTable *service_context_table;
537
538   service_context_table = bus_config_parser_steal_service_context_table (parser);
539   if (!bus_registry_set_service_context_table (context->registry,
540                                                service_context_table))
541     {
542       BUS_SET_OOM (error);
543       return FALSE;
544     }
545
546   _dbus_hash_table_unref (service_context_table);
547
548   /* Watch all conf directories */
549   _dbus_list_foreach (bus_config_parser_get_conf_dirs (parser),
550                       (DBusForeachFunction) bus_watch_directory,
551                       context);
552
553   return TRUE;
554 }
555
556 BusContext*
557 bus_context_new (const DBusString *config_file,
558                  ForceForkSetting  force_fork,
559                  DBusPipe         *print_addr_pipe,
560                  DBusPipe         *print_pid_pipe,
561                  DBusError        *error)
562 {
563   BusContext *context;
564   BusConfigParser *parser;
565
566   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
567
568   context = NULL;
569   parser = NULL;
570
571   if (!dbus_server_allocate_data_slot (&server_data_slot))
572     {
573       BUS_SET_OOM (error);
574       return NULL;
575     }
576
577   context = dbus_new0 (BusContext, 1);
578   if (context == NULL)
579     {
580       BUS_SET_OOM (error);
581       goto failed;
582     }
583   context->refcount = 1;
584
585   _dbus_generate_uuid (&context->uuid);
586   
587   if (!_dbus_string_copy_data (config_file, &context->config_file))
588     {
589       BUS_SET_OOM (error);
590       goto failed;
591     }
592
593   context->loop = _dbus_loop_new ();
594   if (context->loop == NULL)
595     {
596       BUS_SET_OOM (error);
597       goto failed;
598     }
599
600   context->registry = bus_registry_new (context);
601   if (context->registry == NULL)
602     {
603       BUS_SET_OOM (error);
604       goto failed;
605     }
606
607   parser = bus_config_load (config_file, TRUE, NULL, error);
608   if (parser == NULL)
609     {
610       _DBUS_ASSERT_ERROR_IS_SET (error);
611       goto failed;
612     }
613   
614   if (!process_config_first_time_only (context, parser, error))
615     {
616       _DBUS_ASSERT_ERROR_IS_SET (error);
617       goto failed;
618     }
619   if (!process_config_every_time (context, parser, FALSE, error))
620     {
621       _DBUS_ASSERT_ERROR_IS_SET (error);
622       goto failed;
623     }
624   
625   /* we need another ref of the server data slot for the context
626    * to own
627    */
628   if (!dbus_server_allocate_data_slot (&server_data_slot))
629     _dbus_assert_not_reached ("second ref of server data slot failed");
630
631   /* Note that we don't know whether the print_addr_pipe is
632    * one of the sockets we're using to listen on, or some
633    * other random thing. But I think the answer is "don't do
634    * that then"
635    */
636   if (print_addr_pipe != NULL && _dbus_pipe_is_valid (print_addr_pipe))
637     {
638       DBusString addr;
639       const char *a = bus_context_get_address (context);
640       int bytes;
641       
642       _dbus_assert (a != NULL);
643       if (!_dbus_string_init (&addr))
644         {
645           BUS_SET_OOM (error);
646           goto failed;
647         }
648       
649       if (!_dbus_string_append (&addr, a) ||
650           !_dbus_string_append (&addr, "\n"))
651         {
652           _dbus_string_free (&addr);
653           BUS_SET_OOM (error);
654           goto failed;
655         }
656
657       bytes = _dbus_string_get_length (&addr);
658       if (_dbus_pipe_write (print_addr_pipe, &addr, 0, bytes, error) != bytes)
659         {
660           /* pipe write returns an error on failure but not short write */
661           if (error != NULL && !dbus_error_is_set (error))
662             {
663               dbus_set_error (error, DBUS_ERROR_FAILED,
664                               "Printing message bus address: did not write all bytes\n");
665             }
666           _dbus_string_free (&addr);
667           goto failed;
668         }
669
670       if (!_dbus_pipe_is_stdout_or_stderr (print_addr_pipe))
671         _dbus_pipe_close (print_addr_pipe, NULL);
672       
673       _dbus_string_free (&addr);
674     }
675   
676   context->connections = bus_connections_new (context);
677   if (context->connections == NULL)
678     {
679       BUS_SET_OOM (error);
680       goto failed;
681     }
682
683   context->matchmaker = bus_matchmaker_new ();
684   if (context->matchmaker == NULL)
685     {
686       BUS_SET_OOM (error);
687       goto failed;
688     }
689
690   /* check user before we fork */
691   if (context->user != NULL)
692     {
693       if (!_dbus_verify_daemon_user (context->user))
694         {
695           dbus_set_error (error, DBUS_ERROR_FAILED,
696                           "Could not get UID and GID for username \"%s\"",
697                           context->user);
698           goto failed;
699         }
700     }
701
702   /* Now become a daemon if appropriate and write out pid file in any case */
703   {
704     DBusString u;
705
706     if (context->pidfile)
707       _dbus_string_init_const (&u, context->pidfile);
708
709     if ((force_fork != FORK_NEVER && context->fork) || force_fork == FORK_ALWAYS)
710       {
711         _dbus_verbose ("Forking and becoming daemon\n");
712         
713         if (!_dbus_become_daemon (context->pidfile ? &u : NULL, 
714                                   print_pid_pipe,
715                                   error,
716                                   context->keep_umask))
717           {
718             _DBUS_ASSERT_ERROR_IS_SET (error);
719             goto failed;
720           }
721       }
722     else
723       {
724         _dbus_verbose ("Fork not requested\n");
725         
726         /* Need to write PID file and to PID pipe for ourselves,
727          * not for the child process. This is a no-op if the pidfile
728          * is NULL and print_pid_pipe is NULL.
729          */
730         if (!_dbus_write_pid_to_file_and_pipe (context->pidfile ? &u : NULL,
731                                                print_pid_pipe,
732                                                _dbus_getpid (),
733                                                error))
734           {
735             _DBUS_ASSERT_ERROR_IS_SET (error);
736             goto failed;
737           }
738       }
739   }
740
741   if (print_pid_pipe && _dbus_pipe_is_valid (print_pid_pipe) &&
742       !_dbus_pipe_is_stdout_or_stderr (print_pid_pipe))
743     _dbus_pipe_close (print_pid_pipe, NULL);
744   
745   if (!process_config_postinit (context, parser, error))
746     {
747       _DBUS_ASSERT_ERROR_IS_SET (error);
748       goto failed;
749     }
750
751   if (parser != NULL)
752     {
753       bus_config_parser_unref (parser);
754       parser = NULL;
755     }
756   
757   /* Here we change our credentials if required,
758    * as soon as we've set up our sockets and pidfile
759    */
760   if (context->user != NULL)
761     {
762       if (!_dbus_change_to_daemon_user (context->user, error))
763         {
764           _DBUS_ASSERT_ERROR_IS_SET (error);
765           goto failed;
766         }
767
768 #ifdef HAVE_SELINUX
769       /* FIXME - why not just put this in full_init() below? */
770       bus_selinux_audit_init ();
771 #endif
772     }
773
774   if (!bus_selinux_full_init ())
775     {
776       _dbus_warn ("SELinux initialization failed\n");
777     }
778   
779   dbus_server_free_data_slot (&server_data_slot);
780   
781   return context;
782   
783  failed:  
784   if (parser != NULL)
785     bus_config_parser_unref (parser);
786   if (context != NULL)
787     bus_context_unref (context);
788
789   if (server_data_slot >= 0)
790     dbus_server_free_data_slot (&server_data_slot);
791   
792   return NULL;
793 }
794
795 dbus_bool_t
796 bus_context_get_id (BusContext       *context,
797                     DBusString       *uuid)
798 {
799   return _dbus_uuid_encode (&context->uuid, uuid);
800 }
801
802 dbus_bool_t
803 bus_context_reload_config (BusContext *context,
804                            DBusError  *error)
805 {
806   BusConfigParser *parser;
807   DBusString config_file;
808   dbus_bool_t ret;
809
810   /* Flush the user database cache */
811   _dbus_flush_caches ();
812
813   ret = FALSE;
814   _dbus_string_init_const (&config_file, context->config_file);
815   parser = bus_config_load (&config_file, TRUE, NULL, error);
816   if (parser == NULL)
817     {
818       _DBUS_ASSERT_ERROR_IS_SET (error);
819       goto failed;
820     }
821   
822   if (!process_config_every_time (context, parser, TRUE, error))
823     {
824       _DBUS_ASSERT_ERROR_IS_SET (error);
825       goto failed;
826     }
827   if (!process_config_postinit (context, parser, error))
828     {
829       _DBUS_ASSERT_ERROR_IS_SET (error);
830       goto failed;
831     }
832   ret = TRUE;
833
834   bus_context_log_info (context, "Reloaded configuration");
835  failed:  
836   if (!ret)
837     bus_context_log_info (context, "Unable to reload configuration: %s", error->message);
838   if (parser != NULL)
839     bus_config_parser_unref (parser);
840   return ret;
841 }
842
843 static void
844 shutdown_server (BusContext *context,
845                  DBusServer *server)
846 {
847   if (server == NULL ||
848       !dbus_server_get_is_connected (server))
849     return;
850   
851   if (!dbus_server_set_watch_functions (server,
852                                         NULL, NULL, NULL,
853                                         context,
854                                         NULL))
855     _dbus_assert_not_reached ("setting watch functions to NULL failed");
856   
857   if (!dbus_server_set_timeout_functions (server,
858                                           NULL, NULL, NULL,
859                                           context,
860                                           NULL))
861     _dbus_assert_not_reached ("setting timeout functions to NULL failed");
862   
863   dbus_server_disconnect (server);
864 }
865
866 void
867 bus_context_shutdown (BusContext  *context)
868 {
869   DBusList *link;
870
871   link = _dbus_list_get_first_link (&context->servers);
872   while (link != NULL)
873     {
874       shutdown_server (context, link->data);
875
876       link = _dbus_list_get_next_link (&context->servers, link);
877     }
878 }
879
880 BusContext *
881 bus_context_ref (BusContext *context)
882 {
883   _dbus_assert (context->refcount > 0);
884   context->refcount += 1;
885
886   return context;
887 }
888
889 void
890 bus_context_unref (BusContext *context)
891 {
892   _dbus_assert (context->refcount > 0);
893   context->refcount -= 1;
894
895   if (context->refcount == 0)
896     {
897       DBusList *link;
898       
899       _dbus_verbose ("Finalizing bus context %p\n", context);
900       
901       bus_context_shutdown (context);
902
903       if (context->connections)
904         {
905           bus_connections_unref (context->connections);
906           context->connections = NULL;
907         }
908       
909       if (context->registry)
910         {
911           bus_registry_unref (context->registry);
912           context->registry = NULL;
913         }
914       
915       if (context->activation)
916         {
917           bus_activation_unref (context->activation);
918           context->activation = NULL;
919         }
920
921       link = _dbus_list_get_first_link (&context->servers);
922       while (link != NULL)
923         {
924           dbus_server_unref (link->data);
925           
926           link = _dbus_list_get_next_link (&context->servers, link);
927         }
928       _dbus_list_clear (&context->servers);
929
930       if (context->policy)
931         {
932           bus_policy_unref (context->policy);
933           context->policy = NULL;
934         }
935       
936       if (context->loop)
937         {
938           _dbus_loop_unref (context->loop);
939           context->loop = NULL;
940         }
941
942       if (context->matchmaker)
943         {
944           bus_matchmaker_unref (context->matchmaker);
945           context->matchmaker = NULL;
946         }
947       
948       dbus_free (context->config_file);
949       dbus_free (context->type);
950       dbus_free (context->address);
951       dbus_free (context->user);
952       dbus_free (context->servicehelper);
953
954       if (context->pidfile)
955         {
956           DBusString u;
957           _dbus_string_init_const (&u, context->pidfile);
958
959           /* Deliberately ignore errors here, since there's not much
960            * we can do about it, and we're exiting anyways.
961            */
962           _dbus_delete_file (&u, NULL);
963
964           dbus_free (context->pidfile); 
965         }
966       dbus_free (context);
967
968       dbus_server_free_data_slot (&server_data_slot);
969     }
970 }
971
972 /* type may be NULL */
973 const char*
974 bus_context_get_type (BusContext *context)
975 {
976   return context->type;
977 }
978
979 const char*
980 bus_context_get_address (BusContext *context)
981 {
982   return context->address;
983 }
984
985 const char*
986 bus_context_get_servicehelper (BusContext *context)
987 {
988   return context->servicehelper;
989 }
990
991 BusRegistry*
992 bus_context_get_registry (BusContext  *context)
993 {
994   return context->registry;
995 }
996
997 BusConnections*
998 bus_context_get_connections (BusContext  *context)
999 {
1000   return context->connections;
1001 }
1002
1003 BusActivation*
1004 bus_context_get_activation (BusContext  *context)
1005 {
1006   return context->activation;
1007 }
1008
1009 BusMatchmaker*
1010 bus_context_get_matchmaker (BusContext  *context)
1011 {
1012   return context->matchmaker;
1013 }
1014
1015 DBusLoop*
1016 bus_context_get_loop (BusContext *context)
1017 {
1018   return context->loop;
1019 }
1020
1021 dbus_bool_t
1022 bus_context_allow_unix_user (BusContext   *context,
1023                              unsigned long uid)
1024 {
1025   return bus_policy_allow_unix_user (context->policy,
1026                                      uid);
1027 }
1028
1029 /* For now this is never actually called because the default
1030  * DBusConnection behavior of 'same user that owns the bus can connect'
1031  * is all it would do.
1032  */
1033 dbus_bool_t
1034 bus_context_allow_windows_user (BusContext       *context,
1035                                 const char       *windows_sid)
1036 {
1037   return bus_policy_allow_windows_user (context->policy,
1038                                         windows_sid);
1039 }
1040
1041 BusPolicy *
1042 bus_context_get_policy (BusContext *context)
1043 {
1044   return context->policy;
1045 }
1046
1047 BusClientPolicy*
1048 bus_context_create_client_policy (BusContext      *context,
1049                                   DBusConnection  *connection,
1050                                   DBusError       *error)
1051 {
1052   _DBUS_ASSERT_ERROR_IS_CLEAR (error);
1053   return bus_policy_create_client_policy (context->policy, connection,
1054                                           error);
1055 }
1056
1057 int
1058 bus_context_get_activation_timeout (BusContext *context)
1059 {
1060   
1061   return context->limits.activation_timeout;
1062 }
1063
1064 int
1065 bus_context_get_auth_timeout (BusContext *context)
1066 {
1067   return context->limits.auth_timeout;
1068 }
1069
1070 int
1071 bus_context_get_max_completed_connections (BusContext *context)
1072 {
1073   return context->limits.max_completed_connections;
1074 }
1075
1076 int
1077 bus_context_get_max_incomplete_connections (BusContext *context)
1078 {
1079   return context->limits.max_incomplete_connections;
1080 }
1081
1082 int
1083 bus_context_get_max_connections_per_user (BusContext *context)
1084 {
1085   return context->limits.max_connections_per_user;
1086 }
1087
1088 int
1089 bus_context_get_max_pending_activations (BusContext *context)
1090 {
1091   return context->limits.max_pending_activations;
1092 }
1093
1094 int
1095 bus_context_get_max_services_per_connection (BusContext *context)
1096 {
1097   return context->limits.max_services_per_connection;
1098 }
1099
1100 int
1101 bus_context_get_max_match_rules_per_connection (BusContext *context)
1102 {
1103   return context->limits.max_match_rules_per_connection;
1104 }
1105
1106 int
1107 bus_context_get_max_replies_per_connection (BusContext *context)
1108 {
1109   return context->limits.max_replies_per_connection;
1110 }
1111
1112 int
1113 bus_context_get_reply_timeout (BusContext *context)
1114 {
1115   return context->limits.reply_timeout;
1116 }
1117
1118 void
1119 bus_context_log_info (BusContext *context, const char *msg, ...)
1120 {
1121   va_list args;
1122
1123   va_start (args, msg);
1124   
1125   if (context->syslog)
1126     _dbus_log_info (msg, args);
1127
1128   va_end (args);
1129 }
1130
1131 void
1132 bus_context_log_security (BusContext *context, const char *msg, ...)
1133 {
1134   va_list args;
1135
1136   va_start (args, msg);
1137   
1138   if (context->syslog)
1139     _dbus_log_security (msg, args);
1140
1141   va_end (args);
1142 }
1143
1144 /*
1145  * addressed_recipient is the recipient specified in the message.
1146  *
1147  * proposed_recipient is the recipient we're considering sending
1148  * to right this second, and may be an eavesdropper.
1149  *
1150  * sender is the sender of the message.
1151  *
1152  * NULL for proposed_recipient or sender definitely means the bus driver.
1153  *
1154  * NULL for addressed_recipient may mean the bus driver, or may mean
1155  * no destination was specified in the message (e.g. a signal).
1156  */
1157 dbus_bool_t
1158 bus_context_check_security_policy (BusContext     *context,
1159                                    BusTransaction *transaction,
1160                                    DBusConnection *sender,
1161                                    DBusConnection *addressed_recipient,
1162                                    DBusConnection *proposed_recipient,
1163                                    DBusMessage    *message,
1164                                    DBusError      *error)
1165 {
1166   const char *dest;
1167   BusClientPolicy *sender_policy;
1168   BusClientPolicy *recipient_policy;
1169   dbus_int32_t toggles;
1170   dbus_bool_t log;
1171   int type;
1172   dbus_bool_t requested_reply;
1173   const char *sender_name;
1174   const char *sender_loginfo;
1175   const char *proposed_recipient_loginfo;
1176   
1177   type = dbus_message_get_type (message);
1178   dest = dbus_message_get_destination (message);
1179   
1180   /* dispatch.c was supposed to ensure these invariants */
1181   _dbus_assert (dest != NULL ||
1182                 type == DBUS_MESSAGE_TYPE_SIGNAL ||
1183                 (sender == NULL && !bus_connection_is_active (proposed_recipient)));
1184   _dbus_assert (type == DBUS_MESSAGE_TYPE_SIGNAL ||
1185                 addressed_recipient != NULL ||
1186                 strcmp (dest, DBUS_SERVICE_DBUS) == 0);
1187
1188   /* Used in logging below */
1189   if (sender != NULL)
1190     {
1191       sender_name = bus_connection_get_name (sender);
1192       sender_loginfo = bus_connection_get_loginfo (sender);
1193     }
1194   else
1195     {
1196       sender_name = NULL;
1197       sender_loginfo = "(bus)";
1198     }
1199   
1200   if (proposed_recipient != NULL)
1201     proposed_recipient_loginfo = bus_connection_get_loginfo (proposed_recipient);
1202   else
1203     proposed_recipient_loginfo = "bus";
1204   
1205   switch (type)
1206     {
1207     case DBUS_MESSAGE_TYPE_METHOD_CALL:
1208     case DBUS_MESSAGE_TYPE_SIGNAL:
1209     case DBUS_MESSAGE_TYPE_METHOD_RETURN:
1210     case DBUS_MESSAGE_TYPE_ERROR:
1211       break;
1212       
1213     default:
1214       _dbus_verbose ("security check disallowing message of unknown type %d\n",
1215                      type);
1216
1217       dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1218                       "Message bus will not accept messages of unknown type\n");
1219               
1220       return FALSE;
1221     }
1222
1223   requested_reply = FALSE;
1224   
1225   if (sender != NULL)
1226     {
1227       /* First verify the SELinux access controls.  If allowed then
1228        * go on with the standard checks.
1229        */
1230       if (!bus_selinux_allows_send (sender, proposed_recipient,
1231                                     dbus_message_type_to_string (dbus_message_get_type (message)),
1232                                     dbus_message_get_interface (message),
1233                                     dbus_message_get_member (message),
1234                                     dbus_message_get_error_name (message),
1235                                     dest ? dest : DBUS_SERVICE_DBUS, error))
1236         {
1237           if (error != NULL && !dbus_error_is_set (error))
1238             {
1239               dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1240                               "An SELinux policy prevents this sender "
1241                               "from sending this message to this recipient "
1242                               "(rejected message had sender \"%s\" interface \"%s\" "
1243                               "member \"%s\" error name \"%s\" destination \"%s\")",
1244                               sender_name ? sender_name : "(unset)",
1245                               dbus_message_get_interface (message) ?
1246                               dbus_message_get_interface (message) : "(unset)",
1247                               dbus_message_get_member (message) ?
1248                               dbus_message_get_member (message) : "(unset)",
1249                               dbus_message_get_error_name (message) ?
1250                               dbus_message_get_error_name (message) : "(unset)",
1251                               dest ? dest : DBUS_SERVICE_DBUS);
1252               _dbus_verbose ("SELinux security check denying send to service\n");
1253             }
1254
1255           return FALSE;
1256         }
1257        
1258       if (bus_connection_is_active (sender))
1259         {
1260           sender_policy = bus_connection_get_policy (sender);
1261           _dbus_assert (sender_policy != NULL);
1262           
1263           /* Fill in requested_reply variable with TRUE if this is a
1264            * reply and the reply was pending.
1265            */
1266           if (dbus_message_get_reply_serial (message) != 0)
1267             {
1268               if (proposed_recipient != NULL /* not to the bus driver */ &&
1269                   addressed_recipient == proposed_recipient /* not eavesdropping */)
1270                 {
1271                   DBusError error2;                  
1272                   
1273                   dbus_error_init (&error2);
1274                   requested_reply = bus_connections_check_reply (bus_connection_get_connections (sender),
1275                                                                  transaction,
1276                                                                  sender, addressed_recipient, message,
1277                                                                  &error2);
1278                   if (dbus_error_is_set (&error2))
1279                     {
1280                       dbus_move_error (&error2, error);
1281                       return FALSE;
1282                     }
1283                 }
1284             }
1285         }
1286       else
1287         {
1288           /* Policy for inactive connections is that they can only send
1289            * the hello message to the bus driver
1290            */
1291           if (proposed_recipient == NULL &&
1292               dbus_message_is_method_call (message,
1293                                            DBUS_INTERFACE_DBUS,
1294                                            "Hello"))
1295             {
1296               _dbus_verbose ("security check allowing %s message\n",
1297                              "Hello");
1298               return TRUE;
1299             }
1300           else
1301             {
1302               _dbus_verbose ("security check disallowing non-%s message\n",
1303                              "Hello");
1304
1305               dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED,
1306                               "Client tried to send a message other than %s without being registered",
1307                               "Hello");
1308               
1309               return FALSE;
1310             }
1311         }
1312     }
1313   else
1314     {
1315       sender_policy = NULL;
1316
1317       /* If the sender is the bus driver, we assume any reply was a
1318        * requested reply as bus driver won't send bogus ones
1319        */
1320       if (addressed_recipient == proposed_recipient /* not eavesdropping */ &&
1321           dbus_message_get_reply_serial (message) != 0)
1322         requested_reply = TRUE;
1323     }
1324
1325   _dbus_assert ((sender != NULL && sender_policy != NULL) ||
1326                 (sender == NULL && sender_policy == NULL));
1327   
1328   if (proposed_recipient != NULL)
1329     {
1330       /* only the bus driver can send to an inactive recipient (as it
1331        * owns no services, so other apps can't address it). Inactive
1332        * recipients can receive any message.
1333        */
1334       if (bus_connection_is_active (proposed_recipient))
1335         {
1336           recipient_policy = bus_connection_get_policy (proposed_recipient);
1337           _dbus_assert (recipient_policy != NULL);
1338         }
1339       else if (sender == NULL)
1340         {
1341           _dbus_verbose ("security check using NULL recipient policy for message from bus\n");
1342           recipient_policy = NULL;
1343         }
1344       else
1345         {
1346           _dbus_assert_not_reached ("a message was somehow sent to an inactive recipient from a source other than the message bus\n");
1347           recipient_policy = NULL;
1348         }
1349     }
1350   else
1351     recipient_policy = NULL;
1352   
1353   _dbus_assert ((proposed_recipient != NULL && recipient_policy != NULL) ||
1354                 (proposed_recipient != NULL && sender == NULL && recipient_policy == NULL) ||
1355                 (proposed_recipient == NULL && recipient_policy == NULL));
1356   
1357   log = FALSE;
1358   if (sender_policy &&
1359       !bus_client_policy_check_can_send (sender_policy,
1360                                          context->registry,
1361                                          requested_reply,
1362                                          proposed_recipient,
1363                                          message, &toggles, &log))
1364     {
1365       const char *msg = "Rejected send message, %d matched rules; "
1366                         "type=\"%s\", sender=\"%s\" (%s) interface=\"%s\" member=\"%s\" error name=\"%s\" requested_reply=%d destination=\"%s\" (%s))";
1367
1368       dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED, msg,
1369                       toggles,
1370                       dbus_message_type_to_string (dbus_message_get_type (message)),
1371                       sender_name ? sender_name : "(unset)",
1372                       sender_loginfo,
1373                       dbus_message_get_interface (message) ?
1374                       dbus_message_get_interface (message) : "(unset)",
1375                       dbus_message_get_member (message) ?
1376                       dbus_message_get_member (message) : "(unset)",
1377                       dbus_message_get_error_name (message) ?
1378                       dbus_message_get_error_name (message) : "(unset)",
1379                       requested_reply,
1380                       dest ? dest : DBUS_SERVICE_DBUS,
1381                       proposed_recipient_loginfo);
1382       /* Needs to be duplicated to avoid calling malloc and having to handle OOM */
1383       if (addressed_recipient == proposed_recipient)      
1384         bus_context_log_security (context, msg,
1385                                   toggles,
1386                                   dbus_message_type_to_string (dbus_message_get_type (message)),
1387                                   sender_name ? sender_name : "(unset)",
1388                                   sender_loginfo,
1389                                   dbus_message_get_interface (message) ?
1390                                   dbus_message_get_interface (message) : "(unset)",
1391                                   dbus_message_get_member (message) ?
1392                                   dbus_message_get_member (message) : "(unset)",
1393                                   dbus_message_get_error_name (message) ?
1394                                   dbus_message_get_error_name (message) : "(unset)",
1395                                   requested_reply,
1396                                   dest ? dest : DBUS_SERVICE_DBUS,
1397                                   proposed_recipient_loginfo);
1398       _dbus_verbose ("security policy disallowing message due to sender policy\n");
1399       return FALSE;
1400     }
1401
1402   if (log)
1403     bus_context_log_security (context, 
1404                               "Would reject message, %d matched rules; "
1405                               "type=\"%s\", sender=\"%s\" (%s) interface=\"%s\" member=\"%s\" error name=\"%s\" requested_reply=%d destination=\"%s\" (%s))",
1406                               toggles,
1407                               dbus_message_type_to_string (dbus_message_get_type (message)),
1408                               sender_name ? sender_name : "(unset)",
1409                               sender_loginfo,
1410                               dbus_message_get_interface (message) ?
1411                               dbus_message_get_interface (message) : "(unset)",
1412                               dbus_message_get_member (message) ?
1413                               dbus_message_get_member (message) : "(unset)",
1414                               dbus_message_get_error_name (message) ?
1415                               dbus_message_get_error_name (message) : "(unset)",
1416                               requested_reply,                               
1417                               dest ? dest : DBUS_SERVICE_DBUS,
1418                               proposed_recipient_loginfo);
1419
1420   if (recipient_policy &&
1421       !bus_client_policy_check_can_receive (recipient_policy,
1422                                             context->registry,
1423                                             requested_reply,
1424                                             sender,
1425                                             addressed_recipient, proposed_recipient,
1426                                             message, &toggles))
1427     {
1428       const char *msg = "Rejected receive message, %d matched rules; "
1429                         "type=\"%s\" sender=\"%s\" (%s) interface=\"%s\" member=\"%s\" error name=\"%s\" reply serial=%u requested_reply=%d destination=\"%s\" (%s))";
1430
1431       dbus_set_error (error, DBUS_ERROR_ACCESS_DENIED, msg,
1432                       toggles,
1433                       dbus_message_type_to_string (dbus_message_get_type (message)),
1434                       sender_name ? sender_name : "(unset)",
1435                       sender_loginfo,
1436                       dbus_message_get_interface (message) ?
1437                       dbus_message_get_interface (message) : "(unset)",
1438                       dbus_message_get_member (message) ?
1439                       dbus_message_get_member (message) : "(unset)",
1440                       dbus_message_get_error_name (message) ?
1441                       dbus_message_get_error_name (message) : "(unset)",
1442                       dbus_message_get_reply_serial (message),
1443                       requested_reply,
1444                       dest ? dest : DBUS_SERVICE_DBUS,
1445                       proposed_recipient_loginfo);
1446       /* Needs to be duplicated to avoid calling malloc and having to handle OOM */
1447       if (addressed_recipient == proposed_recipient)      
1448         bus_context_log_security (context, msg,
1449                                   toggles,
1450                                   dbus_message_type_to_string (dbus_message_get_type (message)),
1451                                   sender_name ? sender_name : "(unset)",
1452                                   sender_loginfo,
1453                                   dbus_message_get_interface (message) ?
1454                                   dbus_message_get_interface (message) : "(unset)",
1455                                   dbus_message_get_member (message) ?
1456                                   dbus_message_get_member (message) : "(unset)",
1457                                   dbus_message_get_error_name (message) ?
1458                                   dbus_message_get_error_name (message) : "(unset)",
1459                                   dbus_message_get_reply_serial (message),
1460                                   requested_reply,
1461                                   dest ? dest : DBUS_SERVICE_DBUS,
1462                                   proposed_recipient_loginfo);
1463       _dbus_verbose ("security policy disallowing message due to recipient policy\n");
1464       return FALSE;
1465     }
1466
1467   /* See if limits on size have been exceeded */
1468   if (proposed_recipient &&
1469       dbus_connection_get_outgoing_size (proposed_recipient) >
1470       context->limits.max_outgoing_bytes)
1471     {
1472       dbus_set_error (error, DBUS_ERROR_LIMITS_EXCEEDED,
1473                       "The destination service \"%s\" has a full message queue",
1474                       dest ? dest : (proposed_recipient ?
1475                                      bus_connection_get_name (proposed_recipient) : 
1476                                      DBUS_SERVICE_DBUS));
1477       _dbus_verbose ("security policy disallowing message due to full message queue\n");
1478       return FALSE;
1479     }
1480
1481   /* Record that we will allow a reply here in the future (don't
1482    * bother if the recipient is the bus or this is an eavesdropping
1483    * connection). Only the addressed recipient may reply.
1484    */
1485   if (type == DBUS_MESSAGE_TYPE_METHOD_CALL &&
1486       sender && 
1487       addressed_recipient &&
1488       addressed_recipient == proposed_recipient && /* not eavesdropping */
1489       !bus_connections_expect_reply (bus_connection_get_connections (sender),
1490                                      transaction,
1491                                      sender, addressed_recipient,
1492                                      message, error))
1493     {
1494       _dbus_verbose ("Failed to record reply expectation or problem with the message expecting a reply\n");
1495       return FALSE;
1496     }
1497   
1498   _dbus_verbose ("security policy allowing message\n");
1499   return TRUE;
1500 }