[Bio] / FigCommon / code-snapshot-cron Repository:
ViewVC logotype

View of /FigCommon/code-snapshot-cron

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1.2 - (download) (annotate)
Fri Jan 16 17:56:37 2009 UTC (11 years, 4 months ago) by olson
Branch: MAIN
CVS Tags: mgrast_dev_08112011, rast_rel_2009_05_18, mgrast_dev_08022011, rast_rel_2014_0912, mgrast_dev_05262011, mgrast_dev_04082011, rast_rel_2010_0928, mgrast_version_3_2, mgrast_dev_12152011, help, mgrast_dev_06072011, rast_rel_2009_0925, rast_rel_2010_0526, rast_rel_2014_0729, mgrast_dev_02212011, rast_rel_2010_1206, mgrast_release_3_0, mgrast_dev_03252011, rast_rel_2010_0118, rast_rel_2009_02_05, rast_rel_2011_0119, mgrast_release_3_0_4, mgrast_release_3_0_2, mgrast_release_3_0_3, mgrast_release_3_0_1, mgrast_dev_03312011, mgrast_release_3_1_2, mgrast_release_3_1_1, mgrast_release_3_1_0, mgrast_dev_04132011, mgrast_dev_04012011, rast_rel_2009_07_09, rast_rel_2010_0827, myrast_33, rast_rel_2011_0928, mgrast_dev_04052011, mgrast_dev_02222011, rast_rel_2009_03_26, mgrast_dev_10262011, HEAD
Changes since 1.1: +5 -2 lines
Fix remaining bugs.


# The canonical source of this script lives in the FigCommon CVS module.
# This gets run daily from cron.

cd /vol/export/bin
dayofmonth=`date +'%d'`

export CVSROOT=:pserver:anonymous@biocvs.mcs.anl.gov:/disks/cvs/bio

# Write our daily snapshot.

/vol/cee/bin/perl ./write_code_snapshot.pl today /vol/export/software/snapshots/daily-snapshot

# First day of the month gets a monthly snapshot written.

if [ $dayofmonth = "1" ] ; then
	new_snap=`/vol/cee/bin/perl ./write_code_snapshot.pl today /vol/export/software/snapshots/snapshot-%s`
	if [ $? -eq 0 ] ; then
		rm /vol/export/software/latest-snapshot.tgz 
		ln -s snapshots/`basename $new_snap` /vol/export/software/latest-snapshot.tgz 
		echo "Error running write_code_snapshot"
		exit 1

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3