konsole stuff
[distro-setup] / brc
1 #!/bin/bash
2 # this gets sourced. shebang is just for file mode detection
3
4 # note, to catch errors in functions but not outside, do:
5 # set -E -o pipefail
6 # trap return ERR
7 # trap 'trap ERR' RETURN
8
9
10
11 ############
12 # settings #
13 ############
14
15 CDPATH=.
16
17 set -o pipefail
18
19 # remove all aliases. aliases provided by the system tend to get in the way,
20 # for example, error happens if I try to define a function the same name as an alias
21 unalias -a
22
23 # remove gnome keyring warning messages
24 # there is probably a more proper way, but I didn't find any easily on google
25 # now using xfce+xmonad instead of vanilla xmonad, so disabling this
26 #unset GNOME_KEYRING_CONTROL
27
28 # use extra globing features.
29 shopt -s extglob
30 # include .files when globbing, but ignore files name . and ..
31 # setting this also sets dotglob.
32 # Note, this doesn't work in bash 4.4 anymore, for paths with
33 # more than 1 directory, like a/b/.foo, since * is fixed to not match /
34 export GLOBIGNORE=*/.:*/..
35
36 # broken with bash_completion package. Saw a bug for this once. Don't anymore.
37 # still broken in wheezy
38 # still buggered in latest stable from the web, version 2.1
39 # perhaps its fixed in newer git version, which fails to make for me
40 # this note is from 6-2014.
41 # Also, enabling this before sourcing .bashrc makes PATH be empty.
42 #shopt -s nullglob
43
44 # make tab on an empty line do nothing
45 shopt -s no_empty_cmd_completion
46
47 # advanced completion
48 # http://bash-completion.alioth.debian.org/
49 # might be sourced by the system already, but I've noticed it not being sourced before
50 if ! type _init_completion &> /dev/null && [[ -r "/usr/share/bash-completion/bash_completion" ]]; then
51 . /usr/share/bash-completion/bash_completion
52 fi
53
54
55 # fix spelling errors for cd, only in interactive shell
56 shopt -s cdspell
57 # append history instead of overwritting it
58 shopt -s histappend
59 # for compatibility, per gentoo/debian bashrc
60 shopt -s checkwinsize
61 # attempt to save multiline single commands as single history entries.
62 shopt -s cmdhist
63 # enable **
64 shopt -s globstar
65
66
67 # inside emcas fixes
68 if [[ $RLC_INSIDE_EMACS ]]; then
69 # EMACS is used by bash on startup, but we don't need it anymore.
70 # plus I hit a bug in a makefile which inherited it
71 unset EMACS
72 export RLC_INSIDE_EMACS
73 export PAGER=cat
74 export MANPAGER=cat
75 # scp completion does not work, but this doesn't fix it. todo, figure this out
76 complete -r scp &> /dev/null
77 # todo, remote file completion fails, figure out how to turn it off
78 export NODE_DISABLE_COLORS=1
79 # This get's rid of ugly terminal escape chars in node repl
80 # sometime, I'd like to have completion working in emacs shell for node
81 # the offending chars can be found in lib/readline.js,
82 # things that do like:
83 # stream.write('\x1b[' + (x + 1) + 'G');
84 # We can remove them and keep readline, for example by doing this
85 # to start a repl:
86 #!/usr/bin/env nodejs
87 # var readline = require('readline');
88 # readline.cursorTo = function(a,b,c) {};
89 # readline.clearScreenDown = function(a) {};
90 # const repl = require('repl');
91 # var replServer = repl.start('');
92 #
93 # no prompt, or else readline complete seems to be confused, based
94 # on our column being different? node probably needs to send
95 # different kind of escape sequence that is not ugly. Anyways,
96 # completion doesn't work yet even with the ugly prompt, so whatever
97 #
98 export NODE_NO_READLINE=1
99
100 fi
101
102
103 if [[ $- == *i* ]]; then
104 # for readline-complete.el
105 if [[ $RLC_INSIDE_EMACS ]]; then
106 # all for readline-complete.el
107 stty echo
108 bind 'set horizontal-scroll-mode on'
109 bind 'set print-completions-horizontally on'
110 bind '"\C-i": self-insert'
111 else
112 # sakura == xterm-256color
113 # konsole == xterm
114 if [[ $TERM == "xterm" ]]; then
115 # make ctrl-backspace work
116 stty werase '^?'
117 # control + arrow keys. for other terminals, see http://unix.stackexchange.com/questions/10806/how-to-change-previous-next-word-shortcut-in-bash
118 bind '"\e[1;5C": shell-forward-word' 2>/dev/null
119 bind '"\e[1;5D": shell-backward-word' 2>/dev/null
120 else
121 #stty werase '^h'
122 bind '"\eOc": shell-forward-word'
123 bind '"\eOd": shell-backward-word'
124 fi
125 # i can't remember why i did this, probably to free up some keys to bind
126 # to other things in bash.
127 # other than C-c and C-z, the rest defined by stty -a are, at least in
128 # gnome-terminal, overridden by bash, or disabled by the system
129 stty lnext undef stop undef start undef
130 fi
131
132 fi
133
134
135 # history number. History expansion is good.
136 PS4='$LINENO+ '
137 # history file size limit, set to unlimited.
138 # this needs to be different from the default because
139 # default HISTFILESIZE is 500 and could clobber our history
140 HISTFILESIZE=
141 # max commands 1 session can append/read from history
142 HISTSIZE=100000
143 # my own history size limit based on lines
144 HISTFILELINES=1000000
145 HISTFILE=$HOME/.bh
146 # the time format display when doing the history command
147 # also, setting this makes the history file record time
148 # of each command as seconds from the epoch
149 HISTTIMEFORMAT="%I:%M %p %m/%d "
150 # consecutive duplicate lines don't go in history
151 HISTCONTROL=ignoredups
152 # works in addition to HISTCONTROL to do more flexible things
153 # it could also do the same things as HISTCONTROL and thus replace it,
154 # but meh. dunno why, but just " *" does glob expansion, so use [ ] to avoid it.
155 HISTIGNORE='k *:[ ]*'
156
157 export BC_LINE_LENGTH=0
158
159
160 # note, if I use a machine I don't want files readable by all users, set
161 # umask 077 # If fewer than 4 digits are entered, leading zeros are assumed
162
163 C_DEFAULT_DIR=/a
164
165
166 ###################
167 ## include files ###
168 ###################
169 for _x in /a/bin/distro-functions/src/* /a/bin/!(githtml)/*-function?(s); do
170 source "$_x"
171 done
172 unset _x
173 # so I can share my bashrc
174 for x in /a/bin/bash_unpublished/source-!(.#*); do source $x; done
175 source $(dirname $(readlink -f $BASH_SOURCE))/path_add-function
176 source /a/bin/log-quiet/logq-function
177 path_add /a/exe
178 path_add --ifexists --end /a/opt/adt-bundle*/tools /a/opt/adt-bundle*/platform-tools
179 export WCDHOME=/a
180 # based on readme.debian. dunno if this will break on other distros.
181 _x=/usr/share/wcd/wcd-include.sh
182 if [[ -e $_x ]]; then source $_x; fi
183
184
185 ###############
186 ### aliases ###
187 ###############
188
189 # very few aliases, functions are always preferred.
190
191 # ancient stuff.
192 if [[ $OS == Windows_NT ]]; then
193 alias ffs='cygstart "/c/Program Files (x86)/Mozilla Firefox/firefox.exe" -P scratch'
194 export DISPLAY=nt
195 alias j='command cygpath'
196 alias t='command cygstart'
197 alias cygstart='echo be quick, use the alias "t" instead :\)'
198 alias cygpath='echo be quick, use the alias "j" instead :\)'
199 fi
200
201
202
203 # keep this in mind? good for safety.
204 # alias cp='cp -i'
205 # alias mv='mv -i'
206
207
208 # remove any default aliases for these
209 unalias ls ll grep &>/dev/null ||:
210
211
212
213
214
215
216
217
218
219 #####################
220 ### functions ####
221 #####################
222
223
224 ..() { c ..; }
225 ...() { c ../..; }
226 ....() { c ../../..; }
227 .....() { c ../../../..; }
228 ......() { c ../../../../..; }
229
230
231 # file cut copy and paste, like the text buffers :)
232 # I havn't tested these.
233 _fbufferinit() { # internal use by
234 ! [[ $my_f_tempdir ]] && my_f_tempdir=$(mktemp -d)
235 rm -rf "$my_f_tempdir"/*
236 }
237 fcp() { # file cp
238 _fbufferinit
239 cp "$@" "$my_f_tempdir"/
240 }
241 fct() { # file cut
242 _fbufferinit
243 mv "$@" "$my_f_tempdir"/
244 }
245 fpst() { # file paste
246 [[ $2 ]] && { echo too many arguments; return 1; }
247 target=${1:-.}
248 cp "$my_f_tempdir"/* "$target"
249 }
250
251
252 # todo, update this
253 complete -F _longopt la lower low rlt rld rl lld ts ll dircp ex fcp fct fpst gr
254
255
256 _cdiff-prep() {
257 # join options which are continued to multiples lines onto one line
258 local first=true
259 grep -vE '^([ \t]*#|^[ \t]*$)' "$1" | while IFS= read -r line; do
260 # remove leading spaces/tabs. assumes extglob
261 if [[ $line == "[ ]*" ]]; then
262 line="${line##+( )}"
263 fi
264 if $first; then
265 pastline="$line"
266 first=false
267 elif [[ $line == *=* ]]; then
268 echo "$pastline" >> "$2"
269 pastline="$line"
270 else
271 pastline="$pastline $line"
272 fi
273 done
274 echo "$pastline" >> "$2"
275 }
276
277 _khfix_common() {
278 local h=${1##*@}
279 local x
280 ssh-keygen -R $h -f $(readlink -f ~/.ssh/known_hosts)
281 x=$(timeout 1 ssh -oBatchMode=yes -oControlMaster=no -oControlPath=/ -v $1 |& sed -rn "s/debug1: Connecting to $h \[([^\]*)].*/\1/p")
282 if [[ ! $x ]]; then
283 echo "khfix: ssh failed"
284 return 1
285 fi
286 echo "khfix: removing key for $x"
287 ssh-keygen -R $x -f $(readlink -f ~/.ssh/known_hosts)
288 }
289 khfix() { # known hosts fix
290 _khfix_common "$@" || return 1
291 ssh $1 :
292 }
293 khcopy() {
294 _khfix_common "$@"
295 ssh-copy-id $1
296 }
297
298 a() {
299 beet "${@}"
300 }
301
302 ack() { ack-grep "$@"; }
303
304 anki() {
305 if which anki &>/dev/null; then
306 command anki
307 else
308 schroot -c anki -- anki
309 fi
310 }
311
312 astudio() {
313 # googling android emulator libGL error: failed to load driver: r600
314 # lead to http://stackoverflow.com/a/36625175/14456
315 export ANDROID_EMULATOR_USE_SYSTEM_LIBS=1
316 /a/opt/android-studio/bin/studio.sh "$@" &r;
317 }
318
319 b() {
320 # backwards
321 c -
322 }
323
324 bkrun() {
325 # use -p from interactive shell
326 btrbk-run -p "$@"
327 }
328
329 bfg() { java -jar /a/opt/bfg-1.12.14.jar "$@"; }
330
331 bigclock() {
332 xclock -digital -update 1 -face 'arial black-80:bold'
333 }
334
335 btc() {
336 local f=/etc/bitcoin/bitcoin.conf
337 # importprivkey will timeout if using the default of 15 mins.
338 # upped it to 1 hour.
339 bitcoin-cli -rpcclienttimeout=60000 -$(s grep rpcuser= $f) -$(s grep rpcpassword= $f) "$@"
340 }
341
342 btcusd() { # $1 btc in usd
343 local price
344 price="$(curl -s https://api.coinbase.com/v2/prices/BTC-USD/spot | jq -r .data.amount)"
345 printf "$%s\n" "$price"
346 if [[ $1 ]]; then
347 printf "$%.2f\n" "$(echo "scale=4; $price * $1"| bc -l)"
348 fi
349 }
350 usdbtc() { # $1 usd in btc
351 local price
352 price="$(curl -s https://api.coinbase.com/v2/prices/BTC-USD/spot | jq -r .data.amount)"
353 printf "$%s\n" "$price"
354 if [[ $1 ]]; then
355 # 100 mil satoshi / btc. 8 digits after the 1.
356 printf "%.8f btc\n" "$(echo "scale=10; $1 / $price "| bc -l)"
357 fi
358 }
359 satoshi() { # $1 satoshi in usd
360 local price
361 price="$(curl -s https://api.coinbase.com/v2/prices/BTC-USD/spot | jq -r .data.amount)"
362 price=$(echo "scale=10; $price * 0.00000001"| bc -l)
363 printf "$%f\n" "$price"
364 if [[ $1 ]]; then
365 printf "$%.2f\n" "$(echo "scale=10; $price * $1"| bc -l)"
366 fi
367 }
368
369
370 # c. better cd
371 if [[ $RLC_INSIDE_EMACS ]]; then
372 c() { wcd -c -z 50 -o "$@"; }
373 else
374 # lets see what the fancy terminal does from time to time
375 c() { wcd -c -z 50 "$@"; }
376 fi
377
378 caa() { git commit --amend --no-edit -a; }
379
380 caf() {
381 find -L $1 -type f -not \( -name .svn -prune -o -name .git -prune \
382 -o -name .hg -prune -o -name .editor-backups -prune \
383 -o -name .undo-tree-history -prune \) \
384 -exec bash -lc 'hr; echo "$1"; hr; cat "$1"' _ {} \; 2>/dev/null
385
386 }
387
388 calc() { echo "scale=3; $*" | bc -l; }
389 # no having to type quotes, but also no command history:
390 clc() {
391 local x
392 read -r x
393 echo "scale=3; $x" | bc -l
394 }
395
396 cam() {
397 git commit -am "$*"
398 }
399
400 ccat () { # config cat. see a config without extra lines.
401 grep '^\s*[^;[:space:]#]' "$@"
402 }
403
404 cdiff() {
405 # diff config files,
406 # setup for format of postfix, eg:
407 # option = stuff[,]
408 # [more stuff]
409 local pastline
410 local unified="$(mktemp)"
411 local f1="$(mktemp)"
412 local f2="$(mktemp)"
413 _cdiff-prep "$1" "$f1"
414 _cdiff-prep "$2" "$f2"
415 cat "$f1" "$f2" | grep -Po '^[^=]+=' | sort | uniq > "$unified"
416 while IFS= read -r line; do
417 # the default bright red / blue doesn't work in emacs shell
418 dwdiff -cblue,red -A best -d " ," <(grep "^$line" "$f1" || echo ) <(grep "^$line" "$f2" || echo ) | colordiff
419 done < "$unified"
420 }
421
422 cgpl()
423 {
424 if (($#)); then
425 cp /a/bin/data/COPYING "$@"
426 else
427 cp /a/bin/data/COPYING .
428 fi
429 }
430 capache()
431 {
432 if (($#)); then
433 cp /a/bin/data/LICENSE "$@"
434 else
435 cp /a/bin/data/LICENSE .
436 fi
437 }
438 chown() {
439 # makes it so chown -R symlink affects the symlink and its target.
440 if [[ $1 == -R ]]; then
441 shift
442 command chown -h "$@"
443 command chown -R "$@"
444 else
445 command chown "$@"
446 fi
447 }
448
449 cim() {
450 git commit -m "$*"
451 }
452
453 cl() {
454 # choose recent directory. cl = cd list
455 c =
456 }
457
458 chrome() {
459 if type -p chromium &>/dev/null; then
460 cmd=chromium
461 else
462 cd
463 cmd="schroot -c stretch chromium"
464 CHROMIUM_FLAGS='--enable-remote-extensions' $cmd &r
465 fi
466 }
467
468 d() { builtin bg; }
469 complete -A stopped -P '"%' -S '"' d
470
471 dat() { # do all tee, for more complex scripts
472 tee >(ssh frodo bash -l) >(bash -l) >(ssh x2 bash -l) >(ssh tp bash -l)
473 }
474 da() { # do all
475 local host
476 "$@"
477 for host in x2 tp treetowl; do
478 ssh $host "$@"
479 done
480 }
481
482 dc() {
483 diff --strip-trailing-cr -w "$@" # diff content
484 }
485
486 debian_pick_mirror () {
487 # netselect-apt finds a fast mirror.
488 # but we need to replace the mirrors ourselves,
489 # because it doesn't do that. best it can do is
490 # output a basic sources file
491 # here we get the server it found, get the main server we use
492 # then substitute all instances of one for the other in the sources file
493 # and backup original to /etc/apt/sources.list-original.
494 # this is idempotent. the only way to identify debian sources is to
495 # note the original server, so we put it in a comment so we can
496 # identify it later.
497 local file=$(mktemp -d)/f # safe way to get file name without creating one
498 sudo netselect-apt -o "$file" || return 1
499 url=$(grep ^\\w $file | head -n1 | awk '{print $2}')
500 sudo cp -f /etc/apt/sources.list /etc/apt/sources.list-original
501 sudo sed -ri "/http.us.debian.org/ s@( *[^ #]+ +)[^ ]+([^#]+).*@\1$url\2# http.us.debian.org@" /etc/apt/sources.list
502 sudo apt-get update
503 }
504
505 despace() {
506 local x y
507 for x in "$@"; do
508 y="${x// /_}"
509 safe_rename "$x" "$y"
510 done
511 }
512
513 dt() {
514 date "+%A, %B %d, %r" "$@"
515 }
516
517 dus() { # du, sorted, default arg of
518 du -sh ${@:-*} | sort -h
519 }
520
521
522
523 e() { echo "$@"; }
524
525
526 ediff() {
527 [[ ${#@} == 2 ]] || { echo "error: ediff requires 2 arguments"; return 1; }
528 emacs --eval "(ediff-files \"$1\" \"$2\")"
529 }
530
531
532 envload() { # load environment from a previous: export > file
533 local file=${1:-$HOME/.${USER}_env}
534 eval "$(export | sed 's/^declare -x/export -n/')"
535 while IFS= read -r line; do
536 # declare -x makes variables local to a function
537 eval ${line/#declare -x/export}
538 done < "$file"
539 }
540
541 # mail related
542 etail() {
543 sudo tail -f /var/log/exim4/mainlog
544 }
545
546 f() {
547 # cd forward
548 c +
549 }
550
551 fa() {
552 # find array. make an array of file names found by find into $x
553 # argument: find arguments
554 # return: find results in an array $x
555 while read -rd ''; do
556 x+=("$REPLY");
557 done < <(find "$@" -print0);
558 }
559
560 faf() { # find all files
561 find -L $1 -type f -not \( -name .svn -prune -o -name .git -prune \
562 -o -name .hg -prune -o -name .editor-backups -prune \
563 -o -name .undo-tree-history -prune \) 2>/dev/null
564 }
565
566 # one that comes with distros is too old for newer devices
567 fastboot() {
568 /a/opt/android-platform-tools/fastboot "$@";
569 }
570
571
572 # List of apps to install/update
573 # Create from existing manually installed apps by doing
574 # fdroidcl search -i, then manually removing
575 # automatically installed/preinstalled apps
576
577 # firefox updater. commented out, firefox depends on nonfree opengl.
578 # de.marmaro.krt.ffupdater
579 # # causes replicant to die on install and go into a boot loop
580 # me.ccrama.redditslide
581 #
582 # # my attempt at recovering from boot loop:
583 # # in that case, boot to recovery (volume up, home button, power, let go of power after samsun logo)
584 # # then
585 # mount /dev/block/mmcblk0p12 /data
586 # cd /data
587 # find -iname '*appname*'
588 # rm -rf FOUND_DIRS
589 # usually good enough to just rm -rf /data/app/APPNAME
590 #
591 # currently broken:
592 #at.bitfire.davdroid
593 fdroid_pkgs=(
594 com.alaskalinuxuser.justnotes
595 com.artifex.mupdfdemo
596 com.fsck.k9
597 com.ichi2.anki
598 com.jmstudios.redmoon
599 com.notecryptpro
600 com.nutomic.syncthingandroid
601 com.termux
602 com.zoffcc.applications.zanavi
603 cz.martykan.forecastie
604 de.danoeh.antennapod
605 im.vector.alpha # riot
606 info.papdt.blackblub
607 me.tripsit.tripmobile
608 net.gaast.giggity
609 net.osmand.plus
610 net.sourceforge.opencamera
611 org.dmfs.tasks # caldav tasks thing
612 org.fdroid.fdroid
613 org.isoron.uhabits
614 org.kde.kdeconnect_tp
615 org.quantumbadger.redreader
616 org.smssecure.smssecure
617 org.fedorahosted.freeotp
618 )
619 # https://forum.xda-developers.com/android/software-hacking/wip-selinux-capable-superuser-t3216394
620 # for maru,
621 #me.phh.superuser
622
623 fdup() {
624 local -A installed updated
625 local p
626 fdroidcl update
627 for p in $(fdroidcl search -i| grep -o "^\S\+"); do
628 installed[$p]=true
629 done
630 for p in $(fdroidcl search -u| grep -o "^\S\+"); do
631 updated[$p]=false
632 done
633 for p in ${fdroid_pkgs[@]}; do
634 ${installed[$p]:-false} || fdroidcl install $p
635 done
636 for p in ${!installed[@]}; do
637 ${updated[$p]:-true} || fdroidcl upgrade $p
638 done
639 }
640
641 firefox-default-profile() {
642 key=Default value=1 section=$1
643 file=/p/c/subdir_files/.mozilla/firefox/profiles.ini
644 sed -ri "/^ *$key/d" "$file"
645 sed -ri "/ *\[$section\]/,/^ *\[[^]]+\]/{/^\s*$key[[:space:]=]/d};/ *\[$section\]/a $key=$value" "$file"
646 }
647 fdhome() { #firefox default home profile
648 firefox-default-profile Profile0
649 }
650
651 fdwork() {
652 firefox-default-profile Profile4
653 }
654
655 ff() {
656 if type -P firefox &>/dev/null; then
657 firefox "$@"
658 else
659 iceweasel "$@"
660 fi
661 }
662
663
664
665 fn() {
666 firefox -P alt "$@" >/dev/null 2>&1
667 }
668
669
670 fsdiff () {
671 local missing=false
672 local dname="${PWD##*/}"
673 local m="/a/tmp/$dname-missing"
674 local d="/a/tmp/$dname-diff"
675 [[ -e $d ]] && rm "$d"
676 [[ -e $m ]] && rm "$m"
677 local msize=0
678 local fsfile
679 while read -r line; do
680 fsfile="$1${line#.}"
681 if [[ -e "$fsfile" ]]; then
682 md5diff "$line" "$fsfile" && tee -a "/a/tmp/$dname-diff" <<< "$fsfile $line"
683 else
684 missing=true
685 echo "$line" >> "$m"
686 msize=$((msize + 1))
687 fi
688 done < <(find -type f )
689 if $missing; then
690 echo "$m"
691 (( msize <= 100 )) && cat $m
692 fi
693 }
694 fsdiff-test() {
695 # expected output, with different tmp dirs
696 # /tmp/tmp.HDPbwMqdC9/c/d ./c/d
697 # /a/tmp/tmp.qLDkYxBYPM-missing
698 # ./b
699 cd $(mktemp -d)
700 echo ok > a
701 echo nok > b
702 mkdir c
703 echo ok > c/d
704 local x=$(mktemp -d)
705 mkdir $x/c
706 echo different > $x/c/d
707 echo ok > $x/a
708 fsdiff $x
709 }
710 rename-test() {
711 # test whether missing files were renamed, generally for use with fsdiff
712 # $1 = fsdiff output file, $2 = directory to compare to. pwd = fsdiff dir
713 # echos non-renamed files
714 local x y found
715 unset sums
716 for x in "$2"/*; do
717 { sums+=( "$(md5sum < "$x")" ) ; } 2>/dev/null
718 done
719 while read -r line; do
720 { missing_sum=$(md5sum < "$line") ; } 2>/dev/null
721 renamed=false
722 for x in "${sums[@]}"; do
723 if [[ $missing_sum == "$x" ]]; then
724 renamed=true
725 break
726 fi
727 done
728 $renamed || echo "$line"
729 done < "$1"
730 return 0
731 }
732
733 feh() {
734 # F = fullscren, z = random, Z = auto zoom
735 command feh -FzZ "$@"
736 }
737
738 # mail related
739 frozen() {
740 rm -rf /tmp/frozen
741 s mailq |gr frozen|awk '{print $3}' | while read -r id; do
742 s exim -Mvl $id
743 echo
744 s exim -Mvh $id
745 echo
746 s exim -Mvb $id
747 echo -e '\n\n##############################\n'
748 done | tee -a /tmp/frozen
749 }
750 frozenrm() {
751 local ids=()
752 while read -r line; do
753 printf '%s\n' "$line"
754 ids+=($(printf '%s\n' "$line" |gr frozen|awk '{print $3}'))
755 done < <(s mailq)
756 echo "sleeping for 2 in case you change your mind"
757 sleep 2
758 s exim -Mrm "${ids[@]}"
759 }
760
761 funce() {
762 # like -e for functions. returns on error.
763 # at the end of the function, disable with:
764 # trap ERR
765 trap 'echo "${BASH_COMMAND:+BASH_COMMAND=\"$BASH_COMMAND\" }
766 ${FUNCNAME:+FUNCNAME=\"$FUNCNAME\" }${LINENO:+LINENO=\"$LINENO\" }\$?=$?"
767 trap ERR
768 return' ERR
769 }
770
771
772 fw() {
773 firefox -P default "$@" >/dev/null 2>&1
774 }
775
776 getdir () {
777 local help="Usage: getdir [--help] PATH
778 Output the directory of PATH, or just PATH if it is a directory."
779 if [[ $1 == --help ]]; then
780 echo "$help"
781 return 0
782 fi
783 if [[ $# -ne 1 ]]; then
784 echo "getdir error: expected 1 argument, got $#"
785 return 1
786 fi
787 if [[ -d $1 ]]; then
788 echo "$1"
789 else
790 local dir="$(dirname "$1")"
791 if [[ -d $dir ]]; then
792 echo "$dir"
793 else
794 echo "getdir error: directory does not exist"
795 return 1
796 fi
797 fi
798 }
799
800 git_empty_branch() { # start an empty git branch. carefull, it deletes untracked files.
801 [[ $# == 1 ]] || { echo 'need a branch name!'; return 1;}
802 local gitroot
803 gitroot || return 1 # function to set gitroot
804 builtin cd "$gitroot"
805 git symbolic-ref HEAD refs/heads/$1
806 rm .git/index
807 git clean -fdx
808 }
809
810 gitroot() {
811 local help="Usage: gitroot [--help]
812 Print the full path to the root of the current git repo
813
814 Handles being within a .git directory, unlike git rev-parse --show-toplevel,
815 and works in older versions of git which did not have that."
816 if [[ $1 == --help ]]; then
817 echo "$help"
818 return
819 fi
820 local p=$(git rev-parse --git-dir) || { echo "error: not in a git repo" ; return 1; }
821 [[ $p != /* ]] && p=$PWD
822 echo "${p%%/.git}"
823 }
824
825 gitian() {
826 git config user.email ian@iankelling.org
827 }
828
829 gmacs() {
830 # quit will prompt if the program crashes.
831 gdb -ex=r -ex=quit --args emacs "$@"; r;
832 }
833
834 gdkill() {
835 # kill the emacs daemon
836 pk1 emacs --daemon
837 }
838
839 gse() {
840 git send-email --notes '--envelope-sender=<ian@iankelling.org>' \
841 --suppress-cc=self "$@"
842 }
843
844 gr() {
845 grep -iIP --color=auto "$@"
846 }
847
848 grr() {
849 if [[ ${#@} == 1 ]]; then
850 grep -riIP --color=auto "$@" .
851 else
852 grep -riIP --color=auto "$@"
853 fi
854 }
855
856 hstatus() {
857 # do git status on published repos
858 cd /a/bin/githtml
859 for x in !(forks) forks/* ian-specific/*; do
860 cd `readlink -f $x`/..
861 hr
862 echo $x
863 i status
864 cd /a/bin/githtml
865 done
866 }
867
868 hl() { # history limit. Write extra history to archive file.
869 # todo: this is not working or not used currently
870 local max_lines linecount tempfile prune_lines x
871 local harchive="${HISTFILE}_archive"
872 for x in "$HISTFILE" "$harchive"; do
873 [[ -e $x ]] || { touch "$x" && echo "notice from hl(): creating $x"; }
874 if [[ ! $x || ! -e $x || ! -w $x || $(stat -c "%u" "$x") != $EUID ]]; then
875 echo "error in hl: history file \$x:$x no good"
876 return 1
877 fi
878 done
879 history -a # save history
880 max_lines=$HISTFILELINES
881 [[ $max_lines =~ ^[0-9]+$ ]] || { echo "error in hl: failed to get max line count"; return 1; }
882 linecount=$(wc -l < $HISTFILE) # pipe so it doesn't output a filename
883 [[ $linecount =~ ^[0-9]+$ ]] || { echo "error in hl: wc failed"; return 1; }
884 if (($linecount > $max_lines)); then
885 prune_lines=$(($linecount - $max_lines))
886 head -n $prune_lines "$HISTFILE" >> "$harchive" \
887 && sed --follow-symlinks -ie "1,${prune_lines}d" $HISTFILE
888 fi
889 }
890
891 hr() { # horizontal row. used to break up output
892 printf "$(tput setaf 5)â–ˆ$(tput sgr0)%.0s" $(seq ${COLUMNS:-60})
893 echo
894 }
895
896 hrcat() { local f; for f; do [[ -f $f ]] || continue; hr; echo "$f"; cat "$f"; done }
897
898
899 i() { git "$@"; }
900 # modified from ~/local/bin/git-completion.bash
901 # other completion commands are mostly taken from bash_completion package
902 complete -o bashdefault -o default -o nospace -F _git i 2>/dev/null \
903 || complete -o default -o nospace -F _git i
904
905 if ! type service &>/dev/null; then
906 service() {
907 echo actually running: systemctl $2 $1
908 systemctl $2 $1
909 }
910 fi
911
912 ic() {
913 # fast commit all
914 git commit -am "$*"
915 }
916
917 idea() {
918 /a/opt/idea-IC-163.7743.44/bin/idea.sh "$@" &r
919 }
920
921 ifn() {
922 # insensitive find
923 find -L . -not \( -name .svn -prune -o -name .git -prune \
924 -o -name .hg -prune -o -name .editor-backups -prune \
925 -o -name .undo-tree-history -prune \) -iname "*$**" 2>/dev/null
926 }
927
928
929 if [[ $OS == Windows_NT ]]; then
930 # cygstart wrapper
931 cs() {
932 cygstart "$@" &
933 }
934 xp() {
935 explorer.exe .
936 }
937 # launch
938 o() {
939 local x=(*$1*)
940 (( ${#x[#]} > 1 )) && { echo "warning ${#x[#]} matches found"; sleep 1; }
941 cygstart *$1* &
942 }
943 else
944 o() {
945 if type gvfs-open &> /dev/null ; then
946 gvfs-open "$@"
947 else
948 xdg-open "$@"
949 fi
950 # another alternative is run-mailcap
951 }
952 fi
953
954 net-dev-info() {
955 e "lspci -nnk|gr -iA2 net"
956 lspci -nnk|gr -iA2 net
957 hr
958 e "s lshw -C network"
959 hr
960 s lshw -C network
961
962 }
963
964 istext() {
965 grep -Il "" "$@" &>/dev/null
966 }
967
968 jtail() {
969 journalctl -n 10000 -f "$@" | grep -Evi "^(\S+\s+){4}(sudo|sshd|cron)"
970 }
971
972 kff() { # keyboardio firmware flash
973 pushd /a/opt/sketches/Model01-Firmware
974 yes $'\n' | make flash
975 popd
976 }
977
978 l() {
979 if [[ $PWD == /[iap] ]]; then
980 command ls -A --color=auto -I lost+found "$@"
981 else
982 command ls -A --color=auto "$@"
983 fi
984 }
985
986
987 lcn() { locate -i "*$**"; }
988
989 lld() { ll -d "$@"; }
990
991 low() { # make filenames lowercase, remove bad chars
992 local f new
993 for f in "$@"; do
994 new="${f,,}" # downcase
995 new="${new//[^[:alnum:]._-]/_}" # sub bad chars
996 new="${new#"${new%%[[:alnum:]]*}"}" # remove leading/trailing non-alnum
997 new="${new%"${new##*[[:alnum:]]}"}"
998 # remove bad underscores, like __ and _._
999 new=$(echo $new | sed -r 's/__+/_/g;s/_+([.-])|([.-])_+/\1/g')
1000 safe_rename "$f" "$new" || return 1
1001 done
1002 return 0
1003 }
1004
1005 lower() { # make first letter of filenames lowercase.
1006 local x
1007 for x in "$@"; do
1008 if [[ ${x::1} == [A-Z] ]]; then
1009 y=$(tr "[A-Z]" "[a-z]" <<<"${x::1}")"${x:1}"
1010 safe_rename "$x" "$y" || return 1
1011 fi
1012 done
1013 }
1014
1015
1016 k() { # history search
1017 grep -P --binary-files=text "$@" ${HISTFILE:-~/.bash_history} | tail -n 80;
1018 }
1019
1020 ks() { # history search
1021 grep -P --binary-files=text "$@" ${HISTFILE:-~/.bash_history} | uniq;
1022 }
1023
1024
1025 make-targets() {
1026 # show make targets, via http://stackoverflow.com/questions/3063507/list-goals-targets-in-gnu-make
1027 make -qp | awk -F':' '/^[a-zA-Z0-9][^$#\/\t=]*:([^=]|$)/ {split($1,A,/ /);for(i in A)print A[i]}'
1028 }
1029
1030 mbenable() {
1031 mb=$1
1032 dst=/m/4e/$1
1033 src=/m/md/$1
1034 set -x
1035 mv -T $src $dst || { set +x; return 1; }
1036 ln -s -T $dst $src
1037 /a/exe/lnf /p/.mu ~
1038 mu index --maildir=/m/4e
1039 set +x
1040 }
1041 mbdisable() {
1042 mb=$1
1043 dst=/m/md/$1
1044 src=/m/4e/$1
1045 set -x
1046 if [[ -L $dst ]]; then rm $dst; fi
1047 mv -T $src $dst
1048 set +x
1049 }
1050
1051 mdt() {
1052 markdown -o /tmp/mdtest.html "$1"
1053 firefox /tmp/mdtest.html
1054 }
1055
1056
1057 mkc() {
1058 mkdir "$1"
1059 c "$1"
1060 }
1061
1062 mkt() { # mkdir and touch file
1063 local path="$1"
1064 mkdir -p "$(dirname "$path")"
1065 touch "$path"
1066 }
1067
1068 mkdir() { command mkdir -p "$@"; }
1069
1070 mo() { xset dpms force off; } # monitor off
1071
1072 otp() {
1073 oathtool --totp -b "$@" | xclip -selection clipboard
1074 }
1075
1076 # pithosfly is broken due to bitrot.
1077 pithos() {
1078 cd /
1079 export PYTHONPATH=/a/opt/Pithosfly
1080 python3 -m pithos&r
1081 }
1082
1083 pakaraoke() {
1084 # from http://askubuntu.com/questions/456021/remove-vocals-from-mp3-and-get-only-instrumentals
1085 pactl load-module module-ladspa-sink sink_name=Karaoke master=alsa_output.usb-Audioengine_Audioengine_D1-00.analog-stereo plugin=karaoke_1409 label=karaoke control=-30
1086 }
1087
1088
1089 pfind() { #find *$1* in $PATH
1090 [[ $# != 1 ]] && { echo requires 1 argument; return 1; }
1091 local pathArray
1092 IFS=: pathArray=($PATH); unset IFS
1093 find "${pathArray[@]}" -iname "*$1*"
1094 }
1095
1096 pk1() {
1097 local pid
1098 pid=($(pgrep -f "$*"))
1099 case ${#pid[@]} in
1100 1)
1101 ps -F $pid
1102 m kill $pid
1103 ;;
1104 0) echo "no pid found" ;;
1105 *)
1106 ps -F ${pid[@]}
1107 ;;
1108 esac
1109 }
1110
1111 pick-trash() {
1112 # trash-restore lists everything that has been trashed at or below CWD
1113 # This picks out files just in CWD, not subdirectories,
1114 # which also match grep $1, usually use $1 for a time string
1115 # which you get from running restore-trash once first
1116 local name x ask
1117 local nth=1
1118 # last condition is to not ask again for ones we skipped
1119 while name="$( echo | restore-trash | gr "$PWD/[^/]\+$" | gr "$1" )" \
1120 && [[ $name ]] && (( $(wc -l <<<"$name") >= nth )); do
1121 name="$(echo "$name" | head -n $nth | tail -n 1 )"
1122 read -p "$name [Y/n] " ask
1123 if [[ ! $ask || $ask == [Yy] ]]; then
1124 x=$( echo "$name" | gr -o "^\s*[0-9]*" )
1125 echo $x | restore-trash > /dev/null
1126 elif [[ $ask == [Nn] ]]; then
1127 nth=$((nth+1))
1128 else
1129 return
1130 fi
1131 done
1132 }
1133
1134 ping8() { ping 8.8.8.8; }
1135
1136 pub() {
1137 rld /a/h/_site/ li:/var/www/iankelling.org/html
1138 }
1139
1140 pubip() { curl -4s https://icanhazip.com; }
1141 whatismyip() { pubip; }
1142
1143 pumpa() {
1144 # fixes the menu bar in xmonad. this won\'t be needed when xmonad
1145 # packages catches up on some changes in future (this is written in
1146 # 4/2017)
1147 #
1148 # geekosaur: so you'll want to upgrade to xmonad 0.13 or else use a
1149 # locally modified XMonad.Hooks.ManageDocks that doesn't set the
1150 # work area; turns out it's impossible to set correctly if you are
1151 # not a fully EWMH compliant desktop environment
1152 #
1153 # geekosaur: chrome shows one failure mode, qt/kde another, other
1154 # gtk apps a third, ... I came up with a setting that works for me
1155 # locally but apparently doesn't work for others, so we joined the
1156 # other tiling window managers in giving up on setting it at all
1157 #
1158 xprop -root -remove _NET_WORKAREA
1159 command pumpa &r
1160 }
1161
1162
1163 pwgen() {
1164 # -m = min length
1165 # -x = max length
1166 # -t = print pronunciation
1167 apg -m 12 -x 16 -t
1168 }
1169
1170 pwlong() {
1171 # -M CLN = use Caps, Lowercase, Numbers
1172 # -n 1 = 1 password
1173 # -a 1 = use random instead of pronounceable algorithm
1174 apg -m 50 -x 70 -n 1 -a 1 -M CLN
1175 }
1176
1177
1178 q() { # start / launch a program in the backround and redir output to null
1179 "$@" &> /dev/null &
1180 }
1181
1182 r() {
1183 exit "$@" 2>/dev/null
1184 }
1185
1186 rbpipe() { rbt post -o --diff-filename=- "$@"; }
1187 rbp() { rbt post -o "$@"; }
1188
1189 rl() {
1190 # rsync, root is required to keep permissions right.
1191 # rsync --archive --human-readable --verbose --itemize-changes --checksum \(-ahvic\) \
1192 # --no-times --delete
1193 # basically, make an exact copy, use checksums instead of file times to be more accurate
1194 rsync -ahvic --delete "$@"
1195 }
1196 rld() {
1197 # like rlu, but don't delete files on the target end which
1198 # do not exist on the original end.
1199 rsync -ahvic "$@"
1200 }
1201 complete -F _rsync -o nospace rld rl rlt
1202
1203 rlt() {
1204 # rl without preserving modification time.
1205 rsync -ahvic --delete --no-t "$@"
1206 }
1207
1208 rlu() { # [OPTS] HOST PATH
1209 # eg. rlu -opts frodo /testpath
1210 # relative paths will expanded with readlink -f.
1211 # useful for selectively sending dirs which have been synced with unison,
1212 # where the path is the same on both hosts.
1213 opts=("${@:1:$#-2}") # 1 to last -2
1214 path="${@:$#}" # last
1215 host="${@:$#-1:1}" # last -1
1216 if [[ $path == .* ]]; then
1217 path=$(readlink -f $path)
1218 fi
1219 # rync here uses checksum instead of time so we don't mess with
1220 # unison relying on time as much. g is for group, same reason
1221 # to keep up with unison.
1222 s rsync -rlpchviog --relative "${opts[@]}" "$path" "root@$host:/";
1223 }
1224
1225 # only run on desktop. simpler to keep this on one system.
1226 r2eadd() { # usage: name url
1227 # initial setup of rss2email:
1228 # r2e new r2e@iankelling.org
1229 # that initializes files, and sets default email.
1230 # symlink to the config doesn't work, so I copied it to /p/c
1231 # and then use cli option to specify explicit path.
1232 # Only option changed from default config is to set
1233 # force-from = True
1234 #
1235 # or else for a few feeds, the from address is set by the feed, and
1236 # if I fail delivery, then I send a bounce message to that from
1237 # address, which makes me be a spammer.
1238
1239 r2e add $1 "$2" $1@r2e.iankelling.org
1240 # get up to date and don't send old entries now:
1241 r2e run --no-send $1
1242 }
1243 r2e() { command r2e -d /p/c/rss2email.json -c /p/c/rss2email.cfg "$@"; }
1244
1245 rspicy() { # usage: HOST DOMAIN
1246 # connect to spice vm remote host. use vspicy for local host
1247 local port=$(ssh $1<<EOF
1248 sudo virsh dumpxml $2|grep "<graphics.*type='spice'" | \
1249 sed -rn "s/.*port='([0-9]+).*/\1/p"
1250 EOF
1251 )
1252 if [[ $port ]]; then
1253 spicy -h $1 -p $port
1254 else
1255 echo "error: no port found. check that the domain is running."
1256 fi
1257 }
1258
1259 rmstrips() {
1260 ssh fencepost head -n 300 /gd/gnuorg/EventAndTravelInfo/rms-current-trips.txt
1261 }
1262
1263 s() {
1264 # background
1265 # I use a function because otherwise we can't use in a script,
1266 # can't assign to variable.
1267 #
1268 # note: gksudo is recommended for X apps because it does not set the
1269 # home directory to the same, and thus apps writing to ~ fuck things up
1270 # with root owned files.
1271 #
1272 if [[ $EUID != 0 || $1 == -* ]]; then
1273 SUDOD="$PWD" sudo -i "$@"
1274 else
1275 "$@"
1276 fi
1277 }
1278
1279 safe_rename() { # warn and don't rename if file exists.
1280 # mv -n exists, but it's silent
1281 if [[ $# != 2 ]]; then
1282 echo safe_rename error: $# args, need 2 >2
1283 return 1
1284 fi
1285 if [[ $1 != $2 ]]; then # yes, we want to silently ignore this
1286 if [[ -e $2 || -L $2 ]]; then
1287 echo "Cannot rename $1 to $2 as it already exists."
1288 else
1289 mv -vi "$1" "$2"
1290 fi
1291 fi
1292 }
1293
1294
1295 sb() { # sudo bash -c
1296 # use sb instead of s is for sudo redirections,
1297 # eg. sb 'echo "ok fine" > /etc/file'
1298 local SUDOD="$PWD"
1299 sudo -i bash -c "$@"
1300 }
1301 complete -F _root_command s sb
1302
1303 scssl() {
1304 # s gem install scss-lint
1305 pushd /a/opt/thoughtbot-guides
1306 git pull --stat
1307 popd
1308 scss-lint -c /a/opt/thoughtbot-guides/style/sass/.scss-lint.yml "$@"
1309 }
1310
1311 ser() {
1312 local s; [[ $EUID != 0 ]] && s=sudo
1313 if type -p systemctl &>/dev/null; then
1314 $s systemctl $1 $2
1315 else
1316 $s service $2 $1
1317 fi
1318 }
1319
1320 setini() { # set a value in a .ini style file
1321 key="$1" value="$2" section="$3" file="$4"
1322 if [[ -s $file ]]; then
1323 sed -ri -f - "$file" <<EOF
1324 # remove existing keys
1325 / *\[$section\]/,/^ *\[[^]]+\]/{/^\s*$key[[:space:]=]/d}
1326 # add key
1327 /^\s*\[$section\]/a $key=$value
1328 # from section to eof, do nothing
1329 /^\s*\[$section\]/,\$b
1330 # on the last line, if we haven't found section yet, add section and key
1331 \$a [$section]\\
1332 $key=$value
1333 EOF
1334 else
1335 cat >"$file" <<EOF
1336 [$section]
1337 $key=$value
1338 EOF
1339 fi
1340 }
1341
1342 sgo() { # service go
1343 service=$1
1344 ser restart $service || return 1
1345 if type -p systemctl &>/dev/null; then
1346 ser enable $service
1347 fi
1348 }
1349
1350
1351 shellck() {
1352 # 2086 = unquoted $var
1353 # 2046 = unquoted $(cmd)
1354 # i had -x as an arg, but debian testing(stretch) doesn\'t support it
1355 shellcheck -e 2086,2046,2068,2006,2119 "$@"
1356 }
1357
1358 skaraoke() {
1359 local tmp out
1360 in="$1"
1361 out=${2:-${1%.*}.sh}
1362 tmp=$(mktemp -d)
1363 script -t -c "mpv --no-config --no-resume-playback --no-terminal --no-audio-display '$1'" $tmp/typescript 2>$tmp/timing
1364 # todo, the current sleep seems pretty good, but it
1365 # would be nice to have an empirical measurement, or
1366 # some better wait to sync up.
1367 #
1368 # note: --loop-file=no prevents it from hanging if you have that
1369 # set to inf the mpv config.
1370 # --loop=no prevents it from exit code 3 due to stdin if you
1371 # had it set to inf in mpv config.
1372 #
1373 # args go to mpv, for example --volume=80, 50%
1374 cat >$out <<EOFOUTER
1375 #!/bin/bash
1376 trap "trap - TERM && kill 0" INT TERM ERR; set -e
1377 ( sleep .2; scriptreplay <( cat <<'EOF'
1378 $(cat $tmp/timing)
1379 EOF
1380 ) <( cat <<'EOF'
1381 $(cat $tmp/typescript)
1382 EOF
1383 ))&
1384 base64 -d - <<'EOF'| mpv --loop=no --loop-file=no --no-terminal --no-audio-display "\$@" -
1385 $(base64 "$1")
1386 EOF
1387 kill 0
1388 EOFOUTER
1389 rm -r $tmp
1390 chmod +x $out
1391 }
1392
1393 slog() {
1394 # log with script. timing is $1.t and script is $1.s
1395 # -l to save to ~/typescripts/
1396 # -t to add a timestamp to the filenames
1397 local logdir do_stamp arg_base
1398 (( $# >= 1 )) || { echo "arguments wrong"; return 1; }
1399 logdir="/a/dt/"
1400 do_stamp=false
1401 while getopts "lt" option
1402 do
1403 case $option in
1404 l ) arg_base=$logdir ;;
1405 t ) do_stamp=true ;;
1406 esac
1407 done
1408 shift $(($OPTIND - 1))
1409 arg_base+=$1
1410 [[ -e $logdir ]] || mkdir -p $logdir
1411 $do_stamp && arg_base+=$(date +%F.%T%z)
1412 script -t $arg_base.s 2> $arg_base.t
1413 }
1414 splay() { # script replay
1415 #logRoot="$HOME/typescripts/"
1416 #scriptreplay "$logRoot$1.t" "$logRoot$1.s"
1417 scriptreplay "$1.t" "$1.s"
1418 }
1419
1420 spend() {
1421 s systemctl suspend
1422 }
1423
1424 sr() {
1425 # sudo redo. be aware, this command may not work right on strange distros or earlier software
1426 if [[ $# == 0 ]]; then
1427 sudo -E bash -c -l "$(history -p '!!')"
1428 else
1429 echo this command redos last history item. no argument is accepted
1430 fi
1431 }
1432
1433 srm () {
1434 # with -ll, less secure but faster.
1435 command srm -ll "$@"
1436 }
1437
1438 srun() {
1439 scp $2 $1:/tmp
1440 ssh $1 /tmp/${2##*/} "${@:2}"
1441 }
1442
1443 sss() { # ssh solo
1444 ssh -oControlMaster=no -oControlPath=/ "$@"
1445 }
1446 ssk() {
1447 local -a opts=()
1448 while [[ $1 == -* ]]; do
1449 opts+=("$1")
1450 shift
1451 done
1452 m pkill -f "^ssh: /tmp/ssh_mux_${USER}_${1#*@}_22_"
1453 m ssh "${opts[@]}" "$@"
1454 }
1455
1456 swap() {
1457 local tmp
1458 tmp=$(mktemp)
1459 mv $1 $tmp
1460 mv $2 $1
1461 mv $tmp $2
1462 }
1463
1464 t() {
1465 local x
1466 local -a args
1467 if type -t trash-put >/dev/null; then
1468 # skip args that don't exist, or else trash-put will have an error
1469 for x in "$@"; do
1470 if [[ -e $x || -L $x ]]; then
1471 args+=("$x")
1472 fi
1473 done
1474 [[ ! ${args[@]} ]] || trash-put "${args[@]}"
1475 else
1476 rm -rf "$@"
1477 fi
1478 }
1479
1480
1481 tclock() {
1482 clear
1483 date +%l:%_M
1484 len=60
1485 # this goes to full width
1486 #len=${1:-$((COLUMNS -7))}
1487 x=1
1488 while true; do
1489 if (( x == len )); then
1490 end=true
1491 d="$(date +%l:%_M) "
1492 else
1493 end=false
1494 d=$(date +%l:%M:%_S)
1495 fi
1496 echo -en "\r"
1497 echo -n "$d"
1498 for ((i=0; i<x; i++)); do
1499 if (( i % 6 )); then
1500 echo -n _
1501 else
1502 echo -n .
1503 fi
1504 done
1505 if $end; then
1506 echo
1507 x=1
1508 else
1509 x=$((x+1))
1510 fi
1511 sleep 5
1512 done
1513 }
1514
1515
1516 te() {
1517 # test existence / exists
1518 local ret=0
1519 for x in "$@"; do
1520 [[ -e "$x" || -L "$x" ]] || ret=1
1521 done
1522 return $ret
1523 }
1524
1525 # mail related
1526 testmail() {
1527 declare -gi _seq; _seq+=1
1528 echo "test body" | m mail -s "test mail from $HOSTNAME, $_seq" "${@:-root@localhost}"
1529 # for testing to send from an external address, you can do for example
1530 # -aFrom:ian@iank.bid web-6fnbs@mail-tester.com
1531 # note in exim, you can retry a deferred message
1532 # s exim -M MSG_ID
1533 # MSG_ID is in /var/log/exim4/mainlog, looks like 1ccdnD-0001nh-EN
1534 }
1535
1536 # to test sieve, use below command. for fsf mail, see fsf-get-mail script.
1537 # make modifications, then copy to live file, use -eW to actually modify mailbox
1538 # cp /p/c/subdir_files/sieve/personal{test,}.sieve; testsievelist -eW INBOX
1539 #
1540 # Another option is to use sieve-test SCRIPT MAIL_FILE. note,
1541 # sieve-test doesn't know about envelopes, I'm not sure if sieve-filter does.
1542
1543 # sieve with output filter. arg is mailbox, like INBOX.
1544 # This depends on dovecot conf, notably mail_location in /etc/dovecot/conf.d/10-mail.conf
1545
1546 testsievelist() {
1547 sieve-filter ~/sieve/maintest.sieve "$@" >/tmp/testsieve.log 2> >(tail) && sed -rn '/^Performed actions:/{n;n;p}' /tmp/testsieve.log | sort -u
1548 }
1549
1550
1551 # mail related
1552 # plain sieve
1553 testsieve() {
1554 sieve-filter ~/sieve/main.sieve "$@"
1555 }
1556
1557 # mail related
1558 testexim() {
1559 # testmail above calls sendmail, which is a link to exim/postfix.
1560 # it's docs don't say a way of adding an argument
1561 # to sendmail to turn on debug output. We could make a wrapper, but
1562 # that is a pain. Exim debug args are documented here:
1563 # http://www.exim.org/exim-html-current/doc/html/spec_html/ch-the_exim_command_line.html
1564 #
1565 # http://www.exim.org/exim-html-current/doc/html/spec_html/ch-building_and_installing_exim.html
1566 # note, for exim daemon, you can turn on debug options by
1567 # adding -d, etc to COMMONOPTIONS in
1568 # /etc/default/exim4
1569 # for testing external mail, you need the to address as final cmdline arg
1570 exim -d+tls -t <<'EOF'
1571 From: root@frodo.lan
1572 To: ian@mail.iankelling.org
1573 Subject: Testing Exim
1574
1575 This is a test message.
1576 EOF
1577 }
1578
1579 tm() {
1580 # timer in minutes
1581 # --no-config
1582 (sleep $(calc "$@ * 60") && mpv --no-config --volume 50 /a/bin/data/alarm.mp3) > /dev/null 2>&1 &
1583 }
1584
1585 trg() { transmission-remote-gtk&r; }
1586 trc() {
1587 # example, set global upload limit to 100 kilobytes:
1588 # trc -u 100
1589 TR_AUTH=":$(jq -r .profiles[0].password ~/.config/transmission-remote-gtk/config.json)" transmission-remote transmission.lan -ne "$@"
1590 }
1591
1592
1593 tu() {
1594 local s;
1595 local dir="$(dirname "$1")"
1596 if [[ -e $1 && ! -w $1 || ! -w $(dirname "$1") ]]; then
1597 s=s;
1598 fi
1599 $s teeu "$@"
1600 }
1601
1602 tx() { # toggle set -x, and the prompt so it doesn't spam
1603 if [[ $- == *x* ]]; then
1604 set +x
1605 PROMPT_COMMAND=prompt_command
1606 else
1607 unset PROMPT_COMMAND
1608 PS1="\w \$ "
1609 set -x
1610 fi
1611 }
1612
1613 psnetns() {
1614 # show all processes in the network namespace $1.
1615 # blank entries appear to be subprocesses/threads
1616 local x netns
1617 netns=$1
1618 ps -w | head -n 1
1619 s find -L /proc/[1-9]*/task/*/ns/net -samefile /run/netns/$netns | cut -d/ -f5 | \
1620 while read l; do
1621 x=$(ps -w --no-headers -p $l);
1622 if [[ $x ]]; then echo "$x"; else echo $l; fi;
1623 done
1624 }
1625
1626 m() { printf "%s\n" "$*"; "$@"; }
1627
1628
1629 vpncmd() {
1630 m s nsenter -t $(pgrep -f "/usr/sbin/openvpn .* --config /etc/openvpn/client/client.conf") -n -m "$@"
1631 }
1632 vpnf() {
1633 vpncmd gksudo -u ian "firefox -no-remote -P firefox-main-profile" &r
1634 }
1635 vpnbash() {
1636 vpncmd bash
1637 }
1638
1639
1640
1641 virshrm() {
1642 for x in "$@"; do virsh destroy "$x"; virsh undefine "$x"; done
1643 }
1644
1645 vm-set-listen(){
1646 local t=$(mktemp)
1647 local vm=$1
1648 local ip=$2
1649 s virsh dumpxml $vm | sed -r "s/(<listen.*address=')([^']+)/\1$ip/" | \
1650 sed -r "s/listen='[^']+/listen='$ip/"> $t
1651 s virsh undefine $vm
1652 s virsh define $t
1653 }
1654
1655
1656 vmshare() {
1657 vm-set-listen $1 0.0.0.0
1658 }
1659
1660
1661 vmunshare() {
1662 vm-set-listen $1 127.0.0.1
1663 }
1664
1665
1666 vpn() {
1667 if [[ -e /lib/systemd/system/openvpn-client@.service ]]; then
1668 local vpn_service=openvpn-client
1669 else
1670 local vpn_service=openvpn
1671 fi
1672
1673 [[ $1 ]] || { echo need arg; return 1; }
1674 journalctl --unit=$vpn_service@$1 -f -n0 &
1675 s systemctl start $vpn_service@$1
1676 # sometimes the ask-password agent does not work and needs a delay.
1677 sleep .5
1678 # https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=779240
1679 # noticed around 8-2017 after update from around stretch release
1680 # on debian testing, even though the bug is much older.
1681 s systemd-tty-ask-password-agent
1682 }
1683
1684 vpnoff() {
1685 [[ $1 ]] || { echo need arg; return 1; }
1686 if [[ -e /lib/systemd/system/openvpn-client@.service ]]; then
1687 local vpn_service=openvpn-client
1688 else
1689 local vpn_service=openvpn
1690 fi
1691 s systemctl stop $vpn_service@$1
1692 }
1693
1694
1695 vrm() {
1696 virsh destroy $1
1697 virsh undefine $1
1698 }
1699
1700
1701
1702 vspicy() { # usage: VIRSH_DOMAIN
1703 # connect to vms made with virt-install
1704 spicy -p $(sudo virsh dumpxml "$1"|grep "<graphics.*type='spice'"|\
1705 sed -r "s/.*port='([0-9]+).*/\1/")
1706 }
1707
1708
1709 wtr() { curl wttr.in/boston; }
1710
1711 xl() {
1712 # this succeeds even if gnome-screensaver isn\'t running.
1713 gnome-screensaver-command --exit &>/dev/null
1714 mate-screensaver-command --exit &>/dev/null
1715 if ! pidof xscreensaver; then
1716 pushd /
1717 xscreensaver &
1718 popd
1719 # 1 was not long enough
1720 sleep 3
1721 fi
1722 xscreensaver-command -lock
1723 }
1724
1725 #############################
1726 ######### misc stuff ########
1727 #############################
1728
1729 # from curl cheat.sh/:bash_completion
1730 _cheatsh_complete_curl()
1731 {
1732 local cur prev opts
1733 _get_comp_words_by_ref -n : cur
1734
1735 COMPREPLY=()
1736 #cur="${COMP_WORDS[COMP_CWORD]}"
1737 prev="${COMP_WORDS[COMP_CWORD-1]}"
1738 opts="$(curl -s cheat.sh/:list | sed s@^@cheat.sh/@)"
1739
1740 if [[ ${cur} == cheat.sh/* ]] ; then
1741 COMPREPLY=( $(compgen -W "${opts}" -- ${cur}) )
1742 __ltrim_colon_completions "$cur"
1743 return 0
1744 fi
1745 }
1746 complete -F _cheatsh_complete_curl curl
1747
1748
1749 if [[ $- == *i* ]]; then
1750 # commands to run when bash exits normally
1751 trap "hl" EXIT
1752 fi
1753
1754
1755 # temporary variables to test colorization
1756 # some copied from gentoo /etc/bash/bashrc,
1757 use_color=false
1758 # dircolors --print-database uses its own built-in database
1759 # instead of using /etc/DIR_COLORS. Try to use the external file
1760 # first to take advantage of user additions.
1761 safe_term=${TERM//[^[:alnum:]]/?} # sanitize TERM
1762 match_lhs=""
1763 [[ -f ~/.dir_colors ]] && match_lhs="${match_lhs}$(<~/.dir_colors)"
1764 [[ -f /etc/DIR_COLORS ]] && match_lhs="${match_lhs}$(</etc/DIR_COLORS)"
1765 [[ -z ${match_lhs} ]] \
1766 && type -P dircolors >/dev/null \
1767 && match_lhs=$(dircolors --print-database)
1768 # test if our $TERM is in the TERM values in dircolor
1769 [[ $'\n'${match_lhs} == *$'\n'"TERM "${safe_term}* ]] && use_color=true
1770
1771
1772 if ${use_color} && [[ $- == *i* ]]; then
1773
1774 if [[ $XTERM_VERSION == Cygwin* ]]; then
1775 get_term_color() {
1776 for x in "$@"; do
1777 case $x in
1778 underl) echo -n $'\E[4m' ;;
1779 bold) echo -n $'\E[1m' ;;
1780 red) echo -n $'\E[31m' ;;
1781 green) echo -n $'\E[32m' ;;
1782 blue) echo -n $'\E[34m' ;;
1783 cyan) echo -n $'\E[36m' ;;
1784 yellow) echo -n $'\E[33m' ;;
1785 purple) echo -n $'\E[35m' ;;
1786 nocolor) echo -n $'\E(B\E[m' ;;
1787 esac
1788 done
1789 }
1790
1791 else
1792 get_term_color() {
1793 for x in "$@"; do
1794 case $x in
1795 underl) echo -n $(tput smul) ;;
1796 bold) echo -n $(tput bold) ;;
1797 red) echo -n $(tput setaf 1) ;;
1798 green) echo -n $(tput setaf 2) ;;
1799 blue) echo -n $(tput setaf 4) ;;
1800 cyan) echo -n $(tput setaf 6) ;;
1801 yellow) echo -n $(tput setaf 3) ;;
1802 purple) echo -n $(tput setaf 5) ;;
1803 nocolor) echo -n $(tput sgr0) ;; # no font attributes
1804 esac
1805 done
1806 }
1807 fi
1808 else
1809 get_term_color() {
1810 :
1811 }
1812 fi
1813 # Try to keep environment pollution down, EPA loves us.
1814 unset safe_term match_lhs use_color
1815
1816
1817
1818
1819
1820
1821 ###############
1822 # prompt ######
1823 ###############
1824
1825
1826 if [[ $- == *i* ]]; then
1827 # git branch/status prompt function
1828 if [[ $OS != Windows_NT ]]; then
1829 GIT_PS1_SHOWDIRTYSTATE=true
1830 fi
1831 # arch source lopip show -fcation
1832 [[ -r /usr/share/git/git-prompt.sh ]] && source /usr/share/git/git-prompt.sh
1833 # fedora/debian source
1834 [[ -r /usr/share/git-core/contrib/completion/git-prompt.sh ]] && source /usr/share/git-core/contrib/completion/git-prompt.sh
1835
1836 # in case we didn't source git-prompt.sh
1837 if ! declare -f __git_ps1 > /dev/null; then
1838 __git_ps1() {
1839 :
1840 }
1841 fi
1842
1843 # this needs to come before next ps1 stuff
1844 # this stuff needs bash 4, feb 2009,
1845 # old enough to no longer condition on $BASH_VERSION anymore
1846 shopt -s autocd
1847 shopt -s dirspell
1848 PS1='\w'
1849 if [[ $- == *i* ]] && [[ ! $RLC_INSIDE_EMACS ]]; then
1850 PROMPT_DIRTRIM=2
1851 bind -m vi-command B:shell-backward-word
1852 bind -m vi-command W:shell-forward-word
1853 fi
1854
1855 if [[ $SSH_CLIENT ]]; then
1856 PS1="\h $PS1"
1857 fi
1858
1859 prompt_command() {
1860 local return=$? # this MUST COME FIRST
1861 local psc pst ps_char ps_color stale_subvol
1862 unset IFS
1863 history -a # save history
1864
1865 # for titlebar
1866 if [[ $TERM == *(screen*|xterm*|rxvt*) ]]; then
1867 # from the screen man page
1868 if [[ $TERM == screen* ]]; then
1869 local title_escape="\033]..2;"
1870 else
1871 local title_escape="\033]0;"
1872 fi
1873 echo -ne "$title_escape${PWD/#$HOME/~} $USER@$HOSTNAME\007"
1874 fi
1875
1876
1877 case $return in
1878 0) ps_color="$(get_term_color blue)"
1879 ps_char='\$'
1880 ;;
1881 1) ps_color="$(get_term_color green)"
1882 ps_char="$return \\$"
1883 ;;
1884 *) ps_color="$(get_term_color yellow)"
1885 ps_char="$return \\$"
1886 ;;
1887 esac
1888 if [[ ! -O . ]]; then # not owner
1889 if [[ -w . ]]; then # writable
1890 ps_color="$(get_term_color bold red)"
1891 else
1892 ps_color="$(get_term_color bold green)"
1893 fi
1894 fi
1895 # I would set nullglob, but bash has had bugs where that
1896 # doesn't work if not in top level.
1897 if [[ -e /nocow/btrfs-stale ]] && ((`ls -AUq /nocow/btrfs-stale|wc -l`)); then
1898 ps_char="! $ps_char"
1899 fi
1900 PS1="${PS1%"${PS1#*[wW]}"} \[$ps_color\]$ps_char\[$(get_term_color nocolor)\] "
1901 # emacs completion doesn't like the git prompt atm, so disabling it.
1902 #PS1="${PS1%"${PS1#*[wW]}"}$(__git_ps1 ' (%s)') \[$ps_color\]$ps_char\[$(get_term_color nocolor)\] "
1903 }
1904 PROMPT_COMMAND=prompt_command
1905 fi
1906
1907 reset-konsole() {
1908 # we also have a file in /a/c/...konsole...
1909 setini ShowMenuBarByDefault false KonsoleWindow $HOME/.config/konsolerc
1910 while read k v; do
1911 setini $k $v TabBar $HOME/.config/konsolerc
1912 done <<'EOF'
1913 TabBarVisibility ShowTabBarWhenNeeded
1914 TabBarPosition Top
1915 EOF
1916 }
1917
1918 reset-sakura() {
1919 while read k v; do
1920 setini $k $v sakura /a/c/subdir_files/.config/sakura/sakura.conf
1921 done <<'EOF'
1922 colorset1_back rgb(33,37,39
1923 less_questions true
1924 audible_bell No
1925 visible_bell No
1926 disable_numbered_tabswitch true
1927 scroll_lines 10000000
1928 scrollbar true
1929 EOF
1930 }
1931
1932
1933 ###########################################
1934 # stuff that makes sense to be at the end #
1935 ###########################################
1936 if [[ "$SUDOD" ]]; then
1937 cd "$SUDOD"
1938 unset SUDOD
1939 elif [[ -d /a ]] && [[ $PWD == $HOME ]] && [[ $- == *i* ]]; then
1940 cd /a
1941 fi
1942
1943
1944 # best practice
1945 unset IFS
1946
1947
1948 # if someone exported $SOE, catch errors
1949 if [[ $SOE ]]; then
1950 errcatch
1951 fi
1952
1953 # I'd prefer to have system-wide, plus user ruby, due to bug in it
1954 # https://github.com/rubygems/rubygems/pull/1002
1955 # further problems: installing multi-user ruby and user ruby,
1956 # you don't get multi-user ruby when you sudo to root, unless its sudo -i.
1957 # There a third hybrid form, which passenger error suggested I use,
1958 # but it didn't actually work.
1959
1960 # in cased I never need this
1961 # rvm for non-interactive shell: modified from https://rvm.io/rvm/basics
1962 #if [[ $(type -t rvm) == file && ! $(type -t ruby) ]]; then
1963 # source $(rvm 1.9.3 do rvm env --path)
1964 #fi
1965
1966 # based on warning from rvmsudo
1967 export rvmsudo_secure_path=1
1968
1969 if [[ -s "/usr/local/rvm/scripts/rvm" ]]; then
1970 source "/usr/local/rvm/scripts/rvm"
1971 elif [[ -s $HOME/.rvm/scripts/rvm ]]; then
1972 source $HOME/.rvm/scripts/rvm
1973 fi
1974
1975 export GOPATH=$HOME/go
1976 path_add $GOPATH/bin
1977
1978 export ARDUINO_PATH=/a/opt/Arduino/build/linux/work
1979
1980 path_add --end ~/.npm-global
1981
1982
1983 # didn't get drush working, if I did, this seems like the
1984 # only good thing to include for it.
1985 # Include Drush completion.
1986 # if [ -f "/home/ian/.drush/drush.complete.sh" ] ; then
1987 # source /home/ian/.drush/drush.complete.sh
1988 # fi
1989
1990
1991 # https://wiki.archlinux.org/index.php/Xinitrc#Autostart_X_at_login
1992 # i added an extra condition as gentoo xorg guide says depending on
1993 # $DISPLAY is fragile.
1994 if [[ ! $DISPLAY && $XDG_VTNR == 1 ]] && shopt -q login_shell && isarch; then
1995 exec startx
1996 fi
1997
1998
1999 # ensure no bad programs appending to this file will have an affect
2000 return 0