#!/bin/sh

# copyright 2010 Mike Sliczniak
# BSD style terms, no attribution needed, no claims/warantees expressed/implied

# e.g. copy all non-hidden files and dirs from your home dir using protocol 2
# $ cd && stjput '-24 remuser@host' . *

IFS=' 	
'

case $# in
  [012])
    echo 'Usage: stjput sshopts remdir file|dir [file|dir ...]' >&2
    exit 2
    ;;
esac

# some defaults, may not work with very old versions of ssh
#sshopts='-24 -o PermitLocalCommand=no -qaxT '"$1"; shift
sshopts='-qaxT '"$1"; shift

remdir="$1"; shift 

# protect sh from stripping trailing whitespace, eg newline(s)
case "$remdir" in
  '')
	# someone used '' instead of . for CWD!
	remdir=.
	;;
  */)
	;;
  *)
	# It does not matter to have the trailing / for a dir
	remdir="$remdir"/
	;;
esac

# need to prevent cd and mkdir thinking it is some option
case "$remdir" in
  /* | .*)
	;;
  *)
	remdir=./"$remdir"
	;;
esac

foo() {
	n=$2
}

# lots of testing shows that this works on many shells,
# don't use $() or "``" and make sure that closing tick is all by itsewlf on the
# last line
n=`cksum <<EOF
$remdir
EOF
`

# learn how many octets are in remdir
# wc is annoying since it was buggy on BSD and sometimes returns number of 'characters'
foo $n

# tar does not support --, so need to make sure all file/dir args start with /
# or . (not starting with - is not good enough, some versions of tar treat @
# as special for example.
m=''
for i in "$@"
do
	m="$m"x
done

foo() {
	case "$c" in
	  "$m")
		return 1
		;;
	esac

	c="$c"x
	return 0
}

c=''
while foo
do
	i="$1"; shift
	case "$i" in
	  /* | .*)
		;;
	  *)
		i=./"$i"
		;;
	esac

	set -- "$@" "$i"
done

# these next functions are so that remdir is sent followed by the tarball
# this is what worked, various other methods ran into bugs in some versions of
# bash!
bar() {
cat <<EOF
$remdir
EOF
}

baz() {
	tar cf - "$@" | bzip2 -c --best -
}

foo() {
	bar && baz "$@"
}

# now to actually compress, send, and extract
foo "$@" | ssh $sshopts /bin/sh -c \
''\''IFS=""; n="`dd bs='$n' count=1 2>/dev/null`" && mkdir -p "$n" && cd "$n" && bunzip2 -c - | tar xvf -'\'''