epmfile.pm (cdf0e10c) epmfile.pm (78f2b93d)
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#

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

541 my $allreplaces = installer::converter::convert_stringlist_into_array(\$replacesstring, ",");
542
543 for ( my $i = 0; $i <= $#{$allreplaces}; $i++ )
544 {
545 my $onereplaces = ${$allreplaces}[$i];
546 $onereplaces =~ s/\s*$//;
547 installer::packagelist::resolve_packagevariables(\$onereplaces, $variableshashref, 1);
548 if ( $installer::globals::linuxlinkrpmprocess ) { $onereplaces = $onereplaces . "u"; }
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#

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

541 my $allreplaces = installer::converter::convert_stringlist_into_array(\$replacesstring, ",");
542
543 for ( my $i = 0; $i <= $#{$allreplaces}; $i++ )
544 {
545 my $onereplaces = ${$allreplaces}[$i];
546 $onereplaces =~ s/\s*$//;
547 installer::packagelist::resolve_packagevariables(\$onereplaces, $variableshashref, 1);
548 if ( $installer::globals::linuxlinkrpmprocess ) { $onereplaces = $onereplaces . "u"; }
549 if ( $installer::globals::debian ) { $onereplaces =~ s/_/-/g; } # Debian allows no underline in package name
549 $line = "%replaces" . " " . $onereplaces . "\n";
550 push(@epmheader, $line);
551
552 # Force the openofficeorg packages to get removed,
553 # see http://www.debian.org/doc/debian-policy/ch-relationships.html
554 # 7.5.2 Replacing whole packages, forcing their removal
555
556 if ( $installer::globals::debian )

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

614 my $allprovides = installer::converter::convert_stringlist_into_array(\$providesstring, ",");
615
616 for ( my $i = 0; $i <= $#{$allprovides}; $i++ )
617 {
618 my $oneprovides = ${$allprovides}[$i];
619 $oneprovides =~ s/\s*$//;
620 installer::packagelist::resolve_packagevariables(\$oneprovides, $variableshashref, 1);
621 if ( $installer::globals::linuxlinkrpmprocess ) { $oneprovides = $oneprovides . "u"; }
550 $line = "%replaces" . " " . $onereplaces . "\n";
551 push(@epmheader, $line);
552
553 # Force the openofficeorg packages to get removed,
554 # see http://www.debian.org/doc/debian-policy/ch-relationships.html
555 # 7.5.2 Replacing whole packages, forcing their removal
556
557 if ( $installer::globals::debian )

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

615 my $allprovides = installer::converter::convert_stringlist_into_array(\$providesstring, ",");
616
617 for ( my $i = 0; $i <= $#{$allprovides}; $i++ )
618 {
619 my $oneprovides = ${$allprovides}[$i];
620 $oneprovides =~ s/\s*$//;
621 installer::packagelist::resolve_packagevariables(\$oneprovides, $variableshashref, 1);
622 if ( $installer::globals::linuxlinkrpmprocess ) { $oneprovides = $oneprovides . "u"; }
623 if ( $installer::globals::debian ) { $oneprovides =~ s/_/-/g; } # Debian allows no underline in package name
622 $line = "%provides" . " " . $oneprovides . "\n";
623 push(@epmheader, $line);
624 }
625 }
626
627 if ( $onepackage->{$requires} )
628 {
629 my $requiresstring = $onepackage->{$requires};

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

643
644 installer::converter::resolve_masked_separator($allrequires, ",", $replacementstring);
645
646 for ( my $i = 0; $i <= $#{$allrequires}; $i++ )
647 {
648 my $onerequires = ${$allrequires}[$i];
649 $onerequires =~ s/\s*$//;
650 installer::packagelist::resolve_packagevariables2(\$onerequires, $variableshashref, 0, $isdict);
624 $line = "%provides" . " " . $oneprovides . "\n";
625 push(@epmheader, $line);
626 }
627 }
628
629 if ( $onepackage->{$requires} )
630 {
631 my $requiresstring = $onepackage->{$requires};

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

645
646 installer::converter::resolve_masked_separator($allrequires, ",", $replacementstring);
647
648 for ( my $i = 0; $i <= $#{$allrequires}; $i++ )
649 {
650 my $onerequires = ${$allrequires}[$i];
651 $onerequires =~ s/\s*$//;
652 installer::packagelist::resolve_packagevariables2(\$onerequires, $variableshashref, 0, $isdict);
653 if ( $installer::globals::debian ) { $onerequires =~ s/_/-/g; } # Debian allows no underline in package name
651
652 # Special handling for Solaris. In depend files, the names of the packages are required, not
653 # only the abbreviation. Therefore there is a special syntax for names in packagelist:
654 # solarisrequires = "SUNWcar (Name="Package name of SUNWcar"),SUNWkvm (Name="Package name of SUNWcar"), ...
655 # if ( $installer::globals::issolarispkgbuild )
656 # {
657 # if ( $onerequires =~ /^\s*(.*?)\s+\(\s*Name\s*=\s*\"(.*?)\"\s*\)\s*$/ )
658 # {

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

677 my $allrequires = installer::converter::convert_stringlist_into_array(\$requiresstring, ",");
678 installer::converter::resolve_masked_separator($allrequires, ",", $replacementstring);
679
680 for ( my $i = 0; $i <= $#{$allrequires}; $i++ )
681 {
682 my $onerequires = ${$allrequires}[$i];
683 $onerequires =~ s/\s*$//;
684 installer::packagelist::resolve_packagevariables(\$onerequires, $variableshashref, 0);
654
655 # Special handling for Solaris. In depend files, the names of the packages are required, not
656 # only the abbreviation. Therefore there is a special syntax for names in packagelist:
657 # solarisrequires = "SUNWcar (Name="Package name of SUNWcar"),SUNWkvm (Name="Package name of SUNWcar"), ...
658 # if ( $installer::globals::issolarispkgbuild )
659 # {
660 # if ( $onerequires =~ /^\s*(.*?)\s+\(\s*Name\s*=\s*\"(.*?)\"\s*\)\s*$/ )
661 # {

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

680 my $allrequires = installer::converter::convert_stringlist_into_array(\$requiresstring, ",");
681 installer::converter::resolve_masked_separator($allrequires, ",", $replacementstring);
682
683 for ( my $i = 0; $i <= $#{$allrequires}; $i++ )
684 {
685 my $onerequires = ${$allrequires}[$i];
686 $onerequires =~ s/\s*$//;
687 installer::packagelist::resolve_packagevariables(\$onerequires, $variableshashref, 0);
688 if ( $installer::globals::debian ) { $onerequires =~ s/_/-/g; } # Debian allows no underline in package name
685
686 # Special handling for Solaris. In depend files, the names of the packages are required, not
687 # only the abbreviation. Therefore there is a special syntax for names in packagelist:
688 # solarisrequires = "SUNWcar (Name="Package name of SUNWcar"),SUNWkvm (Name="Package name of SUNWcar"), ...
689 # if ( $installer::globals::issolarispkgbuild )
690 # {
691 # if ( $onerequires =~ /^\s*(.*?)\s+\(\s*Name\s*=\s*\"(.*?)\"\s*\)\s*$/ )
692 # {

--- 2770 unchanged lines hidden --- 		689
690 # Special handling for Solaris. In depend files, the names of the packages are required, not
691 # only the abbreviation. Therefore there is a special syntax for names in packagelist:
692 # solarisrequires = "SUNWcar (Name="Package name of SUNWcar"),SUNWkvm (Name="Package name of SUNWcar"), ...
693 # if ( $installer::globals::issolarispkgbuild )
694 # {
695 # if ( $onerequires =~ /^\s*(.*?)\s+\(\s*Name\s*=\s*\"(.*?)\"\s*\)\s*$/ )
696 # {

--- 2770 unchanged lines hidden ---