2 # Copyright (C) 2019 Ian Kelling
3 # SPDX-License-Identifier: AGPL-3.0-or-later
4 # this gets sourced. shebang is just for file mode detection
6 # Use source ~/.bashrc instead of doing bash -l when running a script
7 # so this can set extdebug and avoid the bash debugger.
8 if [[ -s /a
/bin
/errhandle
/err
]]; then
9 source /a
/bin
/errhandle
/err
10 elif [[ -s $bashrc_dir/err
]]; then
11 # shellcheck source=/a/bin/errhandle/err
12 source $bashrc_dir/err
15 # In t8, it runs clear_console for login shells by default. I don't want
16 # my console cleared. And linux ttys get cleared without this.
17 if shopt login_shell
>/dev
/null
&& [[ -e ~
/.bash_logout
]]; then
21 # if [[ -s /usr/share/bash-completion/completions/git ]]; then
22 # source /usr/share/bash-completion/completions/git
24 # if [[ -s /usr/share/bash-completion/completions/gitk ]]; then
25 # source /usr/share/bash-completion/completions/gitk
28 # for testing error catching:
44 # remove all aliases. aliases provided by the system tend to get in the way,
45 # for example, error happens if I try to define a function the same name as an alias
48 # remove gnome keyring warning messages
49 # there is probably a more proper way, but I didnt find any easily on google
50 # now using xfce+xmonad instead of vanilla xmonad, so disabling this
51 #unset GNOME_KEYRING_CONTROL
53 # use extra globing features.
55 # include .files when globbing, but ignore files name . and ..
56 # setting this also sets dotglob.
57 export GLOBIGNORE
="*/.:*/.."
59 # Useful info. see man bash.
63 # broken with bash_completion package. Saw a bug for this once. dont anymore.
64 # still broken in wheezy
65 # still buggered in latest stable from the web, version 2.1
66 # perhaps its fixed in newer git version, which fails to make for me
67 # this note is from 6-2014.
68 # still broken in flidas.
71 # make tab on an empty line do nothing
72 shopt -s no_empty_cmd_completion
74 # fix spelling errors for cd, only in interactive shell
76 # append history instead of overwritting it
78 # for compatibility, per gentoo/debian bashrc
80 # attempt to save multiline single commands as single history entries.
87 if [[ $LC_INSIDE_EMACS ]]; then
88 # EMACS is used by bash on startup, but we dont need it anymore.
89 # plus I hit a bug in a makefile which inherited it
91 export LC_INSIDE_EMACS
94 # scp completion does not work, but this doesnt fix it. todo, figure this out
95 #complete -r scp &> /dev/null
96 # todo, remote file completion fails, figure out how to turn it off
97 export NODE_DISABLE_COLORS
=1
98 # This gets rid of ugly terminal escape chars in node repl
99 # sometime, Id like to have completion working in emacs shell for node
100 # the offending chars can be found in lib/readline.js,
101 # things that do like:
102 # stream.write('\x1b[' + (x + 1) + 'G');
103 # We can remove them and keep readline, for example by doing this
105 #!/usr/bin/env nodejs
106 # var readline = require('readline');
107 # readline.cursorTo = function(a,b,c) {};
108 # readline.clearScreenDown = function(a) {};
109 # const repl = require('repl');
110 # var replServer = repl.start('');
112 # no prompt, or else readline complete seems to be confused, based
113 # on our column being different? node probably needs to send
114 # different kind of escape sequence that is not ugly. Anyways,
115 # completion doesnt work yet even with the ugly prompt, so whatever
117 export NODE_NO_READLINE
=1
121 export SSH_CONFIG_FILE_OVERRIDE
=/root
/.ssh
/confighome
123 # emacs has a different default search path than the info command. This
124 # adds the info defaults to emacs, but not the reverse, because I dun
125 # care much about the cli. The search path is only on the cli if you run
126 # "info xxx", or in emacs if you run '(info xxx)', so not that
127 # important, but might as well fix it.
129 # info info says this path is what was compiled, and its not documented
130 # anywhere. Through source grepping, i found it in filesys.h of the info
131 # source in trisquel flidas.
133 # Traling : means for emacs to add its own stuff on to the end.
135 export INFOPATH
=$PATH:/usr
/local
/info
:/usr
/info
:/usr
/local
/lib
/info
:/usr
/lib
/info
:/usr
/local
/gnu
/info
:/usr
/local
/gnu
/lib
/info
:/usr
/gnu
/info
:/usr
/gnu
/lib
/info
:/opt
/gnu
/info
:/usr
/share
/info
:/usr
/share
/lib
/info
:/usr
/local
/share
/info
:/usr
/local
/share
/lib
/info
:/usr
/gnu
/lib
/emacs
/info
:/usr
/local
/gnu
/lib
/emacs
/info
:/usr
/local
/lib
/emacs
/info
:/usr
/local
/emacs
/info
:.
:
137 # for openwrt system that has no stty, this is easier than
138 # guarding every time i use it.
139 if ! type -p stty
>/dev
/null
; then
145 if [[ $
- == *i
* ]]; then
146 # for readline-complete.el
147 if [[ $LC_INSIDE_EMACS ]]; then
148 # all for readline-complete.el
150 bind 'set horizontal-scroll-mode on'
151 bind 'set print-completions-horizontally on'
152 bind '"\C-i": self-insert'
156 if [[ $TERM != dumb
]] && test -t 1; then
160 if [[ $KONSOLE_PROFILE_NAME ]]; then
164 if [[ $TERM == alacritty
&& ! -e /usr
/share
/terminfo
/a
/alacritty
]]; then
165 # todo: we should try installing the alacritty terminfo if it is not found
166 # https://github.com/alacritty/alacritty/issues/2838
170 # copying from the alacritty example above,
171 if [[ $TERM == xterm-kitty
]]; then
172 if [[ ! -e /usr
/share
/terminfo
/x
/xterm-kitty
]]; then
175 if [[ -e /a
/opt
/kitty
/shell-integration
/bash
/kitty.bash
]]; then
176 KITTY_SHELL_INTEGRATION
=t
177 source /a
/opt
/kitty
/shell-integration
/bash
/kitty.bash
182 # todo: not sure this works in sakura
184 #bind "\C-w": kill-region
185 # sakura == xterm-256color
187 if [[ $TERM != xterm-kitty
&& $TERM == xterm
* ]]; then
188 # control + arrow keys. for other terminals, see http://unix.stackexchange.com/questions/10806/how-to-change-previous-next-word-shortcut-in-bash
189 bind '"\e[1;5C": shell-forward-word' 2>/dev
/null
190 bind '"\e[1;5D": shell-backward-word' 2>/dev
/null
192 # make ctrl-backspace work. for konsole, i fixed it through
193 # /home/iank/.local/share/konsole/default.keytab
195 bind '"\eOc": shell-forward-word'
196 bind '"\eOd": shell-backward-word'
198 # i cant remember why i did this, probably to free up some keys to bind
199 # to other things in bash.
200 # other than C-c and C-z, the rest defined by stty -a are, at least in
201 # gnome-terminal, overridden by bash, or disabled by the system
202 stty lnext undef stop undef start undef
208 # fixup broken backspace in chroots
209 xterm-kitty|alacritty
)
211 TERM
=xterm-256color
command chroot
"$@"
216 export BC_LINE_LENGTH
=0
219 export PROFILE_TASKS_TASK_OUTPUT_LIMIT
=100
221 # note, if I use a machine I dont want files readable by all users, set
222 # umask 077 # If fewer than 4 digits are entered, leading zeros are assumed
224 # i for insensitive. the rest from
225 # X means dont remove the current screenworth of output upon exit
226 # R means to show colors n things
228 export SYSTEMD_LESS
=$LESS
230 export NNN_COLORS
=2136
232 export SL_FILES_DIR
=/b
/ds
/sl
/.iank
233 export SL_INFO_DIR
=/p
/sshinfo
238 if [[ -s $bashrc_dir/path-add-function
]]; then
239 source $bashrc_dir/path-add-function
240 if [[ $SSH_CLIENT ]]; then
241 if grep -qF /home
/iank
/.iank
/e
/e
/etc
/exports
&>/dev
/null
; then
242 export EMACSDIR
=/home
/iank
/.iank
/e
/e
248 # if someone exported $SOE (stop on error), catch errors.
250 # Note, on debian this results in the following warning when in ssh,
251 # hich I haven't figured out how to fix. It doesn't happen if we source
252 # after the shell has started
254 # bash: /usr/share/bashdb/bashdb-main.inc: No such file or directory
255 # bash: warning: cannot start debugger; debugging mode disabled
257 if [[ -e /a
/bin
/errhandle
/err
]]; then
258 source /a
/bin
/errhandle
/err
270 if [[ -s $path ]]; then
272 elif [[ -s $bashrc_dir/$file ]]; then
273 source $bashrc_dir/$file
278 mysrc
/a
/bin
/small-misc-bash
/ll-function
279 mysrc
/a
/bin
/distro-functions
/src
/package-manager-abstractions
284 ### begin FSF section ###
286 # Comments before functions are meant to be good useful
287 # documentation. If they fail at that, please improve them or send Ian a
290 ## copy bash completion
291 # Usage: ORIGINAL_COMMAND TARGET_COMMAND...
293 # It copies how the bash completion works from one command to other
299 if ! c
=$
(complete
-p $src 2>/dev
/null
); then
300 _completion_loader
$src &>/dev
/null ||
:
301 c
=$
(complete
-p $src 2>/dev
/null
) ||
return 0
309 ## directory history tracking and navigation.
311 # cd becomes a function, also aliased to c. b to go back, f to go
312 # forward, cl to list recent directories and choose one.
314 # The finer details you may want to skip:
316 # We also define bl to print the list of back and forward directories.
318 # We keep 2 stacks, forward and back. Unlike with a web browser, the
319 # forward stack is not erased when going somewhere new.
321 # Recent directories are stored in ~/.cdirs.
323 declare -a _dir_forward _dir_back
325 # normally, the top of _dir_back is our current dir. if it isn't,
326 # put it on there, except we don't want to do that when we
327 # just launched a shell
328 if [[ $OLDPWD ]]; then
329 if (( ${#_dir_back[@]} == 0 )) ||
[[ ${_dir_back[-1]} != "$PWD" ]]; then
334 if (( ${#_dir_back[@]} == 0 )) ||
[[ ${_dir_back[-1]} != "$PWD" ]]; then
337 echo "$PWD" >> ~
/.cdirs
344 if (( ${#_dir_back[@]} == 0 )); then
345 echo "nothing left to go back to" >&2
348 top_back
="${_dir_back[-1]}"
350 if [[ $top_back == "$PWD" ]] && (( ${#_dir_back[@]} == 1 )); then
351 echo "already on last back entry" >&2
356 if [[ $top_back == "$PWD" ]]; then
357 # add to dirf if not already there
358 if (( ${#_dir_forward[@]} == 0 )) ||
[[ ${_dir_forward[-1]} != "$top_back" ]]; then
359 _dir_forward
+=("$top_back")
361 unset "_dir_back[-1]"
362 command cd "${_dir_back[-1]}"
364 if (( ${#_dir_forward[@]} == 0 )) ||
[[ ${_dir_forward[-1]} != "$PWD" ]]; then
365 _dir_forward
+=("$PWD")
367 command cd "$top_back"
370 # Interesting feature, not sure I want it.
371 # give us a peek at what is next in the list
372 # if (( ${#_dir_back[@]} >= 2 )); then
373 # printf "%s\n" "${_dir_back[-2]}"
377 # c/b/f Implementation notes:
379 # The top of the back is $PWD
380 # as long as the last directory change was due to c,b,or cl.
382 # Example of stack changes:
408 if (( ${#_dir_forward[@]} == 0 )); then
409 echo "no forward dir left" >&2
412 top_forward
="${_dir_forward[-1]}"
413 unset "_dir_forward[-1]"
416 # give us a peek at what is next in the list
417 # if (( ${#_dir_forward[@]} )); then
418 # printf "%s\n" "${_dir_forward[-1]}"
423 local i line input start
424 local -A buttondirs alines
425 local -a buttons
dirs lines
426 buttons
=( {a..z
} {2.
.9} )
427 if [[ ! -s ~
/.cdirs
]]; then
428 echo nothing
in ~
/.cdirs
434 mapfile
-t lines
<~
/.cdirs
435 start
=$
(( ${#lines[@]} - 1 ))
437 # we have ~33 buttons as of this writing, so lets
438 # prune down the history every once in a while.
439 if (( start
> 500 )); then
440 tac ~
/.cdirs |
awk '!seen[$0]++' |
head -n 200 |
tac | sponge ~
/.cdirs ||
[[ $?
== 141 ]]
443 for (( j
=$start; j
>= 0; j--
)); do
445 if [[ ! $line ||
${alines[$line]} ||
! -d "$line" ||
$line == "$PWD" || line
== "$HOME" ]]; then
449 buttondirs
[${buttons[i]}]="$line"
450 printf "%s %s\n" ${buttons[i]} "$line"
451 if (( i
== ${#buttons[@]} - 1 )); then
457 if (( i
== 0 )); then
458 echo "no dirs in ~/.cdirs"
462 if [[ $input != $
'\n' ]]; then
463 c
"${buttondirs[$input]}"
470 start
=$
(( ${#_dir_back[@]} - 1 ))
472 # cleanup possible repeating of pwd
473 if (( start
>= 0 )) && [[ ${_dir_back[$start]} == "$PWD" ]]; then
474 start
=$
(( start
- 1 ))
477 if (( start
>= 0 )); then
478 for (( i
=$start; i
>= 0 ; i--
)); do
479 printf "%s %s\n" $j ${_dir_back[i]}
481 if (( j
>= max
)); then
488 start
=$
(( ${#_dir_forward[@]} - 1 ))
490 # cleanup possible repeating of pwd
491 if (( start
>= 0 )) && [[ ${_dir_forward[$start]} == "$PWD" ]]; then
492 start
=$
(( start
- 1 ))
494 if (( start
< 0 )); then
499 for (( i
=$start; i
>= 0 ; i--
)); do
500 printf "%s %s\n" $j ${_dir_forward[i]}
502 if (( j
>= max
)); then
508 # pee do. run args as a command with output copied to syslog.
510 # Usage: pd [-t TAG] COMMAND...
512 # -t TAG Override the tag in the syslog. The default is COMMAND with
513 # any path part is removed, eg. for /bin/cat the tag is cat.
515 # You can view the log via "journalctl -t TAG"
521 -t) tag
="$2"; shift 2 ;;
523 echo "PWD=$PWD command: $*" | logger
-t $tag
524 "$@" |
& pee
cat "logger -t $tag" || ret
=$?
525 echo "exited with status=$ret" | pee
cat "logger -t $tag"
526 # this avoids any err-catch
527 (( $ret == 0 )) ||
return $ret
531 # jdo = journal do. Run command as transient systemd service, tailing
532 # its output in the journal until it completes.
534 # Usage: jdo COMMAND...
536 # Compared to pd: commands recognize this is a non-interactive shell.
537 # The service is unaffected if our ssh connection dies, no need to run
540 # Note: The last few lines of any existing entries for a unit by that
541 # name will be output first, and there will be a few second delay at the
542 # start of the command, and a second or so at the end.
544 # Note: Functions and aliases obviously won't work, we resolve the
547 # Note: requires running as root.
549 local cmd cmd_name jr_pid ret
553 if [[ $EUID != 0 ]]; then
554 echo "jdo: error: rerun as root"
558 if [[ $cmd != /* ]]; then
559 cmd
=$
(type -P "$cmd")
562 journalctl
-qn2 -f -u "$cmd_name" &
563 # Trial and error of time needed to avoid missing initial lines.
564 # .5 was not reliable. 1 was not reliable. 2 was not reliable
567 systemd-run
--unit "$cmd_name" --wait --collect "$cmd" "$@" || ret
=$?
568 # The sleep lets the journal output its last line
569 # before the prompt comes up.
571 kill $jr_pid &>/dev
/null ||
:
574 # this avoids any err-catch
575 (( $ret == 0 )) ||
return $ret
583 ....
() { c ..
/..
/..
; }
584 .....
() { c ..
/..
/..
/..
; }
585 ......
() { c ..
/..
/..
/..
/..
; }
590 path
=$
(readlink
-e "$f")
591 echo "cat >$path <<'EOF'"
598 # file cut copy and paste, like the text buffers :)
599 # I havnt tested these.
600 _fbufferinit
() { # internal use
601 ! [[ $my_f_tempdir ]] && my_f_tempdir
=$
(mktemp
-d)
602 rm -rf "${my_f_tempdir:?}"/*
606 cp "$@" "$my_f_tempdir"/
610 mv "$@" "$my_f_tempdir"/
612 fpst
() { # file paste
613 [[ $2 ]] && { echo too many arguments
; return 1; }
615 cp "$my_f_tempdir"/* "$target"
619 local host ip port
file key
620 read -r host ip port
< <(timeout
-s 9 2 ssh -oBatchMode=yes -oControlMaster=no
-oControlPath=/ -v $1 |
& sed -rn "s/debug1: Connecting to ([^ ]+) \[([^\]*)] port ([0-9]+).*/\1 \2 \3/p" ||
: )
621 file=$
(readlink
-f ~
/.ssh
/known_hosts
)
623 echo "khfix: ssh failed"
626 if [[ $port != 22 ]]; then
627 ip_entry
="[$ip]:$port"
628 host_entry
="[$host]:$port"
634 if [[ $host != $ip ]]; then
635 key
=$
(ssh-keygen
-F "$host_entry" -f $file |
sed -r 's/^.*([^ ]+ +[^ ]+) *$/\1/')
637 grep -Fv "$key" "$file" | sponge
"$file"
640 key
=$
(ssh-keygen
-F "$ip_entry" -f $file |
sed -r 's/^.*([^ ]+ +[^ ]+) *$/\1/')
642 grep -Fv "$key" "$file" | sponge
"$file"
644 ll ~
/.ssh
/known_hosts
647 khfix
() { # known hosts fix
648 _khfix_common
"$@" ||
return 1
658 x
=$
(readlink
-nf "${1:-$PWD}")
659 # yes, its kinda dumb that xclip/xsel cant do this in one invocation
660 echo -n "$x" | xclip
-selection clipboard
664 # a1 = awk {print $1}
665 for field
in {1.
.20}; do
666 eval a
$field"() { awk '{print \$$field}'; }"
669 for num
in {1.
.9}; do
670 eval h
$num"() { head -n$num; }"
675 printf '%d.%d.%d.%d\n' $
(echo $1 |
sed 's/../0x& /g')
679 local f out outdir
in
693 m ffmpeg
-threads 0 -i $in -g 192 -vcodec libvpx-vp9
-vf scale
=-1:720 -max_muxing_queue_size 9999 -b:v
750K
-pass 1 -an -f null
/dev
/null
694 m ffmpeg
-y -threads 0 -i $in -g 192 -vcodec libvpx-vp9
-vf scale
=-1:720 -max_muxing_queue_size 9999 -b:v
750K
-pass 2 -c:a libvorbis
-qscale:a
5 $out
699 utcl
() { # utc 24 hour time to local hour 24 hour time
700 echo "print( ($1 $(date +%z | sed -r 's/..$//;s/^(-?)0*/\1/')) % 24)"|python3
708 # for running in a fai rescue. iank specific.
710 d
=vgata-Samsung_SSD_850_EVO_2TB_S2RLNX0J502123D
711 for f
in $d vgata-Samsung_SSD_870_QVO_8TB_S5VUNG0N900656V
; do
712 cryptsetup luksOpen
--key-file /p
/dev
/$f/root crypt-
$f-root
713 cryptsetup luksOpen
--key-file /p
/dev
/$f/o crypt-
$f-o
715 mount
-o subvol
=root_trisquelaramo
/dev
/mapper
/crypt-
$d-root /mnt
716 mount
-o subvol
=a
/dev
/mapper
/crypt-
$d-root /mnt
/a
717 mount
-o subvol
=o
/dev
/mapper
/crypt-
$d-o /mnt
/o
718 mount
-o subvol
=boot_trisquelaramo
/dev
/sda2
/mnt
/boot
726 c4
() { c
/var
/log
/exim4
; }
728 caa
() { git commit
--amend --no-edit -a; }
739 # shellcheck disable=SC2033
740 find -L "$@" -type f
-not \
( -name .svn
-prune -o -name .git
-prune \
741 -o -name .hg
-prune -o -name .editor-backups
-prune \
742 -o -name .undo-tree-history
-prune \
) \
743 -exec bash
-c '. ~/.bashrc; hr; echo "$1"; hr; cat "$1"' _
{} \
; 2>/dev
/null
748 calc
() { echo "scale=3; $*" |
bc -l; }
749 # no having to type quotes, but also no command history:
753 echo "scale=3; $x" |
bc -l
760 ccat
() { # config cat. see a config without extra lines.
761 sed -r '/^[[:space:]]*([;#]|--|\/\/|$)/d' "$@"
767 # dev/pts needed for pacman signature check
768 for d
in dev proc sys dev
/pts
; do
770 if ! mountpoint
$d &>/dev
/null
; then
771 m s mount
-o bind /$d $d
777 # dev/pts needed for pacman signature check
778 for d
in dev
/pts dev proc sys
; do
780 if mountpoint
$d &>/dev
/null
; then
788 # join options which are continued to multiples lines onto one line
790 while IFS
= read -r line
; do
791 # remove leading spaces/tabs. assumes extglob
792 if [[ $line == "[ ]*" ]]; then
798 elif [[ $line == *=* ]]; then
799 echo "$pastline" >> "$2"
802 pastline
="$pastline $line"
804 done < <(grep -vE '^([ \t]*#|^[ \t]*$)' "$1")
805 echo "$pastline" >> "$2"
810 # setup for format of postfix, eg:
813 local pastline unified f1 f2
817 _cdiff-prep
"$1" "$f1"
818 _cdiff-prep
"$2" "$f2"
819 cat "$f1" "$f2" |
grep -Po '^[^=]+=' |
sort |
uniq > "$unified"
820 while IFS
= read -r line
; do
821 # the default bright red / blue doesnt work in emacs shell
822 dwdiff
-cblue,red
-A best
-d " ," <(grep "^$line" "$f1" ||
echo ) <(grep "^$line" "$f2" ||
echo ) | colordiff
830 # shellcheck disable=SC2030
831 inotifywait
-m "$dir" -e create
-e moved_to | \
832 while read -r filedir _
file; do
835 calc $
((SECONDS
- start
)) / 60
842 s chown
-R $USER:$USER "$@"
845 # shellcheck disable=SC2032
847 # makes it so chown -R symlink affects the symlink and its target.
848 if [[ $1 == -R ]]; then
850 command chown
-h "$@"
851 command chown
-R "$@"
862 d
() { builtin bg "$@"; }
866 diff --strip-trailing-cr -w "$@" # diff content
874 safe_rename
"$x" "$y"
879 # usage: dfp MOUNTPOINT [SECOND_INTERVAL]
880 # SECOND_INTERVAL defaults to 90
883 local a b mp interval
887 echo "dfp: error, missing 1st arg" >&2
891 a
=$
(df
--output=used
$mp |
tail -n1)
893 b
=$
(df
--output=used
$mp |
tail -n1)
894 printf "used mib: %'d mib/min: %s\n" $
(( b
/1000 )) $
(( (b-a
) / (interval
* 1000 / 60 ) ))
898 # get ipv4 ip from HOST. or if it is already a number, return that
906 getent ahostsv4
"$host" |
awk '{ print $1 }' |
head -n1
912 command dig +nostats
+nocmd
"$@"
914 # Output with sections sorted, and removal of query id, so 2 dig outputs can be diffed.
918 dig +nordflag
"$@" |
sed -r 's/^(;; ->>HEADER<<-.*), id: .*/\1/' |
while read -r l
; do
919 if [[ $l == [^\
;]* ]]; then
923 printf "%s" "$sec" |
sort
931 # compare digs to the 2 servers
932 # usage: digdiff @server1 @server2 DIG_ARGS
933 # note: only the soa master nameserver will respond with
934 # ra "recursive answer" flag. That difference is meaningless afaik.
941 digsort
$s1 "$@" |
tee /tmp
/digdiff
942 diff -u /tmp
/digdiff
<(digsort
$s2 "$@")
946 date "+%A, %B %d, %r" "$@"
953 dus
() { # du, sorted, default arg of
954 du
-sh ${@:-*} |
sort -h
959 e
() { printf "%s\n" "$*"; }
967 printf "%qEOL\n" "${arg}"
968 printf "%s" "${arg}" |
& hexdump -C
972 # echo variables. print var including escapes, etc, like xxd for variable
978 if [[ -v $arg ]]; then
979 printf "%qEOL\n" "${!arg}"
980 printf "%s" "${!arg}" |
& hexdump -C
982 echo arg
$arg is
unset
988 [[ ${#@} == 2 ]] ||
{ echo "error: ediff requires 2 arguments"; return 1; }
989 emacs
--eval "(ediff-files \"$1\" \"$2\")"
995 tail -F /var
/log
/exim
4/mainlog
/var
/log
/exim
4/*main
/var
/log
/exim
4/paniclog
/var
/log
/exim
4/*panic
-n 200 "$@"
999 tail -F /var
/log
/exim
4/mainlog
-n 200 "$@"
1002 tail -F /var
/log
/exim
4/mymain
-n 200 "$@"
1004 ccomp
tail etail etail2
1009 # print exim old pids
1011 local configtime pid piduptime now daemonpid
1012 printf -v now
'%(%s)T' -1
1013 configtime
=$
(stat
-c%Y
/var
/lib
/exim
4/config.autogenerated
)
1014 if [[ -s /run
/exim
4/exim.pid
]]; then
1015 daemonpid
=$
(cat /run
/exim
4/exim.pid
)
1017 for pid
in $
(pgrep
-f '^/usr/sbin/exim4( |$)'); do
1018 # the daemonpid gets reexeced on HUP (service reloads), keeping its same old timestamp
1019 if [[ $pid == $daemonpid ]]; then
1022 piduptime
=$
(awk -v ticks
="$(getconf CLK_TCK)" 'NR==1 { now=$1; next } END { printf "%9.0f\n", now - ($20/ticks) }' /proc
/uptime RS
=')' /proc
/$pid/stat
) ||
: # sometimes pids disappear pretty fast
1023 if (( configtime
> now
- piduptime
)); then
1029 # exim tail but only watch lines from new pids
1032 for pid
in $
(eoldpids
); do
1035 if [[ $oldpids ]]; then
1036 etail |
awk '$3 !~ /^\[('"${oldpids%|}"')\]$/'
1041 # exim watch as old pids go away
1043 local configtime pid piduptime now
1048 oldpids
=($
(eoldpids
))
1049 if (( ! ${#oldpids[@]} )); then
1052 # print the date every 20 iterations
1053 if (( ! count
% 20 )); then
1057 ps
-f -p "${oldpids[*]}"
1063 less /var
/log
/exim
4/mainlog
1067 exiqgrep
-ir.\
* -o 60 |
while read -r i
; do
1070 hlm exigrep
$i /var
/log
/exim
4/mainlog |
cat ||
:
1074 # other ways to get the list of message ids:
1075 # exim -bp | awk 'NF == 4 {print $3}'
1076 # # this is slower 160ms, vs 60.
1078 exiqgrep
-ir.\
* |
xargs exim
-Mrm
1083 mkdir
-p /tmp
/edev
/etc
1084 cp -ra /etc
/exim4
/tmp
/edev
/etc
1085 cp -ra /etc
/alias* /tmp
/edev
/etc
1086 find /tmp
/edev
/etc
/exim4
-type f
-execdir sed -i "s,/etc/,/tmp/edev/etc/,g" '{}' +
1090 update-exim4.conf
-d /tmp
/edev
/etc
/exim4
-o /tmp
/edev
/e.conf
1097 # find array. make an array of file names found by find into $x
1098 # argument: find arguments
1099 # return: find results in an array $x
1100 while read -rd ''; do
1102 done < <(find "$@" -print0);
1105 faf
() { # find all files. use -L to follow symlinks
1106 find "$@" -not \
( -name .svn
-prune -o -name .git
-prune \
1107 -o -name .hg
-prune -o -name .editor-backups
-prune \
1108 -o -name .undo-tree-history
-prune \
) -type f
2>/dev
/null
1111 # full path without resolving symlinks
1116 printf "%s/%s\n" $
(cd $dir; pwd) "$base"
1123 sudo mailq |gr frozen|
awk '{print $3}' |
while read -r id
; do
1129 echo -e '\n\n##############################\n'
1130 done |
tee -a /tmp
/frozen
1134 while read -r line
; do
1135 printf '%s\n' "$line"
1136 ids
+=($
(printf '%s\n' "$line" |gr frozen|
awk '{print $3}'))
1138 echo "sleeping for 2 in case you change your mind"
1140 sudo exim
-Mrm "${ids[@]}"
1144 # like -e for functions. returns on error.
1145 # at the end of the function, disable with:
1147 trap 'echo "${BASH_COMMAND:+BASH_COMMAND=\"$BASH_COMMAND\" }
1148 ${FUNCNAME:+FUNCNAME=\"$FUNCNAME\" }${LINENO:+LINENO=\"$LINENO\" }\$?=$?"
1154 local help="Usage: getdir [--help] PATH
1155 Output the directory of PATH, or just PATH if it is a directory."
1156 if [[ $1 == --help ]]; then
1160 if [[ $# -ne 1 ]]; then
1161 echo "getdir error: expected 1 argument, got $#"
1164 if [[ -d $1 ]]; then
1168 dir
="$(dirname "$1")"
1169 if [[ -d $dir ]]; then
1172 echo "getdir error: directory does not exist"
1178 git_empty_branch
() { # start an empty git branch. carefull, it deletes untracked files.
1179 [[ $# == 1 ]] ||
{ echo 'need a branch name!'; return 1;}
1181 root
=$
(gitroot
) ||
return 1 # function to set gitroot
1183 git symbolic-ref HEAD refs
/heads
/$1
1188 # shellcheck disable=SC2120
1190 local help="Usage: gitroot [--help]
1191 Print the full path to the root of the current git repo
1193 Handles being within a .git directory, unlike git rev-parse --show-toplevel,
1194 and works in older versions of git which did not have that."
1195 if [[ $1 == --help ]]; then
1200 p
=$
(git rev-parse
--git-dir) ||
{ echo "error: not in a git repo" ; return 1; }
1201 [[ $p != /* ]] && p
=$PWD
1207 # todo: patch emacs so it will look elsewhere. this is kinda sad:
1208 # https://emacs.stackexchange.com/questions/4253/how-to-start-emacs-with-a-custom-user-emacs-directory
1210 local args gdb
=false
1212 if [[ $EMACSDIR ]]; then
1213 path-add
"$EMACSDIR/lib-src" "$EMACSDIR/src"
1216 if [[ $DISPLAY ]]; then
1220 if (( $# == 0 )); then
1223 # duplicate -c, but oh well
1224 if ! pgrep
-u $EUID emacsclient
; then
1225 if (( $# == 0 )) && type -p gdb
&>/dev
/null
; then
1231 if [[ $EMACSDIR ]]; then
1232 # Alter the path here, otherwise the nfs mount gets triggered on the
1233 # first path lookup when emacs is not being used.
1234 PATH
="$EMACSDIR/lib-src:$EMACSDIR/src:$PATH" EHOME
=$HOME HOME
=$EMACSDIR m emacsclient
-a "" $args "$@"
1237 # due to a bug, we cant debug from the start unless we get a new gdb
1238 # https://sourceware.org/bugzilla/show_bug.cgi?id=24454
1239 # m gdb -ex="set follow-fork-mode child" -ex=r -ex=quit --args emacs --daemon
1240 m emacsclient
-a "" $args "$@"
1242 cd /a
/opt
/emacs-$
(distro-name
)$
(distro-num
)
1243 s gdb
-p $
(pgrep
-f 'emacs --daemon') -ex c
1246 m emacsclient
-a "" $args "$@"
1251 # force terminal version
1257 # quit will prompt if the program crashes.
1258 gdb
-ex=r
-ex=quit
--args emacs
"$@"; r
;
1262 # kill the emacs daemon
1267 grep -iIP --color=auto
"$@" ||
return $?
1269 grr
() { # grep recursive
1270 # Don't return 1 on nonmatch because this is meant to be
1271 # interactive, not in a conditional.
1272 if [[ ${#@} == 1 ]]; then
1273 grep --exclude-dir='*.emacs.d' --exclude-dir='*.git' -riIP --color=auto
"$@" . ||
[[ $?
== 1 ]]
1275 grep --exclude-dir='*.emacs.d' --exclude-dir='*.git' -riIP --color=auto
"$@" ||
[[ $?
== 1 ]]
1283 hr
() { # horizontal row. used to break up output
1284 printf "$(tput setaf 5 2>/dev/null ||:)█$(tput sgr0 2>/dev/null||:)%.0s" $
(eval echo "{1..${COLUMNS:-60}}")
1289 local col input_len
=0
1291 input_len
=$
((input_len
+ 1 + ${#arg}))
1293 col=$
((60 - input_len
))
1294 printf "\e[1;97;41m%s" "$*"
1295 if (( col > 0 )); then
1296 printf "\e[1;97;41m \e[0m%.0s" $
(eval echo "{1..${col}}")
1300 hlm
() { hl
"$*"; "$@"; }
1302 hrcat
() { local f
; for f
; do [[ -f $f ]] ||
continue; hr
; echo "$f"; cat "$f"; done }
1305 # get latest hub and run it
1306 # main command to use:
1307 # hub pull-request --no-edit
1308 # --no-edit means to use the first commit\'s message as the pull request message.
1309 # If that fails, try doing
1310 # hub pull-request --no-edit -b UPSTREAM_OWNER:branch
1311 # where branch is usually master. it does the pr against your current branch.
1313 # On first use, you input username/pass and it gets an oath token so you dont have to repeat
1314 # it\'s at ~/.config/hub
1316 local up uptar updir p v
1317 # example https://github.com/github/hub/releases/download/v2.14.2/hub-linux-amd64-2.14.2.tgz
1318 up
=$
(wget
-q -O- https
://api.github.com
/repos
/github
/hub
/releases
/latest | jq
-r .assets
[].browser_download_url |
grep linux-amd64
)
1320 if [[ ! $up ||
$up == $re ]]; then
1321 echo "failed to get good update url. got: $up"
1325 if [[ ! -e /a
/opt
/$updir ]]; then
1326 rm -rf /a
/opt
/hub-linux-amd64
*
1328 tar -C /a
/opt
-zxf /a
/opt
/$uptar
1331 if ! which hub
&>/dev
/null
; then
1332 sudo
/a
/opt
/$updir/install
1335 # save token across computers
1336 if [[ ! -L ~
/.config
/hub
]]; then
1337 if [[ -e ~
/.config
/hub
]]; then
1338 mv ~
/.config
/hub
/p
/c
/subdir_files
/.config
/
1340 if [[ -e /p
/c
/subdir_files
/.config
/hub
]]; then
1354 # cvs update -C FILE
1359 # potentially useful command translation
1360 # https://fling.seas.upenn.edu/~giesen/dynamic/wordpress/equivalent-commands-for-git-svn-and-cvs/
1362 # importing cvs repo into git using git-cvs package:
1363 # /f/www $ /usr/lib/git-core/git-cvsimport -C /f/www-git
1378 # -L = follow symlinks
1379 find -L .
-not \
( -name .svn
-prune -o -name .git
-prune \
1380 -o -name .hg
-prune -o -name .editor-backups
-prune \
1381 -o -name .undo-tree-history
-prune \
) -iname "*$**" 2>/dev
/null
1385 # insensitive find directory
1386 find -L .
-type d
-not \
( -name .svn
-prune -o -name .git
-prune \
1387 -o -name .hg
-prune -o -name .editor-backups
-prune \
1388 -o -name .undo-tree-history
-prune \
) -iname "*$**" 2>/dev
/null
1393 sudo iptables
-A INPUT
-s $1 -j DROP
1398 grep -Il "" "$@" &>/dev
/null
1406 journalctl
-n 10000 -f "$@"
1408 jr
() { journalctl
"$@" ; }
1409 jrf
() { journalctl
-f "$@" ; }
1411 journalctl
-u exim4 _SYSTEMD_INVOCATION_ID
=$
(systemctl show
-p InvocationID
--value $1)
1417 if [[ $PWD == /[iap
] ]]; then
1418 command ls -A --color=auto
-I lost
+found
"$@"
1420 command ls -A --color=auto
"$@"
1424 lcn
() { locate -i "*$**"; }
1426 lg
() { LC_COLLATE
=C.UTF-8 ll
--group-directories-first "$@"; }
1428 lt
() { ll
-tr "$@"; }
1430 lld
() { ll
-d "$@"; }
1432 ccomp
ls l lg lt lld ll
1438 for dirs in false true
; do
1440 if [[ -d $f ]]; then
1442 # reverse the order to rename the nested dirs first.
1443 # note: 0 element is the dir itself
1444 for ((i
=${#all[@]}-1; i
>=1; i--
)); do
1446 if $dirs && [[ -d $a ]]; then
1447 # e dirs low "$a" # debug
1449 elif ! $dirs && [[ ! -d $a && -e $a ]]; then
1451 # e not dirs low "$a" # debug
1456 # just rename all the top level args on the second pass
1458 # e final dirs low "$f" # debug
1465 low
() { # make filenames lowercase, remove bad chars
1468 arg
="${arg%%+(/)}" # remove trailing slashes. assumes we have extglob on.
1470 if (( ${#dir} == ${#arg} )); then
1474 new
="${f,,}" # downcase
1475 new
="${new//[^a-zA-Z0-9._-]/_}" # sub bad chars
1476 new
="${new#"${new%%[[:alnum:]]*}"}" # remove leading/trailing non-alnum
1477 new
="${new%"${new##*[[:alnum:]]}"}"
1478 # remove bad underscores, like __ and _._
1479 new
=$
(echo $new |
sed -r 's/__+/_/g;s/_+([.-])|([.-])_+/\1/g')
1480 safe_rename
"$dir/$f" "$dir/$new" ||
return 1
1485 lower
() { # make first letter of filenames lowercase.
1488 if [[ ${x::1} == [A-Z
] ]]; then
1489 y
=$
(tr '[:upper:]' '[:lower:]' <<<"${x::1}")"${x:1}"
1490 safe_rename
"$x" "$y" ||
return 1
1496 k
() { # history search
1497 grep -iP --binary-files=text
"$@" ${HISTFILE:-~/.bash_history} |
tail -n 80 ||
[[ $?
== 1 ]];
1499 ks
() { # history search with context
1500 # args are an extended regex used by sed
1501 history |
sed -nr "h;s/^\s*(\S+\s+){4}//;/$*/{g;p}" |
tail -n 80 ||
[[ $?
== 1 ]];
1503 ksu
() { # history search unique
1504 grep -P --binary-files=text
"$@" ${HISTFILE:-~/.bash_history} |
uniq ||
[[ $?
== 1 ]];
1507 # todo: id like to do maybe a daily or hourly cronjob to
1508 # check that my history file size is increasing. Ive had it
1509 # inexplicably truncated in the past.
1512 HISTTIMEFORMAT
= history |
awk -v IGNORECASE
=1 '{ a=$1; sub(/^ *[^ ]+ */, "") }; /'"$*"'/'
1513 read -p "press anything but contrl-c to delete"
1514 for entry
in $
(HISTTIMEFORMAT
= history |
awk -v IGNORECASE
=1 '{ a=$1; sub(/^ *[^ ]+ */, "") }; /'"$*"'/ { print a }' |
tac); do
1520 ccomp
grep k ks ksu histrm
1524 # show make targets, via http://stackoverflow.com/questions/3063507/list-goals-targets-in-gnu-make
1525 make -qp |
awk -F':' '/^[a-zA-Z0-9][^$#\/\t=]*:([^=]|$)/ {split($1,A,/ /);for(i in A)print A[i]}'
1538 mkt
() { # mkdir and touch file
1540 mkdir
-p "$(dirname "$path")"
1544 # shellcheck disable=SC2032
1545 mkdir
() { command mkdir
-p "$@"; }
1548 # https://github.com/HenriWahl/Nagstamon/issues/357
1549 if ! pgrep
-f /usr
/lib
/notification-daemon
/notification-daemon
>/dev
/null
; then
1550 /usr
/lib
/notification-daemon
/notification-daemon
&
1552 /usr
/bin
/nagstamon
&
1556 # cant use s because sudo -i doesnt work for passwordless sudo command
1559 sudo nmtui-connect
"$@"
1569 if shopt nullglob
>/dev
/null
; then
1583 # shellcheck disable=SC2024
1585 for f
in /var
/log
/exim
4/paniclog
/var
/log
/exim
4/*panic
; do
1587 if [[ -s $f ]]; then
1588 echo ================== $f =============
1589 s
tee -a /var
/log
/exim
4/$base-archive <$f
1597 ping() { command ping -O "$@"; }
1598 p8
() { ping "$@" 8.8.8.8; }
1599 p6
() { ping6
"$@" 2001:4860:4860::8888; }
1601 pkx
() { # package extract
1602 local pkg cached tmp f
1605 # shellcheck disable=SC2012
1606 cached
=$
(ls -t /var
/cache
/apt
/archives
/$pkg* |
tail -n1 2>/dev
/null
) ||
:
1607 if [[ $cached ]]; then
1610 aptitude download
$pkg ||
return 1
1612 tmp
=(*); f
=${tmp[0]} # only 1 expected
1620 pid
=($
(pgrep
-f "$*"))
1623 # shellcheck disable=SC2128
1629 0) echo "no pid found" ;;
1638 help="Usage: psg [--help] GREP_ARGS
1639 grep ps and output in a nice format"
1640 if [[ $1 == --help ]]; then
1645 # final grep is because some commands tend to have a lot of trailing spaces
1646 y
=$
(echo "$x" |
grep -iP "$@" |
grep -o '.*[^ ]') ||
:
1648 echo "$x" |
head -n 1 ||
[[ $?
== 141 ]]
1653 pubip
() { curl
-4s https
://icanhazip.com
; }
1654 pubip6
() { curl
-6s https
://icanhazip.com
; }
1655 whatismyip
() { pubip
; }
1658 q
() { # start / launch a program in the backround and redir output to null
1662 # shellcheck disable=SC2120
1664 if [[ $HISTFILE ]]; then
1665 history -a # save history
1667 trap ERR
# this avoids a segfault
1669 # i had this redir, not sure why
1670 # exit "$@" 2>/dev/null
1673 # scp is insecure and deprecated.
1675 rsync
--inplace "$@"
1680 # available high ports are 1024-65535,
1681 # but lets skip things that are more likely to be in use
1684 print(secrets.SystemRandom().randrange(10002,65500))
1699 # rsync, root is required to keep permissions right.
1700 # rsync --archive --human-readable --verbose --itemize-changes --checksum \(-ahvic\) \
1701 # --no-times --delete
1702 # basically, make an exact copy, use checksums instead of file times to be more accurate
1703 rsync
-ahvic --delete "$@"
1706 # like rlu, but dont delete files on the target end which
1707 # do not exist on the original end.
1711 # rl without preserving modification time.
1712 rsync
-ahvic --delete --no-t "$@"
1714 # [RSYNC_OPTS] HOST PATH
1716 # eg. rsu -opts frodo /testpath
1717 # relative paths will expanded with readlink -f.
1718 opts
=("${@:1:$#-2}") # 1 to last -2
1719 path
="${*:$#}" # last
1720 host="${*:$#-1:1}" # last -1
1721 if [[ $path == .
* ]]; then
1722 path
=$
(readlink
-f $path)
1724 m rsync
-ahvi --relative --no-implied-dirs "${opts[@]}" "$path" "root@$host:/";
1726 ccomp rsync rsd rsa rst rsu
1728 # find programs listening on a port
1731 # to figure out these args, i had to look at the man page from git version, as of 2022-04.
1732 s ss
-lpn state listening sport
= $port
1737 if [[ $
(systemctl is-active nscd ||
:) != inactive
]]; then
1742 hr
; s ss
-lpn sport
= 53
1743 if systemctl is-enabled dnsmasq
&>/dev
/null ||
[[ $
(systemctl is-active dnsmasq ||
:) != inactive
]]; then
1744 # this will fail is dnsmasq is failed
1745 hr
; m ser status dnsmasq |
cat ||
:
1747 hr
; echo $f:; ccat
$f
1748 hr
; m grr
'^ *(servers-file|server) *=|^ *no-resolv *$' /etc
/dnsmasq.conf
/etc
/dnsmasq.d
1749 f
=/etc
/dnsmasq-servers.conf
1750 hr
; echo $f:; ccat
$f
1753 echo /etc
/nsswitch.conf
:
1754 grep '^ *hosts:' /etc
/nsswitch.conf
1755 if systemctl is-enabled systemd-resolved
&>/dev
/null ||
[[ $
(systemctl is-active systemd-resolved ||
:) != inactive
]]; then
1756 hr
; m ser status systemd-resolved |
cat ||
:
1757 hr
; m resolvectl status |
cat
1765 if [[ $
(systemctl is-active nscd ||
:) != inactive
]]; then
1769 m sudo nscd
-i hosts
1771 if [[ $
(systemctl is-active dnsmasq ||
:) != inactive
]]; then
1772 m sudo systemctl restart dnsmasq
1774 if [[ $
(systemctl is-active systemd-resolved ||
:) != inactive
]]; then
1775 m sudo systemctl restart systemd-resolved
1777 if type -P resolvectl
&>/dev
/null
; then
1778 resolvectl flush-caches
1783 ssh fencepost
head -n 300 /gd
/gnuorg
/EventAndTravelInfo
/rms-current-trips.txt |
less
1792 command sudo
"$@" ||
return $?
1797 # I use a function because otherwise we cant use in a script,
1798 # cant assign to variable.
1800 # note: gksudo is recommended for X apps because it does not set the
1801 # home directory to the same, and thus apps writing to ~ fuck things up
1802 # with root owned files.
1804 if [[ $EUID != 0 ||
$1 == -* ]]; then
1805 # shellcheck disable=SC2034
1806 SUDOD
="$PWD" command sudo
-i "$@"
1812 sb
() { # sudo bash -c
1813 # use sb instead of s is for sudo redirections,
1814 # eg. sb 'echo "ok fine" > /etc/file'
1815 # shellcheck disable=SC2034
1817 sudo
-i bash
-c "$@"
1820 se
() { s urun
0077 "$@"; }
1823 safe_rename
() { # warn and dont rename if file exists.
1824 # mv -n exists, but it\'s silent
1825 if [[ $# != 2 ]]; then
1826 echo safe_rename error
: $# args
, need
2 >2
1829 if [[ $1 != "$2" ]]; then # yes, we want to silently ignore this
1830 if [[ -e $2 ||
-L $2 ]]; then
1831 echo "Cannot rename $1 to $2 as it already exists."
1840 sudo
dd status
=none of
="$1"
1844 if type -p systemctl
&>/dev
/null
; then
1847 if (( $# >= 3 )); then
1848 echo iank
: ser expected
2 or
less arguments
1855 systemctl
-n 40 status
"$@"
1858 seru
() { systemctl
--user "$@"; }
1859 # like restart, but do nothing if its not already started
1862 if [[ $
(s systemctl
--no-pager show
-p ActiveState
$service ) == ActiveState
=active
]]; then
1863 systemctl restart
$service
1867 setini
() { # set a value in a .ini style file
1868 key
="$1" value
="$2" section
="$3" file="$4"
1869 if [[ -s $file ]]; then
1870 sed -ri -f - "$file" <<EOF
1871 # remove existing keys
1872 / *\[$section\]/,/^ *\[[^]]+\]/{/^\s*$key[[:space:]=]/d}
1874 /^\s*\[$section\]/a $key=$value
1875 # from section to eof, do nothing
1876 /^\s*\[$section\]/,\$b
1877 # on the last line, if we haven't found section yet, add section and key
1889 sgo
() { # service go
1891 ser restart
$service ||
return 1
1892 if type -p systemctl
&>/dev
/null
; then
1898 # ignore services that dont exist
1899 if systemctl
cat $service &>/dev
/null
; then
1901 ser disable
$service
1907 systemctl list-unit-files | rg
"$@"
1914 # disable a warning with:
1915 # shellcheck disable=SC2206 # reasoning
1917 # see bash-template/style-guide.md for justifications
1920 quotes
=2048,2068,2086,2206
1921 others
=2029,2033,2054,2164
1922 shellcheck
-W 999 -x -e $quotes,$others "$@" ||
return $?
1926 # sl: ssh, but firsh rsync our bashrc and related files to a special
1927 # directory on the remote host if needed.
1929 # Some environment variables and files need to be setup for this to work
1930 # (mine are set at the beginning of this file)
1932 # SL_FILES_DIR: Environment variable. Path to folder which should at
1933 # least have a .bashrc file or symlink. This dir will be rsynced to ~ on
1934 # remote hosts (top level symlinks are resolved) unless the host already
1935 # has a $SL_FILES_DIR/.bashrc. In that case, we assume it is a host you
1936 # control and sync files to separately and already has the ~/.bashrc you
1937 # want. The remote bash will also take its .inputrc config from this
1938 # folder (default of not existing is fine). Mine looks like this:
1939 # https://iankelling.org/git/?p=distro-setup;a=tree;f=sl/.iank
1941 # SL_INFO_DIR: Environment variable. This folder stores info about what
1942 # we detected on the remote system and when we last synced. It will be created
1943 # if it does not exist. Sometimes you may want to forget about a
1944 # remote system, you can use sl --rsync, or the function for that slr
1947 # SL_TEST_CMD: Env var. Meant to be used to vary the files synced
1948 # depending on the remote host. Run this string on the remote host the
1949 # first time sl is run (or if we run slr). The result is passed to
1950 # SL_TEST_HOOK. For example,
1951 # export SL_TEST_CMD=". /etc/os-release ; echo \${VERSION//[^a-zA-Z0-9]/}"
1953 # SL_TEST_HOOK: Env var. It is run as $SL_TEST_HOOK. This can set
1954 # $SL_FILES_DIR to vary the files synced.
1956 # SL_RSYNC_ARGS: Env var. String of arguments passed to rsync. For
1957 # example to exclude files within a directory. Note, excluded
1958 # files wont be deleted on rsync, you can add --delete-excluded
1959 # to the rsync command if that is desired.
1961 # SL_SSH_ARGS: Env var. Default arguments passed to ssh.
1963 # For when ~/.bashrc is already customized on the remote server, you
1964 # might find it problematic that ~/.bashrc is sourced for ALL ssh
1965 # commands, even in scripts. This paragraph is all about that. bash
1966 # scripts dont source ~/.bashrc, but call ssh in scripts and you get
1967 # ~/.bashrc. You dont want this. .bashrc is meant for interactive shells
1968 # and if you customize it, probably has bugs from time to time. This is
1969 # bad. Here's how I fix it. I have a special condition to "return" in my
1970 # .bashrc for noninteractive ssh shells (copy that code). Then use this
1971 # function or similar that passes LC_USEBASHRC=t when sshing and I want
1972 # my bashrc. Also, I don't keep most of my bashrc in .bashrc, i source a
1973 # separate file because even if I return early on, the whole file gets
1974 # parsed which can fail if there is a syntax error.
1976 # Background on LC_USEBASHRC var (no need to read if you just want to
1977 # use this function): env variables sent across ssh are strictly
1978 # limited, but we get LC_* at least in debian based machines, so we
1979 # just make that * be something no normal program would use. Note, on
1980 # hosts that dont allow LC_* I start an inner shell with LC_USEBASHRC
1981 # set, and the inner shell also allows running a nondefault
1982 # .bashrc. This means the outer shell still ran the default .bashrc,
1983 # but that is the best we can do.
1985 local now args remote dorsync haveinfo tmpa sshinfo tmp tmp2
type info_sec force_rsync \
1986 sync_dirname testcmd extra_info testbool files_sec sl_test_cmd sl_test_hook
1987 declare -a args tmpa
1991 # ssh [-1246Antivivisectionist] [-b bind_address] [-c cipher_spec] [-D [bind_address:]port]
1992 # [-E log_file] [-e escape_char] [-F configfile] [-I pkcs11] [-i identity_file] [-L address]
1993 # [-l login_name] [-m mac_spec] [-O ctl_cmd] [-o option] [-p port] [-Q query_option]
1994 # [-R address] [-S ctl_path] [-W host:port] [-w local_tun[:remote_tun]] [user@]hostname
1997 # ssh [-46AaCfGgKkMNnqsTtVvXxYy] [-b bind_address] [-c cipher_spec]
1998 # [-D [bind_address:]port] [-E log_file] [-e escape_char]
1999 # [-F configfile] [-I pkcs11] [-i identity_file]
2000 # [-J [user@]host[:port]] [-L address] [-l login_name] [-m mac_spec]
2001 # [-O ctl_cmd] [-o option] [-p port] [-Q query_option] [-R address]
2002 # [-S ctl_path] [-W host:port] [-w local_tun[:remote_tun]]
2005 if [[ $1 == --rsync ]]; then
2010 sl_test_cmd
=$SL_TEST_CMD
2011 sl_test_hook
=$SL_TEST_HOOK
2012 sl_rsync_args
=$SL_RSYNC_ARGS
2039 # note we dont support things like -4oOption
2040 -[46AaCfGgKkMNnqsTtVvXxYy
]*)
2043 -[bcDEeFIiJLlmOopQRSWw
]*)
2044 # -oOption etc is valid
2045 if (( ${#1} >= 3 )); then
2048 args
+=("$1" "$2"); shift 2
2057 if [[ ! $remote ]]; then
2058 echo $0: error hostname required
>&2
2063 if [[ ! $SL_INFO_DIR ]]; then
2064 echo error
: missing
'$SL_INFO_DIR' env var
>&2
2070 tmpa
=($SL_INFO_DIR/???????????
"$remote")
2072 if [[ -e $sshinfo ]]; then
2073 if $force_rsync; then
2080 tmp
=${sshinfo[0]##*/}
2083 extra_info
=$
(cat $sshinfo)
2085 # we test for string to know ssh succeeded
2086 testbool
="test -e $SL_FILES_DIR/.bashrc -a -L .bashrc -a -v LC_USEBASHRC"
2087 testcmd
="if $testbool; then printf y; else printf n; fi"
2088 if ! tmp
=$
(LC_USEBASHRC
=y
command ssh "${args[@]}" "$remote" "$testcmd; $sl_test_cmd"); then
2089 echo failed sl
test. doing plain
ssh -v
2090 command ssh -v "${args[@]}" "$remote"
2092 if [[ $tmp == y
* ]]; then
2098 extra_info
="${tmp:1}"
2100 if [[ $sl_test_hook ]]; then
2101 RSYNC_RSH
="ssh ${args[*]}" $sl_test_hook "$extra_info" "$remote"
2104 if $haveinfo && [[ $type == b
]]; then
2106 read files_sec _
< <(find -L $SL_FILES_DIR -printf "%T@ %p\n" |
sort -nr ||
[[ $?
== 141 ||
${PIPESTATUS[0]} == 32 ]] )
2107 files_sec
=${files_sec%%.*}
2108 if (( files_sec
> info_sec
)); then
2114 sync_dirname
=${SL_FILES_DIR##*/}
2116 if [[ ! $SL_FILES_DIR ]]; then
2117 echo error
: missing
'$SL_FILES_DIR' env var
>&2
2122 RSYNC_RSH
="ssh ${args[*]}" m rsync
-rptL --delete $sl_rsync_args $SL_FILES_DIR "$remote":
2124 if $dorsync ||
! $haveinfo; then
2125 sshinfo
=$SL_INFO_DIR/$EPOCHSECONDS$type"$remote"
2126 [[ -e $SL_INFO_DIR ]] || mkdir
-p $SL_INFO_DIR
2127 printf "%s\n" "$extra_info" >$sshinfo
2130 if [[ $type == b
]]; then
2131 if (( ${#@} )); then
2132 # Theres a couple ways to pass arguments, im not sure whats best,
2133 # but relying on bash 4.4+ escape quoting seems most reliable.
2134 command ssh "${args[@]}" "$remote" \
2135 LC_USEBASHRC
=t bash
-c '.\ '$sync_dirname'/.bashrc\;"\"\$@\""' bash
${@@Q}
2136 elif [[ ! -t 0 ]]; then
2137 # This case is when commands are being piped to ssh.
2138 # Normally, no bashrc gets sourced.
2139 # But, since we are doing all this, lets source it because we can.
2140 cat <(echo .
$sync_dirname/.bashrc
) - |
command ssh "${args[@]}" "$remote" LC_USEBASHRC
=t bash
2142 command ssh -t "${args[@]}" "$remote" LC_USEBASHRC
=t INPUTRC
=$sync_dirname/.inputrc bash
--rcfile $sync_dirname/.bashrc
2146 LC_USEBASHRC
=t
command ssh "${args[@]}" "$remote" ${@@Q}
2148 command ssh "${args[@]}" "$remote" LC_USEBASHRC
=t bash
2151 # this function inspired from https://github.com/Russell91/sshrc
2158 sl
-oControlMaster=no
-oControlPath=/ "$@"
2160 # kill off old shared socket then ssh
2162 m
ssh -O exit "$@" ||
[[ $?
== 255 ]]
2165 ccomp
ssh sl slr sss ssk
2168 if [[ $TERM == alacritty ||
$TERM == xterm-kitty
]]; then
2169 TERM
=xterm-256color LC_USEBASHRC
=t
command ssh "$@"
2171 LC_USEBASHRC
=t
command ssh "$@"
2177 # log with script. timing is $1.t and script is $1.s
2178 # -l to save to ~/typescripts/
2179 # -t to add a timestamp to the filenames
2180 local logdir do_stamp arg_base
2181 (( $# >= 1 )) ||
{ echo "arguments wrong"; return 1; }
2184 while getopts "lt" option
2187 l
) arg_base
=$logdir ;;
2188 t
) do_stamp
=true
;;
2191 shift $
((OPTIND
- 1))
2193 [[ -e $logdir ]] || mkdir
-p $logdir
2194 $do_stamp && arg_base
+=$
(date +%F.
%T
%z
)
2195 script -t $arg_base.s
2> $arg_base.t
2197 splay
() { # script replay
2198 #logRoot="$HOME/typescripts/"
2199 #scriptreplay "$logRoot$1.t" "$logRoot$1.s"
2200 scriptreplay
"$1.t" "$1.s"
2204 # sudo redo. be aware, this command may not work right on strange distros or earlier software
2205 if [[ $# == 0 ]]; then
2206 sudo
-E bash
-c -l "$(history -p '!!')"
2208 echo this
command redos last
history item. no argument is accepted
2213 # with -ll, less secure but faster.
2214 command srm
-ll "$@"
2219 ssh $1 /tmp
/${2##*/} $
(printf "%q\n" "${@:2}")
2231 tclock
() { # terminal clock
2236 # this goes to full width
2237 #len=${1:-$((COLUMNS -7))}
2240 if (( x
== len
)); then
2242 d
="$(date +%l:%_M) "
2245 d
=$
(date +%l
:%M
:%_S
)
2249 for ((i
=0; i
<x
; i
++)); do
2250 if (( i
% 6 )); then
2268 # test existence / exists
2271 [[ -e "$x" ||
-L "$x" ]] || ret
=1
2277 # normally, i would just execute these commands in the function.
2278 # however, DEBUG is not inherited, so we need to run it outside a function.
2279 # And we want to run set -x afterwards to avoid spam, so we cram everything
2280 # in here, and then it will run after this function is done.
2281 PROMPT_COMMAND
='trap DEBUG; unset PROMPT_COMMAND; PS1="\w \$ "'
2284 PROMPT_COMMAND
=prompt-command
2285 if [[ $TERM == *(screen
*|xterm
*|rxvt
*) ]]; then
2286 trap 'settitle "$BASH_COMMAND"' DEBUG
2290 tx
() { # toggle set -x, and the prompt so it doesnt spam
2291 if [[ $
- == *x
* ]]; then
2300 # show all processes in the network namespace $1.
2301 # blank entries appear to be subprocesses/threads
2305 sudo
find -L /proc
/[1-9]*/task
/*/ns
/net
-samefile /run
/netns
/$netns | cut
-d/ -f5 | \
2307 x
=$
(ps
-w --no-headers -p $l);
2308 if [[ $x ]]; then echo "$x"; else echo $l; fi;
2312 if ! s ip netns list |
grep -Fx nonet
&>/dev
/null
; then
2313 s ip netns add nonet
2315 sudo
-E env
/sbin
/ip netns
exec nonet sudo
-E -u iank
/bin
/bash
2318 m
() { printf "%s\n" "$*"; "$@"; }
2320 # update file. note: duplicated in mail-setup
2322 local tmp tmpdir dest
="$1"
2323 local base
="${dest##*/}"
2324 local dir
="${dest%/*}"
2325 if [[ $dir != "$base" ]]; then
2326 # dest has a directory component
2331 cat >$tmpdir/"$base"
2332 tmp
=$
(rsync
-ic $tmpdir/"$base" "$dest")
2334 printf "%s\n" "$tmp"
2336 if [[ $dest == /etc
/systemd
/system
/* ]]; then
2345 if type -p uprecords
&>/dev
/null
; then
2353 for x
in "$@"; do virsh destroy
"$x"; virsh undefine
"$x"; done
2361 sudo virsh dumpxml
$vm |
sed -r "s/(<listen.*address=')([^']+)/\1$ip/" | \
2362 sed -r "s/listen='[^']+/listen='$ip/"> $t
2363 sudo virsh undefine
$vm
2364 sudo virsh define
$t
2369 vm-set-listen
$1 0.0.0.0
2374 vm-set-listen
$1 127.0.0.1
2378 # find input, copy to pattern space, when we find the first field, print the copy in different order without newlines.
2379 # instead of using labels, we could just match a line and group, eg: /signal:/,{s/signal:(.*)/\1/h}
2380 sudo iw dev wls1 scan |
sed -rn "
2381 s/^\Wcapability: (.*)/\1/;Ta;h;b
2382 :a;s/^\Wsignal: -([^.]+).*/\1/;Tb;H;b
2383 # padded to min width of 20
2384 :b;s/\WSSID: (.*)/\1 /;T;s/^(.{20}(.*[^ ])?) */\1/;H;g;s/(.*)\n(.*)\n(.*)/\2 \3 \1/gp;b
2388 # Run script by copying it to a temporary location first,
2389 # and changing directory, so we don't have any open
2390 # directories or files that could cause problems when
2407 # spark 1 5 22 13 53
2411 # Copyright (c) Zach Holman, https://zachholman.com
2412 # https://github.com/holman/spark
2414 # As of 2022-10-28, I reviewed github forks that had several newer
2415 # commits, none had anything interesting. I did a little refactoring
2416 # mostly to fix emacs indent bug.
2418 # Generates sparklines.
2421 if [ "X$1" = "X-n" ]; then
2435 # find min/max values
2436 local min
=0xffffffff max
=0
2440 # on Linux (or with bash4) we could use `printf %.0f $n` here to
2441 # round the number but that doesn't work on OS X (bash3) nor does
2442 # `awk '{printf "%.0f",$1}' <<< $n` work, so just cut it off
2444 (( n
< min
)) && min
=$n
2445 (( n
> max
)) && max
=$n
2446 numbers
=$numbers${numbers:+ }$n
2450 local ticks
=(▁ ▂ ▃ ▄ ▅ ▆ ▇ █
)
2452 # use a high tick if data is constant
2453 (( min
== max
)) && ticks
=(▅ ▆
)
2456 f
=$
(( ( (max-min
) <<8)/( tc - 1) ))
2461 _spark_echo -n ${ticks[$(( ((($n-$min)<<8)/$f) ))]}
2470 if $use_color && type -p tput &>/dev/null; then
2471 term_bold="$(tput bold)"
2472 term_red="$(tput setaf 1)"
2473 term_green="$(tput setaf 2)"
2474 term_yellow="$(tput setaf 3)"
2475 term_purple="$(tput setaf 5)"
2476 term_nocolor="$(tput sgr0)" # no font attributes
2478 # unused so far. commented for shellcheck
2479 # term_underl="$(tput smul)"
2480 # term_blue="$(tput setaf 4)"
2481 # term_cyan="$(tput setaf 6)"
2483 # Try to keep environment pollution down, EPA loves us.
2484 unset safe_term match_lhs use_color
2489 if [[ $- == *i* ]]; then
2494 if [[ $EUID == 1000 ]]; then
2501 # this needs to come before next ps1 stuff
2502 # this stuff needs bash 4, feb 2009,
2503 # old enough to no longer condition on $BASH_VERSION anymore
2507 if [[ $- == *i* ]] && [[ ! $LC_INSIDE_EMACS ]]; then
2509 bind -m vi-command B:shell-backward-word
2510 bind -m vi-command W:shell-forward-word
2513 if [[ $SSH_CLIENT || $SUDO_USER ]]; then
2514 unset PROMPT_DIRTRIM
2518 # emacs terminal has problems if this runs slowly,
2519 # so I've thrown a bunch of things at the wall to speed it up.
2521 local return=$? # this MUST COME FIRST
2522 local ps_char ps_color
2525 if [[ $HISTFILE ]]; then
2526 history -a # save history
2530 0) ps_color="$term_purple"
2533 *) ps_color="$term_green"
2534 ps_char="$return \\$"
2537 if [[ ! -O . ]]; then # not owner
2538 if [[ -w . ]]; then # writable
2539 ps_color="$term_bold$term_red"
2541 ps_color="$term_bold$term_green"
2545 # faster than sourceing the file im guessing
2546 if [[ -e /dev/shm/iank-status && ! -e /tmp/quiet-status ]]; then
2547 eval $(< /dev/shm/iank-status)
2549 if [[ $MAIL_HOST && $MAIL_HOST != "$HOSTNAME" ]]; then
2550 ps_char="@ $ps_char"
2552 # We could test if sudo is active with sudo -nv
2553 # but then we get an email and log of lots of failed sudo commands.
2554 # We could turn those off, but seems better not to.
2555 if [[ $EUID != 0 ]] && [[ $DID_SUDO ]]; then
2556 psudo="\[$term_bold$term_red\]s\[$term_nocolor\] "
2558 if [[ ! $HISTFILE ]]; then
2559 ps_char="NOHIST $ps_char"
2561 PS1="${PS1%"${PS1#*[wW]}"} $psudo\[$ps_color\]$ps_char\[$term_nocolor\] "
2563 # set titlebar. instead, using more advanced
2565 #echo -ne "$_title_escape $HOSTNAME ${PWD/#$HOME/~} \007"
2567 PROMPT_COMMAND=prompt-command
2569 if [[ $TERM == screen* ]]; then
2570 _title_escape="\033]..2;"
2572 # somme sites recommend this, i dunno what the diff is.
2573 #_title_escape="\033]30;"
2574 _title_escape="\033]0;"
2578 # this makes it so we show the current command if
2579 # one is running, otherwise, show nothing
2581 if [[ $1 == prompt-command ]]; then
2584 if (( ${#BASH_ARGC[@]} == 1 && BASH_SUBSHELL == 0 )); then
2585 echo -ne "$_title_escape ${PWD/#$HOME/~} "
2591 # note, this wont work:
2592 # x=$(mktemp); cp a $x
2593 # I havnt figured out why, bigger fish to fry.
2596 # condition from the screen man page i think.
2597 # note: duplicated in tx()
2598 if [[ $TERM == *(screen*|xterm*|rxvt*) ]]; then
2599 trap 'settitle "$BASH_COMMAND"' DEBUG
2606 # * stuff that makes sense to be at the end
2612 # shellcheck disable=SC1090
2613 [[ -s "$HOME/.rvm/scripts/rvm" ]] && source "$HOME/.rvm/scripts/rvm" # Load RVM into a shell session *as a function*
2615 # I had this idea to start a bash shell which would run an initial
2616 # command passed through this env variable, then continue on
2617 # interactively. But the use case I had in mind went away.
2619 # if [[ $MY_INIT_CMD ]]; then
2620 # "${MY_INIT_CMD[@]}"
2624 # ensure no bad programs appending to this file will have an affect