#! /bin/zsh
#
# this file:
#   https://dataswamp.org/~incal/conf/.zsh/swamp
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/frame/index.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/frame/frame.css")
# (find-file "/-:incal@srv.dataswamp.org:public_html/frame/frame.js")
#
# (let ((dired-listing-switches "-al")) (dired "/-:incal@srv.dataswamp.org:public_html/"))
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/kurras/index.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/kurras/css/kurras.css")
#
# (find-file "/-:incal@srv.dataswamp.org:/var/gemini/~incal/index.gmi")
# (find-file "/-:incal@srv.dataswamp.org:/var/gemini/~incal/ascii-data/binary-units.gmi")
#
# (find-file "/-:incal@srv.dataswamp.org:.forward")
# (find-file "/-:incal@srv.dataswamp.org:.fdm.conf") # kill
#
# (find-file "/-:incal@srv.dataswamp.org:.zprofile")
# (find-file "/-:incal@srv.dataswamp.org:.zshenv")
# (find-file "/-:incal@srv.dataswamp.org:.zshrc")
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/index.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/index.css")
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/distsys/url.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/distsys/url_style.css")
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/cols/www/index.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/cols/www/style.css")
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/index.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/rss.xml")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/global.css")
#
# https://dataswamp.org/~incal/blog/hits.txt
# (find-file "/-:incal@srv.dataswamp.org:.emacs")
# (find-file "/-:incal@srv.dataswamp.org:stats")
# (find-file "/-:incal@srv.dataswamp.org:public_html/hits/piles-all")
# (find-file "/-:incal@srv.dataswamp.org:public_html/stats/plot-data.txt")
# (find-file "/-:incal@srv.dataswamp.org:public_html/hits/hits.gpi")
#
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/tree-house.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/tree-house-pulley.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/tree-house-rooftop.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/winter-video.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/tradkojan-i-blodstensskogen.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/blodstensskogen-nature-reserve.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/tree-house/summer-2021.html")

# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/climbing-gear/climbing-gear.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/climbing-gear/harness.html")

# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/box-10/top-10-modern-boxers.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/box-10/marco-antonio-barrera.html")

# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/ums/index.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/ums/ums-upgraded-photos.html")
# (find-file "/-:incal@srv.dataswamp.org:public_html/blog/ums/ums.css")

swamp_system=dataswamp.org
swamp_dir=~/swamp

# ssh
alive=120

swat () {
    clean
    torsocks ssh -o ServerAliveInterval=$alive $swamp_system -t ./swatp
}

swamp () {
    clean
    ssh -o ServerAliveInterval=$alive $swamp_system
}

swamp-verify () {
    clean
    ssh -o ServerAliveInterval=$alive \
        -o VerifyHostKeyDNS=yes       \
                                      $swamp_system
}

# rsync
# -a, --archive, archive mode; equals -rlptgoD ;)
# -L, --copy-links, transform symlinks into referent files/dirs
rsync_opts=-aL
rsync_filter=--exclude='*.elc'

swamp-get () {
    local from=${1:-.}
    local to=${2:-.}
    rsync $rsync_opts $swamp_system:$from $to
}

swamp-get-bu () {
    local dir=~/bu/$1
    mkdir -p $dir
    rsync $rsync_opts $swamp_system:. $dir
}

swamp-cp () {
    rsync $rsync_opts $rsync_filter $@ $swamp_system:
}

swamp-cp-hp () {
    swamp-cp-to-hp ~/public_html/
}

swamp-cp-to-hp () {
    rsync $rsync_opts $rsync_filter $@ ${swamp_system}:public_html/
}

swamp-cp-emacs () {
    rsync $rsync_opts $rsync_filter ~/.emacs-swamp ${swamp_system}:.emacs
    rsync $rsync_opts $rsync_filter ~/.emacs.d/emacs-init-swamp/ ${swamp_system}:.emacs.d/emacs-init/
}

swamp-cos () {
    swamp-cp ${swamp_dir}/.tmux.conf ~/.mailrc
    swamp-cp-hp
    swamp-cp-emacs
    swamp-cp-to-hp ${swamp_dir}/swamp-imgs
    swamp-cp ${swamp_dir}/swamp-big
}
alias cos-swamp=swamp-cos

# (find-file "/-:incal@srv.dataswamp.org:mail/send")

# (find-file "/-:incal@srv.dataswamp.org:public_html/py/write-file.py")

# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/sth.py")
# (find-file "/-:incal@srv.dataswamp.org:public_html/prss/prss.py")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/users.txt")

# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/py/hello_world.py")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/elem")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/junior")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/senior")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/stats")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/url2title")

# (find-file "/-:incal@srv.dataswamp.org:botsrc")
# (find-file "/-:incal@srv.dataswamp.org:.irssi/config")
# (find-file "/-:incal@srv.dataswamp.org:scripts/restart")

# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/1962")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/bot")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/cred")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/fireworks")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/incal")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/len")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/morena")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/rabbit")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/robot")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/swamp")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/data/ascii/wib")

# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/world")

# (find-file "/-:incal@srv.dataswamp.org:public_html/COMP-HIST")
# (find-file "/-:incal@srv.dataswamp.org:public_html/sth/scripts/hist")

# (find-file "/-:incal@srv.dataswamp.org:public_html/docs/dataswamp.7")