;ELC
;;; Compiled by LTX@Xue-LingTaos-MacBook-Pro.local on Wed Mar 16 23:16:20 2011
;;; from file /Users/LTX/Projects/Emacs/emacs/lisp/net/sasl-ntlm.el
;;; in Emacs version 24.0.50.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\300\302!\207" [require sasl ntlm] 2)
#@119 A list of functions to be called in sequence for the NTLM
authentication steps.  They are called by `sasl-next-step'.
(defconst sasl-ntlm-steps '(ignore sasl-ntlm-request sasl-ntlm-response) (#$ . 611))
#@260 SASL step function to generate a NTLM authentication request to the server.
Called from `sasl-next-step'.
CLIENT is a vector [mechanism user service server sasl-client-properties]
STEP is a vector [<previous step function> <result of previous step function>]
(defalias 'sasl-ntlm-request #[(client step) "\302!\303	!)\207" [client user sasl-client-name ntlm-build-auth-request] 2 (#$ . 821)])
#@143 SASL step function to generate a NTLM response against the server
challenge stored in the 2nd element of STEP.  Called from `sasl-next-step'.
(defalias 'sasl-ntlm-response #[(client step) "\305!\306\307\310	\"!\311!\312\f	\313\n!#+\207" [client user passphrase step challenge sasl-client-name sasl-read-passphrase format "NTLM passphrase for %s: " sasl-step-data ntlm-build-auth-response ntlm-get-password-hashes] 5 (#$ . 1223)])
(byte-code "\301\302\303\304\305\"#\210\306\302!\207" [sasl-ntlm-steps put sasl-ntlm sasl-mechanism sasl-make-mechanism "NTLM" provide] 6)
