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