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