configure.pl (599cc5b4) | configure.pl (b3ba5bc7) |
---|---|
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 --- 29 unchanged lines hidden (view full) --- 38$main::OO_MINORVERSION =~ s#[^\d]+(\d).(\d).+#$2#go; 39 40$main::OO_SDK_CONFIG_HOME= "$ENV{HOME}/$main::OO_SDK_NAME"; 41 42$main::operatingSystem = `$main::sdkpath/config.guess | cut -d"-" -f3,4`; 43chomp ($main::operatingSystem); 44 45$main::OO_SDK_HOME = $main::sdkpath; | 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 --- 29 unchanged lines hidden (view full) --- 38$main::OO_MINORVERSION =~ s#[^\d]+(\d).(\d).+#$2#go; 39 40$main::OO_SDK_CONFIG_HOME= "$ENV{HOME}/$main::OO_SDK_NAME"; 41 42$main::operatingSystem = `$main::sdkpath/config.guess | cut -d"-" -f3,4`; 43chomp ($main::operatingSystem); 44 45$main::OO_SDK_HOME = $main::sdkpath; |
46#$main::OO_SDK_HOME = ""; | |
47$main::OO_SDK_HOME_SUGGESTION = $main::sdkpath; 48 | 46$main::OO_SDK_HOME_SUGGESTION = $main::sdkpath; 47 |
49$main::OFFICE_OR_URE = "Office"; 50$main::OFFICE_OR_URE_SUGGESTION = "Office"; 51 | |
52$main::OFFICE_HOME = ""; 53 | 48$main::OFFICE_HOME = ""; 49 |
54$main::OFFICE_BASE_HOME = substr($main::sdkpath, 0, rindex($main::sdkpath, "/sdk")); | 50#$main::OFFICE_BASE_HOME = substr($main::sdkpath, 0, rindex($main::sdkpath, "/sdk")); |
55 | 51 |
56if ( $main::operatingSystem =~ m/darwin/ ) 57{ 58# $main::OO_SDK_URE_HOME = `cd $main::sdkpath/../ure-link && pwd`; 59} else { 60 $main::OO_SDK_URE_HOME = `cd $main::sdkpath/../ure-link && pwd`; 61} 62chomp($main::OO_SDK_URE_HOME); 63 | |
64$main::OO_SDK_MAKE_HOME = ""; 65$main::makeName = "make"; 66if ( $main::operatingSystem =~ m/solaris/ || 67 $main::operatingSystem =~ m/freebsd/ ) 68{ 69 $main::makeName = "gmake"; 70} 71$main::OO_SDK_MAKE_HOME_SUGGESTION = searchprog($main::makeName); --- 38 unchanged lines hidden (view full) --- 110$main::SDK_AUTO_DEPLOYMENT_SUGGESTION = "YES"; 111 112$main::OO_SDK_OUTPUT_DIR_SUGGESTION = "$ENV{HOME}"; 113$main::OO_SDK_OUTPUT_DIR = ""; 114$main::skipOutputDir = 0; 115 116$main::return = 0; 117 | 52$main::OO_SDK_MAKE_HOME = ""; 53$main::makeName = "make"; 54if ( $main::operatingSystem =~ m/solaris/ || 55 $main::operatingSystem =~ m/freebsd/ ) 56{ 57 $main::makeName = "gmake"; 58} 59$main::OO_SDK_MAKE_HOME_SUGGESTION = searchprog($main::makeName); --- 38 unchanged lines hidden (view full) --- 98$main::SDK_AUTO_DEPLOYMENT_SUGGESTION = "YES"; 99 100$main::OO_SDK_OUTPUT_DIR_SUGGESTION = "$ENV{HOME}"; 101$main::OO_SDK_OUTPUT_DIR = ""; 102$main::skipOutputDir = 0; 103 104$main::return = 0; 105 |
118if ( $main::OFFICE_OR_URE eq "Office" ) | 106if ( $main::operatingSystem =~ m/darwin/ ) |
119{ | 107{ |
120 if ( $main::operatingSystem =~ m/darwin/ ) 121 { | |
122# used for a SDK as part of the office installation | 108# used for a SDK as part of the office installation |
123# $main::OFFICE_HOME = `cd $main::sdkpath/../../.. && pwd`; 124# chomp($main::OFFICE_HOME); 125# print " Used Office = $main::OFFICE_HOME\n"; 126 print " Used SDK = $main::OO_SDK_HOME\n\n"; | 109# $main::OFFICE_HOME = `cd $main::sdkpath/../../.. && pwd`; 110# chomp($main::OFFICE_HOME); 111# print " Used Office = $main::OFFICE_HOME\n"; 112 print " Used SDK = $main::OO_SDK_HOME\n\n"; |
127 | 113 |
128 $main::OFFICE_HOME_SUGGESTION = searchMacOffice(); 129 while ( (! -d "$main::OFFICE_HOME" ) || 130 ((-d "$main::OFFICE_HOME") && (! -d "$main::OFFICE_HOME/Contents/MacOS")) ) 131 { 132 print " Enter the Office installation directory [$main::OFFICE_HOME_SUGGESTION]: "; 133 $main::OFFICE_HOME = readStdIn(); 134 chop($main::OFFICE_HOME); 135 if ( $main::OFFICE_HOME eq "" ) 136 { 137 $main::OFFICE_HOME = $main::OFFICE_HOME_SUGGESTION; 138 } 139 140 if ( ! -d "$main::OFFICE_HOME" ) 141 { 142 $main::OFFICE_HOME = ""; 143 print " Error: An office installation is required, please specify the path to a valid installation.\n"; 144 } 145 146 # check more details 147 if ( -d "$main::OFFICE_HOME/Contents/basis-link" ) { 148 $main::OFFICE_BASE_HOME = "$main::OFFICE_HOME/Contents/basis-link"; 149 if ( -d "$main::OFFICE_BASE_HOME/ure-link" ) { 150 $main::OO_SDK_URE_HOME = "$main::OFFICE_BASE_HOME/ure-link"; 151 } else { 152 $main::OFFICE_HOME = ""; 153 $main::OFFICE_BASE_HOME = ""; 154 $main::OO_SDK_URE_HOME = ""; 155 print " Error: no URE found in office installation, please specify the path to a valid installation.\n"; 156 } 157 } else { 158 $main::OFFICE_HOME = ""; 159 $main::OFFICE_BASE_HOME = ""; 160 $main::OO_SDK_URE_HOME = ""; 161 print " Error: no base layer found in office installation, please specify the path to a valid installation.\n"; 162 } 163 } | 114 $main::OFFICE_HOME_SUGGESTION = searchMacOffice(); 115 while ( (! -d "$main::OFFICE_HOME" ) || 116 ((-d "$main::OFFICE_HOME") && (! -d "$main::OFFICE_HOME/Contents/MacOS")) ) 117 { 118 print " Enter the Office installation directory [$main::OFFICE_HOME_SUGGESTION]: "; 119 $main::OFFICE_HOME = readStdIn(); 120 chop($main::OFFICE_HOME); 121 if ( $main::OFFICE_HOME eq "" ) 122 { 123 $main::OFFICE_HOME = $main::OFFICE_HOME_SUGGESTION; 124 } 125 126 if ( ! -d "$main::OFFICE_HOME" ) 127 { 128 $main::OFFICE_HOME = ""; 129 print " Error: An office installation is required, please specify the path to a valid installation.\n"; 130 } 131 132# $main::OFFICE_BASE_HOME = "$main::OFFICE_HOME/Contents"; 133 } 134} else 135{ 136 $main::OFFICE_HOME_SUGGESTION = searchoffice(); 137 138 if ( $main::OFFICE_HOME_SUGGESTION eq "" ) { 139 # prepare Office path 140 $main::OFFICE_HOME_SUGGESTION = searchprog("soffice"); 141 } 142 143 if ( ! $main::OFFICE_HOME_SUGGESTION eq "" ) 144 { 145 my $tmpOffice = readlink "$main::OFFICE_HOME_SUGGESTION/soffice"; 146 147 if ( $tmpOffice eq "" ) 148 { 149 $tmpOffice = "$main::OFFICE_HOME_SUGGESTION/soffice"; 150 } 151 152 my $offset = rindex($tmpOffice, "/program/soffice"); 153 if ( $offset != -1 ) 154 { 155 $main::OFFICE_HOME_SUGGESTION = substr($tmpOffice, 0, $offset); |
164 } else 165 { | 156 } else 157 { |
166 $main::OFFICE_HOME_SUGGESTION = searchoffice(); 167 168 if ( $main::OFFICE_HOME_SUGGESTION eq "" ) { 169 # prepare Office path 170 $main::OFFICE_HOME_SUGGESTION = searchprog("soffice"); 171 } 172 173 if ( ! $main::OFFICE_HOME_SUGGESTION eq "" ) 174 { 175 my $tmpOffice = readlink "$main::OFFICE_HOME_SUGGESTION/soffice"; 176 177 if ( $tmpOffice eq "" ) 178 { 179 $tmpOffice = "$main::OFFICE_HOME_SUGGESTION/soffice"; 180 } | 158 $offset = rindex($tmpOffice, "/soffice"); 159 if ( $offset != -1 ) 160 { 161 $main::OFFICE_HOME_SUGGESTION = substr($tmpOffice, 0, $offset); 162 } else 163 { 164 $main::OFFICE_HOME_SUGGESTION = ""; 165 } 166 } 167 } 168 169 while ( (! -d "$main::OFFICE_HOME" ) || 170 ((-d "$main::OFFICE_HOME") && (! -d "$main::OFFICE_HOME/program")) ) 171 { 172 print " Enter the Office installation directory [$main::OFFICE_HOME_SUGGESTION]: "; 173 $main::OFFICE_HOME = readStdIn(); 174 chop($main::OFFICE_HOME); 175 if ( $main::OFFICE_HOME eq "" ) 176 { 177 $main::OFFICE_HOME = $main::OFFICE_HOME_SUGGESTION; 178 } 179 180 if ( ! -d "$main::OFFICE_HOME" ) 181 { 182 $main::OFFICE_HOME = ""; 183 print " Error: An office installation is required, please specify the path to a valid installation.\n"; 184 } else 185 { 186 # special work for a network installation, no prgram directory but a link to the soffice binary 187 if ( (! -d "$main::OFFICE_HOME/program") && (-e "$main::OFFICE_HOME/soffice") ) 188 { 189 my $soserver = `ls -l $OFFICE_HOME_SUGGESTION/soffice | sed -n 's/.* -> //p'`; 190 $soserver= substr($soserver, 0, rindex($soserver, "program") - 1); |
181 | 191 |
182 my $offset = rindex($tmpOffice, "/program/soffice"); 183 if ( $offset != -1 ) 184 { 185 $main::OFFICE_HOME_SUGGESTION = substr($tmpOffice, 0, $offset); 186 } else 187 { 188 $offset = rindex($tmpOffice, "/soffice"); 189 if ( $offset != -1 ) 190 { 191 $main::OFFICE_HOME_SUGGESTION = substr($tmpOffice, 0, $offset); 192 } else 193 { 194 $main::OFFICE_HOME_SUGGESTION = ""; 195 } 196 } 197 } 198 199 while ( (! -d "$main::OFFICE_HOME" ) || 200 ((-d "$main::OFFICE_HOME") && (! -d "$main::OFFICE_HOME/program")) ) | 192 if ( ! -d $soserver ) |
201 { | 193 { |
202 print " Enter the Office installation directory [$main::OFFICE_HOME_SUGGESTION]: "; 203 $main::OFFICE_HOME = readStdIn(); 204 chop($main::OFFICE_HOME); 205 if ( $main::OFFICE_HOME eq "" ) 206 { 207 $main::OFFICE_HOME = $main::OFFICE_HOME_SUGGESTION; 208 } 209 210 if ( ! -d "$main::OFFICE_HOME" ) 211 { 212 $main::OFFICE_HOME = ""; 213 print " Error: An office installation is required, please specify the path to a valid installation.\n"; 214 } else 215 { 216 # special work for a network installation, no prgram directory but a link to the soffice binary 217 if ( (! -d "$main::OFFICE_HOME/program") && (-e "$main::OFFICE_HOME/soffice") ) 218 { 219 my $soserver = `ls -l $OFFICE_HOME_SUGGESTION/soffice | sed -n 's/.* -> //p'`; 220 $soserver= substr($soserver, 0, rindex($soserver, "program") - 1); 221 222 if ( ! -d $soserver ) 223 { 224 $main::OFFICE_HOME = ""; 225 print " Error: An office installation is required, please specify the path to a valid installation.\n"; 226 } else 227 { 228 $main::OFFICE_HOME = $soserver; 229 } 230 } 231 } | 194 $main::OFFICE_HOME = ""; 195 print " Error: An office installation is required, please specify the path to a valid installation.\n"; 196 } else 197 { 198 $main::OFFICE_HOME = $soserver; |
232 } | 199 } |
200 } |
|
233 } | 201 } |
234} 235else 236{ 237 # prepare URE path 238 $main::OO_SDK_URE_HOME_SUGGESTION = "/opt/openoffice/ure"; 239 $main::OO_SDK_URE_HOME_SUGGESTION = "" unless 240 -e "$main::OO_SDK_URE_HOME_SUGGESTION/bin/uno"; 241 for (;;) 242 { 243 print " Enter the URE installation directory", 244 " [$main::OO_SDK_URE_HOME_SUGGESTION]: "; 245 $main::OO_SDK_URE_HOME = readStdIn(); 246 chop $main::OO_SDK_URE_HOME; 247 $main::OO_SDK_URE_HOME = $main::OO_SDK_URE_HOME_SUGGESTION if 248 $main::OO_SDK_URE_HOME eq "" && 249 $main::OO_SDK_URE_HOME_SUGGESTION ne ""; 250 last if -e "$main::OO_SDK_URE_HOME/bin/uno"; 251 print " Error: A valid URE installation is required.\n"; | |
252 } 253} 254 | 202 } 203} 204 |
205 |
|
255# prepare GNU make path 256while ( (!$main::correctVersion) && 257 ((! -d "$main::OO_SDK_MAKE_HOME" ) || 258 ((-d "$main::OO_SDK_MAKE_HOME") && (! -e "$main::OO_SDK_MAKE_HOME/$main::makeName"))) ) 259{ 260 print " Enter GNU make ($main::makeVersion or higher) tools directory [$main::OO_SDK_MAKE_HOME_SUGGESTION]: "; 261 $main::OO_SDK_MAKE_HOME = readStdIn(); 262 chop($main::OO_SDK_MAKE_HOME); --- 305 unchanged lines hidden (view full) --- 568 } else 569 { 570 # the output directory is optional 571 $main::skipOutputDir = 1; 572 } 573} 574 575# prepare auto deployment | 206# prepare GNU make path 207while ( (!$main::correctVersion) && 208 ((! -d "$main::OO_SDK_MAKE_HOME" ) || 209 ((-d "$main::OO_SDK_MAKE_HOME") && (! -e "$main::OO_SDK_MAKE_HOME/$main::makeName"))) ) 210{ 211 print " Enter GNU make ($main::makeVersion or higher) tools directory [$main::OO_SDK_MAKE_HOME_SUGGESTION]: "; 212 $main::OO_SDK_MAKE_HOME = readStdIn(); 213 chop($main::OO_SDK_MAKE_HOME); --- 305 unchanged lines hidden (view full) --- 519 } else 520 { 521 # the output directory is optional 522 $main::skipOutputDir = 1; 523 } 524} 525 526# prepare auto deployment |
576if ( $main::OFFICE_OR_URE eq "Office" ) | 527while ( $main::SDK_AUTO_DEPLOYMENT eq "" || 528 ((! $main::SDK_AUTO_DEPLOYMENT eq "YES") && 529 (! $main::SDK_AUTO_DEPLOYMENT eq "NO")) ) |
577{ | 530{ |
578 while ( $main::SDK_AUTO_DEPLOYMENT eq "" || 579 ((! $main::SDK_AUTO_DEPLOYMENT eq "YES") && 580 (! $main::SDK_AUTO_DEPLOYMENT eq "NO")) ) | 531 print " Automatic deployment of UNO components (YES/NO) [$main::SDK_AUTO_DEPLOYMENT_SUGGESTION]: "; 532 $main::SDK_AUTO_DEPLOYMENT = uc <STDIN>; 533 chop($main::SDK_AUTO_DEPLOYMENT); 534 if ( $main::SDK_AUTO_DEPLOYMENT eq "" ) |
581 { | 535 { |
582 print " Automatic deployment of UNO components (YES/NO) [$main::SDK_AUTO_DEPLOYMENT_SUGGESTION]: "; 583 $main::SDK_AUTO_DEPLOYMENT = uc <STDIN>; 584 chop($main::SDK_AUTO_DEPLOYMENT); 585 if ( $main::SDK_AUTO_DEPLOYMENT eq "" ) 586 { 587 $main::SDK_AUTO_DEPLOYMENT = "YES"; 588 } | 536 $main::SDK_AUTO_DEPLOYMENT = "YES"; |
589 } 590} | 537 } 538} |
591else 592{ 593 $main::SDK_AUTO_DEPLOYMENT = "NO"; 594} | |
595 596prepareScriptFile("setsdkenv_unix.sh.in", "setsdkenv_unix.sh"); 597chmod 0644, "$main::OO_SDK_CONFIG_HOME/$main::hostname/setsdkenv_unix.sh"; 598 599print "\n"; 600print " ************************************************************************\n"; 601print " * ... your SDK environment has been prepared.\n"; 602print " * For each time you want to use this configured SDK environment, you\n"; --- 106 unchanged lines hidden (view full) --- 709 return $progDir 710} 711 712sub searchMacOffice 713{ 714 if (-d "/Applications/OpenOffice.app" ) { 715 return "/Applications/OpenOffice.app" 716 } | 539 540prepareScriptFile("setsdkenv_unix.sh.in", "setsdkenv_unix.sh"); 541chmod 0644, "$main::OO_SDK_CONFIG_HOME/$main::hostname/setsdkenv_unix.sh"; 542 543print "\n"; 544print " ************************************************************************\n"; 545print " * ... your SDK environment has been prepared.\n"; 546print " * For each time you want to use this configured SDK environment, you\n"; --- 106 unchanged lines hidden (view full) --- 653 return $progDir 654} 655 656sub searchMacOffice 657{ 658 if (-d "/Applications/OpenOffice.app" ) { 659 return "/Applications/OpenOffice.app" 660 } |
717 if (-d "/Applications/OpenOffice.org.app" ) { 718 return "/Applications/OpenOffice.org.app" 719 } 720 if (-d "/Applications/Oracle Open Office.app" ) { 721 return "/Applications/Oracle Open Office.app"; 722 } 723 if (-d "/Applications/StarOffice.app" ) { 724 return "/Applications/StarOffice.app"; 725 } 726 if (-d "/Applications/StarSuite.app" ) { 727 return "/Applications/StarSuite.app"; 728 } 729 | |
730 return ""; 731} 732 733sub searchoffice 734{ 735 my $offset = rindex($main::sdkpath, "/openoffice"); 736 my $tmpOffice = substr($main::sdkpath, 0, $offset); 737 my $officepath = "$tmpOffice/openoffice$main::OO_MAJORVERSION"; 738 739# if ( $main::OO_MINORVERSION > 0) { 740# $officepath = "$officepath$main::OO_MINORVERSION"; 741# } 742 743 # search corresponding office for this SDK 744 if (-d $officepath && -e "$officepath/program/soffice") { 745 return $officepath; 746 } | 661 return ""; 662} 663 664sub searchoffice 665{ 666 my $offset = rindex($main::sdkpath, "/openoffice"); 667 my $tmpOffice = substr($main::sdkpath, 0, $offset); 668 my $officepath = "$tmpOffice/openoffice$main::OO_MAJORVERSION"; 669 670# if ( $main::OO_MINORVERSION > 0) { 671# $officepath = "$officepath$main::OO_MINORVERSION"; 672# } 673 674 # search corresponding office for this SDK 675 if (-d $officepath && -e "$officepath/program/soffice") { 676 return $officepath; 677 } |
747 # fallback 748 my $tmpversion = $main::OO_MAJORVERSION; 749# if ( $main::OO_MINORVERSION > 0) { 750# $tmpversion = "$tmpversion.$main::OO_MINORVERSION"; 751# } 752 753 $officepath = "$tmpOffice/oracle_open_office$tmpversion"; 754 if (-d $officepath && -e "$officepath/program/soffice") { 755 return $officepath; 756 } 757 758 my $tmpversion = $main::OO_MAJORVERSION + 6; 759 if ( $main::OO_MINORVERSION > 0) { 760 $tmpversion = "$tmpversion.$main::OO_MINORVERSION"; 761 } 762 763 $officepath = "$tmpOffice/staroffice$tmpversion"; 764 if (-d $officepath && -e "$officepath/program/soffice") { 765 return $officepath; 766 } 767 $officepath = "$tmpOffice/StarOffice$tmpversion"; 768 if (-d $officepath && -e "$officepath/program/soffice") { 769 return $officepath; 770 } 771 $officepath = "$tmpOffice/starsuite$tmpversion"; 772 if (-d $officepath && -e "$officepath/program/soffice") { 773 return $officepath; 774 } 775 $officepath = "$tmpOffice/StarSuite$tmpversion"; 776 if (-d $officepath && -e "$officepath/program/soffice") { 777 return $officepath; 778 } 779 $officepath = ""; 780 781 # search other potential matching office versions 782 my $path = "/opt/"; 783 my $entry = ""; 784 my $version = "0"; 785 for $entry (glob($path.'*')) { 786 ## if the file is a directory 787 if( -d $entry) { 788 789 if ($entry =~ m#(.+(o|O)ffice(\.org){0,1}(\d([\d\.]){0,2}))# || 790 $entry =~ m#(.+(s|S)uite(.*)(\d([\d\.]){0,2}))# ) 791 { 792 if ($4 > $version) { 793 $version = $4; 794 $officepath = $entry; 795 } 796 } 797 } 798 } 799 return $officepath; | 678 return ""; |
800} 801 802 803 804sub testVersion 805{ 806 my $tmpMustBeVersion = shift; 807 my $tmpTestVersion = shift; --- 52 unchanged lines hidden (view full) --- 860 open ( FILEIN, "$main::sdkpath/$inputFile" ) || die "\nERROR: could not open '$main::sdkpath/$inputFile' for reading"; 861 open ( FILEOUT, ">$main::OO_SDK_CONFIG_HOME/$main::hostname/$outputFile" ) || die "\nERROR: could not open '$main::OO_SDK_CONFIG_HOME/$main::hostname/$outputFile' for writing"; 862 863 while ( <FILEIN> ) 864 { 865 $_ =~ s#\@OO_SDK_NAME\@#$main::OO_SDK_NAME#go; 866 $_ =~ s#\@OO_SDK_HOME\@#$main::OO_SDK_HOME#go; 867 $_ =~ s#\@OFFICE_HOME\@#$main::OFFICE_HOME#go; | 679} 680 681 682 683sub testVersion 684{ 685 my $tmpMustBeVersion = shift; 686 my $tmpTestVersion = shift; --- 52 unchanged lines hidden (view full) --- 739 open ( FILEIN, "$main::sdkpath/$inputFile" ) || die "\nERROR: could not open '$main::sdkpath/$inputFile' for reading"; 740 open ( FILEOUT, ">$main::OO_SDK_CONFIG_HOME/$main::hostname/$outputFile" ) || die "\nERROR: could not open '$main::OO_SDK_CONFIG_HOME/$main::hostname/$outputFile' for writing"; 741 742 while ( <FILEIN> ) 743 { 744 $_ =~ s#\@OO_SDK_NAME\@#$main::OO_SDK_NAME#go; 745 $_ =~ s#\@OO_SDK_HOME\@#$main::OO_SDK_HOME#go; 746 $_ =~ s#\@OFFICE_HOME\@#$main::OFFICE_HOME#go; |
868 $_ =~ s#\@OFFICE_BASE_HOME\@#$main::OFFICE_BASE_HOME#go; 869 $_ =~ s#\@OO_SDK_URE_HOME\@#$main::OO_SDK_URE_HOME#go; | 747# $_ =~ s#\@OFFICE_BASE_HOME\@#$main::OFFICE_BASE_HOME#go; |
870 $_ =~ s#\@OO_SDK_MAKE_HOME\@#$main::OO_SDK_MAKE_HOME#go; 871 $_ =~ s#\@OO_SDK_ZIP_HOME\@#$main::OO_SDK_ZIP_HOME#go; | 748 $_ =~ s#\@OO_SDK_MAKE_HOME\@#$main::OO_SDK_MAKE_HOME#go; 749 $_ =~ s#\@OO_SDK_ZIP_HOME\@#$main::OO_SDK_ZIP_HOME#go; |
872 $_ =~ s#\@OO_SDK_CAT_HOME\@#$main::OO_SDK_CAT_HOME#go; 873 $_ =~ s#\@OO_SDK_SED_HOME\@#$main::OO_SDK_SED_HOME#go; | 750 $_ =~ s#\@OO_SDK_CAT_HOME\@#$main::OO_SDK_CAT_HOME#go; 751 $_ =~ s#\@OO_SDK_SED_HOME\@#$main::OO_SDK_SED_HOME#go; |
874 $_ =~ s#\@OO_SDK_CPP_HOME\@#$main::OO_SDK_CPP_HOME#go; 875 $_ =~ s#\@OO_SDK_CC_55_OR_HIGHER\@#$main::OO_SDK_CC_55_OR_HIGHER#go; 876 $_ =~ s#\@OO_SDK_JAVA_HOME\@#$main::OO_SDK_JAVA_HOME#go; 877 $_ =~ s#\@SDK_AUTO_DEPLOYMENT\@#$main::SDK_AUTO_DEPLOYMENT#go; 878 $_ =~ s#\@OO_SDK_OUTPUT_DIR\@#$main::OO_SDK_OUTPUT_DIR#go; 879 880 print FILEOUT $_; 881 } 882 883 close FILEIN; 884 close FILEOUT; 885} | 752 $_ =~ s#\@OO_SDK_CPP_HOME\@#$main::OO_SDK_CPP_HOME#go; 753 $_ =~ s#\@OO_SDK_CC_55_OR_HIGHER\@#$main::OO_SDK_CC_55_OR_HIGHER#go; 754 $_ =~ s#\@OO_SDK_JAVA_HOME\@#$main::OO_SDK_JAVA_HOME#go; 755 $_ =~ s#\@SDK_AUTO_DEPLOYMENT\@#$main::SDK_AUTO_DEPLOYMENT#go; 756 $_ =~ s#\@OO_SDK_OUTPUT_DIR\@#$main::OO_SDK_OUTPUT_DIR#go; 757 758 print FILEOUT $_; 759 } 760 761 close FILEIN; 762 close FILEOUT; 763} |