WebSVN – DevTools – Diff – /core_devl/trunk/TOOLS/jats_ccrelease.pl

     if ( $opt_extract_files )
+    {
         if ( -d $VIEWDIR )
+        {
             Message("Remove extracted files: $VIEWTAG");
-            rmtree( $VIEWDIR );
+            RmDirTree( $VIEWDIR );
+        }
+    }
     else
+    {
+        #
             ClearTool( 'rmview', $VIEWDIR );
+            #
             #   Now try to delete the directory
+            #
-            rmtree( $VIEWDIR );
+            RmDirTree( $VIEWDIR );
+        }
+        #
         #   If the view tag still exists then delete the view the hard way
         #   Use 'lsview' to locate the views uuid
     #       Create the config spec in that directory
+    #
     Verbose("Extracting files into $VIEWDIR");
     if ( -d $VIEWDIR )
+    {
-        Verbose "Delete Directory: $VIEWDIR\n";
+        Verbose "Delete existing directory: $VIEWDIR";
-        rmtree( $VIEWDIR );
+        RmDirTree( $VIEWDIR );
+    }
+    #
     #   Which config spec
     #   If we need to create it, do it within the final view
 #   Documentation
+#
 =pod
+=for htmltoc    GENERAL::ClearCase::
 =head1 NAME
 jats_ccrelease - Build a package given a clearcase label
 =head1 SYNOPSIS
 =item B<-view name>
 Specified an alternate view name and tag to be used. This option does not provide the
 full name of the view.
-    The view tag will be : "${USER}_${MACHINENAME}_${TAG}_${NAME}"
+The view tag will be : "${USER}_${MACHINENAME}_${TAG}_${NAME}"
-    The view path will be: "${USER}_${NAME}"
+The view path will be: "${USER}_${NAME}"
 The default "NAME" is the first label specified.
 The default "TAG" is build. See B<-tag=tagname>.
 If the user provides a view "name" that is prefixed with their user name
 command line. It overides the value of GBE_VIEWBASE.
 If the comamnd is invoked within a development sandbox, then the default
 location will be the root directory of the development sandbox.
-=back
 =item B<-latestroot=xxx>
 This option enables a work around for a bad-labelling practice that has existed
 in the past. This LATEST version of the named (xxx) branch will be added to
 the config spec used to create the view.
 check for its existence.
 The use of this switch will add the following lines to the config spec:
     element * .../xxx/LATEST
-    element * {label} -mkbranch xxx
+    element * label -mkbranch xxx
     element * /main/0 -mkbranch xxx
 =item B<-config=config_spec>
 This option is an alternate mechanism to create a static view. The view will be
     -label
     -branch
     -path
     -vob
 =item B<-tag=text>
 This option alters the ClearCase view tag created for the view. It allows
 the creation of multiple views based on the same label. Intended to be used in
 the automated build system to create unique views tags.
 Note: Ensure that no files are open in the view and that the users current
 working directory is not in the view as these will prevent the view from being
 deleted.
 =item B<-debugOnly>
 Make only the debug version of the package. The default it to create both the
 debug and production version of the package. The type of build may be  further
 limited by options within the package.
 This flag allows the view created by the program to be re-used.
 =over 8
+=item *
-=item 1. The view is not deleted before being populated.
+The view is not deleted before being populated.
+=item *
+The view will not be populated if it does exist.
-=item 2. The view will not be populated if it does exist.
+=item *
-=item 3. The view will not be deleted at the end the process.
+The view will not be deleted at the end the process.
 =back
 This option is useful for debugging a build process.
 various tests are performed to ensure the repeatability of the view and the
 build. These tests include:
 =over 8
+=item   *
-=item   * The view must be constructed from one label
+The view must be constructed from one label
+=item   *
-=item   * That label must be locked
+That label must be locked
+=item   *
-=item   * The labelled view must contain exactly one build file
+The labelled view must contain exactly one build file
+=item   *
-=item   * The view cannot have been re-used.
+The view cannot have been re-used.
 =back
 =item Locate build files

Subversion Repositories DevTools

(root)/core_devl/trunk/TOOLS/jats_ccrelease.pl – Rev 351 → 361