Lines Matching refs:installer
24 package installer::windows::msiglobal;
28 use installer::converter;
29 use installer::exiter;
30 use installer::files;
31 use installer::globals;
32 use installer::logger;
33 use installer::pathanalyzer;
34 use installer::remover;
35 use installer::scriptitems;
36 use installer::systemactions;
37 use installer::worker;
38 use installer::windows::idtglobal;
39 use installer::windows::language;
40 use installer::patch::ReleasesList;
66 $oneline = ".Set CompressionLevel=$installer::globals::cabfilecompressionlevel\n";
96 …installer::exiter::exit_program("ERROR \"$ddffilename\" line $linenumber: Lines in ddf files must …
107 $installer::logger::Lang->print($infoline);
121 my $windowstemppath = $installer::globals::temppath;
125 $windowstemppath = $installer::globals::cyg_temppath;
145 installer::logger::include_header_into_logfile("Generating ddf files");
149 installer::worker::generate_cygwin_pathes($filesref);
159 installer::exiter::exit_program(
176 … $installer::logger::Lang->printf(" excluding '%s' from ddf\n", $onefile->{'uniquename'});
195 $installer::logger::Lang->printf(" adding '%s' with sequence %d to ddf\n",
203 $ddfdir =~ s/\Q$installer::globals::separator\E\s*$//;
204 $ddffilename = $ddfdir . $installer::globals::separator . $ddffilename;
206 installer::files::save_file($ddffilename ,\@ddffile);
207 $installer::logger::Lang->print("Created ddf file: %s\n", $ddffilename);
213 push(@installer::globals::allddffiles, $ddffilename);
273 installer::logger::include_header_into_logfile("Creating msi database");
275 $idtdirbase = installer::converter::make_path_conform($idtdirbase);
277 $msifilename = installer::converter::make_path_conform($msifilename);
290 $installer::logger::Lang->print($infoline);
295 $installer::logger::Lang->print($infoline);
300 $installer::logger::Lang->print($infoline);
312 …my $language_block = installer::windows::idtglobal::get_language_block_from_language_file($searchs…
313 …my $newstring = installer::windows::idtglobal::get_language_string_from_language_block($language_b…
347 my $codepage = installer::windows::language::get_windows_encoding($language);
365 my $windowslanguage = installer::windows::language::get_windows_language($language);
390 $installer::logger::Lang->print($infoline);
414 my $author = $installer::globals::longmanufacturer;
498 installer::logger::include_header_into_logfile("Writing summary information stream");
517 $msifilename = installer::converter::make_path_conform($msifilename);
527 $installer::logger::Lang->print($infoline);
532 $installer::logger::Lang->print($infoline);
537 $installer::logger::Lang->print($infoline);
550 installer::logger::include_header_into_logfile("Creating Transforms");
554 $installdir = installer::converter::make_path_conform($installdir);
560 $basedbname = $installdir . $installer::globals::separator . $basedbname;
573 $referencedbname = $installdir . $installer::globals::separator . $referencedbname;
575 …my $transformfile = $installdir . $installer::globals::separator . "trans_" . $onelanguage . ".mst…
582 $installer::logger::Lang->print($infoline);
593 $installer::logger::Lang->print($infoline);
595 …open(FILE, "<$installer::globals::msitranpath") or die "ERROR: Can't open $installer::globals::msi…
606 $installer::logger::Lang->print($infoline);
608 $installer::logger::Lang->print($infoline);
618 $installer::logger::Lang->print($infoline);
621 $installer::logger::Lang->print($infoline);
626 $installer::logger::Lang->print($infoline);
632 $installer::logger::Lang->print($infoline);
638 $installer::logger::Lang->print($infoline);
644 $installer::logger::Lang->print($infoline);
651 $installer::logger::Lang->print($infoline);
656 $installer::logger::Lang->print($infoline);
667 $installer::logger::Lang->print($infoline);
668 installer::exiter::exit_program($infoline, "create_transforms");
683 installer::logger::include_header_into_logfile("Renaming msi database");
686 $olddatabasename = $installdir . $installer::globals::separator . $olddatabasename;
690 $installer::globals::shortmsidatabasename = $newdatabasename;
692 $newdatabasename = $installdir . $installer::globals::separator . $newdatabasename;
694 installer::systemactions::rename_one_file($olddatabasename, $newdatabasename);
696 $installer::globals::msidatabasename = $newdatabasename;
709 …if ( $allvariables->{'USELANGUAGECODE'} ) { $languagestring = installer::windows::language::get_wi…
710 my $newdatabasename = $installer::globals::shortmsidatabasename;
712 $installer::globals::shortmsidatabasename = $newdatabasename;
713 $newdatabasename = $installdir . $installer::globals::separator . $newdatabasename;
715 my $olddatabasename = $installer::globals::msidatabasename;
717 installer::systemactions::rename_one_file($olddatabasename, $newdatabasename);
719 $installer::globals::msidatabasename = $newdatabasename;
772 my $productcode = $installer::globals::productcode;
786 my $line = "productversion=" . $installer::globals::msiproductversion . "\n";
798 if ( $installer::globals::minorupgradekey ne "" )
800 my $line = "upgradekey=" . $installer::globals::minorupgradekey . "\n";
827 my $windowslanguage = installer::windows::language::get_windows_language($defaultlanguage);
840 my $windowslanguage = installer::windows::language::get_windows_language($onelanguage);
871 installer::logger::include_header_into_logfile("Creating setup.ini");
873 my $setupinifilename = $installdir . $installer::globals::separator . "setup.ini";
907 …if ( $installer::globals::iswin && $installer::globals::plat =~ /cygwin/i) # Windows line ends on…
912 installer::files::save_file($setupinifilename, $setupinifile);
914 $installer::logger::Lang->printf("Generated file %s\n", $setupinifilename);
926 installer::logger::include_header_into_logfile("Copying ScpAction files into installation set");
941 my $destfile = $installdir . $installer::globals::separator . $onescpaction->{'DestinationName'};
943 installer::systemactions::copy_one_file($sourcefile, $destfile);
957 …installer::logger::include_header_into_logfile("Copying Windows installer files into installation …
967 …my $sourcefileref = installer::scriptitems::get_sourcepath_from_filename_and_includepath(\$filenam…
969 …if ( ! -f $$sourcefileref ) { installer::exiter::exit_program("ERROR: msi file not found: $$source…
975 $destfile = $installdir . $installer::globals::separator . $destfile;
977 installer::systemactions::copy_one_file($$sourcefileref, $destfile);
997 $sourcefile = $installer::globals::javafile->{'sourcepath'};
998 …$destdir = $installdir . $installer::globals::separator . $installer::globals::javafile->{'Subdir'…
999 if ( ! -d $destdir) { installer::systemactions::create_directory($destdir); }
1000 installer::systemactions::copy_one_file($sourcefile, $destdir);
1005 $sourcefile = $installer::globals::urefile->{'sourcepath'};
1006 …$destdir = $installdir . $installer::globals::separator . $installer::globals::urefile->{'Subdir'};
1007 if ( ! -d $destdir) { installer::systemactions::create_directory($destdir); }
1008 installer::systemactions::copy_one_file($sourcefile, $destdir);
1046 $installer::logger::Lang->printf("guid for '%s' is %s\n",
1128 my $componenttablename = $idtdirbase . $installer::globals::separator . "Componen.idt";
1130 my $componenttable = installer::files::read_file($componenttablename);
1155 if ( exists($installer::globals::calculated_component_guids{$componentname}))
1157 $uuid = $installer::globals::calculated_component_guids{$componentname};
1163 if ( exists($installer::globals::base_independent_components{$componentname}))
1173 installer::exiter::exit_program(
1183 if ( exists($installer::globals::allcalculated_guids{$uuid}) )
1185 installer::exiter::exit_program(
1189 $installer::globals::allcalculated_guids{$uuid} = 1;
1190 $installer::globals::calculated_component_guids{$componentname} = $uuid;
1203 installer::files::save_file($componenttablename, $componenttable);
1251 my $reglocatfilename = $basedir . $installer::globals::separator . "RegLocat.idt";
1256 $reglocatfile = installer::files::read_file($reglocatfilename);
1286 installer::files::save_file($reglocatfilename ,$reglocatfile);
1288 $installer::logger::Lang->print($infoline);
1298 my $fullfilename = $basedir . $installer::globals::separator . $onefile;
1303 my $filecontent = installer::files::read_file($fullfilename);
1319 installer::files::save_file($fullfilename ,$filecontent);
1321 $installer::logger::Lang->print($infoline);
1338 installer::logger::include_header_into_logfile("Including cabs into msi database");
1346 $installer::logger::Lang->print($infoline);
1351 my $msifilename = $installer::globals::msidatabasename;
1353 $msifilename = installer::converter::make_path_conform($msifilename);
1359 my $allcabfiles = installer::systemactions::find_file_with_file_extension("cab", $installdir);
1368 $installer::logger::Lang->print($infoline);
1373 $installer::logger::Lang->print($infoline);
1378 $installer::logger::Lang->print($infoline);
1386 $installer::logger::Lang->print($infoline);
1390 $installer::logger::Lang->print($infoline);
1404 installer::logger::include_header_into_logfile("Packaging process");
1406 $installer::logger::Lang->add_timestamp("Performance Info: Execute packaging start");
1414 $installer::logger::Lang->print($infoline);
1419 $to = $installer::globals::temppath;
1422 $installer::logger::Lang->print($infoline);
1428 $ENV{'TMP'} = $installer::globals::temppath; # setting TMP to the new unique directory!
1439 …$installer::logger::Info->printf("... makecab.exe (%s/%s) ... \n", $callscounter, $allmakecabcalls…
1448 $installer::logger::Lang->print($infoline);
1460 $installer::logger::Info->printf("makecab_error (Try %s): Trying again\n", $n);
1461 $installer::logger::Lang->printf("makecab_error (Try %s): Trying again\n", $n);
1465 $installer::logger::Info->printf("ERROR (Try %s): Abort packing \n", $n);
1466 $installer::logger::Lang->printf("ERROR (Try %s): Abort packing \n", $n);
1478 $installer::logger::Info->print($infoline);
1479 $installer::logger::Lang->print($infoline);
1483 …if ( $n == $maxmakecabcalls ) { installer::exiter::exit_program("ERROR: \"$systemcall\"!", "execut…
1488 $installer::logger::Lang->print($infoline);
1494 $installer::logger::Lang->add_timestamp("Performance Info: Execute packaging end");
1501 $installer::logger::Lang->print($infoline);
1515 if ( ! $installer::globals::is_release)
1519 elsif ( ! defined $installer::globals::source_version)
1521 $installer::logger::Lang->printf("no source version defined\n");
1525 my $onelanguage = installer::languages::get_key_language($languagesref);
1527 my $release_data = installer::patch::ReleasesList::Instance()
1528 ->{$installer::globals::source_version}
1529 ->{$installer::globals::packageformat};
1532 my $normalized_language = installer::languages::get_normalized_language($languagesref);
1536 … $installer::logger::Lang->printf("source product code is %s\n", $language_data->{'product-code'});
1537 … $installer::logger::Lang->printf("source upgrade code is %s\n", $release_data->{'upgrade-code'});
1546 $installer::logger::Info->printf(
1548 $installer::globals::source_version,
1557 …$installer::logger::Info->printf("Warning: can not access information about previous version %s\n",
1558 $installer::globals::source_version);
1592 if ($installer::globals::is_major_release)
1596 … $installer::logger::Lang->printf("building a major release, created new product code %s\n",
1605 installer::logger::PrintError(
1613 … $installer::logger::Lang->printf("building a minor or micro release, reusing product code %s\n",
1621 installer::logger::PrintError(
1631 $installer::logger::Lang->printf("there is no source version => created new guids\n");
1637 $installer::logger::Lang->printf("reading upgrade code for language %s from %s\n",
1639 $installer::globals::codefilename);
1640 if (defined $installer::globals::codefilename)
1642 my $code_filename = $installer::globals::codefilename;
1643 installer::files::check_file($code_filename);
1644 my $codefile = installer::files::read_file($code_filename);
1646 my $codeblock = installer::windows::idtglobal::get_language_block_from_language_file(
1649 … $target_upgrade_code = installer::windows::idtglobal::get_language_string_from_language_block(
1656 $installer::globals::productcode = $target_product_code;
1657 $installer::globals::upgradecode = $target_upgrade_code;
1661 $installer::logger::Lang->printf("target product code is %s\n", $target_product_code);
1662 $installer::logger::Lang->printf("target upgrade code is %s\n", $target_upgrade_code);
1683 $productversion = $1 . "\." . $2 . $3 . "\." . $installer::globals::buildid;
1687 $productversion = $1 . "\." . $2 . "\." . $installer::globals::buildid;
1697 $productversion = $productversion . "\." . $productminor . "\." . $installer::globals::buildid;
1700 $installer::globals::msiproductversion = $productversion;
1704 if ( $installer::globals::msiproductversion =~ /^\s*(\d+)\./ )
1707 $installer::globals::msimajorproductversion = $major . "\.0\.0";
1725 my $file = installer::files::read_file($onefile->{'sourcepath'});
1729 ${$file}[$j] =~ s/\<msiproductversion\>/$installer::globals::msiproductversion/;
1732 installer::files::save_file($onefile->{'sourcepath'}, $file);
1749 my $reglocatfilename = $basedir . $installer::globals::separator . "RegLocat.idt";
1755 my $reglocatfile = installer::files::read_file($reglocatfilename);
1768 …installer::exiter::exit_program("ERROR: Variable \"REGISTRYLAYERNAME\" has to be defined", "update…
1783 installer::files::save_file($reglocatfilename ,$reglocatfile);
1785 $installer::logger::Lang->print($infoline);
1801 my $removeregistryfilename = $basedir . $installer::globals::separator . "RemoveRe.idt";
1807 my $removeregistryfile = installer::files::read_file($removeregistryfilename);
1813 …${$removeregistryfile}[$i] =~ s/\bREGISTRYROOTCOMPONENT\b/$installer::globals::registryrootcompone…
1818 installer::files::save_file($removeregistryfilename ,$removeregistryfile);
1820 $installer::logger::Lang->print($infoline);