2013-10-28 02:36:19 +00:00
|
|
|
#!/bin/sh
|
|
|
|
#
|
2013-12-29 04:53:12 +00:00
|
|
|
# Copyright (C) 2013 Glyptodon LLC
|
|
|
|
#
|
|
|
|
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
|
|
# of this software and associated documentation files (the "Software"), to deal
|
|
|
|
# in the Software without restriction, including without limitation the rights
|
|
|
|
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
|
|
# copies of the Software, and to permit persons to whom the Software is
|
|
|
|
# furnished to do so, subject to the following conditions:
|
|
|
|
#
|
|
|
|
# The above copyright notice and this permission notice shall be included in
|
|
|
|
# all copies or substantial portions of the Software.
|
|
|
|
#
|
|
|
|
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
|
|
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
|
|
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
|
|
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
|
|
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
|
|
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
|
|
# THE SOFTWARE.
|
|
|
|
#
|
|
|
|
|
2013-10-28 16:38:10 +00:00
|
|
|
#
|
2013-10-28 02:36:19 +00:00
|
|
|
# guacctl
|
2013-12-29 04:53:12 +00:00
|
|
|
# -------
|
2013-10-28 02:36:19 +00:00
|
|
|
#
|
|
|
|
# Utility for sending Guacamole-specific console codes for controlling the SSH
|
|
|
|
# session, such as:
|
|
|
|
#
|
|
|
|
# * Downloading files
|
|
|
|
# * Setting the destination directory for uploads
|
|
|
|
#
|
2013-10-28 21:28:37 +00:00
|
|
|
# This script may also be run as "guacget", in which case the script accepts
|
|
|
|
# no options and assumes anything given on the commandline is a file to be
|
|
|
|
# downloaded.
|
|
|
|
#
|
|
|
|
|
2013-10-28 02:36:19 +00:00
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Given the name of a file, which may be a relative path, produce the full,
|
|
|
|
# real, non-relative path for that same file.
|
2013-10-28 16:28:23 +00:00
|
|
|
fullpath() {
|
|
|
|
FILENAME="$1"
|
|
|
|
DIR=`dirname "$FILENAME"`
|
|
|
|
FILE=`basename "$FILENAME"`
|
|
|
|
(cd "$DIR" && echo "$PWD/$FILE")
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Sends the Guacamole-specific console code for initiating a download.
|
2013-10-28 02:36:19 +00:00
|
|
|
send_download_file() {
|
|
|
|
FILENAME="$1"
|
|
|
|
printf "\033]482200;%s\007" "$FILENAME"
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Sends the Guacamole-specific console code for setting the upload directory.
|
2013-10-28 02:36:19 +00:00
|
|
|
send_set_directory() {
|
|
|
|
FILENAME="$1"
|
|
|
|
printf "\033]482201;%s\007" "$FILENAME"
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Prints the given error text to STDERR.
|
2013-10-28 02:36:19 +00:00
|
|
|
error() {
|
|
|
|
echo "$NAME:" "$@" >&2
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Prints usage documentation for this script.
|
2013-10-28 02:36:19 +00:00
|
|
|
usage() {
|
|
|
|
cat >&2 <<END
|
2013-10-28 21:28:37 +00:00
|
|
|
guacctl 0.8.0, Guacamole SSH session control utility.
|
|
|
|
Usage: guacctl [OPTION] [FILE]...
|
2013-10-28 02:36:19 +00:00
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
-d, --download download each of the files listed.
|
|
|
|
-s, --set-directory set the destination directory for future uploaded
|
|
|
|
files.
|
2013-10-28 02:36:19 +00:00
|
|
|
END
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Initiates a download for each of the specified files
|
2013-10-28 02:36:19 +00:00
|
|
|
download_files() {
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Validate arguments
|
|
|
|
if [ $# -lt 1 ]; then
|
|
|
|
error "No files specified."
|
|
|
|
return;
|
|
|
|
fi
|
|
|
|
|
2013-10-28 02:36:19 +00:00
|
|
|
for FILENAME in "$@"; do
|
|
|
|
if [ -e "$FILENAME" ]; then
|
2013-11-12 17:52:56 +00:00
|
|
|
send_download_file "`fullpath "$FILENAME"`"
|
2013-10-28 02:36:19 +00:00
|
|
|
else
|
|
|
|
error "$FILENAME: File does not exist."
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Changes the upload path for future uploads to the given directory
|
2013-10-28 02:36:19 +00:00
|
|
|
set_directory() {
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Validate arguments
|
|
|
|
if [ $# -lt 1 ]; then
|
|
|
|
error "No destination directory specified."
|
|
|
|
return;
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ $# -gt 1 ]; then
|
|
|
|
error "Only one destination directory may be given."
|
|
|
|
return;
|
|
|
|
fi
|
|
|
|
|
2013-10-28 02:36:19 +00:00
|
|
|
FILENAME="$1"
|
2013-10-28 21:28:37 +00:00
|
|
|
if [ -d "$FILENAME" ]; then
|
2013-11-12 17:52:56 +00:00
|
|
|
send_set_directory "`fullpath "$FILENAME"`"
|
2013-10-28 02:36:19 +00:00
|
|
|
else
|
|
|
|
error "$FILENAME: File does not exist or is not a directory."
|
|
|
|
fi
|
|
|
|
|
|
|
|
}
|
|
|
|
|
2013-10-28 21:28:37 +00:00
|
|
|
# Get script name
|
2013-10-28 02:36:19 +00:00
|
|
|
NAME=`basename "$0"`
|
|
|
|
|
|
|
|
# Parse options
|
|
|
|
if [ "x$NAME" = "xguacget" ]; then
|
|
|
|
download_files "$@"
|
2013-10-28 21:28:37 +00:00
|
|
|
elif [ "x$1" = "x--download" -o "x$1" = "x-d" ]; then
|
2013-10-28 02:36:19 +00:00
|
|
|
shift
|
|
|
|
download_files "$@"
|
2013-10-28 21:28:37 +00:00
|
|
|
elif [ "x$1" = "x--set-directory" -o "x$1" = "x-s" ]; then
|
2013-10-28 02:36:19 +00:00
|
|
|
shift
|
|
|
|
set_directory "$@"
|
|
|
|
else
|
|
|
|
usage
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
|