dbus.pas 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  1. {
  2. Pascal translation of the dbus headers
  3. Based on dbus version 0.92
  4. }
  5. { -*- mode: C; c-file-style: "gnu" -*- }
  6. { dbus.h Convenience header including all other headers
  7. *
  8. * Copyright (C) 2002, 2003 Red Hat Inc.
  9. *
  10. * Licensed under the Academic Free License version 2.1
  11. *
  12. * This program is free software; you can redistribute it and/or modify
  13. * it under the terms of the GNU General Public License as published by
  14. * the Free Software Foundation; either version 2 of the License, or
  15. * (at your option) any later version.
  16. *
  17. * This program is distributed in the hope that it will be useful,
  18. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  20. * GNU General Public License for more details.
  21. *
  22. * You should have received a copy of the GNU General Public License
  23. * along with this program; if not, write to the Free Software
  24. * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  25. *
  26. }
  27. unit dbus;
  28. {$ifdef fpc}
  29. {$mode delphi}{$H+}
  30. {$endif}
  31. {$minenumsize 4}
  32. {$packrecords c}
  33. { FPC 2.0.2 compatibility code }
  34. {$ifdef win32}
  35. {$define windows}
  36. {$endif}
  37. { Delphi compatibility code }
  38. {$ifndef fpc}
  39. {$define windows}
  40. {$endif}
  41. interface
  42. uses ctypes;
  43. { D-Bus hasn't reached 1.0 and is subject to protocol and API churn.
  44. See the README for a full explanation. }
  45. const
  46. {$ifdef unix}
  47. LibDBus = 'libdbus-1';
  48. {$endif}
  49. {$ifdef windows}
  50. LibDBus = 'libdbus.dll';
  51. {$endif}
  52. {$include dbus-macros.inc}
  53. {$include dbus-arch-deps.inc}
  54. {$include dbus-types.inc}
  55. {$include dbus-errors.inc}
  56. {$include dbus-address.inc}
  57. {$include dbus-message.inc}
  58. {$include dbus-shared.inc}
  59. {$include dbus-connection.inc}
  60. {$include dbus-bus.inc}
  61. {$include dbus-pending-call.inc}
  62. {$include dbus-protocol.inc}
  63. {$include dbus-server.inc}
  64. {$include dbus-signature.inc}
  65. {$include dbus-threads.inc}
  66. {
  67. * @defgroup DBus D-Bus low-level public API
  68. * @brief The low-level public API of the D-Bus library
  69. *
  70. * libdbus provides a low-level API intended primarily for use by
  71. * bindings to specific object systems and languages. D-Bus is most
  72. * convenient when used with the GLib bindings, Python bindings, Qt
  73. * bindings, Mono bindings, and so forth. This low-level API has a
  74. * lot of complexity useful only for bindings.
  75. *
  76. }
  77. implementation
  78. end.