packageBinaries.pl
上传用户:zhuqijet
上传日期:2013-06-25
资源大小:10074k
文件大小:71k
源码类别:

词法分析

开发平台:

Visual C++

  1. #!/usr/local/bin/perl5
  2. push(@INC, "/home/xml4c/bin", "/home/xml4c/bin/perl/perl-RUN/opt/perl5/lib", "/Development2/cupert/bin/perl/perl-RUN/opt/perl5/lib", "/Development/cupert/usr/local/perl/perl-RUN/opt/perl5/lib");
  3. require "getopt.pl";
  4. require 5.0;
  5. $|=1;   # Force a flush after every print
  6. # Extract the source and target directories
  7. &Getopt('sopcxmntrb');
  8. $XERCESCROOT = $opt_s;
  9. $targetdir = $opt_o;
  10. # Check for the environment variables and exit if error
  11. if (!length($XERCESCROOT) || !length($targetdir) || (length($opt_h) > 0) ) {
  12.     print ("Usage is: packageBinaries <options>n");
  13.     print ("  where options are:n");
  14.     print ("    -s <source_directory>n");
  15.     print ("    -o <target_directory>n");
  16.     print ("    -c <C compiler name> (e.g. gcc, cc or xlc_r)n");
  17.     print ("    -x <C++ compiler name> (e.g. g++, CC, aCC, c++, xlC_r, cl, ecl or ecc)n");
  18.     print ("    -m <message loader> can be 'inmem' (default), 'icu' or 'iconv'n");
  19.     print ("    -n <net accessor> can be 'fileonly' or 'socket' (default)n");
  20.     print ("    -t <transcoder> can be 'icu' or 'native' (default)n");
  21.     print ("    -r <thread option> can be 'pthread' (default)or 'dce' (only used on HP-11)n");
  22.     print ("    -b <bitsToBuild> (accepts '64', '32')n");
  23.     print ("    -j suppress building of ICU (speeds up builds when debugging)n");
  24.     print ("    -h to get help on these commandsnn");
  25.     print ("Example: Under unix'sn");
  26.     print ("    perl packageBinaries.pl -s $HOME/xerces-c-src2_3_0");
  27.     print (" -o $HOME/xerces-c2_3_0-linux -c gcc -x g++ -m inmem -n fileonly -t nativenn");
  28.     print ("Example: Under Windowsn");
  29.     print ("    perl packageBinaries.pl -s \xerces-c-src2_3_0");
  30.     print (" -o\xerces-c2_3_0-win32 [-n fileonly] [-t icu]nn");
  31.     print ("Note:n");
  32.     print ("    Under Windows, by default the XercesLib project files isn");
  33.     print ("    configured to use Win32 resource file based message loader,n");
  34.     print ("    WinSocket based net accessor and native Win32 based transcoder.n");
  35.     print ("    The two options mentioned in the example above are the onlyn");
  36.     print ("    options relevant under Windows on the command line for this script.n");
  37.     exit(-1);
  38. }
  39. # Set up the environment variables for ICU
  40. # As of Version 3, ICU is not a required component of XERCES-C
  41. $ICUROOT = $ENV{'ICUROOT'};
  42. $ICU_DATA = $ENV{'ICU_DATA'};
  43. if (!length($ICUROOT)) {
  44.     print "You have not defined your ICU install directory.n";
  45.     print "To build with ICU, you must set an environment variable called ICUROOTn";
  46.     print "Proceeding to build XERCES-C without ICU...n";
  47. }
  48. # Check if the source directory exists or not
  49. if (!(-e $XERCESCROOT)) {
  50.     print ("The directory $XERCESCROOT does not exist. Cannot proceed any further.n");
  51.     exit(-1);
  52. }
  53. # Check if the target directory exists, exit if it does
  54. if (-e $targetdir) {
  55.     print ("Error: The target directory '$targetdir' already exists.n");
  56.     print ("       You must start with a clean directory to package your product.n");
  57.     exit(1);
  58. }
  59. # Find out the platform from 'uname -s'
  60. open(PLATFORM, "uname -s|");
  61. $platform = <PLATFORM>;
  62. chomp($platform);
  63. close (PLATFORM);
  64. #
  65. #set platform variable if on windows 64bit
  66. my $return_code = system( "ls" );
  67. if ($return_code != 0)
  68. {  $platform = "win64bit";
  69. }
  70. #Fix the backslashes on the Windows platform
  71. if ($platform ne "win64bit")
  72. {
  73.     $XERCESCROOT =~ s/\///g;
  74.     $ICUROOT =~ s/\///g;
  75.     $targetdir =~ s/\///g;
  76. }
  77. print "Packaging binaries for `" . $platform . "` in " . $targetdir . " ...n";   # "
  78. #Construct the name of the zip file by extracting the last directory name
  79. $zipfiles = $targetdir;
  80. $zipfiles =~ s/.*(/|\)([w-.]*)$/$2/g;
  81. $zipfiles = $zipfiles . "/*";
  82. $buildmode = "Release";         # Universally, why do you want to package Debug builds anyway?
  83. #
  84. #   Architecture: Itanium
  85. #   OS:           Windows XP
  86. #   Compiler:     Intel's cl and/or ecl
  87. #   cygwin:       Not Available
  88. #
  89. if ($platform eq "win64bit" )
  90. {
  91.     if ($opt_x ne "" && $opt_x ne "cl" && $opt_x ne "ecl")
  92.     {
  93.         print("Compiler on Itanium/WindowsXP must be 'cl' or 'ecl'n");
  94.         exit(-1);
  95.     }
  96.     if ($opt_x eq "")
  97.     {
  98.      $opt_x = 'cl';
  99.     }
  100.     $platformname = 'Win64';    # Needed this way by nmake
  101.     if (-e "$targetdir.zip") {
  102.         print ("Deleting old target file '$targetdir.zip' n");
  103.         unlink("$targetdir.zip");
  104.     }
  105.     # Make the target directory and its main subdirectories
  106.     psystem ("mkdir $targetdir");
  107.     psystem ("mkdir $targetdir\bin");
  108.     psystem ("mkdir $targetdir\lib");
  109.     if ( $opt_m =~ m/icu/i ) {
  110.         psystem ("mkdir $targetdir\msg");
  111.     }
  112.     psystem ("mkdir $targetdir\etc");
  113.     psystem ("mkdir $targetdir\include");
  114.     psystem ("mkdir $targetdir\include\xercesc");
  115.     psystem ("mkdir $targetdir\samples");
  116.     psystem ("mkdir $targetdir\samples\Projects");
  117.     psystem ("mkdir $targetdir\samples\Projects\Win32");
  118.     psystem ("mkdir $targetdir\samples\Projects\Win32\VC6");
  119.     psystem ("mkdir $targetdir\samples\data");
  120.     psystem ("mkdir $targetdir\samples\SAXCount");
  121.     psystem ("mkdir $targetdir\samples\SAX2Count");
  122.     psystem ("mkdir $targetdir\samples\SAXPrint");
  123.     psystem ("mkdir $targetdir\samples\SAX2Print");
  124.     psystem ("mkdir $targetdir\samples\DOMCount");
  125.     psystem ("mkdir $targetdir\samples\DOMPrint");
  126.     psystem ("mkdir $targetdir\samples\Redirect");
  127.     psystem ("mkdir $targetdir\samples\MemParse");
  128.     psystem ("mkdir $targetdir\samples\PParse");
  129.     psystem ("mkdir $targetdir\samples\StdInParse");
  130.     psystem ("mkdir $targetdir\samples\EnumVal");
  131.     psystem ("mkdir $targetdir\samples\SEnumVal");
  132.     psystem ("mkdir $targetdir\samples\CreateDOMDocument");
  133.     psystem ("mkdir $targetdir\doc");
  134.     psystem ("mkdir $targetdir\doc\html");
  135.     psystem ("mkdir $targetdir\doc\html\apiDocs");
  136.     # If 'FileOnly' NetAccessor has been specified, then the project files have to be
  137.     # changed.
  138.     #REVISIT: we are make from makefile, not from *.dsp
  139.     #         need to look at it later
  140.     if ($opt_n =~ m/fileonly/i) {
  141.         changeWindowsProjectForFileOnlyNA("$XERCESCROOT/Projects/Win32/VC6/xerces-all/XercesLib/XercesLib.dsp");
  142.     }
  143.     #
  144.     # ICU Build happens here, if one is required.
  145.     #
  146.     #REVISIT: icu
  147.     #
  148.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && length($ICUROOT) > 0) {
  149.         print ("Building ICU from $ICUROOT ...n");
  150.         #Clean up all the dependency files, causes problems for nmake
  151.         pchdir ("$ICUROOT");
  152.         psystem ("del /s /f *.dep *.ncb *.plg *.opt");
  153.         # Make the icu dlls
  154.         pchdir ("$ICUROOT\source\allinone\all");
  155.         if (!(length($opt_j) > 0)) {   # Optionally suppress ICU build, to speed up overlong builds while debugging.
  156.           #For XP 64 bit, we only ship release dlls
  157.             psystem("nmake -f all_win64_release.mak "CFG=all - $platformname Release" CPP=$opt_x.exe >buildlog.txt 2>&1");     
  158.         psystem("type buildlog.txt");
  159.             #psystem("nmake -f all_win64_debug.mak "CFG=all - $platformname Debug" CPP=$opt_x.exe >buildlog.txt 2>&1");     
  160.         #psystem("type buildlog.txt");
  161.         }
  162.         $transcoder = 0;
  163.         if ($opt_t =~ m/icu/i )
  164.         {
  165.             $transcoder = 1;
  166.         }
  167.         $msgloader = 0;
  168.         if ($opt_m =~ m/icu/i)
  169.         {
  170.             $msgloader = 1;
  171.         }
  172.         change_windows_makefile_for_ICU("$XERCESCROOT\Projects\Win32\VC6\xerces-all/XercesLib/XercesLib.mak", $transcoder, $msgloader);
  173.     }
  174.     # Build resource bundle library for ICUMsgLoader
  175.     if ($opt_m =~ m/icu/i) {
  176.         pchdir ("$XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources");    
  177.         psystem( "nmake /f resources.mak > buildlog.txt 2>&1 ");
  178.         system("type buildlog.txt");       
  179.     }
  180.     
  181.     # Clean up all the dependency files, causes problems for nmake
  182.     # Also clean up all MSVC-generated project files that just cache the IDE state
  183.     pchdir ("$XERCESCROOT");
  184.     psystem ("del /s /f *.dep *.ncb *.plg *.opt");
  185.    
  186.     # Make all files in the Xerces-C system including libraries, samples and tests
  187.     pchdir ("$XERCESCROOT\Projects\Win32\VC6\xerces-all\all");
  188.     psystem( "nmake -f all.mak "CFG=all - $platformname Release" CPP=$opt_x.exe >buildlog.txt 2>&1");
  189.     system("type buildlog.txt");
  190.     #For XP 64 bit, we only ship release dlls
  191.     #pchdir ("$XERCESCROOT\Projects\Win32\VC6\xerces-all\XercesLib");
  192.     #psystem("nmake -f XercesLib.mak "CFG=XercesLib - $platformname Debug" CPP=$opt_x.exe > buildlog.txt 2>&1 ");
  193.     #system("type buildlog.txt");
  194.     # Decide where you want the build copied from
  195.     pchdir ($targetdir);
  196.     $BUILDDIR = $XERCESCROOT . "\Build\Win64\VC6\" . $buildmode;
  197.     print "nBuild is being copied from '" . $BUILDDIR . "'";
  198.     if ($opt_m =~ m/icu/i) {
  199.         pchdir ("$XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources");    
  200.         psystem("copy XercesMessages*.DLL $BUILDDIR");
  201.         pchdir ($targetdir);        
  202.     }
  203.     
  204.     # Populate the include output directory
  205.     print ("nnCopying headers files ...n");
  206.     @headerDirectories =
  207.      qw'sax
  208. sax2
  209.         framework
  210.         dom
  211.         dom\deprecated
  212.         internal
  213.         parsers
  214.         util
  215.         util\Compilers
  216.         util\MsgLoaders
  217.         util\MsgLoaders\ICU
  218.         util\MsgLoaders\InMemory
  219.         util\MsgLoaders\MsgCatalog
  220.         util\MsgLoaders\Win32
  221.         util\Platforms
  222.         util\Platforms\AIX
  223.         util\Platforms\HPUX
  224.         util\Platforms\BeOS
  225.         util\Platforms\Linux
  226.         util\Platforms\MacOS
  227.         util\Platforms\OS2
  228.         util\Platforms\OS390
  229.         util\Platforms\PTX
  230.         util\Platforms\Solaris
  231.         util\Platforms\Tandem
  232.         util\Platforms\Win32
  233.         util\regx
  234.         util\Transcoders
  235.         util\Transcoders\ICU
  236.         util\Transcoders\Iconv
  237.         util\Transcoders\Win32
  238.         validators
  239.         validators\common
  240.         validators\datatype
  241.         validators\DTD
  242.         validators\schema
  243.         validators\schema\identity';
  244.     foreach $dir (@headerDirectories) {
  245.         $inclDir = "include\xercesc\$dir";
  246.         if (! (-e $inclDir)) {
  247.             psystem("mkdir $inclDir");
  248.         }
  249.         $srcDir = "$XERCESCROOT\src\xercesc\$dir";
  250.         # Weed out directories that have no files to copy, to avoid a bunch of
  251.         # warnings from the cp command in the build output.
  252.         opendir(dir, $srcDir);
  253.         @allfiles = readdir(dir);
  254.         closedir(dir);
  255.         foreach $fileKind ("hpp", "c") {
  256.             $matches = grep(/.$fileKind$/, @allfiles);
  257.             if ($matches > 0) {
  258.                 psystem("copy /y $srcDir\*.$fileKind  $inclDir\ ");
  259.             }
  260.         }
  261.     }
  262.     #
  263.     #  Remove internal implementation headers from the DOM include directory.
  264.     #
  265.     psystem("del /s /f $targetdir\include\xercesc\dom\impl");
  266.     psystem("del  $targetdir\include\xercesc\dom\deprecated\*Impl.hpp");
  267.     psystem("del  $targetdir\include\xercesc\dom\deprecated\DS*.hpp");
  268.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && length($ICUROOT) > 0) {
  269.         psystem("xcopy /s /y $ICUROOT\include\* $targetdir\include");
  270.     }
  271.     #
  272.     # Populate the binary output directory
  273.     #
  274.     print ("n nCopying binary outputs ...n");
  275.     psystem("copy /y $BUILDDIR\*.dll $targetdir\bin");
  276.     psystem("copy /y $BUILDDIR\*.exe $targetdir\bin");
  277.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && length($ICUROOT) > 0) {
  278.         # Copy the ICU dlls and libs
  279.         psystem("copy /y $ICUROOT\bin\icuuc24.dll $targetdir\bin");
  280.         psystem("copy /y $ICUROOT\bin\icuuc24d.dll $targetdir\bin");
  281.         # it seems icudt24*.DLL is generated (upper case dll)
  282.         # but just case, try lower case .dll as well
  283.         psystem("copy /y $ICUROOT\bin\icudt24*.DLL $targetdir\bin");
  284.         psystem("copy /y $ICUROOT\bin\icudt24*.dll $targetdir\bin");
  285.         psystem("copy /y $ICUROOT\lib\icudata.lib $targetdir\lib");
  286.         psystem("copy /y $ICUROOT\lib\icuuc.lib $targetdir\lib");
  287.         psystem("copy /y $ICUROOT\lib\icuucd.lib $targetdir\lib");
  288.         # Copy the Resouce Bundle for ICUMsgLoader
  289.         if ( $opt_m =~ m/icu/i) {
  290.             psystem("copy /y $XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources\XercesMessage*.res $targetdir\msg");
  291.             psystem("copy /y $XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources\XercesMessages*.DLL $targetdir\bin");
  292.             psystem("copy /y $XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources\XercesMessages*.lib $targetdir\lib");
  293.         }        
  294.     }
  295.     psystem("copy /y $BUILDDIR\xerces-c_*.lib $targetdir\lib");
  296.     if ($buildmode ne "Debug") {
  297.         $DEBUGBUILDDIR = "$XERCESCROOT\Build\Win64\VC6\Debug";
  298.         psystem("copy /y $DEBUGBUILDDIR\xerces-c_*D.lib $targetdir\lib");
  299.         psystem("copy /y $DEBUGBUILDDIR\xerces*D.dll $targetdir\bin");
  300.     }
  301.     # Populate the etc output directory like config.status and the map file
  302.     print ("n nCopying misc output to etc ...n");
  303.     psystem("copy /y $XERCESCROOT\Build\Win64\VC6\Release\obj\*.map $targetdir\etc");
  304.     # Populate the samples directory
  305.     print ("n nCopying sample files ...n");
  306.     psystem("copy $XERCESCROOT\version.incl $targetdir");
  307.     psystem("xcopy /s /y $XERCESCROOT\samples\Projects\Win32\VC6\* $targetdir\samples\Projects\Win32\VC6");
  308.     psystem("copy /y $XERCESCROOT\samples\SAXCount\* $targetdir\samples\SAXCount");
  309.     psystem("del /f $targetdir\samples\SAXCount\Makefile.in");
  310.     psystem("copy /y $XERCESCROOT\samples\SAX2Count\* $targetdir\samples\SAX2Count");
  311.     psystem("del /f $targetdir\samples\SAX2Count\Makefile.in");
  312.     psystem("copy /y $XERCESCROOT\samples\SAXPrint\* $targetdir\samples\SAXPrint");
  313.     psystem("del /f $targetdir\samples\SAXPrint\Makefile.in");
  314.     psystem("copy /y $XERCESCROOT\samples\SAX2Print\* $targetdir\samples\SAX2Print");
  315.     psystem("del /f $targetdir\samples\SAX2Print\Makefile.in");
  316.     psystem("copy /y $XERCESCROOT\samples\DOMCount\* $targetdir\samples\DOMCount");
  317.     psystem("del /f $targetdir\samples\DOMCount\Makefile.in");
  318.     psystem("copy /y $XERCESCROOT\samples\DOMPrint\* $targetdir\samples\DOMPrint");
  319.     psystem("del /f $targetdir\samples\DOMPrint\Makefile.in");
  320.     psystem("copy /y $XERCESCROOT\samples\Redirect\* $targetdir\samples\Redirect");
  321.     psystem("del /f $targetdir\samples\Redirect\Makefile.in");
  322.     psystem("copy /y $XERCESCROOT\samples\MemParse\* $targetdir\samples\MemParse");
  323.     psystem("del /f $targetdir\samples\MemParse\Makefile.in");
  324.     psystem("copy /y $XERCESCROOT\samples\PParse\* $targetdir\samples\PParse");
  325.     psystem("del /f $targetdir\samples\PParse\Makefile.in");
  326.     psystem("copy /y $XERCESCROOT\samples\StdInParse\* $targetdir\samples\StdInParse");
  327.     psystem("del /f $targetdir\samples\StdInParse\Makefile.in");
  328.     psystem("copy /y $XERCESCROOT\samples\EnumVal\* $targetdir\samples\EnumVal");
  329.     psystem("del /f $targetdir\samples\EnumVal\Makefile.in");
  330.     psystem("copy /y $XERCESCROOT\samples\SEnumVal\* $targetdir\samples\SEnumVal");
  331.     psystem("del /f $targetdir\samples\SEnumVal\Makefile.in");
  332.     psystem("copy /y $XERCESCROOT\samples\CreateDOMDocument\* $targetdir\samples\CreateDOMDocument");
  333.     psystem("del /f $targetdir\samples\CreateDOMDocument\Makefile.in");
  334.     psystem("copy /y $XERCESCROOT\samples\data\* $targetdir\samples\data");
  335.     # Populate the docs directory
  336.     print ("n nCopying documentation ...n");
  337.     psystem("xcopy /s /y $XERCESCROOT\doc\* $targetdir\doc");
  338.     psystem("copy $XERCESCROOT\Readme.html $targetdir");
  339.     psystem("copy $XERCESCROOT\credits.txt $targetdir");
  340.     psystem("copy $XERCESCROOT\LICENSE.txt $targetdir");
  341.     if (length($ICUROOT) > 0) {
  342.         psystem("copy $XERCESCROOT\license.html $targetdir");
  343.         psystem("copy $XERCESCROOT\XLicense.html $targetdir");
  344.     }
  345.     psystem("del /f  $targetdir\doc\Doxyfile");
  346.     psystem("del /s /f $targetdir\doc\dtd");
  347.     psystem("del /f  $targetdir\doc\*.xml");
  348.     psystem("del /f  $targetdir\doc\*.ent");
  349.     psystem("del /f  $targetdir\doc\*.gif");
  350.     # Now package it all up using ZIP
  351.     pchdir ("$targetdir\..");
  352.     print ("n nZIPping up all files ...n");
  353.     $zipname = $targetdir . ".zip";
  354.     psystem ("zip -r $zipname $zipfiles");
  355. }
  356. #
  357. #     End of Itanium Builds.
  358. #
  359. #   WINDOWS builds happen here, as long as they
  360. #     aren't using gcc...
  361. #
  362. if ($platform =~ m/Windows/  || ($platform =~ m/CYGWIN/ && !($opt_c =~ m/gcc/))) {
  363.     if ($opt_b eq "64")
  364.     {
  365.         $platformname = 'Win64';
  366.     }
  367.     else
  368.     {
  369.         $platformname = 'Win32';
  370.     }
  371.     if (-e "$targetdir.zip") {
  372.         print ("Deleting old target file '$targetdir.zip' n");
  373.         unlink("$targetdir.zip");
  374.     }
  375.     #
  376.     # AUTODETECT VISUAL STUDIO VERSION
  377.     #
  378.     $msc_response= `cl 2>&1`;
  379.     print "$ENV{PATH}n";
  380.     chomp($msc_response);
  381.     print "-----------------------n";
  382.     print "Detected: $msc_responsen";
  383.     $msc_response =~ /Version *([0-9.]+)/;
  384.     $msc_full_version = $1;
  385.     $msc_response =~ /Version *([0-9]+)./;
  386.     $msc_major_version = $1;
  387.     $msc_response =~ /Version *[0-9]+.([0-9]+)./;
  388.     $msc_minor_version = $1;
  389.     print "-----------------------n";
  390.     print "msc_full_version  =$msc_full_versionn";
  391.     print "msc_major_version =$msc_major_versionn";
  392.     print "msc_minor_version =$msc_minor_versionn";
  393.     print "-----------------------n";
  394.     $DevStudioVer = "6.0"; #default
  395.     $VCBuildDir = "VC6"; #default
  396.     if ($msc_major_version eq "12") {
  397.         print "Configuring environment for Visual Studio 6.0n";
  398.         $DevStudioVer = "6.0";
  399.     } elsif ($msc_major_version eq "13") {
  400.         print "Configuring environment for Visual Studio .NETn";
  401.         $DevStudioVer = "7.0";
  402.         $VCBuildDir = "VC7"; #default
  403.     }
  404.     print "DevStudioVer =$DevStudioVern";
  405.     print "VCBuildDir   =$VCBuildDirn";
  406.     # Make the target directory and its main subdirectories
  407.     psystem ("mkdir $targetdir");
  408.     psystem ("mkdir $targetdir/bin");
  409.     psystem ("mkdir $targetdir/lib");
  410.     if ( $opt_m =~ m/icu/i ) {
  411.         psystem ("mkdir $targetdir/msg");
  412.     }
  413.     psystem ("mkdir $targetdir/etc");
  414.     psystem ("mkdir $targetdir/include");
  415.     psystem ("mkdir $targetdir/include/xercesc");
  416.     psystem ("mkdir $targetdir/samples");
  417.     psystem ("mkdir $targetdir/samples/Projects");
  418.     psystem ("mkdir $targetdir/samples/Projects/Win32");
  419.     if ($DevStudioVer eq "6.0") {
  420.     psystem ("mkdir $targetdir/samples/Projects/Win32/VC6");
  421.     } elsif ($DevStudioVer eq "7.0") {
  422.         psystem ("mkdir $targetdir/samples/Projects/Win32/VC7");
  423.     }
  424.     psystem ("mkdir $targetdir/samples/data");
  425.     psystem ("mkdir $targetdir/samples/SAXCount");
  426.     psystem ("mkdir $targetdir/samples/SAX2Count");
  427.     psystem ("mkdir $targetdir/samples/SAXPrint");
  428.     psystem ("mkdir $targetdir/samples/SAX2Print");
  429.     psystem ("mkdir $targetdir/samples/DOMCount");
  430.     psystem ("mkdir $targetdir/samples/DOMPrint");
  431.     psystem ("mkdir $targetdir/samples/Redirect");
  432.     psystem ("mkdir $targetdir/samples/MemParse");
  433.     psystem ("mkdir $targetdir/samples/PParse");
  434.     psystem ("mkdir $targetdir/samples/StdInParse");
  435.     psystem ("mkdir $targetdir/samples/EnumVal");
  436.     psystem ("mkdir $targetdir/samples/SEnumVal");
  437.     psystem ("mkdir $targetdir/samples/CreateDOMDocument");
  438.     psystem ("mkdir $targetdir/doc");
  439.     psystem ("mkdir $targetdir/doc/html");
  440.     psystem ("mkdir $targetdir/doc/html/apiDocs");
  441.     # If 'FileOnly' NetAccessor has been specified, then the project files have to be
  442.     # changed.
  443.     if ($opt_n =~ m/fileonly/i) {
  444.         if ($DevStudioVer eq "6.0") {
  445.             changeWindowsProjectForFileOnlyNA("$XERCESCROOT/Projects/Win32/VC6/xerces-all/XercesLib/XercesLib.dsp");
  446.         } elsif ($DevStudioVer eq "7.0") {
  447.             changeWindowsProjectForFileOnlyNA_VC7("$XERCESCROOT/Projects/Win32/VC7/xerces-all/XercesLib/XercesLib.vcproj");
  448.         }
  449.     }
  450.     #
  451.     # ICU Build happens here, if one is required.
  452.     #
  453.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && length($ICUROOT) > 0) {
  454.         print ("Building ICU from $ICUROOT ...n");
  455.         #Clean up all the dependency files, causes problems for nmake
  456.         pchdir ("$ICUROOT");
  457.         psystem ("del /s /f *.dep *.ncb *.plg *.opt");
  458.         # Make the icu dlls
  459.         if (!(length($opt_j) > 0)) {   # Optionally suppress ICU build, to speed up overlong builds while debugging.
  460.             #we ship both debug and release dlls
  461.             if ($DevStudioVer eq "6.0") {
  462.                 pchdir ("$ICUROOT/source/allinone");
  463.                 if ($platformname eq "Win64")
  464.                 {
  465.                     psystem("msdev allinone.dsw /MAKE "all - $platformname Release" /USEENV /REBUILD /OUT buildlog.txt");
  466.                 }
  467.                 else
  468.                 {
  469.                     psystem("msdev allinone.dsw /MAKE "all - $platformname Release" /REBUILD /OUT buildlog.txt");            
  470.                 }
  471.                 psystem("type buildlog.txt");
  472.                 if ($platformname eq "Win64")
  473.                 {
  474.                     psystem("msdev allinone.dsw /MAKE "all - $platformname Debug" /USEENV /REBUILD /OUT buildlog.txt");
  475.                 }
  476.                 else
  477.                 {
  478.                     psystem("msdev allinone.dsw /MAKE "all - $platformname Debug" /REBUILD /OUT buildlog.txt");            
  479.                 }
  480.                 psystem("type buildlog.txt");
  481.             } elsif ($DevStudioVer eq "7.0") {
  482.                 pchdir ("$ICUROOT/as_is/win32");
  483.                 psystem("unzip msvc7.zip");
  484.                 pchdir ("$ICUROOT/as_is/win32/vc7");
  485.                 psystem("devenv /rebuild Release /out buildlog.txt /project all allinone.sln");
  486.                 psystem("type buildlog.txt");
  487.                 psystem("devenv /rebuild debug /out buildlog.txt /project all allinone.sln");
  488.                 psystem("type buildlog.txt");
  489.             }
  490.         }
  491.         $transcoder = 0;
  492.         if ($opt_t =~ m/icu/i )
  493.         {
  494.             $transcoder = 1;
  495.         }
  496.         $msgloader = 0;
  497.         if ($opt_m =~ m/icu/i)
  498.         {
  499.             $msgloader = 1;
  500.         }
  501.         if ($DevStudioVer eq "6.0") {
  502.             change_windows_project_for_ICU("$XERCESCROOT/Projects/Win32/VC6/xerces-all/XercesLib/XercesLib.dsp", $transcoder , $msgloader);
  503.         } elsif ($DevStudioVer eq "7.0") {
  504.             change_windows_project_for_ICU_VC7("$XERCESCROOT/Projects/Win32/VC7/xerces-all/XercesLib/XercesLib.vcproj", $transcoder , $msgloader);
  505.         }
  506.     }
  507.     # Build resource bundle library for ICUMsgLoader, before XercesLib
  508.     if ($opt_m =~ m/icu/i) {
  509.         pchdir ("$XERCESCROOT/src/xercesc/util/MsgLoaders/ICU/resources");    
  510.         psystem( "nmake /f resources.mak > buildlog.txt 2>&1 ");
  511.         system("type buildlog.txt");              
  512.     }
  513.     
  514.     # Clean up all the dependency files, causes problems for nmake
  515.     # Also clean up all MSVC-generated project files that just cache the IDE state
  516.     pchdir ("$XERCESCROOT");
  517.     psystem ("del /s /f *.dep *.ncb *.plg *.opt");
  518.     # Make all files in the Xerces-C system including libraries, samples and tests
  519.     pchdir ("$XERCESCROOT/Projects/Win32/$VCBuildDir/xerces-all");
  520.     if ($DevStudioVer eq "6.0") {
  521.         if ($platformname eq "Win64")
  522.         {
  523.             psystem( "msdev xerces-all.dsw /MAKE "all - $platformname $buildmode" /USEENV /REBUILD /OUT buildlog.txt");
  524.         }
  525.         else
  526.         {
  527.             psystem( "msdev xerces-all.dsw /MAKE "all - $platformname $buildmode" /REBUILD /OUT buildlog.txt");
  528.         }
  529.     } elsif ($DevStudioVer eq "7.0") {
  530.         psystem( "devenv /rebuild Release /out buildlog.txt /project all xerces-all.sln");
  531.     }
  532.     system("type buildlog.txt");
  533.     # Build the debug xerces dll.  Both debug and release DLLs
  534.     #   are in the standard binary distribution of Xerces.
  535.     if ($buildmode ne "Debug") {
  536.         if ($DevStudioVer eq "6.0") {
  537.             if ($platformname eq "Win64")
  538.             {
  539.                 psystem("msdev xerces-all.dsw /MAKE "XercesLib - $platformname Debug" /USEENV /REBUILD /OUT buildlog.txt");
  540.             }
  541.             else
  542.             {
  543.                 psystem("msdev xerces-all.dsw /MAKE "XercesLib - $platformname Debug" /REBUILD /OUT buildlog.txt");        
  544.             }
  545.         } elsif ($DevStudioVer eq "7.0") {
  546.             psystem( "devenv /rebuild debug /out buildlog.txt /project XercesLib xerces-all.sln");
  547.         }
  548.         system("type buildlog.txt");
  549.     }
  550.     # Decide where you want the build copied from
  551.     pchdir ($targetdir);
  552.     $BUILDDIR = $XERCESCROOT . "/Build/Win32/$VCBuildDir/" . $buildmode;
  553.     print "nBuild is being copied from '" . $BUILDDIR . "'";
  554.     if ($opt_m =~ m/icu/i) {
  555.         pchdir ("$XERCESCROOT/src/xercesc/util/MsgLoaders/ICU/resources");    
  556.         psystem("cp -fv XercesMessages*.DLL $BUILDDIR");
  557.         psystem("cp -fv XercesMessages*.lib $BUILDDIR");
  558.         pchdir ($targetdir);                
  559.     }
  560.     
  561.     # Populate the include output directory
  562.     print ("nnCopying headers files ...n");
  563.     @headerDirectories =
  564.      qw'sax
  565. sax2
  566.         framework
  567.         dom
  568.         dom/deprecated
  569.         internal
  570.         parsers
  571.         util
  572.         util/Compilers
  573.         util/MsgLoaders
  574.         util/MsgLoaders/ICU
  575.         util/MsgLoaders/InMemory
  576.         util/MsgLoaders/MsgCatalog
  577.         util/MsgLoaders/Win32
  578.         util/Platforms
  579.         util/Platforms/AIX
  580.         util/Platforms/HPUX
  581.         util/Platforms/BeOS
  582.         util/Platforms/Linux
  583.         util/Platforms/MacOS
  584.         util/Platforms/OS2
  585.         util/Platforms/OS390
  586.         util/Platforms/PTX
  587.         util/Platforms/Solaris
  588.         util/Platforms/Tandem
  589.         util/Platforms/Win32
  590.         util/regx
  591.         util/Transcoders
  592.         util/Transcoders/ICU
  593.         util/Transcoders/Iconv
  594.         util/Transcoders/Win32
  595.         validators
  596.         validators/common
  597.         validators/datatype
  598.         validators/DTD
  599.         validators/schema
  600.         validators/schema/identity';
  601.     foreach $dir (@headerDirectories) {
  602.         $inclDir = "include/xercesc/$dir";
  603.         if (! (-e $inclDir)) {
  604.             psystem("mkdir $inclDir");
  605.         }
  606.         $srcDir = "$XERCESCROOT/src/xercesc/$dir";
  607.         # Weed out directories that have no files to copy, to avoid a bunch of
  608.         # warnings from the cp command in the build output.
  609.         opendir(dir, $srcDir);
  610.         @allfiles = readdir(dir);
  611.         closedir(dir);
  612.         foreach $fileKind ("hpp", "c") {
  613.             $matches = grep(/.$fileKind$/, @allfiles);
  614.             if ($matches > 0) {
  615.                 psystem("cp -f $srcDir/*.$fileKind  $inclDir/");
  616.             }
  617.         }
  618.     }
  619.     #
  620.     #  Remove internal implementation headers from the DOM include directory.
  621.     #
  622.     psystem ("rm -rf $targetdir/include/xercesc/dom/impl");
  623.     psystem ("rm  $targetdir/include/xercesc/dom/deprecated/*Impl.hpp");
  624.     psystem ("rm  $targetdir/include/xercesc/dom/deprecated/DS*.hpp");
  625.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && length($ICUROOT) > 0) {
  626.         psystem("cp -Rfv $ICUROOT/include/* $targetdir/include");
  627.     }
  628.     #
  629.     # Populate the binary output directory
  630.     #
  631.     print ("nnCopying binary outputs ...n");
  632.     psystem("cp -fv $BUILDDIR/*.dll $targetdir/bin");
  633.     psystem("cp -fv $BUILDDIR/*.exe $targetdir/bin");
  634.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && length($ICUROOT) > 0) {    
  635.         # Copy the ICU dlls and libs
  636.         psystem("cp -fv $ICUROOT/bin/icuuc24.dll $targetdir/bin");
  637.         psystem("cp -fv $ICUROOT/bin/icuuc24d.dll $targetdir/bin");
  638.         # it seems icudt24*.DLL is generated (upper case dll)
  639.         # but just case, try lower case .dll as well
  640.         psystem("cp -fv $ICUROOT/bin/icudt24*.DLL $targetdir/bin");
  641.         psystem("cp -fv $ICUROOT/bin/icudt24*.dll $targetdir/bin");
  642.         psystem("cp -fv $ICUROOT/lib/icudata.lib $targetdir/lib");
  643.         psystem("cp -fv $ICUROOT/lib/icuuc.lib $targetdir/lib");
  644.         psystem("cp -fv $ICUROOT/lib/icuucd.lib $targetdir/lib");
  645.         # Copy the Resouce Bundle for ICUMsgLoader
  646.         if ( $opt_m =~ m/icu/i) {
  647.             psystem("cp -fv $XERCESCROOT/src/xercesc/util/MsgLoaders/ICU/resources/XercesMessages*.res $targetdir/msg");
  648.             psystem("cp -fv $XERCESCROOT/src/xercesc/util/MsgLoaders/ICU/resources/XercesMessages*.DLL $targetdir/bin");
  649.             psystem("cp -fv $XERCESCROOT/src/xercesc/util/MsgLoaders/ICU/resources/XercesMessages*.lib $targetdir/lib");
  650.         }        
  651.     }
  652.     psystem("cp -fv $BUILDDIR/xerces-c_*.lib $targetdir/lib");
  653.     if ($buildmode ne "Debug") {
  654.         $DEBUGBUILDDIR = "$XERCESCROOT/Build/Win32/$VCBuildDir/Debug";
  655.         psystem("cp -fv $DEBUGBUILDDIR/xerces-c_*D.lib $targetdir/lib");
  656.         psystem("cp -fv $DEBUGBUILDDIR/xerces-c*D.dll $targetdir/bin");
  657.     }
  658.     # Populate the etc output directory like config.status and the map file
  659.     print ("nnCopying misc output to etc ...n");
  660.     psystem("cp -fv $XERCESCROOT/Build/Win32/$VCBuildDir/Release/obj/*.map $targetdir/etc");
  661.     # Populate the samples directory
  662.     print ("nnCopying sample files ...n");
  663.     psystem("cp $XERCESCROOT/version.incl $targetdir");
  664.     psystem("cp -Rfv $XERCESCROOT/samples/Projects/Win32/$VCBuildDir/* $targetdir/samples/Projects/Win32/$VCBuildDir");
  665.     psystem("cp -Rfv $XERCESCROOT/samples/SAXCount/* $targetdir/samples/SAXCount");
  666.     psystem("rm -f $targetdir/samples/SAXCount/Makefile");
  667.     psystem("cp -Rfv $XERCESCROOT/samples/SAX2Count/* $targetdir/samples/SAX2Count");
  668.     psystem("rm -f $targetdir/samples/SAX2Count/Makefile");
  669.     psystem("cp -Rfv $XERCESCROOT/samples/SAXPrint/* $targetdir/samples/SAXPrint");
  670.     psystem("rm -f $targetdir/samples/SAXPrint/Makefile");
  671.     psystem("cp -Rfv $XERCESCROOT/samples/SAX2Print/* $targetdir/samples/SAX2Print");
  672.     psystem("rm -f $targetdir/samples/SAX2Print/Makefile");
  673.     psystem("cp -Rfv $XERCESCROOT/samples/DOMCount/* $targetdir/samples/DOMCount");
  674.     psystem("rm -f $targetdir/samples/DOMCount/Makefile");
  675.     psystem("cp -Rfv $XERCESCROOT/samples/DOMPrint/* $targetdir/samples/DOMPrint");
  676.     psystem("rm -f $targetdir/samples/DOMPrint/Makefile");
  677.     psystem("cp -Rfv $XERCESCROOT/samples/Redirect/* $targetdir/samples/Redirect");
  678.     psystem("rm -f $targetdir/samples/Redirect/Makefile");
  679.     psystem("cp -Rfv $XERCESCROOT/samples/MemParse/* $targetdir/samples/MemParse");
  680.     psystem("rm -f $targetdir/samples/MemParse/Makefile");
  681.     psystem("cp -Rfv $XERCESCROOT/samples/PParse/* $targetdir/samples/PParse");
  682.     psystem("rm -f $targetdir/samples/PParse/Makefile");
  683.     psystem("cp -Rfv $XERCESCROOT/samples/StdInParse/* $targetdir/samples/StdInParse");
  684.     psystem("rm -f $targetdir/samples/StdInParse/Makefile");
  685.     psystem("cp -Rfv $XERCESCROOT/samples/EnumVal/* $targetdir/samples/EnumVal");
  686.     psystem("rm -f $targetdir/samples/EnumVal/Makefile");
  687.     psystem("cp -Rfv $XERCESCROOT/samples/SEnumVal/* $targetdir/samples/SEnumVal");
  688.     psystem("rm -f $targetdir/samples/SEnumVal/Makefile");
  689.     psystem("cp -Rfv $XERCESCROOT/samples/CreateDOMDocument/* $targetdir/samples/CreateDOMDocument");
  690.     psystem("rm -f $targetdir/samples/CreateDOMDocument/Makefile");
  691.     psystem("cp -Rfv $XERCESCROOT/samples/data/* $targetdir/samples/data");
  692.     # Populate the docs directory
  693.     print ("nnCopying documentation ...n");
  694.     psystem("cp -Rfv $XERCESCROOT/doc/* $targetdir/doc");
  695.     psystem("cp $XERCESCROOT/Readme.html $targetdir");
  696.     psystem("cp $XERCESCROOT/credits.txt $targetdir");
  697.     psystem("cp $XERCESCROOT/LICENSE.txt $targetdir");
  698.     if (length($ICUROOT) > 0) {
  699.         psystem("cp $XERCESCROOT/license.html $targetdir");
  700.         psystem("cp $XERCESCROOT/XLicense.html $targetdir");
  701.     }
  702.     psystem("rm -f $targetdir/doc/Doxyfile");
  703.     psystem("rm -rf $targetdir/doc/style");
  704.     psystem("rm -f $targetdir/doc/*.xml");
  705.     psystem("rm -f $targetdir/doc/*.ent");
  706.     psystem("rm -f $targetdir/doc/*.gif");
  707.     # Now package it all up using ZIP
  708.     pchdir ("$targetdir/..");
  709.     print ("nnZIPping up all files ...n");
  710.     $zipname = $targetdir . ".zip";
  711.     psystem ("zip -r $zipname $zipfiles");
  712. }
  713. #
  714. #     End of Windows Builds.
  715. #
  716. #  UNIX builds happen here ...
  717. #
  718. if ( ($platform =~ m/AIX/i)   || ($platform =~ m/HP-UX/i) || ($platform =~ m/BeOS/i) ||
  719.      ($platform =~ m/SunOS/i) || ($platform =~ m/Linux/i) || ($platform =~ m/ptx/i) ||
  720.  ($platform =~ m/Darwin/i)  || ($platform =~ m/CYGWIN/ && ($opt_c =~ m/gcc/))) {
  721.     # Echo the current PATH to see what compiler it picks up
  722.     psystem ("echo PATH=$ENV{'PATH'}");
  723.     # Set defaults for platform-specific options.
  724.     if ($platform =~ m/AIX/i) {
  725.         $platform = "aix";
  726.         if ($opt_c eq "") {$opt_c = "xlc_r"; }
  727.         if ($opt_x eq "") {$opt_x = "xlC_r"; }
  728.         $icu_cxxflags = '"-w -O2 -qmaxmem=-1"';
  729.         $icu_cflags = '"-w -O2 -qmaxmem=-1"';
  730.         if ($opt_m =~ m/icu/i) {
  731.          $ENV{'LIBPATH'}="$ICUROOT/lib:$XERCESCROOT/lib:$ENV{'LIBPATH'}";
  732.          $ENV{'PATH'}="$ICUROOT/bin:$ENV{'PATH'}";        
  733.         }
  734.         psystem ("echo LIBPATH=$ENV{'LIBPATH'}");
  735.     }
  736. # Mac OS X
  737.     if ($platform =~ m/Darwin/i) {
  738.         $platform = "macosx";
  739. # Set option defaults
  740.         if ($opt_c eq "") {$opt_c = 'cc'; }
  741.         if ($opt_x eq "") {$opt_x = 'g++'; }
  742.         if ($opt_n eq "")  {$opt_n = 'native'; } # native net accessor
  743.         if ($opt_t eq "") {$opt_t = 'native'; } # native transcoder
  744. # Code for mac os specific tools
  745. if ($TAR eq "") { $TAR = 'gnutar'; }
  746. if ($MAKE eq "") { $MAKE = 'make'; }
  747.     }
  748.     if ($platform eq 'HP-UX') {
  749.         # Find out the operating system version from 'uname -r'
  750.         open(OSVERSION, "uname -r|");
  751.         $osversion = <OSVERSION>;
  752.         chomp($osversion);
  753.         close (OSVERSION);
  754.         $platform = 'hp-11' if ($osversion =~ m/11./);
  755.         $platform = 'hp-10' if ($osversion =~ m/10./);
  756.         if ($opt_c eq "") {$opt_c = "cc"; }
  757.         if ($opt_x eq "") {
  758.             $opt_x = "CC";
  759.             if ($platform eq "hp-11") {
  760.                 $opt_x = "aCC";
  761.             }
  762.         }
  763.         if ($opt_m eq "") {
  764.             $opt_m = "inmem";
  765.         }
  766.         $icu_cxxflags = '"-w +O2 +Ofltacc"';
  767.         $icu_cflags = '"-w +O2 +Ofltacc"';
  768.         if ($opt_m =~ m/icu/i) {
  769.          $ENV{'SHLIB_PATH'}="$ICUROOT/lib:$XERCESCROOT/lib:$ENV{'SHLIB_PATH'}";
  770.          $ENV{'PATH'}="$ICUROOT/bin:$ENV{'PATH'}";                 
  771.         }
  772.         psystem ("echo SHLIB_PATH=$ENV{'SHLIB_PATH'}");
  773.     }
  774.     if ($platform =~ m/BeOS/i) {
  775.         $platform = "beos";
  776.         if ($opt_c eq "") {$opt_c = "gcc";}
  777.         if ($opt_x eq "") {$opt_x = "g++";}
  778.         $icu_cxxflags = '"-w -O"';
  779.         $icu_cflags = '"-w -O"';
  780.         psystem ("echo LIBRARY_PATH=$ENV{'LIBRARY_PATH'}");
  781.     }
  782.     if ($platform =~ m/Linux/i) {
  783.         $platform = "linux";
  784.         if ($opt_c eq "") {$opt_c = "gcc";}
  785.         if ($opt_x eq "") {$opt_x = "g++";}
  786.         $icu_cxxflags = '"-w -O"';
  787.         $icu_cflags = '"-w -O"';
  788.         if ($opt_m =~ m/icu/i) {
  789.          $ENV{'LD_LIBRARY_PATH'}="$ICUROOT/lib:$XERCESCROOT/lib:$ENV{'LD_LIBRARY_PATH'}";
  790.          $ENV{'PATH'}="$ICUROOT/bin:$ENV{'PATH'}";                 
  791.         }
  792.         psystem ("echo LD_LIBRARY_PATH=$ENV{'LD_LIBRARY_PATH'}");
  793.     }
  794.     if ($platform =~ m/SunOS/i) {
  795.         $platform = "solaris";
  796.         if ($opt_c eq "") {$opt_c = "cc";}
  797.         if ($opt_x eq "") {$opt_x = "CC";}
  798.         if ($opt_m =~ m/icu/i) {
  799.          $ENV{'LD_LIBRARY_PATH'}="$ICUROOT/lib:$XERCESCROOT/lib:$ENV{'LD_LIBRARY_PATH'}";
  800.          $ENV{'PATH'}="$ICUROOT/bin:$ENV{'PATH'}";                 
  801.         }
  802.         
  803.         $icu_cxxflags = '"-w -O3"';
  804.         $icu_cflags = '"-w -xO3"'; 
  805.         psystem ("echo LD_LIBRARY_PATH=$ENV{'LD_LIBRARY_PATH'}");
  806.     }
  807.     if ($platform =~ m/ptx/i) {
  808.         # Check if the patches have been applied or not
  809.         $platform = "ptx";
  810.         if (!(-d "$XERCESCROOT/src/xercesc/util/Platforms/PTX")) {
  811.             print ("Error: Could not locate PTX-specific XML4C directory.n");
  812.             print ("    The PTX-specific patches must be applied to both XML4C and ICU before a build can succeed.n");
  813.             exit(-1);
  814.         }
  815.         # Generally speaking, ICU must be built, before XML4C can be built, for ptx.
  816.         # If this case causes problems, we can revisit it in the future. Right now,
  817.         # we fail only if ICUROOT is defined but mh-ptx is not present.
  818.         if (length($ICUROOT)) {
  819.             if (!(-e "$ICUROOT/source/config/mh-ptx")) {
  820.                 print ("Error: Could not locate PTX-specific ICU files.n");
  821.                 print ("    The PTX-specific patches must be applied to both XML4C and ICU before a build can succeed.n");
  822.                 exit(-1);
  823.             }
  824.         }
  825.         $icu_cxxflags = '"-w -0"';
  826.         $icu_cflags = '"-w -0"';
  827.         
  828.         # XMLINSTALL is a ptx-port-specific variable used for manipulating where the files are installed.
  829.         if (!length($ENV{'XMLINSTALL'})) {
  830.             print ("XMLINSTALL has not been explicitly defined. Setting it to '$targetdir'.n");
  831.             $ENV{'XMLINSTALL'} = $targetdir;
  832.         }
  833.         $XMLINSTALL = $ENV{'XMLINSTALL'};
  834.     }
  835.     if(($platform =~ m/CYGWIN/) && ($opt_c =~ m/gcc/)) {
  836.         $MAKE = "make";
  837.         $platform = "CYGWIN";
  838.     }
  839.     # Set defaults for platform-independent options.
  840.     if ($opt_m eq "") {$opt_m = "inmem"; }   # In memory  message loader.
  841.     if ($opt_n eq "") {$opt_n = "socket"; }  # Socket based net accessor.
  842.     if ($opt_t eq "") {$opt_t = "native"; }  # Native transcoding service.
  843.     if ($opt_b eq "") {$opt_b = "32"; }      # bitstobuild.
  844. # Set defaults for platform tools
  845. if ($TAR eq "") { $TAR = 'tar'; }
  846. if ($MAKE eq "") { $MAKE = 'gmake'; }
  847.     # Check if the target directories already exist or not
  848.     if (-e $targetdir.".tar") {
  849.         print ("Error: The target file '$targetdir.tar' already exists.n");
  850.         print ("       You must delete the file '$targetdir.tar' to package your product.n");
  851.         exit(1);
  852.     }
  853.     if (-e $srctargetdir.".tar") {
  854.         print ("Error: The target file '$srctargetdir.tar' already exists.n");
  855.         print ("       You must delete the file '$srctargetdir.tar' to package your product.n");
  856.         exit(1);
  857.     }
  858.     # Make the target directory and its main subdirectories
  859.     psystem ("mkdir $targetdir");
  860.     psystem ("mkdir $targetdir/bin");
  861.     psystem ("mkdir $targetdir/etc");
  862.     psystem ("mkdir $targetdir/lib");
  863.     if ( $opt_m =~ m/iconv/i || $opt_m =~ m/icu/i ) {
  864.         psystem ("mkdir $targetdir/msg");
  865.     }
  866.     psystem ("mkdir $targetdir/include");
  867.     psystem ("mkdir $targetdir/include/xercesc");
  868.     if (length($ICUROOT) > 0) {
  869.         psystem ("mkdir $targetdir/include/unicode");
  870.     }
  871.     psystem ("mkdir $targetdir/include/xercesc/sax");
  872.     psystem ("mkdir $targetdir/include/xercesc/sax2");
  873.     psystem ("mkdir $targetdir/include/xercesc/framework");
  874.     psystem ("mkdir $targetdir/include/xercesc/internal");
  875.     psystem ("mkdir $targetdir/include/xercesc/parsers");
  876.     psystem ("mkdir $targetdir/include/xercesc/util");
  877.     psystem ("mkdir $targetdir/include/xercesc/util/Compilers");
  878.     psystem ("mkdir $targetdir/include/xercesc/util/MsgLoaders");
  879.     psystem ("mkdir $targetdir/include/xercesc/util/MsgLoaders/ICU");
  880.     psystem ("mkdir $targetdir/include/xercesc/util/MsgLoaders/InMemory");
  881.     psystem ("mkdir $targetdir/include/xercesc/util/MsgLoaders/MsgCatalog");
  882.     psystem ("mkdir $targetdir/include/xercesc/util/MsgLoaders/Win32");
  883.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms");
  884.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/AIX");
  885.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/HPUX");
  886.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/Linux");
  887.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/MacOS");
  888.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/OS2");
  889.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/OS390");
  890.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/PTX");
  891.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/Solaris");
  892.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/Tandem");
  893.     psystem ("mkdir $targetdir/include/xercesc/util/Platforms/Win32");
  894.     psystem ("mkdir $targetdir/include/xercesc/util/regx");
  895.     psystem ("mkdir $targetdir/include/xercesc/util/Transcoders");
  896.     psystem ("mkdir $targetdir/include/xercesc/util/Transcoders/ICU");
  897.     psystem ("mkdir $targetdir/include/xercesc/util/Transcoders/Iconv");
  898.     psystem ("mkdir $targetdir/include/xercesc/util/Transcoders/Win32");
  899.     psystem ("mkdir $targetdir/include/xercesc/dom");
  900.     psystem ("mkdir $targetdir/include/xercesc/dom/impl");
  901.     psystem ("mkdir $targetdir/include/xercesc/dom/deprecated");
  902.     psystem ("mkdir $targetdir/include/xercesc/validators");
  903.     psystem ("mkdir $targetdir/include/xercesc/validators/common");
  904.     psystem ("mkdir $targetdir/include/xercesc/validators/datatype");
  905.     psystem ("mkdir $targetdir/include/xercesc/validators/DTD");
  906.     psystem ("mkdir $targetdir/include/xercesc/validators/schema");
  907.     psystem ("mkdir $targetdir/include/xercesc/validators/schema/identity");
  908.     psystem ("mkdir $targetdir/samples");
  909.     psystem ("mkdir $targetdir/samples/data");
  910.     psystem ("mkdir $targetdir/samples/SAXCount");
  911.     psystem ("mkdir $targetdir/samples/SAX2Count");
  912.     psystem ("mkdir $targetdir/samples/SAXPrint");
  913.     psystem ("mkdir $targetdir/samples/SAX2Print");
  914.     psystem ("mkdir $targetdir/samples/DOMCount");
  915.     psystem ("mkdir $targetdir/samples/DOMPrint");
  916.     psystem ("mkdir $targetdir/samples/Redirect");
  917.     psystem ("mkdir $targetdir/samples/MemParse");
  918.     psystem ("mkdir $targetdir/samples/PParse");
  919.     psystem ("mkdir $targetdir/samples/StdInParse");
  920.     psystem ("mkdir $targetdir/samples/EnumVal");
  921.     psystem ("mkdir $targetdir/samples/SEnumVal");
  922.     psystem ("mkdir $targetdir/samples/CreateDOMDocument");
  923.     psystem ("mkdir $targetdir/doc");
  924.     psystem ("mkdir $targetdir/doc/html");
  925.     psystem ("mkdir $targetdir/doc/html/apiDocs");
  926.     # Build ICU if needed
  927.     if (($opt_t =~ m/icu/i || $opt_m =~ m/icu/i) && !(length($opt_j) > 0))
  928.     {
  929.         print("nnBuild ICU with '$opt_b' bit ...n");
  930.         if(length($ICUROOT) == 0) {
  931.            print("Error, ICUROOT not set, can not build ICUn");
  932.            exit(-1);
  933.            }
  934.         # First make the ICU files executable
  935.         pchdir ("$ICUROOT/source");
  936.         psystem ("chmod +x configure config.*");
  937.         psystem ("chmod +x install-sh");
  938.         $ENV{'ICU_DATA'} = "$ICUROOT/data";
  939.         if ($platform =~ m/ptx/i) {
  940.             psystem ("chmod +x runConfigureICU");
  941.             psystem ("./runConfigureICU PTX");
  942.         } else {
  943.         # set the 32 bit or 64 bit
  944.             if ($opt_b eq "32") {
  945.                 psystem ("CC=$opt_c CXX=$opt_x CXXFLAGS=$icu_cxxflags CFLAGS=$icu_cflags configure --prefix=$ICUROOT --disable-64bit-libs");
  946.             }
  947.             else {
  948.                 psystem ("CC=$opt_c CXX=$opt_x CXXFLAGS=$icu_cxxflags CFLAGS=$icu_cflags configure --prefix=$ICUROOT");
  949.             }
  950.         }
  951.         psystem ("$MAKE clean"); # Clean up the build, may want to comment this line out!
  952.         psystem ("rm -f $ICUROOT/data/*.o"); # make clean is not enough
  953.         psystem ("rm -f $ICUROOT/data/*.c"); # same for .c files
  954.         psystem ("$MAKE");       # This will take a long time!
  955.         psystem ("$MAKE install"); # Make this separate since this breaks on Solaris
  956.         # Please check if the following needs any change in Version 1.5
  957.         # For the antiquated CC compiler under HPUX, we need to invoke
  958.         # make one extra time to generate the .cnv files.
  959.         # if ( ($platform =~ m/hp-/i) && ($opt_x eq 'CC') ) {
  960.         #   system ("$MAKE");
  961.         # }
  962.     }
  963.     # For ptx, ICUROOT must now be set to XMLINSTALL for further work.
  964.     if ($platform =~ m/ptx/i) {
  965.         $ENV{'ICUROOT'} = $ENV{'XMLINSTALL'};
  966.     }
  967.     # make the source files
  968.     print("nnBuild the xerces-c library ...n");
  969.     pchdir ("$XERCESCROOT/src/xercesc");
  970.     psystem ("chmod +x run* con* install-sh");
  971.     if (length($opt_r) > 0) {
  972.         psystem ("./runConfigure -p$platform -c$opt_c -x$opt_x -m$opt_m -n$opt_n -t$opt_t -r$opt_r -b$opt_b");
  973.     } else {
  974.         psystem ("./runConfigure -p$platform -c$opt_c -x$opt_x -m$opt_m -n$opt_n -t$opt_t -b$opt_b");
  975.     }
  976.     psystem ("$MAKE clean");     # May want to comment this line out to speed up
  977.     psystem ("$MAKE");
  978.     # Move ICU libs into lib dir, so samples will link.  This matches the structure of
  979.     #   the eventual binary packaging, even though we are doing it in the build directory.
  980.     #
  981.     if (length($ICUROOT) > 0) {
  982.         pchdir ("$XERCESCROOT/lib");
  983.         #
  984.         # copy icudata dll
  985.         # For ICU 2.4:
  986.         # on AIX, it is called libicudata24.0.so
  987.         # on Solaris/Linux, it is called libicudata.so.24.0
  988.         # on HP, it is called libicudata.s1.24.0
  989.         #
  990.         psystem("rm -f libicudata*");
  991.         psystem("cp -f $ICUROOT/lib/libicudata24.0.so .");
  992.         psystem("cp -f $ICUROOT/lib/libicudata.so.24.0 .");
  993.         psystem("cp -f $ICUROOT/lib/libicudata.sl.24.0 .");
  994.         psystem("find . -name 'libicudata24.0.so' -exec ln -s {} libicudata.so \;");
  995.         psystem("find . -name 'libicudata24.0.so' -exec ln -s {} libicudata24.so \;");
  996.         psystem("find . -name 'libicudata.so.24.0' -exec ln -s {} libicudata.so \;");
  997.         psystem("find . -name 'libicudata.so.24.0' -exec ln -s {} libicudata.so.24 \;");
  998.         psystem("find . -name 'libicudata.sl.24.0' -exec ln -s {} libicudata.sl \;");
  999.         psystem("find . -name 'libicudata.sl.24.0' -exec ln -s {} libicudata.sl.24 \;");
  1000.         #
  1001.         # copy icuuc dll
  1002.         # on AIX, it is called libicuuc24.0.so
  1003.         # on Solaris/Linux, it is called libicuuc.so.24.0
  1004.         # on HP, it is called libicuuc.sl.24.0
  1005.         #
  1006.         psystem("rm -f libicuuc*");
  1007.         psystem("cp -f $ICUROOT/lib/libicuuc24.0.so .");
  1008.         psystem("cp -f $ICUROOT/lib/libicuuc.so.24.0  .");
  1009.         psystem("cp -f $ICUROOT/lib/libicuuc.sl.24.0  .");
  1010.         psystem("find . -name 'libicuuc24.0.so' -exec ln -s {} libicuuc.so \;");
  1011.         psystem("find . -name 'libicuuc24.0.so' -exec ln -s {} libicuuc24.so \;");
  1012.         psystem("find . -name 'libicuuc.so.24.0' -exec ln -s {} libicuuc.so \;");
  1013.         psystem("find . -name 'libicuuc.so.24.0' -exec ln -s {} libicuuc.so.24 \;");
  1014.         psystem("find . -name 'libicuuc.sl.24.0' -exec ln -s {} libicuuc.sl \;");
  1015.         psystem("find . -name 'libicuuc.sl.24.0' -exec ln -s {} libicuuc.sl.24 \;");
  1016.     }
  1017.     # Now build the samples
  1018.     print("nnBuild the samples ...n");
  1019.     pchdir ("$XERCESCROOT/samples");
  1020.     psystem ("chmod +x run* con* install-sh");
  1021.     psystem ("./runConfigure -p$platform -c$opt_c -x$opt_x -b$opt_b");
  1022.     psystem ("$MAKE clean");     # May want to comment this line out to speed up
  1023.     psystem ("$MAKE");
  1024.     # Next build the tests
  1025.     print("nnBuild the tests ...n");
  1026.     pchdir ("$XERCESCROOT/tests");
  1027.     psystem ("chmod +x run* con* install-sh");
  1028.     psystem ("./runConfigure -p$platform -c$opt_c -x$opt_x -b$opt_b");
  1029.     psystem ("$MAKE clean");     # May want to comment this line out to speed up
  1030.     psystem ("$MAKE");
  1031.     pchdir ($targetdir);
  1032.     # Populate the include output directory
  1033.     print ("nnCopying headers files ...n");
  1034.     psystem("cp -Rf $XERCESCROOT/src/xercesc/sax/*.hpp $targetdir/include/xercesc/sax");
  1035. psystem("cp -Rf $XERCESCROOT/src/xercesc/sax2/*.hpp $targetdir/include/xercesc/sax2");
  1036.     psystem("cp -Rf $XERCESCROOT/src/xercesc/framework/*.hpp $targetdir/include/xercesc/framework");
  1037.     psystem("cp -Rf $XERCESCROOT/src/xercesc/dom/*.hpp $targetdir/include/xercesc/dom");
  1038.     psystem("cp -Rf $XERCESCROOT/src/xercesc/dom/deprecated/*.hpp $targetdir/include/xercesc/dom/deprecated");
  1039.     psystem("cp -Rf $XERCESCROOT/version.incl $targetdir");
  1040.     psystem("rm -rf $targetdir/include/xercesc/dom/impl");
  1041.     psystem("rm  $targetdir/include/xercesc/dom/deprecated/*Impl.hpp");
  1042.     psystem("rm  $targetdir/include/xercesc/dom/deprecated/DS*.hpp");
  1043.     psystem("cp -Rf $XERCESCROOT/src/xercesc/internal/*.hpp $targetdir/include/xercesc/internal");
  1044.     psystem("cp -Rf $XERCESCROOT/src/xercesc/internal/*.c $targetdir/include/xercesc/internal");
  1045.     psystem("cp -Rf $XERCESCROOT/src/xercesc/parsers/*.hpp $targetdir/include/xercesc/parsers");
  1046.     psystem("cp -Rf $XERCESCROOT/src/xercesc/parsers/*.c $targetdir/include/xercesc/parsers");
  1047.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/*.hpp $targetdir/include/xercesc/util");
  1048.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/*.c $targetdir/include/xercesc/util");
  1049.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Compilers/*.hpp $targetdir/include/xercesc/util/Compilers");
  1050.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/MsgLoaders/*.hpp $targetdir/include/xercesc/util/MsgLoaders");
  1051.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/MsgLoaders/ICU/*.hpp $targetdir/include/xercesc/util/MsgLoaders/ICU");
  1052.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/MsgLoaders/InMemory/*.hpp $targetdir/include/xercesc/util/MsgLoaders/InMemory");
  1053.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/MsgLoaders/MsgCatalog/*.hpp $targetdir/include/xercesc/util/MsgLoaders/MsgCatalog");
  1054.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/MsgLoaders/Win32/*.hpp $targetdir/include/xercesc/util/MsgLoaders/Win32");
  1055.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/*.hpp $targetdir/include/xercesc/util/Platforms");
  1056.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/AIX/*.hpp $targetdir/include/xercesc/util/Platforms/AIX");
  1057.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/HPUX/*.hpp $targetdir/include/xercesc/util/Platforms/HPUX");
  1058.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/Linux/*.hpp $targetdir/include/xercesc/util/Platforms/Linux");
  1059.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/MacOS/*.hpp $targetdir/include/xercesc/util/Platforms/MacOS");
  1060.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/OS2/*.hpp $targetdir/include/xercesc/util/Platforms/OS2");
  1061.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/OS390/*.hpp $targetdir/include/xercesc/util/Platforms/OS390");
  1062.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/PTX/*.hpp $targetdir/include/xercesc/util/Platforms/PTX");
  1063.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/Solaris/*.hpp $targetdir/include/xercesc/util/Platforms/Solaris");
  1064.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/Tandem/*.hpp $targetdir/include/xercesc/util/Platforms/Tandem");
  1065.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Platforms/Win32/*.hpp $targetdir/include/xercesc/util/Platforms/Win32");
  1066.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/regx/*.hpp $targetdir/include/xercesc/util/regx");
  1067.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Transcoders/*.hpp $targetdir/include/xercesc/util/Transcoders");
  1068.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Transcoders/ICU/*.hpp $targetdir/include/xercesc/util/Transcoders/ICU");
  1069.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Transcoders/Iconv/*.hpp $targetdir/include/xercesc/util/Transcoders/Iconv");
  1070.     psystem("cp -Rf $XERCESCROOT/src/xercesc/util/Transcoders/Win32/*.hpp $targetdir/include/xercesc/util/Transcoders/Win32");
  1071.     psystem("cp -Rf $XERCESCROOT/src/xercesc/validators/common/*.hpp $targetdir/include/xercesc/validators/common");
  1072.     psystem("cp -Rf $XERCESCROOT/src/xercesc/validators/datatype/*.hpp $targetdir/include/xercesc/validators/datatype");
  1073.     psystem("cp -Rf $XERCESCROOT/src/xercesc/validators/DTD/*.hpp $targetdir/include/xercesc/validators/DTD");
  1074.     psystem("cp -Rf $XERCESCROOT/src/xercesc/validators/schema/*.hpp $targetdir/include/xercesc/validators/schema");
  1075.     psystem("cp -Rf $XERCESCROOT/src/xercesc/validators/schema/identity/*.hpp $targetdir/include/xercesc/validators/schema/identity");
  1076.     if (length($ICUROOT) > 0) {
  1077.         print "nICU files are being copied from '$ICUROOT'";
  1078.         psystem("cp -Rf $ICUROOT/include/* $targetdir/include");
  1079.     }
  1080.     # Populate the binary output directory
  1081.     print ("nnCopying binary outputs ...n");
  1082.     psystem("cp -Rf $XERCESCROOT/bin/* $targetdir/bin");
  1083.     psystem("rm -rf $targetdir/bin/obj");
  1084.     # Populate the library output directory
  1085.     print ("nnCopying library outputs ...n");
  1086.     pchdir ("$targetdir/lib");
  1087.     psystem("rm -f libxerces-c* ");
  1088.     if ((-e "$XERCESCROOT/lib/libxerces-c.so.23.0" )) {
  1089.         psystem("cp -f $XERCESCROOT/lib/libxerces-c.so.23.0 .");
  1090.         psystem("ln -s libxerces-c.so.23.0 libxerces-c.so.23 ");
  1091.         psystem("ln -s libxerces-c.so.23   libxerces-c.so    ");
  1092.     }
  1093.     if ((-e "$XERCESCROOT/lib/libxerces-c.sl.23.0" )) {
  1094.         psystem("cp -f $XERCESCROOT/lib/libxerces-c.sl.23.0 .");
  1095.         psystem("ln -s libxerces-c.sl.23.0 libxerces-c.sl.23 ");
  1096.         psystem("ln -s libxerces-c.sl.23   libxerces-c.sl    ");
  1097.     }
  1098.     if ((-e "$XERCESCROOT/lib/libxerces-c23.0.so" )) {
  1099.         psystem("cp -f $XERCESCROOT/lib/libxerces-c23.0.so .");
  1100.         psystem("ln -s libxerces-c23.0.so libxerces-c23.so  ");
  1101.         psystem("ln -s libxerces-c23.so   libxerces-c.so    ");
  1102.     }
  1103. # Mac OS X
  1104.     if ((-e "$XERCESCROOT/lib/libxerces-c.23.0.dylib" )) {
  1105.         psystem("cp -f $XERCESCROOT/lib/libxerces-c.23.0.dylib .");
  1106.         psystem("ln -s libxerces-c.23.0.dylib libxerces-c.23.dylib ");
  1107.         psystem("ln -s libxerces-c.23.dylib   libxerces-c.dylib    ");
  1108.     }
  1109.     # Populate the Message Catalog Files
  1110.     if ( $opt_m =~ m/iconv/i ) {
  1111.         print ("nnCopying Message Catalog Files ...n");
  1112.         pchdir ("$targetdir/msg");
  1113.         psystem("rm -f XercesMessages* ");    
  1114.         psystem("cp -f $XERCESCROOT/msg/XercesMessages*.cat .");
  1115.     }
  1116.     #
  1117.     # Create symbolic link for those ICU libraries
  1118.     #
  1119.     if (length($ICUROOT) > 0) {
  1120.         pchdir ("$targetdir/lib");
  1121.         #
  1122.         # copy icudata dll
  1123.         # on AIX, it is called libicudata24.0.so
  1124.         # on Solaris/Linux, it is called libicudata.so.24.0
  1125.         # on HP, it is called libicudata.s1.24.0
  1126.         #
  1127.         psystem("rm -f libicudata*");
  1128.         psystem("cp -f $XERCESCROOT/lib/libicudata24.0.so .");
  1129.         psystem("cp -f $XERCESCROOT/lib/libicudata.so.24.0 .");
  1130.         psystem("cp -f $XERCESCROOT/lib/libicudata.sl.24.0 .");
  1131.         psystem("find . -name 'libicudata24.0.so' -exec ln -s {} libicudata.so \;");
  1132.         psystem("find . -name 'libicudata24.0.so' -exec ln -s {} libicudata24.so \;");
  1133.         psystem("find . -name 'libicudata.so.24.0' -exec ln -s {} libicudata.so \;");
  1134.         psystem("find . -name 'libicudata.so.24.0' -exec ln -s {} libicudata.so.24 \;");
  1135.         psystem("find . -name 'libicudata.sl.24.0' -exec ln -s {} libicudata.sl \;");
  1136.         psystem("find . -name 'libicudata.sl.24.0' -exec ln -s {} libicudata.sl.24 \;");
  1137.         #
  1138.         # copy icuuc dll
  1139.         # on AIX, it is called libicuuc24.0.so
  1140.         # on Solaris/Linux, it is called libicuuc.so.24.0
  1141.         # on HP, it is called libicuuc.sl.24.0
  1142.         #
  1143.         psystem("rm -f libicuuc*");
  1144.         psystem("cp -f $XERCESCROOT/lib/libicuuc24.0.so .");
  1145.         psystem("cp -f $XERCESCROOT/lib/libicuuc.so.24.0  .");
  1146.         psystem("cp -f $XERCESCROOT/lib/libicuuc.sl.24.0  .");
  1147.         psystem("find . -name 'libicuuc24.0.so' -exec ln -s {} libicuuc.so \;");
  1148.         psystem("find . -name 'libicuuc24.0.so' -exec ln -s {} libicuuc24.so \;");
  1149.         psystem("find . -name 'libicuuc.so.24.0' -exec ln -s {} libicuuc.so \;");
  1150.         psystem("find . -name 'libicuuc.so.24.0' -exec ln -s {} libicuuc.so.24 \;");
  1151.         psystem("find . -name 'libicuuc.sl.24.0' -exec ln -s {} libicuuc.sl \;");
  1152.         psystem("find . -name 'libicuuc.sl.24.0' -exec ln -s {} libicuuc.sl.24 \;");
  1153.         # Copy the Resouce Bundle for ICUMsgLoader
  1154.         if ( $opt_m =~ m/icu/i) {
  1155.             print ("nnCopying ICU message bundles ...n");        
  1156.             psystem("cp -f $XERCESCROOT/msg/XercesMessages*.res $targetdir/msg");
  1157.            
  1158.             psystem("cp -f $XERCESCROOT/lib/libXercesMessages23.0.so .");
  1159.             psystem("find . -name 'libXercesMessages23.0.so' -exec ln -s {} libXercesMessages23.so \;");
  1160.             psystem("find . -name 'libXercesMessages23.so'   -exec ln -s {} libXercesMessages.so \;");
  1161.                     
  1162.             psystem("cp -f $XERCESCROOT/lib/libXercesMessages.so.23.0 .");
  1163.             psystem("find . -name 'libXercesMessages.so.23.0' -exec ln -s {} libXercesMessages.so.23 \;");
  1164.             psystem("find . -name 'libXercesMessages.so.23'   -exec ln -s {} libXercesMessages.so \;");
  1165.             
  1166.             psystem("cp -f $XERCESCROOT/lib/libXercesMessages.sl.23.0 .");
  1167.             psystem("find . -name 'libXercesMessages.sl.23.0' -exec ln -s {} libXercesMessages.sl.23 \;");
  1168.             psystem("find . -name 'libXercesMessages.sl.23'   -exec ln -s {} libXercesMessages.sl \;");            
  1169.         }        
  1170.     }
  1171.     # Populate the etc output directory like config.status and the map file
  1172.     print ("nnCopying misc output to etc ...n");
  1173.     psystem("cp -Rf $XERCESCROOT/src/xercesc/config.status $targetdir/etc");
  1174.     psystem("cp -Rf $XERCESCROOT/obj/*.map $targetdir/etc");
  1175.     # Populate the samples directory
  1176.     print ("nnCopying sample files ...n");
  1177.     foreach $iii ('config.guess', 'config.h.in', 'config.sub', 'configure', 'configure.in',
  1178.                   'install-sh', 'runConfigure', 'Makefile.in', 'Makefile.incl', 'Makefile') {
  1179.         psystem("cp -f $XERCESCROOT/samples/$iii $targetdir/samples");
  1180.     }
  1181.     psystem("cp -Rf $XERCESCROOT/samples/data/* $targetdir/samples/data");
  1182.     psystem("cp -Rf $XERCESCROOT/samples/SAXCount/* $targetdir/samples/SAXCount");
  1183.     psystem("rm -f $targetdir/samples/SAXCount/Makefile");
  1184.     psystem("cp -Rf $XERCESCROOT/samples/SAX2Count/* $targetdir/samples/SAX2Count");
  1185.     psystem("rm -f $targetdir/samples/SAX2Count/Makefile");
  1186.     psystem("cp -Rf $XERCESCROOT/samples/SAXPrint/* $targetdir/samples/SAXPrint");
  1187.     psystem("rm -f $targetdir/samples/SAXPrint/Makefile");
  1188.     psystem("cp -Rf $XERCESCROOT/samples/SAX2Print/* $targetdir/samples/SAX2Print");
  1189.     psystem("rm -f $targetdir/samples/SAX2Print/Makefile");
  1190.     psystem("cp -Rf $XERCESCROOT/samples/DOMCount/* $targetdir/samples/DOMCount");
  1191.     psystem("rm -f $targetdir/samples/DOMCount/Makefile");
  1192.     psystem("cp -Rf $XERCESCROOT/samples/DOMPrint/* $targetdir/samples/DOMPrint");
  1193.     psystem("rm -f $targetdir/samples/DOMPrint/Makefile");
  1194.     psystem("cp -Rf $XERCESCROOT/samples/Redirect/* $targetdir/samples/Redirect");
  1195.     psystem("rm -f $targetdir/samples/Redirect/Makefile");
  1196.     psystem("cp -Rf $XERCESCROOT/samples/MemParse/* $targetdir/samples/MemParse");
  1197.     psystem("rm -f $targetdir/samples/MemParse/Makefile");
  1198.     psystem("cp -Rf $XERCESCROOT/samples/PParse/* $targetdir/samples/PParse");
  1199.     psystem("rm -f $targetdir/samples/PParse/Makefile");
  1200.     psystem("cp -Rf $XERCESCROOT/samples/StdInParse/* $targetdir/samples/StdInParse");
  1201.     psystem("rm -f $targetdir/samples/StdInParse/Makefile");
  1202.     psystem("cp -Rf $XERCESCROOT/samples/EnumVal/* $targetdir/samples/EnumVal");
  1203.     psystem("rm -f $targetdir/samples/EnumVal/Makefile");
  1204.     psystem("cp -Rf $XERCESCROOT/samples/SEnumVal/* $targetdir/samples/SEnumVal");
  1205.     psystem("rm -f $targetdir/samples/SEnumVal/Makefile");
  1206.     psystem("cp -Rf $XERCESCROOT/samples/CreateDOMDocument/* $targetdir/samples/CreateDOMDocument");
  1207.     psystem("rm -f $targetdir/samples/CreateDOMDocument/Makefile");
  1208.     psystem("rm -f $targetdir/samples/Makefile");
  1209.     # Populate the docs directory
  1210.     print ("nnCopying documentation ...n");
  1211.     psystem("cp -Rf $XERCESCROOT/doc/* $targetdir/doc");
  1212.     psystem("cp $XERCESCROOT/Readme.html $targetdir");
  1213.     psystem("cp $XERCESCROOT/credits.txt $targetdir");
  1214.     psystem("cp $XERCESCROOT/LICENSE.txt $targetdir");
  1215.     if (length($ICUROOT) > 0) {
  1216.         psystem("cp $XERCESCROOT/license.html $targetdir");
  1217.         psystem("cp $XERCESCROOT/XLicense.html $targetdir");
  1218.     }
  1219.     psystem("rm -f $targetdir/doc/Doxyfile");
  1220.     psystem("rm -rf $targetdir/doc/style");
  1221.     psystem("rm -f $targetdir/doc/*.xml");
  1222.     psystem("rm -f $targetdir/doc/*.ent");
  1223.     psystem("rm -f $targetdir/doc/*.gif");
  1224.     # Change the directory permissions
  1225.     psystem ("chmod 644 `find $targetdir -type f`");
  1226.     psystem ("chmod 755 $targetdir/bin/* $targetdir/lib/*");
  1227.     psystem ("chmod +x $targetdir/samples/runConfigure $targetdir/samples/configure $targetdir/samples/install-sh");
  1228.     psystem ("chmod +x $targetdir/samples/config.sub $targetdir/samples/config.guess $targetdir/samples/config.status");
  1229.     psystem ("chmod 755 `find $targetdir -type d`");
  1230.     # Now package it all up using tar
  1231.     print ("nnTARing up all files ...n");
  1232.     pchdir ("$targetdir/..");
  1233.     $zipname = $targetdir . ".tar";
  1234.     $platformzipname = $zipname;
  1235.     psystem ("$TAR -cvf $platformzipname $zipfiles");
  1236.     # Finally compress the files
  1237.     print ("Compressing $platformzipname ...n");
  1238.     psystem ("gzip $platformzipname");
  1239. }
  1240. #
  1241. #  psystem subroutine both prints and executes a system command.
  1242. #
  1243. sub psystem() {
  1244.     print("$_[0]n");
  1245.     system($_[0]);
  1246.     }
  1247. #
  1248. #  chdir subroutine both prints and executes a chdir
  1249. #
  1250. sub pchdir() {
  1251.     print("chdir $_[0]n");
  1252.     chdir $_[0];
  1253.     }
  1254. sub change_windows_project_for_ICU() {
  1255.     my ($thefile, $transcoder, $msgloader) = @_;
  1256.     print "nConverting Windows Xerces library project ($thefile) for ICU usage...";
  1257.     my $thefiledotbak = $thefile . ".bak";
  1258.     rename ($thefile, $thefiledotbak);
  1259.     open (FIZZLE, $thefiledotbak);
  1260.     open (FIZZLEOUT, ">$thefile");
  1261.     while ($line = <FIZZLE>) {
  1262.         if ($line =~ /Win32 Debug/) {
  1263.             $icuuc = "icuucd";
  1264.             }
  1265.         if ($line =~ /Win32 Release/) {
  1266.             $icuuc = "icuuc";
  1267.             }
  1268.         $line =~ s[/D "PROJ_XMLPARSER"][/I "$ICUROOT\include" /D "PROJ_XMLPARSER"];
  1269.         $line =~ s[Debug/xerces-c_2D.lib"][Debug/xerces-c_2D.lib" /libpath:"$ICUROOT\lib" /libpath:"$ICUROOT\source\data" /libpath:"$XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources"];
  1270.         $line =~ s[Release/xerces-c_2.lib"][Release/xerces-c_2.lib" /libpath:"$ICUROOT\lib" /libpath:"$ICUROOT\source\data" /libpath:"$XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources"];       
  1271.         $line =~ s/user32.lib/user32.lib $icuuc.lib icudata.lib XercesMessages2_3_0.lib/g;
  1272.         
  1273.         if ($transcoder)
  1274.         {
  1275.             $line =~ s/XML_USE_WIN32_TRANSCODER/XML_USE_ICU_TRANSCODER/g;
  1276.             $line =~ s/Transcoders\Win32\Win32TransService.cpp/Transcoders\ICU\ICUTransService.cpp/g;
  1277.             $line =~ s/Transcoders\Win32\Win32TransService.hpp/Transcoders\ICU\ICUTransService.hpp/g;
  1278.         }
  1279.         if ($msgloader)
  1280.         {
  1281.             $line =~ s/XML_USE_WIN32_MSGLOADER/XML_USE_ICU_MESSAGELOADER/g;
  1282.             $line =~ s/MsgLoaders\Win32\Win32MsgLoader.cpp/MsgLoaders\ICU\ICUMsgLoader.cpp/g;
  1283.             $line =~ s/MsgLoaders\Win32\Win32MsgLoader.hpp/MsgLoaders\ICU\ICUMsgLoader.hpp/g;
  1284.         }
  1285.         print FIZZLEOUT $line;
  1286.     }
  1287.     close (FIZZLEOUT);
  1288.     close (FIZZLE);
  1289.     unlink ($thefiledotbak);
  1290. }
  1291. sub change_windows_makefile_for_ICU() {
  1292.     my ($thefile, $transcoder, $msgloader) = @_;
  1293.     print "nConverting Windows Xerces library makefile ($thefile) for ICU usage...";
  1294.     my $thefiledotbak = $thefile . ".bak";
  1295.     rename ($thefile, $thefiledotbak);
  1296.     open (FIZZLE, $thefiledotbak);
  1297.     open (FIZZLEOUT, ">$thefile");
  1298.     while ($line = <FIZZLE>) {
  1299.         if ($line =~ /Win64 Debug/ ){
  1300.             $icuuc = "icuucd";
  1301.             }
  1302.         if ($line =~ /Win64 Release/ ) {
  1303.             $icuuc = "icuuc";
  1304.         }
  1305.         $line =~ s[/D "PROJ_XMLPARSER"][/I "$ICUROOT\include" /D "PROJ_XMLPARSER"];
  1306.         $line =~ s[/machine:IA64][/libpath:"$ICUROOT\lib" /libpath:"$ICUROOT\source\data" /libpath:"$XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources" /machine:IA64];
  1307.         $line =~ s/user32.lib/user32.lib $icuuc.lib icudata.lib XercesMessages2_3_0.lib/g;
  1308.             
  1309.         if ($transcoder) {
  1310.             $line =~ s/XML_USE_WIN32_TRANSCODER/XML_USE_ICU_TRANSCODER/g;
  1311.             $line =~ s/Transcoders\Win32\Win32TransService/Transcoders\ICU\ICUTransService/g;
  1312.             $line =~ s/Win32TransService/ICUTransService/g;
  1313.         }
  1314.         if ($msgloader)
  1315.         {
  1316.             $line =~ s/XML_USE_WIN32_MSGLOADER/XML_USE_ICU_MESSAGELOADER/g;
  1317.             $line =~ s/MsgLoaders\Win32\Win32MsgLoader/MsgLoaders\ICU\ICUMsgLoader/g;
  1318.             $line =~ s/Win32MsgLoader/ICUMsgLoader/g;
  1319.         }
  1320.         print FIZZLEOUT $line;
  1321.     }
  1322.     close (FIZZLEOUT);
  1323.     close (FIZZLE);
  1324.     unlink ($thefiledotbak);
  1325. }
  1326. sub change_windows_project_for_ICU_VC7() {
  1327.     my ($thefile, $transcoder, $msgloader) = @_;
  1328.     print "nConverting Windows Xerces library project ($thefile) for ICU usage...";
  1329.     my $thefiledotbak = $thefile . ".bak";
  1330.     rename ($thefile, $thefiledotbak);
  1331.     open (FIZZLE, $thefiledotbak);
  1332.     open (FIZZLEOUT, ">$thefile");
  1333.     while ($line = <FIZZLE>) {
  1334.         if ($line =~ /Release|Win32/) {
  1335.             $icuuc = "icuuc";
  1336.             }
  1337.         if ($line =~ /Debug|Win32/) {
  1338.             $icuuc = "icuucd";
  1339.             }
  1340.         $line =~ s/AdditionalIncludeDirectories="([^"]*)/AdditionalIncludeDirectories="$ICUROOT\include;$1/;
  1341.         $line =~ s/AdditionalLibraryDirectories="([^"]*)/AdditionalLibraryDirectories="$ICUROOT\lib;$ICUROOT\source\data;$XERCESCROOT\src\xercesc\util\MsgLoaders\ICU\resources;$1/;
  1342.         $line =~ s/AdditionalDependencies="([^"]*)/AdditionalDependencies="$icuuc.lib icudata.lib XercesMessages2_3_0.lib $1/;
  1343.         if ($transcoder) {
  1344.             $line =~ s/XML_USE_WIN32_TRANSCODER/XML_USE_ICU_TRANSCODER/g;
  1345.             $line =~ s/Transcoders\Win32\Win32TransService.cpp/Transcoders\ICU\ICUTransService.cpp/g;
  1346.             $line =~ s/Transcoders\Win32\Win32TransService.hpp/Transcoders\ICU\ICUTransService.hpp/g;
  1347.         }
  1348.         if ($msgloader)
  1349.         {
  1350.             $line =~ s/XML_USE_WIN32_MSGLOADER/XML_USE_ICU_MESSAGELOADER/g;
  1351.             $line =~ s/MsgLoaders\Win32\Win32MsgLoader/MsgLoaders\ICU\ICUMsgLoader/g;
  1352.             $line =~ s/Win32MsgLoader/ICUMsgLoader/g;
  1353.         }
  1354.         print FIZZLEOUT $line;
  1355.     }
  1356.     close (FIZZLEOUT);
  1357.     close (FIZZLE);
  1358.     unlink ($thefiledotbak);
  1359. }
  1360. #
  1361. # This subroutine is used to munge the XercesLib project file to remove all
  1362. # traces of WinSock based NetAccessor. Once no NetAccessor is specified, the
  1363. # project file is configured for using the 'FileOnly' NetAccessor.
  1364. #
  1365. # For this function to work the assumption is that project file in CMVC is
  1366. # preconfigured to already use the WinSock based NetAccessor. So, the changes
  1367. # that need to be done are:
  1368. #   - to remove references to any #defines
  1369. #   - to remove references to wsock32.lib
  1370. #   - to remove references to the source files for the WinSock based NetAccessor.
  1371. #
  1372. sub changeWindowsProjectForFileOnlyNA() {
  1373.     my ($thefile) = @_;
  1374.     print "nConfiguring Xerces library project ($thefile) for FileOnly NetAccessor...";
  1375.     my $thefiledotbak = $thefile . ".bak";
  1376.     rename ($thefile, $thefiledotbak);
  1377.     open (PROJFILEIN, $thefiledotbak);
  1378.     open (PROJFILEOUT, ">$thefile");
  1379.     while ($aline = <PROJFILEIN>) {
  1380.         # By skipping over lines between the NetAccessors group
  1381.         # we can references to the WinSock based NetAccessor files.
  1382.         if ($aline =~ m/^# Begin Group "NetAccessors"/g) {
  1383.             # ...found it. Write out the line as a place holder. Also...
  1384.             print PROJFILEOUT $aline;
  1385.             # ...preserve the next two lines.
  1386.             $aline = <PROJFILEIN>;
  1387.             print PROJFILEOUT $aline;
  1388.             $aline = <PROJFILEIN>;
  1389.             print PROJFILEOUT $aline;
  1390.             # Skip over the lines till you hit the WinSock NetAccessor 'End Group'.
  1391.             while ($aline = <PROJFILEIN>) { # read the next line
  1392.                 last if ($aline =~ m/^# End Group/g);
  1393.             }
  1394.             # We need to preserve the 'End Group' line. The last statement of the
  1395.             # enclosing while loop prints it out.
  1396.         }
  1397.         # From the remaining lines, remove any references to the #defines and
  1398.         # the WinSock library.
  1399.         $aline =~ s//D "XML_USE_NETACCESSOR_WINSOCK" //g;  # "
  1400.         if ($aline =~ /( )+ws2_32.lib( )*"/) { # end of line
  1401.           $aline =~ s/( )+ws2_32.lib( )*"/"/g;
  1402.         } else { # beginning or middle of line
  1403.           $aline =~ s/ws2_32.lib( )*//g;
  1404.         }
  1405.         print PROJFILEOUT $aline;
  1406.     }
  1407.     close (PROJFILEOUT);
  1408.     close (PROJFILEIN);
  1409.     unlink ($thefiledotbak);
  1410. }
  1411. sub changeWindowsProjectForFileOnlyNA_VC7() {
  1412.     my ($thefile) = @_;
  1413.     print "nConfiguring Xerces library project ($thefile) for FileOnly NetAccessor...n";
  1414.     my $thefiledotbak = $thefile . ".bak";
  1415.     rename ($thefile, $thefiledotbak);
  1416.     open (PROJFILEIN, $thefiledotbak);
  1417.     open (PROJFILEOUT, ">$thefile");
  1418.     while ($aline = <PROJFILEIN>) {
  1419.         # By skipping over lines between the NetAccessors group
  1420.         # we can references to the WinSock based NetAccessor files.
  1421.         if ($aline =~ m/^# Begin Group "NetAccessors"/g) {
  1422.             # ...found it. Write out the line as a place holder. Also...
  1423.             print PROJFILEOUT $aline;
  1424.             # ...preserve the next two lines.
  1425.             $aline = <PROJFILEIN>;
  1426.             print PROJFILEOUT $aline;
  1427.             $aline = <PROJFILEIN>;
  1428.             print PROJFILEOUT $aline;
  1429.             # Skip over the lines till you hit the WinSock NetAccessor 'End Group'.
  1430.             while ($aline = <PROJFILEIN>) { # read the next line
  1431.                 last if ($aline =~ m/^# End Group/g);
  1432.             }
  1433.             # We need to preserve the 'End Group' line. The last statement of the
  1434.             # enclosing while loop prints it out.
  1435.         }
  1436.         # From the remaining lines, remove any references to the #defines and
  1437.         # the WinSock library.
  1438.         if ($aline =~ /;XML_USE_NETACCESSOR_WINSOCK/) { # end or middle of line
  1439.           $aline =~ s/;XML_USE_NETACCESSOR_WINSOCK//g;
  1440.         } else { # beginning of line
  1441.           $aline =~ s/XML_USE_NETACCESSOR_WINSOCK;*//g;
  1442.         }
  1443.         if ($aline =~ /s+ws2_32.libs*"/) { # end of line
  1444.           $aline =~ s/s+ws2_32.libs*"/"/g;
  1445.         } else { # beginning or middle of line
  1446.           $aline =~ s/ws2_32.libs*//g;
  1447.         }
  1448.         print PROJFILEOUT $aline;
  1449.     }
  1450.     close (PROJFILEOUT);
  1451.     close (PROJFILEIN);
  1452.     unlink ($thefiledotbak);
  1453. }