xref: /AOO41X/main/set_soenv.in (revision 5b11f0d37479a367cdfcf80f0923ccbf6b49ec3b)
1#!@PERL@ -w
2#
3###############################################################
4#
5#  Licensed to the Apache Software Foundation (ASF) under one
6#  or more contributor license agreements.  See the NOTICE file
7#  distributed with this work for additional information
8#  regarding copyright ownership.  The ASF licenses this file
9#  to you under the Apache License, Version 2.0 (the
10#  "License"); you may not use this file except in compliance
11#  with the License.  You may obtain a copy of the License at
12#
13#    http://www.apache.org/licenses/LICENSE-2.0
14#
15#  Unless required by applicable law or agreed to in writing,
16#  software distributed under the License is distributed on an
17#  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
18#  KIND, either express or implied.  See the License for the
19#  specific language governing permissions and limitations
20#  under the License.
21#
22###############################################################
23
24#---------------------------------------------------------------------------
25# Description:
26# set_soenv generates a file that contains all necessary
27# environment variables for the build proces of OpenOffice
28# on Linux, NetBSD, Solaris, Windows NT and Mac OS X/Darwin.
29#
30# Program steps.
31#
32# I.    Checking the command-line arguments.
33# IIa.  Declaring variables for the system commands, etc.
34# IIb.  Declaring the environment variables.
35# III.  Initialising the variables for the system commands, etc.
36# IV.   Print out some important messages etc.
37# V.    Initialising the environment variables.
38# VI.   Open the output file.
39# VII.  Writing the data to the output file.
40# VIII. Closing output file.
41# IX.   Sourcing the output file.
42# X.    Set up the build environment.
43# XI.   Moving the output file to the build home directory.
44#
45#---------------------------------------------------------------------------
46#
47use strict;                        # pragma
48use File::Basename;
49
50
51#
52#--------------------------------------------------------
53# IIa. Declaring variables for the system commands, etc.
54#--------------------------------------------------------
55#
56my ( $outfile, $outfile_sh, $outfile_bat, $bootfile, $newline, $comment,
57     $compiler, $unsetenv, $setenv, $unset, $set, $ds, $ps,
58     $wps, $cur_dir, $par_dir, $I, $L, $D, $buildenv, $answer, $tmp, $MINGW,
59     $USE_MINGW, $platform,
60     $cygwinver, $empty, $no_ant, $no_stl, $no_gcc_include,
61     $no_gxx_include, $warnfile, $Warning, $result, $unsetvars, $unsetvarssh, $unsetvarsbat, $exportvars, $win_format_var, $perl_os, @mingw_lib_include_paths, $mingw_lib_include_path);
62#
63#-------------------------------------------------
64# IIb. Declaring environment values (constants).
65#-------------------------------------------------
66#
67# Platform independent constant values.
68my @DICTIONARIES = ("DADK", "DEDE", "ENGB", "ENUS", "HUHU", "ITIT", "RURU", "THTH", "SWTZ" );
69my ( $CALL_CDECL, $COMMON_OUTDIR, $BMP_WRITES_FLAG,
70     $common_build, $NO_REC_RES, $SO3, $SOLAR_JAVA,
71     $SOLAR_PLUGIN, $UPDATER, $BUILD_DELIVER, $VCL,
72     $CC, $CXX,
73     $BUILD_SOSL, $ENABLEUNICODE, $NEW_JAR_PACK, $NO_BSYMBOLIC,
74     $BUILD_SOSL_RELEASE, $RSC_ONCE );
75#
76# Platform dependent constant values.
77my ( $BIG_SVX, $COM, $ARCH, $CPU, $CPUNAME, $CVER, $GLIBC, $GUI, $GUIBASE,
78      $GVER, $OS, $OSVERSION, $OUTPATH, $INPATH, $PATH_SEPERATOR,
79      $DYNAMIC_CRT, $SET_EXCEPTIONS, $use_shl_versions, $CDPATHx, $JRELIBDIR,
80      $JRETOOLKITDIR, $JRETHREADDIR,
81      $FLIPCMD );
82#
83#-------------------------------------------
84# IIc. Declaring the environment variables.
85#-------------------------------------------
86#
87# Help variables.
88my ( $USR, $ETC, $BIN, $LIB, $LIB64, $INC, $INCLUDE, $DEV, $OPT, $LOCAL, $SOLENV, $SOLVER, $CONFIG,
89     $USR_BIN, $USR_LIB, $USR_LOCAL, $USR_CCS, $JAVA_BIN, $JAVA_LIB, $JAVA_INCLUDE,
90     $SOLARENVINC, $USR_DT, $USR_OPENWIN, $XLIB, $XINC,
91     $CYGWIN_PATH, $language, $dict, $ASM_PATH, $NSIS_PATH, $PERL_PATH );
92
93# Environment variables.
94my ( $oldPATH, $SRC_ROOT, $SO_HOME, $JAVA_HOME, $JDK, $JAVAFLAGS, $OOO_SHELL,
95     $UPD, $WORK_STAMP, $SOURCE_ROOT_DIR , $gb_REPOS,
96     $SOLARSRC, $DEVROOT, $SOLARVER, $SOLARVERSION, $WORKDIR, $OUTDIR, $SOLARENV,
97     $STAR_INIROOT, $STAR_INIROOTOLD, $STAR_STANDLST, $STAR_SSCOMMON, $STAR_SSOLARINI,
98     $DMAKEROOT, $CLASSPATH, $XCLASSPATH, $COMPATH, $CXX_X64_BINARY, $LINK_X64_BINARY, $LIBMGR_X64_BINARY,
99     $MSPDB_PATH, $MIDL_PATH, $CSC_PATH, $MACOSX_DEPLOYMENT_TARGET, $MACOSX_SDK_PATH,
100     $PATH, $SOLAREXTRAINC, $SOLAREXTRALIB, $SOLARLIB,
101     $SOLARINC, $LOCALINI, $FRAMEWORKSHOME, $COMEX, $PERL,
102     $COMP_ENV, $ILIB, $JAVAHOME, $PSDK_HOME, $DIRECTXSDK_LIB, $USE_NEW_SDK, $FRAME_HOME,
103     $USE_DIRECTX5, $ATL_LIB, $ATL_LIB_X64, $HAVE_ATLTHUNK, $ATL_INCLUDE, $MFC_LIB, $MFC_INCLUDE, $TMPDIR,
104     $COMMON_BUILD_TOOLS, $WIN_GREP, $WIN_FIND, $WIN_LS,
105     $WIN_GNUCOPY, $WIN_TOUCH, $MOZILLABUILD,
106	 $PROEXT, $TARFILE_LOCATION,
107     $ENABLE_HUNSPELL, $ENABLE_HYPHEN,
108     $SYSTEM_PYTHON, $EPM_FLAGS);
109#
110#-------------------------------------------
111# IId. Declaring the aliases.
112#-------------------------------------------
113#
114my ( $dmake, $build, $build_client, $nmake, $mkout, $deliver, $zipdep );
115#
116
117#-------------------------------------------------------------
118# IIIa. Initialising constants.
119#-------------------------------------------------------------
120#
121# $platform is needed for PathFormat()
122#
123$platform          = `./config.guess`;
124chomp( $platform );
125
126$UPD            = '@UPD@';          # the project's UPD
127$newline        = "\n";             # Perl newline character
128$unsetenv       = "unsetenv";       # c-shell command
129$setenv         = "setenv";         # c-shell command
130$unset          = "unset";          # msdos batch file command
131$set            = "set";            # msdos batch file command
132$ds             = "/";              # directory separator
133$ps             = ":";              # path separator
134$wps            = ":";              # path separator, will be set to ';' for windows later.
135$cur_dir        = ".";              # current directory
136$par_dir        = "..";             # parrent directory
137$I              = " -I";            # include search path
138$L              = " -L";            # library search path
139$D              = " -D";            # define search path
140$empty          = "";               # used as argument
141$warnfile       = "warn";           # logfile configure warnings.
142$Warning        = "";               # container for warning messages
143$SYSTEM_PYTHON	= '@SYSTEM_PYTHON@';
144$JDK 		= '@JDK@';
145$JAVAFLAGS 		= '@JAVAFLAGS@';
146$MINGW          = '@WITH_MINGWIN@'; # use MinGW for Windows build
147$USE_MINGW      = '@USE_MINGW@';     # use MinGW in cygwin or pure-mingw
148if ( $MINGW eq "yes" )
149{ $CC             = '@CC@';           # C compiler
150  $CXX            = '@CXX@'; }        # C++ compiler
151else
152{ $CC             = PathFormat('@CC@');           # C compiler
153  $CXX            = PathFormat('@CXX@'); }        # C++ compiler
154$FLIPCMD        = "";               # Flip '/' to '\' wrapper (only for winnt)
155$GLIBC          = "";               # Whether the platform uses glibc
156$PROEXT         = "@PROEXT@";
157$EPM_FLAGS	= "";
158
159# Required for OS/2 macro expansion
160my @unixroot='@unixroot';
161
162#
163#--------------------------------------------------------------------
164# IV. Initialise the warning container and print a note to the user.
165#--------------------------------------------------------------------
166#
167# Add the configure (pre-requisite) warnings to the warning container
168# , $Warning.
169AddWarning( "configure", "" );
170#
171print ("Setting up the environment for building Apache OpenOffice $newline");
172#
173#--------------------------------------------------
174# V. Setting the environment variables/values.
175#--------------------------------------------------
176#
177# A. Checking the platform first.
178#
179# get perls idea for OS
180# needed to differentiate cygwin/native perl on windows
181$perl_os = $^O;
182
183#
184# B. Gathering information from the system.
185#
186# 1. Path
187$oldPATH = $ENV{"PATH"};
188chomp( $oldPATH );                  # cut off new line
189#
190# C. Setting the constant values.
191#
192# Setting platform independent constant values.
193print "Setting platform independent values... ";
194# NB: Language options now set at 'ToFile' stage.
195$BMP_WRITES_FLAG      = "TRUE";
196$BUILD_SOSL_RELEASE   = "TRUE";
197$RSC_ONCE             = "TRUE";
198$CALL_CDECL           = "TRUE";
199$COMMON_OUTDIR        = "";
200$common_build         = "";
201$NO_REC_RES           = "TRUE";
202$SO3                  = "TRUE";
203$SOLAR_JAVA           = "@SOLAR_JAVA@";
204$SOLAR_PLUGIN         = "TRUE";
205$UPDATER              = "YES";
206$BUILD_DELIVER        = "true";
207$VCL                  = "TRUE";
208$BUILD_SOSL           = "true";
209$ENABLEUNICODE        = "TRUE";
210$NEW_JAR_PACK         = "TRUE";
211$NO_BSYMBOLIC         = "TRUE";
212$comment              = "#";           # UNIX script comment character
213$TARFILE_LOCATION = "@TARFILE_LOCATION@"; # where to find tarballs with external sources
214
215# Setting platform dependent constant values.
216if ( $platform =~ m/solaris/ )
217{     print "Setting Solaris specific values... ";
218   if ($platform =~ m/^i[3456]86/)
219   {
220      if ( $CC =~ "gcc") {
221         $outfile        = "SolarisX86GccEnv.Set";
222         $OUTPATH        = "unxsogi";
223      } else {
224         $outfile        = "SolarisX86Env.Set";
225         $OUTPATH        = "unxsoli4";
226      }
227      $CPU            = "I";
228      $CPUNAME        = "INTEL";
229	  $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
230	  $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."xawt";
231	  $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads";
232
233   }
234   else
235   {
236      if ( $CC =~ "gcc") {
237         $outfile        = "SolarisSparcGccEnv.Set";
238         $OUTPATH        = "unxsogs";
239      } else {
240         $outfile        = "SolarisSparcEnv.Set";
241         $OUTPATH        = "unxsols4";
242      }
243      $CPU            = "S";
244      $CPUNAME        = "SPARC";
245	  $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc";
246	  $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc".$ds."xawt";
247	  $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc".$ds."native_threads";
248   }
249
250   if ( $CC =~ "gcc") {
251       $COM            = "GCC";
252       $CVER           = "C300";
253   } else {
254       $COM            = "C52";
255       $CVER           = "C52";
256       $COMEX          = 4;
257   }
258   $BIG_SVX        = "TRUE";
259   $COMPATH        = '@COMPATH@';
260   $GUI            = "UNX";
261   $GUIBASE        = "unx";
262   $GVER           = "VCL";
263   $INPATH         = $OUTPATH.$PROEXT;
264   $OS             = "SOLARIS";
265   $PATH_SEPERATOR = $ps;
266}
267elsif ( $platform =~ m/netbsd/ )
268{
269#Set platform specific values:
270   if ($platform =~ m/^i[3456]86/)
271   {  print "Setting NetBSD x86 specific values... ";
272      $outfile        = "NetBSDX86Env.Set";
273      $CPU            = "I";
274      $CPUNAME        = "INTEL";
275      $OUTPATH        = "unxbsdi";
276      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
277      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."client";
278      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads";
279   }
280   elsif ($platform =~ m/^sparc/)
281   {  print "Setting NetBSD Sparc specific values... ";
282      $outfile        = "NetBSDSparcEnv.Set";
283      $CPU            = "S";
284      $CPUNAME        = "SPARC";
285      $OUTPATH        = "unxbsds";
286      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc";
287      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc".$ds."client";
288      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc".$ds."native_threads";
289   }
290   elsif ($platform =~ m/powerpc/)
291   {  print "Setting NetBSD PPC specific values... ";
292      $outfile        = "NetBSDPPCEnv.Set";
293      $CPU            = "P";
294      $CPUNAME        = "POWERPC";
295      $OUTPATH        = "unxbsdppc";
296      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc";
297      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."classic";
298      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."native_threads";
299   }
300   else
301   { print "Unsupported NetBSD architecture: $platform \n";
302     exit 1;
303   }
304   #Conditional setting depending on gcc3:
305      $CVER           = "C300";
306      $OUTPATH        = $OUTPATH."2";
307   # General NetBSD settings:
308      $BIG_SVX        = "TRUE";
309      $COM            = "GCC";
310      $COMPATH        = '@COMPATH@';
311      $GUI            = "UNX";
312      $GUIBASE        = "unx";
313      $GVER           = "VCL";
314      $INPATH         = $OUTPATH.$PROEXT;
315      $OS             = "NETBSD";
316      $PATH_SEPERATOR = $ps;
317}
318elsif ( $platform =~ m/kfreebsd/ )
319{
320# General GNU/kFreeBSD settings:
321      $CVER           = "C341";
322      $BIG_SVX        = "TRUE";
323      $COM            = "GCC";
324      $COMPATH        = '@COMPATH@';
325      $GLIBC          = "2REDHAT60";
326      $GUI            = "UNX";
327      $GUIBASE        = "unx";
328      $GVER           = "VCL";
329      $OS             = "LINUX";
330      $PATH_SEPERATOR = $ps;
331
332#Set platform specific values:
333   if ($platform =~ m/^i[3456]86/)
334   {  print "Setting GNU/kFreeBSD x86 specific values... ";
335      $outfile        = "GNUkFreeBSDX86Env.Set";
336      $CPU            = "I";
337      $CPUNAME        = "INTEL";
338      $OUTPATH        = "unxkfgi6";
339
340      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
341      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."client";
342      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads";
343
344   }
345   elsif ($platform =~ m/^x86_64/)
346   {  print "Setting GNU/kFreeBSD x86-64 specific values... ";
347      $outfile        = "GNUkFreeBSDX86-64Env.Set";
348      $CPU            = "X";
349      $CPUNAME        = "X86_64";
350      $OUTPATH        = "unxkfgx6";
351
352      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64";
353      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64".$ds."server";
354      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64".$ds."native_threads";
355   }
356
357   $INPATH         = $OUTPATH.$PROEXT;
358}
359elsif ( $platform =~ m/freebsd/ )
360{     $BIG_SVX        = "TRUE";
361      $COM            = "GCC";
362      $COMPATH        = '@COMPATH@';
363      $CVER           = "C300";
364      $GUI            = "UNX";
365      $GUIBASE        = "unx";
366      $GVER           = "VCL";
367      $OS             = "FREEBSD";
368      $PATH_SEPERATOR = $ps;
369      $OSVERSION      = '@OSVERSION@';
370   if (($platform =~ m/^amd64/) || ($platform =~ m/^x86_64/))
371   {  my ( $JAVA_OS );
372      print "Setting FreeBSD AMD64 specific values... ";
373      $outfile        = "FreeBSDAMDEnv.Set";
374      $CPU            = "X";
375      $CPUNAME        = "X86_64";
376      $OUTPATH        = "unxfbsdx";
377      $JAVA_OS        = '@JAVA_HOME@';
378      $JAVA_OS        =~ s/.*\///;
379      if ($JAVA_OS =~ m/^linux/)
380      {  $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
381         $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."client";
382         $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads";
383      }
384      else
385      {  $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64";
386         $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64".$ds."server";
387         $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64".$ds."native_threads";
388      }
389   }
390   elsif ($platform =~ m/^i386/)
391   {  print "Setting FreeBSD x86 specific values... ";
392      $outfile        = "FreeBSDX86Env.Set";
393      $CPU            = "I";
394      $CPUNAME        = "INTEL";
395      $OUTPATH        = "unxfbsdi";
396      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
397      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."client";
398      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads";
399   }
400   else
401   {  print "Unsupported FreeBSD architecture: $platform \n";
402         exit 1;
403   }
404   if( @GCCVER@ >= 30401 ) {
405      $CVER        = "C341";
406   }
407      $INPATH         = $OUTPATH.$PROEXT;
408}
409elsif ( $platform =~ m/linux/ )
410{
411# General Linux settings:
412      $CVER           = "C341";
413      $BIG_SVX        = "TRUE";
414      $COM            = "GCC";
415      $COMPATH        = '@COMPATH@';
416      $GLIBC          = "2REDHAT60";
417      $GUI            = "UNX";
418      $GUIBASE        = "unx";
419      $GVER           = "VCL";
420      $OS             = "LINUX";
421      $PATH_SEPERATOR = $ps;
422
423#Set platform specific values:
424   if ($platform =~ m/^i[3456]86/)
425   {  print "Setting Linux x86 specific values... ";
426      $outfile        = "LinuxX86Env.Set";
427      $CPU            = "I";
428      $CPUNAME        = "INTEL";
429
430      if ($JDK =~ m/^[Ii][Bb][Mm]/)
431      { $JRELIBDIR     = '$JAVA_HOME'.$ds."jre".$ds."bin";
432        $JRETOOLKITDIR = '$JAVA_HOME'.$ds."jre".$ds."bin".$ds."classic";
433        $JRETHREADDIR  = '$JAVA_HOME'.$ds."jre".$ds."bin"; }
434
435      elsif ($JDK =~ m/^[Bb][Ee][Aa]/)
436      { $JRELIBDIR     = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
437        $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."jrockit";
438        $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads"; }
439
440      else {
441      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386";
442      # has both server and client
443      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."client";
444      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."i386".$ds."native_threads";
445      }
446
447      $OUTPATH     = "unxlngi6";
448   }
449   elsif ($platform =~ m/^x86_64/)
450   {  print "Setting Linux x86-64 specific values... ";
451      $outfile        = "LinuxX86-64Env.Set";
452      $CPU            = "X";
453      $CPUNAME        = "X86_64";
454      $OUTPATH        = "unxlngx6";
455      # Blackdown.org JDK porting project uses `amd64' and `server' in JDK 1.4.2 RC1
456      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64";
457      # has both server and client
458      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64".$ds."server";
459      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."amd64".$ds."native_threads";
460   }
461   elsif ($platform =~ m/^ia64/)
462   {  print "Setting Linux ia64 specific values... ";
463      $outfile        = "LinuxIA64Env.Set";
464      $CPU            = "A";
465      $CPUNAME        = "IA64";
466      $OUTPATH        = "unxlnga";
467      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ia64";
468      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ia64".$ds."server";
469      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ia64".$ds."native_threads";
470   }
471   elsif ($platform =~ m/^sparc/)
472
473   {  print "Setting Linux Sparc specific values... ";
474      $outfile        = "LinuxSparcEnv.Set";
475      $CPU            = "S";
476      $CPUNAME        = "SPARC";
477      $OUTPATH        = "unxlngs";
478      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc";
479      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc".$ds."server";
480      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."sparc".$ds."native_threads";
481   }
482   elsif ($platform =~ m/^powerpc/)
483   {
484      if (($platform =~ m/^powerpc64/) && ('@SIZEOF_LONG@' eq '8')) {
485         print "Setting Linux PPC64 specific values... ";
486         $outfile = "LinuxPPC64Env.Set";
487         $OUTPATH = "unxlngppc64";
488         $CPUNAME = "POWERPC64";
489
490         if ( $JDK eq "gcj" ) {
491            $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc64";
492            $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc64".$ds."client";
493            $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc64".$ds."native_threads";
494         }
495      }
496      else {
497         print "Setting Linux PPC specific values... ";
498         $outfile = "LinuxPPCEnv.Set";
499         $OUTPATH = "unxlngppc";
500         $CPUNAME = "POWERPC";
501
502         if ( $JDK eq "gcj" ) {
503            $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc";
504            $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."client";
505            $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."native_threads"; }
506         elsif ($JDK =~ m/^[Ii][Bb][Mm]/)
507         {  $JRELIBDIR     = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc";
508            $JRETOOLKITDIR = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."classic";
509            $JRETHREADDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc";
510         }
511	 # OpenJDK
512	 elsif ($JDK =~ m/sun/) {
513	    $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc";
514	    $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."server";
515	    $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."native_threads";
516	 }
517      }
518
519      $CPU            = "P";
520
521   }
522   elsif ($platform =~ m/^s390/)
523   {
524      if (($platform =~ m/^s390x/) && ('@SIZEOF_LONG@' eq '8')) {
525         print "Setting Linux zSeries specific values... ";
526         $outfile        = "LinuxS390XEnv.Set";
527         $CPUNAME        = "S390X";
528	 $ARCH           = "s390x";
529         $OUTPATH        = "unxlngs390x";
530      }
531      else {
532         print "Setting Linux S/390 specific values... ";
533         $outfile        = "LinuxS390Env.Set";
534         $CPUNAME        = "S390";
535	 $ARCH           = "s390";
536         $OUTPATH        = "unxlngs390";
537      }
538      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds.$ARCH;
539      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds.$ARCH.$ds."server";
540      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds.$ARCH.$ds."native_threads";
541      $CPU            = "3";
542   }
543   elsif ($platform =~ m/^m68k/)
544   {  print "Setting Linux m68k specific values... ";
545      $outfile        = "LinuxM68KEnv.Set";
546      $CPU            = "6";
547      $CPUNAME        = "M68K";
548      $OUTPATH        = "unxlngm68k";
549      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."m68k";
550      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."m68k".$ds."server";
551      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."m68k".$ds."native_threads";
552   }
553   elsif ($platform =~ m/^hppa/)
554   {  print "Setting Linux hppa specific values... ";
555      $outfile        = "LinuxHPPAEnv.Set";
556      $CPU            = "H";
557      $CPUNAME        = "HPPA";
558      $OUTPATH        = "unxlnghppa";
559      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."hppa";
560      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."hppa".$ds."server";
561      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."hppa".$ds."native_threads";
562      $EPM_FLAGS      = "-a hppa";
563   }
564   elsif ($platform =~ m/^alpha/)
565   {  print "Setting Linux Alpha specific values... ";
566      $outfile        = "LinuxAlphaEnv.Set";
567      $CPU            = "L";
568      $CPUNAME        = "AXP";
569      $OUTPATH        = "unxlngaxp";
570      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."alpha";
571      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."alpha".$ds."server";
572      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."alpha".$ds."native_threads";
573   }
574   elsif ($platform =~ m/^arm.*?l-/)
575   {  print "Setting Linux ARM specific values... ";
576      $outfile        = "LinuxARMEnv.Set";
577      $CPU            = "R";
578      $CPUNAME        = "ARM";
579      $OUTPATH        = "unxlngr";
580      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."arm";
581      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."arm".$ds."server";
582      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."arm".$ds."native_threads";
583      $EPM_FLAGS      = "-a arm";
584   }
585   elsif ($platform =~ m/^mips/)
586   {  print "Setting Linux MIPS specific values... ";
587      $outfile        = "LinuxMIPSEnv.Set";
588      $CPU            = "M";
589      $CPUNAME        = "GODSON";
590      $OUTPATH        = "unxlngmips";
591
592      if ('@SIZEOF_LONG@' eq '8') {
593        if ('@WORDS_BIGENDIAN@' ne 'yes') {
594          $EPM_FLAGS = "-a mips64el";
595          if ( $JDK eq "gcj" ) {
596	    $ARCH = "mips64el";
597          }
598        }
599        else {
600          $ARCH = "mips64";
601        }
602      }
603      else {
604        if ('@WORDS_BIGENDIAN@' ne 'yes') {
605          $EPM_FLAGS = "-a mipsel";
606	  if ( $JDK =~ m/sun/ && -d "@JAVA_HOME@".$ds."jre".$ds."lib".$ds."mips32" ) {
607	   $ARCH = "mips32"; # Lemote
608	  } else {
609	   $ARCH = "mipsel";
610 	  }
611        }
612        else {
613          $ARCH = "mips";
614        }
615      }
616
617      $JRELIBDIR      = '$JAVA_HOME'.$ds."lib".$ds.$ARCH;
618      if ( $JDK =~ m/sun/ && -d "@JAVA_HOME@".$ds."jre".$ds."lib".$ds."mips32" ) {
619      	$JRETOOLKITDIR  = '$JAVA_HOME'.$ds."lib".$ds.$ARCH.$ds."client"; # Lemote
620      } else {
621      	$JRETOOLKITDIR  = '$JAVA_HOME'.$ds."lib".$ds.$ARCH.$ds."server";
622      }
623      $JRETHREADDIR   = '$JAVA_HOME'.$ds."lib".$ds.$ARCH.$ds."native_threads";
624   }
625
626
627   $INPATH         = $OUTPATH.$PROEXT;
628}
629elsif ( $platform =~ m/osf1/ )
630{     print "Setting Tru64 specific values... ";
631      $outfile        = "Tru64AlphaEnv.Set";
632      $BIG_SVX        = "TRUE";
633      $COM            = "CXX";
634      $COMPATH        = '@COMPATH@';
635      $CPU            = "A";
636      $CPUNAME        = "ALPHA_";
637      $CVER           = "C62";
638      $GUI            = "UNX";
639      $GUIBASE        = "unx";
640      $GVER           = "VCL";
641      $OUTPATH        = "unxt64";
642      $INPATH         = $OUTPATH.$PROEXT;
643      $OS             = "TRU64";
644      $PATH_SEPERATOR = $ps;
645      $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."alpha";
646      $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."alpha".$ds."client";
647      $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."alpha".$ds."native_threads";
648}
649elsif ( $platform =~ m/cygwin/ )
650{
651      $MSPDB_PATH     = PathFormat('@MSPDB_PATH@');
652      $MIDL_PATH      = PathFormat('@MIDL_PATH@');
653      $CSC_PATH       = PathFormat('@CSC_PATH@');
654      $PSDK_HOME      = PathFormat('@PSDK_HOME@');
655      $DIRECTXSDK_LIB = PathFormat('@DIRECTXSDK_LIB@');
656      $USE_DIRECTX5   = "";
657      $FRAME_HOME     = PathFormat('@FRAME_HOME@');
658      $USE_NEW_SDK    = "TRUE";
659      $CPUNAME        = "INTEL";
660      $CPU            = "I";
661      $GUI            = "WNT";
662      $GUIBASE        = "WIN";
663      $GVER           = "NT351";
664      $OS             = "WNT";
665      $DYNAMIC_CRT    = "TRUE";
666      $SET_EXCEPTIONS = "TRUE";
667      $use_shl_versions = "TRUE";
668      $wps = ';'; # Windows style path seperator
669  if ( $MINGW eq "yes" )
670  {   # At the moment this implies the use of tcsh
671      print "Setting Windows NT cygwin MinGW specific values... ";
672      $FLIPCMD        = "slfl.pl";
673      $PATH_SEPERATOR = ';';
674      $outfile        = "winmingw.set";
675      $COMPATH        = PathFormat('@COMPATH@/bin');
676      $COMPATH        =~ s/\/bin$//i;
677      $COM            = "GCC";
678      $CVER           = "C341";
679      $OUTPATH        = "wntgcci";
680      $INPATH         = $OUTPATH.$PROEXT;
681      $ATL_INCLUDE = '$SOLARVER'.$ds.'$INPATH'.$ds."inc".$ds."external".$ds."mingw".$ds."include".$ds."atl". " ".'$PSDK_HOME'.$ds."include".$ds."atl";
682  }
683  else # The MSVC section starts here
684  {   $outfile        = "winenv.set";
685      $COMPATH        = PathFormat('@COMPATH@');
686      $CXX_X64_BINARY = PathFormat('@COMPATH@/bin/amd64/cl.exe');
687      $LINK_X64_BINARY = PathFormat('@COMPATH@/bin/amd64/link.exe');
688      $LIBMGR_X64_BINARY = PathFormat('@COMPATH@/bin/amd64/lib.exe');
689      $COM            = "MSC";
690      $OUTPATH        = "wntmsci@COMEX@";
691      $INPATH         = $OUTPATH.$PROEXT;
692      $COMEX          = '@COMEX@';
693      if ( "@COMEX@" eq "10" ) { # .NET 2003 needs M1310
694          $CVER        = "M1310";
695      } elsif ( "@COMEX@" ge "11" ) { # .NET 2005 needs M1400
696	  if ( "@COMEX@" eq "11" ) {
697	      $CVER        = "M1400";
698	  } elsif ( "@COMEX@" eq "12" ) {
699	      $CVER        = "M1500";
700	  } else {                   # Unsupported
701	      die "Unsupported value for COMEX variable.\n";
702	  }
703      }
704	  print "Setting W32 build with bash shell specific values... ";
705	  # No speacial treatment for CC an CXX anymore.
706	  $FLIPCMD        = "slfl.pl";
707	  $PATH_SEPERATOR = ';';
708  }
709}
710elsif ( $platform =~ m/os2/ )
711{
712      $COMPATH        = PathFormat('@COMPATH@');
713      $MSPDB_PATH     = PathFormat('@MSPDB_PATH@');
714      $MIDL_PATH      = PathFormat('@MIDL_PATH@');
715      $CSC_PATH       = PathFormat('@CSC_PATH@');
716      $PSDK_HOME      = PathFormat('@PSDK_HOME@');
717      $FRAME_HOME     = PathFormat('@FRAME_HOME@');
718      $USE_NEW_SDK    = "TRUE";
719      $CPUNAME        = "INTEL";
720      $CPU            = "I";
721      $GUI            = "OS2";
722      $GUIBASE        = "os2";
723      $GVER           = "VCL";
724      $OS             = "OS2";
725      $DYNAMIC_CRT    = "TRUE";
726      $SET_EXCEPTIONS = "TRUE";
727      $use_shl_versions = "TRUE";
728  {
729      print "Setting OS/2 gcc 3.3.5 specific values... \n";
730      $outfile        = "os2env.set";
731      $COM            = "GCC";
732      $CVER           = "C300";
733      $OUTPATH        = "os2gcci";
734      $INPATH         = $OUTPATH.$PROEXT;
735      $COMEX          = '@COMEX@';
736
737  {   print "Setting OS/2 with 4OS2 specific values... ";
738      # Change path to lower case.
739      $COMPATH        = lc $COMPATH;
740      $PATH_SEPERATOR = ';';
741      $ps = ';';
742      $wps = ';'; # Windows style path seperator
743  }
744
745  }
746}
747elsif ( $platform =~ m/darwin/ )
748{     print "Setting Mac OS X/Darwin specific values... ";
749      $BIG_SVX        = "TRUE";
750      $COMPATH        = '@COMPATH@';
751      print "Darwin platform = " . $platform ." ";
752      if( $CC =~ "gcc" )
753      {
754          print "Setting values for MacOSX/Darwin for Xcode<=3";
755          $COM            = "GCC";
756          $outfile        = "MacOSXX86Env.Set";
757          $CPU            = "I";
758          $CPUNAME        = "INTEL";
759          $OUTPATH        = "unxmacxi";
760      }
761      elsif ($platform =~ m/^i[3456]86/)
762      {
763          print "Setting values for MacOSX/Darwin on x86_32... ";
764          $COM            = "CLANG";
765          $outfile        = "MacOSXX32Env.Set";
766          $CPU            = "I";
767          $CPUNAME        = "INTEL";
768          $OUTPATH        = "unxmacci";
769      }
770      elsif ($platform =~ m/^x86_64/)
771      {
772          print "Setting values for MacOSX/Darwin on x86_64... ";
773          $COM            = "CLANG";
774          $outfile        = "MacOSXX64Env.Set";
775          $CPU            = "X";
776          $CPUNAME        = "X86_64";
777          $OUTPATH        = "unxmaccx";
778      }
779      else
780      {
781	  print "\nset_soenv: Unknown MacOSX/Darwin platform: $platform\n";
782	  exit 1;
783      }
784      $CVER           = "DUMMY_CVER";
785      $GUI            = "UNX";
786      $GVER           = "VCL";
787      $INPATH         = $OUTPATH.$PROEXT;
788      $OS             = "MACOSX";
789      $PATH_SEPERATOR = $ps;
790      # GUIBASE is set below; may be "aqua" or "unx".
791}
792elsif ( $platform =~ m/aix/ )
793{
794   if( $platform !~ m/^powerpc/ )
795   {
796	print "\nAIX has only been ported and tested on powerpc\n";
797	AddWarning( "set_soenv", "Platform $platform has not been tested");
798   }
799   print "Setting AIX PPC specific values... ";
800   $outfile        = "aixPPCEnv.Set";
801   $CPU            = "P";
802   $CPUNAME        = "POWERPC";
803   $OUTPATH        = "unxlngppc";
804   $JRELIBDIR      = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc";
805   $JRETOOLKITDIR  = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."classic";
806   $JRETHREADDIR   = '$JAVA_HOME'.$ds."jre".$ds."lib".$ds."ppc".$ds."native_threads";
807   $BIG_SVX        = "TRUE";
808   $COM            = "GCC";
809   $CVER           = "C300";
810   $COMPATH        = '@COMPATH@';
811   $GUI            = "UNX";
812   $GUIBASE        = "unx";
813   $GVER           = "VCL";
814   $INPATH         = $OUTPATH.$PROEXT;
815   $OS             = "AIX";
816   $PATH_SEPERATOR = $ps;
817}
818else {
819	print "\nset_soenv:  Cannot figure out what platform you are running\n";
820	print "For $platform.\n";
821	exit 1;
822}
823print "done\n";
824
825#
826# D. Gathering directory information from the user.
827#
828# If the directory does not exist something is strange.
829# 1. Apache OpenOffice build home directory.
830chomp($SRC_ROOT  = `pwd`);
831$SRC_ROOT =~ s/\/config_office//;
832$SRC_ROOT = PathFormat($SRC_ROOT);
833CheckPathExist( $SRC_ROOT );
834
835
836#-----------------------------------------------------------------------------------------------------
837# Copy top level makefile from config_office/ to $SRC_ROOT
838#-----------------------------------------------------------------------------------------------------
839if (! -e "makefile.rc")
840{  AddWarning( "set_soenv", "makefile.rc not found in config_office/. Could not copy to SRC_ROOT." );
841}
842else
843{  `cp -f makefile.rc $SRC_ROOT/makefile.mk`;
844}
845
846# 2. Java home directory.
847# JAVA_HOME as argument from autoconf.
848$JAVA_HOME = PathFormat('@JAVA_HOME@') ;
849
850if ( $platform =~ m/cygwin|os2/ ) {
851   $JAVA_HOME =~ s/[\s\/]+$//;	# remove trailing \n or \/ if there is any.
852}
853# 3. shell path.
854if ( $platform =~ m/os2/ )
855{
856$OOO_SHELL = 'sh';
857}
858else
859{
860$OOO_SHELL = '@SHELLPATH@'."\/bash";
861}
862
863# ml.exe assembler path for Windows users.
864if ($platform =~ m/cygwin/)
865{  $ASM_PATH = PathFormat('@ASM_HOME@');
866}
867
868#
869# E. Determining the envionment values based on the information
870#    that was gathered earlier on.
871#
872print "Setting the environment variables... ";
873$USR                  = $ds."usr";
874$ETC                  = $ds."etc";
875$BIN                  = $ds."bin";
876$LIB                  = $ds."lib";
877$LIB64                = $ds."lib";
878$LIB64               .= "64"
879if ($platform =~ m/x86_64-.*-linux/);
880$LIB64               .= "64"
881if (($platform =~ m/powerpc64-.*-linux/) && ('@SIZEOF_LONG@' eq '8'));
882$LIB64               .= "64"
883if (($platform =~ m/s390x-.*-linux/) && ('@SIZEOF_LONG@' eq '8'));
884$INC                  = $ds."inc";
885$INCLUDE              = $ds."include";
886$DEV                  = $ds."dev";
887$OPT                  = $ds."opt";
888$LOCAL                = $ds."local";
889$SOLENV               = $ds."solenv";
890$SOLVER               = $ds."solver";
891$CONFIG               = $ds."config";
892$USR_BIN              = $USR.$BIN;
893$USR_LIB              = $USR.$LIB64;
894$USR_LOCAL            = $USR.$ds."local";
895$USR_CCS              = $USR.$ds."ccs";
896$USR_OPENWIN          = $USR.$ds."openwin";
897$USR_DT               = $USR.$ds."dt";
898$COMMON_BUILD_TOOLS   = '$SRC_ROOT'.$ds."external".$ds."common";
899
900# Generate alternate output file for sh?
901$outfile_sh = $outfile.".sh";
902
903if ($GUI eq "OS2")
904{
905   # Generate output file for 4os2?
906   $outfile_bat = $outfile;
907   $outfile_bat =~ s/set$/cmd/i;
908}
909
910# Windows NT only variables
911if ($platform =~ m/cygwin/)
912{
913   if ( $JAVA_HOME ne "" )
914   {
915      $JAVA_LIB             = $JAVA_HOME.$LIB;
916   }
917   # Import SystemDrive enviroment variable
918   use Env qw(SYSTEMDRIVE);
919   # Change $SYSTEMDRIVE to lower case.
920   $SYSTEMDRIVE          = lc $SYSTEMDRIVE;
921   use Env qw(SYSTEMROOT);
922   $CYGWIN_PATH          = PathFormat('@CYGWIN_PATH@'); # Windows bash path
923   $WIN_GREP             = '$CYGWIN_PATH'.$ds."grep.exe";
924   $WIN_FIND             = '$CYGWIN_PATH'.$ds."find.exe";
925   $WIN_LS               = '$CYGWIN_PATH'.$ds."ls.exe";
926   $WIN_GNUCOPY          = '$CYGWIN_PATH'.$ds."cp.exe";
927   $WIN_TOUCH            = '$CYGWIN_PATH'.$ds."touch.exe";
928}
929
930if ( $JAVA_HOME ne "" )
931{
932   $JAVA_BIN             = $JAVA_HOME.$BIN;
933   $JAVA_INCLUDE         = $JAVA_HOME.$ds."include";
934}
935
936
937$PERL                 = PathFormat('@PERL@'); # Perl program
938$PERL_PATH            = dirname('@PERL@'); # Perl Path
939$XLIB                 = PathFormat('@XLIB@'); # X11 libraries
940$XINC                 = PathFormat('@XINC@'); # X11 includes
941
942# YD disable autodetection, use PATH
943if ( $platform =~ m/os2/ )
944{
945   $PERL = 'perl';
946   $PERL_PATH = '';
947}
948
949# The project's workstamp.
950$WORK_STAMP            = "@SOURCEVERSION@";
951# Location of the source.
952$SOLARSRC             = '$SRC_ROOT';
953# Location of the repository.
954my @splitlist = split( /\//, $SRC_ROOT );
955pop @splitlist;
956$SOURCE_ROOT_DIR      = join("/", @splitlist);
957
958# default TARFILE_LOCATION
959if ('@TARFILE_LOCATION@' eq "DEFAULT")
960{	$TARFILE_LOCATION="$SOURCE_ROOT_DIR/ext_sources";
961}
962
963#
964$DEVROOT              = '$SRC_ROOT';
965# Set solenv and solver to given or default values.
966# Location of the solenv tree.
967if ('@LOCAL_SOLENV@' eq "DEFAULT")
968{  $SOLARENV          = $SRC_ROOT.$SOLENV;
969}
970else
971{  $SOLARENV          =  PathFormat('@LOCAL_SOLENV@');
972}
973# Location of the solver tree.
974if ('@LOCAL_SOLVER@' eq "DEFAULT")
975{  $SOLARVER          = $SRC_ROOT.$SOLVER.$ds.$UPD;
976}
977else
978{  $SOLARVER          = PathFormat('@LOCAL_SOLVER@').$ds.$UPD;
979}
980#Location of Solar version.
981$SOLARVERSION         = '$SOLARVER';
982
983#Location of gnu make directories.
984$WORKDIR              = '$SOLARVER/$INPATH/workdir';
985$OUTDIR              = '$SOLARVER/$INPATH';
986
987$SOLARENVINC          = '$SOLARENV'.$INC;
988# Location of
989$LOCALINI             = '$SOLARENV'.$CONFIG;
990# Location of
991$STAR_INIROOT         = '$SOLARENV'.$CONFIG;
992# Location of
993$STAR_INIROOTOLD      = '$SOLARENV'.$CONFIG;
994# Location of
995$STAR_STANDLST        = '$SOLARENV'.$CONFIG.$ds."stand.lst";
996# Location of
997$STAR_SSCOMMON        = '$SOLARENV'.$CONFIG.$ds."ssolar.cmn";
998# Location of
999$STAR_SSOLARINI       = '$SOLARENV'.$CONFIG.$ds."ssolar.ini";
1000# Location of dmake resource.
1001$DMAKEROOT            = '$SOLARENVINC'.$ds."startup";
1002# Location of JDK classes .zip file.
1003# but in jdk 1.2 it is called rt.jar and it lives in jre/lib
1004$CLASSPATH            = '$JAVA_HOME'.$ds.'jre'.$LIB.$ds."rt.jar".$wps.'.';
1005# Location of the JDK supported standard classes.zip file.
1006# see above for why the change
1007$XCLASSPATH           = '$JAVA_HOME'.$ds.'jre'.$LIB.$ds."rt.jar".$wps.'.';
1008
1009# Location used by the linker to create libraries.
1010if ($platform =~ m/solaris/)
1011{  $SOLAREXTRALIB     = $L.$par_dir.$LIB.
1012                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$ds."lib.solaris.2.6".
1013                        $L.$LIB.
1014                        $L.$USR.$LIB.
1015                        $L.$USR.$LOCAL.$LIB.
1016                        $L.$USR_DT.$LIB.
1017                        $L.$USR_OPENWIN.$LIB;
1018}
1019elsif ($platform =~ m/linux|netbsd|osf1|freebsd|aix/)
1020{
1021   $SOLAREXTRALIB     = $L.$par_dir.$LIB64;
1022}
1023elsif ($platform =~ m/darwin/)
1024{  $SOLAREXTRALIB     = $L.$LIB.
1025                        $L.$USR.$LIB;
1026}
1027elsif ($platform !~ m/cygwin|os2/ )
1028{  AddWarning( "set_soenv", "$platform not configured for linkage create libraries" );
1029}
1030
1031# Windows NT only variables
1032if ($platform =~ m/cygwin|os2/)
1033{  $COMP_ENV          = $OUTPATH;
1034
1035   $JAVAHOME          = '$JAVA_HOME';
1036
1037   $ILIB             = $cur_dir;
1038
1039   # Mingw is different
1040   if ( $COM eq "MSC" )
1041   {  $ILIB       .=    $wps.$SOLARVER.$ds.$INPATH.$LIB.
1042                        $wps.$JAVA_HOME.$LIB.
1043                        $wps.$PSDK_HOME.$LIB.
1044                        $wps.$FRAME_HOME.$LIB.
1045                        $wps.$COMPATH.$LIB;
1046      if ( '@ENABLE_DIRECTX@' ne "" ) {
1047          # We may have DirectX but not DirectDraw
1048          if ( '@ENABLE_DIRECT_DRAW@' ne "") {
1049              $ILIB   .= $wps.$DIRECTXSDK_LIB;
1050              if ( '@COMEX@' eq "10" ) {
1051                  # .NET2003 provides and compiles against DirectX 5 libraries and is
1052                  # hereby still Win9x compatible.
1053                  $ILIB .= $wps.'$COMPATH'.$ds.'PlatformSDK'.$LIB;
1054                  $USE_DIRECTX5 = "YES";
1055              }
1056          }
1057      }
1058      # ILIB needs to use '\' directory seperators;
1059      $ILIB = WinPath( $ILIB, ";" );
1060   }
1061   elsif ( $COM eq "GCC" )
1062   {  $ILIB       .=    $wps.$SOLARVER.$ds.$INPATH.$LIB.
1063                        $wps.$SOLARVER.$ds.$INPATH.$BIN.
1064                        $wps.$JAVA_HOME.$LIB;
1065      if ( $USE_MINGW eq "cygwin" )
1066      {  $ILIB    .= $wps.PathFormat($USR.$LIB.$ds."mingw").
1067                     $wps.PathFormat($USR.$LIB.$ds."w32api");
1068      }
1069      else
1070      {  $ILIB       .= $wps.$COMPATH.$LIB;
1071      }
1072      $ILIB       .= $wps.PathFormat("@MINGW_CLIB_DIR@").
1073                     $wps.$PSDK_HOME.$LIB;
1074      if ( '@ENABLE_DIRECTX@' )
1075      {   $ILIB   .= $wps.PathFormat("@DIRECTXSDK_LIB@");
1076      }
1077   }
1078
1079   $JAVAHOME          = '$JAVA_HOME';
1080
1081}
1082
1083# The general environment path.
1084if ($platform =~ m/linux|netbsd|odf1|freebsd|aix|solaris/)
1085{  $PATH              = $cur_dir.
1086                        $ps.'$SOLARENV'.$ds.'$INPATH'.$BIN.
1087                        $ps.'$SOLARENV'.$BIN;
1088
1089   if ($platform =~ m/solaris/) {
1090	$PATH .= $ps.$USR_CCS.$BIN;
1091   }
1092
1093   $PATH             .= $ps.$oldPATH;
1094
1095   my @javaBits;
1096   if (( $JAVA_HOME ne "" ) && ( $JDK ne "gcj" )) {
1097      @javaBits = ( '$JAVA_HOME'.$BIN, 'javac' );
1098   } else {
1099      @javaBits = ();
1100   }
1101   $PATH              = GetCorrectPath ($PATH,
1102                                        $COMPATH, $CC,
1103                                        $PERL_PATH, 'perl',
1104                                        @javaBits);
1105}
1106
1107elsif ($platform =~ m/cygwin/)
1108{  # The PATH variable is completely created from scratch. Elements
1109   # from oldPATH that are not yet included are appended to PATH at
1110   # the end.
1111
1112   my ( $tmppath );
1113
1114   $PATH              = $cur_dir.
1115                        $ps.CygFormat($SOLARENV).$ds."bin".
1116                        $ps.CygFormat($SOLARENV).$ds.$INPATH.$BIN;
1117
1118   if ( $JAVA_HOME ne "" )
1119   {
1120      # hack either "hotspot" or "client" should be used, depending on the jdk version:
1121      # 1.2.x   -   no such directory, unsupported
1122      # 1.3.x   -   hotspot, client missing
1123      # 1.4.x   -   client, hotspot missing
1124
1125      $PATH .= $ps.CygFormat($JAVA_HOME).$BIN;
1126	  if ( -d $JAVA_HOME.$ds."jre".$ds."bin".$ds."hotspot" ) {
1127		  $PATH .= $ps.CygFormat($JAVA_HOME).$ds."jre".$ds."bin".$ds."hotspot";
1128	  }
1129	  if ( -d $JAVA_HOME.$ds."jre".$ds."bin".$ds."client" ) {
1130		  $PATH .= $ps.CygFormat($JAVA_HOME).$ds."jre".$ds."bin".$ds."client";
1131	  }
1132   }
1133
1134   # Add path to compiler
1135   $tmppath = CygFormat($COMPATH).$BIN;
1136   $tmppath =~ s/^\/\//\//;
1137   $PATH .= $ps.$tmppath;
1138
1139   if ( $COM eq "MSC" ) {
1140       $tmppath = CygFormat($MSPDB_PATH);
1141	   # for .NET to find mspdb71.dll (needed by CL.EXE C/C++ Compiler)
1142	   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1143		   $PATH .= $ps.$tmppath;
1144	   }
1145	   if ( ( $COMEX ge "10" ) ) {
1146		   # .NET needs midl.exe
1147               $tmppath = CygFormat($MIDL_PATH);
1148		   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1149			   $PATH .= $ps.$tmppath;
1150		   }
1151		   # .NET needs csc.exe
1152               $tmppath = CygFormat($CSC_PATH);
1153		   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1154			   $PATH .= $ps.$tmppath;
1155		   }
1156		   # Native installer needs some files if the Windows Installer SDK
1157               $tmppath = CygFormat($PSDK_HOME);
1158		   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath\/bin)(?:[:]|\Z)/i ) {
1159			   $PATH .= $ps.$tmppath.$BIN;
1160		   }
1161	   }
1162   } else { # Mingw is different
1163	   # Native installer needs some files if the Windows Installer SDK
1164               $tmppath = CygFormat($PSDK_HOME);
1165	   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath\/bin)(?:[:]|\Z)/i ) {
1166		   $PATH .= $ps.$tmppath.$BIN;
1167	   }
1168   }
1169
1170   if ( $ASM_PATH ne "ASM_IN_PATH" )
1171   {   $PATH          .= $ps.CygFormat($ASM_PATH);
1172   }
1173   # zip.exe / unzip.exe path for Windows users.
1174   my $zip_home_path = PathFormat('@ZIP_HOME@');
1175   $tmppath = CygFormat($zip_home_path);
1176   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1177       $PATH          .= $ps.$tmppath;
1178   }
1179
1180   # Possible cygwin paths must follow behind the OOo and MS paths
1181
1182   # Check if $PERL_PATH is already set in PATH
1183   $tmppath = CygFormat($PERL_PATH);
1184   if ( ! ( $PATH =~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) )
1185   {
1186      $PATH          .= $ps.$tmppath;
1187   }
1188   # Check if $CYGWIN_PATH is already set in PATH
1189   $tmppath = CygFormat($CYGWIN_PATH);
1190   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1191      $PATH           .= $ps.$tmppath;
1192   }
1193   # nsis path for Windows users.
1194   $NSIS_PATH = PathFormat('@NSIS_PATH@');
1195   $tmppath = CygFormat($NSIS_PATH);
1196   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1197       $PATH          .= $ps.$tmppath;
1198   }
1199   # path to sn.exe (signing) for Windows users.
1200   my $sn_path = PathFormat('@FRAME_HOME@/bin');
1201   $tmppath = CygFormat($sn_path);
1202   if ( $PATH !~ /(?:[:]|\A)(?:$tmppath)(?:[:]|\Z)/ ) {
1203       $PATH          .= $ps.$tmppath;
1204   }
1205
1206
1207   # Add the rest of the original path if it is still missing.
1208   if (($^O eq "cygwin")) { # Not for ActiveState perl
1209       my $expandedPATH = $PATH;
1210       $expandedPATH =~ s/(\$\w+)/$1/eeg;
1211
1212       # fix situations where PATH may look like /bin:"C:\blah\bleh":/ugh
1213       my $fixedPATH = $oldPATH;
1214       if ( $oldPATH =~ /"/ ) {
1215	   $fixedPATH = "";
1216	   foreach my $pathentry ( split( '"',$oldPATH ) ) {
1217	       if ( ( $pathentry =~ /^$ps/ ) || ( $pathentry =~ /$ps$/ ) ) {
1218		   $fixedPATH .= $pathentry;
1219	       } else {
1220		   chomp( $pathentry = qx{cygpath -d "$pathentry"} ) ;
1221		   chomp( $pathentry = qx{cygpath -u "$pathentry"} ) ;
1222		   $fixedPATH .= $pathentry;
1223	       }
1224	   }
1225       }
1226
1227       foreach my $pathentry (split($ps,$fixedPATH)) {
1228           if ( ! ( $expandedPATH =~ /(?:$ps|\A)(?:$pathentry)(?:$ps|\Z)/ ) ) {
1229               $PATH .= $ps.$pathentry;
1230               $expandedPATH .= $ps.$pathentry;
1231           }
1232       }
1233   } else {
1234       $PATH          .= $ps.$oldPATH;
1235   }
1236
1237   # The path now is in cygwin posix format
1238
1239}
1240
1241elsif ($platform =~ m/os2/)
1242{  # The PATH variable is completely created from scratch. Everything that is not
1243   # needed is appended to the end.
1244
1245   $PATH              = $cur_dir.
1246                        $ps.'$SOLARENV'.$ds."bin".
1247                        $ps.'$SOLARENV'.$ds.'$INPATH'.$BIN;
1248
1249   if ( $JAVA_HOME ne "" )
1250   {
1251      # hack either "hotspot" or "client" should be used, depending on the jdk version:
1252      # 1.2.x   -   no such directory, unsupported
1253      # 1.3.x   -   hotspot, client missing
1254      # 1.4.x   -   client, hotspot missing
1255
1256      $PATH .= $ps.$JAVA_HOME.$BIN;
1257	  if ( -d $JAVA_HOME.$ds."jre".$ds."bin".$ds."hotspot" ) {
1258		  $PATH .= $ps.$JAVA_HOME.$ds."jre".$ds."bin".$ds."hotspot";
1259	  }
1260	  if ( -d $JAVA_HOME.$ds."jre".$ds."bin".$ds."client" ) {
1261		  $PATH .= $ps.$JAVA_HOME.$ds."jre".$ds."bin".$ds."client";
1262	  }
1263   }
1264
1265  if ( '@ANT_HOME@' ne '' )
1266  {
1267     $PATH .= $ps.'@ANT_HOME@/bin';
1268  }
1269
1270  # Append old PATH
1271  my $temp = $oldPATH;
1272  $temp =~ s/\\/\//g ;
1273  $PATH             .= $ps.$temp;
1274}
1275
1276elsif ($platform =~ m/darwin/)
1277{  $PATH              = $cur_dir.
1278                        $ps.'$SOLARENV'.$ds.'$INPATH'.$BIN.
1279                        $ps.'$SOLARENV'.$BIN;
1280
1281  # Append old PATH
1282  $PATH             .= $ps.$oldPATH;
1283}
1284else
1285{  AddWarning( "set_soenv", "$platform not configured for general environment paths" );
1286}
1287
1288# Linker library search directory paths.
1289if ($platform =~ m/solaris/)
1290{  $SOLARLIB          = $L.$par_dir.$LIB.
1291                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$LIB.
1292                        $L.'$SOLARVER'.$ds.'$INPATH'.$LIB.
1293                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$LIB.
1294                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$LIB."solaris.2.6".
1295                        $L.$LIB.
1296                        $L.$USR_LIB;
1297   if ( $CC =~ "gcc" ) {
1298      $SOLARLIB      .= $L.$COMPATH.$LIB;
1299   }
1300   $SOLARLIB         .= $L.$USR_LOCAL.$LIB.
1301                        $L.$USR_DT.$LIB.
1302                        $L.$USR_OPENWIN.$LIB.
1303                        $L.'$JAVA_HOME'.$LIB.
1304                        $L.$JRELIBDIR.
1305                        $L.$JRETOOLKITDIR.
1306                        $L.$JRETHREADDIR.
1307                        $L.$XLIB;
1308}
1309elsif ($platform =~ m/linux|netbasd|osf1|aix|freebsd/)
1310{  $SOLARLIB          = $L.$par_dir.$LIB.
1311                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$LIB.
1312                        $L.'$SOLARVER'.$ds.'$INPATH'.$LIB.
1313                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$LIB.
1314                        $L.'$JAVA_HOME'.$LIB64.
1315                        $L.$JRELIBDIR.
1316                        $L.$JRETOOLKITDIR.
1317                        $L.$JRETHREADDIR.
1318                        $L.$XLIB;
1319}
1320elsif ($platform =~ m/cygwin|os2/)
1321{  $SOLARLIB          = $L.'$SOLARVER'.$ds.'$INPATH'.$LIB.
1322                        $L.$par_dir.$LIB.
1323                        $L.'$SOLARENV'.$ds.'$OUTPATH'.$LIB;
1324}
1325elsif ($platform =~ m/darwin/)
1326{  $SOLARLIB          = $L.'$SOLARVER'.$ds.'$INPATH'.$LIB.
1327                        $L.$USR_LIB;
1328    # [ed] 6/15/02 Add in X11 libraries onto the library path
1329    if ($GUIBASE eq "unx") {
1330       $SOLARLIB      .= $L.$XLIB;
1331    }
1332
1333}
1334
1335
1336# Location of the compiler include search directory paths.
1337$SOLARINC             = $I.$cur_dir.
1338                        $I.'$SOLARVER'.$ds.'$INPATH'.$INC.$ds."stl".
1339                        $I.'$SOLARVER'.$ds.'$INPATH'.$INC.$ds."external".
1340                        $I.'$SOLARVER'.$ds.'$INPATH'.$INC.
1341                        $I.'$SOLARENV'.$ds.'$OUTPATH'.$INC.
1342                        $I.'$SOLARENV'.$INC.
1343                        $I.'$SRC_ROOT'.$ds."res";
1344
1345if ($platform =~ m/solaris|linux|osf1|freebsd|netbsd/)
1346{
1347if ($platform =~ m/linux|freebsd|netbsd/)
1348{
1349# This simply adds an include path, so even cases that break the FHS work
1350}
1351if ($platform =~ m/solaris/ && ! $CC =~ "gcc")
1352{
1353$SOLARINC            .= '/SC5 ';
1354}
1355# Platform dependent include path at the top of this list of include paths
1356if ($platform =~ m/solaris/)
1357{
1358    $SOLARINC         .= $I.$COMPATH.$ds."include";
1359}
1360if ($platform =~ m/linux/)
1361{
1362# This simply adds an include path, so even cases that break the FHS work
1363}
1364
1365
1366   	$SOLARINC      .= $I.'$SOLARENV'.$INC.$ds."Xp31".
1367                     $I.'$JAVA_HOME'.$INCLUDE;
1368
1369	#include system dependent Java include directory
1370	if (!($JDK eq "gcj"))
1371	{
1372   		if ($platform =~ m/solaris/)
1373   		{  $SOLARINC   .=$I.'$JAVA_HOME'.$INCLUDE.$ds."solaris";
1374   		}
1375   		elsif  ($platform =~ m/linux|osf1/)
1376   		{  $SOLARINC   .=$I.'$JAVA_HOME'.$INCLUDE.$ds."linux";
1377   		}
1378   		elsif ($platform =~ m/freebsd/)
1379   		{
1380      		$SOLARINC   .=$I.'$JAVA_HOME'.$INCLUDE.$ds."freebsd";
1381      		$SOLARINC   .=$I.'$JAVA_HOME'.$INCLUDE.$ds."bsd";
1382      		$SOLARINC   .=$I.'$JAVA_HOME'.$INCLUDE.$ds."linux";
1383   		}
1384   		elsif ($platform =~ m/netbsd/)
1385   		{  $SOLARINC   .=$I.'$JAVA_HOME'.$INCLUDE.$ds."netbsd";
1386   		}
1387
1388   		#java threads include path
1389
1390   		$SOLARINC .=$I.'$JAVA_HOME'.$INCLUDE.$ds."native_threads".$ds."include";
1391	}
1392    #The tail, if needed
1393    if ($platform =~ m/linux|freebsd|netbsd/)
1394    {  $SOLARINC  .= $I.$XINC;
1395    }
1396    elsif ($platform =~ m/osf1/)
1397    {  $SOLARINC  .= $I.$XINC.
1398                     $I.$USR.$INCLUDE;
1399    }
1400}
1401elsif ($platform =~ m/cygwin/)
1402{  $SOLARINC         .= $I.'$JAVA_HOME'.$ds."include".$ds."win32".
1403                        $I.'$JAVA_HOME'.$ds."include";
1404   # Mingw is different
1405   if ( $COM eq "MSC" )
1406   {  $SOLARINC       .= $I.'$PSDK_HOME'.$INCLUDE.
1407                         $I.'$COMPATH'.$ds."include";
1408      if ( '@ENABLE_DIRECTX@' ne "" ) {
1409          $SOLARINC   .= $I.PathFormat('@DIRECTXSDK_HOME@').$INCLUDE;
1410          if ( '@COMEX@' eq "10" ) {
1411              # .NET2003 provides and compiles against DirectX 5 libraries and is
1412              # hereby still Win9x compatible.
1413              $SOLARINC .= $I.'$COMPATH'.$ds.'PlatformSDK'.$ds."include";
1414          }
1415      }
1416   }
1417   elsif ( $COM eq "GCC" )
1418   {  $SOLARINC       .= $I.'$SOLARVER'.$ds.'$INPATH'.$INC.$ds."external".$ds."mingw".$ds."include";
1419     if ( $USE_MINGW eq "cygwin" )
1420     {  $SOLARINC    .= $I.PathFormat($USR.$ds."include".$ds."mingw").
1421                        $I.PathFormat($USR.$ds."include".$ds."w32api").
1422                        $I.PathFormat($USR.$ds."include"); }
1423     else
1424     {  $SOLARINC    .= $I.'$COMPATH'.$ds."include"; }
1425     @mingw_lib_include_paths = split( / /, "@MINGW_LIB_INCLUDE_PATH@" );
1426     $SOLARINC .= $I.PathFormat("@MINGW_BACKWARD_INCLUDE_PATH@");
1427     foreach $mingw_lib_include_path (@mingw_lib_include_paths)
1428       {   chomp $mingw_lib_include_path;
1429           if ( $mingw_lib_include_path ne $COMPATH.$ds."include" && $mingw_lib_include_path ne "" )
1430           {
1431              $SOLARINC   .= $I.PathFormat($mingw_lib_include_path);
1432           }
1433       }
1434     $SOLARINC .= $I.PathFormat("@GXX_INCLUDE_PATH@").$I.PathFormat("@GXX_INCLUDE_PATH@".$ds."mingw32").
1435                  $I.'$PSDK_HOME'.$INCLUDE;
1436   }
1437   if ( '@ENABLE_DIRECTX@' ne "" ) {
1438       $SOLARINC   .= $I.PathFormat('@DIRECTXSDK_HOME@').$INCLUDE;
1439   }
1440}
1441elsif ($platform =~ m/darwin/)
1442{
1443    $FRAMEWORKSHOME = "@MACOSX_SDK_PATH@/System/Library/Frameworks";
1444    chomp( my $TOOLSPATH = `xcode-select --print-path` );
1445    my $STLINC .= $I."$TOOLSPATH/Toolchains/XcodeDefault.xctoolchain/usr/lib/c++/v1/";
1446    $SOLARINC .= $STLINC . $I.$FRAMEWORKSHOME.$ds."JavaVM.framework".$ds."Headers";
1447    $GUIBASE  = "aqua";
1448}
1449else
1450{  AddWarning( "set_soenv", "$platform not configured for system dependant include dir" );
1451}
1452
1453#
1454print "done\n";
1455
1456$gb_REPOS = $SRC_ROOT;
1457for my $repo (split(/ /,"@ADDITIONAL_REPOSITORIES@"))
1458{
1459    my $abs_repo = `cd $SRC_ROOT/$repo;pwd`;
1460    chomp($abs_repo);
1461    $gb_REPOS .= " " . $abs_repo;
1462}
1463
1464
1465#
1466# F. Setting the different aliases.
1467#
1468print "Setting the aliases... ";
1469# 1. alias for a full product make.
1470	$mkout           = '"$PERL $SOLARENV/bin/mkout.pl"';
1471	$deliver         = '"$PERL $SOLARENV/bin/deliver.pl"';
1472	$build           = '"$PERL $SOLARENV/bin/build.pl"';
1473	$build_client    = '"$PERL $SOLARENV/bin/build_client.pl"';
1474	$zipdep          = '"$PERL $SOLARENV/bin/zipdep.pl"';
1475# 3. alias for a full product make
1476$nmake           = '"dmake"';
1477print "done\n";
1478#
1479#--------------------------
1480# VI. Open the output file.
1481#--------------------------
1482#
1483open( OUT, ">$outfile" ) ||
1484   die "Cannot open $outfile: $!\n";
1485
1486# Create sh environment file
1487open( OUT_SH, ">$outfile_sh" ) ||
1488  die "Cannot open $outfile_sh: $!\n";
1489
1490if(defined($outfile_bat))
1491{  # Create bat environment file
1492   open( OUT_BAT, ">$outfile_bat" ) ||
1493   die "Cannot open $outfile_bat: $!\n";
1494}
1495
1496#
1497#------------------------------------------
1498# VII. Writing the data to the output file.
1499#------------------------------------------
1500#
1501# Write file header.
1502CreateFileHeader( *OUT, $UPD, $platform, "(t)csh", "#" );
1503CreateFileHeader( *OUT_SH, $UPD, $platform, "sh/bash/ksh", "#" );
1504CreateFileHeader( *OUT_BAT, $UPD, $platform, "4nt", "rem" ) if defined($outfile_bat);
1505
1506ToFile( "SRC_ROOT",	     $SRC_ROOT,          "e" );
1507ToFile( "OOO_SHELL",         $OOO_SHELL,         "e" );
1508ToFile( "JAVA_HOME",         $JAVA_HOME,         "e" );
1509ToFile( "ANT_HOME",          PathFormat("@ANT_HOME@"), "e" );
1510ToFile( "ANT_LIB",           PathFormat("@ANT_LIB@"), "e" );
1511ToFile( "ANT",               PathFormat("@ANT@"), "e" );
1512ToFile( "JDKLIB",            $JAVA_LIB,          "e" );
1513ToFile( "ASM_PATH",          $ASM_PATH,          "e" );
1514ToFile( "BUILD_SOSL",        $BUILD_SOSL,        "e" );
1515ToFile( "FRAMEWORKSHOME",    $FRAMEWORKSHOME,    "e" );
1516ToFile( "Empty",             $empty,             "n" );
1517
1518#
1519# Writing the platform independent constant values to file.
1520# (c = comment, e = environment variable, a = alias )
1521ToFile( "Platform independent constant values.", $empty, "c" );
1522# dictionaries
1523if ('@WITH_DICT@' =~ m/ALL,/s)
1524{
1525   foreach $dict (@DICTIONARIES)
1526   {
1527      ToFile( "DIC_$dict",     "TRUE",          "e" );
1528   }
1529   ToFile( "DIC_ALL",          "TRUE",          "e" );
1530}
1531else
1532{
1533   foreach $dict (@DICTIONARIES)
1534   {   if ('@WITH_DICT@' =~ m/$dict,/s)
1535       {   my $val="TRUE";
1536           ToFile( "DIC_$dict",     $val,          "e" );
1537       }
1538       else
1539       {   my $val;
1540           undef $val;
1541           ToFile( "DIC_$dict",     $val,          "e" );
1542       }
1543   }
1544}
1545# Languages
1546ToFile( "WITH_LANG",         "@WITH_LANG@",      "e" );
1547ToFile( "INTRO_BITMAPS",     "@INTRO_BITMAPS@",  "e" );
1548ToFile( "ABOUT_BITMAPS",     "@ABOUT_BITMAPS@",  "e" );
1549ToFile( "OOO_VENDOR",        "@OOO_VENDOR@",     "e" );
1550ToFile( "OOODMAKEMODE",      "YES",              "e" );
1551ToFile( "WITH_POOR_HELP_LOCALIZATIONS", "@WITH_POOR_HELP_LOCALIZATIONS@", "e" );
1552
1553ToFile( "CALL_CDECL",        $CALL_CDECL,        "e" );
1554ToFile( "COMMON_OUTDIR",     $COMMON_OUTDIR,     "e" );
1555ToFile( "common_build",      $common_build,      "e" );
1556ToFile( "BMP_WRITES_FLAG",   $BMP_WRITES_FLAG,   "e" );
1557ToFile( "BUILD_SOSL_RELEASE", $BUILD_SOSL_RELEASE, "e" );
1558ToFile( "NO_REC_RES",        $NO_REC_RES,        "e" );
1559ToFile( "SO3",               $SO3,               "e" );
1560ToFile( "SOLAR_PLUGIN",      $SOLAR_PLUGIN,      "e" );
1561ToFile( "UPDATER",           $UPDATER,           "e" );
1562ToFile( "build_deliver",     $BUILD_DELIVER,     "e" );
1563ToFile( "VCL",               $VCL,               "e" );
1564ToFile( "ENABLEUNICODE",     $ENABLEUNICODE,     "e" );
1565ToFile( "NEW_JAR_PACK",      $NEW_JAR_PACK,      "e" );
1566ToFile( "NO_BSYMBOLIC",      $NO_BSYMBOLIC,      "e" );
1567ToFile( "TF_FILTER",         "TRUE",             "e" );
1568if ("@ENABLE_DEBUG@" eq "TRUE") {
1569ToFile( "debug",             "true",             "e" );
1570}
1571if ("@ENABLE_WERROR@" eq "FALSE") {
1572ToFile( "EXTERNAL_WARNINGS_NOT_ERRORS", "TRUE",  "e" );
1573}
1574ToFile( "PRODUCT",           "@PRODUCT@",        "e" );
1575ToFile( "PROFULLSWITCH",     "@PROFULLSWITCH@",  "e" );
1576ToFile( "PROEXT",            $PROEXT,            "e" );
1577ToFile( "VALGRIND_CFLAGS",   "@VALGRIND_CFLAGS@",  "e" );
1578ToFile( "UNIXWRAPPERNAME",   "@UNIXWRAPPERNAME@","e" );
1579ToFile( "ENABLE_NSS_MODULE",  "@ENABLE_NSS_MODULE@", "e" );
1580ToFile( "MOZILLABUILD",  "@MOZILLABUILD@", "e" );
1581ToFile( "BUILD_VER_STRING",  "@BUILD_VER_STRING@", "e" );
1582if ($platform =~ m/linux/ && $platform =~ m/powerpc/) {
1583ToFile( "JITC_PROCESSOR_TYPE","6",                 "e" );
1584}
1585ToFile( "DEFAULT_TO_ENGLISH_FOR_PACKING",  "yes", "e" );
1586ToFile( "ENABLE_GTK",        "@ENABLE_GTK@",       "e" );
1587ToFile( "GTK_CFLAGS",        "@GTK_CFLAGS@",       "e" );
1588ToFile( "GTK_LIBS",          "@GTK_LIBS@",         "e" );
1589ToFile( "GTHREAD_CFLAGS",        "@GTHREAD_CFLAGS@",       "e" );
1590ToFile( "GTHREAD_LIBS",          "@GTHREAD_LIBS@",         "e" );
1591ToFile( "ENABLE_SYSTRAY_GTK", "@ENABLE_SYSTRAY_GTK@", "e" );
1592ToFile( "ENABLE_STATIC_GTK", "@ENABLE_STATIC_GTK@", "e" );
1593ToFile( "ENABLE_GSTREAMER",  "@ENABLE_GSTREAMER@", "e" );
1594ToFile( "ENABLE_CAIRO",      "@ENABLE_CAIRO@",     "e" );
1595ToFile( "ENABLE_CAIRO_CANVAS", "@ENABLE_CAIRO_CANVAS@",     "e" );
1596ToFile( "ENABLE_OPENGL",     "@ENABLE_OPENGL@",    "e" );
1597ToFile( "ENABLE_PDFIMPORT",  "@ENABLE_PDFIMPORT@", "e" );
1598ToFile( "ENABLE_REPORTBUILDER","@ENABLE_REPORTBUILDER@","e" );
1599ToFile( "SYSTEM_JFREEREPORT","@SYSTEM_JFREEREPORT@","e" );
1600ToFile( "OOO_JUNIT_JAR",     "@OOO_JUNIT_JAR@",    "e" );
1601ToFile( "SAC_JAR",           "@SAC_JAR@",          "e" );
1602ToFile( "LIBXML_JAR",        "@LIBXML_JAR@",       "e" );
1603ToFile( "FLUTE_JAR",         "@FLUTE_JAR@",        "e" );
1604ToFile( "JFREEREPORT_JAR",   "@JFREEREPORT_JAR@",  "e" );
1605ToFile( "LIBLAYOUT_JAR",     "@LIBLAYOUT_JAR@",    "e" );
1606ToFile( "LIBLOADER_JAR",     "@LIBLOADER_JAR@",    "e" );
1607ToFile( "LIBFORMULA_JAR",    "@LIBFORMULA_JAR@",   "e" );
1608ToFile( "LIBREPOSITORY_JAR", "@LIBREPOSITORY_JAR@","e" );
1609ToFile( "LIBBASE_JAR",       "@LIBBASE_JAR@",      "e" );
1610ToFile( "LIBFONTS_JAR",      "@LIBFONTS_JAR@",     "e" );
1611ToFile( "LIBSERIALIZER_JAR", "@LIBSERIALIZER_JAR@","e" );
1612ToFile( "ENABLE_MEDIAWIKI",  "@ENABLE_MEDIAWIKI@", "e" );
1613ToFile( "SYSTEM_APACHE_COMMONS","@SYSTEM_APACHE_COMMONS@","e" );
1614ToFile( "COMMONS_CODEC_JAR", "@COMMONS_CODEC_JAR@","e" );
1615ToFile( "COMMONS_LANG_JAR",  "@COMMONS_LANG_JAR@", "e" );
1616ToFile( "COMMONS_HTTPCLIENT_JAR","@COMMONS_HTTPCLIENT_JAR@","e" );
1617ToFile( "COMMONS_LOGGING_JAR","@COMMONS_LOGGING_JAR@","e" );
1618ToFile( "SYSTEM_SERVLETAPI", "@SYSTEM_SERVLETAPI@", "e" );
1619ToFile( "SERVLETAPI_JAR",    "@SERVLETAPI_JAR@",   "e" );
1620ToFile( "ENABLE_DBUS",       "@ENABLE_DBUS@",      "e" );
1621ToFile( "ENABLE_GCONF",      "@ENABLE_GCONF@",     "e" );
1622ToFile( "ENABLE_GNOMEVFS",   "@ENABLE_GNOMEVFS@",  "e" );
1623ToFile( "ENABLE_GIO",        "@ENABLE_GIO@",       "e" );
1624ToFile( "ENABLE_KDE",        "@ENABLE_KDE@",       "e" );
1625ToFile( "KDE_CFLAGS",        "@KDE_CFLAGS@",       "e" );
1626ToFile( "KDE_LIBS",          "@KDE_LIBS@",         "e" );
1627ToFile( "MOC",               "@MOC@",              "e" );
1628ToFile( "ENABLE_KDE4",       "@ENABLE_KDE4@",      "e" );
1629ToFile( "KDE4_CFLAGS",       "@KDE4_CFLAGS@",      "e" );
1630ToFile( "KDE4_LIBS",         "@KDE4_LIBS@",        "e" );
1631ToFile( "MOC4",              "@MOC4@",             "e" );
1632ToFile( "ENABLE_KAB",        "@ENABLE_KAB@",       "e" );
1633ToFile( "PSPRINT",           "TRUE",             "e" );
1634ToFile( "MKDEPENDSOLVER",    "TRUE",             "e" );
1635ToFile( "nodep",             "@nodep@",          "e" );
1636ToFile( "TARFILE_LOCATION",  $TARFILE_LOCATION,  "e" );
1637ToFile( "DO_FETCH_TARBALLS", "@DO_FETCH_TARBALLS@",  "e" );
1638ToFile( "CUSTOM_PACK_LIST",  "@CUSTOM_PACK_LIST@",  "e" );
1639ToFile( "USE_PACKAGER",      "@USE_PACKAGER@",      "e" );
1640ToFile( "ENABLE_ONLINE_UPDATE", "@ENABLE_ONLINE_UPDATE@", "e" );
1641#
1642# Writing the platform dependent constant values to file.
1643# (c = comment, e = environment variable, a = alias )
1644ToFile( "Platform dependent constant values.", $empty, "c" );
1645ToFile( "SOLAR_JAVA",        $SOLAR_JAVA,        "e" );
1646ToFile( "BIG_SVX",           $BIG_SVX,           "e" );
1647ToFile( "COM",               $COM,               "e" );
1648ToFile( "COMPATH",           $COMPATH,           "e" );
1649ToFile( "CC_PATH",           "@CC_PATH@",        "e" );
1650ToFile( "CXX_X64_BINARY",    $CXX_X64_BINARY,    "e" );
1651ToFile( "LINK_X64_BINARY",   $LINK_X64_BINARY,   "e" );
1652ToFile( "LIBMGR_X64_BINARY", $LIBMGR_X64_BINARY, "e" );
1653ToFile( "CPU",               $CPU,               "e" );
1654ToFile( "CPUNAME",           $CPUNAME,           "e" );
1655ToFile( "CVER",              $CVER,              "e" );
1656ToFile( "GUI",               $GUI,               "e" );
1657ToFile( "GLIBC",             $GLIBC,             "e" );
1658ToFile( "GUIBASE",           $GUIBASE,           "e" );
1659ToFile( "GVER",              $GVER,              "e" );
1660ToFile( "OS",                $OS,                "e" );
1661ToFile( "OSVERSION",         $OSVERSION,         "e" );
1662ToFile( "PTHREAD_CFLAGS",    "@PTHREAD_CFLAGS@", "e" );
1663ToFile( "PTHREAD_LIBS",      "@PTHREAD_LIBS@",   "e" );
1664ToFile( "OUTPATH",           $OUTPATH,           "e" );
1665ToFile( "INPATH",            $INPATH,            "e" );
1666ToFile( "PATH_SEPERATOR",    $PATH_SEPERATOR,    "e" );
1667ToFile( "COMEX",             $COMEX,             "e" );
1668ToFile( "CDPATHx",           $CDPATHx,           "e" );
1669ToFile( "DYNAMIC_CRT",       $DYNAMIC_CRT,       "e" );
1670ToFile( "SET_EXCEPTIONS",    $SET_EXCEPTIONS,    "e" );
1671ToFile( "use_shl_versions",  $use_shl_versions,  "e" );
1672ToFile( "FLIPCMD",           $FLIPCMD,           "e" );
1673ToFile( "ARM_TARGET",        "@ARM_TARGET@",     "e" );
1674if ( $platform =~ m/darwin/ )
1675{
1676# MAXOSX_DEPLOYMENT_TARGET : The minimum version required to run the build,
1677# build can assume functions/libraries of that version to be available
1678# (safer/easier than dealing with the MAC_OS_X_VERSION_MAX_ALLOWED macro)
1679# http://developer.apple.com/technotes/tn2002/tn2064.html
1680    ToFile( "MACOSX_DEPLOYMENT_TARGET",       "@MACOSX_DEPLOYMENT_TARGET@",       "e" );
1681    ToFile( "MACOSX_SDK_PATH",       "@MACOSX_SDK_PATH@",       "e" );
1682}
1683
1684#
1685# Writing the variables to file.
1686# (c = comment, e = environment variable, a = alias, n = newline )
1687ToFile( "Variable values.",  $empty,             "c" );
1688if ( $platform =~ m/cygwin/ )
1689{  ToFile( "CYGWIN_PATH",       $CYGWIN_PATH,       "e" );
1690   ToFile( "PSDK_HOME",         $PSDK_HOME,         "e" );
1691   ToFile( "WINDOWS_VISTA_PSDK","@WINDOWS_VISTA_PSDK@","e" );
1692   ToFile( "DIRECTXSDK_LIB",    $DIRECTXSDK_LIB,    "e" );
1693   ToFile( "USE_DIRECTX5",      $USE_DIRECTX5,      "e" );
1694   ToFile( "ATL_LIB",           "@ATL_LIB@",        "e" );
1695   ToFile( "ATL_LIB_X64",       "@ATL_LIB_X64@",    "e" );
1696   ToFile( "ATL_INCLUDE",       "@ATL_INCLUDE@",    "e" );
1697   ToFile( "HAVE_ATLTHUNK",     "@HAVE_ATLTHUNK@",  "e" );
1698   ToFile( "MFC_LIB",           "@MFC_LIB@",        "e" );
1699   ToFile( "MFC_INCLUDE",       "@MFC_INCLUDE@",    "e" );
1700   ToFile( "NSIS_PATH",         $NSIS_PATH,         "e" );
1701   ToFile( "DISABLE_ACTIVEX",   "@DISABLE_ACTIVEX@","e" );
1702   ToFile( "DISABLE_ATL",       "@DISABLE_ATL@",    "e" );
1703   ToFile( "USE_NEW_SDK",       $USE_NEW_SDK,       "e" );
1704
1705   # Hack around dmake's mktmp not generating DOS paths.
1706#   my $tmpdir = qx{cygpath -m "/tmp"};
1707#   chomp($tmpdir);
1708#   ToFile( "TMPDIR",     $tmpdir,            "e" );
1709    ToFile( "TMPDIR",     "/tmp",            "e" );
1710}
1711ToFile( "ENABLE_HUNSPELL",	"@ENABLE_HUNSPELL@", "e" );
1712ToFile( "ENABLE_HYPHEN",	"@ENABLE_HYPHEN@", "e" );
1713
1714ToFile( "PERL",              $PERL,              "e" );
1715ToFile( "RPM",               "@RPM@",            "e" );
1716ToFile( "DPKG",              "@DPKG@",           "e" );
1717ToFile( "PKGMK",             "@PKGMK@",          "e" );
1718ToFile( "GNUMAKE",           "@GNUMAKE@",        "e" );
1719ToFile( "GNUTAR",            "@GNUTAR@",         "e" );
1720ToFile( "UPD",               $UPD,               "e" );
1721ToFile( "WORK_STAMP",        $WORK_STAMP,        "e" );
1722ToFile( "SOLARVER",          $SOLARVER,          "e" );
1723ToFile( "SOLARVERSION",      $SOLARVERSION,      "e" );
1724ToFile( "WORKDIR",           $WORKDIR,           "e" );
1725ToFile( "OUTDIR",            $OUTDIR,            "e" );
1726ToFile( "SOLARENV",          $SOLARENV,          "e" );
1727ToFile( "SOLARENVINC",       $SOLARENVINC,       "e" );
1728ToFile( "LOCALINI",          $LOCALINI,          "e" );
1729ToFile( "STAR_INIROOT",      $STAR_INIROOT,      "e" );
1730ToFile( "STAR_INIROOTOLD",   $STAR_INIROOTOLD,   "e" );
1731ToFile( "STAR_STANDLST",     $STAR_STANDLST,     "e" );
1732ToFile( "STAR_SSCOMMON",     $STAR_SSCOMMON,     "e" );
1733ToFile( "STAR_SSOLARINI",    $STAR_SSOLARINI,    "e" );
1734ToFile( "DMAKEROOT",         $DMAKEROOT,         "e" );
1735if ( $JDK ne "gcj" ) {
1736   ToFile( "CLASSPATH",         $CLASSPATH,         "e" );
1737   ToFile( "XCLASSPATH",        $XCLASSPATH,        "e" );
1738}
1739else {
1740   ToFile( "JAVACISGCJ",       '@JAVACISGCJ@',      "e" );
1741}
1742if ( $GUI eq "UNX" ) {
1743   ToFile( "AWTLIB",           '@AWTLIB@',          "e" );
1744}
1745if ( '@JDK@' ne '' )
1746{
1747   ToFile( "JDK",             "@JDK@",           "e" );
1748   ToFile( "JAVAFLAGS",             "@JAVAFLAGS@",           "e" );
1749   ToFile( "JAVAINTERPRETER", PathFormat("@JAVAINTERPRETER@"), "e" );
1750   ToFile( "JAVAIFLAGS",      "@JAVAIFLAGS@",    "e" );
1751   ToFile( "JAVACOMPILER",    PathFormat("@JAVACOMPILER@"), "e" );
1752   ToFile( "JAVAAOTCOMPILER", PathFormat("@JAVAAOTCOMPILER@"), "e" );
1753   ToFile( "JAVADOC",         PathFormat("@JAVADOC@"), "e" );
1754}
1755ToFile( "SCPDEFS",           '@SCPDEFS@',        "e" );
1756ToFile( "SOLAREXTRAINC",     $SOLAREXTRAINC,     "e" );
1757ToFile( "SOLAREXTRALIB",     $SOLAREXTRALIB,     "e" );
1758ToFile( "PATH",              $PATH,              "e" );
1759ToFile( "SOLARLIB",          $SOLARLIB,          "e" );
1760ToFile( "SOLARINC",          $SOLARINC,          "e" );
1761ToFile( "COMP_ENV",          $COMP_ENV,          "e" );
1762ToFile( "JAVAHOME",          $JAVAHOME,          "e" );
1763ToFile( "CC",                $CC,                "e" );
1764ToFile( "HAVE_GCC_VISIBILITY_FEATURE",
1765		"@HAVE_GCC_VISIBILITY_FEATURE@", "e" );
1766ToFile( "HAVE_LD_HASH_STYLE","@HAVE_LD_HASH_STYLE@","e" );
1767ToFile( "HAVE_LD_BSYMBOLIC_FUNCTIONS",
1768		"@HAVE_LD_BSYMBOLIC_FUNCTIONS@","e" );
1769ToFile( "CXX",               $CXX,               "e" );
1770ToFile( "USE_CCACHE",        "@USE_CCACHE@",     "e" );
1771ToFile( "MINGWCXX",          "@MINGWCXX@",       "e" );
1772ToFile( "MINGWSTRIP",        "@MINGWSTRIP@",     "e" );
1773ToFile( "USE_SYSTEM_STL",    "@USE_SYSTEM_STL@", "e" );
1774ToFile( "ALLOC",             "@ALLOC@",          "e" );
1775ToFile( "ENABLE_SYMBOLS",    "@ENABLE_SYMBOLS@",    "e" );
1776ToFile( "DISABLE_STRIP",     "@DISABLE_STRIP@",     "e" );
1777ToFile( "LFS_CFLAGS",        "@LFS_CFLAGS@",     "e" );
1778ToFile( "ENABLE_CRASHDUMP",  "@ENABLE_CRASHDUMP@",  "e" );
1779ToFile( "ENABLE_CUPS",       "@ENABLE_CUPS@",       "e" );
1780ToFile( "ENABLE_RANDR",      "@ENABLE_RANDR@",      "e" );
1781ToFile( "ENABLE_FONTCONFIG", "@ENABLE_FONTCONFIG@", "e" );
1782ToFile( "ENABLE_DIRECTX",    "@ENABLE_DIRECTX@",    "e" );
1783ToFile( "ENABLE_DIRECT_DRAW","@ENABLE_DIRECT_DRAW@","e" );
1784ToFile( "ENABLE_LAYOUT",     "@ENABLE_LAYOUT@",     "e" );
1785ToFile( "ENABLE_PCH",        "@ENABLE_PCH@",       "e" );
1786ToFile( "ENABLE_GRAPHITE",   "@ENABLE_GRAPHITE@",   "e");
1787ToFile( "SYSTEM_GRAPHITE",   "@SYSTEM_GRAPHITE@",   "e");
1788ToFile( "GRAPHITE_LIBS",     "@GRAPHITE_LIBS@",     "e");
1789ToFile( "GRAPHITE_CFLAGS",   "@GRAPHITE_CFLAGS@",   "e");
1790ToFile( "VC_STANDARD",       "@VC_STANDARD@",      "e" );
1791ToFile( "BUILD_X64",         "@BUILD_X64@",      "e" );
1792ToFile( "ENABLE_CATEGORY_B", "@ENABLE_CATEGORY_B@", "e");
1793ToFile( "BUNDLED_EXTENSION_BLOBS", "@BUNDLED_EXTENSION_BLOBS@", "e");
1794ToFile( "BUNDLED_PREREG_EXTENSIONS", "@BUNDLED_PREREG_EXTENSIONS@", "e");
1795ToFile( "ENABLE_BUNDLED_DICTIONARIES", "@ENABLE_BUNDLED_DICTIONARIES@", "e");
1796ToFile( "SYSTEM_DICTS",      "@SYSTEM_DICTS@",     "e");
1797ToFile( "DICT_SYSTEM_DIR",   "@DICT_SYSTEM_DIR@",  "e");
1798ToFile( "HYPH_SYSTEM_DIR",   "@HYPH_SYSTEM_DIR@",  "e");
1799ToFile( "THES_SYSTEM_DIR",   "@THES_SYSTEM_DIR@",  "e");
1800ToFile( "ENABLE_LOCKDOWN",   "@ENABLE_LOCKDOWN@",  "e" );
1801ToFile( "WITH_LDAP",         "@WITH_LDAP@",        "e" );
1802ToFile( "WITH_OPENLDAP",     "@WITH_OPENLDAP@",    "e" );
1803ToFile( "MOZ_INC",           "@MOZ_INC@",          "e" );
1804ToFile( "WITH_CATA_FONTS",   "@WITH_CATA_FONTS@",  "e" );
1805ToFile( "WITH_CATB_FONTS",   "@WITH_CATB_FONTS@",  "e" );
1806ToFile( "WITH_FONTS",        "@WITH_FONTS@",       "e" );
1807ToFile( "WITHOUT_AFMS",      "@WITHOUT_AFMS@",     "e" );
1808ToFile( "WITHOUT_PPDS",      "@WITHOUT_PPDS@",     "e" );
1809ToFile( "BUILD_TYPE",        "@BUILD_TYPE@",       "e" );
1810ToFile( "ADDITIONAL_REPOSITORIES", "@ADDITIONAL_REPOSITORIES@", "e" );
1811ToFile( "VERBOSE",           "@VERBOSE@",          "e" );
1812ToFile( "ENABLE_EVOAB2",     "@ENABLE_EVOAB2@",    "e" );
1813ToFile( "GOBJECT_CFLAGS",    "@GOBJECT_CFLAGS@",   "e" );
1814ToFile( "GOBJECT_LIBS",      "@GOBJECT_LIBS@",     "e" );
1815if ( '@ENABLE_RPATH@' eq "no" ) {
1816  ToFile( "LINKFLAGSRUNPATH",'',                   "e" );
1817}
1818ToFile( "EPM",               "@EPM@",              "e" );
1819ToFile( "EPM_URL",           "@EPM_URL@",	   "e" );
1820ToFile( "EPM_FLAGS",         $EPM_FLAGS,           "e" );
1821ToFile( "BUILD_EPM",         "@BUILD_EPM@",        "e" );
1822ToFile( "PKGFORMAT",         "@PKGFORMAT@",        "e" );
1823ToFile( "SYSTEM_STDLIBS",    "@SYSTEM_STDLIBS@",   "e" );
1824ToFile( "SYSTEM_ZLIB",       "@SYSTEM_ZLIB@",      "e" );
1825ToFile( "SYSTEM_NSS",        "@SYSTEM_NSS@",       "e" );
1826ToFile( "SYSTEM_OPENSSL",    "@SYSTEM_OPENSSL@",   "e" );
1827ToFile( "OPENSSL_CFLAGS",    "@OPENSSL_CFLAGS@",   "e" );
1828ToFile( "OPENSSL_LIBS",      "@OPENSSL_LIBS@",     "e" );
1829ToFile( "SYSTEM_PYTHON",     "@SYSTEM_PYTHON@",    "e" );
1830ToFile( "PYTHON_CFLAGS",     "@PYTHON_CFLAGS@",    "e" );
1831ToFile( "PYTHON_LIBS",       "@PYTHON_LIBS@",      "e" );
1832if ($SYSTEM_PYTHON eq "NO") {
1833ToFile( "HOME",              "@HOME@",             "e" );
1834}
1835ToFile( "SYSTEM_ICU",        "@SYSTEM_ICU@",       "e" );
1836ToFile( "ICU_MAJOR",         "@ICU_MAJOR@",        "e" );
1837ToFile( "ICU_MINOR",         "@ICU_MINOR@",        "e" );
1838ToFile( "ICU_MICRO",         "@ICU_MICRO@",        "e" );
1839ToFile( "SYSTEM_GENBRK",     "@SYSTEM_GENBRK@",    "e" );
1840ToFile( "SYSTEM_GENCCODE",   "@SYSTEM_GENCCODE@",  "e" );
1841ToFile( "SYSTEM_GENCMN",     "@SYSTEM_GENCMN@",    "e" );
1842ToFile( "SYSTEM_JPEG",       "@SYSTEM_JPEG@",      "e" );
1843ToFile( "FREETYPE_CFLAGS",   "@FREETYPE_CFLAGS@",  "e" );
1844ToFile( "FREETYPE_LIBS",     "@FREETYPE_LIBS@",    "e" );
1845ToFile( "SYSTEM_POPPLER",    "@SYSTEM_POPPLER@",   "e" );
1846ToFile( "POPPLER_CFLAGS",    "@POPPLER_CFLAGS@",   "e" );
1847ToFile( "POPPLER_LIBS",      "@POPPLER_LIBS@",     "e" );
1848ToFile( "GSTREAMER_CFLAGS",  "@GSTREAMER_CFLAGS@", "e" );
1849ToFile( "GSTREAMER_LIBS",    "@GSTREAMER_LIBS@",   "e" );
1850ToFile( "SYSTEM_CAIRO",      "@SYSTEM_CAIRO@",     "e" );
1851ToFile( "BUILD_PIXMAN",      "@BUILD_PIXMAN@",     "e" );
1852ToFile( "CAIRO_CFLAGS",      "@CAIRO_CFLAGS@",     "e" );
1853ToFile( "CAIRO_LIBS",        "@CAIRO_LIBS@",       "e" );
1854ToFile( "XRANDR_CFLAGS",     "@XRANDR_CFLAGS@",    "e" );
1855ToFile( "XRANDR_LIBS",       "@XRANDR_LIBS@",      "e" );
1856ToFile( "XRANDR_DLOPEN",     "@XRANDR_DLOPEN@",    "e" );
1857ToFile( "SYSTEM_LIBWPD",     "@SYSTEM_LIBWPD@",    "e" );
1858ToFile( "LIBWPD_CFLAGS",     "@LIBWPD_CFLAGS@",    "e" );
1859ToFile( "LIBWPD_LIBS",       "@LIBWPD_LIBS@",      "e" );
1860ToFile( "SYSTEM_CPPUNIT",    "@SYSTEM_CPPUNIT@",   "e" );
1861ToFile( "CPPUNIT_CFLAGS",    "@CPPUNIT_CFLAGS@",   "e" );
1862ToFile( "CPPUNIT_LIBS",      "@CPPUNIT_LIBS@",     "e" );
1863ToFile( "WITH_CPPUNIT",      "@WITH_CPPUNIT@",     "e" );
1864ToFile( "SYSTEM_LIBXML",     "@SYSTEM_LIBXML@",    "e" );
1865ToFile( "USE_FT_EMBOLDEN",   "@USE_FT_EMBOLDEN@",  "e" );
1866ToFile( "LIBXML_CFLAGS",     "@LIBXML_CFLAGS@",    "e" );
1867ToFile( "LIBXML_LIBS",       "@LIBXML_LIBS@",      "e" );
1868ToFile( "SYSTEM_EXPAT",      "@SYSTEM_EXPAT@",     "e" );
1869ToFile( "ENABLE_MYSQLC",     "@ENABLE_MYSQLC@",    "e" );
1870ToFile( "SYSTEM_MYSQL",      "@SYSTEM_MYSQL@",     "e" );
1871ToFile( "SYSTEM_MYSQL_CPPCONN","@SYSTEM_MYSQL_CPPCONN@","e" );
1872ToFile( "MYSQL_INC",         "@MYSQL_INC@",        "e" );
1873ToFile( "MYSQL_LIB",         "@MYSQL_LIB@",        "e" );
1874ToFile( "MYSQL_DEFINES",     "@MYSQL_DEFINES@",    "e" );
1875ToFile( "LIBMYSQL_PATH",     "@LIBMYSQL_PATH@",    "e" );
1876ToFile( "SYSTEM_HSQLDB",     "@SYSTEM_HSQLDB@",    "e" );
1877ToFile( "HSQLDB_JAR",        "@HSQLDB_JAR@",       "e" );
1878ToFile( "SYSTEM_LUCENE",     "@SYSTEM_LUCENE@",    "e" );
1879ToFile( "LUCENE_CORE_JAR",   "@LUCENE_CORE_JAR@",  "e" );
1880ToFile( "LUCENE_ANALYZERS_JAR",   "@LUCENE_ANALYZERS_JAR@",  "e" );
1881ToFile( "SYSTEM_BSH",        "@SYSTEM_BSH@",       "e" );
1882ToFile( "BSH_JAR",           "@BSH_JAR@",          "e" );
1883ToFile( "ENABLE_BEANSHELL", "@ENABLE_BEANSHELL@",  "e" );
1884ToFile( "SYSTEM_SAXON",      "@SYSTEM_SAXON@",     "e" );
1885ToFile( "SAXON_JAR",         "@SAXON_JAR@",        "e" );
1886ToFile( "DISABLE_SAXON",     "@DISABLE_SAXON@",    "e" );
1887ToFile( "ENABLE_JAVASCRIPT", "@ENABLE_JAVASCRIPT@","e" );
1888ToFile( "SYSTEM_APR",        "@SYSTEM_APR@",       "e" );
1889ToFile( "APR_CFLAGS",        "@APR_CFLAGS@",       "e" );
1890ToFile( "APR_LIBS",          "@APR_LIBS@",         "e" );
1891ToFile( "SYSTEM_APR_UTIL",   "@SYSTEM_APR_UTIL@",  "e" );
1892ToFile( "APR_UTIL_CFLAGS",   "@APR_UTIL_CFLAGS@",  "e" );
1893ToFile( "APR_UTIL_LIBS",     "@APR_UTIL_LIBS@",    "e" );
1894ToFile( "SYSTEM_SERF",       "@SYSTEM_SERF@",      "e" );
1895ToFile( "SERF_CFLAGS",       "@SERF_CFLAGS@",      "e" );
1896ToFile( "SERF_LIBS",         "@SERF_LIBS@",        "e" );
1897ToFile( "SYSTEM_COINMP",     "@SYSTEM_COINMP@",    "e" );
1898ToFile( "ENABLE_COINMP",     "@ENABLE_COINMP@",    "e" );
1899ToFile( "COINMP_CFLAGS",     "@COINMP_CFLAGS@",    "e" );
1900ToFile( "COINMP_LIBS",       "@COINMP_LIBS@",      "e" );
1901ToFile( "SYSTEM_ODBC_HEADERS","@SYSTEM_ODBC_HEADERS@","e" );
1902ToFile( "SYSTEM_LIBXSLT",    "@SYSTEM_LIBXSLT@",   "e" );
1903ToFile( "LIBXSLT_CFLAGS",    "@LIBXSLT_CFLAGS@",   "e" );
1904ToFile( "LIBXSLT_LIBS",      "@LIBXSLT_LIBS@",     "e" );
1905ToFile( "SYSTEM_SANE_HEADER","@SYSTEM_SANE_HEADER@","e" );
1906ToFile( "SYSTEM_XRENDER_HEADERS","@SYSTEM_XRENDER_HEADERS@","e" );
1907ToFile( "SYSTEM_CURL",       "@SYSTEM_CURL@",      "e" );
1908ToFile( "CURL_CFLAGS",       "@CURL_CFLAGS@",      "e" );
1909ToFile( "CURL_LIBS",         "@CURL_LIBS@",        "e" );
1910ToFile( "SYSTEM_BOOST",      "@SYSTEM_BOOST@",     "e" );
1911ToFile( "SYSTEM_MDDS",       "@SYSTEM_MDDS@",      "e" );
1912ToFile( "SYSTEM_VIGRA",      "@SYSTEM_VIGRA@",     "e" );
1913ToFile( "SYSTEM_GDKPIXBUF",  "@SYSTEM_GDKPIXBUF@",   "e" );
1914ToFile( "SYSTEM_GLIB",       "@SYSTEM_GLIB@",   "e" );
1915ToFile( "SYSTEM_GETTEXT",    "@SYSTEM_GETTEXT@",   "e" );
1916ToFile( "SYSTEM_PANGO",      "@SYSTEM_PANGO@",   "e" );
1917ToFile( "SYSTEM_LIBPNG",     "@SYSTEM_LIBPNG@",   "e" );
1918ToFile( "SYSTEM_LIBJPEG",    "@SYSTEM_LIBJPEG@",   "e" );
1919ToFile( "RAT_JAR_HOME",      "@RAT_JAR_HOME@",     "e" );
1920ToFile( "DMAKE_URL",         "@DMAKE_URL@",        "e" );
1921ToFile( "DMAKE_PATH",        "@DMAKE_PATH@",       "e" );
1922ToFile( "IS_SYSTEM_DMAKE",   "@IS_SYSTEM_DMAKE@",  "e" );
1923ToFile( "BUILD_STAX",        "@BUILD_STAX@",       "e" );
1924ToFile( "BUILD_UNOWINREG",   "@BUILD_UNOWINREG@",  "e" );
1925ToFile( "USE_XINERAMA",      "@USE_XINERAMA@",     "e" );
1926ToFile( "XINERAMA_LINK",     "@XINERAMA_LINK@",    "e" );
1927ToFile( "SYSTEM_REDLAND",    "@SYSTEM_REDLAND@",   "e" );
1928ToFile( "REDLAND_CFLAGS",    "@REDLAND_CFLAGS@",   "e" );
1929ToFile( "REDLAND_LIBS",      "@REDLAND_LIBS@",     "e" );
1930ToFile( "SYSTEM_HUNSPELL",   "@SYSTEM_HUNSPELL@",  "e" );
1931ToFile( "HUNSPELL_CFLAGS",   "@HUNSPELL_CFLAGS@",  "e" );
1932ToFile( "HUNSPELL_LIBS",     "@HUNSPELL_LIBS@",    "e" );
1933ToFile( "HAVE_GETOPT",       "@HAVE_GETOPT@",      "e" );
1934ToFile( "HAVE_READDIR_R",    "@HAVE_READDIR_R@",   "e" );
1935ToFile( "SYSTEM_LIBC",       "@SYSTEM_LIBC@",      "e" );
1936ToFile( "SYSTEM_HYPH",       "@SYSTEM_HYPH@",      "e" );
1937ToFile( "HYPHEN_LIB",        "@HYPHEN_LIB@",       "e" );
1938ToFile( "SYSTEM_MYTHES",     "@SYSTEM_MYTHES@",    "e" );
1939ToFile( "MYTHES_CFLAGS",     "@MYTHES_CFLAGS@",    "e" );
1940ToFile( "MYTHES_LIBS",       "@MYTHES_LIBS@",      "e" );
1941ToFile( "SYSTEM_LIBTEXTCAT", "@SYSTEM_LIBTEXTCAT@","e" );
1942ToFile( "SYSTEM_LIBTEXTCAT_DATA","@SYSTEM_LIBTEXTCAT_DATA@","e" );
1943ToFile( "PAM",               "@PAM@",              "e" );
1944ToFile( "NEW_SHADOW_API",    "@NEW_SHADOW_API@",   "e" );
1945ToFile( "PAM_LINK",          "@PAM_LINK@",         "e" );
1946ToFile( "CRYPT_LINK",        "@CRYPT_LINK@",       "e" );
1947ToFile( "XAU_LIBS",          "@XAU_LIBS@",         "e" );
1948ToFile( "GXX_INCLUDE_PATH",  PathFormat("@GXX_INCLUDE_PATH@"), "e" );
1949ToFile( "COMMON_BUILD_TOOLS",$COMMON_BUILD_TOOLS,  "e" );
1950if ($platform !~ m/cygwin|os2/) {
1951   if ( !defined $ENV{"TMPDIR"} || $ENV{"TMPDIR"} eq "" ) {
1952      ToFile( "TMPDIR",      "/tmp",               "e" );
1953   } else {
1954      ToFile( "TMPDIR",      "$ENV{'TMPDIR'}",     "e" );
1955   }
1956}
1957ToFile( "SOLARSRC",           $SOLARSRC,           "e" );
1958ToFile( "SOURCE_ROOT_DIR",    $SOURCE_ROOT_DIR,    "e" );
1959ToFile( "gb_REPOS",           $gb_REPOS,           "e" );
1960
1961if ( $platform =~ m/cygwin/ )
1962{
1963   ToFile( "ILIB",              $ILIB,              "e" );
1964   if ( $MINGW eq "yes" )
1965   {  ToFile( "ATL_INCLUDE",       $ATL_INCLUDE,       "e" );
1966      ToFile( "EXCEPTIONS",        "@EXCEPTIONS@",        "e" );
1967      ToFile( "DIRECTXSDK_HOME",    PathFormat("@DIRECTXSDK_HOME@"),    "e" );
1968      ToFile( "USE_MINGW",         $USE_MINGW,              "e" );
1969      ToFile( "MINGW_CLIB_DIR",         PathFormat("@MINGW_CLIB_DIR@"),              "e" );
1970      ToFile( "MINGW_SHARED_GCCLIB",         "@MINGW_SHARED_GCCLIB@",              "e" );
1971      ToFile( "MINGW_GCCLIB_EH",      "@MINGW_GCCLIB_EH@",              "e" );
1972      ToFile( "MINGW_SHARED_GXXLIB",         "@MINGW_SHARED_GXXLIB@",              "e" );
1973      ToFile( "MINGW_SHARED_LIBSTDCPP",         "@MINGW_SHARED_LIBSTDCPP@",              "e" );
1974      ToFile( "MINGW_GCCDLL",         "@MINGW_GCCDLL@",              "e" );
1975      ToFile( "MINGW_GXXDLL",         "@MINGW_GXXDLL@",              "e" );
1976   }
1977   ToFile( "GREP",              $WIN_GREP,          "e" );
1978   ToFile( "FIND",              $WIN_FIND,          "e" );
1979   ToFile( "LS",                $WIN_LS,            "e" );
1980   ToFile( "GNUCOPY",           $WIN_GNUCOPY,       "e" );
1981   ToFile( "TOUCH",             $WIN_TOUCH,         "e" );
1982   ToFile( "WITH_VC_REDIST",    "@WITH_VC_REDIST@", "e" );
1983}
1984if ( $platform =~ m/os2/ )
1985{
1986   #ToFile( "ILIB",              $ILIB,              "e" );
1987
1988   ToFile( "GREP",              "grep.exe",         "e" );
1989   ToFile( "FIND",              "find.exe",         "e" );
1990   ToFile( "LS",                "ls.exe",           "e" );
1991   ToFile( "GNUCOPY",           "cp.exe",           "e" );
1992   ToFile( "TOUCH",             "touch",            "e" );
1993   ToFile( "CONFIG_SITE",       "/@unixroot/usr/share/config.site", "e" );
1994}
1995
1996# $perlpre is only used for the following three variables
1997# and only set for OS2.
1998my $perlpre = "";
1999if (( $platform =~ m/os2/ )) {
2000   $perlpre = "perl ".${SOLARENV}.${BIN}.${ds};
2001}
2002ToFile( "DELIVER",       $perlpre."deliver.pl",     "e" );
2003ToFile( "MKOUT",         $perlpre."mkout.pl",       "e" );
2004ToFile( "ZIPDEP",        $perlpre."zipdep.pl",      "e" );
2005
2006#
2007# Writing the aliases to file.
2008ToFile( "Aliases.",          $empty,             "c" );
2009ToFile( "Don't set aliases when bootstrapping", $empty, "c" );
2010ToFile( 'if ( ! ${?_ISBOOTSTRAP_} ) then', $empty, "y");
2011ToFile( "if test -z \"\$_ISBOOTSTRAP_\"; then", $empty, "z");
2012
2013ToFile( "alias mkout",       $mkout,             "a" );
2014ToFile( "alias deliver",     $deliver,           "a" );
2015ToFile( "alias build",       $build,             "a" );
2016ToFile( "alias build_client",$build_client,      "a" );
2017ToFile( "alias zipdep",      $zipdep,            "a" );
2018if ( $platform !~ m/cygwin/ )
2019{  ToFile( "alias nmake",       $nmake,             "a" );
2020}
2021if ( $platform =~ m/os2/ )
2022{  ToFile( "alias gunzip",       "gzip -d",         "a" );
2023}
2024
2025ToFile( "endif",             $empty, "y");
2026ToFile( "fi",                $empty, "z");
2027
2028# Check if the right dmake version is used. (W32 only)
2029if ( $platform =~ m/cygwin/ ) {
2030    ToFile( "Check if the right dmake version is used.", $empty, "c" );
2031    # Invalidate build environment.
2032    ToFile( "WORK_STAMP", "_invalid_", "e" );
2033    # Don't test the dmake version if this file is sourced by bootstrap
2034    ToFile( "bash -c 'if test -n \"\$_ISBOOTSTRAP_\" || (dmake.exe -V | grep -e \"-cygwin\\|OS := cygwin\" > /dev/null ); then true; else echo -e \"\\n\\nERROR: Not a cygwin build dmake or dmake missing, please check!\\n\\n\" ; sleep 5; false ; fi' || exit 1", $empty, "y");
2035    # Restore valid environment if test was successful.
2036    ToFile( "WORK_STAMP",        $WORK_STAMP,        "e" );
2037    ToFile( "", $empty, "n");
2038}
2039
2040# on Solaris, MacOSX and FreeBSD (and Windows) set GNUPATCH and GPERF
2041if ($platform =~ m/solaris|darwin|freebsd|cygwin/)
2042{
2043  ToFile( "GNUPATCH",   "@GNUPATCH@",	"e");
2044  ToFile( "GPERF", "@GPERF@",	"e");
2045}
2046ToFile( "GNUCOPY",	"@GNUCP@",	"e");
2047# OS/2 define .pl as executable for 4os2
2048# use - as switch char for dmake (os2/switchar.c)
2049if ($platform =~ m/os2/)
2050{
2051  ToFile( ".pl",   	"perl",	"e");
2052  ToFile( "SWITCHAR",   "-",	"e");
2053}
2054ToFile( "SAL_ENABLE_FILE_LOCKING",	"1",	"e");
2055#
2056# Writing unset variables you might not need to file.
2057#
2058print OUT $unsetvars;
2059
2060print OUT_SH "export $exportvars$newline";
2061print OUT_SH "unset $unsetvarssh$newline";
2062
2063if(defined($outfile_bat))
2064{  print OUT_BAT $unsetvarsbat;
2065}
2066
2067#
2068#---------------------------
2069# VIII. Closing output file.
2070#---------------------------
2071#
2072close( OUT ) || print "Can't close $outfile: $!";
2073
2074close( OUT_SH ) || print "Can't close $outfile_sh: $!";
2075
2076if( defined($outfile_bat))
2077{  close( OUT_BAT ) || print "Can't close $outfile_bat: $!";
2078}
2079
2080#
2081#------------------------------
2082# IX. Sourcing the output file.
2083#------------------------------
2084#
2085#---------------------------------
2086# X. Set up the build environment.
2087#---------------------------------
2088#
2089#--------------------------------------------------------
2090# XI. Moving the output file to the build home directory.
2091#--------------------------------------------------------
2092#
2093$tmp = $SRC_ROOT.$ds.$outfile;
2094if (rename( $outfile, $tmp ) ne 1)
2095{  `mv -f $outfile $tmp`;
2096}
2097
2098$tmp = $SRC_ROOT.$ds.$outfile_sh;
2099if (rename( $outfile_sh, $tmp ) ne 1)
2100{  `mv -f $outfile_sh $tmp`;
2101}
2102
2103if(defined($outfile_bat))
2104{
2105    $tmp = $SRC_ROOT.$ds.$outfile_bat;
2106    if (rename( $outfile_bat, $tmp ) ne 1)
2107    {  `mv -f $outfile_bat $tmp`;
2108    }
2109}
2110
2111#
2112#--------------------------------------------------------
2113# XII. Message at the end.
2114#--------------------------------------------------------
2115#
2116#
2117print "*********************************************************".
2118      "******************* $newline"."*"."$newline";
2119print "* Apache OpenOffice $UPD configuration. $newline";
2120for ( $tmp = 0; $tmp < 2; $tmp++ )
2121{  print "* $newline";
2122}
2123print "* Configuration part of Apache OpenOffice $UPD build is finished. $newline* $newline";
2124print "* Note: Be aware that you might not be able to build Apache OpenOffice if $newline".
2125      "* you ignore any warnings that were generated during this configuration $newline".
2126      "* process. $newline* $newline";
2127
2128if ( $Warning ne "" )
2129{  print "$Warning*";
2130   print "$newline";
2131}
2132
2133print "*$newline* USAGE: $newline";
2134print "* Source $outfile (in tcsh)";
2135print " or $outfile.sh (in sh)";
2136print "$newline";
2137print "* in order to set up the build-environment variables.$newline";
2138for ( $tmp = 0; $tmp < 2; $tmp++ )
2139{  print "* $newline";
2140}
2141print "*********************************************************".
2142      "******************* $newline";
2143
2144$bootfile = "bootstrap";
2145open( OUT, ">$bootfile" ) ||
2146die "Cannot open $bootfile: $!\n";
2147print OUT "#!/bin/sh\n";
2148print OUT "_ISBOOTSTRAP_=TRUE ; export _ISBOOTSTRAP_ ; . $SRC_ROOT/$outfile.sh\n";
2149print OUT "unset _ISBOOTSTRAP_; export _ISBOOTSTRAP_\n";
2150if ( $MINGW eq "yes" )
2151{  print OUT 'PATH="/usr/bin:$PATH" : export PATH'."\n"; }
2152close( OUT ) || print "Can't close $bootfile: $!";
2153system(`cat bootstrap.1 >> bootstrap`);
2154system(`chmod +x bootstrap`);
2155#
2156#--------------------------------------------------------
2157# Moving the bootstrap file to the build home directory.
2158#--------------------------------------------------------
2159#
2160$tmp = $SRC_ROOT.$ds.$bootfile;
2161if (rename( $bootfile, $tmp ) ne 1)
2162{  `mv -f $bootfile $tmp`;
2163}
2164
2165print "Configure completed";
2166if ( $Warning ne "" ) {
2167	print ", but\n***** WARNINGS WERE ISSUED *****";
2168}
2169print "\n\nRun ./bootstrap in $SRC_ROOT to provide build tools and get third-party packages\n";
2170
2171#
2172#-----------------
2173# XII. Functions.
2174#-----------------
2175#
2176#-------------------------------------------------------------
2177# Function name: CheckPathName
2178# Description:   chops off the '/' character if it's the last
2179#                character in a pathname. also adds the '/'
2180#                character if it's not the first character
2181#                in a path.
2182# Arguments:     1. Path (string)
2183# Return value:  Path (string)
2184#-------------------------------------------------------------
2185sub CheckPathName
2186{  my $retrn = $_[ 0 ];
2187   if ($platform =~ m/cygwin/)
2188   {  # Check if the first character is not a '/'.
2189      if ( !( $_[ 0 ] =~ /^\// ) )
2190      {  $retrn = $ds.$_[ 0 ];
2191      }
2192   }
2193   # kill the last '/','\','\n' if they exists.
2194   $retrn =~ s![\s/\\]+$!!;
2195   # Done!
2196   return( $retrn );
2197}
2198#-------------------------------------------------------------
2199# Function name: CheckPathExist
2200# Description:   Checks whether the directory that is given
2201#                as an argument exists. If not abort.
2202# Arguments:     1. Path (string)
2203# Return value:  void
2204#-------------------------------------------------------------
2205sub CheckPathExist
2206{  my $dir = $_[ 0 ];
2207   if ( !( -d $dir ) and $^O ne 'MSWin32' )
2208   {  print ( "The directory $_[ 0 ] does not exist. Please create first.\n" );
2209      exit 1;
2210   }
2211   else
2212   {  # Don't check under ActiveState Perl (Windows). The path is possibly
2213      # posix and it cannot handle it.
2214      return "true";
2215   }
2216}
2217#------------------------------------------------------------
2218# Function name: CreateFileHeader
2219# Description:   Creates a header for the outfile.
2220# Arguments:     1. File to write to
2221#                2. UPD (string)
2222#                3. Platform (string)
2223#                4. name of shell for this file
2224#                5. comment to use for this file
2225# Return value:  void
2226#------------------------------------------------------------
2227sub CreateFileHeader
2228{  my $timestamp = `date`;
2229   chomp( $timestamp );
2230   my $filehandle = $_[0];
2231   my $comment = $_[4];
2232   print { $filehandle } "$comment #################################################################";
2233   print { $filehandle } $newline;
2234   print { $filehandle } "$comment Apache OpenOffice $_[ 1 ] build environment file for: $_[ 2 ]. $newline";
2235   print { $filehandle } "$comment Generated on: $timestamp $newline";
2236   print { $filehandle } "$comment Source this file to set up the build environment. $newline";
2237   print { $filehandle } "$comment 1. exec $_[3] $newline";
2238   print { $filehandle } "$comment 2. source $outfile $newline";
2239   print { $filehandle } "$comment #################################################################";
2240   print { $filehandle } $newline;
2241}
2242#---------------------------------------------------------
2243# Function name: ToFile
2244# Description:   Writes the environment variable in the
2245#                output file.
2246# Arguments:     1. Name of environment variable (string)
2247#                2. Value of environment variable (string)
2248#                3. e - env. var
2249#                   a - alias
2250#                   c - comment
2251#                   n - newline
2252#                   x - raw, write as is to OUT_BAT
2253#                   y - raw, write as is to OUT
2254#                   z - raw, write as is to OUT_SH
2255# Return value:  void
2256#---------------------------------------------------------
2257sub ToFile {
2258   if ( $_[ 2 ] eq "e" ) {
2259      # Write an environment variable to file.
2260      if (defined $_[ 1 ] && $_[ 1 ] ne "" ) {
2261         my $envvar = $_[ 1 ];
2262         my $envvarbash = $envvar;
2263
2264         if ($platform =~ m/os2/) {
2265             # expand the variables
2266             $envvar =~ s/(\$\{?\w+\}?)/$1/eeg ;
2267             # Some variables need to be translated
2268             #if ( ($_[ 0 ] =~ /^PATH$/) and ($platform !~ m/os2/) ) {
2269             #    # PATH is in cygwin format, but for 4nt it needs to be DOS.
2270             #    $win_format_var = WinPath( $envvar, ":" );
2271             #} else {
2272             #    $win_format_var = WinFormat( $envvar );
2273             #}
2274             ## The excluded variables are translated by cygwin
2275             #if ( $_[ 0 ] !~ /^PATH$|^TMP$|^TEMP$|^TMPDIR$|^HOME$/i ) {
2276             #    $envvar = $win_format_var;
2277             #}
2278         }
2279
2280         # Tcsh/bash needs backslashes quoted
2281         $envvar =~ s/\\/\\\\/g;
2282         $envvarbash = $envvar;
2283
2284         if ($platform =~ m/os2/) {
2285             # expand the variables
2286             $envvar =~ s/(\$\{?\w+\}?)/$1/eeg ;
2287             if ($_[ 0 ] =~ /^PATH$|^BEGINLIBPATH$/) {
2288                # always use \ for them
2289                $envvar =~ s/\//\\/g ;
2290             }
2291             $win_format_var = $envvar;
2292         }
2293
2294         printf("%-12s %-17s %-10s %s\n", "The variable", $_[ 0 ], "is set to:", $envvar);
2295         print OUT "$setenv $_[ 0 ] \"$envvar\"$newline";  # to tcsh file
2296         print OUT_SH "$_[ 0 ]=\"$envvarbash\"$newline";   # to sh file
2297         $exportvars .= " $_[ 0 ]";                        # add to export list for sh file
2298
2299         if(defined($outfile_bat)) {
2300             print OUT_BAT "IF DEFINED $_[ 0 ] $unset $_[ 0 ]$newline";
2301             print OUT_BAT "$set $_[ 0 ]=$win_format_var$newline";
2302         }
2303
2304      } else {
2305         printf("%-12s %-17s %-10s %s\n", "The variable", $_[ 0 ], "is set to:", "unset") ; # to stdout
2306         $unsetvars .= "$unsetenv $_[ 0 ] >& /dev/null$newline"; # for tcsh file
2307         $unsetvarssh .= " $_[ 0 ]";                             # for sh file
2308         if(defined($outfile_bat)) {
2309             $unsetvarsbat .= "$unset $_[ 0 ] >& NUL$newline";
2310         }
2311      }
2312   }
2313   elsif ( $_[ 2 ] eq "a" )
2314   {  # Write an alias to file.
2315      print "The $_[ 0 ] is set to: $_[ 1 ]\n";    # to stdout
2316      print OUT "$_[ 0 ] $_[ 1 ]$newline";         # to tcsh file
2317      print OUT_SH "$_[ 0 ]=$_[ 1 ]$newline";      # to sh file
2318      if(defined($outfile_bat)) # create the correct 4nt alias format
2319      {  my $aliastmp = $_[ 1 ];
2320         $aliastmp =~ s/\$/\%/g;
2321         $aliastmp =~ s!/!\\!g;
2322         $aliastmp =~ s!"!!g;
2323         print OUT_BAT "$_[ 0 ]=".'`'.$aliastmp.'`'.$newline;
2324      }
2325   }
2326   elsif ( $_[ 2 ] eq "c" )
2327   {  # Write a comment to file.
2328      print "$newline";
2329      print "$comment$newline";
2330      print "$comment $_[ 0 ]$newline";
2331      print "$comment$newline";
2332      print OUT "$newline";
2333      print OUT "$comment$newline";
2334      print OUT "$comment $_[ 0 ]$newline";
2335      print OUT "$comment$newline";
2336      print OUT_SH "$newline";
2337      print OUT_SH "$comment$newline";
2338      print OUT_SH "$comment $_[ 0 ]$newline";
2339      print OUT_SH "$comment$newline";
2340      if(defined($outfile_bat)) {
2341          print OUT_BAT "$newline";
2342          print OUT_BAT "rem $newline";
2343          print OUT_BAT "rem $_[ 0 ]$newline";
2344          print OUT_BAT "rem $newline";
2345      }
2346   }
2347   elsif ( $_[ 2 ] eq "n" )
2348   {  #Write a newline to a file
2349      print OUT "$newline";
2350      print OUT_SH "$newline";
2351      print OUT_BAT "$newline" if defined($outfile_bat);
2352   }
2353   elsif ( $_[ 2 ] eq "y" )
2354   {
2355      #Write first argument as is, and nothing else
2356      print OUT "$_[ 0 ]$newline";
2357   }
2358   elsif ( $_[ 2 ] eq "z" )
2359   {
2360      #Write first argument as is, and nothing else
2361      print OUT_SH "$_[ 0 ]$newline";
2362   }
2363   else
2364   {  print "Unknown type!$newline";
2365   }
2366}
2367#----------------------------------------------------------
2368# Function name: PathFormat
2369# Description:   Reformat path to either POSIX or mixed mode style.
2370# Arguments:     1. Variable (string)
2371# Return value:  Reformatted String
2372#----------------------------------------------------------
2373sub PathFormat
2374{  my ( $variable, $d1, $d2 );
2375   $variable = $_[ 0 ];
2376
2377   if ( $platform =~ m/cygwin/ )
2378   {   $variable =~ s/(\$\{?\w+\}?)/$1/eeg ; # expand the variables
2379       $variable =~ s/(\$\{?\w+\}?)/$1/eeg ; # expand the variables twice!
2380
2381       # Complain if PosixPath is used on a PATH-like string
2382       if ( $variable =~ m/;/ ) {
2383           die( "Do not use on PATH lists (i.e., 'c:\\foo;d:\\bar')");
2384       }
2385
2386       # Replace path with space with short dos path
2387       if ( $variable =~ / / ) {
2388           chomp( $variable = qx{cygpath -d "$variable"} ) ;
2389       }
2390
2391       # Replace absolute paths or DOS paths with ...
2392       if ( ( $variable =~ m/^\// ) or ( $variable =~ m/:/ ) ) {
2393           # mixed mode paths
2394           chomp( $variable = qx{cygpath -m "$variable"} );
2395       }
2396   }
2397   return $variable;
2398}
2399#----------------------------------------------------------
2400# Function name: CygFormat
2401# Description:   Format variables to cygwin posix style path
2402#                unless .
2403# Arguments:     1. Variable (string)
2404# Return value:  Reformatted String
2405#----------------------------------------------------------
2406sub CygFormat
2407{  my ( $variable, $d1, $d2 );
2408   $variable = $_[ 0 ];
2409   # ToDo: Do the replacement only if Windows and var contains "\" and ":"
2410   if ( $platform =~ m/cygwin|os2/ )
2411   {
2412       # Complain if PosixPath is used on a PATH-like string
2413       if ( $variable =~ m/;/ ) {
2414           die( "Do not use on PATH lists (i.e., 'c:\\foo;d:\\bar')");
2415       }
2416
2417       # Replace DOS paths with posix paths
2418       if ( ( $variable =~ m/\\/ ) or ( $variable =~ m/:/ ) ) {
2419           chomp( $variable = qx{cygpath -u "$variable"} );
2420       }
2421   }
2422   return $variable;
2423}
2424#----------------------------------------------------------
2425# Function name: WinFormat
2426# Description:   Format variables to Windows Format.
2427# Arguments:     1. Variable (string)
2428# Return value:  Reformatted String
2429#----------------------------------------------------------
2430sub WinFormat
2431{  my ( $variable, $d1 );
2432   $variable = $_[ 0 ];
2433   $variable =~ s/^\s+//g ; #remove leading spaces
2434   $variable =~ s/\s+$//g ; #remove trailing spaces
2435   $variable =~ s/(\$\{?\w+\}?)/$1/eeg ;   # expand the variables
2436   $variable =~ s/(\$\{?\w+\}?)/$1/eeg ;   # expand the variables twice!
2437   $variable =~ s/:+/:/g ;                 # remove multiple ;
2438
2439   # Some variables are already in DOS path format, return early.
2440   if ( $variable =~ /\\/ ) {
2441       return $variable;
2442   }
2443   if ( $variable eq ";" ) {
2444       # Ignore single ';'
2445       return $variable;
2446   }
2447   if ( $variable =~ /;/ and $variable =~ /\// ) {
2448       # Mixed mode path-style entry, separated with ;, like CLASSPATH
2449       return $variable;
2450   }
2451
2452   # Search for posix path entry and replace with cygpath -w entry
2453   # ( -d if filename contains space )
2454
2455   # Normal paths
2456
2457   # One special case is if "perl " is prepended.
2458   $variable =~ /^(perl\s+)?(.*)$/;
2459   my $perlpre = $1;
2460   if ( !defined($perlpre) ) {
2461       $perlpre = "";
2462   }
2463   $variable = $2;
2464
2465   if ( $variable =~ /^\/[\w\.~ ]+/ ) {
2466       if ( $variable =~ / / ) {
2467           # Use DOS 8.3 style to avoid quoting
2468           chomp( $variable = qx{cygpath -d "$variable"} );
2469       } else {
2470           # Use "normal" filenames
2471           chomp( $variable = qx{cygpath -w "$variable"} );
2472       }
2473   } else {
2474       # relative or absolute DOS paths here
2475       $variable =~ s#/#\\#g;
2476   }
2477
2478   $variable = $perlpre.$variable;
2479   if ( ($perlpre ne "") && ($^O eq "cygwin")) {
2480       # Cygwin's perl needs quoted backslashes
2481       $variable =~ s#\\#\\\\#g;
2482   }
2483
2484   return $variable;
2485}
2486
2487#----------------------------------------------------------
2488# Function name: WinPath
2489# Description:   Reformat a $sep seperated path using DOS paths.
2490# Arguments:     1. Variable (string)
2491#                2. Separaror (string)
2492# Return value:  Reformatted String
2493#----------------------------------------------------------
2494sub WinPath
2495{
2496    my ( $variable, $d1, $sep, @split_var );
2497
2498    if ( $platform =~ m/cygwin/ ) {
2499        $variable = $_[ 0 ];
2500        $sep = $_[ 1 ];
2501        $variable =~ s/^\s+//g ; #remove leading spaces
2502        $variable =~ s/\s+$//g ; #remove trailing spaces
2503        $variable =~ s/(\$\{?\w+\}?)/$1/eeg ; # expand the variables
2504        $variable =~ s/(\$\{?\w+\}?)/$1/eeg ; # expand the variables twice!
2505
2506        @split_var = split(/$sep/,$variable);
2507        foreach $d1 ( @split_var ) {
2508            if ( $d1 =~ /(?:^\/[\w\.~ ]+)+/ ) {
2509                if ( $d1 =~ / / ) {
2510                    # Use DOS 8.3 style to avoid quoting
2511                    chomp( $d1 = qx{cygpath -d "$d1"} );
2512                } else {
2513                    # Use "normal" filenames
2514                    chomp( $d1 = qx{cygpath -w "$d1"} );
2515                }
2516            }
2517        }
2518        $variable = join(';',@split_var);
2519
2520        $variable =~ s/\//\\/g; # Remaining \ come from e.g.: ../foo/baa
2521    }
2522
2523    return $variable;
2524}
2525
2526#--------------------------------------------------------
2527# Function name: GetCorrectPath
2528# Description:   Creates the build environment.
2529# Arguments:     1.   existing / original path
2530#                2... pairs of <path, executable>
2531# Return value:  String - Correct Path
2532#--------------------------------------------------------
2533sub GetCorrectPath
2534{
2535	sub PathLookup
2536	{
2537	    my $cmd = shift;
2538	    while (@_) {
2539		my $elem = shift;
2540
2541		-x "$elem/$cmd" && return $elem;
2542	    }
2543	    return '';
2544	}
2545
2546	sub SaneGrep
2547	{
2548	    # Perl grep is unbelievably strange.
2549	    my $needle = shift;
2550	    while (@_) {
2551		my $haystack = shift;
2552		if ($needle eq $haystack) {
2553		    return 1;
2554		}
2555	    }
2556	    return 0;
2557	}
2558
2559	sub CleanupPath
2560	{
2561	    my @elements = @_;
2562	    my @cleanName = ();
2563
2564	    while (@elements) {
2565		my $elem = shift @elements;
2566		if (!SaneGrep ($elem, @cleanName)) {
2567			push @cleanName, $elem;
2568		}
2569	    }
2570
2571	    return @cleanName;
2572	}
2573
2574	my $oldPath = shift;
2575	my @originalPairs = @_;
2576	my @pairs = @originalPairs;
2577	my @Path = split /$ps/, $oldPath;
2578
2579	while (@pairs) {
2580	    my $path = shift @pairs;
2581	    my $cmd = shift @pairs;
2582	    my $to_append = 1;
2583	    my $elem;
2584
2585	    if (! -x "$path/$cmd") {
2586		AddWarning ("Missing executable $path/$cmd\n");
2587	    }
2588
2589	    for $elem (@Path) {
2590		if ($elem eq $path) {
2591#		    print "Hit duplicate path in path; break\n";
2592		    $to_append = 0;
2593		    last;
2594		}
2595		if (-f "$elem/$cmd") {
2596#		    print "Element already in path ...\n";
2597		    unshift @Path, $path;
2598		    $to_append = 0;
2599		    last;
2600		} else {
2601#		    print "No file $elem/$cmd\n";
2602		}
2603	    }
2604	    if ($to_append) {
2605		push @Path, $path;
2606	    }
2607	}
2608
2609	@pairs = @originalPairs;
2610	while (@pairs) {
2611	    my $path = shift @pairs;
2612	    my $cmd = shift @pairs;
2613	    my $realpath;
2614
2615	    $realpath = PathLookup ($cmd, @Path);
2616	    if (!($realpath eq $path)) {
2617		AddWarning ("Path conflict for executables " .
2618                            "$path/$cmd against $realpath");
2619	    }
2620	}
2621
2622	return join $ps, CleanupPath (@Path);
2623}
2624
2625#------------------------------------------------------------
2626# Function name: AddWarning
2627# Description:   Adds any kind of warning for the user.
2628#                The warning will be shown at the end
2629#                of this script.
2630# Arguments:     1. Add the configure warnings or the set_soenv
2631#                   warning (string).
2632#                2. Warning (string).
2633# Return value:  void
2634#------------------------------------------------------------
2635sub AddWarning
2636{  if ( $_[ 0 ] eq "configure" )
2637   {  open( IN, $warnfile );
2638      while ( <IN> )
2639      {  $Warning = $Warning."* - ".$_;
2640      }
2641      close( IN );
2642      # Remove the temporary warning file.
2643      # unlink ( $warnfile );
2644   }
2645   elsif ( $_[ 0 ] eq "set_soenv" )
2646   {  my ( $arg1 );
2647      $arg1 = $_[ 1 ];
2648      chomp( $arg1 );                            # cut off new line
2649      $Warning = $Warning."* - set_soenv: warning: $arg1 $newline";  # add the warning
2650   }
2651}
2652#-------------------
2653# That's all folks!
2654#-------------------
2655