solenv/bin/patch_tool.pl

37 use installer::patch::Msi;
38 use installer::patch::ReleasesList;
39 use installer::patch::Version;
140 	installer::patch::Version::ArrayToDirectoryName(
141 	    installer::patch::Version::StringToNumberArray(
173 … my @target_version = installer::patch::Version::StringToNumberArray($context->{'target-version'});
245             return 0 if ! installer::patch::InstallationSet::Download(
260             installer::patch::InstallationSet::Unpack($filename, $unpacked_path);
288 … my @target_version = installer::patch::Version::StringToNumberArray($context->{'target-version'});
304         my $releases = installer::patch::ReleasesList::Instance();
320         $context->{'source-version-dash'} = installer::patch::Version::ArrayToDirectoryName(
321             installer::patch::Version::StringToNumberArray(
326         $context->{'target-version-dash'} = installer::patch::Version::ArrayToDirectoryName(
327             installer::patch::Version::StringToNumberArray(
1066     my $source_version_nodots = installer::patch::Version::ArrayToNoDotName(
1067         installer::patch::Version::StringToNumberArray($source_version_number));
1070     my $target_version_nodots = installer::patch::Version::ArrayToNoDotName(
1071         installer::patch::Version::StringToNumberArray($target_version_number));
1431         "Value", installer::patch::Tools::ToWindowsPath($msp_filename)
1488     my $msi_path = installer::patch::Tools::ToWindowsPath($target_msi_path);
1506         "MsiPath", installer::patch::Tools::ToWindowsPath($source_msi_path),
1570     my $pcp = installer::patch::Msi->new(
1617             "/l", "'".installer::patch::Tools::ToWindowsPath($log_filename)."'",
1618             "/o", "'".installer::patch::Tools::ToWindowsPath($destination_path)."'");
1686         "-s", "'".installer::patch::Tools::ToWindowsPath($pcp->{'filename'})."'",
1687         "-p", "'".installer::patch::Tools::ToWindowsPath($pcp->{'msp_filename'})."'",
1688         "-l", "'".installer::patch::Tools::ToWindowsPath($log_filename)."'",
1689         "-f", "'".installer::patch::Tools::ToWindowsPath($temporary_msimsp_path)."'");
1718     if ( ! installer::patch::InstallationSet::ProvideUnpackedCab(
1727     my $source_msi = installer::patch::Msi->FindAndCreate(
1739     if ( ! installer::patch::InstallationSet::ProvideUnpackedCab(
1748     my $target_msi = installer::patch::Msi->FindAndCreate(
1791     my $release_data = installer::patch::ReleasesList::Instance()
1834                 installer::patch::Version::ArrayToDirectoryName(
1835                     installer::patch::Version::StringToNumberArray(
1837                 installer::patch::Version::ArrayToDirectoryName(
1838                     installer::patch::Version::StringToNumberArray(
1873     my $release_data = installer::patch::ReleasesList::Instance()
1918 …  The patch is applied and (extensive) log information is created and transformed into HTML format.
1930     my $source_version_dirname = installer::patch::Version::ArrayToDirectoryName(
1931       installer::patch::Version::StringToNumberArray(
1933     my $target_version_dirname = installer::patch::Version::ArrayToDirectoryName(
1934       installer::patch::Version::StringToNumberArray(
1963         "/update", "'".installer::patch::Tools::ToWindowsPath($msp_filename)."'",
1964         "/L*xv!", "'".installer::patch::Tools::ToWindowsPath($log_filename)."'",
2077         my $msi = installer::patch::Msi->FindAndCreate(
2097     my $releases_list = installer::patch::ReleasesList::Instance();
2103     if ( ! installer::patch::InstallationSet::ProvideUnpackedExe(
2118         my $msi = installer::patch::Msi->FindAndCreate(
2134     my $releases_list = installer::patch::ReleasesList::Instance();