initial checkin

[SVN r25813]

tools/regression/xsl_reports/make_snapshot.py

@@ -0,0 +1,121 @@
+
+# Copyright (c) MetaCommunications, Inc. 2003-2004
+#
+# Distributed under the Boost Software License, Version 1.0. 
+# (See accompanying file LICENSE_1_0.txt or copy at 
+# http://www.boost.org/LICENSE_1_0.txt)
+
+import tarfile
+import time
+import os.path
+import string
+import sys
+
+
+def retry( f, args, max_attempts=2, sleep_secs=10 ):
+    for attempts in range( max_attempts, -1, -1 ):
+        try:
+            return f( *args )
+        except Exception, msg:
+            utils.log( '%s failed with message "%s"' % ( f.__name__, msg ) )
+            if attempts == 0: 
+                utils.log( 'Giving up.' )
+                raise
+
+            utils.log( 'Retrying (%d more attempts).' % attempts )
+            time.sleep( sleep_secs )
+
+
+def cvs_command( user, command ):
+    cmd = 'cvs -d:ext:%(user)s@cvs.sourceforge.net:/cvsroot/boost -z9 %(command)s' \
+            % { 'user': user, 'command': command }
+    
+    utils.log( 'Executing CVS command "%s"' % cmd )
+    rc = os.system( cmd )
+    if rc != 0:
+        raise Exception( 'CVS command "%s" failed with code %d' % ( cmd, rc ) )
+
+
+
+def cvs_export( working_dir, user, tag ):
+    if tag != 'CVS-HEAD':
+        command = 'export -r %s boost' % tag
+    else:
+        command = 'export boost'
+
+    os.chdir( working_dir )
+    retry( 
+         cvs_command
+       , ( user, command )
+       , max_attempts=5
+       )
+
+
+def make_tarball(
+          working_dir
+        , tag
+        , user
+        ):
+    
+    utils.log( 'Exporting files from CVS...' )
+    # cvs_export( working_dir, user, tag )
+
+    sources_dir = os.path.join( working_dir, 'boost' )    
+    timestamped_dir_name = 'boost-%s-%s' % ( tag, time.strftime( '%y-%m-%d-%H%M', time.gmtime() ) )
+    timestamped_dir = os.path.join( working_dir, timestamped_dir_name )
+
+    utils.log( 'Renaming "%s" to "%s"...' % ( sources_dir, timestamped_dir ) )
+    os.rename( sources_dir, timestamped_dir )
+
+    tarball_name = 'boost-%s.tar.bz2' % tag
+    tarball_path = os.path.join( working_dir, tarball_name )
+
+    utils.log( 'Archiving "%s" to "%s"...' % ( timestamped_dir, tarball_path ) )
+    tar = tarfile.open( tarball_path, 'w|bz2' )
+    tar.posix = False # see http://tinyurl.com/4ebd8
+
+    tar.add( timestamped_dir, timestamped_dir_name )
+    tar.close()
+
+
+def accept_args( args ):
+    args_spec = [ 
+          'working-dir='
+        , 'tag='
+        , 'user='
+        , 'help'
+        ]
+        
+    options = { 
+          '--tag': 'CVS-HEAD'
+        }
+    
+    utils.accept_args( args_spec, args, options, usage )
+        
+    return ( 
+          options[ '--working-dir' ]
+        , options[ '--tag' ]
+        , options[ '--user' ]
+        )
+
+
+def usage():
+    print 'Usage: %s [options]' % os.path.basename( sys.argv[0] )
+    print    '''
+\t--working-dir         working directory
+\t--tag                 snapshot tag (i.e. 'CVS-HEAD')
+\t--user                SourceForge user name for a CVS account
+'''
+
+def main():
+    make_tarball( *accept_args( sys.argv[ 1: ] ) )
+
+if __name__ != '__main__':  import utils
+else:
+    # in absense of relative import...
+    xsl_path = os.path.abspath( os.path.dirname( sys.argv[ 0 ] ) )
+    while os.path.basename( xsl_path ) != 'xsl_reports': xsl_path = os.path.dirname( xsl_path )
+    sys.path.append( xsl_path )
+
+    import utils
+    main()