WebSVN – DevTools – Diff – /deployfiles/trunk/src/tools/scripts/isbuild.pl

 my $opt_suffix;
 my $opt_outpath;
 my @opt_mergemodule;
 my $opt_workdir;
 my $opt_name_version = 1;
+my $opt_multi_prod = 0;
+my $opt_multi_rel = 0;
+#
 #   Kludgy values
 #       May need to be configured
 #       These are current IS 11.5 install locations
                 "version=s"     => \$opt_version,           # string
                 "out=s"         => \$opt_outpath,           # string
                 "mergemodule=s" => \@opt_mergemodule,       # string
                 "workdir=s"     => \$opt_workdir,           # string
                 "nameversion!"  => \$opt_name_version,      # [no]flag
+                "multiprod!"    => \$opt_multi_prod,        # [no]flag no by default
+                "multirel!"     => \$opt_multi_rel          # [no]flag no by default
                 );
+                #
                 #   UPDATE THE DOCUMENTATION AT THE END OF THIS FILE !!!
+                #
 #   These are found within the product config
 #   We need to locate the Release in order to build it
+#
 Verbose ("InstallShield Products");
 my $products = $dev->ISWiProductConfigs;
+# if we are building check to make sure -multiprod is enabled if more than 1 product configuration is configured
+# and/or more than 1 release per product configuration
+if ( $opt_build )
+{
+    Error("Multiple Product Configurations found, -multiprod must be specified to build them all")
+        if ( $products->Count > 1 && !$opt_multi_prod );
+    foreach my $p ( 1 .. $products->Count )
+    {
+        Error("Multiple Releases found for a Product Configuration, -multirel must be specified to build them all")
+            if ( $products->Item($p)->ISWiReleases->Count > 1 && !$opt_multi_rel );
+    }
+}
 foreach my $index ( 1 .. $products->Count )
