D-Bus  1.6.12
dbus-sysdeps-win.c
1 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
2 /* dbus-sysdeps.c Wrappers around system/libc features (internal to D-BUS implementation)
3  *
4  * Copyright (C) 2002, 2003 Red Hat, Inc.
5  * Copyright (C) 2003 CodeFactory AB
6  * Copyright (C) 2005 Novell, Inc.
7  * Copyright (C) 2006 Peter Kümmel <syntheticpp@gmx.net>
8  * Copyright (C) 2006 Christian Ehrlicher <ch.ehrlicher@gmx.de>
9  * Copyright (C) 2006-2010 Ralf Habacker <ralf.habacker@freenet.de>
10  *
11  * Licensed under the Academic Free License version 2.1
12  *
13  * This program is free software; you can redistribute it and/or modify
14  * it under the terms of the GNU General Public License as published by
15  * the Free Software Foundation; either version 2 of the License, or
16  * (at your option) any later version.
17  *
18  * This program is distributed in the hope that it will be useful,
19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21  * GNU General Public License for more details.
22  *
23  * You should have received a copy of the GNU General Public License
24  * along with this program; if not, write to the Free Software
25  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
26  *
27  */
28 
29 #include <config.h>
30 
31 #define STRSAFE_NO_DEPRECATE
32 
33 #ifndef DBUS_WINCE
34 #ifndef _WIN32_WINNT
35 #define _WIN32_WINNT 0x0501
36 #endif
37 #endif
38 
39 #include "dbus-internals.h"
40 #include "dbus-sha.h"
41 #include "dbus-sysdeps.h"
42 #include "dbus-threads.h"
43 #include "dbus-protocol.h"
44 #include "dbus-string.h"
45 #include "dbus-sysdeps.h"
46 #include "dbus-sysdeps-win.h"
47 #include "dbus-protocol.h"
48 #include "dbus-hash.h"
49 #include "dbus-sockets-win.h"
50 #include "dbus-list.h"
51 #include "dbus-nonce.h"
52 #include "dbus-credentials.h"
53 
54 #include <windows.h>
55 #include <ws2tcpip.h>
56 #include <wincrypt.h>
57 
58 /* Declarations missing in mingw's headers */
59 extern BOOL WINAPI ConvertStringSidToSidA (LPCSTR StringSid, PSID *Sid);
60 extern BOOL WINAPI ConvertSidToStringSidA (PSID Sid, LPSTR *StringSid);
61 
62 #include <stdio.h>
63 
64 #include <string.h>
65 #if HAVE_ERRNO_H
66 #include <errno.h>
67 #endif
68 #ifndef DBUS_WINCE
69 #include <mbstring.h>
70 #include <sys/stat.h>
71 #include <sys/types.h>
72 #endif
73 
74 #ifdef HAVE_WS2TCPIP_H
75 /* getaddrinfo for Windows CE (and Windows). */
76 #include <ws2tcpip.h>
77 #endif
78 
79 #ifdef HAVE_WSPIAPI_H
80 // needed for w2k compatibility (getaddrinfo/freeaddrinfo/getnameinfo)
81 #ifdef __GNUC__
82 #define _inline
83 #include "wspiapi.h"
84 #else
85 #include <wspiapi.h>
86 #endif
87 #endif // HAVE_WSPIAPI_H
88 
89 #ifndef O_BINARY
90 #define O_BINARY 0
91 #endif
92 
93 typedef int socklen_t;
94 
95 
96 void
97 _dbus_win_set_errno (int err)
98 {
99 #ifdef DBUS_WINCE
100  SetLastError (err);
101 #else
102  errno = err;
103 #endif
104 }
105 
106 
107 /* Convert GetLastError() to a dbus error. */
108 const char*
109 _dbus_win_error_from_last_error (void)
110 {
111  switch (GetLastError())
112  {
113  case 0:
114  return DBUS_ERROR_FAILED;
115 
116  case ERROR_NO_MORE_FILES:
117  case ERROR_TOO_MANY_OPEN_FILES:
118  return DBUS_ERROR_LIMITS_EXCEEDED; /* kernel out of memory */
119 
120  case ERROR_ACCESS_DENIED:
121  case ERROR_CANNOT_MAKE:
123 
124  case ERROR_NOT_ENOUGH_MEMORY:
125  return DBUS_ERROR_NO_MEMORY;
126 
127  case ERROR_FILE_EXISTS:
128  return DBUS_ERROR_FILE_EXISTS;
129 
130  case ERROR_FILE_NOT_FOUND:
131  case ERROR_PATH_NOT_FOUND:
133  }
134 
135  return DBUS_ERROR_FAILED;
136 }
137 
138 
139 char*
140 _dbus_win_error_string (int error_number)
141 {
142  char *msg;
143 
144  FormatMessageA (FORMAT_MESSAGE_ALLOCATE_BUFFER |
145  FORMAT_MESSAGE_IGNORE_INSERTS |
146  FORMAT_MESSAGE_FROM_SYSTEM,
147  NULL, error_number, 0,
148  (LPSTR) &msg, 0, NULL);
149 
150  if (msg[strlen (msg) - 1] == '\n')
151  msg[strlen (msg) - 1] = '\0';
152  if (msg[strlen (msg) - 1] == '\r')
153  msg[strlen (msg) - 1] = '\0';
154 
155  return msg;
156 }
157 
158 void
159 _dbus_win_free_error_string (char *string)
160 {
161  LocalFree (string);
162 }
163 
184 int
186  DBusString *buffer,
187  int count)
188 {
189  int bytes_read;
190  int start;
191  char *data;
192 
193  _dbus_assert (count >= 0);
194 
195  start = _dbus_string_get_length (buffer);
196 
197  if (!_dbus_string_lengthen (buffer, count))
198  {
199  _dbus_win_set_errno (ENOMEM);
200  return -1;
201  }
202 
203  data = _dbus_string_get_data_len (buffer, start, count);
204 
205  again:
206 
207  _dbus_verbose ("recv: count=%d fd=%d\n", count, fd);
208  bytes_read = recv (fd, data, count, 0);
209 
210  if (bytes_read == SOCKET_ERROR)
211  {
212  DBUS_SOCKET_SET_ERRNO();
213  _dbus_verbose ("recv: failed: %s (%d)\n", _dbus_strerror (errno), errno);
214  bytes_read = -1;
215  }
216  else
217  _dbus_verbose ("recv: = %d\n", bytes_read);
218 
219  if (bytes_read < 0)
220  {
221  if (errno == EINTR)
222  goto again;
223  else
224  {
225  /* put length back (note that this doesn't actually realloc anything) */
226  _dbus_string_set_length (buffer, start);
227  return -1;
228  }
229  }
230  else
231  {
232  /* put length back (doesn't actually realloc) */
233  _dbus_string_set_length (buffer, start + bytes_read);
234 
235 #if 0
236  if (bytes_read > 0)
237  _dbus_verbose_bytes_of_string (buffer, start, bytes_read);
238 #endif
239 
240  return bytes_read;
241  }
242 }
243 
254 int
256  const DBusString *buffer,
257  int start,
258  int len)
259 {
260  const char *data;
261  int bytes_written;
262 
263  data = _dbus_string_get_const_data_len (buffer, start, len);
264 
265  again:
266 
267  _dbus_verbose ("send: len=%d fd=%d\n", len, fd);
268  bytes_written = send (fd, data, len, 0);
269 
270  if (bytes_written == SOCKET_ERROR)
271  {
272  DBUS_SOCKET_SET_ERRNO();
273  _dbus_verbose ("send: failed: %s\n", _dbus_strerror_from_errno ());
274  bytes_written = -1;
275  }
276  else
277  _dbus_verbose ("send: = %d\n", bytes_written);
278 
279  if (bytes_written < 0 && errno == EINTR)
280  goto again;
281 
282 #if 0
283  if (bytes_written > 0)
284  _dbus_verbose_bytes_of_string (buffer, start, bytes_written);
285 #endif
286 
287  return bytes_written;
288 }
289 
290 
300  DBusError *error)
301 {
302  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
303 
304  again:
305  if (closesocket (fd) == SOCKET_ERROR)
306  {
307  DBUS_SOCKET_SET_ERRNO ();
308 
309  if (errno == EINTR)
310  goto again;
311 
312  dbus_set_error (error, _dbus_error_from_errno (errno),
313  "Could not close socket: socket=%d, , %s",
315  return FALSE;
316  }
317  _dbus_verbose ("_dbus_close_socket: socket=%d, \n", fd);
318 
319  return TRUE;
320 }
321 
329 void
330 _dbus_fd_set_close_on_exec (intptr_t handle)
331 {
332  if ( !SetHandleInformation( (HANDLE) handle,
333  HANDLE_FLAG_INHERIT | HANDLE_FLAG_PROTECT_FROM_CLOSE,
334  0 /*disable both flags*/ ) )
335  {
336  _dbus_win_warn_win_error ("Disabling socket handle inheritance failed:", GetLastError());
337  }
338 }
339 
348 _dbus_set_fd_nonblocking (int handle,
349  DBusError *error)
350 {
351  u_long one = 1;
352 
353  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
354 
355  if (ioctlsocket (handle, FIONBIO, &one) == SOCKET_ERROR)
356  {
357  DBUS_SOCKET_SET_ERRNO ();
358  dbus_set_error (error, _dbus_error_from_errno (errno),
359  "Failed to set socket %d:%d to nonblocking: %s", handle,
361  return FALSE;
362  }
363 
364  return TRUE;
365 }
366 
367 
388 int
390  const DBusString *buffer1,
391  int start1,
392  int len1,
393  const DBusString *buffer2,
394  int start2,
395  int len2)
396 {
397  WSABUF vectors[2];
398  const char *data1;
399  const char *data2;
400  int rc;
401  DWORD bytes_written;
402 
403  _dbus_assert (buffer1 != NULL);
404  _dbus_assert (start1 >= 0);
405  _dbus_assert (start2 >= 0);
406  _dbus_assert (len1 >= 0);
407  _dbus_assert (len2 >= 0);
408 
409 
410  data1 = _dbus_string_get_const_data_len (buffer1, start1, len1);
411 
412  if (buffer2 != NULL)
413  data2 = _dbus_string_get_const_data_len (buffer2, start2, len2);
414  else
415  {
416  data2 = NULL;
417  start2 = 0;
418  len2 = 0;
419  }
420 
421  vectors[0].buf = (char*) data1;
422  vectors[0].len = len1;
423  vectors[1].buf = (char*) data2;
424  vectors[1].len = len2;
425 
426  again:
427 
428  _dbus_verbose ("WSASend: len1+2=%d+%d fd=%d\n", len1, len2, fd);
429  rc = WSASend (fd,
430  vectors,
431  data2 ? 2 : 1,
432  &bytes_written,
433  0,
434  NULL,
435  NULL);
436 
437  if (rc == SOCKET_ERROR)
438  {
439  DBUS_SOCKET_SET_ERRNO ();
440  _dbus_verbose ("WSASend: failed: %s\n", _dbus_strerror_from_errno ());
441  bytes_written = -1;
442  }
443  else
444  _dbus_verbose ("WSASend: = %ld\n", bytes_written);
445 
446  if (bytes_written < 0 && errno == EINTR)
447  goto again;
448 
449  return bytes_written;
450 }
451 
453 _dbus_socket_is_invalid (int fd)
454 {
455  return fd == INVALID_SOCKET ? TRUE : FALSE;
456 }
457 
458 #if 0
459 
468 int
469 _dbus_connect_named_pipe (const char *path,
470  DBusError *error)
471 {
472  _dbus_assert_not_reached ("not implemented");
473 }
474 
475 #endif
476 
477 
478 
479 void
480 _dbus_win_startup_winsock (void)
481 {
482  /* Straight from MSDN, deuglified */
483 
484  static dbus_bool_t beenhere = FALSE;
485 
486  WORD wVersionRequested;
487  WSADATA wsaData;
488  int err;
489 
490  if (beenhere)
491  return;
492 
493  wVersionRequested = MAKEWORD (2, 0);
494 
495  err = WSAStartup (wVersionRequested, &wsaData);
496  if (err != 0)
497  {
498  _dbus_assert_not_reached ("Could not initialize WinSock");
499  _dbus_abort ();
500  }
501 
502  /* Confirm that the WinSock DLL supports 2.0. Note that if the DLL
503  * supports versions greater than 2.0 in addition to 2.0, it will
504  * still return 2.0 in wVersion since that is the version we
505  * requested.
506  */
507  if (LOBYTE (wsaData.wVersion) != 2 ||
508  HIBYTE (wsaData.wVersion) != 0)
509  {
510  _dbus_assert_not_reached ("No usable WinSock found");
511  _dbus_abort ();
512  }
513 
514  beenhere = TRUE;
515 }
516 
517 
518 
519 
520 
521 
522 
523 
524 
525 /************************************************************************
526 
527  UTF / string code
528 
529  ************************************************************************/
530 
534 int _dbus_printf_string_upper_bound (const char *format,
535  va_list args)
536 {
537  /* MSVCRT's vsnprintf semantics are a bit different */
538  char buf[1024];
539  int bufsize;
540  int len;
541  va_list args_copy;
542 
543  bufsize = sizeof (buf);
544  DBUS_VA_COPY (args_copy, args);
545  len = _vsnprintf (buf, bufsize - 1, format, args_copy);
546  va_end (args_copy);
547 
548  while (len == -1) /* try again */
549  {
550  char *p;
551 
552  bufsize *= 2;
553 
554  p = malloc (bufsize);
555 
556  if (p == NULL)
557  return -1;
558 
559  DBUS_VA_COPY (args_copy, args);
560  len = _vsnprintf (p, bufsize - 1, format, args_copy);
561  va_end (args_copy);
562  free (p);
563  }
564 
565  return len;
566 }
567 
568 
576 wchar_t *
577 _dbus_win_utf8_to_utf16 (const char *str,
578  DBusError *error)
579 {
580  DBusString s;
581  int n;
582  wchar_t *retval;
583 
584  _dbus_string_init_const (&s, str);
585 
587  {
588  dbus_set_error_const (error, DBUS_ERROR_FAILED, "Invalid UTF-8");
589  return NULL;
590  }
591 
592  n = MultiByteToWideChar (CP_UTF8, 0, str, -1, NULL, 0);
593 
594  if (n == 0)
595  {
596  _dbus_win_set_error_from_win_error (error, GetLastError ());
597  return NULL;
598  }
599 
600  retval = dbus_new (wchar_t, n);
601 
602  if (!retval)
603  {
604  _DBUS_SET_OOM (error);
605  return NULL;
606  }
607 
608  if (MultiByteToWideChar (CP_UTF8, 0, str, -1, retval, n) != n)
609  {
610  dbus_free (retval);
611  dbus_set_error_const (error, DBUS_ERROR_FAILED, "MultiByteToWideChar inconsistency");
612  return NULL;
613  }
614 
615  return retval;
616 }
617 
625 char *
626 _dbus_win_utf16_to_utf8 (const wchar_t *str,
627  DBusError *error)
628 {
629  int n;
630  char *retval;
631 
632  n = WideCharToMultiByte (CP_UTF8, 0, str, -1, NULL, 0, NULL, NULL);
633 
634  if (n == 0)
635  {
636  _dbus_win_set_error_from_win_error (error, GetLastError ());
637  return NULL;
638  }
639 
640  retval = dbus_malloc (n);
641 
642  if (!retval)
643  {
644  _DBUS_SET_OOM (error);
645  return NULL;
646  }
647 
648  if (WideCharToMultiByte (CP_UTF8, 0, str, -1, retval, n, NULL, NULL) != n)
649  {
650  dbus_free (retval);
651  dbus_set_error_const (error, DBUS_ERROR_FAILED, "WideCharToMultiByte inconsistency");
652  return NULL;
653  }
654 
655  return retval;
656 }
657 
658 
659 
660 
661 
662 
663 /************************************************************************
664 
665 
666  ************************************************************************/
667 
669 _dbus_win_account_to_sid (const wchar_t *waccount,
670  void **ppsid,
671  DBusError *error)
672 {
673  dbus_bool_t retval = FALSE;
674  DWORD sid_length, wdomain_length;
675  SID_NAME_USE use;
676  wchar_t *wdomain;
677 
678  *ppsid = NULL;
679 
680  sid_length = 0;
681  wdomain_length = 0;
682  if (!LookupAccountNameW (NULL, waccount, NULL, &sid_length,
683  NULL, &wdomain_length, &use) &&
684  GetLastError () != ERROR_INSUFFICIENT_BUFFER)
685  {
686  _dbus_win_set_error_from_win_error (error, GetLastError ());
687  return FALSE;
688  }
689 
690  *ppsid = dbus_malloc (sid_length);
691  if (!*ppsid)
692  {
693  _DBUS_SET_OOM (error);
694  return FALSE;
695  }
696 
697  wdomain = dbus_new (wchar_t, wdomain_length);
698  if (!wdomain)
699  {
700  _DBUS_SET_OOM (error);
701  goto out1;
702  }
703 
704  if (!LookupAccountNameW (NULL, waccount, (PSID) *ppsid, &sid_length,
705  wdomain, &wdomain_length, &use))
706  {
707  _dbus_win_set_error_from_win_error (error, GetLastError ());
708  goto out2;
709  }
710 
711  if (!IsValidSid ((PSID) *ppsid))
712  {
713  dbus_set_error_const (error, DBUS_ERROR_FAILED, "Invalid SID");
714  goto out2;
715  }
716 
717  retval = TRUE;
718 
719 out2:
720  dbus_free (wdomain);
721 out1:
722  if (!retval)
723  {
724  dbus_free (*ppsid);
725  *ppsid = NULL;
726  }
727 
728  return retval;
729 }
730 
740 unsigned long
742 {
743  return _dbus_getpid ();
744 }
745 
746 
747 #ifndef DBUS_WINCE
748 
752 static dbus_bool_t
753 _dbus_getsid(char **sid)
754 {
755  HANDLE process_token = INVALID_HANDLE_VALUE;
756  TOKEN_USER *token_user = NULL;
757  DWORD n;
758  PSID psid;
759  int retval = FALSE;
760 
761  if (!OpenProcessToken (GetCurrentProcess (), TOKEN_QUERY, &process_token))
762  {
763  _dbus_win_warn_win_error ("OpenProcessToken failed", GetLastError ());
764  goto failed;
765  }
766  if ((!GetTokenInformation (process_token, TokenUser, NULL, 0, &n)
767  && GetLastError () != ERROR_INSUFFICIENT_BUFFER)
768  || (token_user = alloca (n)) == NULL
769  || !GetTokenInformation (process_token, TokenUser, token_user, n, &n))
770  {
771  _dbus_win_warn_win_error ("GetTokenInformation failed", GetLastError ());
772  goto failed;
773  }
774  psid = token_user->User.Sid;
775  if (!IsValidSid (psid))
776  {
777  _dbus_verbose("%s invalid sid\n",__FUNCTION__);
778  goto failed;
779  }
780  if (!ConvertSidToStringSidA (psid, sid))
781  {
782  _dbus_verbose("%s invalid sid\n",__FUNCTION__);
783  goto failed;
784  }
785 //okay:
786  retval = TRUE;
787 
788 failed:
789  if (process_token != INVALID_HANDLE_VALUE)
790  CloseHandle (process_token);
791 
792  _dbus_verbose("_dbus_getsid() returns %d\n",retval);
793  return retval;
794 }
795 #endif
796 
797 /************************************************************************
798 
799  pipes
800 
801  ************************************************************************/
802 
815  int *fd2,
816  dbus_bool_t blocking,
817  DBusError *error)
818 {
819  SOCKET temp, socket1 = -1, socket2 = -1;
820  struct sockaddr_in saddr;
821  int len;
822  u_long arg;
823 
824  _dbus_win_startup_winsock ();
825 
826  temp = socket (AF_INET, SOCK_STREAM, 0);
827  if (temp == INVALID_SOCKET)
828  {
829  DBUS_SOCKET_SET_ERRNO ();
830  goto out0;
831  }
832 
833  _DBUS_ZERO (saddr);
834  saddr.sin_family = AF_INET;
835  saddr.sin_port = 0;
836  saddr.sin_addr.s_addr = htonl (INADDR_LOOPBACK);
837 
838  if (bind (temp, (struct sockaddr *)&saddr, sizeof (saddr)) == SOCKET_ERROR)
839  {
840  DBUS_SOCKET_SET_ERRNO ();
841  goto out0;
842  }
843 
844  if (listen (temp, 1) == SOCKET_ERROR)
845  {
846  DBUS_SOCKET_SET_ERRNO ();
847  goto out0;
848  }
849 
850  len = sizeof (saddr);
851  if (getsockname (temp, (struct sockaddr *)&saddr, &len) == SOCKET_ERROR)
852  {
853  DBUS_SOCKET_SET_ERRNO ();
854  goto out0;
855  }
856 
857  socket1 = socket (AF_INET, SOCK_STREAM, 0);
858  if (socket1 == INVALID_SOCKET)
859  {
860  DBUS_SOCKET_SET_ERRNO ();
861  goto out0;
862  }
863 
864  if (connect (socket1, (struct sockaddr *)&saddr, len) == SOCKET_ERROR)
865  {
866  DBUS_SOCKET_SET_ERRNO ();
867  goto out1;
868  }
869 
870  socket2 = accept (temp, (struct sockaddr *) &saddr, &len);
871  if (socket2 == INVALID_SOCKET)
872  {
873  DBUS_SOCKET_SET_ERRNO ();
874  goto out1;
875  }
876 
877  if (!blocking)
878  {
879  arg = 1;
880  if (ioctlsocket (socket1, FIONBIO, &arg) == SOCKET_ERROR)
881  {
882  DBUS_SOCKET_SET_ERRNO ();
883  goto out2;
884  }
885 
886  arg = 1;
887  if (ioctlsocket (socket2, FIONBIO, &arg) == SOCKET_ERROR)
888  {
889  DBUS_SOCKET_SET_ERRNO ();
890  goto out2;
891  }
892  }
893 
894  *fd1 = socket1;
895  *fd2 = socket2;
896 
897  _dbus_verbose ("full-duplex pipe %d:%d <-> %d:%d\n",
898  *fd1, socket1, *fd2, socket2);
899 
900  closesocket (temp);
901 
902  return TRUE;
903 
904 out2:
905  closesocket (socket2);
906 out1:
907  closesocket (socket1);
908 out0:
909  closesocket (temp);
910 
911  dbus_set_error (error, _dbus_error_from_errno (errno),
912  "Could not setup socket pair: %s",
914 
915  return FALSE;
916 }
917 
926 int
928  int n_fds,
929  int timeout_milliseconds)
930 {
931 #define USE_CHRIS_IMPL 0
932 
933 #if USE_CHRIS_IMPL
934 
935 #define DBUS_POLL_CHAR_BUFFER_SIZE 2000
936  char msg[DBUS_POLL_CHAR_BUFFER_SIZE];
937  char *msgp;
938 
939  int ret = 0;
940  int i;
941  struct timeval tv;
942  int ready;
943 
944 #define DBUS_STACK_WSAEVENTS 256
945  WSAEVENT eventsOnStack[DBUS_STACK_WSAEVENTS];
946  WSAEVENT *pEvents = NULL;
947  if (n_fds > DBUS_STACK_WSAEVENTS)
948  pEvents = calloc(sizeof(WSAEVENT), n_fds);
949  else
950  pEvents = eventsOnStack;
951 
952 
953 #ifdef DBUS_ENABLE_VERBOSE_MODE
954  msgp = msg;
955  msgp += sprintf (msgp, "WSAEventSelect: to=%d\n\t", timeout_milliseconds);
956  for (i = 0; i < n_fds; i++)
957  {
958  DBusPollFD *fdp = &fds[i];
959 
960 
961  if (fdp->events & _DBUS_POLLIN)
962  msgp += sprintf (msgp, "R:%d ", fdp->fd);
963 
964  if (fdp->events & _DBUS_POLLOUT)
965  msgp += sprintf (msgp, "W:%d ", fdp->fd);
966 
967  msgp += sprintf (msgp, "E:%d\n\t", fdp->fd);
968 
969  // FIXME: more robust code for long msg
970  // create on heap when msg[] becomes too small
971  if (msgp >= msg + DBUS_POLL_CHAR_BUFFER_SIZE)
972  {
973  _dbus_assert_not_reached ("buffer overflow in _dbus_poll");
974  }
975  }
976 
977  msgp += sprintf (msgp, "\n");
978  _dbus_verbose ("%s",msg);
979 #endif
980  for (i = 0; i < n_fds; i++)
981  {
982  DBusPollFD *fdp = &fds[i];
983  WSAEVENT ev;
984  long lNetworkEvents = FD_OOB;
985 
986  ev = WSACreateEvent();
987 
988  if (fdp->events & _DBUS_POLLIN)
989  lNetworkEvents |= FD_READ | FD_ACCEPT | FD_CLOSE;
990 
991  if (fdp->events & _DBUS_POLLOUT)
992  lNetworkEvents |= FD_WRITE | FD_CONNECT;
993 
994  WSAEventSelect(fdp->fd, ev, lNetworkEvents);
995 
996  pEvents[i] = ev;
997  }
998 
999 
1000  ready = WSAWaitForMultipleEvents (n_fds, pEvents, FALSE, timeout_milliseconds, FALSE);
1001 
1002  if (DBUS_SOCKET_API_RETURNS_ERROR (ready))
1003  {
1004  DBUS_SOCKET_SET_ERRNO ();
1005  if (errno != WSAEWOULDBLOCK)
1006  _dbus_verbose ("WSAWaitForMultipleEvents: failed: %s\n", _dbus_strerror_from_errno ());
1007  ret = -1;
1008  }
1009  else if (ready == WSA_WAIT_TIMEOUT)
1010  {
1011  _dbus_verbose ("WSAWaitForMultipleEvents: WSA_WAIT_TIMEOUT\n");
1012  ret = 0;
1013  }
1014  else if (ready >= WSA_WAIT_EVENT_0 && ready < (int)(WSA_WAIT_EVENT_0 + n_fds))
1015  {
1016  msgp = msg;
1017  msgp += sprintf (msgp, "WSAWaitForMultipleEvents: =%d\n\t", ready);
1018 
1019  for (i = 0; i < n_fds; i++)
1020  {
1021  DBusPollFD *fdp = &fds[i];
1022  WSANETWORKEVENTS ne;
1023 
1024  fdp->revents = 0;
1025 
1026  WSAEnumNetworkEvents(fdp->fd, pEvents[i], &ne);
1027 
1028  if (ne.lNetworkEvents & (FD_READ | FD_ACCEPT | FD_CLOSE))
1029  fdp->revents |= _DBUS_POLLIN;
1030 
1031  if (ne.lNetworkEvents & (FD_WRITE | FD_CONNECT))
1032  fdp->revents |= _DBUS_POLLOUT;
1033 
1034  if (ne.lNetworkEvents & (FD_OOB))
1035  fdp->revents |= _DBUS_POLLERR;
1036 
1037  if (ne.lNetworkEvents & (FD_READ | FD_ACCEPT | FD_CLOSE))
1038  msgp += sprintf (msgp, "R:%d ", fdp->fd);
1039 
1040  if (ne.lNetworkEvents & (FD_WRITE | FD_CONNECT))
1041  msgp += sprintf (msgp, "W:%d ", fdp->fd);
1042 
1043  if (ne.lNetworkEvents & (FD_OOB))
1044  msgp += sprintf (msgp, "E:%d ", fdp->fd);
1045 
1046  msgp += sprintf (msgp, "lNetworkEvents:%d ", ne.lNetworkEvents);
1047 
1048  if(ne.lNetworkEvents)
1049  ret++;
1050 
1051  WSAEventSelect(fdp->fd, pEvents[i], 0);
1052  }
1053 
1054  msgp += sprintf (msgp, "\n");
1055  _dbus_verbose ("%s",msg);
1056  }
1057  else
1058  {
1059  _dbus_verbose ("WSAWaitForMultipleEvents: failed for unknown reason!");
1060  ret = -1;
1061  }
1062 
1063  for(i = 0; i < n_fds; i++)
1064  {
1065  WSACloseEvent(pEvents[i]);
1066  }
1067 
1068  if (n_fds > DBUS_STACK_WSAEVENTS)
1069  free(pEvents);
1070 
1071  return ret;
1072 
1073 #else /* USE_CHRIS_IMPL */
1074 
1075 #define DBUS_POLL_CHAR_BUFFER_SIZE 2000
1076  char msg[DBUS_POLL_CHAR_BUFFER_SIZE];
1077  char *msgp;
1078 
1079  fd_set read_set, write_set, err_set;
1080  int max_fd = 0;
1081  int i;
1082  struct timeval tv;
1083  int ready;
1084 
1085  FD_ZERO (&read_set);
1086  FD_ZERO (&write_set);
1087  FD_ZERO (&err_set);
1088 
1089 
1090 #ifdef DBUS_ENABLE_VERBOSE_MODE
1091  msgp = msg;
1092  msgp += sprintf (msgp, "select: to=%d\n\t", timeout_milliseconds);
1093  for (i = 0; i < n_fds; i++)
1094  {
1095  DBusPollFD *fdp = &fds[i];
1096 
1097 
1098  if (fdp->events & _DBUS_POLLIN)
1099  msgp += sprintf (msgp, "R:%d ", fdp->fd);
1100 
1101  if (fdp->events & _DBUS_POLLOUT)
1102  msgp += sprintf (msgp, "W:%d ", fdp->fd);
1103 
1104  msgp += sprintf (msgp, "E:%d\n\t", fdp->fd);
1105 
1106  // FIXME: more robust code for long msg
1107  // create on heap when msg[] becomes too small
1108  if (msgp >= msg + DBUS_POLL_CHAR_BUFFER_SIZE)
1109  {
1110  _dbus_assert_not_reached ("buffer overflow in _dbus_poll");
1111  }
1112  }
1113 
1114  msgp += sprintf (msgp, "\n");
1115  _dbus_verbose ("%s",msg);
1116 #endif
1117  for (i = 0; i < n_fds; i++)
1118  {
1119  DBusPollFD *fdp = &fds[i];
1120 
1121  if (fdp->events & _DBUS_POLLIN)
1122  FD_SET (fdp->fd, &read_set);
1123 
1124  if (fdp->events & _DBUS_POLLOUT)
1125  FD_SET (fdp->fd, &write_set);
1126 
1127  FD_SET (fdp->fd, &err_set);
1128 
1129  max_fd = MAX (max_fd, fdp->fd);
1130  }
1131 
1132  // Avoid random lockups with send(), for lack of a better solution so far
1133  tv.tv_sec = timeout_milliseconds < 0 ? 1 : timeout_milliseconds / 1000;
1134  tv.tv_usec = timeout_milliseconds < 0 ? 0 : (timeout_milliseconds % 1000) * 1000;
1135 
1136  ready = select (max_fd + 1, &read_set, &write_set, &err_set, &tv);
1137 
1138  if (DBUS_SOCKET_API_RETURNS_ERROR (ready))
1139  {
1140  DBUS_SOCKET_SET_ERRNO ();
1141  if (errno != WSAEWOULDBLOCK)
1142  _dbus_verbose ("select: failed: %s\n", _dbus_strerror_from_errno ());
1143  }
1144  else if (ready == 0)
1145  _dbus_verbose ("select: = 0\n");
1146  else
1147  if (ready > 0)
1148  {
1149 #ifdef DBUS_ENABLE_VERBOSE_MODE
1150  msgp = msg;
1151  msgp += sprintf (msgp, "select: = %d:\n\t", ready);
1152 
1153  for (i = 0; i < n_fds; i++)
1154  {
1155  DBusPollFD *fdp = &fds[i];
1156 
1157  if (FD_ISSET (fdp->fd, &read_set))
1158  msgp += sprintf (msgp, "R:%d ", fdp->fd);
1159 
1160  if (FD_ISSET (fdp->fd, &write_set))
1161  msgp += sprintf (msgp, "W:%d ", fdp->fd);
1162 
1163  if (FD_ISSET (fdp->fd, &err_set))
1164  msgp += sprintf (msgp, "E:%d\n\t", fdp->fd);
1165  }
1166  msgp += sprintf (msgp, "\n");
1167  _dbus_verbose ("%s",msg);
1168 #endif
1169 
1170  for (i = 0; i < n_fds; i++)
1171  {
1172  DBusPollFD *fdp = &fds[i];
1173 
1174  fdp->revents = 0;
1175 
1176  if (FD_ISSET (fdp->fd, &read_set))
1177  fdp->revents |= _DBUS_POLLIN;
1178 
1179  if (FD_ISSET (fdp->fd, &write_set))
1180  fdp->revents |= _DBUS_POLLOUT;
1181 
1182  if (FD_ISSET (fdp->fd, &err_set))
1183  fdp->revents |= _DBUS_POLLERR;
1184  }
1185  }
1186  return ready;
1187 #endif /* USE_CHRIS_IMPL */
1188 }
1189 
1190 
1191 
1192 
1193 /******************************************************************************
1194 
1195 Original CVS version of dbus-sysdeps.c
1196 
1197 ******************************************************************************/
1198 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
1199 /* dbus-sysdeps.c Wrappers around system/libc features (internal to D-Bus implementation)
1200  *
1201  * Copyright (C) 2002, 2003 Red Hat, Inc.
1202  * Copyright (C) 2003 CodeFactory AB
1203  * Copyright (C) 2005 Novell, Inc.
1204  *
1205  * Licensed under the Academic Free License version 2.1
1206  *
1207  * This program is free software; you can redistribute it and/or modify
1208  * it under the terms of the GNU General Public License as published by
1209  * the Free Software Foundation; either version 2 of the License, or
1210  * (at your option) any later version.
1211  *
1212  * This program is distributed in the hope that it will be useful,
1213  * but WITHOUT ANY WARRANTY; without even the implied warranty of
1214  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
1215  * GNU General Public License for more details.
1216  *
1217  * You should have received a copy of the GNU General Public License
1218  * along with this program; if not, write to the Free Software
1219  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
1220  *
1221  */
1222 
1223 
1229 void
1230 _dbus_exit (int code)
1231 {
1232  _exit (code);
1233 }
1234 
1246 int
1247 _dbus_connect_tcp_socket (const char *host,
1248  const char *port,
1249  const char *family,
1250  DBusError *error)
1251 {
1252  return _dbus_connect_tcp_socket_with_nonce (host, port, family, (const char*)NULL, error);
1253 }
1254 
1255 int
1256 _dbus_connect_tcp_socket_with_nonce (const char *host,
1257  const char *port,
1258  const char *family,
1259  const char *noncefile,
1260  DBusError *error)
1261 {
1262  int fd = -1, res;
1263  struct addrinfo hints;
1264  struct addrinfo *ai, *tmp;
1265 
1266  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
1267 
1268  _dbus_win_startup_winsock ();
1269 
1270  _DBUS_ZERO (hints);
1271 
1272  if (!family)
1273  hints.ai_family = AF_UNSPEC;
1274  else if (!strcmp(family, "ipv4"))
1275  hints.ai_family = AF_INET;
1276  else if (!strcmp(family, "ipv6"))
1277  hints.ai_family = AF_INET6;
1278  else
1279  {
1280  dbus_set_error (error,
1282  "Unknown address family %s", family);
1283  return -1;
1284  }
1285  hints.ai_protocol = IPPROTO_TCP;
1286  hints.ai_socktype = SOCK_STREAM;
1287 #ifdef AI_ADDRCONFIG
1288  hints.ai_flags = AI_ADDRCONFIG;
1289 #else
1290  hints.ai_flags = 0;
1291 #endif
1292 
1293  if ((res = getaddrinfo(host, port, &hints, &ai)) != 0 || !ai)
1294  {
1295  dbus_set_error (error,
1296  _dbus_error_from_errno (res),
1297  "Failed to lookup host/port: \"%s:%s\": %s (%d)",
1298  host, port, _dbus_strerror(res), res);
1299  return -1;
1300  }
1301 
1302  tmp = ai;
1303  while (tmp)
1304  {
1305  if ((fd = socket (tmp->ai_family, SOCK_STREAM, 0)) == INVALID_SOCKET)
1306  {
1307  DBUS_SOCKET_SET_ERRNO ();
1308  dbus_set_error (error,
1309  _dbus_error_from_errno (errno),
1310  "Failed to open socket: %s",
1312  freeaddrinfo(ai);
1313  return -1;
1314  }
1315  _DBUS_ASSERT_ERROR_IS_CLEAR(error);
1316 
1317  if (connect (fd, (struct sockaddr*) tmp->ai_addr, tmp->ai_addrlen) == SOCKET_ERROR)
1318  {
1319  DBUS_SOCKET_SET_ERRNO ();
1320  closesocket(fd);
1321  fd = -1;
1322  tmp = tmp->ai_next;
1323  continue;
1324  }
1325 
1326  break;
1327  }
1328  freeaddrinfo(ai);
1329 
1330  if (fd == -1)
1331  {
1332  dbus_set_error (error,
1333  _dbus_error_from_errno (errno),
1334  "Failed to connect to socket \"%s:%s\" %s",
1335  host, port, _dbus_strerror_from_errno ());
1336  return -1;
1337  }
1338 
1339  if (noncefile != NULL)
1340  {
1341  DBusString noncefileStr;
1342  dbus_bool_t ret;
1343  if (!_dbus_string_init (&noncefileStr) ||
1344  !_dbus_string_append(&noncefileStr, noncefile))
1345  {
1346  closesocket (fd);
1348  return -1;
1349  }
1350 
1351  ret = _dbus_send_nonce (fd, &noncefileStr, error);
1352 
1353  _dbus_string_free (&noncefileStr);
1354 
1355  if (!ret)
1356  {
1357  closesocket (fd);
1358  return -1;
1359  }
1360  }
1361 
1363 
1364  if (!_dbus_set_fd_nonblocking (fd, error))
1365  {
1366  closesocket (fd);
1367  return -1;
1368  }
1369 
1370  return fd;
1371 }
1372 
1388 int
1389 _dbus_listen_tcp_socket (const char *host,
1390  const char *port,
1391  const char *family,
1392  DBusString *retport,
1393  int **fds_p,
1394  DBusError *error)
1395 {
1396  int nlisten_fd = 0, *listen_fd = NULL, res, i, port_num = -1;
1397  struct addrinfo hints;
1398  struct addrinfo *ai, *tmp;
1399 
1400  // On Vista, sockaddr_gen must be a sockaddr_in6, and not a sockaddr_in6_old
1401  //That's required for family == IPv6(which is the default on Vista if family is not given)
1402  //So we use our own union instead of sockaddr_gen:
1403 
1404  typedef union {
1405  struct sockaddr Address;
1406  struct sockaddr_in AddressIn;
1407  struct sockaddr_in6 AddressIn6;
1408  } mysockaddr_gen;
1409 
1410  *fds_p = NULL;
1411  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
1412 
1413  _dbus_win_startup_winsock ();
1414 
1415  _DBUS_ZERO (hints);
1416 
1417  if (!family)
1418  hints.ai_family = AF_UNSPEC;
1419  else if (!strcmp(family, "ipv4"))
1420  hints.ai_family = AF_INET;
1421  else if (!strcmp(family, "ipv6"))
1422  hints.ai_family = AF_INET6;
1423  else
1424  {
1425  dbus_set_error (error,
1427  "Unknown address family %s", family);
1428  return -1;
1429  }
1430 
1431  hints.ai_protocol = IPPROTO_TCP;
1432  hints.ai_socktype = SOCK_STREAM;
1433 #ifdef AI_ADDRCONFIG
1434  hints.ai_flags = AI_ADDRCONFIG | AI_PASSIVE;
1435 #else
1436  hints.ai_flags = AI_PASSIVE;
1437 #endif
1438 
1439  redo_lookup_with_port:
1440  if ((res = getaddrinfo(host, port, &hints, &ai)) != 0 || !ai)
1441  {
1442  dbus_set_error (error,
1443  _dbus_error_from_errno (res),
1444  "Failed to lookup host/port: \"%s:%s\": %s (%d)",
1445  host ? host : "*", port, _dbus_strerror(res), res);
1446  return -1;
1447  }
1448 
1449  tmp = ai;
1450  while (tmp)
1451  {
1452  int fd = -1, *newlisten_fd;
1453  if ((fd = socket (tmp->ai_family, SOCK_STREAM, 0)) == INVALID_SOCKET)
1454  {
1455  DBUS_SOCKET_SET_ERRNO ();
1456  dbus_set_error (error,
1457  _dbus_error_from_errno (errno),
1458  "Failed to open socket: %s",
1460  goto failed;
1461  }
1462  _DBUS_ASSERT_ERROR_IS_CLEAR(error);
1463 
1464  if (bind (fd, (struct sockaddr*) tmp->ai_addr, tmp->ai_addrlen) == SOCKET_ERROR)
1465  {
1466  DBUS_SOCKET_SET_ERRNO ();
1467  dbus_set_error (error, _dbus_error_from_errno (errno),
1468  "Failed to bind socket \"%s:%s\": %s",
1469  host ? host : "*", port, _dbus_strerror_from_errno ());
1470  closesocket (fd);
1471  goto failed;
1472  }
1473 
1474  if (listen (fd, 30 /* backlog */) == SOCKET_ERROR)
1475  {
1476  DBUS_SOCKET_SET_ERRNO ();
1477  dbus_set_error (error, _dbus_error_from_errno (errno),
1478  "Failed to listen on socket \"%s:%s\": %s",
1479  host ? host : "*", port, _dbus_strerror_from_errno ());
1480  closesocket (fd);
1481  goto failed;
1482  }
1483 
1484  newlisten_fd = dbus_realloc(listen_fd, sizeof(int)*(nlisten_fd+1));
1485  if (!newlisten_fd)
1486  {
1487  closesocket (fd);
1489  "Failed to allocate file handle array");
1490  goto failed;
1491  }
1492  listen_fd = newlisten_fd;
1493  listen_fd[nlisten_fd] = fd;
1494  nlisten_fd++;
1495 
1496  if (!_dbus_string_get_length(retport))
1497  {
1498  /* If the user didn't specify a port, or used 0, then
1499  the kernel chooses a port. After the first address
1500  is bound to, we need to force all remaining addresses
1501  to use the same port */
1502  if (!port || !strcmp(port, "0"))
1503  {
1504  mysockaddr_gen addr;
1505  socklen_t addrlen = sizeof(addr);
1506  char portbuf[10];
1507 
1508  if (getsockname(fd, &addr.Address, &addrlen) == SOCKET_ERROR)
1509  {
1510  DBUS_SOCKET_SET_ERRNO ();
1511  dbus_set_error (error, _dbus_error_from_errno (errno),
1512  "Failed to resolve port \"%s:%s\": %s",
1513  host ? host : "*", port, _dbus_strerror_from_errno());
1514  goto failed;
1515  }
1516  snprintf( portbuf, sizeof( portbuf ) - 1, "%d", addr.AddressIn.sin_port );
1517  if (!_dbus_string_append(retport, portbuf))
1518  {
1520  goto failed;
1521  }
1522 
1523  /* Release current address list & redo lookup */
1524  port = _dbus_string_get_const_data(retport);
1525  freeaddrinfo(ai);
1526  goto redo_lookup_with_port;
1527  }
1528  else
1529  {
1530  if (!_dbus_string_append(retport, port))
1531  {
1533  goto failed;
1534  }
1535  }
1536  }
1537 
1538  tmp = tmp->ai_next;
1539  }
1540  freeaddrinfo(ai);
1541  ai = NULL;
1542 
1543  if (!nlisten_fd)
1544  {
1545  _dbus_win_set_errno (WSAEADDRINUSE);
1546  dbus_set_error (error, _dbus_error_from_errno (errno),
1547  "Failed to bind socket \"%s:%s\": %s",
1548  host ? host : "*", port, _dbus_strerror_from_errno ());
1549  return -1;
1550  }
1551 
1552  sscanf(_dbus_string_get_const_data(retport), "%d", &port_num);
1553 
1554  for (i = 0 ; i < nlisten_fd ; i++)
1555  {
1556  _dbus_fd_set_close_on_exec (listen_fd[i]);
1557  if (!_dbus_set_fd_nonblocking (listen_fd[i], error))
1558  {
1559  goto failed;
1560  }
1561  }
1562 
1563  *fds_p = listen_fd;
1564 
1565  return nlisten_fd;
1566 
1567  failed:
1568  if (ai)
1569  freeaddrinfo(ai);
1570  for (i = 0 ; i < nlisten_fd ; i++)
1571  closesocket (listen_fd[i]);
1572  dbus_free(listen_fd);
1573  return -1;
1574 }
1575 
1576 
1584 int
1585 _dbus_accept (int listen_fd)
1586 {
1587  int client_fd;
1588 
1589  retry:
1590  client_fd = accept (listen_fd, NULL, NULL);
1591 
1592  if (DBUS_SOCKET_IS_INVALID (client_fd))
1593  {
1594  DBUS_SOCKET_SET_ERRNO ();
1595  if (errno == EINTR)
1596  goto retry;
1597  }
1598 
1599  _dbus_verbose ("client fd %d accepted\n", client_fd);
1600 
1601  return client_fd;
1602 }
1603 
1604 
1605 
1606 
1609  DBusError *error)
1610 {
1611 /* FIXME: for the session bus credentials shouldn't matter (?), but
1612  * for the system bus they are presumably essential. A rough outline
1613  * of a way to implement the credential transfer would be this:
1614  *
1615  * client waits to *read* a byte.
1616  *
1617  * server creates a named pipe with a random name, sends a byte
1618  * contining its length, and its name.
1619  *
1620  * client reads the name, connects to it (using Win32 API).
1621  *
1622  * server waits for connection to the named pipe, then calls
1623  * ImpersonateNamedPipeClient(), notes its now-current credentials,
1624  * calls RevertToSelf(), closes its handles to the named pipe, and
1625  * is done. (Maybe there is some other way to get the SID of a named
1626  * pipe client without having to use impersonation?)
1627  *
1628  * client closes its handles and is done.
1629  *
1630  * Ralf: Why not sending credentials over the given this connection ?
1631  * Using named pipes makes it impossible to be connected from a unix client.
1632  *
1633  */
1634  int bytes_written;
1635  DBusString buf;
1636 
1637  _dbus_string_init_const_len (&buf, "\0", 1);
1638 again:
1639  bytes_written = _dbus_write_socket (handle, &buf, 0, 1 );
1640 
1641  if (bytes_written < 0 && errno == EINTR)
1642  goto again;
1643 
1644  if (bytes_written < 0)
1645  {
1646  dbus_set_error (error, _dbus_error_from_errno (errno),
1647  "Failed to write credentials byte: %s",
1649  return FALSE;
1650  }
1651  else if (bytes_written == 0)
1652  {
1654  "wrote zero bytes writing credentials byte");
1655  return FALSE;
1656  }
1657  else
1658  {
1659  _dbus_assert (bytes_written == 1);
1660  _dbus_verbose ("wrote 1 zero byte, credential sending isn't implemented yet\n");
1661  return TRUE;
1662  }
1663  return TRUE;
1664 }
1665 
1686  DBusCredentials *credentials,
1687  DBusError *error)
1688 {
1689  int bytes_read = 0;
1690  DBusString buf;
1691 
1692  // could fail due too OOM
1693  if (_dbus_string_init(&buf))
1694  {
1695  bytes_read = _dbus_read_socket(handle, &buf, 1 );
1696 
1697  if (bytes_read > 0)
1698  _dbus_verbose("got one zero byte from server");
1699 
1700  _dbus_string_free(&buf);
1701  }
1702 
1704  _dbus_verbose("FIXME: get faked credentials from current process");
1705 
1706  return TRUE;
1707 }
1708 
1719 {
1720  /* TODO */
1721  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
1722  return TRUE;
1723 }
1724 
1725 
1738  const DBusString *next_component)
1739 {
1740  dbus_bool_t dir_ends_in_slash;
1741  dbus_bool_t file_starts_with_slash;
1742 
1743  if (_dbus_string_get_length (dir) == 0 ||
1744  _dbus_string_get_length (next_component) == 0)
1745  return TRUE;
1746 
1747  dir_ends_in_slash =
1748  ('/' == _dbus_string_get_byte (dir, _dbus_string_get_length (dir) - 1) ||
1749  '\\' == _dbus_string_get_byte (dir, _dbus_string_get_length (dir) - 1));
1750 
1751  file_starts_with_slash =
1752  ('/' == _dbus_string_get_byte (next_component, 0) ||
1753  '\\' == _dbus_string_get_byte (next_component, 0));
1754 
1755  if (dir_ends_in_slash && file_starts_with_slash)
1756  {
1757  _dbus_string_shorten (dir, 1);
1758  }
1759  else if (!(dir_ends_in_slash || file_starts_with_slash))
1760  {
1761  if (!_dbus_string_append_byte (dir, '\\'))
1762  return FALSE;
1763  }
1764 
1765  return _dbus_string_copy (next_component, 0, dir,
1766  _dbus_string_get_length (dir));
1767 }
1768 
1769 /*---------------- DBusCredentials ----------------------------------*/
1770 
1780  const DBusString *username)
1781 {
1782  return _dbus_credentials_add_windows_sid (credentials,
1783  _dbus_string_get_const_data(username));
1784 }
1785 
1796 {
1797  dbus_bool_t retval = FALSE;
1798  char *sid = NULL;
1799 
1800  if (!_dbus_getsid(&sid))
1801  goto failed;
1802 
1803  if (!_dbus_credentials_add_unix_pid(credentials, _dbus_getpid()))
1804  goto failed;
1805 
1806  if (!_dbus_credentials_add_windows_sid (credentials,sid))
1807  goto failed;
1808 
1809  retval = TRUE;
1810  goto end;
1811 failed:
1812  retval = FALSE;
1813 end:
1814  if (sid)
1815  LocalFree(sid);
1816 
1817  return retval;
1818 }
1819 
1834 {
1835  dbus_bool_t retval = FALSE;
1836  char *sid = NULL;
1837 
1838  if (!_dbus_getsid(&sid))
1839  return FALSE;
1840 
1841  retval = _dbus_string_append (str,sid);
1842 
1843  LocalFree(sid);
1844  return retval;
1845 }
1846 
1851 dbus_pid_t
1853 {
1854  return GetCurrentProcessId ();
1855 }
1856 
1858 #define NANOSECONDS_PER_SECOND 1000000000
1859 
1860 #define MICROSECONDS_PER_SECOND 1000000
1861 
1862 #define MILLISECONDS_PER_SECOND 1000
1863 
1864 #define NANOSECONDS_PER_MILLISECOND 1000000
1865 
1866 #define MICROSECONDS_PER_MILLISECOND 1000
1867 
1872 void
1873 _dbus_sleep_milliseconds (int milliseconds)
1874 {
1875  Sleep (milliseconds);
1876 }
1877 
1878 
1886 void
1887 _dbus_get_real_time (long *tv_sec,
1888  long *tv_usec)
1889 {
1890  FILETIME ft;
1891  dbus_uint64_t time64;
1892 
1893  GetSystemTimeAsFileTime (&ft);
1894 
1895  memcpy (&time64, &ft, sizeof (time64));
1896 
1897  /* Convert from 100s of nanoseconds since 1601-01-01
1898  * to Unix epoch. Yes, this is Y2038 unsafe.
1899  */
1900  time64 -= DBUS_INT64_CONSTANT (116444736000000000);
1901  time64 /= 10;
1902 
1903  if (tv_sec)
1904  *tv_sec = time64 / 1000000;
1905 
1906  if (tv_usec)
1907  *tv_usec = time64 % 1000000;
1908 }
1909 
1917 void
1919  long *tv_usec)
1920 {
1921  /* no implementation yet, fall back to wall-clock time */
1922  _dbus_get_real_time (tv_sec, tv_usec);
1923 }
1924 
1928 void
1930 {
1931 }
1932 
1943  DBusError *error)
1944 {
1945  const char *filename_c;
1946 
1947  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
1948 
1949  filename_c = _dbus_string_get_const_data (filename);
1950 
1951  if (!CreateDirectoryA (filename_c, NULL))
1952  {
1953  if (GetLastError () == ERROR_ALREADY_EXISTS)
1954  return TRUE;
1955 
1957  "Failed to create directory %s: %s\n",
1958  filename_c, _dbus_strerror_from_errno ());
1959  return FALSE;
1960  }
1961  else
1962  return TRUE;
1963 }
1964 
1965 
1976  int n_bytes)
1977 {
1978  int old_len;
1979  char *p;
1980  HCRYPTPROV hprov;
1981 
1982  old_len = _dbus_string_get_length (str);
1983 
1984  if (!_dbus_string_lengthen (str, n_bytes))
1985  return FALSE;
1986 
1987  p = _dbus_string_get_data_len (str, old_len, n_bytes);
1988 
1989  if (!CryptAcquireContext (&hprov, NULL, NULL, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT))
1990  return FALSE;
1991 
1992  if (!CryptGenRandom (hprov, n_bytes, p))
1993  {
1994  CryptReleaseContext (hprov, 0);
1995  return FALSE;
1996  }
1997 
1998  CryptReleaseContext (hprov, 0);
1999 
2000  return TRUE;
2001 }
2002 
2009 const char*
2011 {
2012  static const char* tmpdir = NULL;
2013  static char buf[1000];
2014 
2015  if (tmpdir == NULL)
2016  {
2017  char *last_slash;
2018 
2019  if (!GetTempPathA (sizeof (buf), buf))
2020  {
2021  _dbus_warn ("GetTempPath failed\n");
2022  _dbus_abort ();
2023  }
2024 
2025  /* Drop terminating backslash or slash */
2026  last_slash = _mbsrchr (buf, '\\');
2027  if (last_slash > buf && last_slash[1] == '\0')
2028  last_slash[0] = '\0';
2029  last_slash = _mbsrchr (buf, '/');
2030  if (last_slash > buf && last_slash[1] == '\0')
2031  last_slash[0] = '\0';
2032 
2033  tmpdir = buf;
2034  }
2035 
2036  _dbus_assert(tmpdir != NULL);
2037 
2038  return tmpdir;
2039 }
2040 
2041 
2052  DBusError *error)
2053 {
2054  const char *filename_c;
2055 
2056  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
2057 
2058  filename_c = _dbus_string_get_const_data (filename);
2059 
2060  if (DeleteFileA (filename_c) == 0)
2061  {
2063  "Failed to delete file %s: %s\n",
2064  filename_c, _dbus_strerror_from_errno ());
2065  return FALSE;
2066  }
2067  else
2068  return TRUE;
2069 }
2070 
2071 /*
2072  * replaces the term DBUS_PREFIX in configure_time_path by the
2073  * current dbus installation directory. On unix this function is a noop
2074  *
2075  * @param configure_time_path
2076  * @return real path
2077  */
2078 const char *
2079 _dbus_replace_install_prefix (const char *configure_time_path)
2080 {
2081 #ifndef DBUS_PREFIX
2082  return configure_time_path;
2083 #else
2084  static char retval[1000];
2085  static char runtime_prefix[1000];
2086  int len = 1000;
2087  int i;
2088 
2089  if (!configure_time_path)
2090  return NULL;
2091 
2092  if ((!_dbus_get_install_root(runtime_prefix, len) ||
2093  strncmp (configure_time_path, DBUS_PREFIX "/",
2094  strlen (DBUS_PREFIX) + 1))) {
2095  strcat (retval, configure_time_path);
2096  return retval;
2097  }
2098 
2099  strcpy (retval, runtime_prefix);
2100  strcat (retval, configure_time_path + strlen (DBUS_PREFIX) + 1);
2101 
2102  /* Somehow, in some situations, backslashes get collapsed in the string.
2103  * Since windows C library accepts both forward and backslashes as
2104  * path separators, convert all backslashes to forward slashes.
2105  */
2106 
2107  for(i = 0; retval[i] != '\0'; i++) {
2108  if(retval[i] == '\\')
2109  retval[i] = '/';
2110  }
2111  return retval;
2112 #endif
2113 }
2114 
2115 #if !defined (DBUS_DISABLE_ASSERTS) || defined(DBUS_BUILD_TESTS)
2116 
2117 #if defined(_MSC_VER) || defined(DBUS_WINCE)
2118 # ifdef BACKTRACES
2119 # undef BACKTRACES
2120 # endif
2121 #else
2122 # define BACKTRACES
2123 #endif
2124 
2125 #ifdef BACKTRACES
2126 /*
2127  * Backtrace Generator
2128  *
2129  * Copyright 2004 Eric Poech
2130  * Copyright 2004 Robert Shearman
2131  *
2132  * This library is free software; you can redistribute it and/or
2133  * modify it under the terms of the GNU Lesser General Public
2134  * License as published by the Free Software Foundation; either
2135  * version 2.1 of the License, or (at your option) any later version.
2136  *
2137  * This library is distributed in the hope that it will be useful,
2138  * but WITHOUT ANY WARRANTY; without even the implied warranty of
2139  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
2140  * Lesser General Public License for more details.
2141  *
2142  * You should have received a copy of the GNU Lesser General Public
2143  * License along with this library; if not, write to the Free Software
2144  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
2145  */
2146 
2147 #include <winver.h>
2148 #include <imagehlp.h>
2149 #include <stdio.h>
2150 
2151 #define DPRINTF _dbus_warn
2152 
2153 #ifdef _MSC_VER
2154 #define BOOL int
2155 
2156 #define __i386__
2157 #endif
2158 
2159 //#define MAKE_FUNCPTR(f) static typeof(f) * p##f
2160 
2161 //MAKE_FUNCPTR(StackWalk);
2162 //MAKE_FUNCPTR(SymGetModuleBase);
2163 //MAKE_FUNCPTR(SymFunctionTableAccess);
2164 //MAKE_FUNCPTR(SymInitialize);
2165 //MAKE_FUNCPTR(SymGetSymFromAddr);
2166 //MAKE_FUNCPTR(SymGetModuleInfo);
2167 static BOOL (WINAPI *pStackWalk)(
2168  DWORD MachineType,
2169  HANDLE hProcess,
2170  HANDLE hThread,
2171  LPSTACKFRAME StackFrame,
2172  PVOID ContextRecord,
2173  PREAD_PROCESS_MEMORY_ROUTINE ReadMemoryRoutine,
2174  PFUNCTION_TABLE_ACCESS_ROUTINE FunctionTableAccessRoutine,
2175  PGET_MODULE_BASE_ROUTINE GetModuleBaseRoutine,
2176  PTRANSLATE_ADDRESS_ROUTINE TranslateAddress
2177 );
2178 #ifdef _WIN64
2179 static DWORD64 (WINAPI *pSymGetModuleBase)(
2180  HANDLE hProcess,
2181  DWORD64 dwAddr
2182 );
2183 static PVOID (WINAPI *pSymFunctionTableAccess)(
2184  HANDLE hProcess,
2185  DWORD64 AddrBase
2186 );
2187 #else
2188 static DWORD (WINAPI *pSymGetModuleBase)(
2189  HANDLE hProcess,
2190  DWORD dwAddr
2191 );
2192 static PVOID (WINAPI *pSymFunctionTableAccess)(
2193  HANDLE hProcess,
2194  DWORD AddrBase
2195 );
2196 #endif
2197 static BOOL (WINAPI *pSymInitialize)(
2198  HANDLE hProcess,
2199  PSTR UserSearchPath,
2200  BOOL fInvadeProcess
2201 );
2202 static BOOL (WINAPI *pSymGetSymFromAddr)(
2203  HANDLE hProcess,
2204  DWORD Address,
2205  PDWORD Displacement,
2206  PIMAGEHLP_SYMBOL Symbol
2207 );
2208 static BOOL (WINAPI *pSymGetModuleInfo)(
2209  HANDLE hProcess,
2210  DWORD dwAddr,
2211  PIMAGEHLP_MODULE ModuleInfo
2212 );
2213 static DWORD (WINAPI *pSymSetOptions)(
2214  DWORD SymOptions
2215 );
2216 
2217 
2218 static BOOL init_backtrace()
2219 {
2220  HMODULE hmodDbgHelp = LoadLibraryA("dbghelp");
2221 /*
2222  #define GETFUNC(x) \
2223  p##x = (typeof(x)*)GetProcAddress(hmodDbgHelp, #x); \
2224  if (!p##x) \
2225  { \
2226  return FALSE; \
2227  }
2228  */
2229 
2230 
2231 // GETFUNC(StackWalk);
2232 // GETFUNC(SymGetModuleBase);
2233 // GETFUNC(SymFunctionTableAccess);
2234 // GETFUNC(SymInitialize);
2235 // GETFUNC(SymGetSymFromAddr);
2236 // GETFUNC(SymGetModuleInfo);
2237 
2238 #define FUNC(x) #x
2239 
2240  pStackWalk = (BOOL (WINAPI *)(
2241 DWORD MachineType,
2242 HANDLE hProcess,
2243 HANDLE hThread,
2244 LPSTACKFRAME StackFrame,
2245 PVOID ContextRecord,
2246 PREAD_PROCESS_MEMORY_ROUTINE ReadMemoryRoutine,
2247 PFUNCTION_TABLE_ACCESS_ROUTINE FunctionTableAccessRoutine,
2248 PGET_MODULE_BASE_ROUTINE GetModuleBaseRoutine,
2249 PTRANSLATE_ADDRESS_ROUTINE TranslateAddress
2250 ))GetProcAddress (hmodDbgHelp, FUNC(StackWalk));
2251 #ifdef _WIN64
2252  pSymGetModuleBase=(DWORD64 (WINAPI *)(
2253  HANDLE hProcess,
2254  DWORD64 dwAddr
2255 ))GetProcAddress (hmodDbgHelp, FUNC(SymGetModuleBase));
2256  pSymFunctionTableAccess=(PVOID (WINAPI *)(
2257  HANDLE hProcess,
2258  DWORD64 AddrBase
2259 ))GetProcAddress (hmodDbgHelp, FUNC(SymFunctionTableAccess));
2260 #else
2261  pSymGetModuleBase=(DWORD (WINAPI *)(
2262  HANDLE hProcess,
2263  DWORD dwAddr
2264 ))GetProcAddress (hmodDbgHelp, FUNC(SymGetModuleBase));
2265  pSymFunctionTableAccess=(PVOID (WINAPI *)(
2266  HANDLE hProcess,
2267  DWORD AddrBase
2268 ))GetProcAddress (hmodDbgHelp, FUNC(SymFunctionTableAccess));
2269 #endif
2270  pSymInitialize = (BOOL (WINAPI *)(
2271  HANDLE hProcess,
2272  PSTR UserSearchPath,
2273  BOOL fInvadeProcess
2274 ))GetProcAddress (hmodDbgHelp, FUNC(SymInitialize));
2275  pSymGetSymFromAddr = (BOOL (WINAPI *)(
2276  HANDLE hProcess,
2277  DWORD Address,
2278  PDWORD Displacement,
2279  PIMAGEHLP_SYMBOL Symbol
2280 ))GetProcAddress (hmodDbgHelp, FUNC(SymGetSymFromAddr));
2281  pSymGetModuleInfo = (BOOL (WINAPI *)(
2282  HANDLE hProcess,
2283  DWORD dwAddr,
2284  PIMAGEHLP_MODULE ModuleInfo
2285 ))GetProcAddress (hmodDbgHelp, FUNC(SymGetModuleInfo));
2286 pSymSetOptions = (DWORD (WINAPI *)(
2287 DWORD SymOptions
2288 ))GetProcAddress (hmodDbgHelp, FUNC(SymSetOptions));
2289 
2290 
2291  pSymSetOptions(SYMOPT_UNDNAME);
2292 
2293  pSymInitialize(GetCurrentProcess(), NULL, TRUE);
2294 
2295  return TRUE;
2296 }
2297 
2298 static void dump_backtrace_for_thread(HANDLE hThread)
2299 {
2300  STACKFRAME sf;
2301  CONTEXT context;
2302  DWORD dwImageType;
2303 
2304  if (!pStackWalk)
2305  if (!init_backtrace())
2306  return;
2307 
2308  /* can't use this function for current thread as GetThreadContext
2309  * doesn't support getting context from current thread */
2310  if (hThread == GetCurrentThread())
2311  return;
2312 
2313  DPRINTF("Backtrace:\n");
2314 
2315  _DBUS_ZERO(context);
2316  context.ContextFlags = CONTEXT_FULL;
2317 
2318  SuspendThread(hThread);
2319 
2320  if (!GetThreadContext(hThread, &context))
2321  {
2322  DPRINTF("Couldn't get thread context (error %ld)\n", GetLastError());
2323  ResumeThread(hThread);
2324  return;
2325  }
2326 
2327  _DBUS_ZERO(sf);
2328 
2329 #ifdef __i386__
2330  sf.AddrFrame.Offset = context.Ebp;
2331  sf.AddrFrame.Mode = AddrModeFlat;
2332  sf.AddrPC.Offset = context.Eip;
2333  sf.AddrPC.Mode = AddrModeFlat;
2334  dwImageType = IMAGE_FILE_MACHINE_I386;
2335 #elif _M_X64
2336  dwImageType = IMAGE_FILE_MACHINE_AMD64;
2337  sf.AddrPC.Offset = context.Rip;
2338  sf.AddrPC.Mode = AddrModeFlat;
2339  sf.AddrFrame.Offset = context.Rsp;
2340  sf.AddrFrame.Mode = AddrModeFlat;
2341  sf.AddrStack.Offset = context.Rsp;
2342  sf.AddrStack.Mode = AddrModeFlat;
2343 #elif _M_IA64
2344  dwImageType = IMAGE_FILE_MACHINE_IA64;
2345  sf.AddrPC.Offset = context.StIIP;
2346  sf.AddrPC.Mode = AddrModeFlat;
2347  sf.AddrFrame.Offset = context.IntSp;
2348  sf.AddrFrame.Mode = AddrModeFlat;
2349  sf.AddrBStore.Offset= context.RsBSP;
2350  sf.AddrBStore.Mode = AddrModeFlat;
2351  sf.AddrStack.Offset = context.IntSp;
2352  sf.AddrStack.Mode = AddrModeFlat;
2353 #else
2354 # error You need to fill in the STACKFRAME structure for your architecture
2355 #endif
2356 
2357  while (pStackWalk(dwImageType, GetCurrentProcess(),
2358  hThread, &sf, &context, NULL, pSymFunctionTableAccess,
2359  pSymGetModuleBase, NULL))
2360  {
2361  BYTE buffer[256];
2362  IMAGEHLP_SYMBOL * pSymbol = (IMAGEHLP_SYMBOL *)buffer;
2363  DWORD dwDisplacement;
2364 
2365  pSymbol->SizeOfStruct = sizeof(IMAGEHLP_SYMBOL);
2366  pSymbol->MaxNameLength = sizeof(buffer) - sizeof(IMAGEHLP_SYMBOL) + 1;
2367 
2368  if (!pSymGetSymFromAddr(GetCurrentProcess(), sf.AddrPC.Offset,
2369  &dwDisplacement, pSymbol))
2370  {
2371  IMAGEHLP_MODULE ModuleInfo;
2372  ModuleInfo.SizeOfStruct = sizeof(ModuleInfo);
2373 
2374  if (!pSymGetModuleInfo(GetCurrentProcess(), sf.AddrPC.Offset,
2375  &ModuleInfo))
2376  DPRINTF("1\t%p\n", (void*)sf.AddrPC.Offset);
2377  else
2378  DPRINTF("2\t%s+0x%lx\n", ModuleInfo.ImageName,
2379  sf.AddrPC.Offset - ModuleInfo.BaseOfImage);
2380  }
2381  else if (dwDisplacement)
2382  DPRINTF("3\t%s+0x%lx\n", pSymbol->Name, dwDisplacement);
2383  else
2384  DPRINTF("4\t%s\n", pSymbol->Name);
2385  }
2386 
2387  ResumeThread(hThread);
2388 }
2389 
2390 static DWORD WINAPI dump_thread_proc(LPVOID lpParameter)
2391 {
2392  dump_backtrace_for_thread((HANDLE)lpParameter);
2393  return 0;
2394 }
2395 
2396 /* cannot get valid context from current thread, so we have to execute
2397  * backtrace from another thread */
2398 static void dump_backtrace()
2399 {
2400  HANDLE hCurrentThread;
2401  HANDLE hThread;
2402  DWORD dwThreadId;
2403  DuplicateHandle(GetCurrentProcess(), GetCurrentThread(),
2404  GetCurrentProcess(), &hCurrentThread, 0, FALSE, DUPLICATE_SAME_ACCESS);
2405  hThread = CreateThread(NULL, 0, dump_thread_proc, (LPVOID)hCurrentThread,
2406  0, &dwThreadId);
2407  WaitForSingleObject(hThread, INFINITE);
2408  CloseHandle(hThread);
2409  CloseHandle(hCurrentThread);
2410 }
2411 #endif
2412 #endif /* asserts or tests enabled */
2413 
2414 #ifdef BACKTRACES
2416 {
2417  init_backtrace();
2418  dump_backtrace();
2419 }
2420 #else
2421 void _dbus_print_backtrace(void)
2422 {
2423  _dbus_verbose (" D-Bus not compiled with backtrace support\n");
2424 }
2425 #endif
2426 
2427 static dbus_uint32_t fromAscii(char ascii)
2428 {
2429  if(ascii >= '0' && ascii <= '9')
2430  return ascii - '0';
2431  if(ascii >= 'A' && ascii <= 'F')
2432  return ascii - 'A' + 10;
2433  if(ascii >= 'a' && ascii <= 'f')
2434  return ascii - 'a' + 10;
2435  return 0;
2436 }
2437 
2439  dbus_bool_t create_if_not_found,
2440  DBusError *error)
2441 {
2442 #ifdef DBUS_WINCE
2443  return TRUE;
2444  // TODO
2445 #else
2446  HW_PROFILE_INFOA info;
2447  char *lpc = &info.szHwProfileGuid[0];
2448  dbus_uint32_t u;
2449 
2450  // the hw-profile guid lives long enough
2451  if(!GetCurrentHwProfileA(&info))
2452  {
2453  dbus_set_error (error, DBUS_ERROR_NO_MEMORY, NULL); // FIXME
2454  return FALSE;
2455  }
2456 
2457  // Form: {12340001-4980-1920-6788-123456789012}
2458  lpc++;
2459  // 12340001
2460  u = ((fromAscii(lpc[0]) << 0) |
2461  (fromAscii(lpc[1]) << 4) |
2462  (fromAscii(lpc[2]) << 8) |
2463  (fromAscii(lpc[3]) << 12) |
2464  (fromAscii(lpc[4]) << 16) |
2465  (fromAscii(lpc[5]) << 20) |
2466  (fromAscii(lpc[6]) << 24) |
2467  (fromAscii(lpc[7]) << 28));
2468  machine_id->as_uint32s[0] = u;
2469 
2470  lpc += 9;
2471  // 4980-1920
2472  u = ((fromAscii(lpc[0]) << 0) |
2473  (fromAscii(lpc[1]) << 4) |
2474  (fromAscii(lpc[2]) << 8) |
2475  (fromAscii(lpc[3]) << 12) |
2476  (fromAscii(lpc[5]) << 16) |
2477  (fromAscii(lpc[6]) << 20) |
2478  (fromAscii(lpc[7]) << 24) |
2479  (fromAscii(lpc[8]) << 28));
2480  machine_id->as_uint32s[1] = u;
2481 
2482  lpc += 10;
2483  // 6788-1234
2484  u = ((fromAscii(lpc[0]) << 0) |
2485  (fromAscii(lpc[1]) << 4) |
2486  (fromAscii(lpc[2]) << 8) |
2487  (fromAscii(lpc[3]) << 12) |
2488  (fromAscii(lpc[5]) << 16) |
2489  (fromAscii(lpc[6]) << 20) |
2490  (fromAscii(lpc[7]) << 24) |
2491  (fromAscii(lpc[8]) << 28));
2492  machine_id->as_uint32s[2] = u;
2493 
2494  lpc += 9;
2495  // 56789012
2496  u = ((fromAscii(lpc[0]) << 0) |
2497  (fromAscii(lpc[1]) << 4) |
2498  (fromAscii(lpc[2]) << 8) |
2499  (fromAscii(lpc[3]) << 12) |
2500  (fromAscii(lpc[4]) << 16) |
2501  (fromAscii(lpc[5]) << 20) |
2502  (fromAscii(lpc[6]) << 24) |
2503  (fromAscii(lpc[7]) << 28));
2504  machine_id->as_uint32s[3] = u;
2505 #endif
2506  return TRUE;
2507 }
2508 
2509 static
2510 HANDLE _dbus_global_lock (const char *mutexname)
2511 {
2512  HANDLE mutex;
2513  DWORD gotMutex;
2514 
2515  mutex = CreateMutexA( NULL, FALSE, mutexname );
2516  if( !mutex )
2517  {
2518  return FALSE;
2519  }
2520 
2521  gotMutex = WaitForSingleObject( mutex, INFINITE );
2522  switch( gotMutex )
2523  {
2524  case WAIT_ABANDONED:
2525  ReleaseMutex (mutex);
2526  CloseHandle (mutex);
2527  return 0;
2528  case WAIT_FAILED:
2529  case WAIT_TIMEOUT:
2530  return 0;
2531  }
2532 
2533  return mutex;
2534 }
2535 
2536 static
2537 void _dbus_global_unlock (HANDLE mutex)
2538 {
2539  ReleaseMutex (mutex);
2540  CloseHandle (mutex);
2541 }
2542 
2543 // for proper cleanup in dbus-daemon
2544 static HANDLE hDBusDaemonMutex = NULL;
2545 static HANDLE hDBusSharedMem = NULL;
2546 // sync _dbus_daemon_publish_session_bus_address, _dbus_daemon_unpublish_session_bus_address and _dbus_daemon_already_runs
2547 static const char *cUniqueDBusInitMutex = "UniqueDBusInitMutex";
2548 // sync _dbus_get_autolaunch_address
2549 static const char *cDBusAutolaunchMutex = "DBusAutolaunchMutex";
2550 // mutex to determine if dbus-daemon is already started (per user)
2551 static const char *cDBusDaemonMutex = "DBusDaemonMutex";
2552 // named shm for dbus adress info (per user)
2553 static const char *cDBusDaemonAddressInfo = "DBusDaemonAddressInfo";
2554 
2555 static dbus_bool_t
2556 _dbus_get_install_root_as_hash(DBusString *out)
2557 {
2558  DBusString install_path;
2559 
2560  char path[MAX_PATH*2];
2561  int path_size = sizeof(path);
2562 
2563  if (!_dbus_get_install_root(path,path_size))
2564  return FALSE;
2565 
2566  _dbus_string_init(&install_path);
2567  _dbus_string_append(&install_path,path);
2568 
2569  _dbus_string_init(out);
2570  _dbus_string_tolower_ascii(&install_path,0,_dbus_string_get_length(&install_path));
2571 
2572  if (!_dbus_sha_compute (&install_path, out))
2573  return FALSE;
2574 
2575  return TRUE;
2576 }
2577 
2578 static dbus_bool_t
2579 _dbus_get_address_string (DBusString *out, const char *basestring, const char *scope)
2580 {
2581  _dbus_string_init(out);
2582  _dbus_string_append(out,basestring);
2583 
2584  if (!scope)
2585  {
2586  return TRUE;
2587  }
2588  else if (strcmp(scope,"*install-path") == 0
2589  // for 1.3 compatibility
2590  || strcmp(scope,"install-path") == 0)
2591  {
2592  DBusString temp;
2593  if (!_dbus_get_install_root_as_hash(&temp))
2594  {
2595  _dbus_string_free(out);
2596  return FALSE;
2597  }
2598  _dbus_string_append(out,"-");
2600  _dbus_string_free(&temp);
2601  }
2602  else if (strcmp(scope,"*user") == 0)
2603  {
2604  _dbus_string_append(out,"-");
2606  {
2607  _dbus_string_free(out);
2608  return FALSE;
2609  }
2610  }
2611  else if (strlen(scope) > 0)
2612  {
2613  _dbus_string_append(out,"-");
2614  _dbus_string_append(out,scope);
2615  return TRUE;
2616  }
2617  return TRUE;
2618 }
2619 
2620 static dbus_bool_t
2621 _dbus_get_shm_name (DBusString *out,const char *scope)
2622 {
2623  return _dbus_get_address_string (out,cDBusDaemonAddressInfo,scope);
2624 }
2625 
2626 static dbus_bool_t
2627 _dbus_get_mutex_name (DBusString *out,const char *scope)
2628 {
2629  return _dbus_get_address_string (out,cDBusDaemonMutex,scope);
2630 }
2631 
2633 _dbus_daemon_is_session_bus_address_published (const char *scope)
2634 {
2635  HANDLE lock;
2636  DBusString mutex_name;
2637 
2638  if (!_dbus_get_mutex_name(&mutex_name,scope))
2639  {
2640  _dbus_string_free( &mutex_name );
2641  return FALSE;
2642  }
2643 
2644  if (hDBusDaemonMutex)
2645  return TRUE;
2646 
2647  // sync _dbus_daemon_publish_session_bus_address, _dbus_daemon_unpublish_session_bus_address and _dbus_daemon_already_runs
2648  lock = _dbus_global_lock( cUniqueDBusInitMutex );
2649 
2650  // we use CreateMutex instead of OpenMutex because of possible race conditions,
2651  // see http://msdn.microsoft.com/en-us/library/ms684315%28VS.85%29.aspx
2652  hDBusDaemonMutex = CreateMutexA( NULL, FALSE, _dbus_string_get_const_data(&mutex_name) );
2653 
2654  /* The client uses mutex ownership to detect a running server, so the server should do so too.
2655  Fortunally the client deletes the mutex in the lock protected area, so checking presence
2656  will work too. */
2657 
2658  _dbus_global_unlock( lock );
2659 
2660  _dbus_string_free( &mutex_name );
2661 
2662  if (hDBusDaemonMutex == NULL)
2663  return FALSE;
2664  if (GetLastError() == ERROR_ALREADY_EXISTS)
2665  {
2666  CloseHandle(hDBusDaemonMutex);
2667  hDBusDaemonMutex = NULL;
2668  return TRUE;
2669  }
2670  // mutex wasn't created before, so return false.
2671  // We leave the mutex name allocated for later reusage
2672  // in _dbus_daemon_publish_session_bus_address.
2673  return FALSE;
2674 }
2675 
2677 _dbus_daemon_publish_session_bus_address (const char* address, const char *scope)
2678 {
2679  HANDLE lock;
2680  char *shared_addr = NULL;
2681  DBusString shm_name;
2682  DBusString mutex_name;
2683 
2684  _dbus_assert (address);
2685 
2686  if (!_dbus_get_mutex_name(&mutex_name,scope))
2687  {
2688  _dbus_string_free( &mutex_name );
2689  return FALSE;
2690  }
2691 
2692  // sync _dbus_daemon_publish_session_bus_address, _dbus_daemon_unpublish_session_bus_address and _dbus_daemon_already_runs
2693  lock = _dbus_global_lock( cUniqueDBusInitMutex );
2694 
2695  if (!hDBusDaemonMutex)
2696  {
2697  hDBusDaemonMutex = CreateMutexA( NULL, FALSE, _dbus_string_get_const_data(&mutex_name) );
2698  }
2699  _dbus_string_free( &mutex_name );
2700 
2701  // acquire the mutex
2702  if (WaitForSingleObject( hDBusDaemonMutex, 10 ) != WAIT_OBJECT_0)
2703  {
2704  _dbus_global_unlock( lock );
2705  CloseHandle( hDBusDaemonMutex );
2706  return FALSE;
2707  }
2708 
2709  if (!_dbus_get_shm_name(&shm_name,scope))
2710  {
2711  _dbus_string_free( &shm_name );
2712  _dbus_global_unlock( lock );
2713  return FALSE;
2714  }
2715 
2716  // create shm
2717  hDBusSharedMem = CreateFileMappingA( INVALID_HANDLE_VALUE, NULL, PAGE_READWRITE,
2718  0, strlen( address ) + 1, _dbus_string_get_const_data(&shm_name) );
2719  _dbus_assert( hDBusSharedMem );
2720 
2721  shared_addr = MapViewOfFile( hDBusSharedMem, FILE_MAP_WRITE, 0, 0, 0 );
2722 
2723  _dbus_assert (shared_addr);
2724 
2725  strcpy( shared_addr, address);
2726 
2727  // cleanup
2728  UnmapViewOfFile( shared_addr );
2729 
2730  _dbus_global_unlock( lock );
2731  _dbus_verbose( "published session bus address at %s\n",_dbus_string_get_const_data (&shm_name) );
2732 
2733  _dbus_string_free( &shm_name );
2734  return TRUE;
2735 }
2736 
2737 void
2738 _dbus_daemon_unpublish_session_bus_address (void)
2739 {
2740  HANDLE lock;
2741 
2742  // sync _dbus_daemon_publish_session_bus_address, _dbus_daemon_unpublish_session_bus_address and _dbus_daemon_already_runs
2743  lock = _dbus_global_lock( cUniqueDBusInitMutex );
2744 
2745  CloseHandle( hDBusSharedMem );
2746 
2747  hDBusSharedMem = NULL;
2748 
2749  ReleaseMutex( hDBusDaemonMutex );
2750 
2751  CloseHandle( hDBusDaemonMutex );
2752 
2753  hDBusDaemonMutex = NULL;
2754 
2755  _dbus_global_unlock( lock );
2756 }
2757 
2758 static dbus_bool_t
2759 _dbus_get_autolaunch_shm (DBusString *address, DBusString *shm_name)
2760 {
2761  HANDLE sharedMem;
2762  char *shared_addr;
2763  int i;
2764 
2765  // read shm
2766  for(i=0;i<20;++i) {
2767  // we know that dbus-daemon is available, so we wait until shm is available
2768  sharedMem = OpenFileMappingA( FILE_MAP_READ, FALSE, _dbus_string_get_const_data(shm_name));
2769  if( sharedMem == 0 )
2770  Sleep( 100 );
2771  if ( sharedMem != 0)
2772  break;
2773  }
2774 
2775  if( sharedMem == 0 )
2776  return FALSE;
2777 
2778  shared_addr = MapViewOfFile( sharedMem, FILE_MAP_READ, 0, 0, 0 );
2779 
2780  if( !shared_addr )
2781  return FALSE;
2782 
2783  _dbus_string_init( address );
2784 
2785  _dbus_string_append( address, shared_addr );
2786 
2787  // cleanup
2788  UnmapViewOfFile( shared_addr );
2789 
2790  CloseHandle( sharedMem );
2791 
2792  return TRUE;
2793 }
2794 
2795 static dbus_bool_t
2796 _dbus_daemon_already_runs (DBusString *address, DBusString *shm_name, const char *scope)
2797 {
2798  HANDLE lock;
2799  HANDLE daemon;
2800  DBusString mutex_name;
2801  dbus_bool_t bRet = TRUE;
2802 
2803  if (!_dbus_get_mutex_name(&mutex_name,scope))
2804  {
2805  _dbus_string_free( &mutex_name );
2806  return FALSE;
2807  }
2808 
2809  // sync _dbus_daemon_publish_session_bus_address, _dbus_daemon_unpublish_session_bus_address and _dbus_daemon_already_runs
2810  lock = _dbus_global_lock( cUniqueDBusInitMutex );
2811 
2812  // do checks
2813  daemon = CreateMutexA( NULL, FALSE, _dbus_string_get_const_data(&mutex_name) );
2814  if(WaitForSingleObject( daemon, 10 ) != WAIT_TIMEOUT)
2815  {
2816  ReleaseMutex (daemon);
2817  CloseHandle (daemon);
2818 
2819  _dbus_global_unlock( lock );
2820  _dbus_string_free( &mutex_name );
2821  return FALSE;
2822  }
2823 
2824  // read shm
2825  bRet = _dbus_get_autolaunch_shm( address, shm_name );
2826 
2827  // cleanup
2828  CloseHandle ( daemon );
2829 
2830  _dbus_global_unlock( lock );
2831  _dbus_string_free( &mutex_name );
2832 
2833  return bRet;
2834 }
2835 
2837 _dbus_get_autolaunch_address (const char *scope, DBusString *address,
2838  DBusError *error)
2839 {
2840  HANDLE mutex;
2841  STARTUPINFOA si;
2842  PROCESS_INFORMATION pi;
2843  dbus_bool_t retval = FALSE;
2844  LPSTR lpFile;
2845  char dbus_exe_path[MAX_PATH];
2846  char dbus_args[MAX_PATH * 2];
2847  const char * daemon_name = DBUS_DAEMON_NAME ".exe";
2848  DBusString shm_name;
2849 
2850  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
2851 
2852  if (!_dbus_get_shm_name(&shm_name,scope))
2853  {
2854  dbus_set_error_const (error, DBUS_ERROR_FAILED, "could not determine shm name");
2855  return FALSE;
2856  }
2857 
2858  mutex = _dbus_global_lock ( cDBusAutolaunchMutex );
2859 
2860  if (_dbus_daemon_already_runs(address,&shm_name,scope))
2861  {
2862  _dbus_verbose( "found running dbus daemon at %s\n",
2863  _dbus_string_get_const_data (&shm_name) );
2864  retval = TRUE;
2865  goto out;
2866  }
2867 
2868  if (!SearchPathA(NULL, daemon_name, NULL, sizeof(dbus_exe_path), dbus_exe_path, &lpFile))
2869  {
2870  // Look in directory containing dbus shared library
2871  HMODULE hmod;
2872  char dbus_module_path[MAX_PATH];
2873  DWORD rc;
2874 
2875  _dbus_verbose( "did not found dbus daemon executable on default search path, "
2876  "trying path where dbus shared library is located");
2877 
2878  hmod = _dbus_win_get_dll_hmodule();
2879  rc = GetModuleFileNameA(hmod, dbus_module_path, sizeof(dbus_module_path));
2880  if (rc <= 0)
2881  {
2882  dbus_set_error_const (error, DBUS_ERROR_FAILED, "could not retrieve dbus shared library file name");
2883  retval = FALSE;
2884  goto out;
2885  }
2886  else
2887  {
2888  char *ext_idx = strrchr(dbus_module_path, '\\');
2889  if (ext_idx)
2890  *ext_idx = '\0';
2891  if (!SearchPathA(dbus_module_path, daemon_name, NULL, sizeof(dbus_exe_path), dbus_exe_path, &lpFile))
2892  {
2893  dbus_set_error_const (error, DBUS_ERROR_FAILED, "could not find dbus-daemon executable");
2894  retval = FALSE;
2895  printf ("please add the path to %s to your PATH environment variable\n", daemon_name);
2896  printf ("or start the daemon manually\n\n");
2897  goto out;
2898  }
2899  _dbus_verbose( "found dbus daemon executable at %s",dbus_module_path);
2900  }
2901  }
2902 
2903 
2904  // Create process
2905  ZeroMemory( &si, sizeof(si) );
2906  si.cb = sizeof(si);
2907  ZeroMemory( &pi, sizeof(pi) );
2908 
2909  _snprintf(dbus_args, sizeof(dbus_args) - 1, "\"%s\" %s", dbus_exe_path, " --session");
2910 
2911 // argv[i] = "--config-file=bus\\session.conf";
2912 // printf("create process \"%s\" %s\n", dbus_exe_path, dbus_args);
2913  if(CreateProcessA(dbus_exe_path, dbus_args, NULL, NULL, FALSE, CREATE_NO_WINDOW, NULL, NULL, &si, &pi))
2914  {
2915  CloseHandle (pi.hThread);
2916  CloseHandle (pi.hProcess);
2917  retval = _dbus_get_autolaunch_shm( address, &shm_name );
2918  if (retval == FALSE)
2919  dbus_set_error_const (error, DBUS_ERROR_FAILED, "Failed to get autolaunch address from launched dbus-daemon");
2920  }
2921  else
2922  {
2923  dbus_set_error_const (error, DBUS_ERROR_FAILED, "Failed to launch dbus-daemon");
2924  retval = FALSE;
2925  }
2926 
2927 out:
2928  if (retval)
2929  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
2930  else
2931  _DBUS_ASSERT_ERROR_IS_SET (error);
2932 
2933  _dbus_global_unlock (mutex);
2934 
2935  return retval;
2936  }
2937 
2938 
2947  DBusError *error)
2948 {
2949  // TODO
2950  return TRUE;
2951 }
2952 
2959 static const char *
2960 _dbus_windows_get_datadir (void)
2961 {
2962  return _dbus_replace_install_prefix(DBUS_DATADIR);
2963 }
2964 
2965 #undef DBUS_DATADIR
2966 #define DBUS_DATADIR _dbus_windows_get_datadir ()
2967 
2968 
2969 #define DBUS_STANDARD_SESSION_SERVICEDIR "/dbus-1/services"
2970 #define DBUS_STANDARD_SYSTEM_SERVICEDIR "/dbus-1/system-services"
2971 
2988 dbus_bool_t
2990 {
2991  const char *common_progs;
2992  DBusString servicedir_path;
2993 
2994  if (!_dbus_string_init (&servicedir_path))
2995  return FALSE;
2996 
2997 #ifdef DBUS_WINCE
2998  {
2999  /* On Windows CE, we adjust datadir dynamically to installation location. */
3000  const char *data_dir = _dbus_getenv ("DBUS_DATADIR");
3001 
3002  if (data_dir != NULL)
3003  {
3004  if (!_dbus_string_append (&servicedir_path, data_dir))
3005  goto oom;
3006 
3007  if (!_dbus_string_append (&servicedir_path, _DBUS_PATH_SEPARATOR))
3008  goto oom;
3009  }
3010  }
3011 #else
3012 /*
3013  the code for accessing services requires absolute base pathes
3014  in case DBUS_DATADIR is relative make it absolute
3015 */
3016 #ifdef DBUS_WIN
3017  {
3018  DBusString p;
3019 
3020  _dbus_string_init_const (&p, DBUS_DATADIR);
3021 
3022  if (!_dbus_path_is_absolute (&p))
3023  {
3024  char install_root[1000];
3025  if (_dbus_get_install_root (install_root, sizeof(install_root)))
3026  if (!_dbus_string_append (&servicedir_path, install_root))
3027  goto oom;
3028  }
3029  }
3030 #endif
3031  if (!_dbus_string_append (&servicedir_path, DBUS_DATADIR))
3032  goto oom;
3033 
3034  if (!_dbus_string_append (&servicedir_path, _DBUS_PATH_SEPARATOR))
3035  goto oom;
3036 #endif
3037 
3038  common_progs = _dbus_getenv ("CommonProgramFiles");
3039 
3040  if (common_progs != NULL)
3041  {
3042  if (!_dbus_string_append (&servicedir_path, common_progs))
3043  goto oom;
3044 
3045  if (!_dbus_string_append (&servicedir_path, _DBUS_PATH_SEPARATOR))
3046  goto oom;
3047  }
3048 
3049  if (!_dbus_split_paths_and_append (&servicedir_path,
3050  DBUS_STANDARD_SESSION_SERVICEDIR,
3051  dirs))
3052  goto oom;
3053 
3054  _dbus_string_free (&servicedir_path);
3055  return TRUE;
3056 
3057  oom:
3058  _dbus_string_free (&servicedir_path);
3059  return FALSE;
3060 }
3061 
3082 {
3083  *dirs = NULL;
3084  return TRUE;
3085 }
3086 
3087 _DBUS_DEFINE_GLOBAL_LOCK (atomic);
3088 
3098 {
3099  // +/- 1 is needed here!
3100  // no volatile argument with mingw
3101  return InterlockedIncrement (&atomic->value) - 1;
3102 }
3103 
3113 {
3114  // +/- 1 is needed here!
3115  // no volatile argument with mingw
3116  return InterlockedDecrement (&atomic->value) + 1;
3117 }
3118 
3128 {
3129  /* this is what GLib does, hopefully it's right... */
3130  MemoryBarrier ();
3131  return atomic->value;
3132 }
3133 
3141 void
3143 {
3144 }
3145 
3154 {
3155  return errno == WSAEWOULDBLOCK;
3156 }
3157 
3166 _dbus_get_install_root(char *prefix, int len)
3167 {
3168  //To find the prefix, we cut the filename and also \bin\ if present
3169  DWORD pathLength;
3170  char *lastSlash;
3171  SetLastError( 0 );
3172  pathLength = GetModuleFileNameA(_dbus_win_get_dll_hmodule(), prefix, len);
3173  if ( pathLength == 0 || GetLastError() != 0 ) {
3174  *prefix = '\0';
3175  return FALSE;
3176  }
3177  lastSlash = _mbsrchr(prefix, '\\');
3178  if (lastSlash == NULL) {
3179  *prefix = '\0';
3180  return FALSE;
3181  }
3182  //cut off binary name
3183  lastSlash[1] = 0;
3184 
3185  //cut possible "\\bin"
3186 
3187  //this fails if we are in a double-byte system codepage and the
3188  //folder's name happens to end with the *bytes*
3189  //"\\bin"... (I.e. the second byte of some Han character and then
3190  //the Latin "bin", but that is not likely I think...
3191  if (lastSlash - prefix >= 4 && strnicmp(lastSlash - 4, "\\bin", 4) == 0)
3192  lastSlash[-3] = 0;
3193  else if (lastSlash - prefix >= 10 && strnicmp(lastSlash - 10, "\\bin\\debug", 10) == 0)
3194  lastSlash[-9] = 0;
3195  else if (lastSlash - prefix >= 12 && strnicmp(lastSlash - 12, "\\bin\\release", 12) == 0)
3196  lastSlash[-11] = 0;
3197 
3198  return TRUE;
3199 }
3200 
3214 dbus_bool_t
3215 _dbus_get_config_file_name(DBusString *config_file, char *s)
3216 {
3217  char path[MAX_PATH*2];
3218  int path_size = sizeof(path);
3219 
3220  if (!_dbus_get_install_root(path,path_size))
3221  return FALSE;
3222 
3223  if(strlen(s) + 4 + strlen(path) > sizeof(path)-2)
3224  return FALSE;
3225  strcat(path,"etc\\");
3226  strcat(path,s);
3227  if (_dbus_file_exists(path))
3228  {
3229  // find path from executable
3230  if (!_dbus_string_append (config_file, path))
3231  return FALSE;
3232  }
3233  else
3234  {
3235  if (!_dbus_get_install_root(path,path_size))
3236  return FALSE;
3237  if(strlen(s) + 11 + strlen(path) > sizeof(path)-2)
3238  return FALSE;
3239  strcat(path,"etc\\dbus-1\\");
3240  strcat(path,s);
3241 
3242  if (_dbus_file_exists(path))
3243  {
3244  if (!_dbus_string_append (config_file, path))
3245  return FALSE;
3246  }
3247  else
3248  {
3249  if (!_dbus_get_install_root(path,path_size))
3250  return FALSE;
3251  if(strlen(s) + 4 + strlen(path) > sizeof(path)-2)
3252  return FALSE;
3253  strcat(path,"bus\\");
3254  strcat(path,s);
3255 
3256  if (_dbus_file_exists(path))
3257  {
3258  if (!_dbus_string_append (config_file, path))
3259  return FALSE;
3260  }
3261  }
3262  }
3263  return TRUE;
3264 }
3265 
3276 {
3277  return _dbus_get_config_file_name(str, "system.conf");
3278 }
3279 
3288 {
3289  return _dbus_get_config_file_name(str, "session.conf");
3290 }
3291 
3292 /* See comment in dbus-sysdeps-unix.c */
3295  DBusString *address,
3296  DBusError *error)
3297 {
3298  /* Probably fill this in with something based on COM? */
3299  *supported = FALSE;
3300  return TRUE;
3301 }
3302 
3318  DBusCredentials *credentials)
3319 {
3320  DBusString homedir;
3321  DBusString dotdir;
3322  const char *homepath;
3323  const char *homedrive;
3324 
3325  _dbus_assert (credentials != NULL);
3327 
3328  if (!_dbus_string_init (&homedir))
3329  return FALSE;
3330 
3331  homedrive = _dbus_getenv("HOMEDRIVE");
3332  if (homedrive != NULL && *homedrive != '\0')
3333  {
3334  _dbus_string_append(&homedir,homedrive);
3335  }
3336 
3337  homepath = _dbus_getenv("HOMEPATH");
3338  if (homepath != NULL && *homepath != '\0')
3339  {
3340  _dbus_string_append(&homedir,homepath);
3341  }
3342 
3343 #ifdef DBUS_BUILD_TESTS
3344  {
3345  const char *override;
3346 
3347  override = _dbus_getenv ("DBUS_TEST_HOMEDIR");
3348  if (override != NULL && *override != '\0')
3349  {
3350  _dbus_string_set_length (&homedir, 0);
3351  if (!_dbus_string_append (&homedir, override))
3352  goto failed;
3353 
3354  _dbus_verbose ("Using fake homedir for testing: %s\n",
3355  _dbus_string_get_const_data (&homedir));
3356  }
3357  else
3358  {
3359  static dbus_bool_t already_warned = FALSE;
3360  if (!already_warned)
3361  {
3362  _dbus_warn ("Using your real home directory for testing, set DBUS_TEST_HOMEDIR to avoid\n");
3363  already_warned = TRUE;
3364  }
3365  }
3366  }
3367 #endif
3368 
3369 #ifdef DBUS_WINCE
3370  /* It's not possible to create a .something directory in Windows CE
3371  using the file explorer. */
3372 #define KEYRING_DIR "dbus-keyrings"
3373 #else
3374 #define KEYRING_DIR ".dbus-keyrings"
3375 #endif
3376 
3377  _dbus_string_init_const (&dotdir, KEYRING_DIR);
3378  if (!_dbus_concat_dir_and_file (&homedir,
3379  &dotdir))
3380  goto failed;
3381 
3382  if (!_dbus_string_copy (&homedir, 0,
3383  directory, _dbus_string_get_length (directory))) {
3384  goto failed;
3385  }
3386 
3387  _dbus_string_free (&homedir);
3388  return TRUE;
3389 
3390  failed:
3391  _dbus_string_free (&homedir);
3392  return FALSE;
3393 }
3394 
3400 dbus_bool_t
3401 _dbus_file_exists (const char *file)
3402 {
3403  DWORD attributes = GetFileAttributesA (file);
3404 
3405  if (attributes != INVALID_FILE_ATTRIBUTES && GetLastError() != ERROR_PATH_NOT_FOUND)
3406  return TRUE;
3407  else
3408  return FALSE;
3409 }
3410 
3418 const char*
3419 _dbus_strerror (int error_number)
3420 {
3421 #ifdef DBUS_WINCE
3422  // TODO
3423  return "unknown";
3424 #else
3425  const char *msg;
3426 
3427  switch (error_number)
3428  {
3429  case WSAEINTR:
3430  return "Interrupted function call";
3431  case WSAEACCES:
3432  return "Permission denied";
3433  case WSAEFAULT:
3434  return "Bad address";
3435  case WSAEINVAL:
3436  return "Invalid argument";
3437  case WSAEMFILE:
3438  return "Too many open files";
3439  case WSAEWOULDBLOCK:
3440  return "Resource temporarily unavailable";
3441  case WSAEINPROGRESS:
3442  return "Operation now in progress";
3443  case WSAEALREADY:
3444  return "Operation already in progress";
3445  case WSAENOTSOCK:
3446  return "Socket operation on nonsocket";
3447  case WSAEDESTADDRREQ:
3448  return "Destination address required";
3449  case WSAEMSGSIZE:
3450  return "Message too long";
3451  case WSAEPROTOTYPE:
3452  return "Protocol wrong type for socket";
3453  case WSAENOPROTOOPT:
3454  return "Bad protocol option";
3455  case WSAEPROTONOSUPPORT:
3456  return "Protocol not supported";
3457  case WSAESOCKTNOSUPPORT:
3458  return "Socket type not supported";
3459  case WSAEOPNOTSUPP:
3460  return "Operation not supported";
3461  case WSAEPFNOSUPPORT:
3462  return "Protocol family not supported";
3463  case WSAEAFNOSUPPORT:
3464  return "Address family not supported by protocol family";
3465  case WSAEADDRINUSE:
3466  return "Address already in use";
3467  case WSAEADDRNOTAVAIL:
3468  return "Cannot assign requested address";
3469  case WSAENETDOWN:
3470  return "Network is down";
3471  case WSAENETUNREACH:
3472  return "Network is unreachable";
3473  case WSAENETRESET:
3474  return "Network dropped connection on reset";
3475  case WSAECONNABORTED:
3476  return "Software caused connection abort";
3477  case WSAECONNRESET:
3478  return "Connection reset by peer";
3479  case WSAENOBUFS:
3480  return "No buffer space available";
3481  case WSAEISCONN:
3482  return "Socket is already connected";
3483  case WSAENOTCONN:
3484  return "Socket is not connected";
3485  case WSAESHUTDOWN:
3486  return "Cannot send after socket shutdown";
3487  case WSAETIMEDOUT:
3488  return "Connection timed out";
3489  case WSAECONNREFUSED:
3490  return "Connection refused";
3491  case WSAEHOSTDOWN:
3492  return "Host is down";
3493  case WSAEHOSTUNREACH:
3494  return "No route to host";
3495  case WSAEPROCLIM:
3496  return "Too many processes";
3497  case WSAEDISCON:
3498  return "Graceful shutdown in progress";
3499  case WSATYPE_NOT_FOUND:
3500  return "Class type not found";
3501  case WSAHOST_NOT_FOUND:
3502  return "Host not found";
3503  case WSATRY_AGAIN:
3504  return "Nonauthoritative host not found";
3505  case WSANO_RECOVERY:
3506  return "This is a nonrecoverable error";
3507  case WSANO_DATA:
3508  return "Valid name, no data record of requested type";
3509  case WSA_INVALID_HANDLE:
3510  return "Specified event object handle is invalid";
3511  case WSA_INVALID_PARAMETER:
3512  return "One or more parameters are invalid";
3513  case WSA_IO_INCOMPLETE:
3514  return "Overlapped I/O event object not in signaled state";
3515  case WSA_IO_PENDING:
3516  return "Overlapped operations will complete later";
3517  case WSA_NOT_ENOUGH_MEMORY:
3518  return "Insufficient memory available";
3519  case WSA_OPERATION_ABORTED:
3520  return "Overlapped operation aborted";
3521 #ifdef WSAINVALIDPROCTABLE
3522 
3523  case WSAINVALIDPROCTABLE:
3524  return "Invalid procedure table from service provider";
3525 #endif
3526 #ifdef WSAINVALIDPROVIDER
3527 
3528  case WSAINVALIDPROVIDER:
3529  return "Invalid service provider version number";
3530 #endif
3531 #ifdef WSAPROVIDERFAILEDINIT
3532 
3533  case WSAPROVIDERFAILEDINIT:
3534  return "Unable to initialize a service provider";
3535 #endif
3536 
3537  case WSASYSCALLFAILURE:
3538  return "System call failure";
3539  }
3540  msg = strerror (error_number);
3541  if (msg == NULL)
3542  msg = "unknown";
3543 
3544  return msg;
3545 #endif //DBUS_WINCE
3546 }
3547 
3555 void
3556 _dbus_win_set_error_from_win_error (DBusError *error,
3557  int code)
3558 {
3559  char *msg;
3560 
3561  /* As we want the English message, use the A API */
3562  FormatMessageA (FORMAT_MESSAGE_ALLOCATE_BUFFER |
3563  FORMAT_MESSAGE_IGNORE_INSERTS |
3564  FORMAT_MESSAGE_FROM_SYSTEM,
3565  NULL, code, MAKELANGID (LANG_ENGLISH, SUBLANG_ENGLISH_US),
3566  (LPSTR) &msg, 0, NULL);
3567  if (msg)
3568  {
3569  char *msg_copy;
3570 
3571  msg_copy = dbus_malloc (strlen (msg));
3572  strcpy (msg_copy, msg);
3573  LocalFree (msg);
3574 
3575  dbus_set_error (error, "win32.error", "%s", msg_copy);
3576  }
3577  else
3578  dbus_set_error (error, "win32.error", "Unknown error code %d or FormatMessage failed", code);
3579 }
3580 
3581 void
3582 _dbus_win_warn_win_error (const char *message,
3583  int code)
3584 {
3585  DBusError error;
3586 
3587  dbus_error_init (&error);
3588  _dbus_win_set_error_from_win_error (&error, code);
3589  _dbus_warn ("%s: %s\n", message, error.message);
3590  dbus_error_free (&error);
3591 }
3592 
3602  DBusError *error)
3603 {
3604  const char *filename_c;
3605 
3606  _DBUS_ASSERT_ERROR_IS_CLEAR (error);
3607 
3608  filename_c = _dbus_string_get_const_data (filename);
3609 
3610  if (RemoveDirectoryA (filename_c) == 0)
3611  {
3612  char *emsg = _dbus_win_error_string (GetLastError ());
3613  dbus_set_error (error, _dbus_win_error_from_last_error (),
3614  "Failed to remove directory %s: %s",
3615  filename_c, emsg);
3616  _dbus_win_free_error_string (emsg);
3617  return FALSE;
3618  }
3619 
3620  return TRUE;
3621 }
3622 
3631 {
3632  if (_dbus_string_get_length (filename) > 0)
3633  return _dbus_string_get_byte (filename, 1) == ':'
3634  || _dbus_string_get_byte (filename, 0) == '\\'
3635  || _dbus_string_get_byte (filename, 0) == '/';
3636  else
3637  return FALSE;
3638 }
3639 
3642 {
3643  return FALSE;
3644 }
3645 
3647 /* tests in dbus-sysdeps-util.c */
3648 
dbus_bool_t _dbus_string_append(DBusString *str, const char *buffer)
Appends a nul-terminated C-style string to a DBusString.
Definition: dbus-string.c:913
unsigned int dbus_uint32_t
A 32-bit unsigned integer on all platforms.
An atomic integer safe to increment or decrement from multiple threads.
Definition: dbus-sysdeps.h:229
#define DBUS_ERROR_FILE_NOT_FOUND
Missing file.
#define DBUS_ERROR_FILE_EXISTS
Existing file and the operation you&#39;re using does not silently overwrite.
const char * message
public error message field
Definition: dbus-errors.h:51
dbus_int32_t _dbus_atomic_get(DBusAtomic *atomic)
Atomically get the value of an integer.
#define NULL
A null pointer, defined appropriately for C or C++.
dbus_bool_t _dbus_append_system_config_file(DBusString *str)
Append the absolute path of the system.conf file (there is no system bus on Windows so this can just ...
volatile dbus_int32_t value
Value of the atomic integer.
Definition: dbus-sysdeps.h:234
dbus_bool_t _dbus_check_dir_is_private_to_user(DBusString *dir, DBusError *error)
Checks to make sure the given directory is private to the user.
void * dbus_realloc(void *memory, size_t bytes)
Resizes a block of memory previously allocated by dbus_malloc() or dbus_malloc0().
Definition: dbus-memory.c:600
dbus_bool_t _dbus_string_lengthen(DBusString *str, int additional_length)
Makes a string longer by the given number of bytes.
Definition: dbus-string.c:738
void dbus_free(void *memory)
Frees a block of memory previously allocated by dbus_malloc() or dbus_malloc0().
Definition: dbus-memory.c:700
dbus_bool_t _dbus_path_is_absolute(const DBusString *filename)
Checks whether the filename is an absolute path.
dbus_bool_t _dbus_delete_directory(const DBusString *filename, DBusError *error)
Removes a directory; Directory must be empty.
#define dbus_new(type, count)
Safe macro for using dbus_malloc().
Definition: dbus-memory.h:58
dbus_uint32_t as_uint32s[DBUS_UUID_LENGTH_WORDS]
guid as four uint32 values
void _dbus_flush_caches(void)
Called when the bus daemon is signaled to reload its configuration; any caches should be nuked...
#define _dbus_assert(condition)
Aborts with an error message if the condition is false.
dbus_bool_t _dbus_full_duplex_pipe(int *fd1, int *fd2, dbus_bool_t blocking, DBusError *error)
Creates a full-duplex pipe (as in socketpair()).
int _dbus_write_socket_two(int fd, const DBusString *buffer1, int start1, int len1, const DBusString *buffer2, int start2, int len2)
Like _dbus_write_two() but only works on sockets and is thus available on Windows.
dbus_bool_t _dbus_check_setuid(void)
NOTE: If you modify this function, please also consider making the corresponding change in GLib...
void _dbus_string_tolower_ascii(const DBusString *str, int start, int len)
Converts the given range of the string to lower case.
Definition: dbus-string.c:2482
void dbus_error_free(DBusError *error)
Frees an error that&#39;s been set (or just initialized), then reinitializes the error as in dbus_error_i...
Definition: dbus-errors.c:211
dbus_bool_t _dbus_get_standard_session_servicedirs(DBusList **dirs)
Returns the standard directories for a session bus to look for service activation files...
A portable struct pollfd wrapper.
Definition: dbus-sysdeps.h:299
A globally unique ID ; we have one for each DBusServer, and also one for each machine with libdbus in...
int _dbus_accept(int listen_fd)
Accepts a connection on a listening socket.
unsigned char _dbus_string_get_byte(const DBusString *str, int start)
Gets the byte at the given position.
Definition: dbus-string.c:540
#define _DBUS_POLLIN
There is data to read.
Definition: dbus-sysdeps.h:283
dbus_bool_t _dbus_file_exists(const char *file)
File interface.
char * _dbus_string_get_data_len(DBusString *str, int start, int len)
Gets a sub-portion of the raw character buffer from the string.
Definition: dbus-string.c:468
dbus_bool_t _dbus_string_init(DBusString *str)
Initializes a string.
Definition: dbus-string.c:175
dbus_pid_t _dbus_getpid(void)
Gets our process ID.
dbus_bool_t _dbus_append_user_from_current_process(DBusString *str)
Append to the string the identity we would like to have when we authenticate, on UNIX this is the cur...
#define DBUS_ERROR_IO_ERROR
Something went wrong reading or writing to a socket, for example.
void _dbus_string_shorten(DBusString *str, int length_to_remove)
Makes a string shorter by the given number of bytes.
Definition: dbus-string.c:758
short events
Events to poll for.
Definition: dbus-sysdeps.h:302
dbus_bool_t _dbus_string_copy(const DBusString *source, int start, DBusString *dest, int insert_at)
Like _dbus_string_move(), but does not delete the section of the source string that&#39;s copied to the d...
Definition: dbus-string.c:1280
dbus_bool_t _dbus_read_credentials_socket(int client_fd, DBusCredentials *credentials, DBusError *error)
Reads a single byte which must be nul (an error occurs otherwise), and reads unix credentials if avai...
dbus_bool_t _dbus_credentials_add_windows_sid(DBusCredentials *credentials, const char *windows_sid)
Add a Windows user SID to the credentials.
const char * _dbus_getenv(const char *varname)
Wrapper for getenv().
Definition: dbus-sysdeps.c:183
void _dbus_abort(void)
Aborts the program with SIGABRT (dumping core).
Definition: dbus-sysdeps.c:80
dbus_bool_t _dbus_get_autolaunch_address(const char *scope, DBusString *address, DBusError *error)
Returns the address of a new session bus.
const char * _dbus_error_from_errno(int error_number)
Converts a UNIX errno, or Windows errno or WinSock error value into a DBusError name.
Definition: dbus-sysdeps.c:612
void _dbus_get_monotonic_time(long *tv_sec, long *tv_usec)
Get current time, as in gettimeofday().
unsigned long dbus_pid_t
A process ID.
Definition: dbus-sysdeps.h:98
dbus_int32_t _dbus_atomic_dec(DBusAtomic *atomic)
Atomically decrement an integer.
void _dbus_fd_set_close_on_exec(intptr_t fd)
Sets the file descriptor to be close on exec.
void _dbus_get_real_time(long *tv_sec, long *tv_usec)
Get current time, as in gettimeofday().
void * dbus_malloc(size_t bytes)
Allocates the given number of bytes, as with standard malloc().
Definition: dbus-memory.c:460
dbus_bool_t _dbus_concat_dir_and_file(DBusString *dir, const DBusString *next_component)
Appends the given filename to the given directory.
dbus_bool_t _dbus_credentials_are_anonymous(DBusCredentials *credentials)
Checks whether a credentials object contains a user identity.
dbus_uint32_t dbus_bool_t
A boolean, valid values are TRUE and FALSE.
Definition: dbus-types.h:35
void _dbus_string_init_const(DBusString *str, const char *value)
Initializes a constant string.
Definition: dbus-string.c:190
_DBUS_GNUC_EXTENSION typedef unsigned long long dbus_uint64_t
A 64-bit unsigned integer on all platforms that support it.
int _dbus_poll(DBusPollFD *fds, int n_fds, int timeout_milliseconds)
Wrapper for poll().
dbus_bool_t _dbus_make_file_world_readable(const DBusString *filename, DBusError *error)
Makes the file readable by every user in the system.
#define _DBUS_POLLOUT
Writing now will not block.
Definition: dbus-sysdeps.h:287
void _dbus_warn(const char *format,...)
Prints a warning message to stderr.
int _dbus_string_get_length(const DBusString *str)
Gets the length of a string (not including nul termination).
Definition: dbus-string.c:717
dbus_bool_t _dbus_append_keyring_directory_for_credentials(DBusString *directory, DBusCredentials *credentials)
Appends the directory in which a keyring for the given credentials should be stored.
int _dbus_read_socket(int fd, DBusString *buffer, int count)
Like _dbus_read(), but only works on sockets so is available on Windows.
Object representing an exception.
Definition: dbus-errors.h:48
dbus_bool_t _dbus_string_validate_utf8(const DBusString *str, int start, int len)
Checks that the given range of the string is valid UTF-8.
Definition: dbus-string.c:2552
void _dbus_disable_sigpipe(void)
signal (SIGPIPE, SIG_IGN);
dbus_bool_t _dbus_send_credentials_socket(int server_fd, DBusError *error)
Sends a single nul byte with our UNIX credentials as ancillary data.
void dbus_set_error(DBusError *error, const char *name, const char *format,...)
Assigns an error name and message to a DBusError.
Definition: dbus-errors.c:354
dbus_int32_t _dbus_atomic_inc(DBusAtomic *atomic)
Atomically increments an integer.
int fd
File descriptor.
Definition: dbus-sysdeps.h:301
dbus_bool_t _dbus_create_directory(const DBusString *filename, DBusError *error)
Creates a directory; succeeds if the directory is created or already existed.
dbus_bool_t _dbus_string_append_byte(DBusString *str, unsigned char byte)
Appends a single byte to the string, returning FALSE if not enough memory.
Definition: dbus-string.c:1154
void _dbus_string_free(DBusString *str)
Frees a string created by _dbus_string_init().
Definition: dbus-string.c:242
dbus_bool_t _dbus_credentials_add_from_current_process(DBusCredentials *credentials)
Adds the credentials of the current process to the passed-in credentials object.
#define TRUE
Expands to &quot;1&quot;.
#define _dbus_assert_not_reached(explanation)
Aborts with an error message if called.
#define DBUS_ERROR_FAILED
A generic error; &quot;something went wrong&quot; - see the error message for more.
const char * _dbus_get_tmpdir(void)
Gets the temporary files directory by inspecting the environment variables TMPDIR, TMP, and TEMP in that order.
#define _DBUS_DEFINE_GLOBAL_LOCK(name)
Defines a global lock variable with the given name.
const char * _dbus_strerror_from_errno(void)
Get error message from errno.
Definition: dbus-sysdeps.c:767
unsigned long _dbus_pid_for_log(void)
The only reason this is separate from _dbus_getpid() is to allow it on Windows for logging but not fo...
#define DBUS_INT64_CONSTANT(val)
Declare a 64-bit signed integer constant.
void dbus_error_init(DBusError *error)
Initializes a DBusError structure.
Definition: dbus-errors.c:188
int _dbus_write_socket(int fd, const DBusString *buffer, int start, int len)
Like _dbus_write(), but only supports sockets and is thus available on Windows.
const char * _dbus_string_get_const_data_len(const DBusString *str, int start, int len)
const version of _dbus_string_get_data_len().
Definition: dbus-string.c:492
A node in a linked list.
Definition: dbus-list.h:34
void _dbus_exit(int code)
Exit the process, returning the given value.
dbus_bool_t _dbus_split_paths_and_append(DBusString *dirs, const char *suffix, DBusList **dir_list)
Split paths into a list of char strings.
Definition: dbus-sysdeps.c:224
#define DBUS_ERROR_ACCESS_DENIED
Security restrictions don&#39;t allow doing what you&#39;re trying to do.
dbus_bool_t _dbus_get_is_errno_eagain_or_ewouldblock(void)
See if errno is EAGAIN or EWOULDBLOCK (this has to be done differently for Winsock so is abstracted) ...
#define DBUS_ERROR_NO_MEMORY
There was not enough memory to complete an operation.
dbus_bool_t _dbus_lookup_session_address(dbus_bool_t *supported, DBusString *address, DBusError *error)
Determines the address of the session bus by querying a platform-specific method. ...
dbus_bool_t _dbus_credentials_add_unix_pid(DBusCredentials *credentials, dbus_pid_t pid)
Add a UNIX process ID to the credentials.
#define FALSE
Expands to &quot;0&quot;.
dbus_bool_t _dbus_read_local_machine_uuid(DBusGUID *machine_id, dbus_bool_t create_if_not_found, DBusError *error)
Reads the uuid of the machine we&#39;re running on from the dbus configuration.
void _dbus_print_backtrace(void)
On GNU libc systems, print a crude backtrace to stderr.
dbus_bool_t _dbus_sha_compute(const DBusString *data, DBusString *ascii_output)
Computes the ASCII hex-encoded shasum of the given data and appends it to the output string...
Definition: dbus-sha.c:483
void dbus_set_error_const(DBusError *error, const char *name, const char *message)
Assigns an error name and message to a DBusError.
Definition: dbus-errors.c:243
dbus_bool_t _dbus_string_set_length(DBusString *str, int length)
Sets the length of a string.
Definition: dbus-string.c:780
int _dbus_printf_string_upper_bound(const char *format, va_list args)
Measure the length of the given format string and arguments, not including the terminating nul...
void _dbus_verbose_bytes_of_string(const DBusString *str, int start, int len)
Dump the given part of the string to verbose log.
int dbus_int32_t
A 32-bit signed integer on all platforms.
dbus_bool_t _dbus_close_socket(int fd, DBusError *error)
Closes a socket.
#define _DBUS_ZERO(object)
Sets all bits in an object to zero.
dbus_bool_t _dbus_append_session_config_file(DBusString *str)
Append the absolute path of the session.conf file.
#define DBUS_ERROR_INVALID_ARGS
Invalid arguments passed to a method call.
short revents
Events that occurred.
Definition: dbus-sysdeps.h:303
const char * _dbus_string_get_const_data(const DBusString *str)
Gets the raw character buffer from a const string.
Definition: dbus-string.c:446
#define DBUS_ERROR_LIMITS_EXCEEDED
Some limited resource is exhausted.
void _dbus_string_init_const_len(DBusString *str, const char *value, int len)
Initializes a constant string with a length.
Definition: dbus-string.c:210
dbus_bool_t _dbus_get_standard_system_servicedirs(DBusList **dirs)
Returns the standard directories for a system bus to look for service activation files.
void _dbus_sleep_milliseconds(int milliseconds)
Sleeps the given number of milliseconds.
dbus_bool_t _dbus_delete_file(const DBusString *filename, DBusError *error)
Deletes the given file.
int _dbus_connect_tcp_socket(const char *host, const char *port, const char *family, DBusError *error)
Creates a socket and connects to a socket at the given host and port.
int _dbus_listen_tcp_socket(const char *host, const char *port, const char *family, DBusString *retport, int **fds_p, DBusError *error)
Creates a socket and binds it to the given path, then listens on the socket.
dbus_bool_t _dbus_generate_random_bytes(DBusString *str, int n_bytes)
Generates the given number of random bytes, using the best mechanism we can come up with...
#define _DBUS_POLLERR
Error condition.
Definition: dbus-sysdeps.h:289
dbus_bool_t _dbus_credentials_add_from_user(DBusCredentials *credentials, const DBusString *username)
Adds the credentials corresponding to the given username.