export EDITOR=nvim

if [ $USER = 'knyffen' ]; then
    alias rm="trash"
fi

alias sudo="sudo "
alias vim="nvim"
alias vi="nvim"
alias ghc="ghc -dynamic"
alias find_root="sudo find / 2>&1"
alias py="python"
# alias ssh-add="ssh-add /home/knyffen/.ssh/knyf-inator /home/knyffen/.ssh/Knyf-inatorV2 /home/knyffen/.ssh/git_knyffen_dk"
alias zathura-t="tabbed -c zathura -e"
alias parsecd="LIBVA_DRIVER_NAME=iHD parsecd"
alias stack="/usr/bin/stack"
alias java_hidpi="java -Dsun.java2d.uiScale=2"
alias wol_desktop="ssh knyf wol BC:5F:F4:74:74:57"
alias dd_progress='sudo kill -USR1 $(pgrep ^dd)'
alias co2="ssh knyf mhz14a -r -d /dev/ttyS0"
alias h2o="ssh knyf 'cd configfiles/BME280; ./get_temperature_humidity_and_idead_humidity.sh'"
function ack_open { nvim $( ack -m 1 "$@" | grep -Po "^(?:lib|t|tmpl|python)/[^:]+:\d+" | tr '\n' ' ' ); }

# git
alias gst="git status"
alias gbr="git branch --sort=-committerdate"
function ggn { git grep -Pn --color=always "$@" :/; }
function ggt { git grep -Pn --color=always "$@" t/lib ; }
function ggp { ggn --color=always "$@" $(git rev-list --all); }
function ggl { ggn --color=always "$@" | less -R; }
function gdl { git diff --color=always "$@" | less -R; }
function ggtl { ggt --color=always "$@" | less -R; }
function ggpl { ggp --color=always "$@" | less -R; }

# git grep colors
git config --global pull.rebase true
git config --global color.grep.filename "Green"
git config --global color.grep.linenumber "Yellow"
git config --global color.grep.match "bold #ff4d00"

alias TODO="ggn 'TODO: jry'"

title() {
    # set input argument as window title
    echo -ne "\033]30;$1\007"
}

expressvpn() {
    local subcommand

    if (( "$#" == 0 )); then command expressvpn; return; fi

    subcommand=$1; shift
    case $subcommand in
        connect)
            if ! (command expressvpn "status" | grep -i "$@"); then
                command expressvpn "disconnect";
            fi
            command "sudo /usr/bin/cp -f /etc/resolv.conf /etc/resolv.conf.backup"
            command expressvpn "$subcommand" "$@"
            ;;
        disconnect)
            command expressvpn "$subcommand" "$@"
            command "sudo /usr/bin/cp -f /etc/resolv.conf.backup /etc/resolv.conf"
            ;;
        *)
            command expressvpn "$subcommand" "$@"
            ;;
    esac
}

spin() {
    local subcommand
    local fname

    if (( "$#" == 0 )); then command spin; return; fi

    subcommand=$1; shift
    case $subcommand in
        run)
            shift
            command spin "-run $@"
            ;;
        run_bfs)
            shift
            command spin "-run -bfs $@"
            ;;
        run_fair)
            shift
            command spin "-run -f $@"
            ;;
        run_bfs_fair)
            shift
            command spin "-run -bfs -f $@"
            ;;
        trace)
            shift
            fname=$1; shift
            command "./pam -i $fname"
            command "./pam -r $@ $fname"
            ;;
        trace_depth)
            shift
            local depth
            fname=$1; shift
            depth=$1; shift
            command "./pam -m$depth -i $fname"
            command "./pam -m$depth -r $@ $fname"
            ;;
        *)
            command spin "$subcommand $@"
    esac;
}

