scriptitems.pm (9780544f) scriptitems.pm (8bd5297c)
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

--- 19 unchanged lines hidden (view full) ---

28use installer::exiter;
29use installer::globals;
30use installer::languages;
31use installer::logger;
32use installer::pathanalyzer;
33use installer::remover;
34use installer::systemactions;
35
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

--- 19 unchanged lines hidden (view full) ---

28use installer::exiter;
29use installer::globals;
30use installer::languages;
31use installer::logger;
32use installer::pathanalyzer;
33use installer::remover;
34use installer::systemactions;
35
36use File::Spec;
37use SvnRevision;
38
36################################################################
37# Resolving the GID for the directories defined in setup script
38################################################################
39
40sub resolve_all_directory_names
41{
42 my ($directoryarrayref) = @_;
43

--- 754 unchanged lines hidden (view full) ---

798 installer::languages::fake_languagesstring(\$languagesstring);
799
800 my $productname = $hashref->{'PRODUCTNAME'};
801 my $productversion = $hashref->{'PRODUCTVERSION'};
802 my $userdirproductversion = "";
803 if ( $hashref->{'USERDIRPRODUCTVERSION'} ) { $userdirproductversion = $hashref->{'USERDIRPRODUCTVERSION'}; }
804 my $productkey = $productname . " " . $productversion;
805
39################################################################
40# Resolving the GID for the directories defined in setup script
41################################################################
42
43sub resolve_all_directory_names
44{
45 my ($directoryarrayref) = @_;
46

--- 754 unchanged lines hidden (view full) ---

801 installer::languages::fake_languagesstring(\$languagesstring);
802
803 my $productname = $hashref->{'PRODUCTNAME'};
804 my $productversion = $hashref->{'PRODUCTVERSION'};
805 my $userdirproductversion = "";
806 if ( $hashref->{'USERDIRPRODUCTVERSION'} ) { $userdirproductversion = $hashref->{'USERDIRPRODUCTVERSION'}; }
807 my $productkey = $productname . " " . $productversion;
808
809 my $scsrevision = SvnRevision::DetectRevisionId(File::Spec->catfile($ENV{'SRC_ROOT'}, File::Spec->updir()));
810
806 # string $buildid, which is used to replace the setup variable <buildid>
807
808 my $localminor = "flat";
809 if ( $installer::globals::minor ne "" ) { $localminor = $installer::globals::minor; }
810 else { $localminor = $installer::globals::lastminor; }
811
812 my $localbuild = $installer::globals::build;
813

--- 11 unchanged lines hidden (view full) ---

825 $updateid =~ s/ /_/g;
826
827 for ( my $i = 0; $i <= $#{$itemsarrayref}; $i++ )
828 {
829 my $oneitem = ${$itemsarrayref}[$i];
830 my $value = $oneitem->{'Value'};
831
832 $value =~ s/\<buildid\>/$buildidstring/;
811 # string $buildid, which is used to replace the setup variable <buildid>
812
813 my $localminor = "flat";
814 if ( $installer::globals::minor ne "" ) { $localminor = $installer::globals::minor; }
815 else { $localminor = $installer::globals::lastminor; }
816
817 my $localbuild = $installer::globals::build;
818

--- 11 unchanged lines hidden (view full) ---

830 $updateid =~ s/ /_/g;
831
832 for ( my $i = 0; $i <= $#{$itemsarrayref}; $i++ )
833 {
834 my $oneitem = ${$itemsarrayref}[$i];
835 my $value = $oneitem->{'Value'};
836
837 $value =~ s/\<buildid\>/$buildidstring/;
838 $value =~ s/\<scsrevision\>/$scsrevision/;
833 $value =~ s/\<sequence_languages\>/$languagesstring/;
834 $value =~ s/\<productkey\>/$productkey/;
835 $value =~ s/\<productcode\>/$installer::globals::productcode/;
836 $value =~ s/\<upgradecode\>/$installer::globals::upgradecode/;
837 $value =~ s/\<alllanguages\>/$languagesstring/;
838 $value =~ s/\<productmajor\>/$localbuild/;
839 $value =~ s/\<productminor\>/$localminor/;
840 $value =~ s/\<productbuildid\>/$installer::globals::buildid/;

--- 2115 unchanged lines hidden ---
839 $value =~ s/\<sequence_languages\>/$languagesstring/;
840 $value =~ s/\<productkey\>/$productkey/;
841 $value =~ s/\<productcode\>/$installer::globals::productcode/;
842 $value =~ s/\<upgradecode\>/$installer::globals::upgradecode/;
843 $value =~ s/\<alllanguages\>/$languagesstring/;
844 $value =~ s/\<productmajor\>/$localbuild/;
845 $value =~ s/\<productminor\>/$localminor/;
846 $value =~ s/\<productbuildid\>/$installer::globals::buildid/;

--- 2115 unchanged lines hidden ---