mirrors
/
ambevar-dotfiles
mirror of https://gitlab.com/ambrevar/dotfiles/
1
0
Fork 0
Code Issues Releases Wiki Activity
ambevar-dotfiles/.shell.d/funs_rc

471 lines
11 KiB
Bash
Raw Blame History

## -*- mode:sh -*- #
################################################################################
## Shell -- Functions.
## Date 2013-03-03
################################################################################
## Functions that can be useful outside a shell (like in Emacs or Ranger) should
## be written in stand-alone script instead.
## Colored man pager.
man()
{
env \
LESS_TERMCAP_mb=$(printf "\e[1;31m") \
LESS_TERMCAP_md=$(printf "\e[1;31m") \
LESS_TERMCAP_me=$(printf "\e[0m") \
LESS_TERMCAP_se=$(printf "\e[0m") \
LESS_TERMCAP_so=$(printf "\e[1;44;33m") \
LESS_TERMCAP_ue=$(printf "\e[0m") \
LESS_TERMCAP_us=$(printf "\e[1;32m") \
man "$@"
}
## Make directories and change into the first one.
mkcd () {
mkdir -p "$@"
cd "$1"
}
## Quick search.
search()
{
find . -iname "*$1*"
}
## Cut last n lines in file, 10 by default.
cuttail()
{
local nlines=${2:-10}
sed -n -e ":begin ; 1,${nlines}!{P;N;D} ; N ; b begin" $1
}
## Cut first n lines in file, 10 by default.
cuthead()
{
local nlines=${2:-10}
sed -n -e "1,${nlines}!p" $1
}
## Move filenames to lowercase.
## Use ranger + bulkrename + vim/emacs (+ TwindleCase) for more flexibility.
renamelower()
{
local file
local filename
local dirname
for file ; do
filename=${file##*/}
case "$filename" in
*/*) dirname="${file%/*}" ;;
*) dirname="." ;;
esac
local nf=$(echo $filename | tr A-Z a-z)
local newname="${dirname}/${nf}"
if [ "$nf" != "$filename" ]; then
mv "$file" "$newname"
echo "lowercase: $file --> $newname"
else
echo "lowercase: $file not changed."
fi
done
}
## Swap 2 filenames around.
renameswap()
{
local TEMPFILE="$(mktemp)"
mv "$1" "$TEMPFILE"
mv "$2" "$1"
mv "$TEMPFILE" "$2"
}
## Network operations
if [ -n "$(command -v nmap)" ]; then
network-map()
{
echo "$1"
for SCANIP in $( nmap -sL "$1" | grep -i "\([[:digit:]]\+\.\)\{3,\}[[:digit:]]\+" | awk '{print $5}' ); do
sudo nmap -oX - -n -sT -T Normal -O -sR -I -F -P0 "$SCANIP"
echo
done
}
fi
netspeed ()
{
local INTERFACE="eth0"
if [ -n "$1" ]; then
INTERFACE="$1"
fi
if [ ! -d "/sys/class/net/${INTERFACE}" ]; then
echo "Error: no such interface (${INTERFACE})"
return
fi
local RX_BEFORE=$(cat /sys/class/net/${INTERFACE}/statistics/rx_bytes)
local TX_BEFORE=$(cat /sys/class/net/${INTERFACE}/statistics/tx_bytes)
sleep 1
local RX_AFTER=$(cat /sys/class/net/${INTERFACE}/statistics/rx_bytes)
local TX_AFTER=$(cat /sys/class/net/${INTERFACE}/statistics/tx_bytes)
local RX_RESULT=$(((${RX_AFTER:-0}-${RX_BEFORE:-0})/1024))
local TX_RESULT=$(((${TX_AFTER:-0}-${TX_BEFORE:-0})/1024))
echo "RX $RX_RESULT KiB/s"
echo "TX $TX_RESULT KiB/s"
}
## CPU usage
##
## A typical CPU array is (on Linux Kernel 3.0)
## cpu 158150 0 52354 18562746 1472 0 10198 0 0 0
##
## The meanings of the columns are as follows, from left to right:
##
## user: normal processes executing in user mode
## nice: niced processes executing in user mode
## system: processes executing in kernel mode
## idle: twiddling thumbs
## iowait: waiting for I/O to complete
## irq: servicing interrupts
## softirq: servicing softirqs
## ... (see 'man 5 proc' for further details)
##
## Only the first 4 values are interesting here.
cpuusage()
{
local cpuarray
local f1
local f2
local f3
local f4
cpuarray="$(grep 'cpu ' /proc/stat)"
f1=$(echo $cpuarray | cut -f3 -d' ')
f2=$(echo $cpuarray | cut -f4 -d' ')
f3=$(echo $cpuarray | cut -f5 -d' ')
f4=$(echo $cpuarray | cut -f6 -d' ')
local totalA=$(($f1+$f2+$f3+$f4))
local idleA=$f4
sleep 0.4
cpuarray="$(grep 'cpu ' /proc/stat)"
f1=$(echo $cpuarray | cut -f3 -d' ')
f2=$(echo $cpuarray | cut -f4 -d' ')
f3=$(echo $cpuarray | cut -f5 -d' ')
f4=$(echo $cpuarray | cut -f6 -d' ')
local totalB=$(($f1+$f2+$f3+$f4))
local idleB=$f4
local totaldiff=$((${totalB:-0}-${totalA:-0}))
if [ $totaldiff -eq 0 ]; then
echo 0
else
echo "$((100 - 100 * ($idleB-$idleA) / $totaldiff ))"
fi
}
## Webcam
webcam ()
{
## With mplayer.
mplayer -fps 30 -tv driver=v4l2:width=640:height=480:device=/dev/video0 tv:// -flip
}
## Vim-only: search the vim reference manual for a keyword.
## Usage: :h <keyword>
if [ -n "$(command -v vim)" ]; then
:h()
{
vim --cmd ":silent help $@" --cmd "only";
}
fi
## Term properties
termcolors256()
{
x=$(tput op)
y=$(printf %76s)
for i in {0..256}; do
o=00$i
echo -e "${o:${#o}-3:3} $(tput setaf $i;tput setab $i)${y// /=}$x"
done
}
## Will not work for Bourne Shell.
termcolors()
{
# The test text. Must be 3 letters.
T='Doh'
echo -e "\n 40m 41m 42m 43m\
44m 45m 46m 47m";
for FGs in ' m' ' 1m' ' 30m' '1;30m' ' 31m' '1;31m' ' 32m' \
'1;32m' ' 33m' '1;33m' ' 34m' '1;34m' ' 35m' '1;35m' \
' 36m' '1;36m' ' 37m' '1;37m';
do FG=${FGs// /}
echo -en " $FGs \033[$FG $T "
for BG in 40m 41m 42m 43m 44m 45m 46m 47m;
do echo -en "$EINS \033[$FG\033[$BG $T \033[0m";
done
echo;
done
echo
}
termprop()
{
infocmp -1 | sed -nu 's/^[ \000\t]*//;s/[ \000\t]*$//;/[^ \t\000]\{1,\}/!d;/acsc/d;s/=.*,//p'| column -c80
}
termsupport()
{
for T in `find "/usr/share/terminfo" -type f -printf '%f\n'`;do
echo "$T `tput -T $T colors`"
done | sort -nk2
}
if [ -n "$(command -v highlight)" ] ; then
hlt-viewer ()
{
_printhelp()
{
cat<<EOF
Usage: $1
Highlight themes viewer for 256-colors terminals.
highlight is a tool for listing printing. This script displays a preview for
every highlight's theme. Press ENTER to display next preview. Press anything
else then ENTER to quit.
EOF
}
if [ $# -gt 0 ]; then
_printhelp "$0"
return
fi
local SAMPLE="$(cat <<EOF
void function(char* pointer, int &ref)
{
int integer=3;
char* string="Hello!";
// Line comment
for ( i=0; i<10; i++)
{
printf("Sum: %d\n", i*( integer+14 ) );
}
}
EOF
)"
unset DUMMY
for i in $(highlight -w | grep -v "\s\|^$"); do
echo "******************** $i ********************"
highlight -S c -O xterm256 <(echo "$SAMPLE") -s "$i"
read DUMMY
if [ -n "$DUMMY" ]; then
return
fi
done
}
fi
## LSOF stats. Print number of open files per process.
lsofstat()
{
local LSOFOUT=$(lsof|awk '{print $1}')
for i in $(echo $LSOFOUT |sort -u);do
echo -n "$i "
echo $LSOFOUT | grep ^$i | wc -l
done
}
## Executable info
xinf()
{
if [ $# -ne 1 ]; then
echo "Give an executable in PATH as parameter."
return
fi
local xpath="$(type $1 | cut -d' ' -f3)"
ls -l "$xpath"
file "$xpath" | cut -d':' -f2 | cut -b 2-
}
## BAD CODE. This function will try to find an input binary file in the content
## of binary files in current folder. It does not work on big file because
## 'find' and 'grep' have an argument length limit.
bindatasearch()
{
echo "Deprecated function."
return
if [ $# -ne 2 ] -; then
echo "Usage: $0 FILECHUNK BIGFILE"
return
fi
if [ $(du -b Cover.jpg | awk '{print $1}') -gt 1048576 ]; then
echo "[$1] file size must not exceed 1MB."
return
fi
## The awk command suppresses first column, spaces and line breaks.
local SOURCE
SOURCE=$(od -tx8 "$1" | awk '($1="")1 gsub ( /\s/,"") { printf ("%s", $0) }')
local FILEDUMP
FILEDUMP=$(od -tx8 "$1" | awk '($1="")1 gsub ( /\s/,"") { printf ("%s", $0) }')
# grep -q "$SOURCE" <(echo "$FILEDUMP")
## This special, not well-known syntax allows us to execute a set of
## functions upon the result of find. Since everything MUST be between
## simple quotes, we cannot use external variables directly. So we pass the
## $SOURCE variable as argument. The underscore at the end allows the use of
## arguments. Note it will not work
# find "$TARGET" -type f -exec sh -c '
# # FILEDUMP=$(od -tx8 "$1" | awk '"'"'($1="")1 gsub ( /\s/,"") { printf ("%s", $0) }'"'"')
# # grep -q "$2" <(echo $FILEDUMP)
# # [ $? -eq 0 ] && echo "$1"
# ' _ {} "$SOURCE" \;
}
## Xrandr
xmulti ()
{
if [ $# -ne 1 ]; then
echo "Usage: $0 VIDEOPORT"
return
fi
xrandr --output "$1" --auto --right-of $(xrandr | sed -n "/current/{n;p;q}" | cut -f1 -d" ")
}
xmultioff ()
{
if [ $# -ne 1 ]; then
echo "Usage: $0 VIDEOPORT"
return
fi
xrandr --output "$1" --off
}
## Extended pgrep -a.
pgex ()
{
ps aux | grep "$(echo "$@" | sed 's/./[&]/;q')"
}
# Web videos DL
webdl ()
{
if [ -z "$(command -v movgrab)" ]; then
echo "Install movgrab."
return
fi
if [ $# -ne 2 ]; then
echo "Usage: ${0##*/} RES URI"
return
fi
RES=""
case $1 in
1080)
RES=1920x1080
;;
720)
RES=1280x720
;;
*)
RES=640x360
;;
esac
movgrab -f webm:$RES "$2"
}
##==============================================================================
## Pacman functions
##==============================================================================
if [ -n "$(command -v pacman)" ]; then
## Get detailed file list for the specified packages, omitting folders.
pql ()
{
pacman -Ql "$@" | grep -v "/$"
}
fi
##==============================================================================
## FreeBSD functions
##==============================================================================
if [ "$(uname)" = FreeBSD ]; then
## TODO: useless ?
# mqs()
# {
# local str="$(echo "$@" | sed -E 's/[ \t]+/\\|/g')"
# (cd /usr/ports && make quicksearch name="$str")
# }
port-list()
{
pkg_info | cut -f1 -d' '
}
port-size()
{
pkg_info -Qsb "$@" | sed 's/\([^:]*\):\(.*\)/\2 KiB \1/g'
}
mcd()
{
local DEST=$(pkg_search -r "$@" | head -n1 | awk '{print $2}')
cd "$DEST"
}
fi
##==============================================================================
## TeXlive functions
##==============================================================================
## TeXlive
if [ -d "/usr/local/texlive" ]; then
## WARNING: it is important to set umask properly, otherwise users might
## not have authorization to use the packages.
## This is bad pratice to write args without double quotes, but since we
## are sure there is no space in TeX Live packages, it is OK here.
tli ()
{
sudo sh -c 'umask 022 && tlmgr install $0 $@' "$@"
}
tlr ()
{
sudo sh -c 'umask 022 && tlmgr remove $0 $@' "$@"
}
fi
Reference in New Issue View Git Blame Copy Permalink