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 /
[ HOME SHELL ]
Name
Size
Permission
Action
calc
[ DIR ]
drwxr-xr-x
calendar
[ DIR ]
drwxr-xr-x
emacs-lisp
[ DIR ]
drwxr-xr-x
emulation
[ DIR ]
drwxr-xr-x
erc
[ DIR ]
drwxr-xr-x
eshell
[ DIR ]
drwxr-xr-x
gnus
[ DIR ]
drwxr-xr-x
international
[ DIR ]
drwxr-xr-x
language
[ DIR ]
drwxr-xr-x
mail
[ DIR ]
drwxr-xr-x
mh-e
[ DIR ]
drwxr-xr-x
net
[ DIR ]
drwxr-xr-x
nxml
[ DIR ]
drwxr-xr-x
obsolete
[ DIR ]
drwxr-xr-x
org
[ DIR ]
drwxr-xr-x
play
[ DIR ]
drwxr-xr-x
progmodes
[ DIR ]
drwxr-xr-x
term
[ DIR ]
drwxr-xr-x
textmodes
[ DIR ]
drwxr-xr-x
url
[ DIR ]
drwxr-xr-x
COPYING
34.32
KB
-rw-r--r--
README
538
B
-rw-r--r--
abbrev.elc
29.69
KB
-rw-r--r--
abbrevlist.elc
1.12
KB
-rw-r--r--
add-log.elc
35.21
KB
-rw-r--r--
align.elc
38.38
KB
-rw-r--r--
allout.elc
208.3
KB
-rw-r--r--
ansi-color.elc
16.3
KB
-rw-r--r--
apropos.elc
31.93
KB
-rw-r--r--
arc-mode.elc
54.72
KB
-rw-r--r--
array.elc
25.83
KB
-rw-r--r--
autoarg.elc
5.98
KB
-rw-r--r--
autoinsert.elc
12.01
KB
-rw-r--r--
autorevert.elc
18.25
KB
-rw-r--r--
avoid.elc
10.17
KB
-rw-r--r--
battery.elc
17.98
KB
-rw-r--r--
bindings.elc
39.04
KB
-rw-r--r--
bookmark.elc
55.9
KB
-rw-r--r--
bs.elc
48.34
KB
-rw-r--r--
buff-menu.elc
28
KB
-rw-r--r--
button.elc
13.92
KB
-rw-r--r--
calculator.elc
49.18
KB
-rw-r--r--
case-table.elc
4.42
KB
-rw-r--r--
cdl.elc
1.26
KB
-rw-r--r--
chistory.elc
5.75
KB
-rw-r--r--
cmuscheme.elc
17.43
KB
-rw-r--r--
comint.elc
100.97
KB
-rw-r--r--
compare-w.elc
10.98
KB
-rw-r--r--
complete.elc
23.62
KB
-rw-r--r--
completion.elc
45.06
KB
-rw-r--r--
composite.elc
29.39
KB
-rw-r--r--
cus-dep.elc
5.04
KB
-rw-r--r--
cus-edit.elc
129.67
KB
-rw-r--r--
cus-face.elc
10.46
KB
-rw-r--r--
cus-load.el
63.45
KB
-rw-r--r--
cus-start.elc
10.67
KB
-rw-r--r--
cus-theme.elc
13.7
KB
-rw-r--r--
custom.elc
36.46
KB
-rw-r--r--
cvs-status.elc
23
KB
-rw-r--r--
dabbrev.elc
23.08
KB
-rw-r--r--
delim-col.elc
8.41
KB
-rw-r--r--
delsel.elc
5.24
KB
-rw-r--r--
descr-text.elc
20.69
KB
-rw-r--r--
desktop.elc
34.52
KB
-rw-r--r--
dframe.elc
22.51
KB
-rw-r--r--
diff-mode.elc
55.58
KB
-rw-r--r--
diff.elc
5.51
KB
-rw-r--r--
dired-aux.elc
67.5
KB
-rw-r--r--
dired-x.elc
44.96
KB
-rw-r--r--
dired.elc
96.48
KB
-rw-r--r--
dirtrack.elc
7.39
KB
-rw-r--r--
disp-table.elc
8.33
KB
-rw-r--r--
dnd.elc
7.04
KB
-rw-r--r--
doc-view.elc
36.01
KB
-rw-r--r--
dos-fns.elc
5.53
KB
-rw-r--r--
dos-vars.elc
1.24
KB
-rw-r--r--
dos-w32.elc
11.12
KB
-rw-r--r--
double.elc
4.13
KB
-rw-r--r--
ebuff-menu.elc
9.11
KB
-rw-r--r--
echistory.elc
4.93
KB
-rw-r--r--
ediff-diff.elc
35.54
KB
-rw-r--r--
ediff-help.elc
11.47
KB
-rw-r--r--
ediff-hook.elc
5.89
KB
-rw-r--r--
ediff-init.elc
60.88
KB
-rw-r--r--
ediff-merg.elc
10.04
KB
-rw-r--r--
ediff-mult.elc
58.31
KB
-rw-r--r--
ediff-ptch.elc
18.63
KB
-rw-r--r--
ediff-util.elc
118.44
KB
-rw-r--r--
ediff-vers.elc
4.74
KB
-rw-r--r--
ediff-wind.elc
30.56
KB
-rw-r--r--
ediff.elc
36.28
KB
-rw-r--r--
edmacro.elc
21.45
KB
-rw-r--r--
ehelp.elc
11.03
KB
-rw-r--r--
electric.elc
2.81
KB
-rw-r--r--
elide-head.elc
2.8
KB
-rw-r--r--
emacs-lock.elc
2.77
KB
-rw-r--r--
emerge.elc
80.16
KB
-rw-r--r--
env.elc
5.69
KB
-rw-r--r--
epa-dired.elc
1.87
KB
-rw-r--r--
epa-file.elc
6.77
KB
-rw-r--r--
epa-hook.elc
4.28
KB
-rw-r--r--
epa-mail.elc
7.04
KB
-rw-r--r--
epa.elc
34.03
KB
-rw-r--r--
epg-config.elc
4.01
KB
-rw-r--r--
epg.elc
85.05
KB
-rw-r--r--
expand.elc
9.42
KB
-rw-r--r--
ezimage.elc
9.2
KB
-rw-r--r--
face-remap.elc
13.15
KB
-rw-r--r--
facemenu.elc
23.61
KB
-rw-r--r--
faces.elc
81.51
KB
-rw-r--r--
ffap.elc
46.14
KB
-rw-r--r--
filecache.elc
16.1
KB
-rw-r--r--
files.elc
175.25
KB
-rw-r--r--
filesets.elc
73.03
KB
-rw-r--r--
find-cmd.elc
4.94
KB
-rw-r--r--
find-dired.elc
7.4
KB
-rw-r--r--
find-file.elc
18.68
KB
-rw-r--r--
find-lisp.elc
7.42
KB
-rw-r--r--
finder-inf.el
93.47
KB
-rw-r--r--
finder.elc
12.11
KB
-rw-r--r--
flow-ctrl.elc
2.44
KB
-rw-r--r--
foldout.elc
7.6
KB
-rw-r--r--
follow.elc
37.11
KB
-rw-r--r--
font-core.elc
12.92
KB
-rw-r--r--
font-lock.elc
61.1
KB
-rw-r--r--
format-spec.elc
1.98
KB
-rw-r--r--
format.elc
27.73
KB
-rw-r--r--
forms-d2.el
3.13
KB
-rw-r--r--
forms-pass.el
742
B
-rw-r--r--
forms.elc
35.13
KB
-rw-r--r--
frame.elc
48.66
KB
-rw-r--r--
fringe.elc
8.01
KB
-rw-r--r--
generic-x.elc
44.25
KB
-rw-r--r--
gs.elc
3.93
KB
-rw-r--r--
help-at-pt.elc
11.27
KB
-rw-r--r--
help-fns.elc
21.77
KB
-rw-r--r--
help-macro.elc
4.37
KB
-rw-r--r--
help-mode.elc
19.38
KB
-rw-r--r--
help.elc
40.91
KB
-rw-r--r--
hex-util.elc
1.48
KB
-rw-r--r--
hexl.elc
32.06
KB
-rw-r--r--
hi-lock.elc
23.27
KB
-rw-r--r--
hilit-chg.elc
28.02
KB
-rw-r--r--
hippie-exp.elc
23.39
KB
-rw-r--r--
hl-line.elc
7.71
KB
-rw-r--r--
ibuf-ext.elc
54.62
KB
-rw-r--r--
ibuf-macs.elc
11.65
KB
-rw-r--r--
ibuffer.elc
91.96
KB
-rw-r--r--
icomplete.elc
10.36
KB
-rw-r--r--
ido.elc
110.93
KB
-rw-r--r--
ielm.elc
17.67
KB
-rw-r--r--
iimage.elc
4.06
KB
-rw-r--r--
image-dired.elc
82.24
KB
-rw-r--r--
image-file.elc
6.11
KB
-rw-r--r--
image-mode.elc
14.54
KB
-rw-r--r--
image.elc
17.09
KB
-rw-r--r--
imenu.elc
24.8
KB
-rw-r--r--
indent.elc
17
KB
-rw-r--r--
info-look.elc
26.13
KB
-rw-r--r--
info-xref.elc
7.04
KB
-rw-r--r--
info.elc
119.11
KB
-rw-r--r--
informat.elc
9.69
KB
-rw-r--r--
isearch.elc
76.23
KB
-rw-r--r--
isearchb.elc
4.92
KB
-rw-r--r--
iswitchb.elc
32.11
KB
-rw-r--r--
jit-lock.elc
17.93
KB
-rw-r--r--
jka-cmpr-hook.elc
11.67
KB
-rw-r--r--
jka-compr.elc
12.64
KB
-rw-r--r--
json.elc
13.04
KB
-rw-r--r--
kermit.elc
2.96
KB
-rw-r--r--
kmacro.elc
31.07
KB
-rw-r--r--
ldefs-boot.el
1.17
MB
-rw-r--r--
ledit.elc
4.74
KB
-rw-r--r--
linum.elc
9.56
KB
-rw-r--r--
loaddefs.el
1.17
MB
-rw-r--r--
loadhist.elc
8.65
KB
-rw-r--r--
loadup.el
12.67
KB
-rw-r--r--
locate.elc
17.81
KB
-rw-r--r--
log-edit.elc
24.93
KB
-rw-r--r--
log-view.elc
14.06
KB
-rw-r--r--
longlines.elc
14.94
KB
-rw-r--r--
lpr.elc
8.61
KB
-rw-r--r--
ls-lisp.elc
17.35
KB
-rw-r--r--
macros.elc
6.99
KB
-rw-r--r--
makesum.elc
2.16
KB
-rw-r--r--
man.elc
40.03
KB
-rw-r--r--
master.elc
4.52
KB
-rw-r--r--
mb-depth.elc
3.12
KB
-rw-r--r--
md4.elc
8.14
KB
-rw-r--r--
menu-bar.elc
67.01
KB
-rw-r--r--
midnight.elc
8.92
KB
-rw-r--r--
minibuf-eldef.elc
5.15
KB
-rw-r--r--
minibuffer.elc
42.75
KB
-rw-r--r--
misc.elc
3.67
KB
-rw-r--r--
misearch.elc
8.96
KB
-rw-r--r--
mouse-copy.elc
4.07
KB
-rw-r--r--
mouse-drag.elc
7.33
KB
-rw-r--r--
mouse-sel.elc
20.93
KB
-rw-r--r--
mouse.elc
60.03
KB
-rw-r--r--
msb.elc
27.27
KB
-rw-r--r--
mwheel.elc
9.41
KB
-rw-r--r--
newcomment.elc
32.76
KB
-rw-r--r--
novice.elc
4.75
KB
-rw-r--r--
outline.elc
34.54
KB
-rw-r--r--
paren.elc
6.43
KB
-rw-r--r--
password-cache.elc
3.58
KB
-rw-r--r--
patcomp.el
775
B
-rw-r--r--
paths.el
7.28
KB
-rw-r--r--
pcmpl-cvs.elc
6
KB
-rw-r--r--
pcmpl-gnu.elc
8.21
KB
-rw-r--r--
pcmpl-linux.elc
3.17
KB
-rw-r--r--
pcmpl-rpm.elc
7.5
KB
-rw-r--r--
pcmpl-unix.elc
5.44
KB
-rw-r--r--
pcomplete.elc
34.1
KB
-rw-r--r--
pcvs-defs.elc
16.27
KB
-rw-r--r--
pcvs-info.elc
25.83
KB
-rw-r--r--
pcvs-parse.elc
15.34
KB
-rw-r--r--
pcvs-util.elc
26.8
KB
-rw-r--r--
pcvs.elc
85.52
KB
-rw-r--r--
pgg-def.elc
2.78
KB
-rw-r--r--
pgg-gpg.elc
13.09
KB
-rw-r--r--
pgg-parse.elc
13.45
KB
-rw-r--r--
pgg-pgp.elc
7.64
KB
-rw-r--r--
pgg-pgp5.elc
7.68
KB
-rw-r--r--
pgg.elc
18.01
KB
-rw-r--r--
printing.elc
157.56
KB
-rw-r--r--
proced.elc
57.95
KB
-rw-r--r--
ps-bdf.elc
13.34
KB
-rw-r--r--
ps-def.elc
3.09
KB
-rw-r--r--
ps-mule.elc
36.17
KB
-rw-r--r--
ps-print.elc
145.59
KB
-rw-r--r--
ps-samp.elc
5.5
KB
-rw-r--r--
recentf.elc
49.04
KB
-rw-r--r--
rect.elc
10.79
KB
-rw-r--r--
register.elc
10.69
KB
-rw-r--r--
repeat.elc
6.05
KB
-rw-r--r--
replace.elc
55.02
KB
-rw-r--r--
reposition.elc
2.88
KB
-rw-r--r--
reveal.elc
6.61
KB
-rw-r--r--
rfn-eshadow.elc
7.12
KB
-rw-r--r--
rot13.elc
2.6
KB
-rw-r--r--
ruler-mode.elc
22.48
KB
-rw-r--r--
s-region.elc
3.3
KB
-rw-r--r--
savehist.elc
10.57
KB
-rw-r--r--
saveplace.elc
7.51
KB
-rw-r--r--
sb-image.elc
2.51
KB
-rw-r--r--
scroll-all.elc
4.05
KB
-rw-r--r--
scroll-bar.elc
11.47
KB
-rw-r--r--
scroll-lock.elc
4.64
KB
-rw-r--r--
select.elc
11.8
KB
-rw-r--r--
server.elc
39.79
KB
-rw-r--r--
ses.elc
87.39
KB
-rw-r--r--
sha1.elc
8
KB
-rw-r--r--
shadowfile.elc
22.61
KB
-rw-r--r--
shell.elc
34.08
KB
-rw-r--r--
simple.elc
196.35
KB
-rw-r--r--
skeleton.elc
15.78
KB
-rw-r--r--
smerge-mode.elc
33.61
KB
-rw-r--r--
sort.elc
12.94
KB
-rw-r--r--
soundex.elc
1.34
KB
-rw-r--r--
speedbar.elc
115.06
KB
-rw-r--r--
startup.elc
60.78
KB
-rw-r--r--
strokes.elc
44.11
KB
-rw-r--r--
subdirs.el
426
B
-rw-r--r--
subr.elc
113.48
KB
-rw-r--r--
t-mouse.elc
3.38
KB
-rw-r--r--
tabify.elc
2
KB
-rw-r--r--
talk.elc
3.19
KB
-rw-r--r--
tar-mode.elc
52.24
KB
-rw-r--r--
tempo.elc
18.63
KB
-rw-r--r--
term.elc
99.67
KB
-rw-r--r--
terminal.elc
31.36
KB
-rw-r--r--
thingatpt.elc
10.84
KB
-rw-r--r--
thumbs.elc
26.23
KB
-rw-r--r--
time-stamp.elc
21.03
KB
-rw-r--r--
time.elc
18.2
KB
-rw-r--r--
timezone.elc
10.99
KB
-rw-r--r--
tmm.elc
13.9
KB
-rw-r--r--
tool-bar.elc
9.69
KB
-rw-r--r--
tooltip.elc
12.35
KB
-rw-r--r--
tree-widget.elc
20.87
KB
-rw-r--r--
tutorial.elc
21.41
KB
-rw-r--r--
type-break.elc
35.61
KB
-rw-r--r--
uniquify.elc
19.91
KB
-rw-r--r--
userlock.elc
4.69
KB
-rw-r--r--
vc-annotate.elc
22.68
KB
-rw-r--r--
vc-arch.elc
17.58
KB
-rw-r--r--
vc-bzr.elc
26.84
KB
-rw-r--r--
vc-cvs.elc
32.19
KB
-rw-r--r--
vc-dav.elc
5.3
KB
-rw-r--r--
vc-dir.elc
39.5
KB
-rw-r--r--
vc-dispatcher.elc
14.61
KB
-rw-r--r--
vc-git.elc
32.75
KB
-rw-r--r--
vc-hg.elc
25.95
KB
-rw-r--r--
vc-hooks.elc
32.75
KB
-rw-r--r--
vc-mtn.elc
10.95
KB
-rw-r--r--
vc-rcs.elc
34.99
KB
-rw-r--r--
vc-sccs.elc
13.24
KB
-rw-r--r--
vc-svn.elc
20.57
KB
-rw-r--r--
vc.elc
59.4
KB
-rw-r--r--
vcursor.elc
23.44
KB
-rw-r--r--
version.el
3.37
KB
-rw-r--r--
view.elc
35.96
KB
-rw-r--r--
vt-control.elc
2.06
KB
-rw-r--r--
vt100-led.elc
1.53
KB
-rw-r--r--
w32-fns.elc
15.82
KB
-rw-r--r--
w32-vars.elc
5.53
KB
-rw-r--r--
wdired.elc
21.69
KB
-rw-r--r--
whitespace.elc
59.83
KB
-rw-r--r--
wid-browse.elc
7.89
KB
-rw-r--r--
wid-edit.elc
104.76
KB
-rw-r--r--
widget.elc
1.37
KB
-rw-r--r--
windmove.elc
9.57
KB
-rw-r--r--
window.elc
57.4
KB
-rw-r--r--
winner.elc
11.61
KB
-rw-r--r--
woman.elc
107.73
KB
-rw-r--r--
x-dnd.elc
19.35
KB
-rw-r--r--
xml.elc
18.38
KB
-rw-r--r--
xt-mouse.elc
7.43
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : pgg-parse.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:57 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/pgg-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 "`pgg-parse.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (custom-declare-group 'pgg-parse nil "OpenPGP packet parsing." :group 'pgg) #@59 Alist of the assigned number to the public key algorithm. (custom-declare-variable 'pgg-parse-public-key-algorithm-alist ''((1 . RSA) (2 . RSA-E) (3 . RSA-S) (16 . ELG-E) (17 . DSA) (20 . ELG)) '(#$ . 685) :group 'pgg-parse :type '(repeat (cons (sexp :tag "Number") (sexp :tag "Type")))) #@62 Alist of the assigned number to the simmetric key algorithm. (custom-declare-variable 'pgg-parse-symmetric-key-algorithm-alist ''((1 . IDEA) (2 . 3DES) (4 . CAST5) (5 . SAFER-SK128)) '(#$ . 979) :group 'pgg-parse :type '(repeat (cons (sexp :tag "Number") (sexp :tag "Type")))) #@67 Alist of the assigned number to the cryptographic hash algorithm. (custom-declare-variable 'pgg-parse-hash-algorithm-alist ''((1 . MD5) (2 . SHA1) (3 . RIPEMD160) (5 . MD2) (8 . SHA256) (9 . SHA384) (10 . SHA512)) '(#$ . 1262) :group 'pgg-parse :type '(repeat (cons (sexp :tag "Number") (sexp :tag "Type")))) #@60 Alist of the assigned number to the compression algorithm. (custom-declare-variable 'pgg-parse-compression-algorithm-alist ''((0) (1 . ZIP) (2 . ZLIB)) '(#$ . 1577) :group 'pgg-parse :type '(repeat (cons (sexp :tag "Number") (sexp :tag "Type")))) #@53 Alist of the assigned number to the signature type. (custom-declare-variable 'pgg-parse-signature-type-alist ''((0 . "Signature of a binary document") (1 . "Signature of a canonical text document") (2 . "Standalone signature") (16 . "Generic certification of a User ID and Public Key packet") (17 . "Persona certification of a User ID and Public Key packet") (18 . "Casual certification of a User ID and Public Key packet") (19 . "Positive certification of a User ID and Public Key packet") (24 . "Subkey Binding Signature") (31 . "Signature directly on a key") (32 . "Key revocation signature") (40 . "Subkey revocation signature") (48 . "Certification revocation signature") (64 . "Timestamp signature.")) '(#$ . 1830) :group 'pgg-parse :type '(repeat (cons (sexp :tag "Number") (sexp :tag "Type")))) #@67 If non-nil checksum of each ascii armored packet will be ignored. (custom-declare-variable 'pgg-ignore-packet-checksum 't '(#$ . 2639) :group 'pgg-parse :type 'boolean) #@16 Armor headers. (defvar pgg-armor-header-lines '("^-----BEGIN PGP MESSAGE\\(, PART [0-9]+\\(/[0-9]+\\)?\\)?----- ?$" "^-----BEGIN PGP PUBLIC KEY BLOCK----- ?$" "^-----BEGIN PGP PRIVATE KEY BLOCK----- ?$" "^-----BEGIN PGP SIGNATURE----- ?$") (#$ . 2814)) (byte-code "\300\301\302\303!\203\f \303\202 \304\"\207" [defalias pgg-char-int fboundp char-int identity] 4) (defalias 'pgg-format-key-identifier '(macro . #[(string) "\301\302\303BBB\207" [string mapconcat (lambda (c) (format "%02X" (pgg-char-int c))) ("")] 4])) (defalias 'pgg-parse-time-field '(macro . #[(bytes) "\301\302\303\304D\305BB\306\307EE\302\303\306\310E\311BB\306\312EE\313BBB\207" [bytes list logior lsh car (8) nth 1 2 (8) 3 (0)] 7])) (defalias 'pgg-byte-after '(macro . #[(&optional pos) "\301\302\206 \303DD\207" [pos pgg-char-int char-after (point)] 3])) (defalias 'pgg-read-byte '(macro . #[nil "\300\207" [(pgg-char-int (char-after (prog1 (point) (forward-char))))] 1])) (defalias 'pgg-read-bytes-string '(macro . #[(nbytes) "\301\302\303\304\305BB\306DEE\207" [nbytes buffer-substring (point) prog1 + ((point)) forward-char] 6])) (defalias 'pgg-read-bytes '(macro . #[(nbytes) "\301\302\303DE\207" [nbytes mapcar #'pgg-char-int pgg-read-bytes-string] 4])) (defalias 'pgg-read-body-string '(macro . #[(ptag) "\301\302\303E\304\302\303ED\305BBB\207" [ptag if nth 1 pgg-read-bytes-string ((pgg-read-bytes-string (- (point-max) (point))))] 6])) (defalias 'pgg-read-body '(macro . #[(ptag) "\301\302\303DE\207" [ptag mapcar #'pgg-char-int pgg-read-body-string] 4])) (defalias 'pgg-skip-bytes 'forward-char) (defalias 'pgg-skip-header '(macro . #[(ptag) "\301\302\303ED\207" [ptag pgg-skip-bytes nth 2] 4])) (defalias 'pgg-skip-body '(macro . #[(ptag) "\301\302\303ED\207" [ptag pgg-skip-bytes nth 1] 4])) (defalias 'pgg-set-alist '(macro . #[(alist key value) "\303\304\305\306 \nEDEE\207" [alist key value setq nconc list cons] 8])) (byte-code "\302\303!\203% \304\305 B\306\305\307\310#\210\311!\210\306\305\312\313\305\"#\210)\314\315\316\"\210\310\207" [prog current-load-list fboundp define-ccl-program [1 30 14 114744 114775 0 161 131127 1 148217 15 82167 1 1848 131159 1 1595 5 256 114743 390 114775 19707 1467 16 7 183 1 -5628 -7164 22] pgg-parse-crc24 put variable-documentation nil (lambda (#1=#:defconst-tmp-var) (defconst pgg-parse-crc24 #1#)) ccl-program-idx register-ccl-program defalias pgg-parse-crc24-string #[(string) "\303\304\305\306\304\211\211\211\211\211& \307 \n#\210\310\311\312\313H\314\"\312\315\316H\317\"\314\"\312\316H\314\"$)\207" [h pgg-parse-crc24 string vector nil 183 1230 ccl-execute-on-string format "%c%c%c" logand 1 255 lsh 2 -8] 10]] 6) (defalias 'pgg-parse-length-type '(macro . #[(c) "\301\302\303BB\304\305BBD\302\306BB\304\307\310\311\312BB\313BB\314BB\315BBD\316\317BB\320B\321BBBB\207" [c cond < (192) cons (1) (224) + lsh - (192) (8) ((pgg-byte-after (+ 2 (point))) 192) (2) = (255) ((cons (cons (logior (lsh (pgg-byte-after (+ 2 (point))) 8) (pgg-byte-after (+ 3 (point)))) (logior (lsh (pgg-byte-after (+ 4 (point))) 8) (pgg-byte-after (+ 5 (point))))) 5)) ((t '(0 . 0)))] 9])) (defalias 'pgg-parse-packet-header #[nil "\306`f!\307\211\211\211\310\311\f\312\"!\203] \311\f\313\"\211\313U\203% \314\202) \315\316\"\311\315\f\317\"\320\"\314T\314 W\203Y \321\315 \322\"\306\323\316 `#f!\" T\211\202= *\202\323 \311\f\324\"\306`Tf!\325W\203v \306`Tf!\316B\202\313 \306`Tf!\326W\203\230 \323\315\306`Tf!\325Z\322\"\306\327`\\f!\325#\327B\202\313 \306`Tf!\330U\203\312 \321\315\306\327`\\f!\322\"\306\313`\\f!\"\321\315\306\331`\\f!\322\"\306\332`\\f!\"B\332B\202\313 \333\211@AT\n E-\207" [header-bytes packet-bytes content-tag length-type ptag i pgg-char-int nil zerop logand 64 3 0 lsh 1 -2 15 logior 8 + 63 192 224 2 255 4 5 (0 . 0) #1=#:--cl-dotimes-temp--] 9]) (defalias 'pgg-parse-packet #[(ptag) "@\301=\203 \302!\207@\303=\203 \304!\207@\305=\203! \306!\207@\307=\203, \310!\207@\311=\203S A@\203F `A@`\\A@u\210{\207`d`Z`\\d`Zu\210{\207@\312=\203z A@\203m `A@`\\A@u\210{\207`d`Z`\\d`Zu\210{\207@\313=\203\241 A@\203\224 `A@`\\A@u\210{\207`d`Z`\\d`Zu\210{\207@\314=\205\307 A@\203\273 `A@`\\A@u\210{\207`d`Z`\\d`Zu\210{\207" [ptag 1 pgg-parse-public-key-encrypted-session-key-packet 2 pgg-parse-signature-packet 3 pgg-parse-symmetric-key-encrypted-session-key-packet 6 pgg-parse-public-key-packet 9 10 11 13] 4]) (defalias 'pgg-parse-packets #[(&optional header-parser body-parser) "\206 \304 \206\n \305\306\211d`TV\203A \307\310\n8!\210\n@\212 \n!)BB\311\nA@!\2039 db\210\202 \nA@u\210\202 ,\207" [header-parser body-parser ptag result pgg-parse-packet-header pgg-parse-packet nil pgg-skip-bytes 2 zerop] 4]) (defalias 'pgg-parse-signature-subpacket-header #[nil "\301`f!\302W\203 \301`f!\303B\202d \301`f!\304W\2032 \305\306\301`f!\302Z\307\"\301\310`\\f!\302#\310B\202d \301`f!\311U\203c \312\306\301\310`\\f!\307\"\301\313`\\f!\"\312\306\301\314`\\f!\307\"\301\315`\\f!\"B\315B\202d \316\301A`\\f!@SATE)\207" [length-type pgg-char-int 192 1 224 + lsh 8 2 255 logior 3 4 5 (0 . 0)] 6]) (defalias 'pgg-parse-signature-subpacket #[(ptag) "@\306=\203. \307\310\311`\312`\\\312u\210{\"\313\314 @\315\" A@\"\313\314\306 8\315\"\316 8\"\317E)B\207@\316=\203\\ \320\310\311`\312`\\\312u\210{\"\313\314 @\315\" A@\"\313\314\306 8\315\"\316 8\"\317E)B\207@\312=\203m \321\311`\322u\210f!B\207@\323=\203~ \324\311`\322u\210f!B\207@\325=\203\251 \326A@\203\233 `A@`\\A@u\210{\202\247 `d`Z`\\d`Zu\210{B\207@\327=\203\272 \330\311`\322u\210f!B\207@\331=\203\350 \332\310\311`\312`\\\312u\210{\"\313\314 @\315\" A@\"\313\314\306 8\315\"\316 8\"\317E)B\207@\333=\203\374 \334\311`\322u\210f!\n\236AB\207@\335=\203\322\207@\336=\2034\337\340\341A@\203$`A@`\\A@u\210{\2020`d`Z`\\d`Zu\210{\342#B\207@\343=\203\220\344\312!\210\345\310\311`\306`\\\306u\210{\"\310\311`\306`\\\306u\210{\"`\313\314\f@\315\"\fA@\"`\\\313\314\f@\315\"\fA@\"u\210{`\313\314@\315\"A@\"`\\\313\314@\315\"A@\"u\210{*BB\207@\346=\203\244\347\311`\322u\210f! \236AB\207@\350=\203\271\351\311`\322u\210f!0\236AB\207@\352=\203\347\353\310\311A@\203\330`A@`\\A@u\210{\202\344`d`Z`\\d`Zu\210{\"B\207@\354=\203\355A@\203`A@`\\A@u\210{\202`d`Z`\\d`Zu\210{B\207@\356=\205<\357A@\203/`A@`\\A@u\210{\202;`d`Z`\\d`Zu\210{B\207" [ptag bytes pgg-parse-symmetric-key-algorithm-alist value-bytes name-bytes pgg-parse-hash-algorithm-alist 2 creation-time mapcar pgg-char-int 4 logior lsh 8 3 0 signature-expiry exportability nil 5 trust-level 6 regular-expression 7 revocability 9 key-expiry 11 preferred-symmetric-key-algorithm 12 16 key-identifier mapconcat #[(c) "\301\302\303!\"\207" [c format "%02X" pgg-char-int] 4] "" 20 pgg-skip-bytes notation 21 preferred-hash-algorithm 22 preferred-compression-algorithm 23 key-server-preferences 24 preferred-key-server 26 policy-url pgg-parse-compression-algorithm-alist] 8]) (defalias 'pgg-parse-signature-packet #[(ptag) "\306`f!\307BC\310\211\310\311U\203\200 \312\313!\210\314\306`\315`\\\315u\210{\" \316\n\211A@ \236ABC\244\211\317\320\321\n@\322\"\nA@\"\320\321\313\n8\322\"\311\n8\"\323EBC\244\211\324\325\326`\322`\\\322u\210{\327#BC\244\211\330\306`\310u\210f!BC\244\211\331\306`\310u\210f!BC\244\202\332U\203\312\333!\210 \316\306`\310u\210f! \236ABC\244\211\330\306`\310u\210f!BC\244\211\331\306`\310u\210f!BC\244\334\314\306`\313`\\\313u\210{\"\320\321\f@\322\"\fA@\"\211Y\203\346 \214`\f`\\}\210 \314\335\336\337\340\"\"\244\210db\210)\334\314\306`\313`\\\313u\210{\"\320\321\f@\322\"\fA@\"\211Y\203\214`\f`\\}\210 \314\335\336\337\340\"\"\244\210)\330 \236\211\211A!\236A\241\210\331 \236\211\211A\"\236A\241\210 -\207" [signature-version result hashed-material field n pgg-parse-signature-type-alist pgg-char-int version nil 3 pgg-skip-bytes 2 mapcar 5 signature-type creation-time logior lsh 8 0 key-identifier mapconcat #[(c) "\301\302\303!\"\207" [c format "%02X" pgg-char-int] 4] "" public-key-algorithm hash-algorithm 4 1 10000 cdr pgg-parse-packets pgg-parse-signature-subpacket-header pgg-parse-signature-subpacket pgg-parse-public-key-algorithm-alist pgg-parse-hash-algorithm-alist] 8]) (defalias 'pgg-parse-public-key-encrypted-session-key-packet #[(ptag) "\302\211\303\304`\302u\210f!BC\244\211\305\306\307`\310`\\\310u\210{\311#BC\244\211\312\304`\302u\210f! \236ABC\244\211)\207" [result pgg-parse-public-key-algorithm-alist nil version pgg-char-int key-identifier mapconcat #[(c) "\301\302\303!\"\207" [c format "%02X" pgg-char-int] 4] 8 "" public-key-algorithm] 8]) (defalias 'pgg-parse-symmetric-key-encrypted-session-key-packet #[(ptag) "\302\211\303\304`\302u\210f!BC\244\211\305\304`\302u\210f! \236ABC\244\211)\207" [result pgg-parse-symmetric-key-algorithm-alist nil version pgg-char-int symmetric-key-algorithm] 6]) (defalias 'pgg-parse-public-key-packet #[(ptag) "\305`\306u\210f!\307BC\306\310U\203` \311\312\305`\313`\\\313u\210{\"\314\315@\316\"A@\"\314\315\3178\316\"\3108\"\320E)BC\244\211\321\312\305`\317`\\\317u\210{\"BC\244\211\322\305`\306u\210f!BC\244\202\235 \313U\203\235 \311\312\305`\313`\\\313u\210{\"\314\315@\316\"A@\"\314\315\3178\316\"\3108\"\320E)BC\244\211\322\305`\306u\210f!BC\244\322 \236\211\211A\f\236A\241\210 +\207" [key-version result field bytes pgg-parse-public-key-algorithm-alist pgg-char-int nil version 3 creation-time mapcar 4 logior lsh 8 2 0 key-expiry public-key-algorithm] 8]) (defalias 'pgg-decode-packets #[nil "\303\304\305\306#\203? \307\224\310\311!\211d|\210\305\312\313\217\2038 \314\315!?\206= \n\206= \316\315\317 !!\230\206= \320\321!\210\305\202= \320\322!\210\305*\207\320\323!\210\305\207" [checksum p pgg-ignore-packet-checksum re-search-forward "^=\\([A-Za-z0-9+/]\\{4\\}\\)$" nil t 0 match-string 1 (byte-code "\301e\"\207" [p base64-decode-region] 3) ((error)) fboundp pgg-parse-crc24-string base64-encode-string buffer-string message "PGP packet checksum does not match" "PGP packet contain invalid base64" "PGP packet checksum not found"] 5]) (defalias 'pgg-decode-armor-region #[(start end) "\214 }\210eb\210\302\303\304\305#\210e\306\307!\205 \310\225|\210\311 \205# eb\210\312 )\207" [start end re-search-forward "^-+BEGIN PGP" nil t search-forward "\n\n" 0 pgg-decode-packets pgg-parse-packets] 4]) (defalias 'pgg-parse-armor #[(string) "\302\303!rq\210\304\216\305 \210\306\307!\203 \307\310!\210 c\210\311e`\"+\207" [#1=#:temp-buffer string generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) buffer-disable-undo fboundp set-buffer-multibyte nil pgg-decode-armor-region] 3]) (byte-code "\300\301\302\303!\203\f \303\202 \304\"\207" [defalias pgg-string-as-unibyte fboundp string-as-unibyte identity] 4) (defalias 'pgg-parse-armor-region #[(start end) "\302\303 {!!\207" [start end pgg-parse-armor pgg-string-as-unibyte] 4]) (provide 'pgg-parse)
Close