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