Make shellenv directory.
This commit is contained in:
77
dotfiles/lib/shellenv/emacs.sh
Normal file
77
dotfiles/lib/shellenv/emacs.sh
Normal file
@@ -0,0 +1,77 @@
|
||||
alias emacs='_emacs -c -n '
|
||||
is_osx && alias emacs='cocoa_emacs'
|
||||
alias terminal_emacs='_emacs -t'
|
||||
is_ssh && emacs="terminal_emacs"
|
||||
|
||||
function e {
|
||||
[ -z "$*" ] && emacs || emacs_open -n "$@"
|
||||
}
|
||||
|
||||
function cocoa_emacs {
|
||||
reattach-to-user-namespace zsh -c 'source ~/.zshrc && _emacs -c -n "$@"'
|
||||
}
|
||||
|
||||
function _emacs {
|
||||
local server_name="$(_emacs_server_file)"
|
||||
if ! emacs_daemon_exists "$server_name"; then
|
||||
echo "Starting emacs with server name '$server_name'"
|
||||
command emacs --daemon="$server_name"
|
||||
fi
|
||||
emacsclient "$@" --server-file=$server_name
|
||||
}
|
||||
|
||||
function _emacs_server_file {
|
||||
local server_name="global"
|
||||
[ ! -z ${PER_DIRECTORY_EMACS+y} ] && server_name="$(_current_dot_directory)"
|
||||
echo $server_name
|
||||
}
|
||||
|
||||
function emacs_daemon_exists {
|
||||
! test -z "$(ps aux | grep -v grep | grep -i "emacs.*--daemon=.*$1$")"
|
||||
}
|
||||
|
||||
function _dot_directory {
|
||||
echo $1 | sed "s:/:.:g"
|
||||
}
|
||||
|
||||
function _current_dot_directory {
|
||||
local directory="$(git rev-parse --show-toplevel 2> /dev/null || pwd)"
|
||||
_dot_directory $directory
|
||||
}
|
||||
|
||||
function existing_emacs {
|
||||
# Return any existing emacs server file or the one that should
|
||||
# be created if it doesn't exist.
|
||||
local server_file="$(emacs_get_running_instances | head -n1)"
|
||||
[ -z "$server_file" ] && server_file="$(_emacs_server_file)"
|
||||
echo $server_file
|
||||
}
|
||||
|
||||
function emacs_make_frame_if_none_exists {
|
||||
emacsclient -e '(make-frame-if-none-exists-and-focus)' --server-file=$1 > /dev/null
|
||||
focus_emacs
|
||||
}
|
||||
|
||||
function focus_emacs {
|
||||
is_osx && osascript -e 'tell application "Emacs" to activate'
|
||||
}
|
||||
|
||||
function emacs_get_running_instances {
|
||||
pgrep -i emacs | xargs ps -o command -p | egrep -o " --daemon=(.*)" | awk -F= '{print $2}' | sed 's/\^J3,4\^J//'
|
||||
}
|
||||
|
||||
function emacs_open {
|
||||
if ! emacs_daemon_exists; then
|
||||
emacs
|
||||
fi
|
||||
local server_file="$(emacs_get_running_instances | head -n1)"
|
||||
emacs_make_frame_if_none_exists $server_file
|
||||
[ ! -z "$*" ] && emacsclient "$@" --server-file="$server_file"
|
||||
focus_emacs
|
||||
}
|
||||
|
||||
# Make emacs the default editor.
|
||||
export EDITOR='emacs_open'
|
||||
export VISUAL="$EDITOR"
|
||||
# This is ugly as sin but I can't figure out how else to do it.
|
||||
export GIT_EDITOR="zsh -c 'source ~/.zshrc && emacs_open '"'"$@"'
|
||||
272
dotfiles/lib/shellenv/functions.sh
Normal file
272
dotfiles/lib/shellenv/functions.sh
Normal file
@@ -0,0 +1,272 @@
|
||||
shell_contains () {
|
||||
local e
|
||||
for e in "${@:2}"; do [[ "$e" == "$1" ]] && return 0; done
|
||||
return 1
|
||||
}
|
||||
|
||||
function dotfiles_directory() {
|
||||
echo $(dirname `readlink -f ~/.zshrc | xargs dirname`)
|
||||
}
|
||||
|
||||
function go2dotfiles() {
|
||||
cd $(dotfiles_directory)
|
||||
}
|
||||
|
||||
function update_dotfiles() {
|
||||
local old_pwd=$(pwd)
|
||||
go2dotfiles
|
||||
git ffo
|
||||
cd $old_pwd
|
||||
}
|
||||
|
||||
function current_shell() {
|
||||
readlink -f $(which "$(ps -p $$ | tail -1 | awk '{print $NF}' | sed 's/\-//')")
|
||||
}
|
||||
|
||||
function is_zsh() {
|
||||
test -n "$(current_shell | grep -o zsh)"
|
||||
}
|
||||
|
||||
function git_diff_add() {
|
||||
git status --porcelain | awk '{print $2}' | xargs -I filename sh -c "git du filename && git add filename"
|
||||
}
|
||||
|
||||
function confirm() {
|
||||
# call with a prompt string or use a default
|
||||
read -r -p "$1" response
|
||||
case $response in
|
||||
[yY][eE][sS]|[yY])
|
||||
return 0
|
||||
;;
|
||||
*)
|
||||
return 1
|
||||
;;
|
||||
esac
|
||||
}
|
||||
|
||||
function get_cols() {
|
||||
FS=' '
|
||||
OPTIND=1
|
||||
while getopts "F:" OPTCHAR; do
|
||||
case $OPTCHAR in
|
||||
F)
|
||||
FS=$OPTARG
|
||||
;;
|
||||
esac
|
||||
done
|
||||
shift $((OPTIND-1))
|
||||
awk -f "$HOME/.lib/get_cols.awk" -v "cols=$*" -v "FS=$FS"
|
||||
}
|
||||
|
||||
function find_all_ssh_agent_sockets() {
|
||||
find /tmp -type s -name agent.\* 2> /dev/null | grep '/tmp/ssh-.*/agent.*'
|
||||
}
|
||||
|
||||
function set_ssh_agent_socket() {
|
||||
export SSH_AUTH_SOCK=$(find_all_ssh_agent_sockets | tail -n 1 | awk -F: '{print $1}')
|
||||
}
|
||||
|
||||
# Determine size of a file or total size of a directory
|
||||
function fs() {
|
||||
if du -b /dev/null > /dev/null 2>&1; then
|
||||
local arg=-sbh
|
||||
else
|
||||
local arg=-sh
|
||||
fi
|
||||
if [[ -n "$@" ]]; then
|
||||
du $arg -- "$@"
|
||||
else
|
||||
du $arg .[^.]* *
|
||||
fi
|
||||
}
|
||||
|
||||
# Start an HTTP server from a directory, optionally specifying the port
|
||||
function server() {
|
||||
local port="${1:-8000}"
|
||||
sleep 1 && open "http://localhost:${port}/" &
|
||||
# Set the default Content-Type to `text/plain` instead of `application/octet-stream`
|
||||
# And serve everything as UTF-8 (although not technically correct, this doesn’t break anything for binary files)
|
||||
python -c $'import SimpleHTTPServer;\nmap = SimpleHTTPServer.SimpleHTTPRequestHandler.extensions_map;\nmap[""] = "text/plain";\nfor key, value in map.items():\n\tmap[key] = value + ";charset=UTF-8";\nSimpleHTTPServer.test();' "$port"
|
||||
}
|
||||
|
||||
# All the dig info
|
||||
function digga() {
|
||||
dig +nocmd "$1" any +multiline +noall +answer
|
||||
}
|
||||
|
||||
function shell_stats() {
|
||||
history 0 | awk '{CMD[$2]++;count++;}END { for (a in CMD)print CMD[a] " " CMD[a]/count*100 "% " a;}' | grep -v "./" | column -c3 -s " " -t | sort -nr | nl | head -n20
|
||||
}
|
||||
|
||||
function is_ssh() {
|
||||
test $SSH_CLIENT
|
||||
}
|
||||
|
||||
function is_osx() {
|
||||
case `uname` in
|
||||
'Darwin')
|
||||
return 0
|
||||
;;
|
||||
*)
|
||||
return 1;
|
||||
;;
|
||||
esac
|
||||
}
|
||||
|
||||
# TODO: Remove this.
|
||||
alias clipboard='oscopy'
|
||||
|
||||
function oscopy() {
|
||||
if is_osx;
|
||||
then
|
||||
reattach-to-user-namespace pbcopy
|
||||
else
|
||||
xclip -selection c
|
||||
fi
|
||||
}
|
||||
|
||||
function ospaste() {
|
||||
if is_osx;
|
||||
then
|
||||
reattach-to-user-namespace pbpaste
|
||||
else
|
||||
xclip -o
|
||||
fi
|
||||
}
|
||||
|
||||
function git_root() {
|
||||
cd `git root`
|
||||
}
|
||||
|
||||
function git_diff_replacing() {
|
||||
local original_sha='HEAD~1'
|
||||
local new_sha='HEAD'
|
||||
OPTIND=1
|
||||
while getopts "do:n:" OPTCHAR;
|
||||
do
|
||||
case $OPTCHAR in
|
||||
o)
|
||||
original_sha="$OPTARG"
|
||||
;;
|
||||
n)
|
||||
new_sha="$OPTARG"
|
||||
;;
|
||||
d)
|
||||
debug="true"
|
||||
esac
|
||||
done
|
||||
shift $((OPTIND-1))
|
||||
local replaced="$1"
|
||||
local replacing="$2"
|
||||
local replace_sha_string='$(echo filename | sed '"s:$replaced:$replacing:g"')'
|
||||
test -z $debug || echo "Diffing from $original_sha to $new_sha, replacing $replaced with $replacing"
|
||||
test -z $debug || git diff $original_sha $new_sha --name-only | grep -v "$replacing"
|
||||
git diff $original_sha $new_sha --name-only | grep -v "$replacing" | xargs -I filename sh -c "git diff $original_sha:filename $new_sha:"$replace_sha_string
|
||||
}
|
||||
|
||||
function git_reset_author() {
|
||||
local should_update_command=''
|
||||
local update_command=''
|
||||
OPTIND=1
|
||||
while getopts "a:e:A:E:h" OPTCHAR;
|
||||
do
|
||||
case $OPTCHAR in
|
||||
a)
|
||||
new_author="$OPTARG";
|
||||
test -n "$update_command" && update_command="$update_command"' && '
|
||||
update_command="$update_command"'export GIT_AUTHOR_NAME='"'$new_author'"' && export GIT_COMMITTER_NAME='"'$new_author'"
|
||||
;;
|
||||
A)
|
||||
author_regex="$OPTARG";
|
||||
test -n "$should_update_command" && should_update_command="$should_update_command"' && '
|
||||
should_update_command=$should_update_command'[[ "$GIT_AUTHOR_NAME" =~ "'"$author_regex"'" ]]'
|
||||
;;
|
||||
e)
|
||||
new_email="$OPTARG";
|
||||
test -n "$update_command" && update_command="$update_command"' && '
|
||||
update_command="$update_command"'export GIT_AUTHOR_EMAIL='"'$new_email'"' && export GIT_COMMITTER_EMAIL='"'$new_email'"
|
||||
;;
|
||||
E)
|
||||
email_regex="$OPTARG";
|
||||
test -n "$should_update_command" && should_update_command="$should_update_command"' && '
|
||||
should_update_command=$should_update_command'[[ "$GIT_AUTHOR_EMAIL" =~ "'"$email_regex"'" ]]'
|
||||
;;
|
||||
h)
|
||||
echo "Usage:
|
||||
-a specify the new author/committer name.
|
||||
-A specify a regex that will be used to filter commits by author name.
|
||||
-e specify the new author/committer email.
|
||||
-E specify a regex that will be used to filter commits by author email.
|
||||
-h show this help message.
|
||||
"
|
||||
return
|
||||
;;
|
||||
esac
|
||||
done
|
||||
local filter_branch_command="$should_update_command"' && '"$update_command"' || test true'
|
||||
git filter-branch -f --env-filter $filter_branch_command -- --all
|
||||
}
|
||||
|
||||
function set_osx_hostname() {
|
||||
local new_hostname="${1-imalison}"
|
||||
sudo scutil --set ComputerName $new_hostname
|
||||
sudo scutil --set HostName $new_hostname
|
||||
sudo scutil --set LocalHostName $new_hostname
|
||||
sudo defaults write /Library/Preferences/SystemConfiguration/com.apple.smb.server NetBIOSName -string $new_hostname
|
||||
}
|
||||
|
||||
function pip_package_location() {
|
||||
pip show $1 | grep Location | get_cols 2
|
||||
}
|
||||
|
||||
function set_modifier_keys_on_all_keyboards() {
|
||||
for vendor_product_id in $(get_keyboard_vendor_id_product_id_pairs | tr " " "-"); do
|
||||
set_modifier_keys_for_vendor_product_id $vendor_product_id 0 2; echo $vendor_product_id;
|
||||
done;
|
||||
}
|
||||
|
||||
function get_keyboard_vendor_id_product_id_pairs() {
|
||||
ioreg -n IOHIDKeyboard -r | grep -e 'class IOHIDKeyboard' -e VendorID\" -e Product | gawk 'BEGIN { RS = "class IOHIDKeyboard" } match($0, /VendorID. = ([0-9]*)/, arr) { printf arr[1]} match($0, /ProductID. = ([0-9]*)/, arr) { printf " %s\n", arr[1]} '
|
||||
}
|
||||
|
||||
function git_config_string() {
|
||||
git config -f $1 --list | xargs -I kv printf '-c \"%s\" ' kv
|
||||
}
|
||||
|
||||
function talk_dirty_to_me() {
|
||||
python - <<EOF
|
||||
from random import randrange
|
||||
import re
|
||||
import urllib
|
||||
|
||||
def talk_dirty_to_me():
|
||||
socket = urllib.urlopen("http://www.youporn.com/random/video/")
|
||||
htmlSource = socket.read()
|
||||
socket.close()
|
||||
result = re.findall('<p class="message">((?:.|\\n)*?)</p>', htmlSource)
|
||||
if len(result):
|
||||
print result[randrange(len(result))]
|
||||
else:
|
||||
talk_dirty_to_me()
|
||||
|
||||
talk_dirty_to_me()
|
||||
EOF
|
||||
}
|
||||
|
||||
function dirty_talk() {
|
||||
while true; do talk_dirty_to_me | tee >(cat) | say; done
|
||||
}
|
||||
|
||||
function track_modified {
|
||||
local timestamp_file="/tmp/__track_modified_timestamp__"
|
||||
touch $timestamp_file
|
||||
stat $timestamp_file
|
||||
echo "Press any key to execute find command"
|
||||
read -r key
|
||||
echo "Finding..."
|
||||
find $1 -newer $timestamp_file
|
||||
}
|
||||
|
||||
function python_module_path {
|
||||
python -c "import os, $1; print(os.path.dirname($1.__file__))"
|
||||
}
|
||||
Reference in New Issue
Block a user