Created
February 8, 2012 12:51
-
-
Save jollm/1769130 to your computer and use it in GitHub Desktop.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(loop | |
(with-open-bus (bus (session-server-addresses)) | |
(with-introspected-object (notify bus "/org/freedesktop/Notifications" "org.freedesktop.Notifications") | |
(notify "org.freedesktop.DBus.Introspectable" "Introspect") | |
(notify "org.freedesktop.Notifications" "GetCapabilities") | |
(notify "org.freedesktop.Notifications" "GetServerInformation")) | |
(format t ".")) | |
(iolib.syscalls:usleep 500000)) | |
;; this hung after about 10 minutes, code executing should reflect what's in death/dbus | |
;; The pattern is that it always fails waiting on "Introspect", complete data is in input buffer | |
;; still seems suspicious that it's always the same dbus message | |
;; Backtrace: | |
;; 0: ("bogus stack frame") | |
;; 1: (IOLIB.MULTIPLEX::DISPATCH-FD-EVENTS-ONCE #<event base, 1 FDs monitored, using: #<epoll(4) multiplexer> {1003353B73}> NIL 32171.51377643d0) | |
;; Locals: | |
;; SB-DEBUG::ARG-0 = #<event base, 1 FDs monitored, using: #<epoll(4) multiplexer> {1003353B73}> | |
;; SB-DEBUG::ARG-1 = NIL | |
;; SB-DEBUG::ARG-2 = 32171.51377643d0 | |
;; 2: ((SB-PCL::FAST-METHOD IOLIB.MULTIPLEX:EVENT-DISPATCH (IOLIB.MULTIPLEX:EVENT-BASE)) ..) | |
;; Locals: | |
;; IOLIB.MULTIPLEX:EVENT-BASE = #<event base, 1 FDs monitored, using: #<epoll(4) multiplexer> {1003353B73}> | |
;; #:MAX-STEP-DEFAULTING-TEMP = NIL | |
;; #:MIN-STEP-DEFAULTING-TEMP = NIL | |
;; #:N-SUPPLIED-945 = NIL | |
;; #:N-SUPPLIED-946 = NIL | |
;; #:ONE-SHOT-DEFAULTING-TEMP = T | |
;; 3: ((SB-PCL::EMF IOLIB.MULTIPLEX:EVENT-DISPATCH) #<unused argument> #<unused argument> #<event base, 1 FDs monitored, using: #<epoll(4) multiplexer> {1003353B73}> :ONE-SHOT T) | |
;; Locals: | |
;; SB-PCL::.ARG0. = #<event base, 1 FDs monitored, using: #<epoll(4) multiplexer> {1003353B73}> | |
;; SB-PCL::.DFUN-MORE-CONTEXT. = 70368647343116 | |
;; SB-PCL::.DFUN-MORE-COUNT. = 2 | |
;; SB-DEBUG::MORE = (:ONE-SHOT T) | |
;; 4: ((SB-PCL::FAST-METHOD DBUS::WAIT-FOR-INCOMING-MESSAGE (STANDARD-CONNECTION T)) #<unused argument> #<unused argument> #<UNIX-CONNECTION {1003355DD3}> (ERROR-MESSAGE METHOD-RETURN-MESSAGE) 2) | |
;; Locals: | |
;; CONNECTION = #<UNIX-CONNECTION {1003355DD3}> | |
;; DBUS::MESSAGE-TYPES = (ERROR-MESSAGE METHOD-RETURN-MESSAGE) | |
;; DBUS::SERIAL = 2 | |
;; 5: ((SB-PCL::FAST-METHOD WAIT-FOR-REPLY (T STANDARD-CONNECTION)) #<unavailable argument> #<unavailable argument> 2 #<UNIX-CONNECTION {1003355DD3}>) | |
;; Locals: | |
;; SB-DEBUG::ARG-0 = :<NOT-AVAILABLE> | |
;; SB-DEBUG::ARG-1 = :<NOT-AVAILABLE> | |
;; SB-DEBUG::ARG-2 = 2 | |
;; SB-DEBUG::ARG-3 = #<UNIX-CONNECTION {1003355DD3}> | |
;; 6: (INVOKE-METHOD ..) | |
;; Locals: | |
;; #:ARGUMENTS-DEFAULTING-TEMP = NIL | |
;; #:ASYNCHRONOUS-DEFAULTING-TEMP = NIL | |
;; CONNECTION = #<UNIX-CONNECTION {1003355DD3}> | |
;; #:DESTINATION-DEFAULTING-TEMP = "org.freedesktop.Notifications" | |
;; #:ENDIANNESS-DEFAULTING-TEMP = :LITTLE-ENDIAN | |
;; #:INTERFACE-DEFAULTING-TEMP = "org.freedesktop.DBus.Introspectable" | |
;; MEMBER = "Introspect" | |
;; #:NO-AUTO-START-DEFAULTING-TEMP = NIL | |
;; #:NO-REPLY-DEFAULTING-TEMP = NIL | |
;; #:PATH-DEFAULTING-TEMP = "/org/freedesktop/Notifications" | |
;; #:SIGNATURE-DEFAULTING-TEMP = NIL |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment