|
Server IP : 111.118.215.189 / Your IP : 18.188.23.45 Web Server : Apache System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 User : a1673wkz ( 2475) PHP Version : 8.2.25 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON Directory (0755) : /usr/share/emacs/24.3/lisp/net/ |
| [ Home ] | [ C0mmand ] | [ Upload File ] |
|---|
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:10:32 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/net/hmac-md5.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\300\302!\207" [require hex-util md5] 2) #@42 Return the MD5 of STRING in binary form. (defalias 'md5-binary #[(string) "\301\302\303\217\203 \304\305\301\211\306$!\207\304\305!!\207" [string nil (byte-code "\300\301\302\211\303$\207" [md5 "" nil binary] 5) ((wrong-number-of-arguments)) decode-hex-string md5 binary] 6 (#$ . 621)]) #@38 Compute HMAC-MD5 over TEXT with KEY. (defalias 'hmac-md5 #[(text key) "\306\307\310\"\306\307\311\"G\312 \313\216\n\307V\203 \314!\315 \nW\203> \f \316 H\310\"I\210 \316 H\311\"I\210 T\211\202 \317\216\f P)\320\216\314\f!)\321\216 \fP)\322\216\314 !)\211\260-\207" [key pos len key-xor-opad key-xor-ipad text make-string 64 54 92 0 ((byte-code "\302\303\"\210\302 \303\"\207" [key-xor-ipad key-xor-opad fillarray 0] 3)) md5-binary 16 logxor ((fillarray key-xor-ipad 0)) ((fillarray key-xor-ipad 0)) ((fillarray key-xor-opad 0)) ((fillarray key-xor-opad 0))] 6 (#$ . 917)]) #@41 Compute HMAC-MD5-96 over TEXT with KEY. (defalias 'hmac-md5-96 #[(text key) "\306\307\310\"\306\307\311\"G\312 \313\216\n\307V\203 \314!\315 \nW\203> \f \316 H\310\"I\210 \316 H\311\"I\210 T\211\202 \317\216\f P)\320\216\314\f!)\321\216 \fP)\322\216\314 !)\211\312\323O-\207" [key pos len key-xor-opad key-xor-ipad text make-string 64 54 92 0 ((byte-code "\302\303\"\210\302 \303\"\207" [key-xor-ipad key-xor-opad fillarray 0] 3)) md5-binary 16 logxor ((fillarray key-xor-ipad 0)) ((fillarray key-xor-ipad 0)) ((fillarray key-xor-opad 0)) ((fillarray key-xor-opad 0)) 12] 6 (#$ . 1515)]) (provide 'hmac-md5)