3 # To start tracking a file,
4 # cp ~/.screenrc dot/screenrc
6 # To sort out symlinks when things are clean
7 # infra/makelinks install
9 set -e -o posix -o pipefail
12 echo >&2 "usage: $0 [-n|-v] list|setup|dirimport|dirmove|clean"
19 if [ $# = 0 ]; then break; fi
21 -n) real_act=log_only ;;
22 -v) real_act=with_log ;;
30 1.list|1.setup|1.import|1.dirimport|1.clean) ;;
36 dots=$( find dot -mindepth 1 -maxdepth 1 -name '[0-9a-zA-Z]*[0-9a-zA-Z]' )
39 basepath=${basepath#$HOME/}
48 if [ $mode = list ]; then
55 show "bad: $dot: $1" >&2
59 if [ $mode = $1 ]; then
61 show "DOING $1: $prhome ($2)"
63 show "needs $1: $prhome: $2"
78 underhome=".${dot#dot/}"
79 inhome="$HOME/$underhome"
81 if [ "$inhome" -ef "$dot" ]; then
82 good "already symlinked here"
83 elif [ -h "$inhome" ]; then
84 bad "wrong symlink target"
85 elif ! [ -e "$inhome" ]; then
86 needs setup "absent here"
87 $act ln -s "$basepath/$dot" "$inhome"
88 elif [ -f "$inhome" ] && [ -f "$dot" ]; then
89 if cmp -s "$dot" "$inhome"; then
90 needs setup "identical here but not yet symlinked"
92 $act ln -s "$basepath/$dot" "$inhome"~
93 $act mv -f "$inhome"~ "$inhome"
95 needs import "modified here"
97 $act cp "$inhome" "$dot"~
98 $act mv -f "$dot"~ "$dot"
100 elif [ -d "$inhome" ] && [ -d "$dot" ]; then
101 needs dirimport "directory here not yet symlinked"
102 $act mv "$dot" "$dot~"
103 $act ln -s "$basepath/$dot" "$inhome"~
104 $act mv "$inhome" "$dot"
105 $act mv "$inhome~" "$inhome"
108 bad "mismatched file types"
114 find -L .[0-9a-zA-Z]* -maxdepth 0 -xdev -type l -lname "$basepath/dot/*"
116 for underhome in $brokens; do
117 inhome="$HOME/$underhome"
118 prhome="~/$underhome"
119 needs clean "symlink to removed file in dot/"