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 : battery.elc
;ELC ;;; Compiled ;;; in Emacs version 27.1 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters, ;;; and so cannot be loaded into Emacs 22 or earlier. (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (string-lessp emacs-version "23") (error "`%s' was compiled for Emacs 23 or later" #$)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316\317\320\321\310\303& \207" [require timer custom-declare-group battery nil "Display battery status information." :prefix "battery-" :group hardware custom-declare-variable battery-upower-device "battery_BAT1" "Upower battery device name." :version "26.1" :type string] 10) (defalias 'battery--find-linux-sysfs-batteries #[nil "\303\304\305\306\"\303\211\2030 \n@\307 !\204 \310 !\203) \311\312\313 \"!\203) B\nA\211\204 *\237)\207" [dirs file --dolist-tail-- nil directory-files "/sys/class/power_supply/" t file-directory-p file-symlink-p file-exists-p expand-file-name "capacity"] 5]) (byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\313\306\307&\207" [custom-declare-variable battery-status-function (cond ((and (eq system-type 'gnu/linux) (file-readable-p "/proc/apm")) #'battery-linux-proc-apm) ((and (eq system-type 'gnu/linux) (file-directory-p "/proc/acpi/battery")) #'battery-linux-proc-acpi) ((and (eq system-type 'gnu/linux) (file-directory-p "/sys/class/power_supply/") (battery--find-linux-sysfs-batteries)) #'battery-linux-sysfs) ((and (eq system-type 'berkeley-unix) (file-executable-p "/usr/sbin/apm")) #'battery-bsd-apm) ((and (eq system-type 'darwin) (condition-case nil (with-temp-buffer (and (eq (call-process "pmset" nil t nil "-g" "ps") 0) (> (buffer-size) 0))) (error nil))) #'battery-pmset) ((fboundp 'w32-battery-status) #'w32-battery-status)) "Function for getting battery status information.\nThe function has to return an alist of conversion definitions.\nIts cons cells are of the form\n\n (CONVERSION . REPLACEMENT-TEXT)\n\nCONVERSION is the character code of a \"conversion specification\"\nintroduced by a `%' character in a control string." :type (choice (const nil) function) :group battery battery-echo-area-format "Power %L, battery %B (%p%% load, remaining time %t)" "Control string formatting the string to display in the echo area.\nOrdinary characters in the control string are printed as-is, while\nconversion specifications introduced by a `%' character in the control\nstring are substituted as defined by the current value of the variable\n`battery-status-function'. Here are the ones generally available:\n%c Current capacity (mAh or mWh)\n%r Current rate of charge or discharge\n%B Battery status (verbose)\n%b Battery status: empty means high, `-' means low,\n `!' means critical, and `+' means charging\n%d Temperature (in degrees Celsius)\n%L AC line status (verbose)\n%p Battery load percentage\n%m Remaining time (to charge or discharge) in minutes\n%h Remaining time (to charge or discharge) in hours\n%t Remaining time (to charge or discharge) in the form `h:min'" (choice string (const nil))] 8) #@37 String to display in the mode line. (defvar battery-mode-line-string nil (#$ . 3182)) (byte-code "\300\301\302\303\304\305\306\307\310\311& \210\300\312\313\314\306\315\310\311&\210\300\316\317\320\306\307\310\311&\210\300\321\322\323\306\307\310\311&\210\300\324\325\326\306\307\310\311&\207" [custom-declare-variable battery-mode-line-limit 100 "Percentage of full battery load below which display battery status." :version "24.1" :type integer :group battery battery-mode-line-format (cond ((eq battery-status-function 'battery-linux-proc-acpi) "[%b%p%%,%d°C]") (battery-status-function "[%b%p%%]")) "Control string formatting the string to display in the mode line.\nOrdinary characters in the control string are printed as-is, while\nconversion specifications introduced by a `%' character in the control\nstring are substituted as defined by the current value of the variable\n`battery-status-function'. Here are the ones generally available:\n%c Current capacity (mAh or mWh)\n%r Current rate of charge or discharge\n%B Battery status (verbose)\n%b Battery status: empty means high, `-' means low,\n `!' means critical, and `+' means charging\n%d Temperature (in degrees Celsius)\n%L AC line status (verbose)\n%p Battery load percentage\n%m Remaining time (to charge or discharge) in minutes\n%h Remaining time (to charge or discharge) in hours\n%t Remaining time (to charge or discharge) in the form `h:min'" (choice string (const nil)) battery-update-interval 60 "Seconds after which the battery status will be updated." battery-load-low 25 "Upper bound of low battery load percentage.\nA battery load percentage below this number is considered low." battery-load-critical 10 "Upper bound of critical battery load percentage.\nA battery load percentage below this number is considered critical."] 10) #@24 Interval timer object. (defvar battery-update-timer nil (#$ . 5006)) #@185 Display battery status information in the echo area. The text being displayed in the echo area is controlled by the variables `battery-echo-area-format' and `battery-status-function'. (defalias 'battery #[nil "\302\303\203 \203 \304 \"\202 \305\"\207" [battery-echo-area-format battery-status-function message "%s" battery-format "Battery status not available"] 5 (#$ . 5082) nil]) #@281 Non-nil if Display-Battery mode is enabled. See the `display-battery-mode' command for a description of this minor mode. Setting this variable directly does not take effect; either customize it (see the info node `Easy Customization') or call the function `display-battery-mode'. (custom-declare-variable 'display-battery-mode nil '(#$ . 5478) :set 'custom-set-minor-mode :initialize 'custom-initialize-default :group 'battery :type 'boolean) #@497 Toggle battery status display in mode line (Display Battery mode). If called interactively, enable Display-Battery mode if ARG is positive, and disable it if ARG is zero or negative. If called from Lisp, also enable the mode if ARG is omitted or nil, and toggle it if ARG is `toggle'; disable the mode otherwise. The text displayed in the mode line is controlled by `battery-mode-line-format' and `battery-status-function'. The mode line is be updated every `battery-update-interval' seconds. (defalias 'display-battery-mode #[(&optional arg) "\306 \307\310 \311=\203 \312\310!?\202 \313 !\314V\"\210\315 \204! \316\f\203) \317\f!\210 \203R $\203R \204? \320\302 \"\202Y \321\303\302\322#\210\323\324%\325#\326 \210\202Y \327\330!\210\324\331\332\312\310!\203e \333\202f \334\"\210\335\336!\203\223 \337\310!\210\306 \203~ \306 \232\203\223 \315 &\327\340\312\310!\203\215 \341\202\216 \342&#\210))\343 \210\312\310!\207" [#1=#:last-message arg battery-mode-line-string global-mode-string battery-update-timer battery-status-function current-message set-default display-battery-mode toggle default-value prefix-numeric-value 0 #2="" (#2#) cancel-timer delq add-to-list t run-at-time nil battery-update-handler battery-update message "Battery status not available" run-hooks display-battery-mode-hook display-battery-mode-on-hook display-battery-mode-off-hook called-interactively-p any customize-mark-as-set "Display-Battery mode %sabled%s" "en" "dis" force-mode-line-update battery-mode-line-format battery-update-interval local] 4 (#$ . 5928) (list (or current-prefix-arg 'toggle))]) (defvar display-battery-mode-hook nil) (byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \307\211%\207" [display-battery-mode-map display-battery-mode-hook variable-documentation put "Hook run after entering or leaving `display-battery-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" add-minor-mode display-battery-mode nil boundp] 6) (defalias 'battery-update-handler #[nil "\300 \210\301\302!\207" [battery-update sit-for 0] 2]) #@53 Update battery status information in the mode line. (defalias 'battery-update #[nil "\205 \306\307 \236A!@\310 \203& \n\247\203& \n\fX\203& \311 \"\202' \312\313\n\247\2054 \n X\2054 \314\315\316%*\317 \207" [battery-status-function data percentage battery-mode-line-format battery-mode-line-limit battery-load-critical read-from-string 112 propertize battery-format "" face error help-echo "Battery status information" force-mode-line-update battery-mode-line-string] 6 (#$ . 8083)]) #@54 Regular expression matching contents of `/proc/apm'. (defconst battery-linux-proc-apm-regexp "^\\([^ ]+\\) \\([^ ]+\\) 0x\\([0-9a-f]+\\) 0x\\([0-9a-f]+\\) 0x\\([0-9a-f]+\\) 0x\\([0-9a-f]+\\) \\(-?[0-9]+\\)% \\(-?[0-9]+\\) \\(.*\\)$" (#$ . 8583)) #@664 Get APM status information from Linux (the kernel). This function works only with the new `/proc/apm' format introduced in Linux version 1.3.58. The following %-sequences are provided: %v Linux driver version %V APM BIOS version %I APM BIOS status (verbose) %L AC line status (verbose) %B Battery status (verbose) %b Battery status, empty means high, `-' means low, `!' means critical, and `+' means charging %p Battery load percentage %s Remaining time (to charge or discharge) in seconds %m Remaining time (to charge or discharge) in minutes %h Remaining time (to charge or discharge) in hours %t Remaining time (to charge or discharge) in the form `h:min' (defalias 'battery-linux-proc-apm #[nil "\306\211\211\211\211\211\211\211\211\211\211\211 ? @ A B C D\307\310! ErEq\210\311\216\31215 \313\314!0\2029 \210\202: \210\315F!\203 \316\317!D\316\320!C\321\316\322!\323\"\324\320\"\204_ \325B\202 \326B\324\323\"\203o \327B\202y \324\330\"\203y \331B\321\316\332!\323\"\211\333U\203\214 \334A\202\241 \317U\203\230 \335A\202\241 \320U\203\241 \336A\321\316\337!\323\"\211\340U\203\264 \341@\202 \321\316\342!\323\"\211\333U\203\312 \343@\344?\202\364 \317U\203\331 \345@\346?\202\364 \320U\203\350 \347@\350?\202\364 \322U\203\364 \351@\352?\316\353!\321\316\354!!\316\355!\356\230\203\n\357\f_\f\357\245\f\360\245\361\362\n \357\n_Z#+\363D\206$\341B\364C\206,\341B\365B\2064\341B\366A\206<\341B\367@\206D\341B\370?\206L\344B\371 \206S\341B\372\f\203_\373\f!\206`\341B\374 \203l\373 !\206m\341B\375\n\203y\373\n!\206z\341B\376 \206\201\341B\257 .\f\207" [tem remaining-time hours minutes seconds load-percentage nil generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] (error) insert-file-contents "/proc/apm" re-search-forward match-string 1 2 string-to-number 3 16 logand "not supported" "enabled" "disabled" 32 "disengaged" 4 0 "off-line" "on-line" "on backup" 6 255 "N/A" 5 "high" "" "low" "-" "critical" "!" "charging" "+" 7 8 9 "min" 60 3600 format "%d:%02d" 118 86 73 76 66 98 112 115 number-to-string 109 104 116 battery-status-symbol battery-status line-status bios-interface bios-version driver-version #1# battery-linux-proc-apm-regexp] 13 (#$ . 8836)]) #@624 Get ACPI status information from Linux (the kernel). This function works only with the `/proc/acpi/' format introduced in Linux version 2.4.20 and 2.6.0. The following %-sequences are provided: %c Current capacity (mAh) %r Current rate %B Battery status (verbose) %b Battery status, empty means high, `-' means low, `!' means critical, and `+' means charging %d Temperature (in degrees Celsius) %L AC line status (verbose) %p Battery load percentage %m Remaining time (to charge or discharge) in minutes %h Remaining time (to charge or discharge) in hours %t Remaining time (to charge or discharge) in the form `h:min' (defalias 'battery-linux-proc-acpi #[nil "\306\211\307\306\211\307\211\211\211\211\211 @ A B C D\310\311! ErEq\210\312\216\31314 \314\315\316\317#0\2026 \210\307\307 F\211 G\2031G@F\320 \210\3211V \322\323\324F\"!0\202Z \210\202[ \210\325\326\307\316#\203\301 \325\327\307\316#\203u \n\330\235\203u \331\332!\325\333\307\316#\203\255 \f\206\202 \306\334\331\332!!\\\211\306V\203\255 \203\251 \331\335!\230\203\237 \202\246 \336\337 \331\335!#\206\254 \331\335!\325\340\307\316#\203\301 \206\272 \306\334\331\332!!\\db\210\3411\323 \322\323\342F\"!0\202\327 \210\202\330 \210\325\326\307\316#\203(\325\343\307\316#\203\362 D\334\331\332!!\\D\325\344\307\316#\203C\334\331\332!!\\C\325\345\307\316#\203A\334\331\332!!\\A\325\346\307\316#\203(@\334\331\332!!\\@GA\211G\204? -C\306V\203>C\202@DB \203l\f\203l\f\306U\203T\306\202g\347\n\350\230\203bB Z\202c \351_\f\"\211\351\245\352 \203w\353 !\206x\354B\355\356\357\360\3611\212\314\362\316\317#0\202\214\210\307\"\363\332#\206\224\354B\364\356\357\365\3661\246\314\367\316\317#0\202\250\210\307\"\370\332#\206\260\354B\371\f\203\277\353\f!\372 Q\206\300\354B\373\n\206\307\354B\374\n\350\230\203\323\375\202\364 \203\342 @W\203\342\376\202\364 \203\361 AW\203\361\377\202\364\201H B\201I \203\353!\206\354B\201J \203\353 !\206\354B\201K \203*\201L \201M \351_Z#\206+\354B\201N B\203K \203KB\306V\203K\353\347\364 _B\"!\206L\354B\257\n. \207" [hours minutes charging-state rate-type rate capacity 0 nil generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] (error) directory-files "/proc/acpi/battery/" t "\\`[^.]" erase-buffer (error) insert-file-contents expand-file-name "state" re-search-forward "present: +yes$" "charging state: +\\(.*\\)$" ("unknown" "charged" nil) match-string 1 "present rate: +\\([0-9]+\\) \\(m[AW]\\)$" string-to-number 2 error "Inconsistent rate types (%s vs. %s)" "remaining capacity: +\\([0-9]+\\) m[AW]h$" (error) "info" "design capacity: +\\([0-9]+\\) m[AW]h$" "last full capacity: +\\([0-9]+\\) m[AW]h$" "design capacity warning: +\\([0-9]+\\) m[AW]h$" "design capacity low: +\\([0-9]+\\) m[AW]h$" floor "charging" 60 99 number-to-string "N/A" 76 battery-search-for-one-match-in-files mapcar #[(e) "\301P\207" [e "/state"] 2] (error) "/proc/acpi/ac_adapter/" "state: +\\(.*\\)$" 100 #[(e) "\301P\207" [e "/temperature"] 2] (error) "/proc/acpi/thermal_zone/" "temperature: +\\([0-9]+\\) C$" 114 " " 66 98 "+" "!" "-" low warn full-capacity last-full-capacity design-capacity #1# dir --dolist-tail-- "" 104 109 116 format "%d:%02d" 112] 16 (#$ . 11136)]) #@534 Get ACPI status information from Linux kernel. This function works only with the new `/sys/class/power_supply/' format introduced in Linux version 2.4.25. The following %-sequences are provided: %c Current capacity (mAh or mWh) %r Current rate %B Battery status (verbose) %d Temperature (in degrees Celsius) %p Battery load percentage %L AC line status (verbose) %m Remaining time (to charge or discharge) in minutes %h Remaining time (to charge or discharge) in hours %t Remaining time (to charge or discharge) in the form `h:min' (defalias 'battery-linux-sysfs #[nil "\306\211\211\307\310\311\312 @\313\314! ArAq\210\315\216\3161% \317 0\202' \210\306\306 B\211 C\203LC@B\320 \210\3211G \322\323\324B\"!0\202K \210\202L \210eb\210\325\326\306\327#\203_ \330\331\332!!\333\245eb\210\325\334\306\327#\203Ceb\210\325\335\306\327#\203\201 @\336\235\203\201 \331\332!@eb\210\325\337\306\327#\203\242 \330\331\340!!\332\224f\341=\203\236 \202\237 \332_\\eb\210\325\342\306\327#\203\261 \331\332!eb\210\306\211 D E\325\343\306\327#\203\361 \331\332!\211E\203\361 \325\344\306\327#\203\361 \331\332!\211D\203\361 \330E!_\\\n\330D!_\\\202$eb\210\325\345\306\327#\203$\331\332!\211E\203$\325\346\306\327#\203$\331\332!\211D\203$ \330E!\\\n\330D!\\*eb\210 \347U\204C@\350\230\2039\n\202< \nZ\211 F \245)CA\211C\2040 -\351 \347V\204Z\n\347V\203b\352\n\245!\202c\353B\354 \355V\203t\356\357 \360\245\"\202u\353B\361\f\203\204\356\362\f\363_\"\202\205\353B\364\f\203\222\356\362\f\"\202\223\353B\365\f\203\247\356\366\f\211\367\f!Z\363_#\202\250\353B\370 \206\257\353B\371@\206\267\353B\372 \347V\203\320\n\347V\203\320\356\357\370\n_ \245\"\202\321\353B\373\374\375\376\377E\201G \347#\203\346\201H \202\372\374\375\376\377E\201I \347#\203\371\201J \202\372\353B\257 .\207" [voltage-now power-now energy-now energy-full hours temperature nil 0.0 0.0 0.0 10.8 generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] (error) battery--find-linux-sysfs-batteries erase-buffer (error) insert-file-contents expand-file-name "uevent" re-search-forward "POWER_SUPPLY_VOLTAGE_NOW=\\([0-9]*\\)$" t string-to-number match-string 1 1000000.0 "POWER_SUPPLY_PRESENT=1$" "POWER_SUPPLY_STATUS=\\(.*\\)$" ("Unknown" "Full" nil) "POWER_SUPPLY_\\(CURRENT\\|POWER\\)_NOW=\\([0-9]*\\)$" 2 67 "POWER_SUPPLY_TEMP=\\([0-9]*\\)$" "POWER_SUPPLY_CHARGE_FULL=\\([0-9]*\\)$" "POWER_SUPPLY_CHARGE_NOW=\\([0-9]*\\)$" "POWER_SUPPLY_ENERGY_FULL=\\([0-9]*\\)$" "POWER_SUPPLY_ENERGY_NOW=\\([0-9]*\\)$" 0 "Discharging" 99 number-to-string "N/A" 114 0.0 format "%.1f" 1000000.0 109 "%d" 60 104 116 "%d:%02d" floor 100 66 112 76 battery-search-for-one-match-in-files "/sys/class/power_supply/AC/online" "/sys/class/power_supply/ACAD/online" "/sys/class/power_supply/ADP1/online" charging-state #1# dir --dolist-tail-- now-string full-string remaining "1" "AC" "0" "BAT"] 14 (#$ . 14450)]) (defalias 'battery-upower-prop #[(pname &optional device) "\303\304\305\306\206 P\305\n%\207" [device battery-upower-device pname dbus-get-property :system "org.freedesktop.UPower" "/org/freedesktop/UPower/devices/"] 6]) (put 'battery-upower-prop 'byte-optimizer 'byte-compile-inline-expand) #@504 Get battery status from dbus Upower interface. This function works only in systems with `upowerd' daemon running. The following %-sequences are provided: %c Current capacity (mWh) %p Battery load percentage %r Current rate %B Battery status (verbose) %L AC line status (verbose) %s Remaining time (to charge or discharge) in seconds %m Remaining time (to charge or discharge) in minutes %h Remaining time (to charge or discharge) in hours %t Remaining time (to charge or discharge) in the form `h:min' (defalias 'battery-upower #[nil "\306\307\310\311\312\313\206 \nP\312 %*\314\307\310\311\312\313\206 \nP\312 %*\315\307\310\311\312\313\2061 \nP\312 %*\316\307\310\311\312\313\206C \nP\312 %*\317\320\310\311\312\313\206U \nP\312 %*\321\307\310\311\312\313\206g \nP\312 %*\322\307\310\311\312\313\206y \nP\312 %*\323\307\211\211\211 * + , - . / 0 1 2.\203\251 0\203\251 0*\202\267 .\204\267 1\203\267 1**\203\316 *\324\245\211\324\245\325\326\f\327 \324\"#\330-\203\337 \331\332\333-_!!\206\340 \334B\3352\203\360 \331\3322!!\206\361 \334B\336,\203\331,!\337P\206\334B\340/\203\341/+\"A\206\342B\343.\203 \344\202 \345B\346*\203.\331*!\206/\334B\347 \203;\331 !\206<\334B\350\f\203H\331\f!\206I\334B\351 \206P\334B\257 .\f\207" [device pname battery-upower-device remaining-time hours minutes "Percentage" nil dbus-get-property :system "org.freedesktop.UPower" "/org/freedesktop/UPower/devices/" "TimeToEmpty" "TimeToFull" "State" "Online" "line_power_ACAD" "Energy" "EnergyRate" ((0 . "unknown") (1 . "charging") (2 . "discharging") (3 . "empty") (4 . "fully-charged") (5 . "pending-charge") (6 . "pending-discharge")) 60 format "%d:%02d" mod 99 number-to-string round 1000 "N/A" 112 114 " W" 66 assoc "unknown" 76 "on-line" "off-line" 115 109 104 116 seconds battery-states energy-rate energy online state time-to-full time-to-empty percents] 13 (#$ . 17713)]) #@499 Get APM status information from BSD apm binary. The following %-sequences are provided: %L AC line status (verbose) %B Battery status (verbose) %b Battery status, empty means high, `-' means low, `!' means critical, and `+' means charging %P Advanced power saving mode state (verbose) %p Battery charge percentage %s Remaining battery charge time in seconds %m Remaining battery charge time in minutes %h Remaining battery charge time in hours %t Remaining battery charge time in the form `h:min' (defalias 'battery-bsd-apm #[nil "\306\307\310!!@\211\311\267\202 \312\202 \313\202 \314\315 P\306\307\n!!\316\232\203+ \317\202, \320 \321\322\323\f\" 8!\211 \324\267\202P \325\202Q \326\202Q \327\202Q \330\202Q \331\202Q \332) \322\333\f\" 8 ?\322\334\f\" 8 \321\322\335\f\" 8!\211 @\336\267\202\200 \337\202\201 \340\202\201 \341\202\201 \332) A\321\322\342\f\" 8! B\343\230\203\253 B\344\267\202\247 \345\202\270 \346\202\270 \347\202\270 \332\202\270 \350B\351\"\203\267 \352\202\270 \353) \"\332\211 C D\332\211 E F \354\235\204\355\235\203\343 \321 !D\356D_C\202\360 \321 !C\357C\356\"D\357D\356\"E\360\361E\362D\356\"#F\363A\206\n\364B\365@\206\364B\366A\206 \364B\367?\370\230\203)\364\202+?B\371\"\2063\364B\372C\203A\373C!\206B\364B\374D\203P\373D!\206Q\364B\375E\203_\373E!\206`\364B\376F\206h\364B\257 .\207" [os-name apm-flag apm-cmd apm-output indices #1=#:val split-string shell-command-to-string "/usr/bin/uname" #s(hash-table size 2 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("OpenBSD" 13 "FreeBSD" 17)) "mP" "st" "ms" "/usr/sbin/apm -abl" "FreeBSD" ((ac . 0) (battery-status . 1) (battery-percent . 2) (apm-mode . 3) (battery-life . 4)) ((ac . 3) (battery-status . 0) (battery-percent . 1) (apm-mode . 4) (battery-life . 2)) string-to-number alist-get battery-status #s(hash-table size 5 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 60 1 64 2 68 3 72 4 76)) ("high" . "") ("low" . "-") ("critical" . "!") ("charging" . "+") ("absent") nil battery-percent battery-life ac #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 116 1 120 2 124)) "disconnected" "connected" "backup power" apm-mode "OpenBSD" #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 155 1 159 2 163)) "manual" "automatic" "cool running" eql 1 "on" "off" ("unknown" "-1") ("OpenBSD" "NetBSD") 60 truncate format "%d:%02d" mod 76 "N/A" 66 98 112 "255" 80 115 number-to-string 109 104 116 battery-percentage #2=#:val line-status apm seconds minutes hours remaining-time] 11 (#$ . 19653)]) #@361 Get battery status information using `pmset'. The following %-sequences are provided: %L Power source (verbose) %B Battery status (verbose) %b Battery status, empty means high, `-' means low, `!' means critical, and `+' means charging %p Battery load percentage %h Remaining time in hours %m Remaining time in minutes %t Remaining time in the form `h:min' (defalias 'battery-pmset #[nil "\306\211\211\211\211\211\211 0\307\310! 1r1q\210\311\216\3121, \313\314\306\315\306\316\317&0\2020 \210\2021 \210eb\210\320\321\306\315#\203\277 \322\323!0\320\324\306\315#\203\277 \325\326!\203\277 \322\323!\327\225b\210\325\330!\203d \331\332\202\210 \333 !2W\203t \334\335\202\210 \333 !3W\203\204 \336\337\202\210 \340\341\320\342\306\315#\203\277 \322\323!\333\322\343!!\333\322\344!! 4 5\34554\346W\203\260 \327\202\261 \323\\!\3455\347_4\\!*+\3500\206\307 \351B\352 \206\316 \351B\353\f\206\325 \351B\354 \206\334 \341B\355 \206\343 \351B\356\206\352 \351B\357\n\206\361 \351B\257.\207" [minutes hours remaining-time battery-status-symbol battery-status load-percentage nil generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] (error) call-process "pmset" t "-g" "ps" re-search-forward "\\(?:Currentl?y\\|Now\\) drawing from '\\(AC\\|Battery\\) Power'" match-string 1 "^ -InternalBattery-0\\([ ]+(id=[0-9]+)\\)*[ ]+" looking-at "\\([0-9]\\{1,3\\}\\)%" 0 "; charging" "charging" "+" string-to-number "critical" "!" "low" "-" "high" "" "\\(\\([0-9]+\\):\\([0-9]+\\)\\) remaining" 2 3 number-to-string 30 60 76 "N/A" 112 66 98 104 109 116 power-source #1# battery-load-critical battery-load-low m h] 8 (#$ . 22316)]) #@35 Substitute %-sequences in FORMAT. (defalias 'battery-format #[(format alist) "\301\302\303\304\211%\207" [format replace-regexp-in-string "%." #[(str) "\303H\211\304=\203 \305\202 \306 \n\"A\206 \307)\207" [str char alist 1 37 "%" assoc ""] 4] t] 6 (#$ . 24022)]) #@177 Search REGEXP in the content of the files listed in FILES. If a match occurred, return the parenthesized expression numbered by MATCH-NUM in the match. Otherwise, return nil. (defalias 'battery-search-for-one-match-in-files #[(files regexp match-num) "\306\307!rq\210\310\216\3112H \312\211\205F @\3131( \314\n\312\211\211\315%0\202, \210\202> \203> \316\f\312\317#\203> \320\311\321 !\"\210 A\211\204 \312*0+\207" [#1=#:temp-buffer files file --dolist-tail-- regexp match-num generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1# buffer-name kill-buffer] 2] found nil (error) insert-file-contents replace re-search-forward t throw match-string] 7 (#$ . 24299)]) (provide 'battery)
Close
