Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
23.1 /
lisp /
url /
[ HOME SHELL ]
Name
Size
Permission
Action
url-about.elc
2.7
KB
-rw-r--r--
url-auth.elc
10.21
KB
-rw-r--r--
url-cache.elc
5.79
KB
-rw-r--r--
url-cid.elc
1.44
KB
-rw-r--r--
url-cookie.elc
15.75
KB
-rw-r--r--
url-dav.elc
21.04
KB
-rw-r--r--
url-dired.elc
2.98
KB
-rw-r--r--
url-expand.elc
4.48
KB
-rw-r--r--
url-file.elc
7.68
KB
-rw-r--r--
url-ftp.elc
979
B
-rw-r--r--
url-gw.elc
7.17
KB
-rw-r--r--
url-handlers.elc
15.91
KB
-rw-r--r--
url-history.elc
5.29
KB
-rw-r--r--
url-http.elc
32.76
KB
-rw-r--r--
url-imap.elc
2.32
KB
-rw-r--r--
url-irc.elc
2.88
KB
-rw-r--r--
url-ldap.elc
6.4
KB
-rw-r--r--
url-mailto.elc
3.19
KB
-rw-r--r--
url-methods.elc
4.47
KB
-rw-r--r--
url-misc.elc
3.43
KB
-rw-r--r--
url-news.elc
7.51
KB
-rw-r--r--
url-nfs.elc
4.47
KB
-rw-r--r--
url-ns.elc
2.36
KB
-rw-r--r--
url-parse.elc
14.35
KB
-rw-r--r--
url-privacy.elc
1.88
KB
-rw-r--r--
url-proxy.elc
1.84
KB
-rw-r--r--
url-util.elc
12.18
KB
-rw-r--r--
url-vars.elc
13.65
KB
-rw-r--r--
url.elc
7.69
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : url-parse.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:05:25 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/url/url-parse.el ;;; in Emacs version 23.1.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`url-parse.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\"\210\305\306\307\310#\210\306\311N\204 \305\306\311\312#\210\300\207" [require url-vars autoload url-scheme-get-property "url-methods" put url-type cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-type (or (and (memq (aref cl-x 0) cl-struct-url-tags)) (error "url-type accessing a non-url")) (aref cl-x 1)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-type #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-type accessing a non-url" 1] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-type setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-type #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 1] 6] url-user cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-user (or #1# (error "url-user accessing a non-url")) (aref cl-x 2)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-user #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-user accessing a non-url" 2] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-user setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-user #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 2] 6] url-password cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-password (or #1# (error "url-password accessing a non-url")) (aref cl-x 3)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-password #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-password accessing a non-url" 3] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-password setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-password #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 3] 6] url-host cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-host (or #1# (error "url-host accessing a non-url")) (aref cl-x 4)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-host #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-host accessing a non-url" 4] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-host setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-host #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 4] 6] url-portspec cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-portspec (or #1# (error "url-portspec accessing a non-url")) (aref cl-x 5)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-portspec #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-portspec accessing a non-url" 5] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-portspec setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-portspec #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 5] 6] url-filename cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-filename (or #1# (error "url-filename accessing a non-url")) (aref cl-x 6)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-filename #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-filename accessing a non-url" 6] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-filename setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-filename #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 6] 6] url-target cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-target (or #1# (error "url-target accessing a non-url")) (aref cl-x 7)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-target #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-target accessing a non-url" 7] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-target setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-target #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 7] 6] url-attributes cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-attributes (or #1# (error "url-attributes accessing a non-url")) (aref cl-x 8)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-attributes #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-attributes accessing a non-url" 8] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-attributes setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-attributes #1=(and (memq (aref cl-x 0) cl-struct-url-tags)) 8] 6] url-fullness cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-fullness (or #1# (error "url-fullness accessing a non-url")) (aref cl-x 9)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-fullness #[(cl-x) "\302H >\204\f \303\304!\210\305H\207" [cl-x cl-struct-url-tags 0 error "url-fullness accessing a non-url" 9] 2]) (byte-code "\300\301\302\303#\210\300\304\305\306#\210\304\307N\204 \300\304\307\310#\210\300\207" [put url-fullness setf-method #[(cl-x) "\301\302\303\304\305%\207" [cl-x cl-struct-setf-expander url url-fullness (and #1=(memq (aref cl-x 0) cl-struct-url-tags)) 9] 6] url-p cl-compiler-macro #[(--cl-whole-arg-- cl-x) "\301\302\303\304\211\211&\207" [cl-x cl-defsubst-expand (cl-x) (block url-p (and (vectorp cl-x) (>= (length cl-x) 10) #1# t)) nil] 7] byte-compile cl-byte-compile-compiler-macro] 4) (defalias 'url-p #[(cl-x) "\302!\205 G\303Y\205 \304H >\205 \305\207" [cl-x cl-struct-url-tags vectorp 10 0 t] 2]) (byte-code "\300\301\302\303#\210\301\304N\204 \300\301\304\305#\210\300\207" [put url-parse-make-urlobj cl-compiler-macro #[(--cl-whole-arg-- &rest #1=#:--cl-rest--) "\211A@\211A@\211A@\211A@ \211A@ \211A@ \211A@ \211A@ \211A@ \203H \306\307\310\311G\\D\"\210\312\313\314\315\316\211 \n \f &. \207" [#1# type user password host portspec signal wrong-number-of-arguments url-parse-make-urlobj 10 cl-defsubst-expand (type user password host portspec filename target attributes fullness) (block url-parse-make-urlobj (vector 'cl-struct-url type user password host portspec filename target attributes fullness)) t nil filename target attributes fullness] 15 "Not documented\n\n(fn --CL-WHOLE-ARG-- &cl-quote &optional TYPE USER PASSWORD HOST PORTSPEC FILENAME TARGET ATTRIBUTES FULLNESS)"] byte-compile cl-byte-compile-compiler-macro] 4) #@101 Not documented (fn &optional TYPE USER PASSWORD HOST PORTSPEC FILENAME TARGET ATTRIBUTES FULLNESS) (defalias 'url-parse-make-urlobj #[(&rest #1=#:--cl-rest--) "\211A@\211A@\211A@\211A@ \211A@ \211A@ \f\211A@ \211A@ \211A@ \203H \306\307\310\311G\\D\"\210\312\313 \n \f \f &\n. \207" [#1# type user password host portspec signal wrong-number-of-arguments url-parse-make-urlobj 9 vector cl-struct-url filename target attributes fullness] 11 (#$ . 8144)]) (byte-code "\302B\303C\304\305\306\307#\210\304\305\310\311#\210\304\305\312\313#\210\304\305\314\315#\210\304\316\317\315#\210\304\320\317\321#\210\304\322\317\315#\210\304\323\317\315#\210\304\324\317\315#\210\304\325\317\315#\210\304\326\317\315#\210\304\327\317\315#\210\304\330\317\315#\210\304\331\317\315#\210\304\332\317\315#\207" [custom-print-functions cl-struct-url-tags #[(cl-x cl-s cl-n) "\303!\205\370 G\304Y\205\370 \305H >\205\370 \306\307\n\"\210\306\310\n\"\210\311\305H >\204, \312\313!\210\314H\n\"\210\306\315\n\"\210\311\305H >\204D \312\316!\210\317H\n\"\210\306\320\n\"\210\311\305H >\204\\ \312\321!\210\322H\n\"\210\306\323\n\"\210\311\305H >\204t \312\324!\210\325H\n\"\210\306\326\n\"\210\311\305H >\204\214 \312\327!\210\330H\n\"\210\306\331\n\"\210\311\305H >\204\244 \312\332!\210\333H\n\"\210\306\334\n\"\210\311\305H >\204\274 \312\335!\210\336H\n\"\210\306\337\n\"\210\311\305H >\204\324 \312\340!\210\341H\n\"\210\306\342\n\"\210\311\305H >\204\354 \312\343!\210\344H\n\"\210\306\345\n\"\210\346\207" [cl-x cl-struct-url-tags cl-s vectorp 10 0 princ "#S(url" " type" prin1 error "url-type accessing a non-url" 1 " user" "url-user accessing a non-url" 2 " password" "url-password accessing a non-url" 3 " host" "url-host accessing a non-url" 4 " portspec" "url-portspec accessing a non-url" 5 " filename" "url-filename accessing a non-url" 6 " target" "url-target accessing a non-url" 7 " attributes" "url-attributes accessing a non-url" 8 " fullness" "url-fullness accessing a non-url" 9 ")" t] 3] cl-struct-url put url cl-struct-slots ((cl-tag-slot) (type) (user) (password) (host) (portspec) (filename) (target) (attributes) (fullness)) cl-struct-type (vector nil) cl-struct-include nil cl-struct-print t url-parse-make-urlobj side-effect-free url-p error-free url-fullness url-attributes url-target url-filename url-portspec url-host url-password url-user url-type] 4) (defalias 'url-port #[(urlobj) "\302H >\204\f \303\304!\210\305H\2066 \302H >\204 \303\306!\210\307H\2056 \310\302H >\2041 \303\311!\210\312H\313\"\207" [urlobj cl-struct-url-tags 0 error "url-portspec accessing a non-url" 5 "url-fullness accessing a non-url" 9 url-scheme-get-property "url-type accessing a non-url" 1 default-port] 3]) (byte-code "\300\301\302\303#\210\300\301\304\305#\207" [put url-port byte-optimizer byte-compile-inline-expand setf-method #[(urlobj) "\304\305!\304\306!C\nC C \307\310\nD E*\311D\257*\207" [--urlobj--temp-- --port--temp-- urlobj port make-symbol "--cl-urlobj--" "--cl-port--" setf url-portspec url-port] 6]] 4) #@47 Recreate a URL string from the parsed URLOBJ. (defalias 'url-recreate-url #[(urlobj) "\302H >\204\f \303\304!\210\305H\306\302H >\204 \303\307!\210\310H\203& \311\202' \312\302H >\2043 \303\313!\210\314H\205m \302H >\204E \303\313!\210\314H\302H >\204T \303\315!\210\316H\205k \306\302H >\204g \303\315!\210\316HP\317Q\302H >\204y \303\307!\210\310H\211\302H >\204\212 \303\320!\210\321H\206\264 \302H >\204\234 \303\322!\210\323H\205\264 \324\302H >\204\257 \303\304!\210\305H\325\")\205D\211\302H >\204\306 \303\320!\210\321H\206\360 \302H >\204\330 \303\322!\210\323H\205\360 \324\302H >\204\353 \303\304!\210\305H\325\")\324\302H >\204\376 \303\304!\210\305H\325\"\232?\205D\326\327\211\302H >\204\303\320!\210\321H\206B\302H >\204*\303\322!\210\323H\205B\324\302H >\204=\303\304!\210\305H\325\")\"\302H >\204P\303\330!\210\331H\206W\332\333!\302H >\204f\303\334!\210\335H\205}\336\302H >\204y\303\334!\210\335HP\260 \207" [urlobj cl-struct-url-tags 0 error "url-type accessing a non-url" 1 ":" "url-host accessing a non-url" 4 "//" "" "url-user accessing a non-url" 2 "url-password accessing a non-url" 3 "@" "url-portspec accessing a non-url" 5 "url-fullness accessing a non-url" 9 url-scheme-get-property default-port format ":%d" "url-filename accessing a non-url" 6 "/" url-recreate-url-attributes "url-target accessing a non-url" 7 "#"] 12 (#$ . 11232)]) #@66 Recreate the attributes of an URL string from the parsed URLOBJ. (defalias 'url-recreate-url-attributes #[(urlobj) "\302H >\204\f \303\304!\210\305H\205' \306\307\310\302H >\204! \303\304!\210\305H\306#P\207" [urlobj cl-struct-url-tags 0 error "url-attributes accessing a non-url" 8 ";" mapconcat #[(x) "A\203\f @\301AQ\207@\207" [x "="] 3]] 5 (#$ . 12661)]) #@164 Return an URL-struct of the parts of URL. The CL-style struct contains the following fields: TYPE USER PASSWORD HOST PORTSPEC FILENAME TARGET ATTRIBUTES FULLNESS. (defalias 'url-generic-parse-url #[(url) "\204 \306\307\310\211\211\211\211\211\211\211\211&\n\207\311 \"\203! \312!\313U\203/ \306\307\310\211\211\211\211\310\211\211&\n\207\314\315!r\nq\210\316\216\317 !\210\310\211\211\211\211\211\211\211\211\211\320 * + , - . / 0 1 2\321 \210c\210eb\210`2\322\323!\204\205 \324\310w\210\3252`\"\2102`{1\326\310w\210`2\322\323!\203 \320\327u\210`2\330\310w\2102`{.\311\331.\"\203\264 \332\333.\"0.\334\225\310O.0\203\317 \311\3350\"\203\317 \332\3270\"/\332\3330\"0\311\336.\"\203\350 \337\332\333.\"!-.\334\211\224O.\311\340.\"\203\370 .\334\211\224O..\227.`2-\204\f\3411\342\"-`21\343\230\203 db\210\202I\344\310w\210m\2041`\345\310w\210`d{+d|\2102b\210\346\310w\210m\204I\347`d{\320\"\211*\237*2`{,.\203b\311\350.\"\203b\351.!.\306\30710/.-,+* &\n.\207" [url url-nonrelative-link #1=#:temp-buffer url-parse-syntax-table inhibit-read-only full vector cl-struct-url nil string-match string-to-char 47 generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) set-syntax-table t erase-buffer looking-at "//" "a-zA-Z+.\\-" downcase-region ":" 2 "^/" "^\\([^@]+\\)@" match-string 1 0 "\\([^:]+\\):\\(.*\\)" ":\\([0-9+]+\\)" string-to-number ":$" url-scheme-get-property default-port "data" "^#" "#" "^;" url-parse-args "%[0-9][0-9]" url-unhex-string attr refs file port host pass user prot save-pos] 12 (#$ . 13035)]) (provide 'url-parse)
Close