+{
     my $product = $products->Item($index);
     Verbose ("Product Index  : " . $index );
             #   Set build location
+            #
             my $location = $opt_workdir . '/Media';
             $location =~ s~/~\\~g;
             $release->SetProperty('BuildLocation', $location );
-            Message ("BuildLocation: " . $release->BuildLocation );
+            Message ("New BuildLocation: " . $release->BuildLocation );
+            #
+            #   Massage the ProductName [ if required ]
+            #   Only update ProductName for this product Configuration if nameversion is supplied and the
+            #   product Configuration has a product Name.
+            #   This overrides the default project product name for this product Configuration.
+            #   Should contain a comma<space><version>
+            #
+            if ( $opt_name_version && $product->ProductName ne "" )
+            {
+                Verbose( "Update ProductName for this Product Configuration" );
+                Verbose( "Originial ProductName   :" . $product->ProductName);
+                my $product_name = $product->ProductName;
+                if ( $product_name =~ m/^(.*),/ )
+                {
+                    $product_name = $1;
+                }
+                $product_name .= ', ' . $opt_version . '.' . $opt_suffix;
+                $product->SetProperty('ProductName', $product_name );
+                Message( "New ProductName   :" . $product->ProductName);
+            }
+            #
+            #   Update the Product version [ if required ]
+            #   Only update Product Version for this Product Configuration if the current Product
+            #   Version has a value.
+            #   This overrides the default project version for this product Configuration.
+            #
+            if ( $product->ProductVersion ne "" )
+            {
+                Verbose( "Update ProductVersion for this Product Configuration" );
+                Verbose( "Original ProductVersion:" . $product->ProductVersion);
+                $product->SetProperty('ProductVersion', $opt_version );
+                Message ("New ProductVersion:" . $product->ProductVersion);
+            }
+            #
             #   If building with the Standalone interface will need to set
             #   up the merge module paths
+            #
             #   Set thename of the setup file
             #   This contains the build name and number
+            #
             Verbose ("Setting Setup Filename");
             Verbose2 ( "Initial SetupFileName: " . $product->SetupFileName );
-            my $setup_name = $opt_name
+            my $setup_name  = $opt_name . '-';
+               $setup_name .= $product->Name . '-' if ($opt_multi_prod);
-                           . '-'
+               $setup_name .= $release->Name . '-' if ($opt_multi_rel);
-                           . $dev->ProductVersion
+               $setup_name .= $dev->ProductVersion
-                           . '.'
+                           .  '.'
-                           . $opt_suffix
+                           .  $opt_suffix
-                           . '-WIN32';
+                           .  '-WIN32';
             $product->SetProperty('SetupFileName', $setup_name );
             Message( "SetupFileName: " . $product->SetupFileName );
+            #
             #   Transfer the result file to the user
+            #
             if ( $result_code == 0 && $opt_outpath )
+            {
                 Message("Transfer output file: $opt_outpath");
-                my$ofile = $location . "/ishield package/Release/DiskImages/DISK1/" . $setup_name . '.exe';
+                my $ofile = $location . "/" . $product->Name . "/" . $release->Name . "/DiskImages/DISK1/" . $setup_name . '.exe';
                 Error ("Build output file not found", "Expected: $ofile" ) unless ( -f $ofile );
                 File::Copy::copy( $ofile, $opt_outpath) ||
                     Error ("Did not transfer InstallShield output file", $ofile, $opt_outpath);
+            }
     -[no]readonly      - Open project in readonly mode
     -[no]standalone    - Use SA or IS automation interface
     -[no]build         - Build project
     -[no]codes         - Modify GUID codes in release
     -[no]nameversion   - Add Version info to ProductName (default)
+    -[no]multiprod     - Builds multiple product configurations (off by default)
+    -[no]multirel      - Builds multiple releases per product configuration (off by default)
 =head1 OPTIONS
 =over 8
 =item B<-nameversion>
 This option Add Version information to the Product Name.
+Additionally now if there are any Product Configurations in the Release view
+of the project that have a value in the Product Name for that configuration then
+they to will be modified in the same way.
 The default operation will add Version Information. Use -nonameversion to disable
 this operation.
+=item B<-multiprod>
+This option builds multiple product configurations from the single IS project.
+The Releases view in Installshield allows multiple Product Configurations to
+be configured and built. This must be specified if the project contains more
+than 1 Product Configuration, but can also be used with a single configuration.
+If there are multiple release for any Product Configuration then -multirel must
+be specified as well.
+This uses the Product Configuration Name, that is the name given to this Product
+Configuration that appears in the Releases tree view of Installshield.
+This name is used to modify the name to the final setup executable and is
+appended to the Project Name.  For example each product configuration will
+have a setup exe named
+   <ProjectName>-<ProductConfigName>-<Version>.<Suffix>-WIN32
+Additionally if nameversion is active and a product configuration has a Product Name
+then it to will be updated as per -nameversion option.
+=item B<-multirel>
+This option builds multiple releases per product configuration from the single
+IS project.
+The Releases view in Installshield allows multiple releases per product
+configuration to be configured and built. This must be specified if the project
+contains more than 1 release per product configuration, but can also be used
+with a single release per product configuration.
+This uses the Release Name, that is the name given to this Release for this Product
+Configuration and appears under the Product Configuration in the Releases tree view
+of Installshield.
+This name is used to modify the name to the final setup executable and is appended to
+the Project Name or Product Configuration name if -multiprod is enabled.  For example
+If -multiprod is specified as well, each release of each product configuration
+will have a setup exe named
+   <ProjectName>-<ProductConfigName>-<ReleaseName>-<Version>.<Suffix>-WIN32
+If -multiprod is Not specified, each release of the single product configuration
+will have a setup exe named
+   <ProjectName>-<ReleaseName>-<Version>.<Suffix>-WIN32
 =back
 =head1 DESCRIPTION
 This program is used within the ERG deployment process to build up an Install

Subversion Repositories DevTools

(root)/deployfiles/trunk/src/tools/scripts/isbuild.pl – Rev 1556 → 1564