Lines Matching refs:main
26 $main::hostname= $ARGV[0];
27 $main::sdkpath= $ARGV[1];
28 $main::OO_SDK_NAME= $ARGV[2];
30 $main::OO_MAJORVERSION=$main::OO_SDK_NAME;
31 $main::OO_MINORVERSION=$main::OO_SDK_NAME;
32 $main::OO_MAJORVERSION =~ s#[^\d]+(\d).(\d).+#$1#go;
33 $main::OO_MINORVERSION =~ s#[^\d]+(\d).(\d).+#$2#go;
35 $main::OO_SDK_CONFIG_HOME= "$ENV{HOME}/$main::OO_SDK_NAME";
37 $main::operatingSystem = `/bin/sh $main::sdkpath/config.guess | cut -d"-" -f3,4`;
38 chomp ($main::operatingSystem);
40 $main::OO_SDK_HOME = $main::sdkpath;
42 $main::OO_SDK_HOME_SUGGESTION = $main::sdkpath;
44 $main::OFFICE_HOME = "";
46 $main::OO_SDK_MAKE_HOME = "";
47 $main::makeName = "make";
48 if ( $main::operatingSystem =~ m/solaris/ ||
49 $main::operatingSystem =~ m/freebsd/ || $main::operatingSystem =~ m/dragonfly/ )
51 $main::makeName = "gmake";
53 $main::OO_SDK_MAKE_HOME_SUGGESTION = searchprog($main::makeName);
54 $main::makeVersion = "3.79.1";
55 $main::correctVersion = 0;
57 $main::OO_SDK_ZIP_HOME = "";
58 $main::OO_SDK_ZIP_HOME_SUGGESTION = searchprog("zip");
59 $main::zipVersion = "2.3";
61 $main::OO_SDK_CAT_HOME = "";
62 $main::OO_SDK_CAT_HOME_SUGGESTION = searchprog("cat");
66 $main::OO_SDK_SED_HOME = "";
67 $main::OO_SDK_SED_HOME_SUGGESTION = searchprog("sed");
71 $main::OO_SDK_CPP_HOME = "";
72 $main::cppName = "gcc";
73 $main::cppVersion = "4.0.1";
74 $main::OO_SDK_CPP_HOME_SUGGESTION = searchprog($main::cppName);
76 $main::OO_SDK_JAVA_HOME = "";
77 $main::OO_SDK_JAVA_HOME_SUGGESTION = searchprog("javac");
78 $main::javaVersion = "1.6";
80 $main::SDK_AUTO_DEPLOYMENT = "";
81 $main::SDK_AUTO_DEPLOYMENT_SUGGESTION = "YES";
83 $main::OO_SDK_OUTPUT_DIR_SUGGESTION = "$ENV{HOME}";
84 $main::OO_SDK_OUTPUT_DIR = "";
85 $main::skipOutputDir = 0;
87 $main::return = 0;
89 if ( $main::operatingSystem =~ m/darwin/ )
91 print " Used SDK = $main::OO_SDK_HOME\n\n";
93 $main::OFFICE_HOME_SUGGESTION = searchMacOffice();
94 while ( (! -d "$main::OFFICE_HOME" ) ||
95 ((-d "$main::OFFICE_HOME") && (! -d "$main::OFFICE_HOME/Contents/MacOS")) )
97 print " Enter the Office installation directory [$main::OFFICE_HOME_SUGGESTION]: ";
98 $main::OFFICE_HOME = readStdIn();
99 chop($main::OFFICE_HOME);
100 if ( $main::OFFICE_HOME eq "" )
102 $main::OFFICE_HOME = $main::OFFICE_HOME_SUGGESTION;
105 if ( ! -d "$main::OFFICE_HOME" )
107 $main::OFFICE_HOME = "";
114 $main::OFFICE_HOME_SUGGESTION = searchoffice();
116 if ( $main::OFFICE_HOME_SUGGESTION eq "" ) {
118 $main::OFFICE_HOME_SUGGESTION = searchprog("soffice");
121 if ( ! $main::OFFICE_HOME_SUGGESTION eq "" )
123 my $tmpOffice = readlink "$main::OFFICE_HOME_SUGGESTION/soffice";
127 $tmpOffice = "$main::OFFICE_HOME_SUGGESTION/soffice";
133 $main::OFFICE_HOME_SUGGESTION = substr($tmpOffice, 0, $offset);
139 $main::OFFICE_HOME_SUGGESTION = substr($tmpOffice, 0, $offset);
142 $main::OFFICE_HOME_SUGGESTION = "";
147 while ( (! -d "$main::OFFICE_HOME" ) ||
148 ((-d "$main::OFFICE_HOME") && (! -d "$main::OFFICE_HOME/program")) )
150 print " Enter the Office installation directory [$main::OFFICE_HOME_SUGGESTION]: ";
151 $main::OFFICE_HOME = readStdIn();
152 chop($main::OFFICE_HOME);
153 if ( $main::OFFICE_HOME eq "" )
155 $main::OFFICE_HOME = $main::OFFICE_HOME_SUGGESTION;
158 if ( ! -d "$main::OFFICE_HOME" )
160 $main::OFFICE_HOME = "";
165 if ( (! -d "$main::OFFICE_HOME/program") && (-e "$main::OFFICE_HOME/soffice") )
172 $main::OFFICE_HOME = "";
176 $main::OFFICE_HOME = $soserver;
184 while ( (!$main::correctVersion) &&
185 ((! -d "$main::OO_SDK_MAKE_HOME" ) ||
186 ((-d "$main::OO_SDK_MAKE_HOME") && (! -e "$main::OO_SDK_MAKE_HOME/$main::makeName"))) )
188 …print " Enter GNU make ($main::makeVersion or higher) tools directory [$main::OO_SDK_MAKE_HOME_SUG…
189 $main::OO_SDK_MAKE_HOME = readStdIn();
190 chop($main::OO_SDK_MAKE_HOME);
191 if ( $main::OO_SDK_MAKE_HOME eq "" )
193 $main::OO_SDK_MAKE_HOME = $main::OO_SDK_MAKE_HOME_SUGGESTION;
195 if ( (! -d "$main::OO_SDK_MAKE_HOME") ||
196 ((-d "$main::OO_SDK_MAKE_HOME") && (! -e "$main::OO_SDK_MAKE_HOME/$main::makeName")) )
198 $main::OO_SDK_MAKE_HOME = "";
203 my $testVersion = `$OO_SDK_MAKE_HOME/$main::makeName --version`;
207 … print " GNU make version $main::makeVersion can be obtained at ftp://ftp.gnu.org/gnu/make/\n";
214 …$main::correctVersion = testVersion($main::makeVersion, $testVersion, "$main::OO_SDK_MAKE_HOME/$ma…
215 if ( !$main::correctVersion )
217 … print " The '$main::makeName' command found at '$main::OO_SDK_MAKE_HOME' has a wrong version\n";
218 $main::OO_SDK_MAKE_HOME = "";
225 $main::correctVersion = 0;
226 while ( (!$main::correctVersion) &&
227 ((! -d "$main::OO_SDK_ZIP_HOME" ) ||
228 ((-d "$main::OO_SDK_ZIP_HOME") && (! -e "$main::OO_SDK_ZIP_HOME/zip"))) )
230 …print " Enter zip ($main::zipVersion or higher) tool directory [$main::OO_SDK_ZIP_HOME_SUGGESTION]…
231 $main::OO_SDK_ZIP_HOME = readStdIn();
232 chop($main::OO_SDK_ZIP_HOME);
233 if ( $main::OO_SDK_ZIP_HOME eq "" )
235 $main::OO_SDK_ZIP_HOME = $main::OO_SDK_ZIP_HOME_SUGGESTION;
237 if ( (! -d "$main::OO_SDK_ZIP_HOME") ||
238 ((-d "$main::OO_SDK_ZIP_HOME") && (! -e "$main::OO_SDK_ZIP_HOME/zip")) )
240 $main::OO_SDK_ZIP_HOME = "";
250 print " zip version $main::zipVersion can be obtained at ftp://www.info-zip.org/\n";
257 …$main::correctVersion = testVersion($main::zipVersion, $testVersion, "$main::OO_SDK_MAKE_HOME/zip"…
258 if ( !$main::correctVersion )
260 print " The 'zip' command found at '$main::OO_SDK_ZIP_HOME' has a wrong version\n";
261 $main::OO_SDK_ZIP_HOME = "";
268 $main::correctVersion = 0;
269 while ( (!$main::correctVersion) &&
270 ((! -d "$main::OO_SDK_CAT_HOME" ) ||
271 ((-d "$main::OO_SDK_CAT_HOME") && (! -e "$main::OO_SDK_CAT_HOME/cat"))) )
273 print " Enter cat tool directory [$main::OO_SDK_CAT_HOME_SUGGESTION]: ";
274 $main::OO_SDK_CAT_HOME = readStdIn();
275 chop($main::OO_SDK_CAT_HOME);
276 if ( $main::OO_SDK_CAT_HOME eq "" )
278 $main::OO_SDK_CAT_HOME = $main::OO_SDK_CAT_HOME_SUGGESTION;
280 if ( (! -d "$main::OO_SDK_CAT_HOME") ||
281 ((-d "$main::OO_SDK_CAT_HOME") && (! -e "$main::OO_SDK_CAT_HOME/cat")) )
283 $main::OO_SDK_CAT_HOME = "";
292 $main::correctVersion = 0;
293 while ( (!$main::correctVersion) &&
294 ((! -d "$main::OO_SDK_SED_HOME" ) ||
295 ((-d "$main::OO_SDK_SED_HOME") && (! -e "$main::OO_SDK_SED_HOME/sed"))) )
297 print " Enter sed tool directory [$main::OO_SDK_SED_HOME_SUGGESTION]: ";
298 $main::OO_SDK_SED_HOME = readStdIn();
299 chop($main::OO_SDK_SED_HOME);
300 if ( $main::OO_SDK_SED_HOME eq "" )
302 $main::OO_SDK_SED_HOME = $main::OO_SDK_SED_HOME_SUGGESTION;
304 if ( (! -d "$main::OO_SDK_SED_HOME") ||
305 ((-d "$main::OO_SDK_SED_HOME") && (! -e "$main::OO_SDK_SED_HOME/sed")) )
307 $main::OO_SDK_SED_HOME = "";
316 $main::correctVersion = 0;
317 while ( (!$main::correctVersion) &&
318 ((! -d "$main::OO_SDK_CPP_HOME" ) ||
319 ((-d "$main::OO_SDK_CPP_HOME") && (! -e "$main::OO_SDK_CPP_HOME/$main::cpp"))) )
326 print " where the compiler is located (optional) [$main::OO_SDK_CPP_HOME_SUGGESTION]: ";
328 $main::OO_SDK_CPP_HOME = readStdIn();
329 chop($main::OO_SDK_CPP_HOME);
330 if ( $main::OO_SDK_CPP_HOME eq "" )
332 $main::OO_SDK_CPP_HOME = $main::OO_SDK_CPP_HOME_SUGGESTION;
335 if ( ! $main::OO_SDK_CPP_HOME eq "" )
337 if ( (! -d "$main::OO_SDK_CPP_HOME") ||
338 ((-d "$main::OO_SDK_CPP_HOME") && (! -e "$main::OO_SDK_CPP_HOME/$main::cppName")) )
340 print " Error: Could not find directory '$main::OO_SDK_CPP_HOME'.\n";
343 $main::correctVersion = 1;
345 $main::OO_SDK_CPP_HOME = "";
349 if ( $main::cppName eq "gcc" )
351 my $testVersion = `$OO_SDK_CPP_HOME/$main::cppName -dumpversion`;
354 … print " The '$main::cppName' command found at $main::OO_SDK_CPP_HOME/$main::cppName is not a ";
356 … print " directory.\nA GNU compiler version $main::cppVersion can be obtained at ";
360 …$main::correctVersion = testVersion($main::cppVersion, $testVersion, "$main::OO_SDK_CPP_HOME/$main…
361 if ( !$main::correctVersion )
363 … print " The '$main::cppName' command found at '$main::OO_SDK_CPP_HOME' has a wrong version\n";
366 $main::correctVersion = 1;
369 $main::OO_SDK_CPP_HOME = "";
377 $main::correctVersion = 1;
383 $main::correctVersion = 0;
386 $main::offset = rindex($main::OO_SDK_JAVA_HOME_SUGGESTION, "/bin");
387 if ( $main::offset != -1 )
389 … $main::OO_SDK_JAVA_HOME_SUGGESTION = substr($main::OO_SDK_JAVA_HOME_SUGGESTION, 0, $main::offset);
392 while ( (!$main::correctVersion) &&
393 ((! -d "$main::OO_SDK_JAVA_HOME" ) ||
394 ((-d "$main::OO_SDK_JAVA_HOME") && (! -e "$main::OO_SDK_JAVA_HOME/bin/javac"))) )
396 …print " Enter Java SDK (1.6 or higher) installation directory (optional) [$main::OO_SDK_JAVA_HOME_…
397 $main::OO_SDK_JAVA_HOME = readStdIn();
398 chop($main::OO_SDK_JAVA_HOME);
399 if ( $main::OO_SDK_JAVA_HOME eq "" )
401 $main::OO_SDK_JAVA_HOME = $main::OO_SDK_JAVA_HOME_SUGGESTION;
403 if ( ! $main::OO_SDK_JAVA_HOME eq "" )
405 if ( (! -d "$main::OO_SDK_JAVA_HOME") ||
406 ((-d "$main::OO_SDK_JAVA_HOME") && (! -e "$main::OO_SDK_JAVA_HOME/bin/javac")) )
408 …print " Error: Could not find directory '$main::OO_SDK_JAVA_HOME' or '$main::OO_SDK_JAVA_HOME/bin/…
411 $main::correctVersion = 1;
413 $main::OO_SDK_JAVA_HOME = "";
417 …my $testVersion = `$main::OO_SDK_JAVA_HOME/bin/java -version 2>&1 | egrep "java version" | head -n…
420 …$main::correctVersion = testVersion($main::javaVersion, $testVersion, "$main::OO_SDK_JAVA_HOME/bin…
421 if ( !$main::correctVersion )
425 $main::correctVersion = 1;
427 $main::OO_SDK_JAVA_HOME = "";
433 $main::correctVersion = 1;
439 while ( (!$main::skipOutputDir) &&
440 (! -d "$main::OO_SDK_OUTPUT_DIR") )
443 …xistent directory if you prefer a different output directory (optional) [$main::OO_SDK_OUTPUT_DIR_…
445 $main::OO_SDK_OUTPUT_DIR = readStdIn();
447 chop($main::OO_SDK_OUTPUT_DIR);
448 if ( $main::OO_SDK_OUTPUT_DIR eq "" )
450 $main::OO_SDK_OUTPUT_DIR = $main::OO_SDK_OUTPUT_DIR_SUGGESTION;
452 if ( ! $main::OO_SDK_OUTPUT_DIR eq "" )
454 if ( ! -d "$main::OO_SDK_OUTPUT_DIR" )
456 print " Error: Could not find directory '$main::OO_SDK_OUTPUT_DIR'.\n";
459 $main::skipOutputDir = 1;
461 $main::OO_SDK_OUTPUT_DIR = "";
466 $main::skipOutputDir = 1;
471 while ( $main::SDK_AUTO_DEPLOYMENT eq "" ||
472 ((! $main::SDK_AUTO_DEPLOYMENT eq "YES") &&
473 (! $main::SDK_AUTO_DEPLOYMENT eq "NO")) )
475 …print " Automatic deployment of UNO components (YES/NO) [$main::SDK_AUTO_DEPLOYMENT_SUGGESTION]: ";
476 $main::SDK_AUTO_DEPLOYMENT = uc <STDIN>;
477 chop($main::SDK_AUTO_DEPLOYMENT);
478 if ( $main::SDK_AUTO_DEPLOYMENT eq "" )
480 $main::SDK_AUTO_DEPLOYMENT = "YES";
485 chmod 0644, "$main::OO_SDK_CONFIG_HOME/$main::hostname/setsdkenv_unix.sh";
493 print " * \"$main::OO_SDK_CONFIG_HOME/$main::hostname/setsdkenv_unix.sh\"\n";
554 if ( $main::operatingSystem =~ m/darwin/ ) {
563 if ( $main::operatingSystem =~ m/solaris/ ) {
572 if ( $_search eq "gmake" && $main::operatingSystem =~ m/solaris/ ) {
623 my $offset = rindex($main::sdkpath, "/libreoffice");
624 my $tmpOffice = substr($main::sdkpath, 0, $offset);
636 my $tmpversion = $main::OO_MAJORVERSION;
648 $officepath = $main::sdkpath . "/..";
653 my $tmpversion = $main::OO_MAJORVERSION + 6;
654 if ( $main::OO_MINORVERSION > 0) {
655 $tmpversion = "$tmpversion.$main::OO_MINORVERSION";
750 if ( ! -d "$main::OO_SDK_CONFIG_HOME/$main::hostname" )
752 system("mkdir -p $main::OO_SDK_CONFIG_HOME/$main::hostname");
755 …open ( FILEIN, "$main::sdkpath/$inputFile" ) || die "\nERROR: could not open '$main::sdkpath/$inpu…
756 …n ( FILEOUT, ">$main::OO_SDK_CONFIG_HOME/$main::hostname/$outputFile" ) || die "\nERROR: could not…
760 $_ =~ s#\@OO_SDK_NAME\@#$main::OO_SDK_NAME#go;
761 $_ =~ s#\@OO_SDK_HOME\@#$main::OO_SDK_HOME#go;
762 $_ =~ s#\@OFFICE_HOME\@#$main::OFFICE_HOME#go;
763 $_ =~ s#\@OO_SDK_MAKE_HOME\@#$main::OO_SDK_MAKE_HOME#go;
764 $_ =~ s#\@OO_SDK_ZIP_HOME\@#$main::OO_SDK_ZIP_HOME#go;
765 $_ =~ s#\@OO_SDK_CAT_HOME\@#$main::OO_SDK_CAT_HOME#go;
766 $_ =~ s#\@OO_SDK_SED_HOME\@#$main::OO_SDK_SED_HOME#go;
767 $_ =~ s#\@OO_SDK_CPP_HOME\@#$main::OO_SDK_CPP_HOME#go;
768 $_ =~ s#\@OO_SDK_JAVA_HOME\@#$main::OO_SDK_JAVA_HOME#go;
769 $_ =~ s#\@SDK_AUTO_DEPLOYMENT\@#$main::SDK_AUTO_DEPLOYMENT#go;
770 $_ =~ s#\@OO_SDK_OUTPUT_DIR\@#$main::OO_SDK_OUTPUT_DIR#go;