#!/usr/local/bin/bash -f
#  vimrcpfile
#
#  Author : Dr. Charles E. Campbell, Jr.
#           Goddard Space Flight Center
#           Greenbelt Rd
#           Greenbelt, MD 20771
#
#   Purpose: ftp-s or rcp-s a specified file to <tmp.vim>
#
#   Usage  : vimrcpfile
#            (will prompt the user for what file to obtain)
#
# Modified by Louis Raphael <raphael@cs.mcgill.ca> for the bash shell.

# give prompt and get response
echo 'Enter machine:filename (rcp mode) -or-'
echo 'Enter machine id password filename (ftp mode)'
read -r response
echo "response was <${response}>"

# unset all current positional parameters
# set   response into positional parameters
set -- ${response}

# issue an rcp or ftp as appropriate
if [ ${#} -eq 1 ]; then
    echo "attempting "'"'"rcp $1 tmp.vim"'"'
    rcp $1 tmp.vim
elif [ ${#} -eq 4 ]; then
    if [ -r ~/.netrc ]; then
        echo "attempting ftp with .netrc pre-existing"
        mv ~/.netrc ~/.netrc.tmp
        echo "machine $1 login $2 password "'"'$3'"' > ~/.netrc
        chmod 600 ~/.netrc

        # get the file via ftp
        cat <<EOM | ftp $1
            binary
            get $4 tmp.vim
            quit
EOM
        /bin/rm ~/.netrc
        mv ~/.netrc.tmp ~/.netrc
    else
        echo "attempting ftp with no .netrc"
        echo "machine $1 login $2 password "'"'$3'"' > ~/.netrc
        chmod 600 ~/.netrc

        # get the file via ftp
        cat <<EOM | ftp $1
            binary
            get $4 tmp.vim
            quit
EOM
        /bin/rm ~/.netrc
        fi
else
    echo "improper qty (${#}) of arguments"
    /bin/rm -f tmp.vim
    fi