Blame src/ftpget

Packit Service a2489d
#!/bin/bash
Packit Service a2489d
Packit Service a2489d
# ftpget - script replacement for old utility
Packit Service a2489d
# Copyright (c) 2000 Alexander V. Lukyanov <lav@yars.free.net>
Packit Service a2489d
# This file is covered by GNU GPL. See file COPYING for details.
Packit Service a2489d
Packit Service a2489d
usage()
Packit Service a2489d
{
Packit Service a2489d
   echo "Usage: $0 [OPTS] host filename [-o local] [filename...]"
Packit Service a2489d
   echo " -p <port>         set port number"
Packit Service a2489d
   echo " -u <user[,pass]>  login as user using pass as password"
Packit Service a2489d
   echo " -l                get listing of specified directory(ies)"
Packit Service a2489d
   echo " -c                reget specified file(s)"
Packit Service a2489d
   echo " -q                quiet (no output)"
Packit Service a2489d
   echo " -v                verbose (lots of output)"
Packit Service a2489d
   echo " -o <file>         output to this file (default - base name of filename)"
Packit Service a2489d
   exit 1
Packit Service a2489d
}
Packit Service a2489d
Packit Service a2489d
port=""
Packit Service a2489d
user=""
Packit Service a2489d
list=false
Packit Service a2489d
cont=""
Packit Service a2489d
verb=""
Packit Service a2489d
final="set verbose yes; "
Packit Service a2489d
Packit Service a2489d
while getopts +p:u:lcv opt
Packit Service a2489d
do
Packit Service a2489d
   case $opt in
Packit Service a2489d
   \?)	 usage;;
Packit Service a2489d
   p)	 port=":$OPTARG";;
Packit Service a2489d
   u)	 user="-u $OPTARG ";;
Packit Service a2489d
   l)	 list=true;;
Packit Service a2489d
   c)	 cont=" -c";;
Packit Service a2489d
   v)	 verb="debug 5; ";;
Packit Service a2489d
   q)	 final="";;
Packit Service a2489d
   esac
Packit Service a2489d
done
Packit Service a2489d
while [ $OPTIND -gt 1 ]
Packit Service a2489d
do
Packit Service a2489d
   OPTIND=$(($OPTIND-1))
Packit Service a2489d
   shift
Packit Service a2489d
done
Packit Service a2489d
host="$1"
Packit Service a2489d
shift
Packit Service a2489d
Packit Service a2489d
if [ -z "$host" ]; then
Packit Service a2489d
   usage
Packit Service a2489d
fi
Packit Service a2489d
Packit Service a2489d
cmd="get$cont"
Packit Service a2489d
ok=false
Packit Service a2489d
$list && { cmd="ls"; ok=true; }
Packit Service a2489d
Packit Service a2489d
for f
Packit Service a2489d
do
Packit Service a2489d
   case "$f" in
Packit Service a2489d
   "*[\"'\\]*")
Packit Service a2489d
      # need to quote
Packit Service a2489d
      f="`echo "$f" | sed 's/\([\\\"'\'']\)/\\\1/g'`"
Packit Service a2489d
      ;;
Packit Service a2489d
   esac
Packit Service a2489d
   cmd="$cmd \"$f\""
Packit Service a2489d
   ok=true;
Packit Service a2489d
done
Packit Service a2489d
Packit Service a2489d
$ok || { usage; }
Packit Service a2489d
Packit Service a2489d
exec lftp -c "$final${verb}open $user$host$port; $cmd"