Here is a small script that I wrote this morning.
I thought this script could be useful for other people then me.
It copies one raster cell file from current location to another
existing location.
Lars
Lars Schylberg Email: larss@fmi.kth.se
Department of Photogrammetry
Royal Institute of Technology Tel. +46 8 790 86 33
S-100 44 STOCKHOLM, SWEDEN Fax. +46 8 790 66 10
------------------ cut here -------------------------------------
#!/bin/sh
#
# g.cp.rast.sh
#
# Author: Lars Schylberg
# email: larss@fmi.kth.se
#
# Date: 930119
#
#------------------------------------------------------------------------
# Check if GRASS is running
#
test "$GISRC" || echo "GRASS is not running" || exit 2
#----------------------------------------------------------------------------
#
# Evaluate arguments
#
if [ $# != 2 ]
then
echo
echo Usage: `basename $0`
echo ' rast=mapname '
echo ' location=target location path '
echo
echo ' This program copies a raster cell file from '
echo ' current location to a specified existing location. '
echo ' The new location have to be specified with a full path. '
echo
exit 1
fi
# Parse input arguments
for i do
case $i in
rast=*)
RAST=`echo $i | sed s/rast=//` ;;
ra=*)
RAST=`echo $i | sed s/ra=//` ;;
r=*)
RAST=`echo $i | sed s/r=//` ;;
location=*)
NLPATH=`echo $i | sed s/location=//` ;;
loc=*)
NLPATH=`echo $i | sed s/loc=//` ;;
l=*)
NLPATH=`echo $i | sed s/l=//` ;;
*)
echo ""
echo "Unrecognized option: $i"
echo 'Options: rast=mapname '
echo ' location=target location path '
exit 1
esac
done
#-------------------------------------------------------------------------
# Check the input arguments
eval `g.findfile element=cell file=$RAST`
if [ ! "$file" ]
then
echo "$RAST - cell file not found"
exit 2
fi
if test -f $NLPATH/WIND
then
cp $LOCATION/cell/$RAST $NLPATH/cell/
cp $LOCATION/cellhd/$RAST $NLPATH/cellhd/
cp $LOCATION/cats/$RAST $NLPATH/cats/
cp $LOCATION/colr/$RAST $NLPATH/colr/
cp $LOCATION/hist/$RAST $NLPATH/hist/
cp $LOCATION/cell_misc/$RAST/* $NLPATH/cell_misc/$RAST/
else
echo "No such location path: $NLPATH "
exit 2
fi