#!/bin/sh
#
# @package      hubzero-mw-session
# @file         screenshot
# @author       Rick Kennell <kennell@purdue.edu>
# @author       Nicholas J. Kisseberth <nkissebe@purdue.edu>
# @copyright    Copyright (c) 2008-2014 HUBzero Foundation, LLC.
# @license      http://www.gnu.org/licenses/lgpl-3.0.html LGPLv3
#
# Copyright (c) 2008-2014 HUBzero Foundation, LLC.
#
# This file is part of: The HUBzero(R) Platform for Scientific Collaboration
#
# The HUBzero(R) Platform for Scientific Collaboration (HUBzero) is free
# software: you can redistribute it and/or modify it under the terms of
# the GNU Lesser General Public License as published by the Free Software
# Foundation, either version 3 of the License, or (at your option) any
# later version.
#
# HUBzero is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
#
# HUBzero is a registered trademark of HUBzero Foundation, LLC.
#

# @TODO: A custom xwd screenshot utility would be beneficial
#        which writes out to a useful file format natively

PATH=/usr/bin:/bin
export PATH

if [ "$1" = "" ]
then
	time=$(date +%Y-%m-%d-%H%M%S)
	xwd -root | xwdtopnm | pnmtopng > /tmp/screenshot-${time}.png
	exportfile -d /tmp/screenshot-${time}.png
else
	dirname=`dirname $1`
	basename=`basename $1`
	if [ "$dirname" = "" ]
	then
		exit 1
	fi
	if [ "$basename" = "" ]
	then
		exit 2
	fi
	tmpfile=`mktemp --tmpdir=$dirname $basename-XXXXXXXXXX`
	if [ "$tmpfile" = "" ]
	then
		exit 3
	fi
	# we don't redirect directly to the target file because
        # it leaves us with 1-5 seconds of missing screenshot
        # data as bash truncates the file before even starting
        # the pipeline. cp keeps inode same (might be beneficial
        # but not relied upon as far as I know)
	xwd -silent -root | xwdtopnm | pnmtopng > $tmpfile
        cp $tmpfile $1
        rm $tmpfile
fi
