Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: a1141911e7
Fetching contributors…

Cannot retrieve contributors at this time

file 34 lines (28 sloc) 0.821 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34
;;; -*- Mode: Lisp -*-
;;; Copyright (c) 2008 Julian Stecklina
;;;
;;; This file is part of CL-DBUS. Look into LICENSE for license terms.

(defpackage :blitz.desktop.dbus
  (:use :common-lisp :iterate :defclass-star)
  (:import-from :cl-ppcre "SPLIT" "SCAN-TO-STRINGS")
  (:export))
(in-package :blitz.desktop.dbus)

;;; Message type
(defconstant +method-call+ 1)
(defconstant +method-return+ 2)
(defconstant +error+ 3)
(defconstant +signal+ 4)

;;; Header fields
(defconstant +path+ 1)
(defconstant +interface+ 2)
(defconstant +member+ 3)
(defconstant +error-name+ 4)
(defconstant +reply-serial+ 5)
(defconstant +destination+ 6)
(defconstant +sender+ 7)
(defconstant +signature+ 8)

;;; Header flags
(defconstant +no-reply-expected+ #x1)
(defconstant +no-auto-start+ #x2)

(defconstant +dbus-major-version+ 1)

;;; EOF
Something went wrong with that request. Please try again.