Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.47
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
27.1 /
lisp /
[ HOME SHELL ]
Name
Size
Permission
Action
calc
[ DIR ]
drwxr-xr-x
calendar
[ DIR ]
drwxr-xr-x
cedet
[ 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
image
[ DIR ]
drwxr-xr-x
international
[ DIR ]
drwxr-xr-x
language
[ DIR ]
drwxr-xr-x
leim
[ 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
vc
[ DIR ]
drwxr-xr-x
COPYING
34.32
KB
-rw-r--r--
README
537
B
-rw-r--r--
abbrev.elc
34.55
KB
-rw-r--r--
align.elc
39.88
KB
-rw-r--r--
allout-widgets.elc
62.37
KB
-rw-r--r--
allout.elc
203.33
KB
-rw-r--r--
ansi-color.elc
17.12
KB
-rw-r--r--
apropos.elc
37.42
KB
-rw-r--r--
arc-mode.elc
58.06
KB
-rw-r--r--
array.elc
27.07
KB
-rw-r--r--
auth-source-pass.elc
11.68
KB
-rw-r--r--
auth-source.elc
64.32
KB
-rw-r--r--
autoarg.elc
6.63
KB
-rw-r--r--
autoinsert.elc
13.41
KB
-rw-r--r--
autorevert.elc
30.71
KB
-rw-r--r--
avoid.elc
11.62
KB
-rw-r--r--
battery.elc
24.42
KB
-rw-r--r--
bindings.elc
42.76
KB
-rw-r--r--
bookmark.elc
77.09
KB
-rw-r--r--
bs.elc
49.32
KB
-rw-r--r--
buff-menu.elc
27.02
KB
-rw-r--r--
button.elc
14.97
KB
-rw-r--r--
calculator.elc
53.9
KB
-rw-r--r--
case-table.elc
4.99
KB
-rw-r--r--
cdl.elc
1.07
KB
-rw-r--r--
char-fold.elc
311.81
KB
-rw-r--r--
chistory.elc
8.16
KB
-rw-r--r--
cmuscheme.elc
18.07
KB
-rw-r--r--
color.elc
12.83
KB
-rw-r--r--
comint.elc
114.46
KB
-rw-r--r--
completion.elc
41.12
KB
-rw-r--r--
composite.elc
27.94
KB
-rw-r--r--
cus-dep.elc
6.42
KB
-rw-r--r--
cus-edit.elc
139.04
KB
-rw-r--r--
cus-face.elc
10.54
KB
-rw-r--r--
cus-load.el
85.19
KB
-rw-r--r--
cus-start.elc
21.92
KB
-rw-r--r--
cus-theme.elc
25.05
KB
-rw-r--r--
custom.elc
47.41
KB
-rw-r--r--
dabbrev.elc
22.28
KB
-rw-r--r--
delim-col.elc
8.95
KB
-rw-r--r--
delsel.elc
9.2
KB
-rw-r--r--
descr-text.elc
26.87
KB
-rw-r--r--
desktop.elc
47.64
KB
-rw-r--r--
dframe.elc
19.92
KB
-rw-r--r--
dired-aux.elc
85.75
KB
-rw-r--r--
dired-loaddefs.el
22.29
KB
-rw-r--r--
dired-x.elc
44.53
KB
-rw-r--r--
dired.elc
127.27
KB
-rw-r--r--
dirtrack.elc
7.75
KB
-rw-r--r--
disp-table.elc
8.76
KB
-rw-r--r--
display-fill-column-indicator....
8.32
KB
-rw-r--r--
display-line-numbers.elc
8.67
KB
-rw-r--r--
dnd.elc
7.13
KB
-rw-r--r--
doc-view.elc
65.25
KB
-rw-r--r--
dom.elc
7.36
KB
-rw-r--r--
dos-fns.elc
6.14
KB
-rw-r--r--
dos-vars.elc
1.1
KB
-rw-r--r--
dos-w32.elc
11.67
KB
-rw-r--r--
double.elc
4.34
KB
-rw-r--r--
dynamic-setting.elc
2.2
KB
-rw-r--r--
ebuff-menu.elc
10.46
KB
-rw-r--r--
echistory.elc
4.75
KB
-rw-r--r--
ecomplete.elc
7.1
KB
-rw-r--r--
edmacro.elc
19.94
KB
-rw-r--r--
ehelp.elc
11.32
KB
-rw-r--r--
elec-pair.elc
21.41
KB
-rw-r--r--
electric.elc
23.69
KB
-rw-r--r--
elide-head.elc
2.65
KB
-rw-r--r--
emacs-lock.elc
9.29
KB
-rw-r--r--
env.elc
6.12
KB
-rw-r--r--
epa-dired.elc
1.62
KB
-rw-r--r--
epa-file.elc
8.65
KB
-rw-r--r--
epa-hook.elc
4.63
KB
-rw-r--r--
epa-mail.elc
9.43
KB
-rw-r--r--
epa.elc
45.25
KB
-rw-r--r--
epg-config.elc
8.97
KB
-rw-r--r--
epg.elc
166.06
KB
-rw-r--r--
expand.elc
9.07
KB
-rw-r--r--
ezimage.elc
9.65
KB
-rw-r--r--
face-remap.elc
16.58
KB
-rw-r--r--
facemenu.elc
27.89
KB
-rw-r--r--
faces.elc
90.21
KB
-rw-r--r--
ffap.elc
50.3
KB
-rw-r--r--
filecache.elc
16.69
KB
-rw-r--r--
fileloop.elc
6.62
KB
-rw-r--r--
filenotify.elc
28.49
KB
-rw-r--r--
files-x.elc
21.9
KB
-rw-r--r--
files.elc
236.95
KB
-rw-r--r--
filesets.elc
72.57
KB
-rw-r--r--
find-cmd.elc
4.9
KB
-rw-r--r--
find-dired.elc
10.41
KB
-rw-r--r--
find-file.elc
18.33
KB
-rw-r--r--
find-lisp.elc
7.66
KB
-rw-r--r--
finder-inf.el
41.27
KB
-rw-r--r--
finder.elc
14.73
KB
-rw-r--r--
flow-ctrl.elc
2.26
KB
-rw-r--r--
foldout.elc
7.25
KB
-rw-r--r--
follow.elc
40.63
KB
-rw-r--r--
font-core.elc
12.41
KB
-rw-r--r--
font-lock.elc
61.63
KB
-rw-r--r--
format-spec.elc
3.93
KB
-rw-r--r--
format.elc
27.56
KB
-rw-r--r--
forms.elc
35.1
KB
-rw-r--r--
frame.elc
85.94
KB
-rw-r--r--
frameset.elc
48.02
KB
-rw-r--r--
fringe.elc
10.23
KB
-rw-r--r--
generic-x.elc
40.27
KB
-rw-r--r--
help-at-pt.elc
11.15
KB
-rw-r--r--
help-fns.elc
45.35
KB
-rw-r--r--
help-macro.elc
4.25
KB
-rw-r--r--
help-mode.elc
23.89
KB
-rw-r--r--
help.elc
52.22
KB
-rw-r--r--
hex-util.elc
1.3
KB
-rw-r--r--
hexl.elc
35.39
KB
-rw-r--r--
hfy-cmap.elc
25.45
KB
-rw-r--r--
hi-lock.elc
29.38
KB
-rw-r--r--
hilit-chg.elc
28.77
KB
-rw-r--r--
hippie-exp.elc
21.52
KB
-rw-r--r--
hl-line.elc
11.23
KB
-rw-r--r--
htmlfontify-loaddefs.el
808
B
-rw-r--r--
htmlfontify.elc
67.51
KB
-rw-r--r--
ibuf-ext.elc
77.15
KB
-rw-r--r--
ibuf-macs.elc
12.47
KB
-rw-r--r--
ibuffer-loaddefs.el
12.68
KB
-rw-r--r--
ibuffer.elc
98.62
KB
-rw-r--r--
icomplete.elc
22.83
KB
-rw-r--r--
ido.elc
127.92
KB
-rw-r--r--
ielm.elc
19.2
KB
-rw-r--r--
iimage.elc
4.92
KB
-rw-r--r--
image-dired.elc
92.97
KB
-rw-r--r--
image-file.elc
6.53
KB
-rw-r--r--
image-mode.elc
42.56
KB
-rw-r--r--
image.elc
34.45
KB
-rw-r--r--
imenu.elc
24.94
KB
-rw-r--r--
indent.elc
23.63
KB
-rw-r--r--
info-look.elc
28.18
KB
-rw-r--r--
info-xref.elc
16.59
KB
-rw-r--r--
info.elc
144.48
KB
-rw-r--r--
informat.elc
9.73
KB
-rw-r--r--
isearch.elc
147.85
KB
-rw-r--r--
isearchb.elc
4.73
KB
-rw-r--r--
jit-lock.elc
23.49
KB
-rw-r--r--
jka-cmpr-hook.elc
13.07
KB
-rw-r--r--
jka-compr.elc
12.09
KB
-rw-r--r--
json.elc
22.76
KB
-rw-r--r--
jsonrpc.elc
31.65
KB
-rw-r--r--
kermit.elc
2.92
KB
-rw-r--r--
kmacro.elc
35.15
KB
-rw-r--r--
ldefs-boot.el
1.41
MB
-rw-r--r--
linum.elc
10.77
KB
-rw-r--r--
loaddefs.el
1.41
MB
-rw-r--r--
loadhist.elc
9.77
KB
-rw-r--r--
loadup.el
20.08
KB
-rw-r--r--
locate.elc
19.57
KB
-rw-r--r--
lpr.elc
9.44
KB
-rw-r--r--
ls-lisp.elc
22.7
KB
-rw-r--r--
macros.elc
7.23
KB
-rw-r--r--
makesum.elc
2.47
KB
-rw-r--r--
man.elc
53.85
KB
-rw-r--r--
master.elc
4.58
KB
-rw-r--r--
mb-depth.elc
3.56
KB
-rw-r--r--
md4.elc
8.12
KB
-rw-r--r--
menu-bar.elc
86.61
KB
-rw-r--r--
midnight.elc
10.22
KB
-rw-r--r--
minibuf-eldef.elc
6.43
KB
-rw-r--r--
minibuffer.elc
104.08
KB
-rw-r--r--
misc.elc
5.4
KB
-rw-r--r--
misearch.elc
12.37
KB
-rw-r--r--
mouse-copy.elc
3.61
KB
-rw-r--r--
mouse-drag.elc
6.43
KB
-rw-r--r--
mouse.elc
71.3
KB
-rw-r--r--
mpc.elc
79.29
KB
-rw-r--r--
msb.elc
26.76
KB
-rw-r--r--
mwheel.elc
12.83
KB
-rw-r--r--
newcomment.elc
39.43
KB
-rw-r--r--
notifications.elc
13.78
KB
-rw-r--r--
novice.elc
4.43
KB
-rw-r--r--
obarray.elc
1.71
KB
-rw-r--r--
outline.elc
37.04
KB
-rw-r--r--
paren.elc
8.69
KB
-rw-r--r--
password-cache.elc
3.57
KB
-rw-r--r--
pcmpl-cvs.elc
6.17
KB
-rw-r--r--
pcmpl-gnu.elc
12.96
KB
-rw-r--r--
pcmpl-linux.elc
3.09
KB
-rw-r--r--
pcmpl-rpm.elc
11.17
KB
-rw-r--r--
pcmpl-unix.elc
7.52
KB
-rw-r--r--
pcmpl-x.elc
8.95
KB
-rw-r--r--
pcomplete.elc
36.16
KB
-rw-r--r--
pixel-scroll.elc
10.82
KB
-rw-r--r--
plstore.elc
14.75
KB
-rw-r--r--
printing.elc
157.7
KB
-rw-r--r--
proced.elc
62.85
KB
-rw-r--r--
profiler.elc
42.81
KB
-rw-r--r--
ps-bdf.elc
12.69
KB
-rw-r--r--
ps-def.elc
2.23
KB
-rw-r--r--
ps-mule.elc
34.89
KB
-rw-r--r--
ps-print-loaddefs.el
2.6
KB
-rw-r--r--
ps-print.elc
141.17
KB
-rw-r--r--
ps-samp.elc
5.26
KB
-rw-r--r--
recentf.elc
48.73
KB
-rw-r--r--
rect.elc
26.88
KB
-rw-r--r--
register.elc
27.63
KB
-rw-r--r--
registry.elc
10.41
KB
-rw-r--r--
repeat.elc
5.14
KB
-rw-r--r--
replace.elc
84.62
KB
-rw-r--r--
reposition.elc
2.66
KB
-rw-r--r--
reveal.elc
7.16
KB
-rw-r--r--
rfn-eshadow.elc
7.23
KB
-rw-r--r--
rot13.elc
2.56
KB
-rw-r--r--
rtree.elc
4.09
KB
-rw-r--r--
ruler-mode.elc
21.87
KB
-rw-r--r--
savehist.elc
10.83
KB
-rw-r--r--
saveplace.elc
11.87
KB
-rw-r--r--
sb-image.elc
2.75
KB
-rw-r--r--
scroll-all.elc
4.41
KB
-rw-r--r--
scroll-bar.elc
16.68
KB
-rw-r--r--
scroll-lock.elc
5.41
KB
-rw-r--r--
select.elc
18.75
KB
-rw-r--r--
server.elc
47.56
KB
-rw-r--r--
ses.elc
131.12
KB
-rw-r--r--
shadowfile.elc
31.16
KB
-rw-r--r--
shell.elc
41.53
KB
-rw-r--r--
simple.elc
301.78
KB
-rw-r--r--
skeleton.elc
15.76
KB
-rw-r--r--
so-long.elc
47.15
KB
-rw-r--r--
sort.elc
15.49
KB
-rw-r--r--
soundex.elc
1.14
KB
-rw-r--r--
speedbar.elc
115.02
KB
-rw-r--r--
startup.elc
68.51
KB
-rw-r--r--
strokes.elc
44.03
KB
-rw-r--r--
subdirs.el
450
B
-rw-r--r--
subr.elc
186.63
KB
-rw-r--r--
svg.elc
12.71
KB
-rw-r--r--
t-mouse.elc
3.8
KB
-rw-r--r--
tab-bar.elc
52.48
KB
-rw-r--r--
tab-line.elc
29.85
KB
-rw-r--r--
tabify.elc
2.17
KB
-rw-r--r--
talk.elc
2.99
KB
-rw-r--r--
tar-mode.elc
57.2
KB
-rw-r--r--
tempo.elc
19.18
KB
-rw-r--r--
term.elc
107.99
KB
-rw-r--r--
thingatpt.elc
16.88
KB
-rw-r--r--
thread.elc
8.08
KB
-rw-r--r--
thumbs.elc
25.74
KB
-rw-r--r--
time-stamp.elc
18.69
KB
-rw-r--r--
time.elc
20.87
KB
-rw-r--r--
timezone.elc
10.94
KB
-rw-r--r--
tmm.elc
13.39
KB
-rw-r--r--
tool-bar.elc
9.76
KB
-rw-r--r--
tooltip.elc
13.19
KB
-rw-r--r--
tree-widget.elc
19.84
KB
-rw-r--r--
tutorial.elc
22.28
KB
-rw-r--r--
type-break.elc
37.35
KB
-rw-r--r--
uniquify.elc
17.68
KB
-rw-r--r--
userlock.elc
6.33
KB
-rw-r--r--
vcursor.elc
23.92
KB
-rw-r--r--
version.elc
6.01
KB
-rw-r--r--
view.elc
34.69
KB
-rw-r--r--
vt-control.elc
1.99
KB
-rw-r--r--
vt100-led.elc
1.33
KB
-rw-r--r--
w32-fns.elc
11.01
KB
-rw-r--r--
w32-vars.elc
5.16
KB
-rw-r--r--
wdired.elc
23.52
KB
-rw-r--r--
whitespace.elc
69.06
KB
-rw-r--r--
wid-browse.elc
8.48
KB
-rw-r--r--
wid-edit.elc
99.52
KB
-rw-r--r--
widget.elc
1.4
KB
-rw-r--r--
windmove.elc
19.82
KB
-rw-r--r--
window.elc
294.5
KB
-rw-r--r--
winner.elc
12.04
KB
-rw-r--r--
woman.elc
109.43
KB
-rw-r--r--
x-dnd.elc
19.56
KB
-rw-r--r--
xdg.elc
10.14
KB
-rw-r--r--
xml.elc
25.31
KB
-rw-r--r--
xt-mouse.elc
14.1
KB
-rw-r--r--
xwidget.elc
18.9
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : locate.elc
;ELC ;;; Compiled ;;; in Emacs version 27.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'dired) (defvar locate-current-filter nil) (defvar locate-local-filter nil) (defvar locate-local-search nil) (defvar locate-local-prompt nil) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314DD\315\316\317\306\301&\210\310\320\312\313\321DD\322\316\323\306\301&\207" [custom-declare-group locate nil "Interface to the locate command." :prefix "locate-" :group external custom-declare-variable locate-command funcall function #[0 "\300\207" [#1="locate"] 1 #1#] "Executable program for searching a database of files.\nThe Emacs commands `locate' and `locate-with-filter' use this.\nThe value should be a program that can be called from a shell\nwith one argument, SEARCH-STRING. The program determines which\ndatabase it searches. The output of the program should consist\nof those file names in the database that match SEARCH-STRING,\nlisted one per line, possibly with leading or trailing\nwhitespace. If the output is in another form, you may have to\nredefine the function `locate-get-file-positions'.\n\nThe program may interpret SEARCH-STRING as a literal string, a\nshell pattern or a regular expression. The exact rules of what\nconstitutes a match may also depend on the program.\n\nThe standard value of this variable is \"locate\".\nThis program normally searches a database of all files on your\nsystem, or of all files that you have access to. Consult the\ndocumentation of that program for the details about how it determines\nwhich file names match SEARCH-STRING. (Those details vary highly with\nthe version.)" :type string locate-post-command-hook #[0 "\300\207" [nil] 1] "List of hook functions run after `locate' (see `run-hooks')." hook] 8) #@49 The history list used by the \[locate] command. (defvar locate-history-list nil (#$ . 2106)) #@61 The history list used by the \[locate-with-filter] command. (defvar locate-grep-history-list nil (#$ . 2205)) (byte-code "\300\301\302\303\304DD\305\306\303\307\310&\210\300\311\302\303\312DD\313\306\314\307\310&\210\300\315\302\303\316DD\317\306\320\307\310&\210\300\321\302\303\322DD\323\306\324\307\310&\210\300\325\302\303\326DD\327\306\314\307\310\330\331& \210\300\332\302\303\333DD\334\306\335\307\310\330\331& \210\300\336\302\303\337DD\340\306\314\307\310&\210\300\341\302\303\342DD\343\306\314\307\310\330\331& \210\300\344\302\303\345DD\346\307\310\306\335&\210\300\347\302\303\350DD\351\306\352\307\310&\207" [custom-declare-variable locate-make-command-line funcall function #[0 "\300\207" [locate-default-make-command-line] 1] "Function used to create the locate command line.\nThe Emacs commands `locate' and `locate-with-filter' use this.\nThis function should take one argument, a string (the name to find)\nand return a list of strings. The first element of the list should be\nthe name of a command to be executed by a shell, the remaining elements\nshould be the arguments to that command (including the name to find)." :type :group locate locate-buffer-name #[0 "\300\207" [#1="*Locate*"] 1 #1#] "Name of the buffer to show results from the \\[locate] command." string locate-fcodes-file #[0 "\300\207" [nil] 1] "File name for the database of file names used by `locate'.\nIf non-nil, `locate' uses this name in the header of the `*Locate*'\nbuffer. If nil, it mentions no file name in that header.\n\nJust setting this variable does not actually change the database\nthat `locate' searches. The executive program that the Emacs\nfunction `locate' uses, as given by the variables `locate-command'\nor `locate-make-command-line', determines the database." (choice (const :tag "None" nil) file) locate-header-face #[0 "\300\207" [nil] 1] "Face used to highlight the locate header." (choice (const :tag "None" nil) face) locate-ls-subdir-switches #[0 "\300\301!\207" [purecopy "-al"] 2] "`ls' switches for inserting subdirectories in `*Locate*' buffers.\nThis should contain the \"-l\" switch, but not the \"-F\" or \"-b\" switches." :version "22.1" locate-update-when-revert #[0 "\300\207" [nil] 1] "This option affects how the *Locate* buffer gets reverted.\nIf non-nil, offer to update the locate database when reverting that buffer.\n(Normally, you need to have root privileges for this to work. See the\noption `locate-update-path'.)\nIf nil, reverting does not update the locate database." boolean locate-update-command #[0 "\300\207" [#2="updatedb"] 1 #2#] "The executable program used to update the locate database." locate-update-path #[0 "\300\207" [#3="/"] 1 #3#] "The default directory from where `locate-update-command' is called.\nUsually, root permissions are required to run that command. This\ncan be achieved by setting this option to \"/su::\" or \"/sudo::\"\n(if you have the appropriate authority). If your current user\npermissions are sufficient to run the command, you can set this\noption to \"/\"." locate-prompt-for-command #[0 "\300\207" [nil] 1] "If non-nil, the `locate' command prompts for a command to run.\nOtherwise, that behavior is invoked via a prefix argument.\n\nSetting this option non-nil actually inverts the meaning of a prefix arg;\nthat is, with a prefix arg, you get the default behavior." locate-mode-hook #[0 "\300\207" [nil] 1] "List of hook functions run by `locate-mode' (see `run-mode-hooks')." hook] 10) #@22 (fn SEARCH-STRING) (defalias 'locate-default-make-command-line #[257 "D\207" [locate-command] 3 (#$ . 5699)]) (defalias 'locate-word-at-point #[0 "`\300\212\301\302x\210`)\212\301\302w\210\303x\210`)\"\207" [buffer-substring-no-properties "-a-zA-Z0-9." nil "."] 5]) (defalias 'locate-prompt-for-search-string #[0 "\203 \203 \204+ \203+ \n\303!\304\305@\306\307\310A\311#Q\312@G\\B\313\211\314%\207\315 \304G\316V\203< \317\320\"\202? \317\321!\313\211\211\314\322&\211\303\232\203U \203U \262\207" [current-prefix-arg locate-prompt-for-command locate-make-command-line "" 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]) #@1027 Run the program `locate', putting results in `*Locate*' buffer. Pass it SEARCH-STRING as argument. Interactively, prompt for SEARCH-STRING. With prefix arg 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. After preparing the results buffer, this runs `dired-mode-hook' and then `locate-post-command-hook'. (fn SEARCH-STRING &optional FILTER ARG) (defalias 'locate #[769 "\306\232\203\n \307\310!\210!\211@A\203 ?\206 ?\205 \311 \312\313\314\315\316!\317\"\320$\216\321\n!q\210\322 \210\323\211 \324 \210\325\326!\210\325\327!\210\325\330!\210\203d \331\n\"\210\202o \332\333\334\323\334&\210\203y \335!\210\336!\210+\210\337 \n\230\204\213 \340\n!\210\341\342!\210\343\344!\210\341\345!\207" [locate-make-command-line locate-prompt-for-command locate-buffer-name buffer-undo-list inhibit-read-only locate-current-filter "" error "Please specify a filename to search for" current-window-configuration make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] 2 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 buffer-name pop-to-buffer run-hooks dired-mode-hook dired-next-line 3 locate-post-command-hook] 15 (#$ . 6476) (byte-code "\301 \302E\207" [current-prefix-arg locate-prompt-for-search-string nil] 3)]) #@711 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. (fn SEARCH-STRING FILTER &optional ARG) (defalias 'locate-with-filter #[770 "\300#\207" [locate] 7 (#$ . 8581) (byte-code "\301 \302\303\304\211\211\305%E\207" [current-prefix-arg locate-prompt-for-search-string read-from-minibuffer "Filter: " nil locate-grep-history-list] 7)]) #@53 Filter output from the locate command. (fn FILTER) (defalias 'locate-filter-output #[257 "eb\210\300!\207" [keep-lines] 3 (#$ . 9540)]) #@39 Local keymap for Locate mode buffers. (defvar locate-mode-map (byte-code "\301!\302\303\304#\210\302\305\304#\210\302\306\304#\210\302\307\304#\210\302\310\304#\210\302\311\304#\210\302\312\313#\210\302\314\315#\210\302\316\317#\210\302\320\321#\210\302\322\323#\210\211\207" [dired-mode-map 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] 5) (#$ . 9684)) #@42 The amount of indentation for each file. (defconst locate-filename-indentation 4 (#$ . 10315)) #@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 #[0 "\301 \\\302 D\207" [locate-filename-indentation line-beginning-position line-end-position] 2 (#$ . 10417)]) #@48 Return the current line number, as an integer. (defalias 'locate-current-line-number #[0 "\300e`\"i\301=\203 \302\202 \301\\\207" [count-lines 0 1] 3 (#$ . 11031)]) (defalias 'locate-get-filename #[0 "\300 \301 \211\302=?\205 \211\303=?\205 \304\234\302\234{\207" [locate-get-file-positions locate-current-line-number 1 2 0] 5]) #@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 #[0 "\212\301y\210\302\303\304S\305\"\306Q!)\207" [locate-filename-indentation 0 looking-at "." make-string 32 "\\(/\\|[A-Za-z]:\\)"] 5 (#$ . 11373)]) #@59 In Locate mode, view a file, using the mouse. (fn EVENT) (defalias 'locate-mouse-view-file #[257 "\212\300\301!!b\210\302 \203 \303\304 !\202 \305\306!)\207" [posn-point event-start locate-main-listing-line-p view-file locate-get-filename message "This command only works inside main listing."] 4 (#$ . 11737) "@e"]) (defvar locate-mode-hook nil) (byte-code "\300\301N\204\f \302\300\301\303#\210\304\305!\204 \302\305\306\307#\210\300\207" [locate-mode-hook variable-documentation put "Hook run after entering Locate mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp locate-mode-map definition-name locate-mode] 4) (defvar locate-mode-map (make-sparse-keymap)) (byte-code "\301\302N\204 \303\301\302\304\305!#\210\306\307!\204 \303\307\310\311#\210\312\313 !\210\307\302N\204- \303\307\302\304\314!#\210\306\300!\204B \303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P \303\300\302\304\320!#\210\303\311\321\322#\207" [locate-mode-abbrev-table locate-mode-map variable-documentation put purecopy "Keymap for `locate-mode'." boundp locate-mode-syntax-table definition-name locate-mode (lambda (#1=#:def-tmp-var) (defvar locate-mode-syntax-table #1#)) make-syntax-table "Syntax table for `locate-mode'." (lambda (#1#) (defvar locate-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `locate-mode'." derived-mode-parent special-mode] 5) #@636 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. This function runs `locate-mode-hook' before returning. 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 #[0 "\306\300!\210\307\310 \210\311\312\310\313N\203 \314\311\313\310\313N#\210\315 !\204' \316 \317 \"\210\320\f!\211\2035 \211\321 =\203; \322\f\323 \"\210\210\324 \325\"\204R 1=\204R \326 \3251C#\210\327 !\210\330\f!\210 1\306\331!\210\3322\3073\333\334!\210\3352\336 \"\210\306\337!\210\332 \306\340!\2104 \3415\306\342!\210\343\3446S\345\"\346\347\342!R\"\306\350!\210\351(\306\352!\210\343\3446S\345\"\346\347\352!R*\306\353!\210\354+\306\355!\210\356-)\357\360!\207" [delay-mode-hooks major-mode mode-name locate-mode-map locate-mode-syntax-table locate-mode-abbrev-table make-local-variable t special-mode locate-mode "Locate" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table dired-subdir-alist "/" add-to-invisibility-spec (dired . t) dired-alist-add-1 point-min-marker dired-directory dired-subdir-switches nil directory-listing-before-filename-regexp "^.\\(" make-string 32 "\\)\\|" default-value dired-actual-switches "" dired-permission-flags-regexp revert-buffer-function locate-update page-delimiter "\n\n" run-mode-hooks locate-mode-hook local-abbrev-table default-directory buffer-read-only locate-ls-subdir-switches dired-switches-alist locate-filename-indentation] 5 (#$ . 13206) nil]) (put 'locate-mode 'derived-mode-parent 'dired-mode) #@22 (fn SEARCH-STRING) (defalias 'locate-do-setup #[257 "eb\210\212m\203 \303!\210 \203 \304\305 #\210\202 \304\306\"\210\307!\210m\2045 \310\311\n\312#\210\313 \210\314y\210\202\" )eb\207" [locate-buffer-name locate-current-filter locate-filename-indentation kill-buffer user-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] 5 (#$ . 15314)]) (defalias 'locate-set-properties #[0 "\212\300 \301\302\234\303\234\"\262)\207" [locate-get-file-positions dired-insert-set-properties 0 1] 5]) #@22 (fn SEARCH-STRING) (defalias 'locate-insert-header #[257 "\303\304\305!\306QC\203\" \307P\262\310\305!\306R\262\311C\"\262 \203; \312P\262\313\305 !\306R\262\311 C\"\262\314P\262\315P\262\316\317\320!#c\210\212eb\210\321y\210\322!\205\202 \323\321\224\321\225\324\nD#\210\325\224\203t \323\325\224\325\225\324\nD#\210\326\224\205\202 \323\326\224\326\225\324\nD#)\207" [locate-fcodes-file locate-current-filter locate-header-face " /:\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] 9 (#$ . 15927)]) #@40 Visit a tags table in `*Locate*' mode. (defalias 'locate-tags #[0 "\300 \203 \301 \302\303\304\"!\205 \305!\207\306\307!\207" [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."] 5 (#$ . 16612) nil]) #@182 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'. (fn IGNORE1 IGNORE2) (defalias 'locate-update #[514 "\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] 5 (#$ . 16931)]) #@57 Visit the directory of the file mentioned on this line. (defalias 'locate-find-directory #[0 "\300 \203# \301 \302!\203 \303!\202\" \304!\203 \305\306!\202\" \305\307!\207\310\311!\207" [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."] 3 (#$ . 17541) nil]) #@69 Visit the directory of the file named on this line in other window. (defalias 'locate-find-directory-other-window #[0 "\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 (#$ . 18023) nil]) #@63 Return the directory name of the file mentioned on this line. (defalias 'locate-get-dirname #[0 "\302\303 \211@A@{\211\262\203. \304\305G\302$\210\306!\262\307\310\311\312\313\302\314%\206) \310Q!\262\203@ \203@ \204@ \315\"\262\207" [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] 10 (#$ . 18336)]) #@313 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. (fn SEARCH-STRING DATABASE) (defalias 'locate-in-alternate-database #[514 "\301!\204 \302\303\"\210\304\305\306\307\310!\311\"\312\313%\314!)\207" [locate-make-command-line file-exists-p error "Database file %s does not exist" make-byte-code 257 " \302\303\300!PDB\207" vconcat vector [locate-command "--database=" expand-file-name] 5 "\n\n(fn STRING)" locate] 8 (#$ . 18829) (byte-code "\300\301\302\211\211\303%\304\305!D\207" [read-from-minibuffer "Locate: " nil locate-history-list read-file-name "Locate using Database: "] 6)]) #@100 Like `dired-do-redisplay', but adapted for `*Locate*' buffers. (fn &optional ARG TEST-FOR-SUBDIR) (defalias 'locate-do-redisplay #[512 "\302 \303\230\203 \304\305!\207\306\")\207" [locate-ls-subdir-switches dired-actual-switches dired-current-directory "/" message "This command only works in subdirectories." dired-do-redisplay] 5 (#$ . 19660) "P\np"]) (provide 'locate)
Close
