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