1*b1cdbd2cSJim Jagielski#************************************************************** 2*b1cdbd2cSJim Jagielski# 3*b1cdbd2cSJim Jagielski# Licensed to the Apache Software Foundation (ASF) under one 4*b1cdbd2cSJim Jagielski# or more contributor license agreements. See the NOTICE file 5*b1cdbd2cSJim Jagielski# distributed with this work for additional information 6*b1cdbd2cSJim Jagielski# regarding copyright ownership. The ASF licenses this file 7*b1cdbd2cSJim Jagielski# to you under the Apache License, Version 2.0 (the 8*b1cdbd2cSJim Jagielski# "License"); you may not use this file except in compliance 9*b1cdbd2cSJim Jagielski# with the License. You may obtain a copy of the License at 10*b1cdbd2cSJim Jagielski# 11*b1cdbd2cSJim Jagielski# http://www.apache.org/licenses/LICENSE-2.0 12*b1cdbd2cSJim Jagielski# 13*b1cdbd2cSJim Jagielski# Unless required by applicable law or agreed to in writing, 14*b1cdbd2cSJim Jagielski# software distributed under the License is distributed on an 15*b1cdbd2cSJim Jagielski# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*b1cdbd2cSJim Jagielski# KIND, either express or implied. See the License for the 17*b1cdbd2cSJim Jagielski# specific language governing permissions and limitations 18*b1cdbd2cSJim Jagielski# under the License. 19*b1cdbd2cSJim Jagielski# 20*b1cdbd2cSJim Jagielski#************************************************************** 21*b1cdbd2cSJim Jagielski 22*b1cdbd2cSJim Jagielski 23*b1cdbd2cSJim Jagielski 24*b1cdbd2cSJim Jagielskipackage installer::parameter; 25*b1cdbd2cSJim Jagielski 26*b1cdbd2cSJim Jagielskiuse Cwd; 27*b1cdbd2cSJim Jagielskiuse installer::exiter; 28*b1cdbd2cSJim Jagielskiuse installer::files; 29*b1cdbd2cSJim Jagielskiuse installer::globals; 30*b1cdbd2cSJim Jagielskiuse installer::logger; 31*b1cdbd2cSJim Jagielskiuse installer::remover; 32*b1cdbd2cSJim Jagielskiuse installer::systemactions; 33*b1cdbd2cSJim Jagielskiuse strict; 34*b1cdbd2cSJim Jagielski 35*b1cdbd2cSJim Jagielski############################################ 36*b1cdbd2cSJim Jagielski# Parameter Operations 37*b1cdbd2cSJim Jagielski############################################ 38*b1cdbd2cSJim Jagielski 39*b1cdbd2cSJim Jagielskisub usage 40*b1cdbd2cSJim Jagielski{ 41*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::usage"); } 42*b1cdbd2cSJim Jagielski 43*b1cdbd2cSJim Jagielski print <<Ende; 44*b1cdbd2cSJim Jagielski-------------------------------------------------------------------------------- 45*b1cdbd2cSJim Jagielski$installer::globals::prog 46*b1cdbd2cSJim JagielskiThe following parameter are needed: 47*b1cdbd2cSJim Jagielski-f: Path to the product list (required) 48*b1cdbd2cSJim Jagielski-s: Path to the setup script (optional, if defined in product list) 49*b1cdbd2cSJim Jagielski-i: Install path of the product (/opt/openofficeorg20) (optional) 50*b1cdbd2cSJim Jagielski-p: Product from product list to be created (required) 51*b1cdbd2cSJim Jagielski-l: Language of the product (comma and hash) (optional, defined in productlist) 52*b1cdbd2cSJim Jagielski-b: Build, e.g. srx645 (optional) 53*b1cdbd2cSJim Jagielski-m: Minor, e.g. m10 (optional) 54*b1cdbd2cSJim Jagielski-simple: Path to do a simple install to 55*b1cdbd2cSJim Jagielski-c: Compiler, e.g. wntmsci8, unxlngi5, unxsols4, ... (optional) 56*b1cdbd2cSJim Jagielski-u: Path, in which zipfiles are unpacked (optional) 57*b1cdbd2cSJim Jagielski-msitemplate: Source of the msi file templates (Windows compiler only) 58*b1cdbd2cSJim Jagielski-msilanguage: Source of the msi file templates (Windows compiler only) 59*b1cdbd2cSJim Jagielski-javalanguage: Source of the Java language files (opt., non-Windows only) 60*b1cdbd2cSJim Jagielski-buildid: Current BuildID (optional) 61*b1cdbd2cSJim Jagielski-pro: Product version 62*b1cdbd2cSJim Jagielski-format: Package format 63*b1cdbd2cSJim Jagielski-debian: Create Debian packages for Linux 64*b1cdbd2cSJim Jagielski-dontunzip: do not unzip all files with flag ARCHIVE 65*b1cdbd2cSJim Jagielski-dontcallepm : do not call epm to create install sets (opt., non-Windows only) 66*b1cdbd2cSJim Jagielski-ispatchedepm : Usage of a patched (non-standard) epm (opt., non-Windows only) 67*b1cdbd2cSJim Jagielski-copyproject : is set for projects that are only used for copying (optional) 68*b1cdbd2cSJim Jagielski-languagepack : do create a languagepack, no product pack (optional) 69*b1cdbd2cSJim Jagielski-patch : do create a patch (optional) 70*b1cdbd2cSJim Jagielski-patchinc: Source for the patch include files (Solaris only) 71*b1cdbd2cSJim Jagielski-dontstrip: No file stripping (Unix only) 72*b1cdbd2cSJim Jagielski-log : Logging all available information (optional) 73*b1cdbd2cSJim Jagielski-debug : Collecting debug information 74*b1cdbd2cSJim Jagielski 75*b1cdbd2cSJim JagielskiExamples for Windows: 76*b1cdbd2cSJim Jagielski 77*b1cdbd2cSJim Jagielskiperl make_epmlist.pl -f zip.lst -p OfficeFAT -l en-US 78*b1cdbd2cSJim Jagielski -u /export/unpack -buildid 8712 79*b1cdbd2cSJim Jagielski -msitemplate /export/msi_files 80*b1cdbd2cSJim Jagielski -msilanguage /export/msi_languages 81*b1cdbd2cSJim Jagielski 82*b1cdbd2cSJim JagielskiExamples for Non-Windows: 83*b1cdbd2cSJim Jagielski 84*b1cdbd2cSJim Jagielskiperl make_epmlist.pl -f zip.lst -p OfficeFAT -l en-US -format rpm 85*b1cdbd2cSJim Jagielski -u /export/unpack -buildid 8712 -ispatchedepm 86*b1cdbd2cSJim Jagielski-------------------------------------------------------------------------------- 87*b1cdbd2cSJim JagielskiEnde 88*b1cdbd2cSJim Jagielski exit(-1); 89*b1cdbd2cSJim Jagielski} 90*b1cdbd2cSJim Jagielski 91*b1cdbd2cSJim Jagielski######################################### 92*b1cdbd2cSJim Jagielski# Writing all parameter into logfile 93*b1cdbd2cSJim Jagielski######################################### 94*b1cdbd2cSJim Jagielski 95*b1cdbd2cSJim Jagielskisub saveparameter 96*b1cdbd2cSJim Jagielski{ 97*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::saveparameter"); } 98*b1cdbd2cSJim Jagielski 99*b1cdbd2cSJim Jagielski $installer::logger::Global->printf("Command line arguments:\n"); 100*b1cdbd2cSJim Jagielski 101*b1cdbd2cSJim Jagielski my $index = 0; 102*b1cdbd2cSJim Jagielski foreach my $argument (@ARGV) 103*b1cdbd2cSJim Jagielski { 104*b1cdbd2cSJim Jagielski $installer::logger::Global->printf(" %2d: %s\n", $index++, $argument); 105*b1cdbd2cSJim Jagielski } 106*b1cdbd2cSJim Jagielski 107*b1cdbd2cSJim Jagielski # also saving global settings: 108*b1cdbd2cSJim Jagielski $installer::logger::Global->printf("Separator: %s\n", $installer::globals::separator); 109*b1cdbd2cSJim Jagielski} 110*b1cdbd2cSJim Jagielski 111*b1cdbd2cSJim Jagielski##################################### 112*b1cdbd2cSJim Jagielski# Reading parameter 113*b1cdbd2cSJim Jagielski##################################### 114*b1cdbd2cSJim Jagielski 115*b1cdbd2cSJim Jagielskisub getparameter 116*b1cdbd2cSJim Jagielski{ 117*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::getparameter"); } 118*b1cdbd2cSJim Jagielski 119*b1cdbd2cSJim Jagielski while ( $#ARGV >= 0 ) 120*b1cdbd2cSJim Jagielski { 121*b1cdbd2cSJim Jagielski my $param = shift(@ARGV); 122*b1cdbd2cSJim Jagielski 123*b1cdbd2cSJim Jagielski if ($param eq "-f") { $installer::globals::ziplistname = shift(@ARGV); } 124*b1cdbd2cSJim Jagielski elsif ($param eq "-s") { $installer::globals::setupscriptname = shift(@ARGV); } 125*b1cdbd2cSJim Jagielski elsif ($param eq "-p") { $installer::globals::product = shift(@ARGV); } 126*b1cdbd2cSJim Jagielski elsif ($param eq "-l") { $installer::globals::languagelist = shift(@ARGV); } 127*b1cdbd2cSJim Jagielski elsif ($param eq "-b") { $installer::globals::build = shift(@ARGV); } 128*b1cdbd2cSJim Jagielski elsif ($param eq "-m") { $installer::globals::minor = shift(@ARGV); } 129*b1cdbd2cSJim Jagielski elsif ($param eq "-dontunzip") { $installer::globals::dounzip = 0; } 130*b1cdbd2cSJim Jagielski elsif ($param eq "-c") { $installer::globals::compiler = shift(@ARGV); } 131*b1cdbd2cSJim Jagielski elsif ($param eq "-pro") { $installer::globals::pro = 1; } 132*b1cdbd2cSJim Jagielski elsif ($param eq "-format") { $installer::globals::packageformat = shift(@ARGV); } 133*b1cdbd2cSJim Jagielski elsif ($param eq "-log") { $installer::globals::globallogging = 1; } 134*b1cdbd2cSJim Jagielski elsif ($param eq "-quiet") { $installer::globals::quiet = 1; } 135*b1cdbd2cSJim Jagielski elsif ($param eq "-verbose") { $installer::globals::quiet = 0; } 136*b1cdbd2cSJim Jagielski elsif ($param eq "-debug") { $installer::globals::debug = 1; } 137*b1cdbd2cSJim Jagielski elsif ($param eq "-tab") { $installer::globals::tab = 1; } 138*b1cdbd2cSJim Jagielski elsif ($param eq "-u") { $installer::globals::unpackpath = shift(@ARGV); } 139*b1cdbd2cSJim Jagielski elsif ($param eq "-i") { $installer::globals::rootpath = shift(@ARGV); } 140*b1cdbd2cSJim Jagielski elsif ($param eq "-dontcallepm") { $installer::globals::call_epm = 0; } 141*b1cdbd2cSJim Jagielski elsif ($param eq "-msitemplate") { $installer::globals::idttemplatepath = shift(@ARGV); } 142*b1cdbd2cSJim Jagielski elsif ($param eq "-msilanguage") { $installer::globals::idtlanguagepath = shift(@ARGV); } 143*b1cdbd2cSJim Jagielski elsif ($param eq "-patchinc") { $installer::globals::patchincludepath = shift(@ARGV); } 144*b1cdbd2cSJim Jagielski elsif ($param eq "-javalanguage") { $installer::globals::javalanguagepath = shift(@ARGV); } 145*b1cdbd2cSJim Jagielski elsif ($param eq "-buildid") { $installer::globals::buildid = shift(@ARGV); } 146*b1cdbd2cSJim Jagielski elsif ($param eq "-copyproject") { $installer::globals::is_copy_only_project = 1; } 147*b1cdbd2cSJim Jagielski elsif ($param eq "-languagepack") { $installer::globals::languagepack = 1; } 148*b1cdbd2cSJim Jagielski elsif ($param eq "-patch") { $installer::globals::patch = 1; } 149*b1cdbd2cSJim Jagielski elsif ($param eq "-debian") { $installer::globals::debian = 1; } 150*b1cdbd2cSJim Jagielski elsif ($param eq "-dontstrip") { $installer::globals::strip = 0; } 151*b1cdbd2cSJim Jagielski elsif ($param eq "-destdir") # new parameter for simple installer 152*b1cdbd2cSJim Jagielski { 153*b1cdbd2cSJim Jagielski $installer::globals::rootpath ne "" && die "must set destdir before -i or -simple"; 154*b1cdbd2cSJim Jagielski $installer::globals::destdir = shift @ARGV; 155*b1cdbd2cSJim Jagielski } 156*b1cdbd2cSJim Jagielski elsif ($param eq "-simple") # new parameter for simple installer 157*b1cdbd2cSJim Jagielski { 158*b1cdbd2cSJim Jagielski $installer::globals::simple = 1; 159*b1cdbd2cSJim Jagielski $installer::globals::call_epm = 0; 160*b1cdbd2cSJim Jagielski $installer::globals::makedownload = 0; 161*b1cdbd2cSJim Jagielski $installer::globals::makejds = 0; 162*b1cdbd2cSJim Jagielski $installer::globals::strip = 0; 163*b1cdbd2cSJim Jagielski my $path = shift(@ARGV); 164*b1cdbd2cSJim Jagielski $path =~ s/^\Q$installer::globals::destdir\E//; 165*b1cdbd2cSJim Jagielski $installer::globals::rootpath = $path; 166*b1cdbd2cSJim Jagielski } 167*b1cdbd2cSJim Jagielski elsif ($param eq "-release") 168*b1cdbd2cSJim Jagielski { 169*b1cdbd2cSJim Jagielski $installer::globals::is_release = 1; 170*b1cdbd2cSJim Jagielski } 171*b1cdbd2cSJim Jagielski else 172*b1cdbd2cSJim Jagielski { 173*b1cdbd2cSJim Jagielski installer::logger::print_error( "unknown parameter: $param" ); 174*b1cdbd2cSJim Jagielski usage(); 175*b1cdbd2cSJim Jagielski exit(-1); 176*b1cdbd2cSJim Jagielski } 177*b1cdbd2cSJim Jagielski } 178*b1cdbd2cSJim Jagielski 179*b1cdbd2cSJim Jagielski # Usage of simple installer (not for Windows): 180*b1cdbd2cSJim Jagielski # $PERL -w $SOLARENV/bin/make_installer.pl \ 181*b1cdbd2cSJim Jagielski # -f openoffice.lst -l en-US -p OpenOffice \ 182*b1cdbd2cSJim Jagielski # -buildid $BUILD -rpm \ 183*b1cdbd2cSJim Jagielski # -destdir /tmp/nurk -simple $INSTALL_PATH 184*b1cdbd2cSJim Jagielski} 185*b1cdbd2cSJim Jagielski 186*b1cdbd2cSJim Jagielski############################################ 187*b1cdbd2cSJim Jagielski# Controlling the fundamental parameter 188*b1cdbd2cSJim Jagielski# (required for every process) 189*b1cdbd2cSJim Jagielski############################################ 190*b1cdbd2cSJim Jagielski 191*b1cdbd2cSJim Jagielskisub control_fundamental_parameter 192*b1cdbd2cSJim Jagielski{ 193*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::control_fundamental_parameter"); } 194*b1cdbd2cSJim Jagielski 195*b1cdbd2cSJim Jagielski if ($installer::globals::product eq "") 196*b1cdbd2cSJim Jagielski { 197*b1cdbd2cSJim Jagielski installer::logger::print_error( "Product name not set!" ); 198*b1cdbd2cSJim Jagielski usage(); 199*b1cdbd2cSJim Jagielski exit(-1); 200*b1cdbd2cSJim Jagielski } 201*b1cdbd2cSJim Jagielski} 202*b1cdbd2cSJim Jagielski 203*b1cdbd2cSJim Jagielski########################################################## 204*b1cdbd2cSJim Jagielski# The path parameters can be relative or absolute. 205*b1cdbd2cSJim Jagielski# This function creates absolute pathes. 206*b1cdbd2cSJim Jagielski########################################################## 207*b1cdbd2cSJim Jagielski 208*b1cdbd2cSJim Jagielskisub make_path_absolute 209*b1cdbd2cSJim Jagielski{ 210*b1cdbd2cSJim Jagielski my ($pathref) = @_; 211*b1cdbd2cSJim Jagielski 212*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::make_path_absolute : $$pathref"); } 213*b1cdbd2cSJim Jagielski 214*b1cdbd2cSJim Jagielski if ( $installer::globals::isunix ) 215*b1cdbd2cSJim Jagielski { 216*b1cdbd2cSJim Jagielski if (!($$pathref =~ /^\s*\//)) # this is a relative unix path 217*b1cdbd2cSJim Jagielski { 218*b1cdbd2cSJim Jagielski $$pathref = cwd() . $installer::globals::separator . $$pathref; 219*b1cdbd2cSJim Jagielski } 220*b1cdbd2cSJim Jagielski } 221*b1cdbd2cSJim Jagielski 222*b1cdbd2cSJim Jagielski if ( $installer::globals::iswin || $installer::globals::isos2 ) 223*b1cdbd2cSJim Jagielski { 224*b1cdbd2cSJim Jagielski if ( $^O =~ /cygwin/i ) 225*b1cdbd2cSJim Jagielski { 226*b1cdbd2cSJim Jagielski if ( $$pathref !~ /^\s*\// && $$pathref !~ /^\s*\w\:/ ) # not an absolute POSIX or DOS path 227*b1cdbd2cSJim Jagielski { 228*b1cdbd2cSJim Jagielski $$pathref = cwd() . $installer::globals::separator . $$pathref; 229*b1cdbd2cSJim Jagielski } 230*b1cdbd2cSJim Jagielski my $p = $$pathref; 231*b1cdbd2cSJim Jagielski chomp( $p ); 232*b1cdbd2cSJim Jagielski my $q = ''; 233*b1cdbd2cSJim Jagielski # Avoid the $(LANG) problem. 234*b1cdbd2cSJim Jagielski if ($p =~ /(\A.*)(\$\(.*\Z)/) { 235*b1cdbd2cSJim Jagielski $p = $1; 236*b1cdbd2cSJim Jagielski $q = $2; 237*b1cdbd2cSJim Jagielski } 238*b1cdbd2cSJim Jagielski $p =~ s/\\/\\\\/g; 239*b1cdbd2cSJim Jagielski chomp( $p = qx{cygpath -w "$p"} ); 240*b1cdbd2cSJim Jagielski $$pathref = $p.$q; 241*b1cdbd2cSJim Jagielski # Use windows paths, but with '/'s. 242*b1cdbd2cSJim Jagielski $$pathref =~ s/\\/\//g; 243*b1cdbd2cSJim Jagielski } 244*b1cdbd2cSJim Jagielski else 245*b1cdbd2cSJim Jagielski { 246*b1cdbd2cSJim Jagielski if (!($$pathref =~ /^\s*\w\:/)) # this is a relative windows path (no dos drive) 247*b1cdbd2cSJim Jagielski { 248*b1cdbd2cSJim Jagielski $$pathref = cwd() . $installer::globals::separator . $$pathref; 249*b1cdbd2cSJim Jagielski if ( $installer::globals::isos2 ) 250*b1cdbd2cSJim Jagielski { 251*b1cdbd2cSJim Jagielski $$pathref =~ s/\\/\//g; 252*b1cdbd2cSJim Jagielski } 253*b1cdbd2cSJim Jagielski else 254*b1cdbd2cSJim Jagielski { 255*b1cdbd2cSJim Jagielski $$pathref =~ s/\//\\/g; 256*b1cdbd2cSJim Jagielski } 257*b1cdbd2cSJim Jagielski 258*b1cdbd2cSJim Jagielski } 259*b1cdbd2cSJim Jagielski } 260*b1cdbd2cSJim Jagielski } 261*b1cdbd2cSJim Jagielski $$pathref =~ s/[\/\\]\s*$//; # removing ending slashes 262*b1cdbd2cSJim Jagielski} 263*b1cdbd2cSJim Jagielski 264*b1cdbd2cSJim Jagielski################################################## 265*b1cdbd2cSJim Jagielski# Setting some global parameters 266*b1cdbd2cSJim Jagielski# This has to be expanded with furher platforms 267*b1cdbd2cSJim Jagielski################################################## 268*b1cdbd2cSJim Jagielski 269*b1cdbd2cSJim Jagielskisub setglobalvariables 270*b1cdbd2cSJim Jagielski{ 271*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::setglobalvariables"); } 272*b1cdbd2cSJim Jagielski 273*b1cdbd2cSJim Jagielski # Setting the installertype directory corresponding to the environment variable PKGFORMAT 274*b1cdbd2cSJim Jagielski # The global variable $installer::globals::packageformat can only contain one package format. 275*b1cdbd2cSJim Jagielski # If PKGFORMAT cotains more than one format (for example "rpm deb") this is splitted in the 276*b1cdbd2cSJim Jagielski # makefile calling the perl program. 277*b1cdbd2cSJim Jagielski $installer::globals::installertypedir = $installer::globals::packageformat; 278*b1cdbd2cSJim Jagielski 279*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /wnt(msc|gcc)i/ ) 280*b1cdbd2cSJim Jagielski { 281*b1cdbd2cSJim Jagielski $installer::globals::iswindowsbuild = 1; 282*b1cdbd2cSJim Jagielski } 283*b1cdbd2cSJim Jagielski 284*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxso[lg][siux]/ ) 285*b1cdbd2cSJim Jagielski { 286*b1cdbd2cSJim Jagielski $installer::globals::issolarisbuild = 1; 287*b1cdbd2cSJim Jagielski if ( $installer::globals::packageformat eq "pkg" ) 288*b1cdbd2cSJim Jagielski { 289*b1cdbd2cSJim Jagielski $installer::globals::issolarispkgbuild = 1; 290*b1cdbd2cSJim Jagielski $installer::globals::epmoutpath = "packages"; 291*b1cdbd2cSJim Jagielski $installer::globals::isxpdplatform = 1; 292*b1cdbd2cSJim Jagielski } 293*b1cdbd2cSJim Jagielski } 294*b1cdbd2cSJim Jagielski 295*b1cdbd2cSJim Jagielski if( $installer::globals::compiler =~ /unxmac/ ) 296*b1cdbd2cSJim Jagielski { 297*b1cdbd2cSJim Jagielski $installer::globals::ismacbuild = 1; 298*b1cdbd2cSJim Jagielski 299*b1cdbd2cSJim Jagielski if ( $installer::globals::packageformat eq "dmg" ) 300*b1cdbd2cSJim Jagielski { 301*b1cdbd2cSJim Jagielski $installer::globals::ismacdmgbuild = 1; 302*b1cdbd2cSJim Jagielski } 303*b1cdbd2cSJim Jagielski } 304*b1cdbd2cSJim Jagielski 305*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxfbsd/ ) 306*b1cdbd2cSJim Jagielski { 307*b1cdbd2cSJim Jagielski $installer::globals::isfreebsdbuild = 1; 308*b1cdbd2cSJim Jagielski 309*b1cdbd2cSJim Jagielski if ( $installer::globals::packageformat eq "bsd" ) 310*b1cdbd2cSJim Jagielski { 311*b1cdbd2cSJim Jagielski $installer::globals::epmoutpath = "freebsd"; 312*b1cdbd2cSJim Jagielski $installer::globals::isfreebsdpkgbuild = 1; 313*b1cdbd2cSJim Jagielski } 314*b1cdbd2cSJim Jagielski } 315*b1cdbd2cSJim Jagielski 316*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxso[lg]s/ ) { $installer::globals::issolarissparcbuild = 1; } 317*b1cdbd2cSJim Jagielski 318*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxso[lg]i/ ) { $installer::globals::issolarisx86build = 1; } 319*b1cdbd2cSJim Jagielski 320*b1cdbd2cSJim Jagielski if ($ENV{OS} eq 'LINUX') 321*b1cdbd2cSJim Jagielski { 322*b1cdbd2cSJim Jagielski $installer::globals::islinuxbuild = 1; 323*b1cdbd2cSJim Jagielski if ( $installer::globals::packageformat eq "rpm" ) 324*b1cdbd2cSJim Jagielski { 325*b1cdbd2cSJim Jagielski $installer::globals::islinuxrpmbuild = 1; 326*b1cdbd2cSJim Jagielski $installer::globals::isxpdplatform = 1; 327*b1cdbd2cSJim Jagielski $installer::globals::epmoutpath = "RPMS"; 328*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxlngi/ ) 329*b1cdbd2cSJim Jagielski { 330*b1cdbd2cSJim Jagielski $installer::globals::islinuxintelrpmbuild = 1; 331*b1cdbd2cSJim Jagielski } 332*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxlngppc/ ) 333*b1cdbd2cSJim Jagielski { 334*b1cdbd2cSJim Jagielski $installer::globals::islinuxppcrpmbuild = 1; 335*b1cdbd2cSJim Jagielski } 336*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxlngx/ ) 337*b1cdbd2cSJim Jagielski { 338*b1cdbd2cSJim Jagielski $installer::globals::islinuxx86_64rpmbuild = 1; 339*b1cdbd2cSJim Jagielski } 340*b1cdbd2cSJim Jagielski 341*b1cdbd2cSJim Jagielski if ( $installer::globals::rpm eq "" ) { installer::exiter::exit_program("ERROR: Environment variable \"\$RPM\" has to be defined!", "setglobalvariables"); } 342*b1cdbd2cSJim Jagielski } 343*b1cdbd2cSJim Jagielski 344*b1cdbd2cSJim Jagielski # Creating Debian packages ? 345*b1cdbd2cSJim Jagielski if (( $installer::globals::packageformat eq "deb" ) || ( $installer::globals::debian )) 346*b1cdbd2cSJim Jagielski { 347*b1cdbd2cSJim Jagielski $installer::globals::debian = 1; 348*b1cdbd2cSJim Jagielski $installer::globals::packageformat = "deb"; 349*b1cdbd2cSJim Jagielski my $message = "Creating Debian packages"; 350*b1cdbd2cSJim Jagielski $installer::logger::Info->print($message); 351*b1cdbd2cSJim Jagielski $installer::logger::Global->print($message); 352*b1cdbd2cSJim Jagielski $installer::globals::islinuxrpmbuild = 0; 353*b1cdbd2cSJim Jagielski $installer::globals::islinuxdebbuild = 1; 354*b1cdbd2cSJim Jagielski $installer::globals::epmoutpath = "DEBS"; 355*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxlngi/ ) 356*b1cdbd2cSJim Jagielski { 357*b1cdbd2cSJim Jagielski $installer::globals::islinuxinteldebbuild = 1; 358*b1cdbd2cSJim Jagielski } 359*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxlngppc/ ) 360*b1cdbd2cSJim Jagielski { 361*b1cdbd2cSJim Jagielski $installer::globals::islinuxppcdebbuild = 1; 362*b1cdbd2cSJim Jagielski } 363*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /unxlngx/ ) 364*b1cdbd2cSJim Jagielski { 365*b1cdbd2cSJim Jagielski $installer::globals::islinuxx86_64debbuild = 1; 366*b1cdbd2cSJim Jagielski } 367*b1cdbd2cSJim Jagielski } 368*b1cdbd2cSJim Jagielski } 369*b1cdbd2cSJim Jagielski 370*b1cdbd2cSJim Jagielski # Defaulting to native package format for epm 371*b1cdbd2cSJim Jagielski 372*b1cdbd2cSJim Jagielski if ( ! $installer::globals::packageformat ) { $installer::globals::packageformat = "native"; } 373*b1cdbd2cSJim Jagielski 374*b1cdbd2cSJim Jagielski # extension, if $installer::globals::pro is set 375*b1cdbd2cSJim Jagielski if ($installer::globals::pro) { $installer::globals::productextension = ".pro"; } 376*b1cdbd2cSJim Jagielski 377*b1cdbd2cSJim Jagielski # no languages defined as parameter 378*b1cdbd2cSJim Jagielski if ($installer::globals::languagelist eq "") { $installer::globals::languages_defined_in_productlist = 1; } 379*b1cdbd2cSJim Jagielski 380*b1cdbd2cSJim Jagielski # setting and creating the unpackpath 381*b1cdbd2cSJim Jagielski 382*b1cdbd2cSJim Jagielski if ($installer::globals::unpackpath eq "") # unpackpath not set 383*b1cdbd2cSJim Jagielski { 384*b1cdbd2cSJim Jagielski $installer::globals::unpackpath = cwd(); 385*b1cdbd2cSJim Jagielski if ( $installer::globals::iswin ) { $installer::globals::unpackpath =~ s/\//\\/g; } 386*b1cdbd2cSJim Jagielski if ( $installer::globals::isos2 ) { $installer::globals::unpackpath =~ s/\\/\//g; } 387*b1cdbd2cSJim Jagielski } 388*b1cdbd2cSJim Jagielski 389*b1cdbd2cSJim Jagielski if ( $installer::globals::localunpackdir ne "" ) { $installer::globals::unpackpath = $installer::globals::localunpackdir; } 390*b1cdbd2cSJim Jagielski 391*b1cdbd2cSJim Jagielski if (!($installer::globals::unpackpath eq "")) 392*b1cdbd2cSJim Jagielski { 393*b1cdbd2cSJim Jagielski make_path_absolute(\$installer::globals::unpackpath); 394*b1cdbd2cSJim Jagielski } 395*b1cdbd2cSJim Jagielski 396*b1cdbd2cSJim Jagielski $installer::globals::unpackpath =~ s/\Q$installer::globals::separator\E\s*$//; 397*b1cdbd2cSJim Jagielski 398*b1cdbd2cSJim Jagielski if (! -d $installer::globals::unpackpath ) # create unpackpath 399*b1cdbd2cSJim Jagielski { 400*b1cdbd2cSJim Jagielski installer::systemactions::create_directory($installer::globals::unpackpath); 401*b1cdbd2cSJim Jagielski } 402*b1cdbd2cSJim Jagielski 403*b1cdbd2cSJim Jagielski # setting jds exclude file list 404*b1cdbd2cSJim Jagielski 405*b1cdbd2cSJim Jagielski if ( $installer::globals::islinuxrpmbuild ) 406*b1cdbd2cSJim Jagielski { 407*b1cdbd2cSJim Jagielski $installer::globals::jdsexcludefilename = "jds_excludefiles_linux.txt"; 408*b1cdbd2cSJim Jagielski } 409*b1cdbd2cSJim Jagielski if ( $installer::globals::issolarissparcbuild ) 410*b1cdbd2cSJim Jagielski { 411*b1cdbd2cSJim Jagielski $installer::globals::jdsexcludefilename = "jds_excludefiles_solaris_sparc.txt"; 412*b1cdbd2cSJim Jagielski } 413*b1cdbd2cSJim Jagielski if ( $installer::globals::issolarisx86build ) 414*b1cdbd2cSJim Jagielski { 415*b1cdbd2cSJim Jagielski $installer::globals::jdsexcludefilename = "jds_excludefiles_solaris_intel.txt"; 416*b1cdbd2cSJim Jagielski } 417*b1cdbd2cSJim Jagielski 418*b1cdbd2cSJim Jagielski # setting and creating the temppath 419*b1cdbd2cSJim Jagielski 420*b1cdbd2cSJim Jagielski if (( $ENV{'TMP'} ) || ( $ENV{'TEMP'} ) || ( $ENV{'TMPDIR'} )) 421*b1cdbd2cSJim Jagielski { 422*b1cdbd2cSJim Jagielski if ( $ENV{'TMP'} ) { $installer::globals::temppath = $ENV{'TMP'}; } 423*b1cdbd2cSJim Jagielski elsif ( $ENV{'TEMP'} ) { $installer::globals::temppath = $ENV{'TEMP'}; } 424*b1cdbd2cSJim Jagielski elsif ( $ENV{'TMPDIR'} ) { $installer::globals::temppath = $ENV{'TMPDIR'}; } 425*b1cdbd2cSJim Jagielski $installer::globals::temppath =~ s/\Q$installer::globals::separator\E\s*$//; # removing ending slashes and backslashes 426*b1cdbd2cSJim Jagielski $installer::globals::temppath = $installer::globals::temppath . $installer::globals::separator . $installer::globals::globaltempdirname; 427*b1cdbd2cSJim Jagielski installer::systemactions::create_directory_with_privileges($installer::globals::temppath, "777"); 428*b1cdbd2cSJim Jagielski my $dirsave = $installer::globals::temppath; 429*b1cdbd2cSJim Jagielski 430*b1cdbd2cSJim Jagielski if ( $installer::globals::compiler =~ /^unxmac/ ) 431*b1cdbd2cSJim Jagielski { 432*b1cdbd2cSJim Jagielski my $localcall = "chmod 777 $installer::globals::temppath \>\/dev\/null 2\>\&1"; 433*b1cdbd2cSJim Jagielski system($localcall); 434*b1cdbd2cSJim Jagielski } 435*b1cdbd2cSJim Jagielski 436*b1cdbd2cSJim Jagielski $installer::globals::temppath = $installer::globals::temppath . $installer::globals::separator . "i"; 437*b1cdbd2cSJim Jagielski $installer::globals::temppath = installer::systemactions::create_pid_directory($installer::globals::temppath); 438*b1cdbd2cSJim Jagielski push(@installer::globals::removedirs, $installer::globals::temppath); 439*b1cdbd2cSJim Jagielski 440*b1cdbd2cSJim Jagielski if ( ! -d $installer::globals::temppath ) { installer::exiter::exit_program("ERROR: Failed to create directory $installer::globals::temppath ! Possible reason: Wrong privileges in directory $dirsave .", "setglobalvariables"); } 441*b1cdbd2cSJim Jagielski 442*b1cdbd2cSJim Jagielski $installer::globals::jdstemppath = $installer::globals::temppath; 443*b1cdbd2cSJim Jagielski $installer::globals::jdstemppath =~ s/i_/j_/; 444*b1cdbd2cSJim Jagielski push(@installer::globals::jdsremovedirs, $installer::globals::jdstemppath); 445*b1cdbd2cSJim Jagielski $installer::globals::temppath = $installer::globals::temppath . $installer::globals::separator . $installer::globals::compiler . $installer::globals::productextension; 446*b1cdbd2cSJim Jagielski installer::systemactions::create_directory($installer::globals::temppath); 447*b1cdbd2cSJim Jagielski if ( $^O =~ /cygwin/i ) 448*b1cdbd2cSJim Jagielski { 449*b1cdbd2cSJim Jagielski $installer::globals::cyg_temppath = $installer::globals::temppath; 450*b1cdbd2cSJim Jagielski $installer::globals::cyg_temppath =~ s/\\/\\\\/g; 451*b1cdbd2cSJim Jagielski chomp( $installer::globals::cyg_temppath = qx{cygpath -w "$installer::globals::cyg_temppath"} ); 452*b1cdbd2cSJim Jagielski } 453*b1cdbd2cSJim Jagielski $installer::globals::temppathdefined = 1; 454*b1cdbd2cSJim Jagielski $installer::globals::jdstemppathdefined = 1; 455*b1cdbd2cSJim Jagielski } 456*b1cdbd2cSJim Jagielski else 457*b1cdbd2cSJim Jagielski { 458*b1cdbd2cSJim Jagielski $installer::globals::temppathdefined = 0; 459*b1cdbd2cSJim Jagielski $installer::globals::jdstemppathdefined = 0; 460*b1cdbd2cSJim Jagielski } 461*b1cdbd2cSJim Jagielski 462*b1cdbd2cSJim Jagielski # only one cab file, if Windows msp patches shall be prepared 463*b1cdbd2cSJim Jagielski if ( $installer::globals::prepare_winpatch ) { $installer::globals::number_of_cabfiles = 1; } 464*b1cdbd2cSJim Jagielski 465*b1cdbd2cSJim Jagielski} 466*b1cdbd2cSJim Jagielski 467*b1cdbd2cSJim Jagielski############################################ 468*b1cdbd2cSJim Jagielski# Controlling the parameter that are 469*b1cdbd2cSJim Jagielski# required for special processes 470*b1cdbd2cSJim Jagielski############################################ 471*b1cdbd2cSJim Jagielski 472*b1cdbd2cSJim Jagielskisub control_required_parameter 473*b1cdbd2cSJim Jagielski{ 474*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::control_required_parameter"); } 475*b1cdbd2cSJim Jagielski 476*b1cdbd2cSJim Jagielski if (!($installer::globals::is_copy_only_project)) 477*b1cdbd2cSJim Jagielski { 478*b1cdbd2cSJim Jagielski ############################################################################################## 479*b1cdbd2cSJim Jagielski # idt template path. Only required for Windows build ($installer::globals::compiler =~ /wntmsci/) 480*b1cdbd2cSJim Jagielski # for the creation of the msi database. 481*b1cdbd2cSJim Jagielski ############################################################################################## 482*b1cdbd2cSJim Jagielski 483*b1cdbd2cSJim Jagielski if (($installer::globals::idttemplatepath eq "") && ($installer::globals::iswindowsbuild)) 484*b1cdbd2cSJim Jagielski { 485*b1cdbd2cSJim Jagielski installer::logger::print_error( "idt template path not set (-msitemplate)!" ); 486*b1cdbd2cSJim Jagielski usage(); 487*b1cdbd2cSJim Jagielski exit(-1); 488*b1cdbd2cSJim Jagielski } 489*b1cdbd2cSJim Jagielski 490*b1cdbd2cSJim Jagielski ############################################################################################## 491*b1cdbd2cSJim Jagielski # idt language path. Only required for Windows build ($installer::globals::compiler =~ /wntmsci/) 492*b1cdbd2cSJim Jagielski # for the creation of the msi database. 493*b1cdbd2cSJim Jagielski ############################################################################################## 494*b1cdbd2cSJim Jagielski 495*b1cdbd2cSJim Jagielski if (($installer::globals::idtlanguagepath eq "") && ($installer::globals::iswindowsbuild)) 496*b1cdbd2cSJim Jagielski { 497*b1cdbd2cSJim Jagielski installer::logger::print_error( "idt language path not set (-msilanguage)!" ); 498*b1cdbd2cSJim Jagielski usage(); 499*b1cdbd2cSJim Jagielski exit(-1); 500*b1cdbd2cSJim Jagielski } 501*b1cdbd2cSJim Jagielski 502*b1cdbd2cSJim Jagielski # Analyzing the idt template path 503*b1cdbd2cSJim Jagielski 504*b1cdbd2cSJim Jagielski if (!($installer::globals::idttemplatepath eq "")) # idttemplatepath set, relative or absolute? 505*b1cdbd2cSJim Jagielski { 506*b1cdbd2cSJim Jagielski make_path_absolute(\$installer::globals::idttemplatepath); 507*b1cdbd2cSJim Jagielski } 508*b1cdbd2cSJim Jagielski 509*b1cdbd2cSJim Jagielski installer::remover::remove_ending_pathseparator(\$installer::globals::idttemplatepath); 510*b1cdbd2cSJim Jagielski 511*b1cdbd2cSJim Jagielski # Analyzing the idt language path 512*b1cdbd2cSJim Jagielski 513*b1cdbd2cSJim Jagielski if (!($installer::globals::idtlanguagepath eq "")) # idtlanguagepath set, relative or absolute? 514*b1cdbd2cSJim Jagielski { 515*b1cdbd2cSJim Jagielski make_path_absolute(\$installer::globals::idtlanguagepath); 516*b1cdbd2cSJim Jagielski } 517*b1cdbd2cSJim Jagielski 518*b1cdbd2cSJim Jagielski installer::remover::remove_ending_pathseparator(\$installer::globals::idtlanguagepath); 519*b1cdbd2cSJim Jagielski 520*b1cdbd2cSJim Jagielski # In the msi template directory a files "codes.txt" has to exist, in which the ProductCode 521*b1cdbd2cSJim Jagielski # and the UpgradeCode for the product are defined. 522*b1cdbd2cSJim Jagielski # The name "codes.txt" can be overwritten in Product definition with CODEFILENAME (msiglobal.pm) 523*b1cdbd2cSJim Jagielski 524*b1cdbd2cSJim Jagielski if (( $installer::globals::iswindowsbuild ) && ( $installer::globals::packageformat ne "archive" ) && ( $installer::globals::packageformat ne "installed" )) 525*b1cdbd2cSJim Jagielski { 526*b1cdbd2cSJim Jagielski $installer::globals::codefilename = $installer::globals::idttemplatepath . $installer::globals::separator . $installer::globals::codefilename; 527*b1cdbd2cSJim Jagielski installer::files::check_file($installer::globals::codefilename); 528*b1cdbd2cSJim Jagielski $installer::globals::componentfilename = $installer::globals::idttemplatepath . $installer::globals::separator . $installer::globals::componentfilename; 529*b1cdbd2cSJim Jagielski installer::files::check_file($installer::globals::componentfilename); 530*b1cdbd2cSJim Jagielski } 531*b1cdbd2cSJim Jagielski 532*b1cdbd2cSJim Jagielski } 533*b1cdbd2cSJim Jagielski 534*b1cdbd2cSJim Jagielski ####################################### 535*b1cdbd2cSJim Jagielski # Patch currently only available 536*b1cdbd2cSJim Jagielski # for Solaris packages and Linux 537*b1cdbd2cSJim Jagielski ####################################### 538*b1cdbd2cSJim Jagielski 539*b1cdbd2cSJim Jagielski if (( $installer::globals::patch ) && ( ! $installer::globals::issolarispkgbuild ) && ( ! $installer::globals::islinuxrpmbuild ) && ( ! $installer::globals::islinuxdebbuild ) && ( ! $installer::globals::iswindowsbuild ) && ( ! $installer::globals::ismacdmgbuild )) 540*b1cdbd2cSJim Jagielski { 541*b1cdbd2cSJim Jagielski installer::logger::print_error( "Sorry, Patch flag currently only available for Solaris pkg, Linux RPM and Windows builds!" ); 542*b1cdbd2cSJim Jagielski usage(); 543*b1cdbd2cSJim Jagielski exit(-1); 544*b1cdbd2cSJim Jagielski } 545*b1cdbd2cSJim Jagielski 546*b1cdbd2cSJim Jagielski if (( $installer::globals::patch ) && ( $installer::globals::issolarispkgbuild ) && ( ! $installer::globals::patchincludepath )) 547*b1cdbd2cSJim Jagielski { 548*b1cdbd2cSJim Jagielski installer::logger::print_error( "Solaris patch requires parameter -patchinc !" ); 549*b1cdbd2cSJim Jagielski usage(); 550*b1cdbd2cSJim Jagielski exit(-1); 551*b1cdbd2cSJim Jagielski } 552*b1cdbd2cSJim Jagielski 553*b1cdbd2cSJim Jagielski if (( $installer::globals::patch ) && ( $installer::globals::issolarispkgbuild ) && ( $installer::globals::patchincludepath )) 554*b1cdbd2cSJim Jagielski { 555*b1cdbd2cSJim Jagielski make_path_absolute(\$installer::globals::patchincludepath); 556*b1cdbd2cSJim Jagielski $installer::globals::patchincludepath = installer::converter::make_path_conform($installer::globals::patchincludepath); 557*b1cdbd2cSJim Jagielski } 558*b1cdbd2cSJim Jagielski 559*b1cdbd2cSJim Jagielski ####################################### 560*b1cdbd2cSJim Jagielski # Testing existence of files 561*b1cdbd2cSJim Jagielski # also for copy-only projects 562*b1cdbd2cSJim Jagielski ####################################### 563*b1cdbd2cSJim Jagielski 564*b1cdbd2cSJim Jagielski if ($installer::globals::ziplistname eq "") 565*b1cdbd2cSJim Jagielski { 566*b1cdbd2cSJim Jagielski installer::logger::print_error( "ERROR: Zip list file has to be defined (Parameter -f) !" ); 567*b1cdbd2cSJim Jagielski usage(); 568*b1cdbd2cSJim Jagielski exit(-1); 569*b1cdbd2cSJim Jagielski } 570*b1cdbd2cSJim Jagielski else 571*b1cdbd2cSJim Jagielski { 572*b1cdbd2cSJim Jagielski installer::files::check_file($installer::globals::ziplistname); 573*b1cdbd2cSJim Jagielski } 574*b1cdbd2cSJim Jagielski 575*b1cdbd2cSJim Jagielski if ($installer::globals::setupscriptname eq "") { $installer::globals::setupscript_defined_in_productlist = 1; } 576*b1cdbd2cSJim Jagielski else { installer::files::check_file($installer::globals::setupscriptname); } # if the setupscript file is defined, it has to exist 577*b1cdbd2cSJim Jagielski 578*b1cdbd2cSJim Jagielski} 579*b1cdbd2cSJim Jagielski 580*b1cdbd2cSJim Jagielski################################################ 581*b1cdbd2cSJim Jagielski# Writing parameter to shell and into logfile 582*b1cdbd2cSJim Jagielski################################################ 583*b1cdbd2cSJim Jagielski 584*b1cdbd2cSJim Jagielskisub outputparameter () 585*b1cdbd2cSJim Jagielski{ 586*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::parameter::outputparameter"); } 587*b1cdbd2cSJim Jagielski 588*b1cdbd2cSJim Jagielski my @output = (); 589*b1cdbd2cSJim Jagielski 590*b1cdbd2cSJim Jagielski push(@output, "\n"); 591*b1cdbd2cSJim Jagielski push(@output, "########################################################\n"); 592*b1cdbd2cSJim Jagielski push(@output, "$installer::globals::prog, version 1.0\n"); 593*b1cdbd2cSJim Jagielski push(@output, "Product list file: $installer::globals::ziplistname\n"); 594*b1cdbd2cSJim Jagielski if (!($installer::globals::setupscript_defined_in_productlist)) 595*b1cdbd2cSJim Jagielski { 596*b1cdbd2cSJim Jagielski push(@output, "Setup script: $installer::globals::setupscriptname\n"); 597*b1cdbd2cSJim Jagielski } 598*b1cdbd2cSJim Jagielski else 599*b1cdbd2cSJim Jagielski { 600*b1cdbd2cSJim Jagielski push(@output, "Taking setup script from solver\n"); 601*b1cdbd2cSJim Jagielski } 602*b1cdbd2cSJim Jagielski push(@output, "Unpackpath: $installer::globals::unpackpath\n"); 603*b1cdbd2cSJim Jagielski push(@output, "Compiler: $installer::globals::compiler\n"); 604*b1cdbd2cSJim Jagielski push(@output, "Product: $installer::globals::product\n"); 605*b1cdbd2cSJim Jagielski push(@output, "BuildID: $installer::globals::buildid\n"); 606*b1cdbd2cSJim Jagielski push(@output, "Build: $installer::globals::build\n"); 607*b1cdbd2cSJim Jagielski if ( $installer::globals::minor ) { push(@output, "Minor: $installer::globals::minor\n"); } 608*b1cdbd2cSJim Jagielski else { push(@output, "No minor set\n"); } 609*b1cdbd2cSJim Jagielski if ( $installer::globals::pro ) { push(@output, "Product version\n"); } 610*b1cdbd2cSJim Jagielski else { push(@output, "Non-Product version\n"); } 611*b1cdbd2cSJim Jagielski if ( $installer::globals::rootpath eq "" ) { push(@output, "Using default installpath\n"); } 612*b1cdbd2cSJim Jagielski else { push(@output, "Installpath: $installer::globals::rootpath\n"); } 613*b1cdbd2cSJim Jagielski push(@output, "Package format: $installer::globals::packageformat\n"); 614*b1cdbd2cSJim Jagielski if (!($installer::globals::idttemplatepath eq "")) { push(@output, "msi templatepath: $installer::globals::idttemplatepath\n"); } 615*b1cdbd2cSJim Jagielski if ((!($installer::globals::idttemplatepath eq "")) && (!($installer::globals::iswindowsbuild))) { push(@output, "msi template path will be ignored for non Windows builds!\n"); } 616*b1cdbd2cSJim Jagielski if (!($installer::globals::idtlanguagepath eq "")) { push(@output, "msi languagepath: $installer::globals::idtlanguagepath\n"); } 617*b1cdbd2cSJim Jagielski if ((!($installer::globals::idtlanguagepath eq "")) && (!($installer::globals::iswindowsbuild))) { push(@output, "msi language path will be ignored for non Windows builds!\n"); } 618*b1cdbd2cSJim Jagielski if ((!($installer::globals::iswindowsbuild)) && ( $installer::globals::call_epm )) { push(@output, "Calling epm\n"); } 619*b1cdbd2cSJim Jagielski if ((!($installer::globals::iswindowsbuild)) && (!($installer::globals::call_epm))) { push(@output, "Not calling epm\n"); } 620*b1cdbd2cSJim Jagielski if (!($installer::globals::javalanguagepath eq "")) { push(@output, "Java language path: $installer::globals::javalanguagepath\n"); } 621*b1cdbd2cSJim Jagielski if ((!($installer::globals::javalanguagepath eq "")) && ($installer::globals::iswindowsbuild)) { push(@output, "Java language path will be ignored for Windows builds!\n"); } 622*b1cdbd2cSJim Jagielski if ( $installer::globals::patchincludepath ) { push(@output, "Patch include path: $installer::globals::patchincludepath\n"); } 623*b1cdbd2cSJim Jagielski if ( $installer::globals::globallogging ) { push(@output, "Complete logging activated\n"); } 624*b1cdbd2cSJim Jagielski if ( $installer::globals::debug ) { push(@output, "Debug is activated\n"); } 625*b1cdbd2cSJim Jagielski if ( $installer::globals::tab ) { push(@output, "TAB version\n"); } 626*b1cdbd2cSJim Jagielski if ( $installer::globals::strip ) { push(@output, "Stripping files\n"); } 627*b1cdbd2cSJim Jagielski else { push(@output, "No file stripping\n"); } 628*b1cdbd2cSJim Jagielski if ( $installer::globals::debian ) { push(@output, "Linux: Creating Debian packages\n"); } 629*b1cdbd2cSJim Jagielski if ( $installer::globals::dounzip ) { push(@output, "Unzip ARCHIVE files\n"); } 630*b1cdbd2cSJim Jagielski else { push(@output, "Not unzipping ARCHIVE files\n"); } 631*b1cdbd2cSJim Jagielski if (!($installer::globals::languages_defined_in_productlist)) 632*b1cdbd2cSJim Jagielski { 633*b1cdbd2cSJim Jagielski push(@output, sprintf("Languages: %s\n", $installer::globals::languageproduct)); 634*b1cdbd2cSJim Jagielski } 635*b1cdbd2cSJim Jagielski else 636*b1cdbd2cSJim Jagielski { 637*b1cdbd2cSJim Jagielski push(@output, "Languages defined in $installer::globals::ziplistname\n"); 638*b1cdbd2cSJim Jagielski } 639*b1cdbd2cSJim Jagielski if ( $installer::globals::is_copy_only_project ) { push(@output, "This is a copy only project!\n"); } 640*b1cdbd2cSJim Jagielski if ( $installer::globals::languagepack ) { push(@output, "Creating language pack!\n"); } 641*b1cdbd2cSJim Jagielski if ( $installer::globals::patch ) { push(@output, "Creating patch!\n"); } 642*b1cdbd2cSJim Jagielski push(@output, "########################################################\n"); 643*b1cdbd2cSJim Jagielski 644*b1cdbd2cSJim Jagielski # output into shell and into logfile 645*b1cdbd2cSJim Jagielski 646*b1cdbd2cSJim Jagielski foreach my $line (@output) 647*b1cdbd2cSJim Jagielski { 648*b1cdbd2cSJim Jagielski $installer::logger::Info->print($line); 649*b1cdbd2cSJim Jagielski } 650*b1cdbd2cSJim Jagielski} 651*b1cdbd2cSJim Jagielski 652*b1cdbd2cSJim Jagielski1; 653