Function: zeroconf-service-resolver-handler
zeroconf-service-resolver-handler is a byte-compiled function defined
in zeroconf.el.gz.
Signature
(zeroconf-service-resolver-handler &rest VAL)
Documentation
Registered service resolver handler at the Avahi daemon.
Source Code
;; Defined in /usr/src/emacs/lisp/net/zeroconf.el.gz
(defun zeroconf-service-resolver-handler (&rest val)
"Registered service resolver handler at the Avahi daemon."
;; Parameters: (interface protocol name type domain host aprotocol
;; address port txt flags)
;; The "TXT" field has the signature "aay". Transform to "as".
(let ((elt (nth 9 val)))
(while elt
(setcar elt (dbus-byte-array-to-string (car elt)))
(setq elt (cdr elt))))
(when zeroconf-debug
(message "zeroconf-service-resolver-handler: %s %S"
(dbus-event-member-name last-input-event) val))
(cond
;; A new service has been detected. Add it to
;; `zeroconf-resolved-services-hash'.
((string-equal (dbus-event-member-name last-input-event) "Found")
(puthash
(concat (zeroconf-service-name val) "/" (zeroconf-service-type val))
val zeroconf-resolved-services-hash))))