Initial commit

1 files changed, 81 insertions, 0 deletions

@@ -0,0 +1,81 @@
+#!/bin/sh
+
+QUIET=false
+NORUN=false
+FORCE=false
+DIR="$(dirname "$(realpath "$0")")"
+
+main() {
+    action=homify
+    while getopts hqnfdx OPT
+    do
+        case "$OPT" in
+            (h) usage; exit 0 ;;
+            (q) QUIET=true ;;
+            (n) NORUN=true ;;
+            (f) FORCE=true ;;
+            (d) action=dotify ;;
+            (x) set -x ;;
+            (*) usage; exit 1 ;;
+        esac
+    done
+    shift $((OPTIND - 1))
+    "$action" "$@"
+}
+
+usage() {
+    cat<<EOF
+Usage: $0 [-h] [-q] [-n] [-f] [-x] [-d] [FILE] [FIND_ARGS...]
+Flags:
+ -h     Show this help and exit
+ -q     Don't print what's happening
+ -n     Just print what would happen
+ -f     Force links (ln -f)
+ -x     Trace program
+ -d     Link from FILE to the dots dir
+        (Default: link from FILE to $HOME)
+        When linking to $HOME, add a dot at the front of FILE
+        When linking to dots, remove the dot from the front of FILE
+Parameters:
+ FILE   File or directory to link.
+        If not given, link all the files in dots.
+        If not given along with '-d', ... I don't know what'll happen
+ FIND_ARGS
+        Extra arguments to pass to find.
+EOF
+}
+
+log() { $QUIET || echo >&2 "* $@"; }
+run() { log "$@"; $NORUN || "$@"; }
+
+mklink() { # mklink SOURCE DEST
+    # make hardlinks to DEST from SOURCE -- making directories
+    $NORUN || test -d "$(dirname "$2")" || run mkdir -p "$(dirname "$2")"
+    if ! test -f "$2"
+    then run ln "$1" "$2"
+    elif test -f "$2" && "$FORCE"
+    then run ln -f "$1" "$2"
+    else log "$2 exists: skipping"
+    fi
+}
+
+getfiles() {
+    d="$1"; shift
+    find "$d" -type f -a -not -name "$(basename "$0")" "$@"
+}
+
+homify() {
+    getfiles "$DIR" "$@" |
+        while read -r dot
+        do mklink "$dot" "$HOME/.${dot#$DIR/}"
+        done
+}
+
+dotify() {
+    getfiles "$@" |
+        while read -r file
+        do mklink "$file" "$DIR/${file#.}"
+        done
+}
+
+main "$@"