Commit | Line | Data |
---|---|---|
9b497049 WD |
1 | #!/bin/sh |
2 | # This script can be used as a "remote shell" command that is only | |
3 | # capable of pretending to connect to "localhost". This is useful | |
4 | # for testing or for running a local copy where the sender and the | |
5 | # receiver needs to use different options (e.g. --fake-super). If | |
6 | # we get a -l USER option, we try to use "sudo -u USER" to run the | |
7 | # command. | |
8 | ||
276cc455 | 9 | user='' |
276cc455 | 10 | do_cd=y # Default path is user's home dir, just like ssh. |
9b497049 WD |
11 | |
12 | while : ; do | |
13 | case "$1" in | |
276cc455 | 14 | -l) user="$2"; shift; shift ;; |
d64bda1c | 15 | -l*) user=`echo "$1" | sed 's/^-l//'`; shift ;; |
276cc455 | 16 | --no-cd) do_cd=n; shift ;; |
9b497049 WD |
17 | -*) shift ;; |
18 | localhost) shift; break ;; | |
276cc455 | 19 | *) echo "lsh: unable to connect to host $1" 1>&2; exit 1 ;; |
9b497049 WD |
20 | esac |
21 | done | |
22 | ||
276cc455 | 23 | if [ "$user" ]; then |
591c2245 | 24 | prefix='' |
276cc455 | 25 | if [ $do_cd = y ]; then |
d64bda1c | 26 | home=`perl -e "print((getpwnam('$user'))[7])"` |
8bcd6a4a | 27 | prefix="cd '$home' &&" |
276cc455 | 28 | fi |
591c2245 WD |
29 | sudo -H -u "$user" sh -c "$prefix $*" |
30 | else | |
8bcd6a4a WD |
31 | if [ $do_cd = y ]; then |
32 | cd || exit 1 | |
33 | fi | |
591c2245 | 34 | eval "${@}" |
276cc455 | 35 | fi |