Function: ntlm-smb-owf-encrypt

ntlm-smb-owf-encrypt is a byte-compiled function defined in ntlm.el.gz.

Signature

(ntlm-smb-owf-encrypt PASSWD C8)

Documentation

Return response string of 24 bytes long for PASSWD based on DES encryption.

PASSWD is of at most 14 bytes long and the challenge string C8 of
8 bytes long.

Source Code

;; Defined in /usr/src/emacs/lisp/net/ntlm.el.gz
(defun ntlm-smb-owf-encrypt (passwd c8)
  "Return response string of 24 bytes long for PASSWD based on DES encryption.
PASSWD is of at most 14 bytes long and the challenge string C8 of
8 bytes long."
  (let* ((len (min (length passwd) 16))
         (p22 (concat (substring passwd 0 len) ;Fill top 16 bytes with passwd.
		      (make-string (- 22 len) 0))))
    (ntlm-smb-des-e-p24 p22 c8)))