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 : locate.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:20 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/locate.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 "`locate.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\301B\302\301!\204 \303\301\304\"\210\305B\302\305!\204 \303\305\304\"\210\306B\302\306!\204- \303\306\304\"\210\307B\302\307!\204< \303\307\304\"\210\310\311\304\312\313\314\315\316&\207" [current-load-list locate-current-filter default-boundp set-default nil locate-local-filter locate-local-search locate-local-prompt custom-declare-group locate "Interface to the locate command." :prefix "locate-" :group external] 8) #@1049 Executable program for searching a database of files. The Emacs commands `locate' and `locate-with-filter' use this. The value should be a program that can be called from a shell with one argument, SEARCH-STRING. The program determines which database it searches. The output of the program should consist of those file names in the database that match SEARCH-STRING, listed one per line, possibly with leading or trailing whitespace. If the output is in another form, you may have to redefine the function `locate-get-file-positions'. The program may interpret SEARCH-STRING as a literal string, a shell pattern or a regular expression. The exact rules of what constitutes a match may also depend on the program. The standard value of this variable is "locate". This program normally searches a database of all files on your system, or of all files that you have access to. Consult the documentation of that program for the details about how it determines which file names match SEARCH-STRING. (Those details vary highly with the version.) (custom-declare-variable 'locate-command '"locate" '(#$ . 1050) :type 'string :group 'locate) #@49 The history list used by the \[locate] command. (defvar locate-history-list nil (#$ . 2198)) #@61 The history list used by the \[locate-with-filter] command. (defvar locate-grep-history-list nil (#$ . 2297)) #@394 Function used to create the locate command line. The Emacs commands `locate' and `locate-with-filter' use this. This function should take one argument, a string (the name to find) and return a list of strings. The first element of the list should be the name of a command to be executed by a shell, the remaining elements should be the arguments to that command (including the name to find). (custom-declare-variable 'locate-make-command-line ''locate-default-make-command-line '(#$ . 2414) :type 'function :group 'locate) #@64 Name of the buffer to show results from the \[locate] command. (custom-declare-variable 'locate-buffer-name '"*Locate*" '(#$ . 2944) :type 'string :group 'locate) #@437 File name for the database of file names used by `locate'. If non-nil, `locate' uses this name in the header of the `*Locate*' buffer. If nil, it mentions no file name in that header. Just setting this variable does not actually change the database that `locate' searches. The executive program that the Emacs function `locate' uses, as given by the variables `locate-command' or `locate-make-command-line', determines the database. (custom-declare-variable 'locate-fcodes-file 'nil '(#$ . 3114) :type '(choice (const :tag "None" nil) file) :group 'locate) #@43 Face used to highlight the locate header. (custom-declare-variable 'locate-header-face 'nil '(#$ . 3680) :type '(choice (const :tag "None" nil) face) :group 'locate) #@139 `ls' switches for inserting subdirectories in `*Locate*' buffers. This should contain the "-l" switch, but not the "-F" or "-b" switches. (custom-declare-variable 'locate-ls-subdir-switches '"-al" '(#$ . 3853) :type 'string :group 'locate :version "22.1") #@292 This option affects how the *Locate* buffer gets reverted. If non-nil, offer to update the locate database when reverting that buffer. (Normally, you need to have root privileges for this to work. See the option `locate-update-path'.) If nil, reverting does not update the locate database. (custom-declare-variable 'locate-update-when-revert 'nil '(#$ . 4116) :type 'boolean :group 'locate :version "22.1") #@60 The executable program used to update the locate database. (custom-declare-variable 'locate-update-command '"updatedb" '(#$ . 4530) :type 'string :group 'locate) #@340 The default directory from where `locate-update-command' is called. Usually, root permissions are required to run that command. This can be achieved by setting this option to "/su::" or "/sudo::" (if you have the appropriate authority). If your current user permissions are sufficient to run the command, you can set this option to "/". (custom-declare-variable 'locate-update-path '"/" '(#$ . 4699) :type 'string :group 'locate :version "22.1") #@256 If non-nil, the `locate' command prompts for a command to run. Otherwise, that behavior is invoked via a prefix argument. Setting this option non-nil actually inverts the meaning of a prefix arg; that is, with a prefix arg, you get the default behavior. (custom-declare-variable 'locate-prompt-for-command 'nil '(#$ . 5154) :group 'locate :type 'boolean) (defalias 'locate-default-make-command-line #[(search-string) " D\207" [locate-command search-string] 2]) (defalias 'locate-word-at-point #[nil "`\301\212\302\303x\210`)\212\302\303w\210\304x\210`)\")\207" [pt buffer-substring-no-properties "-a-zA-Z0-9." nil "."] 4]) (defalias 'locate-prompt-for-search-string #[nil "\203 \203 \204, \203, \n\306!\307\310 @\311\312\313 A\314#Q\315 @G\\B\316\211\317%)\207\320 \307\fG\321V\203> \322\323\f\"\202A \322\324!\316\211\211\317\f\325&\211 \306\232\203V \f\203V \f *\207" [current-prefix-arg locate-prompt-for-command locate-make-command-line locate-cmd default input "" read-from-minibuffer "Run locate (like this): " " " mapconcat identity " " 2 nil locate-history-list locate-word-at-point 0 format "Locate (default %s): " "Locate: " t] 9]) #@916 Run the program `locate', putting results in `*Locate*' buffer. Pass it SEARCH-STRING as argument. Interactively, prompt for SEARCH-STRING. With prefix arg, prompt for the exact shell command to run instead. This program searches for those file names in a database that match SEARCH-STRING and normally outputs all matching absolute file names, one per line. The database normally consists of all files on your system, or of all files that you have access to. Consult the documentation of the program for the details about how it determines which file names match SEARCH-STRING. (Those details vary highly with the version.) You can specify another program for this command to run by customizing the variables `locate-command' or `locate-make-command-line'. The main use of FILTER is to implement `locate-with-filter'. See the docstring of that function for its meaning. ARG is the interactive prefix arg. (defalias 'locate #[(search-string &optional filter arg) "\306\232\203\n \307\310!\210 !\211@\nA \203 ?\206% ?\205% \311\213\210\312 \230\2047 \313!\210\314\315!\210\316\317!\210\314\320!,\207" [search-string locate-make-command-line locate-cmd-list locate-cmd locate-cmd-args arg "" error "Please specify a filename to search for" ((byte-code "\306!q\210\307 \210\310\211\311 \210 \312\313!\210 \312\314!\210 \f\312\315!\210 \2034 \316 \"\210\202@ \317\320\321\310\321&\210 \203H \322 !\210\323 !\210*\321\207" [locate-buffer-name buffer-undo-list inhibit-read-only filter locate-current-filter search-string get-buffer-create locate-mode t erase-buffer make-local-variable locate-local-search locate-local-filter locate-local-prompt shell-command apply call-process nil locate-filter-output locate-do-setup run-locate-command locate-cmd locate-cmd-args] 7)) buffer-name switch-to-buffer-other-window run-hooks dired-mode-hook dired-next-line 3 locate-post-command-hook locate-prompt-for-command run-locate-command locate-buffer-name] 3 (#$ . 6318) (list (locate-prompt-for-search-string) nil current-prefix-arg)]) #@670 Run the executable program `locate' with a filter. This function is similar to the function `locate', which see. The difference is that, when invoked interactively, the present function prompts for both SEARCH-STRING and FILTER. It passes SEARCH-STRING to the locate executable program. It produces a `*Locate*' buffer that lists only those lines in the output of the locate program that contain a match for the regular expression FILTER; this is often useful to constrain a big search. ARG is the interactive prefix arg, which has the same effect as in `locate'. When called from Lisp, this function is identical with `locate', except that FILTER is not optional. (defalias 'locate-with-filter #[(search-string filter &optional arg) "\303 \n#\207" [search-string filter arg locate] 4 (#$ . 8391) (list (locate-prompt-for-search-string) (read-from-minibuffer "Filter: " nil nil nil 'locate-grep-history-list) current-prefix-arg)]) #@40 Filter output from the locate command. (defalias 'locate-filter-output #[(filter) "eb\210\301!\207" [filter keep-lines] 2 (#$ . 9333)]) #@39 Local keymap for Locate mode buffers. (defvar locate-mode-map nil (#$ . 9476)) (byte-code "\204N \302\303!\210\304 !\305\306\307#\210\305\310\307#\210\305\311\307#\210\305\312\307#\210\305\313\307#\210\305\314\307#\210\305\315\316#\210\305\317\320#\210\305\321\322#\210\305\323\324#\210\305\325\326#\210\302\207" [locate-mode-map dired-mode-map require dired copy-keymap define-key [menu-bar Dired] undefined [menu-bar subdir] [menu-bar mark executables] [menu-bar mark directory] [menu-bar mark directories] [menu-bar mark symlinks] [M-mouse-2] locate-mouse-view-file "" locate-tags "l" locate-do-redisplay "U" dired-unmark-all-files "V" locate-find-directory] 4) #@42 The amount of indentation for each file. (defconst locate-filename-indentation 4 (#$ . 10162)) #@458 Return list of start and end of the file name on the current line. This is a list of two buffer positions. You should only call this function on lines that contain a file name listed by the locate program. Inside inserted subdirectories, or if there is no file name on the current line, the return value is meaningless. You can check whether the current line contains a file listed by the locate program, using the function `locate-main-listing-line-p'. (defalias 'locate-get-file-positions #[nil "\301 \\\302 D\207" [locate-filename-indentation line-beginning-position line-end-position] 2 (#$ . 10264)]) #@48 Return the current line number, as an integer. (defalias 'locate-current-line-number #[nil "\300e`\"i\301=\203 \302\202 \301\\\207" [count-lines 0 1] 3 (#$ . 10880)]) (defalias 'locate-get-filename #[nil "\302 \303 \304=?\205 \305=?\205 \306\234 \304\234{*\207" [lineno pos locate-get-file-positions locate-current-line-number 1 2 0] 3]) #@169 Return t if current line contains a file name listed by locate. This function returns nil if the current line either contains no file name or is inside a subdirectory. (defalias 'locate-main-listing-line-p #[nil "\212\301y\210\302\303\304S\305\"\306Q!)\207" [locate-filename-indentation 0 looking-at "." make-string 32 "\\(/\\|[A-Za-z]:\\)"] 5 (#$ . 11234)]) #@47 In Locate mode, view a file, using the mouse. (defalias 'locate-mouse-view-file #[(event) "\212\211:\203 A@\202 \302 `\303\304F)\305 8\206- A@:\203* A@@\202- A@)b\210\306 \203< \307\310 !\202? \311\312!)\207" [event position selected-window (0 . 0) 0 5 locate-main-listing-line-p view-file locate-get-filename message "This command only works inside main listing."] 5 (#$ . 11600) "@e"]) #@580 Major mode for the `*Locate*' buffer made by \[locate]. \<locate-mode-map>In that buffer, you can use almost all the usual dired bindings. \[locate-find-directory] visits the directory of the file on the current line. Operating on listed files works, but does not always automatically update the buffer as in ordinary Dired. This is true both for the main listing and for subdirectories. Reverting the buffer using \[revert-buffer] deletes all subdirectories. Specific `locate-mode' commands, such as \[locate-find-directory], do not work in subdirectories. \{locate-mode-map} (defalias 'locate-mode #[nil "\306 \210\307\310!\210\311!\210\312\313\314\315\211\316 \317 \"\210\307\320!\210\314\307\321!\210$\322%\307\323!\210\324\325&S\326\"\327\330\323!R\307\331!\210\332\307\333!\210\334\325&S\326\"\335\330\333!R\307\336!\210\337 \307\340!\210\341 \342\343!\207" [locate-mode-map major-mode mode-name default-directory buffer-read-only selective-display kill-all-local-variables make-local-variable dired-subdir-alist use-local-map locate-mode "Locate" "/" t dired-alist-add-1 point-min-marker dired-directory dired-subdir-switches nil directory-listing-before-filename-regexp "^." make-string 32 "\\(/\\|[A-Za-z]:\\)\\|" default-value dired-actual-switches "" dired-permission-flags-regexp "^.\\(" "\\)\\|" revert-buffer-function locate-update page-delimiter "\n\n" run-mode-hooks locate-mode-hook locate-ls-subdir-switches dired-switches-alist locate-filename-indentation] 6 (#$ . 12004)]) (defalias 'locate-do-setup #[(search-string) "eb\210\212m\203 \304!\210 \203 \305\306\n #\210\202 \305\307\n\"\210\310\n!\210m\2045 \311\312 \313#\210\314 \210\315y\210\202\" )eb\207" [locate-buffer-name locate-current-filter search-string locate-filename-indentation kill-buffer error "Locate: no match for %s in database using filter %s" "Locate: no match for %s in database" locate-insert-header insert-char 32 t locate-set-properties 1] 4]) (defalias 'locate-set-properties #[nil "\212\301 \302\303\234\304\234\"*\207" [pos locate-get-file-positions dired-insert-set-properties 0 1] 4]) (defalias 'locate-insert-header #[(search-string) "\306\307\310!\311QC\f\203\" \312P\n\313\310\f!\311R\314\fC \" \203: \315P\n\316\317\310 !\311\260\314 C \" \320P\n\321P\322\323 \324 !#c\210\212eb\210\325y\210\326\n!\205\202 \327\325\224\325\225\330D#\210\331\224\203s \327\331\224\331\225\330D#\210\332\224\205\202 \327\332\224\332\225\330D#,\207" [search-string locate-format-args locate-regexp-match locate-format-string locate-fcodes-file locate-current-filter " /:\n Matches for %s" " *Matches for \\(" regexp-quote "\\)" " in %s" " in \\(" append " using filter %s" " using filter " "\\(" ":\n\n" ":\n" apply format reverse 1 looking-at add-text-properties face 2 3 locate-header-face] 5]) #@40 Visit a tags table in `*Locate*' mode. (defalias 'locate-tags #[nil "\301 \203 \302 \303\304\305\"!\205 \306!)\207\307\310!\207" [tags-table locate-main-listing-line-p locate-get-filename y-or-n-p format "Visit tags table %s? " visit-tags-table message "This command only works inside main listing."] 4 (#$ . 14845) nil]) #@160 Revert the *Locate* buffer. If `locate-update-when-revert' is non-nil, offer to update the locate database using the shell command in `locate-update-command'. (defalias 'locate-update #[(ignore1 ignore2) "\306 \203 \307\310!\203 \311\f! \312\f!\210)\313 \"*\207" [locate-local-prompt locate-prompt-for-command locate-buffer-name locate-update-when-revert locate-update-path default-directory buffer-name yes-or-no-p "Update locate database (may take a few seconds)? " expand-file-name shell-command locate locate-update-command locate-local-search locate-local-filter] 3 (#$ . 15179)]) #@57 Visit the directory of the file mentioned on this line. (defalias 'locate-find-directory #[nil "\301 \203% \302 \303!\203 \304!\202# \305!\203 \306\307!\202# \306\310!)\207\311\312!\207" [directory-name locate-main-listing-line-p locate-get-dirname file-directory-p find-file file-symlink-p error "Directory is a symlink to a nonexistent target" "Directory no longer exists; run `updatedb' to update database" message "This command only works inside main listing."] 2 (#$ . 15781) nil]) #@69 Visit the directory of the file named on this line in other window. (defalias 'locate-find-directory-other-window #[nil "\300 \203\n \301\302 !\207\303\304!\207" [locate-main-listing-line-p find-file-other-window locate-get-dirname message "This command only works inside main listing."] 2 (#$ . 16280) nil]) #@63 Return the directory name of the file mentioned on this line. (defalias 'locate-get-dirname #[nil "\304\305 @A@{\211\203- \306\307 G\304 $\210\310 !\311\312\313\314 \315\304\316%\206) \312Q! \203> \n\203> \204> \317 \n\" *\207" [filepos file buffer-file-coding-system file-name-coding-system nil locate-get-file-positions set-text-properties 0 file-name-directory read "\"" dired-string-replace-match "\\([^\\]\\|\\`\\)\"" "\\1\\\\\"" t encode-coding-string] 8 (#$ . 16595)]) #@284 Run the GNU locate program, using an alternate database. This command only works if you use GNU locate. It does not work properly if `locate-prompt-for-command' is set to t. In that case, you can just run the regular `locate' command and specify the database on the command line. (defalias 'locate-in-alternate-database #[(search-string database) "\303!\204 \304\305\"\210\306\307\n!)\207" [database locate-make-command-line search-string file-exists-p error "Database file %s does not exist" #[(string) "\303\304 !P\nDB\207" [locate-command database string "--database=" expand-file-name] 4] locate] 3 (#$ . 17088) (list (progn (read-from-minibuffer "Locate: " nil nil nil 'locate-history-list)) (read-file-name "Locate using Database: "))]) #@64 Like `dired-do-redisplay', but adapted for `*Locate*' buffers. (defalias 'locate-do-redisplay #[(&optional arg test-for-subdir) "\304 \305\230\203 \306\307!\207\310\n \")\207" [locate-ls-subdir-switches dired-actual-switches arg test-for-subdir dired-current-directory "/" message "This command only works in subdirectories." dired-do-redisplay] 3 (#$ . 17845) "P\np"]) (provide 'locate)
Close
