| Current Path : /usr/share/emacs/24.3/lisp/gnus/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/gnus/gssapi.elc |
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:10:12 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/gnus/gssapi.el
;;; in Emacs version 24.3.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\302\303\304\305\306\307\310\311\312\313& \207" [require format-spec custom-declare-variable gssapi-program (list (concat "gsasl %s %p " "--mechanism GSSAPI " "--authentication-id %l") "imtest -m gssapi -u %l -p %p %s") "List of strings containing commands for GSSAPI (krb5) authentication.\n%s is replaced with server hostname, %p with port to connect to,\nand %l with the user name. The program should accept commands on\nstdin and return responses to stdout. Each entry in the list is\ntried until a successful connection is made." :version "24.1" :group network :type (repeat string)] 10)
(defalias 'open-gssapi-stream #[(name buffer server port user) "\306\211r\fq\210 \204\336 \211A@\211\203\336 \307\310\n\"\210\311 \210\312\211 '\313(\f)*\314\n\315\316+\317\320,!\321-&\"% .\306 /.\203\332 \322.!\323>\203\261 eb\203\261 \324\325!\203c \306y\210\202W \324\326!\203o \306y\210\202c \324\327!\203{ \306y\210\202o \324\330!\203\204 \331u\210\324\332!\203\215 \306y\210\324\333!\203\244 \334\335\306\336#\203\244 \337\340!\211/\204\261 \341.\340\"\210\342\340!\210\202I \311 \210\307\343/\206\274 \344\"\210/\203\325 \306 0\345\344/\")\204\325 .\202\332 \346.!\210,\202\n ,\207" [gssapi-program done cmd cmds buffer coding-system-for-read nil message "Opening GSSAPI connection with `%s'..." erase-buffer binary start-process format-spec format-spec-make 115 112 number-to-string 108 process-status (open run) looking-at "^verify error:num=" "^TLS connection established" "^C:" "S: " 3 "Trying " "\\* \\(OK\\|PREAUTH\\|BYE\\) " re-search-forward "^\\(\\(Authenticat.*\\)\\|\\(Client authentication finished.*\\)\\)" t match-string 1 accept-process-output sit-for "GSSAPI connection: %s" "failed" string-match delete-process coding-system-for-write name shell-file-name shell-command-switch server port user process response case-fold-search] 15])
(provide 'gssapi)