if [ $USER = 'jry' ]; then
    alias fzy="~/.fzy/fzy"

    alias perlperl="/home/perlrepo/perl-5.28.1/bin/perl -MJIX"
    alias perlprove="/home/perlrepo/perl-5.28.1/bin/prove"
    function prove { jix-shell TEST_METHOD=$TEST_METHOD BAIL_ON_FAIL=$BAIL_ON_FAIL prove "$@"; }
    function prove-on-backend { jix-shell TEST_METHOD=$TEST_METHOD BAIL_ON_FAIL=$BAIL_ON_FAIL USER=$USER JIX_USERID=$JIX_USERID prove-on-backend "$@"; }
    function perl { jix-shell TEST_METHOD=$TEST_METHOD BAIL_ON_FAIL=$BAIL_ON_FAIL USER=$USER JIX_USERID=$JIX_USERID  perl -MJIX "$@"; }
    alias open_url="jix-shell open_url"
    alias colorlog="jix-shell colorlog.pl"
    alias jix-gettext="jix-shell jix-gettext"
    alias arc="jix-shell arc"
    alias solr="ssh -L 1214:localhost:8983 solr@gnu.dev.job.dk firefox http://localhost:1214/solr/"

    function profiling {
        local ROOT=$1;
        shift;
        local FORM='';
        for ARG in $@; do
            FORM="$FORM --form-arg $ARG";
        done
        echo "jix-shell NYTPROF=start=no perl -d:NYTProf ~jry/jobxx/bin/benchmark_route.pl --route "'"'"$ROOT"'"'" --profile --companyuser $FORM";
        jix-shell NYTPROF=start=no perl -d:NYTProf ~jry/jobxx/bin/benchmark_route.pl --route "$ROOT" --profile --companyuser $FORM;
        echo "jix-shell nytprofhtml";
        jix-shell nytprofhtml;
        echo "mkdir -p \"/home/jry/jobxx/cover/report/html\"";
        mkdir -p "/home/jry/jobxx/cover/report/html";
        echo "mv nytprof \"/home/jry/jobxx/cover/report/html/nytprof\"";
        mv "nytprof" "/home/jry/jobxx/cover/report/html/nytprof"; # So it can be opened via www.jobindex.dk.jry.jobsafari.dk
        echo -e "\033[0;31mThe profiling can be found at www.jobindex.dk.jry.jobsafari.dk/cover/report/html/nytprof/index.html.";
        echo -e "\033[0;31mDelete folders ~jry/jobxx/cover/report/html/nytprof (possibly all the way down including 'cover')to clean up.";
    }

    function profiling_old_method {
        local JIX_USERID=233476; # userid of JRY
        local USER=jobdk;
        local ROOT=$1;
        shift;
        local FORM=$@;
        local COMMAND='use Test::More; use Test::JIX::Mojo;
            use JIX::Env;
            DB::disable_profile; # backup solution for setting NYTPROF=start=no env variable
            JIX::Env->USER("'$USER'"); # backup solution for setting USER=jobdk env variable
            my $t = Test::JIX::Mojo->new("JIX::Mojo");
            my $c = JIX::CompanyUser->retrieve( { id => '$JIX_USERID' } );
            $t->ua->inactivity_timeout(600);
            $t->auto_html5_ok(0);
            $t->login_companyuser($c);
            $t->jix_get_ok([ "'$ROOT'", format=>"xml", form => { '$FORM' } ]);
            for (0..9) {
                $t->login_companyuser($c);
                DB::enable_profile;
                $t->jix_get_ok([ "'$ROOT'", format=>"xml", form => { '$FORM' } ]);
                DB::disable_profile;
            };
            done_testing();';
        echo "Command:";
        echo "perl -d:NYTProf -E '$COMMAND'";
        USER=jobdk NYTPROF=start=no perl -d:NYTProf -E "$COMMAND";
        nytprofhtml;
    }

    # Automatically keep a pointer to my latest SSH agent
    MY_SSH_SOCK="/tmp/ssh-agent-$USER"
    if test $SSH_AUTH_SOCK && [ $SSH_AUTH_SOCK != $MY_SSH_SOCK ]; then
        ln -sf $SSH_AUTH_SOCK $MY_SSH_SOCK
        export SSH_AUTH_SOCK=$MY_SSH_SOCK
    fi
fi