Update.
[scripts.git] / bashrc
1 # -*-Shell-script-*-
2
3 # PS4='+ $(date "+%s.%N")\011 '
4 # set -x
5
6 #########################################################################
7 # This program is free software: you can redistribute it and/or modify  #
8 # it under the terms of the version 3 of the GNU General Public License #
9 # as published by the Free Software Foundation.                         #
10 #                                                                       #
11 # This program is distributed in the hope that it will be useful, but   #
12 # WITHOUT ANY WARRANTY; without even the implied warranty of            #
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      #
14 # General Public License for more details.                              #
15 #                                                                       #
16 # You should have received a copy of the GNU General Public License     #
17 # along with this program. If not, see <http://www.gnu.org/licenses/>.  #
18 #                                                                       #
19 # Written by and Copyright (C) Francois Fleuret                         #
20 # Contact <francois@fleuret.org> for comments & bug reports             #
21 #########################################################################
22
23 # The site-specific and confidential settings are in another file
24
25 PRIVATE_BASHRC="${HOME}/private/bashrc.perso"
26
27 # If the MANPATH is not set, set it
28
29 [[ "${MANPATH}" ]] || MANPATH=$(manpath)
30
31 export EDITOR='emacs -nw'
32 export GIT_EDITOR=${EDITOR}
33
34 # If the private bashrc exists, execute it
35
36 [[ -f "${PRIVATE_BASHRC}" ]] && source "${PRIVATE_BASHRC}"
37
38 # !!! THIS HAS TO BE HERE EVEN IN THE NON-INTERACTIVE PART OR YOU WILL
39 # LOSE YOU PREVIOUS HISTORY !!!
40
41 export HISTFILESIZE=20000
42 export HISTSIZE=${HISTFILESIZE}
43
44 export HISTIGNORE="${HISTIGNORE}:&:[ ]*"
45
46 # I want to save the command time, but I do not want to see it in
47 # history
48
49 export HISTTIMEFORMAT=""
50
51 shopt -s histappend
52 shopt -s autocd
53
54 # I realized that most of my settings are meaningful only in
55 # interactive mode. This should maybe be done more properly through
56 # using different .bash_profile and .bash_login
57
58 ######################################################################
59
60 # added by Miniconda3 installer
61 export PATH="${HOME}/conda/bin:$PATH"
62
63 [ ${TERM} == "dumb" ] || [[ ! -t 0 ]] && return
64
65 # Remove the annoying beeps in console
66
67 # setterm -blength 0
68
69 # || setterm --blength 0 # Seriously?
70
71 ######################################################################
72 ## The interactive part
73
74 export VT_RESET=$'\e[0m'
75 export VT_BOLD=$'\e[1m'
76 export VT_UNDERLINE=$'\e[4m'
77 export VT_BLINK=$'\e[5m'
78
79 export VT_SET_TITLE=$'\e]0;'
80 export VT_END_TITLE=$'\007'
81
82 export VT_BLACK_FG=$'\e[30m'
83 export VT_RED_FG=$'\e[31m'
84 export VT_GREEN_FG=$'\e[32m'
85 export VT_YELLOW_FG=$'\e[33m'
86 export VT_BLUE_FG=$'\e[34m'
87 export VT_MAGENTA_FG=$'\e[35m'
88 export VT_CYAN_FG=$'\e[36m'
89 export VT_WHITE_FG=$'\e[37m'
90
91 export VT_BLACK_BG=$'\e[40m'
92 export VT_RED_BG=$'\e[41m'
93 export VT_GREEN_BG=$'\e[42m'
94 export VT_YELLOW_BG=$'\e[43m'
95 export VT_BLUE_BG=$'\e[44m'
96 export VT_MAGENTA_BG=$'\e[45m'
97 export VT_CYAN_BG=$'\e[46m'
98 export VT_WHITE_BG=$'\e[47m'
99
100 # Colorize man pages!
101
102 export LESS_TERMCAP_us=${VT_GREEN_FG}
103 export LESS_TERMCAP_ue=${VT_RESET}
104 export LESS_TERMCAP_md=${VT_BLUE_FG}${VT_BOLD}
105 export LESS_TERMCAP_me=${VT_RESET}
106
107 # I do not like to clutter my home with history files
108
109 export LESSHISTFILE=/dev/null
110
111 # export LESS_TERMCAP_md=$'\e[1;34;40m'
112
113 # This prevents ^S from freezing the shell
114
115 # stty -ixon
116
117 ulimit -c unlimited
118
119 alias ..='cd ..'
120 alias -- -='cd -'
121 alias rm='rm -v -i'
122 alias mv='mv -v -i'
123 alias chmod='chmod -c'
124 alias cp='cp -v -i'
125 alias rd=rmdir
126 alias md='mkdir -pv'
127 alias ps='ps uxaf'
128 alias df='df -hT'
129 # alias df='df -hT --sync'
130 alias grep='grep -i -E --color=auto'
131 alias find='ionice -c3 find'
132 alias pd=pushd
133 alias val='valgrind --leak-check=full --show-reachable=yes --db-attach=yes '
134
135 alias s='screen -d -R default -U && clear'
136 alias p='feh --force-aliasing -d --full-screen --auto-zoom'
137 alias gp=gnuplot
138
139 function ext () {
140     find . -maxdepth 1 -type f | \grep \. | sed -e 's/^.*\.\([^/.]*\)$/\1/'
141 }
142
143 # function catscan () {
144     # convert signal-attachment-2020-06-01-192843.jpeg signal-attachment-2020-06-01-192829.jpeg -quality 25 -sigmoidal-contrast 10,45% -page a4 scan.pdf
145 # }
146
147 function trash-later () {
148     dir=${HOME}/misc/trash-later/remove-after-$(date --date='+3 months' +%Y-%b-%d)
149     mkdir -p "${dir}"
150     pushd "${dir}"
151 }
152
153 function nh () {
154     export HISTFILE=/dev/null
155     unalias cd
156 }
157
158 function select-tz () {
159     # Select a value for TZ
160     TMP=$(mktemp /tmp/select-tz.XXXXXX)
161     selector -o "${TMP}" <(grep -v ^# /usr/share/zoneinfo/zone.tab  | awk '{print $3}' | sort -u)
162     cat "${TMP}"
163     \rm -f "${TMP}"
164 }
165
166 function ding () {
167     if [[ $1 ]] && which winshepherd.sh
168     then
169         play -q ~/local/sounds/deskbell.wav &
170         unset E_APP_WINDOW
171         winshepherd.sh message green "$1"
172     else
173         play -q ~/local/sounds/deskbell.wav
174     fi
175 }
176
177 alias impressive="impressive -s -D 1000 -t Crossfade -T 100"
178
179 if [[ -e "${HOME}/.dircolors" ]]
180 then
181     eval $(dircolors "${HOME}/.dircolors")
182     alias ls='ls -p --group-directories-first --color'
183     alias lt='ls -p --color -gohtr --time-style="+%Y %b %d %H:%M"'
184     alias ll='ls -p --color -goh --time-style="+%Y %b %d %H:%M"'
185     alias lll='ls -p --color -lth'
186     alias l='ls -p --color -I "*~" -I "*.o"'
187     alias less='less -R'
188 else
189     alias ls='ls -p --group-directories-first'
190     alias lt='ls -p -gohtr --time-style="+%Y %b %d %H:%M"'
191     alias ll='ls -p -goh --time-style="+%Y %b %d %H:%M"'
192     alias lll='ls -p -lth'
193     alias l='ls -p -I "*~" -I "*.o"'
194 fi
195
196 ######################################################################
197 # Ignored extensions when completing
198
199 # export FIGNORE="CVS"
200
201 function latexdiff () {
202     wdiff -n \
203         -w $'\033[30;41m' -x $'\033[0m' \
204         -y $'\033[30;42m' -z $'\033[0m' \
205         "$@"
206 }
207
208 # Looks for the most recent .log and pdflatex + bibtex the
209 # corresponding tex file
210
211 function rl () {
212     # RECENT_LOG=$(ls -t $(find -maxdepth 1 -name "*.log" -type f) | head -1)
213
214     RECENT_LOG=$(ls -t *.log | head -1)
215
216     if [[ ${RECENT_LOG} ]]
217     then
218         FILEBASE="${RECENT_LOG/.log/}"
219
220         if [[ -f "${FILEBASE}.tex" ]]
221         then
222
223             pdflatex --shell-escape "${FILEBASE}"
224             bibtex "${FILEBASE}"
225             pdflatex --shell-escape "${FILEBASE}"
226             pdflatex --shell-escape "${FILEBASE}"
227
228             if [[ "$1" ]]
229             then
230                 if [[ "$1" == "-v" ]] || [[ "$1" == "--view" ]]
231                 then
232                     # xpdf "${FILEBASE}.pdf"
233                     zathura "${FILEBASE}.pdf"
234                 elif [[ "$1" == "-p" ]] || [[ "$1" == "--print" ]]
235                 then
236                     lpr "${FILEBASE}.pdf"
237                 else
238                     echo "Usage: rl [-v|--view] [-p|--print]" >&2
239                     echo "Unknown option $1" >&2
240                     return 1
241                 fi
242             fi
243
244         else
245
246             echo "Can not find a tex file corresponding to the most recent log (${RECENT_LOG/.log/})." >&2
247             return 1
248
249         fi
250
251     else
252         echo "Can not find a recent log." >&2
253         return 1
254     fi
255 }
256
257
258 ######################################################################
259 # Functions
260
261 # http://www.reddit.com/r/linux/comments/2cgu5k/a_handy_little_script_for_interacting_with_your/
262 function clip () {
263     if [[ -t 0 ]] && [[ -z "$1" ]]
264     then
265         # output contents of clipboard
266         xclip -out -selection clipboard || exit 1
267     elif [[ "$1" ]]
268     then
269         # copy file contents to clipboard
270         xclip -in -selection clipboard < "$1" || exit 1
271     else
272         # copy stdin to clipboard
273         xclip -in -selection clipboard <&0 || exit 1
274     fi
275 }
276
277 # Find a file whose name contains a substring
278
279 function fn () {
280     name=$1
281     shift
282     find "$@" -name "*${name}*";
283 }
284
285 function bak () {
286     while [[ "$1" ]]
287     do
288         cp "$1" "$1".bak
289         shift
290     done
291 }
292
293 function scan () {
294     n=1
295
296     while [[ -f "${HOME}/scan-${n}.jpg" ]]
297     do
298         n=$((n+1))
299     done
300
301     while [[ "$1" ]]
302     do
303         if [[ "$1" == "color" ]]
304         then
305             OPTS+=" --mode Color"
306         elif [[ "$1" == "gray" ]]
307         then
308             OPTS+=" --mode Gray"
309         elif [[ "$1" == "a4crop" ]]
310         then
311             OPTS+=" -l 5 -t 0 -x 200 -y 300"
312         elif [[ "$1" == "help" ]] || [[ "$1" == "-h" ]] || [[ "$1" == "--help" ]]
313         then
314             echo "$0 [color|gray] [a4crop]" && return 0
315         else
316             echo "Unknown argument \`$1'"
317         fi
318         shift
319     done
320
321     echo "**"
322     echo "** Scanning to ${HOME}/scan-${n}.jpg"
323     echo "**"
324
325     SCANNER=$(scanimage -L | grep "Canon LiDE 60" | sed -e "s/^.*\`\(.*\)'.*$/\1/")
326
327     scanimage -d ${SCANNER} \
328               --format=pnm \
329               --mode=color \
330               --depth=8 \
331               -v \
332               --resolution=300 \
333               ${OPTS} | \
334         convert -rotate 180 - "${HOME}/scan-${n}.jpg"
335
336     echo "** Done".
337 }
338
339 # A password generator
340
341 function genpw () {
342     if [[ "$1" == "-e" ]]
343     then
344         PW=$(tr -dc A-Z0-9 < /dev/urandom | head -c6)
345         shift
346     else
347         PW=$(tr -dc A-Za-z0-9 < /dev/urandom | head -c16)
348     fi
349     if [[ ! "$1" == "-s" ]]
350     then
351        echo "$(date) ${PW}" >> ${HOME}/private/genpw.log
352     fi
353     echo ${PW}
354     # tr -dc [:graph:] < /dev/urandom | head -c16
355     echo
356 }
357
358 function ua () {
359
360     [[ "$1" ]] || ( echo "Universal unarchive: ua <file> [<file> ...]" >&2 && return 1)
361
362     while [[ "$1" ]]
363     do
364
365         case "$1" in
366             *.tgz|*.tar.gz|*.tbz|*.tar.bz2)
367                 tar xvf "$1"
368                 ;;
369
370             *.rar)
371                 unrar -kb x "$1"
372                 ;;
373
374             *.zip)
375                 unzip "$1"
376                 ;;
377
378             *)
379                 echo "Unknown file extension $1"
380                 ;;
381         esac
382
383         shift
384
385     done
386 }
387
388 # Create a dir and cd there
389
390 function mcd () {
391     mkdir -vp "$1"
392     cd "$1"
393 }
394
395 # Capture the screen in a dated png
396
397 function cap () {
398     if [[ $2 ]]
399     then
400         name=$2
401     else
402         name="capture-$(date +%Y%m%d-%H%M%S).png"
403     fi
404
405     if [[ "$1" ]]
406     then
407         echo "Waiting $1 s and saving to ${name}."
408         sleep "$1"
409     else
410         echo "Saving to ${name}."
411     fi
412
413     echo "Please click on the window to capture."
414     xwd  | convert xwd:- ${name}
415     \ls -l ${name}
416 }
417
418 # Create and CD in a /tmp/tmp.XXXXXX directory. With the '-'
419 # arguments, do not create one and CD in the most recent instead
420
421 function cdt () {
422     if [[ "$1" ]]
423     then
424         if [[ "$1" == "-" ]]
425         then
426             cd $(\ls -td /tmp/tmp.?????? | head -1)
427         else
428             echo "USAGE: cdt [-]" >&2
429             return 1
430         fi
431     else
432         dir=$(mktemp -d /tmp/tmp.XXXXXX)
433         link=/tmp/tmp
434         if [[ -h ${link} ]]
435         then
436             \rm ${link}
437         fi
438         if [[ ! -a ${link} ]]
439         then
440             ln -s ${dir} ${link}
441         fi
442         cd ${dir}
443     fi
444 }
445
446 alias t='cd /tmp'
447 alias a='cd /tmp/at'
448
449 function trash () {
450
451     [[ "${TRASH_LATER_ROOT}" ]] || TRASH_LATER_ROOT="${HOME}/.trash"
452
453     if [[ "$1" == "--" ]]
454     then
455         shift
456     elif [[ "$1" == "-l" ]]
457     then
458         shift
459         echo "Trashin in 3 months"
460         TRASH_DIR="${TRASH_LATER_ROOT}/remove-after-$(date --date='+3 months' +%Y-%b-%d)"
461         mkdir -p "${TRASH_DIR}"
462     else
463         TRASH_DIR=$(date +/tmp/trash-${USER}-%Y-%b-%d-%Hh)
464         LINK=/tmp/trash
465         mkdir -p ${TRASH_DIR}
466         [[ -h ${LINK} ]] && \rm ${LINK}
467         [[ ! -f ${LINK} ]] && ln -s ${TRASH_DIR} ${LINK}
468     fi
469
470     mv "$@" "${TRASH_DIR}"
471     echo "Trashed $@"
472 }
473
474 function trashlatex () {
475     TRASH=$(date +/tmp/trash-latex-${USER}-%Y-%b-%d-%Hh)
476     LINK=/tmp/trash
477
478     mkdir -p ${TRASH}
479
480     [[ -h ${LINK} ]] && \rm ${LINK}
481
482     [[ ! -f ${LINK} ]] && ln -s ${TRASH} ${LINK}
483
484     mv -v \
485        *.log *.pdf *.aux *.nav *.pdfpc *.snm *.toc *.out \
486        *.bbl *.blg \
487        *.*.table *.*.gnuplot \
488        ${TRASH}
489 }
490
491 ######################################################################
492 ## A version of pho which stores the image numbers in environment
493 ## variables
494
495 function pho () {
496     TEMP=$(mktemp /tmp/pho.XXXXXXX)
497     $(which pho) "$@" | tee ${TEMP}
498     PHO_NOTE_1=$(grep ^"Note 1: " ${TEMP} | sed -e "s/^[^:]*: //")
499     PHO_NOTE_2=$(grep ^"Note 2: " ${TEMP} | sed -e "s/^[^:]*: //")
500     PHO_NOTE_3=$(grep ^"Note 3: " ${TEMP} | sed -e "s/^[^:]*: //")
501     PHO_NOTE_R90=$(grep ^"Rotate 90 \(CW\): " ${TEMP} | sed -e "s/^[^:]*: //")
502     PHO_NOTE_R180=$(grep ^"Rotate 180: " ${TEMP} | sed -e "s/^[^:]*: //")
503     PHO_NOTE_R270=$(grep ^"Rotate -90 \(CCW\): " ${TEMP} | sed -e "s/^[^:]*: //")
504     [[ "${PHO_NOTE_1}" ]] || unset PHO_NOTE_1
505     [[ "${PHO_NOTE_2}" ]] || unset PHO_NOTE_2
506     [[ "${PHO_NOTE_3}" ]] || unset PHO_NOTE_3
507     [[ "${PHO_NOTE_R90}" ]] || unset PHO_NOTE_R90
508     [[ "${PHO_NOTE_R180}" ]] || unset PHO_NOTE_R180
509     [[ "${PHO_NOTE_R270}" ]] || unset PHO_NOTE_R270
510     \rm ${TEMP}
511 }
512
513 ######################################################################
514 ## A version of date that shows the time at home if TZ is set
515
516 function dt () {
517     echo "Local - $(date)"
518     unset TZ
519     echo "Home  - $(date)"
520 }
521
522 ######################################################################
523 ## ifup / ifdown with sudo
524
525 [ ${NETUP_HISTORY} ] || NETUP_HISTORY="${HOME}/.netup_history"
526
527 function netup () {
528     local upped_wifi
529
530     [[ "${WIFI_INTERFACE}" ]] || WIFI_INTERFACE=wlan0
531
532     if [[ "$1" == "--scan" ]]
533     then
534         if ifconfig -s | grep -v -q ${WIFI_INTERFACE}
535         then
536             sudo ifconfig ${WIFI_INTERFACE} up
537             upped_wifi=1
538         fi
539
540         sudo iwlist ${WIFI_INTERFACE} scan | \grep -E 'ESS|Quali|Encry' | sed -e 's/^[ \t]*//'
541
542         if [[ ${upped_wifi} ]]
543         then
544             sudo ifconfig ${WIFI_INTERFACE} down
545             unset upped_wifi
546         fi
547
548         return 0
549     fi
550
551     if \ifconfig -s | grep -q -v ^'(Iface|lo|docker[0-9]) '
552     then
553         echo "There is/are already interface(s) up." >&2
554         return 1
555     fi
556
557     if \ps h -C dhclient | grep -q .
558     then
559         echo "There is already a dhcp client running." >&2
560         return 1
561     fi
562
563     if \ps h -C wpa_supplicant | grep -q .
564     then
565         echo "There is already a wpa_supplicant running." >&2
566         return 1
567     fi
568
569     if [[ ! "$@" ]] && [[ -s ${NETUP_HISTORY} ]]
570     then
571         echo "netup <interface>" >&2
572         return 1
573         # # If we have no argument and there is a .netup_history, use it
574         # ARGS=$(cat ${NETUP_HISTORY})
575     else
576         # Otherwise uses the given arguments, and store them
577         ARGS="$@"
578         echo ${ARGS} > ${NETUP_HISTORY}
579     fi
580
581     if [[ "${PRIVATE_INTERFACE_DEFINITION}" ]]
582     then
583         ARGS="-i ${PRIVATE_INTERFACE_DEFINITION} ${ARGS}"
584     fi
585
586     echo "Executing ${VT_GREEN_FG}[sudo ifup ${ARGS}]${VT_RESET}"
587     sudo ifup ${ARGS}
588
589     # Ugly hack to remove the dsl modem dns server when we add
590     # explicitely a dns in the /etc/network/interfaces
591
592     REMOVE_LOCAL_DNS=/usr/local/bin/remove-local-dns.sh
593     # REMOVE_LOCAL_DNS=${HOME}/sources/scripts/remove-local-dns.sh
594
595     if [[ -x ${REMOVE_LOCAL_DNS} ]]
596     then
597         echo "Executing ${VT_GREEN_FG}[sudo ${REMOVE_LOCAL_DNS} 192.168]${VT_RESET}"
598         sudo ${REMOVE_LOCAL_DNS} 192.168
599     fi
600 }
601
602 function netdown () {
603     if [[ ! "$@" ]] && [[ -s ${NETUP_HISTORY} ]]
604     then
605         # If there are no arguments and there is a .netup_history, get the
606         # interface from it
607         ARGS=$(tail -1 ${NETUP_HISTORY} | sed -e "s/=.*$//")
608     else
609         # Otherwise, use the standard ifdown
610         ARGS="$@"
611     fi
612
613     [[ "${PRIVATE_INTERFACE_DEFINITION}" ]] && ARGS="-i ${PRIVATE_INTERFACE_DEFINITION} ${ARGS}"
614
615     echo "Executing sudo ${VT_GREEN_FG}[ifdown ${ARGS}]${VT_RESET}"
616     sudo ifdown ${ARGS}
617
618     # if [[ $(\ps -C dhclient | tail -n +2) ]]
619     # then
620     # echo "There is still a dhcp client running." >&2
621     # return 1
622     # fi
623
624     # if [[ $(\ps -C wpa_supplicant | tail -n +2) ]]
625     # then
626     # echo "There is still a wpa_supplicant running." >&2
627     # return 1
628     # fi
629 }
630
631 function checkgw () {
632     GW=$(route -n | grep ^0.0.0.0 | awk '{print $2}')
633     if [[ "${GW}" ]]
634     then
635         ping ${GW}
636     else
637         echo "Can not find a getaway." >&2
638         return 1
639     fi
640 }
641
642 ######################################################################
643 # Show the most recent files, no scroll
644
645 function lr () {
646     TERM_SIZE=($(stty size))
647     INVIS="${VT_GREEN_FG}${VT_RESET}"
648     \ls -goth --time-style="+${VT_GREEN_FG}%Y %b %d %H:%M${VT_RESET}" "$@" | \
649         head -$((TERM_SIZE[0]-2)) | cut -b1-$((TERM_SIZE[1]+${#INVIS}))
650 }
651
652 ######################################################################
653
654 reduce-pdf () {
655
656     # /screen selects low-resolution output
657     # /ebook selects medium-resolution output
658     # /printer selects "Print Optimized" setting.
659     # /prepress selects "Prepress Optimized" setting.
660
661     quality="printer"
662
663     while [[ "$1" ]]
664     do
665         if [[ "$1" == "--help" ]] || [[ "$1" == "-h" ]]
666         then
667             echo "$0 [<file.pdf>|--quality <screen|ebook|printer|prepress>] ..."
668             return 0
669
670         elif [[ "$1" == "--quality" ]]
671         then
672             shift
673             quality="$1"
674
675         elif [[ -f "$1" ]]
676         then
677             result="$(basename "$1" .pdf)-${quality}.pdf"
678             echo -n "Generating ${result} with quality ${quality} ... "
679             gs -sDEVICE=pdfwrite \
680                -dCompatibilityLevel=1.4 \
681                -dPDFSETTINGS=/${quality} \
682                -dColorConversionStrategy=/LeaveColorUnchanged \
683                -dNOPAUSE -dQUIET -dBATCH \
684                -sOutputFile="${result}" "$1"
685             echo "done."
686             ls -hl "$1" "${result}"
687
688         else
689             echo "Cannot fine $1"
690
691         fi
692         shift
693     done
694 }
695
696 ######################################################################
697 # You can change the xterm background color on the fly!
698
699 function setxtermbg () {
700     echo -n $'\e]11;'$1$'\007'
701 }
702
703 ######################################################################
704 # Shuffle the lines from the stdin
705
706 function shuffle () {
707     SEED=$1
708     [[ $SEED ]] || SEED=0
709     awk 'BEGIN{srand('${SEED}')} { print rand()" "$0 }' | sort -g | sed -e "s/^[0-9\.e\-]* //"
710 }
711
712 ######################################################################
713 # Stores the last entered command into a file
714
715 KEPT_COMMANDS=${HOME}/.kept_bash_commands
716
717 function keep () {
718     if [[ ${KEPT_COMMANDS} ]]
719     then
720         TOKEEP=$(mktemp /tmp/keep.XXXXXX)
721         if [[ "$@" ]]
722         then
723             echo "$@" > ${TOKEEP}
724         else
725             selector -b -i -d -l ${HISTSIZE} -o "${TOKEEP}" <(history)
726         fi
727
728         if [[ -s "${TOKEEP}" ]]
729         then
730             echo $(date)": "$(cat ${TOKEEP}) >> ${KEPT_COMMANDS}
731             cat "${TOKEEP}"
732         else
733             echo "No command stored!"
734         fi
735
736         \rm ${TOKEEP}
737     else
738         echo "You have to set \$KEPT_COMMANDS"
739     fi
740 }
741
742 ######################################################################
743 # I sometime burn CDs and DVDs
744
745 function burn () {
746     [[ "${DEV_BURNER}" ]] || DEV_BURNER="/dev/sr0"
747     if [[ ! "$1" ]]
748     then
749         echo "burn <iso name | dirname>" >&2
750     elif [[ -f "$1" ]]
751     then
752         if [[ $(file "$1" | \grep -E 'ISO 9660|UDF filesystem data') ]]
753         then
754             wodim -eject -v dev=${DEV_BURNER} "$1"
755         else
756             echo "Do not know what to do with $1" >&2
757         fi
758     elif [[ -d "$1" ]]
759     then
760         [[ "${TMP_ROOT}" ]] || TMP_ROOT=/tmp/
761         echo "Using ${TMP_ROOT} as temporary directory."
762         TMP=$(mktemp ${TMP_ROOT}/cdimage.XXXXXX) && \
763             genisoimage -input-charset iso8859-1 -r -o ${TMP} "$1" && \
764             wodim -eject -v dev=${DEV_BURNER} ${TMP}
765         rm -f ${TMP}
766     else
767         echo "Can not find $1" >&2
768     fi
769 }
770
771 ######################################################################
772 # And watch DVDs too!
773
774 function dvd () {
775
776     echo
777     echo " ! @   Seek to the beginning of the previous/next chapter"
778     echo " j     Cycle through the available subtitles"
779     echo " o     Show/hide the timing"
780     echo " x z   Subtitle delay"
781     echo " / *   Volume"
782     echo
783
784     if [[ "$1" ]]
785     then
786         dvd_device="$1"
787         shift
788     else
789         dvd_device="/dev/dvd"
790     fi
791
792     title="1"
793
794     if [[ "$1" ]]
795     then
796         title=$1
797         shift
798     fi
799
800     # -vc ffmpeg12 -vf yadif
801
802     mplayer > /dev/null \
803         -stop-xscreensaver \
804         -quiet \
805         -alang en -slang en \
806         -softvol -softvol-max 1000 \
807         -dvd-device ${dvd_device} ${MPLAYER_OPTIONS} dvd://${title}
808 }
809
810 function ripdvd () {
811     if [[ -e "/dev/dvd" ]]
812     then
813         DVD_DEVICE="/dev/dvd"
814     elif [[ -e "/dev/dvd3" ]]
815     then
816         DVD_DEVICE="/dev/dvd3"
817     else
818         echo "Can not find the dvd device." >&2
819         return 1
820     fi
821
822     echo "Attempting to rip from ${DVD_DEVICE}."
823
824     mkdir -p ${HOME}/dvds
825
826     cd ${HOME}/dvds
827     time dvdbackup -i ${DVD_DEVICE} -v -M "$@" && eject
828 }
829
830 alias ripcd=abcde
831
832 ######################################################################
833 # Create small images from images
834
835 function mksmall () {
836
837     if [[ "$1" == "--params" ]]
838     then
839         shift
840         PARAMS="$1"
841         shift
842     fi
843
844     [[ "${PARAMS}" ]] || PARAMS="-geometry 1280x1024"
845
846     # Auto-orient does not seem to work at all, hence the ugly hack
847     # with exif below
848
849     # PARAMS="-auto-orient -geometry 800x600"
850
851     echo "Using ${PARAMS}"
852
853     DEST_DIR=$1
854
855     [[ ${DEST_DIR} ]] || DEST_DIR=./small
856
857     mkdir -p ${DEST_DIR}
858
859     if [[ ! -d ${DEST_DIR} ]]
860     then
861         echo "Can not create ${DEST_DIR}" >&2
862         return
863     fi
864
865     NB_TOTAL=$(find -maxdepth 1 -type f | wc -l)
866     NB=0
867
868     for i in $(find -maxdepth 1 -type f)
869     do
870         if [[ $(file $i | grep image) ]]
871         then
872             if [[ -e ${DEST_DIR}/$i ]]
873             then
874                 echo "The file ${DEST_DIR}/$i already exists."
875             else
876                 if [[ $(file ${i/%.*/}.* | grep -E movie) ]] 
877                 then
878                     CAPTION_PARAMS="-font FreeSans-Bold -pointsize 32 -fill green -annotate +10+32 Video"
879                 else
880                     CAPTION_PARAMS=""
881                 fi
882
883                 convert ${rotation_cmd} $i ${PARAMS} ${CAPTION_PARAMS} ${DEST_DIR}/$i
884             fi
885
886             \ls -lt ${DEST_DIR}/$i
887         fi
888
889         NB=$((NB+1))
890
891         echo "$((NB*100/NB_TOTAL))% (${NB}/${NB_TOTAL})"
892     done
893 }
894
895 ######################################################################
896 # Move a file to the ~/sources/config directory and replace it where
897 # it was by a symbolic link
898
899 function mvtoconfig () {
900     CONFIGDIR=${HOME}/sources/config
901     if [[ -d ${CONFIGDIR} ]]
902     then
903         NEWNAME=${CONFIGDIR}/$(basename "$1" | sed -e "s/^\.//")
904         mv "$1" $NEWNAME
905         ln -s $NEWNAME $1
906     else
907         echo "Can not find ${CONFIGDIR}"
908     fi
909 }
910
911
912 ######################################################################
913 # git prompt
914
915 if which > /dev/null git
916 then
917
918     parse_git_branch() {
919         git 2>/dev/null rev-parse --abbrev-ref HEAD | sed -e 's/^\(.*\)$/(\1) /'
920     }
921
922     export PS_GIT="${VT_GREEN_FG}\$(parse_git_branch)"
923 fi
924
925 ######################################################################
926 # The complex prompt policy
927
928 export PS1
929
930 if [[ "${CONSOLE}" == "yes" ]]
931 then
932
933     PS1=""
934
935 else
936
937     # If the login is a standard one (as specified in
938     # IGNORED_PROMPT_LOGIN, which is set in the private bash file), do not
939     # show it. I have IGNORED_PROMPT_LOGIN="^fleuret$".
940
941     if [[ ! ${IGNORED_PROMPT_LOGIN} ]] || [[ ! ${USER} =~ ${IGNORED_PROMPT_LOGIN} ]]
942     then
943         IDENT="${USER}"
944     fi
945
946     # If the display is not the main one, make the assumption that the
947     # shell is not running on the localhost, and show the hostname
948
949     [[ "${DISPLAY}" != ":0.0" ]] && IDENT="${IDENT}@\h"
950
951     # If there is the login or the hostname, add a ":" to the prompt
952
953     [[ "${IDENT}" ]] && IDENT="${IDENT}:"
954
955     #    IDENT="${PS_GIT}${VT_BLACK_FG}${IDENT}"
956
957     if [[ ${USER} == "root" ]]
958     then
959         # If we are root, show that in red
960         PS1="\[${VT_RED_BG}${VT_WHITE_FG}\]${IDENT}\w\[${VT_RESET}\] "
961     else
962         if [[ $(\grep QEMU /proc/cpuinfo) ]]
963         then
964             # If we are in a qemu virtual machine, in yellow
965             PS1="\[${VT_YELLOW_BG}${VT_BLACK_FG}\]${IDENT}\w\[${VT_RESET}\] "
966         else
967             # Otherwise in white
968             PS1="\[${VT_WHITE_BG}${VT_BLACK_FG}\]${IDENT}\w\[${VT_RESET}\] "
969         fi
970     fi
971
972 fi
973
974 #PS1="${PSCUE}${PS1}"
975
976 ######################################################################
977 # This implements a local history. If we are in a directory containing
978 # a writable local history file, we add the last line of the global
979 # history to it.
980
981 LOCAL_HISTORY_FILE=".local_bash_history"
982
983 function keep_local_history () {
984     if [[ -w "${LOCAL_HISTORY_FILE}" ]]
985     then
986         history 1 | sed -e 's/^ *[0-9]* *//' >> ${LOCAL_HISTORY_FILE}
987         TMP=$(mktemp /tmp/lh.XXXXXX)
988         \chmod 600 ${TMP}
989         uniq < ${LOCAL_HISTORY_FILE} | tail -${HISTSIZE} > ${TMP}
990         # mv would replace a symbolic link, while cp keeps it
991         \cp ${TMP} ${LOCAL_HISTORY_FILE}
992         \rm ${TMP}
993         LOCAL_HISTORY_HINT="* "
994     else
995         LOCAL_HISTORY_HINT=""
996     fi
997 }
998
999 PS1="\[${VT_WHITE_BG}\]\${LOCAL_HISTORY_HINT}\[${VT_RESET}\]${PS1}"
1000
1001 ######################################################################
1002 # Show the history path if it is unusual
1003
1004 function histfile_cue () {
1005     if [[ ! "${HISTFILE}" == "${HOME}/.bash_history" ]]
1006     then
1007         HISTORY_CUE="[${HISTFILE}]"
1008     else
1009         HISTORY_CUE=""
1010     fi
1011 }
1012
1013 PS1="\[${VT_YELLOW_BG}\]\${HISTORY_CUE}\[${VT_RESET}\]${PS1}"
1014
1015 ######################################################################
1016 # The dus command is available on my web site
1017 #
1018 # git clone http://fleuret.org/git/dus/
1019
1020 alias dus='dus -f -i'
1021
1022 ######################################################################
1023 # The finddup command is available on my web site
1024 #
1025 # git clone http://fleuret.org/git/finddup/
1026
1027 alias finddup='finddup -p'
1028
1029 ######################################################################
1030 # The selector command is available on my web site
1031 #
1032 # git clone http://fleuret.org/git/selector/
1033
1034 export SELECTOR_CD_HISTORY_SIZE=10000
1035
1036 source bash-selector.sh --hist --cd
1037
1038 ######################################################################
1039 # And we avoid to put in the history the use of the selector, which we
1040 # do too often
1041
1042 HISTIGNORE="${HISTIGNORE}:selector-history"
1043
1044 ######################################################################
1045
1046 function selector-printer () {
1047     TMP=$(mktemp /tmp/selector-printer.XXXXXX)
1048     selector -o ${TMP} <(lpstat -a | awk '{print $1}')
1049     export PRINTER=$(cat ${TMP})
1050     echo "PRINTER=${PRINTER}"
1051     rm -f ${TMP}
1052     lpq
1053 }
1054
1055 ######################################################################
1056 # A ls with memory to notice what files have been added/removed from
1057 # the current directory
1058
1059 function lsn () {
1060     [[ "${LSN_STATE_FILE}" ]] || LSN_STATE_FILE=".lsn-state"
1061
1062     if  [[ $1 == "--mem" ]] || [[ "$1" == "-m" ]]
1063     then
1064
1065         \ls -pa | sort > "${LSN_STATE_FILE}"
1066         echo "State updated." >&2
1067
1068     elif [[ $1 == "+" ]]
1069     then
1070
1071         shift
1072
1073         TMP=$(mktemp /tmp/lsn.XXXXXX)
1074         \ls -d "$@" > ${TMP}
1075         cat "${LSN_STATE_FILE}" >> ${TMP}
1076         sort ${TMP} | uniq -u > "${LSN_STATE_FILE}"
1077         \rm ${TMP}
1078
1079     elif [[ "$1" ]]
1080     then
1081         cat >&2 <<EOF
1082 lsn [--help|-h] [--mem|-m] [+ <file> ...]
1083
1084 Where
1085
1086   --help|-h
1087      prints this help
1088
1089   --mem|-m
1090      stores the current state of the directory
1091
1092   + <file> [<file> ...]
1093      switches the presence/absence of the indicated files in the
1094      stored state
1095
1096 EOF
1097         if [[ ! "$1" == "-h" ]] && [[ ! "$1" == "--help" ]]
1098         then
1099             echo >&2 "Unknown option \`\`$1''."
1100             return 1
1101         fi
1102
1103     else
1104
1105         if [[ -f "${LSN_STATE_FILE}" ]]
1106         then
1107             TMP=$(mktemp /tmp/lsn.XXXXXX)
1108             \ls -pa | sort > ${TMP}
1109             if diff > /dev/null ${TMP} "${LSN_STATE_FILE}"
1110             then
1111                 echo "${VT_GREEN_FG}${VT_BOLD}No change (since $(date +"%b %d, %Y" -r "${LSN_STATE_FILE}"))${VT_RESET}"
1112             else
1113                 \comm -1 -3 "${LSN_STATE_FILE}" ${TMP}
1114                 \comm -2 -3 "${LSN_STATE_FILE}" ${TMP} | while read line
1115                                                          do
1116                     echo "${VT_RED_FG}${VT_BOLD}${line}${VT_RESET} (missing)"
1117                 done
1118             fi
1119             \rm ${TMP}
1120         else
1121             echo "${VT_RED_FG}${VT_BOLD}No lsn state here.${VT_RESET}" >&2
1122             return 1
1123         fi
1124
1125     fi
1126 }
1127
1128 ######################################################################
1129
1130 function prompt_command () {
1131     [[ "${CORE_CHECK_PWD}" == ${PWD} ]] || find . -maxdepth 1 -name "core__*" | awk '{print "'${VT_RED_FG}'"$0"'${VT_RESET}'"}'
1132     CORE_CHECK_PWD=${PWD}
1133
1134     # if [[ $(umask) != 0022 ]]
1135     # then
1136         # echo "Umask changed to $(umask)"
1137     # fi
1138     # save the history after every command to avoid loosing some when
1139     # multiple shells are open
1140     history -a
1141     # load the saved history
1142     # history -n
1143     # and the local histories system defined above
1144     keep_local_history
1145     # and the history cue
1146     histfile_cue
1147 }
1148
1149 PROMPT_COMMAND="prompt_command"
1150
1151 ######################################################################
1152
1153 # Displaying the timezone if it is set
1154
1155 [[ ${TZ} ]] && echo "${VT_BLUE_FG}Time zone is ${TZ}.${VT_RESET}"
1156
1157 ######################################################################
1158
1159 source /usr/share/bash-completion/bash_completion