home *** CD-ROM | disk | FTP | other *** search
/ Enter 2004 June / ENTER.ISO / files / xampp-win32-1.4.5-installer.exe / xampp / install.php < prev    next >
Encoding:
PHP Script  |  2004-07-07  |  20.5 KB  |  854 lines
  1. <?php
  2.  
  3. /* 
  4. #### Installer PHP  1.4 RC2  #### 
  5. #### Author: Kay Vogelgesang for www.apachefriends.org 2004 ####  
  6. */    
  7.  
  8. print "\r\n  ########################################################################\n
  9.   # ApacheFriends XAMPP setup win32 Version 1.4                          #\r\n
  10.   #----------------------------------------------------------------------#\r\n
  11.   # Copyright (c) 2002-2004 Apachefriends                                #\r\n
  12.   #----------------------------------------------------------------------#\r\n
  13.   # Authors: Kay Vogelgesang <kvo@apachefriends.org>                     #\r\n
  14.   #          Oswald Kai Seidler <oswald@apachefriends.org>               #\r\n
  15.   ########################################################################\r\n\r\n"; 
  16.  
  17. /// Where I stand? ///
  18. $curdir = getcwd();
  19. list ($partition, $nonpartition) = split (':', $curdir);
  20. list ($partwampp, $directorwampp) = spliti ('\\\install', $curdir);
  21. $awkpart = eregi_replace ("\\\\","\\\\",$partwampp);
  22. $awkpartslash = ereg_replace ("\\\\","/",$partwampp);
  23. $phpdir = $partwampp;
  24. $dir = ereg_replace ("\\\\","/",$partwampp);
  25. $ppartition="$partition:";
  26.  
  27. /// I need the install.sys + update.sys for more xampp informations
  28. $installsys="install.sys";
  29. $installsysroot=$partwampp."\install\\".$installsys;
  30.  
  31. /// Some addon|update.sys files 
  32. $perlupdatesys="perlupdate.sys";
  33. $pythonupdatesys="pythonupdate.sys";
  34. $serverupdatesys="serverupdate.sys";
  35. $utilsupdatesys="utilsupdate.sys";
  36. $javaupdatesys="javaupdate.sys";
  37. $otherupdatesys="otherupdate.sys";
  38.  
  39.  
  40. /// XAMPP main directrory is ... 
  41. $substit="\\\\\\\\xampp";
  42. $substitslash="/xampp";
  43.  
  44. /// Globale variables
  45. global $BS; 
  46. $BS = 0;
  47. global $CS; 
  48. $CS = 0;
  49. global $slashi;
  50. $slashi=1;
  51. global $bslashi;
  52. $bslashi=1;
  53. $awkexe=".\install\awk.exe";
  54. $awk=".\install\config.awk";
  55. // $awkexe="$partwampp\install\awk.exe";
  56. // $awk="$partwampp\install\config.awk";
  57. $awknewdir="\"".$awkpart."\"";
  58. $awkslashdir="\"".$awkpartslash."\"";
  59. global $xamppversion;
  60. if (file_exists("$partwampp\install\.version")) 
  61. { include_once("$partwampp\install\.version"); }
  62. $confhttpdroot=$partwampp."\apache\\conf\\httpd.conf";
  63.  
  64.  
  65. // Find the install status for xampp basic package in the install.sys file
  66. if (file_exists($installsysroot)) 
  67. {
  68. $i=0;
  69. $datei = fopen($installsysroot,'r');
  70. while(!feof($datei)) 
  71.     {
  72. $zeile = fgets($datei,255);
  73. $sysroot[]=$zeile; 
  74. $i+=1; 
  75.     }
  76. fclose($datei);
  77. list ($left, $right) = split (' = ', $sysroot[0]);
  78. // $right = eregi_replace (" ","",$right);
  79. $right = eregi_replace ("\r\n","",$right);
  80. if (strtolower($partwampp)==strtolower($right))
  81.     {
  82.     $xamppinstaller="nothingtodo";
  83.     }
  84. else
  85.     { 
  86.     $xamppinstaller="newpath";
  87.     $substit = eregi_replace ("\\\\","\\\\\\\\",$right);
  88.     $substitslash = eregi_replace("\\\\","/",$right);
  89.     }
  90. }
  91. else
  92. { 
  93.     $installsys = fopen($installsysroot,'w');
  94.     $wamppinfo = "DIR = $partwampp\r\nxampp = $xamppversion\r\nserver = 0\r\nperl = 0\r\npython = 0\r\nutils = 0\r\njava = 0\r\nother = 0"; 
  95.     fputs($installsys,$wamppinfo); 
  96.     fclose($installsys);
  97.     $xamppinstaller="newinstall"; 
  98. }
  99.  
  100.  
  101. /// Find some *update.sys files and modify the install.sys ...
  102.  
  103. $path=$partwampp."\install\\";
  104. $hdl=opendir($path);
  105. while ($res = readdir ($hdl)) { $array[]=$res; } //Searching all xampp sys files
  106. closedir($hdl); 
  107. $werte=count($array);
  108. for ($q=2; $q<$werte; $q++)
  109. {
  110. if ($array[$q]==$perlupdatesys || $array[$q]==$pythonupdatesys || $array[$q]==$serverupdatesys || $array[$q]==$utilsupdatesys || $array[$q]==$javaupdatesys || $array[$q]==$otherupdatesys)
  111.     {
  112.  
  113. $updatesysroot=$partwampp."\install\\".$array[$q];
  114.  
  115. if (file_exists($updatesysroot)) 
  116. {
  117.     $datei = fopen($updatesysroot,'r');
  118.     unset($updatezeile);
  119.     
  120.     $i=0;
  121.     while(!feof($datei)) 
  122.     {
  123.  
  124.     $zeile = fgets($datei,255);
  125.     $updatezeile[]=$zeile;
  126.     list ($left, $right) = split ('=', $updatezeile[0]);
  127.     // $right = eregi_replace (" ","",$right);
  128.     $left = eregi_replace (" ","",$left);
  129.     $left = eregi_replace ("\r\n","",$left);
  130.     $right = eregi_replace ("\r\n","",$right);        
  131.     $update=$left;
  132.     $update=strtolower($update); 
  133.     $updateversion=$right;
  134.     $updateversionzahl = eregi_replace ("\.","",$updateversion);
  135.     $updateinc="xampp".$update.".inc";
  136.     $updateconf=$update.".conf";
  137.     echo "  Configure for $update $updateversion\r\n";
  138.     $i++;
  139.     }
  140.     fclose($datei);    
  141.  
  142.     if (file_exists($installsysroot)) 
  143.     {
  144.     $datei = fopen($installsysroot,'r');
  145.     unset($newzeile);
  146.     $i=0;
  147.     while(!feof($datei)) 
  148.     {
  149.     $zeile = fgets($datei,255);
  150.     $newzeile[]=$zeile; 
  151.     $i++; 
  152.     }
  153.     fclose($datei);
  154.  
  155.         /// Analyze install.sys to *update.syse for todo     
  156.         $datei = fopen($installsysroot,'w'); 
  157.         if($datei) 
  158.             { 
  159.                 for($z=0;$z<$i+1;$z++) 
  160.                 { 
  161.                     if (eregi($update,$newzeile[$z]))
  162.                     {
  163.                         list ($left, $right) = split ('=', $newzeile[$z]);
  164.                         // $right = eregi_replace (" ","",$right);
  165.                         $left = eregi_replace (" ","",$left);
  166.                         $left = eregi_replace ("\r\n","",$left);
  167.                         $right = eregi_replace ("\r\n","",$right);
  168.                         $currentversionzahl = eregi_replace ("\.","",$right);
  169.                         if ($currentversionzahl == 0 )
  170.                         {
  171.                             $updatemake="makenew"; // New installation
  172.                             $putnew="$update = $updateversion\r\n";
  173.                             fputs($datei, $putnew);
  174.                         }
  175.                         elseif ($currentversionzahl < $updateversionzahl)
  176.                         {
  177.                             $updatemake="update";  // Update installation
  178.                             $putnew="perl = $updateversion\r\n";
  179.                             fputs($datei, $putnew);
  180.                         }
  181.                         else
  182.                         {
  183.                             $updatemake="doppelt"; // Installation is current
  184.                             fputs($datei,$newzeile[$z]); 
  185.                         }
  186.  
  187.                     }
  188.                     else 
  189.                     { 
  190.                     fputs($datei,$newzeile[$z]); 
  191.                     }
  192.                 }
  193.             }
  194.     fclose($datei);
  195.     
  196.     if ($updatemake=="makenew" || $updatemake=="doppelt")
  197.     { 
  198.         include_once("$partwampp\install\\$updateinc"); 
  199.     }
  200.  
  201.     
  202.     }
  203. // httpd.conf modification for Perl, Python or Java (only single)
  204. if ($update=="perl")
  205.     {
  206.     $includehttpdconf="\r\n\r\nInclude conf/perl.conf";
  207.     }
  208.     if ($update=="python")
  209.     {
  210.     $includehttpdconf="\r\n\r\nInclude conf/python.conf";
  211.     }
  212.     if ($update=="java")
  213.     {
  214.     $includehttpdconf="\r\n\r\nInclude conf/java.conf";
  215.     }
  216.     
  217. if (($update=="perl" || $update=="python" || $update=="java") && $updatemake=="makenew")
  218.     {
  219.     $datei = fopen($confhttpdroot,'a'); 
  220.     if($datei) 
  221.             { 
  222.             fputs($datei, $includehttpdconf);
  223.             }
  224.     fclose($datei);
  225.     }
  226.  
  227.  
  228. unlink ($updatesysroot);
  229. }
  230. } 
  231. }
  232.  
  233.  
  234.  
  235.  
  236. if ($xamppinstaller=="newinstall" || $xamppinstaller=="newpath")
  237. {
  238. if ($xamppinstaller=="newinstall")
  239.     {
  240.     /// First initialization only main packages 
  241.     if (file_exists("$partwampp\install\\xamppbasic.inc")) 
  242.         { include_once("$partwampp\install\\xamppbasic.inc"); }
  243.  
  244.     }
  245.     
  246.     else
  247.     {
  248. /// Find all the packages 
  249. if (file_exists("$partwampp\install\\xamppbasic.inc")) 
  250. { include_once("$partwampp\install\\xamppbasic.inc"); }
  251. if (file_exists("$partwampp\install\\xamppserver.inc")) 
  252. { include_once("$partwampp\install\\xamppserver.inc"); }
  253. if (file_exists("$partwampp\install\\xamppperl.inc")) 
  254. { include_once("$partwampp\install\\xamppperl.inc"); }
  255. if (file_exists("$partwampp\install\\xampppython.inc")) 
  256. { include_once("$partwampp\install\\xampppython.inc"); }
  257. if (file_exists("$partwampp\install\\xampputils.inc")) 
  258. { include_once("$partwampp\install\\xampputils.inc"); }
  259. if (file_exists("$partwampp\install\\xamppjava.inc")) 
  260. { include_once("$partwampp\install\\xamppjava.inc"); }
  261. if (file_exists("$partwampp\install\\xamppother.inc")) 
  262. { include_once("$partwampp\install\\xamppother.inc"); }
  263. $updatemake="nothingtodo";
  264.     }
  265. }
  266.  
  267. $scount=count($slash);
  268. $bcount=count($backslash);
  269.  
  270. /////////////////// xampp path is changing ///////////////////
  271. if ($xamppinstaller=="newpath")
  272. {
  273. set_time_limit(0);
  274. define('STDIN',fopen("php://stdin","r"));
  275.     while($BS == "0")
  276.     {
  277.     echo "\n  Do you want to refresh the XAMPP installation?\n";
  278.     echo "  Soll die XAMPP Installation jetzt aktualisiert werden?\n\n";
  279.     echo "  1) Refresh now! (Jetzt aktualisieren!)\n";
  280.     echo "  x) Exit (Beenden)\n";
  281.  
  282.         switch(trim(fgets(STDIN,256)))
  283.         {
  284.         case 1:
  285.         $BS = 1;
  286.         echo "\r\n  XAMPP is refreshing now ...\r\n";
  287.         echo "  XAMPP wird nun aktualisiert ...\r\n\r\n";
  288.         sleep(1);
  289.         break;
  290.  
  291.         case "x":
  292.         echo "\r\n  The refresh is terminating on demand ...  exit\r\n";
  293.         echo "  Die Aktualisierung wurde auf Wunsch abgebrochen ...\r\n";
  294.         sleep(3);
  295.         exit();
  296.  
  297.         default: 
  298.         exit();
  299.         }
  300.     }
  301. fclose(STDIN);
  302. }
  303.  
  304. /////////////////// You can configure the addon modules for httpd ///////////////////
  305. if (file_exists($installsysroot)) 
  306.     {
  307.     $datei = fopen($installsysroot,'r');
  308.     unset($newzeile);
  309.     $i=0;
  310.         while(!feof($datei)) 
  311.         {
  312.         $zeile = fgets($datei,255);
  313.         list ($left, $right) = split ('=', $zeile);
  314.         // $right = eregi_replace (" ","",$right);
  315.         $left = eregi_replace (" ","",$left);
  316.         $left = eregi_replace ("\r\n","",$left);
  317.         $right = eregi_replace ("\r\n","",$right);
  318.         $right = eregi_replace ("\.","",$right);
  319.         if (strtolower($right) > 0)
  320.             {
  321.             if (strtolower($left)=="perl")
  322.                 {
  323.                 $perlactive="yes";
  324.                 
  325.                 }
  326.                 if (strtolower($left)=="python")
  327.                 {
  328.                 $pythonactive="yes";
  329.                 }
  330.                 if (strtolower($left)=="java")
  331.                 {
  332.                 $javaactive="yes";
  333.                 }
  334.             } 
  335.         }
  336. fclose($datei);
  337.     }
  338.  
  339.  
  340.  
  341.  
  342. /////////////////// Case new install ///////////////////
  343. if ($xamppinstaller=="newinstall" || $BS==1 || $updatemake=="makenew" || $updatemake=="doppelt")
  344. {
  345.  
  346. if ($BS=="1")
  347. { echo "  Refreshing all paths in config files ... \r\n\r\n";  }
  348.  
  349. echo "  Configure XAMPP with awk for ";
  350. $system = system ("echo '%os%'");
  351. if ($system!="'Windows_NT'")
  352. {$system = "Windows"; echo "  $system 98/ME/HOME (not NT)";} 
  353. echo "  Please wait ...";
  354. if ($xamppinstaller=="newinstall")
  355. {
  356. if ($system=="Windows")
  357. {
  358.     $confhttpdroot=$partwampp."\apache\\conf\\httpd.conf";
  359.     $includewin="Win32DisableAcceptEx ON\r\n";
  360.     echo "\r\n  Disable AcceptEx Winsocks v2 support (only NT)";
  361.     $datei = fopen($confhttpdroot,'r');
  362.     unset($newzeile);
  363.     $i=0;
  364.     while(!feof($datei)) 
  365.     {
  366.     $zeile = fgets($datei,255);
  367.     $newzeile[]=$zeile; 
  368.     $i++; 
  369.     }
  370.     fclose($datei);
  371.      $datei = fopen($confhttpdroot,'w'); 
  372.         if($datei) 
  373.             { 
  374.                 for($z=0;$z<$i+1;$z++) 
  375.                 { 
  376.                     if (eregi("Win32DisableAcceptEx",$newzeile[$z]))
  377.                     {
  378.                         fputs($datei, $includewin);
  379.                     }
  380.                     else 
  381.                     { 
  382.                     fputs($datei,$newzeile[$z]); 
  383.                     }
  384.                 }
  385.             }
  386.     fclose($datei);
  387.  
  388.     $confhttpdroot=$partwampp."\php\\php4\\httpd4.conf";
  389.     if (file_exists($confhttpdroot))
  390.     {
  391.     $includewin="Win32DisableAcceptEx ON\r\n";
  392.     $datei = fopen($confhttpdroot,'r');
  393.     unset($newzeile);
  394.     $i=0;
  395.     while(!feof($datei)) 
  396.     {
  397.     $zeile = fgets($datei,255);
  398.     $newzeile[]=$zeile; 
  399.     $i++; 
  400.     }
  401.     fclose($datei);
  402.      $datei = fopen($confhttpdroot,'w'); 
  403.         if($datei) 
  404.             { 
  405.                 for($z=0;$z<$i+1;$z++) 
  406.                 { 
  407.                     if (eregi("Win32DisableAcceptEx",$newzeile[$z]))
  408.                     {
  409.                         fputs($datei, $includewin);
  410.                     }
  411.                     else 
  412.                     { 
  413.                     fputs($datei,$newzeile[$z]); 
  414.                     }
  415.                 }
  416.             }
  417.     fclose($datei);
  418.     }
  419.     $confhttpdroot=$partwampp."\php\\httpd5.conf";
  420.     if (file_exists($confhttpdroot))
  421.     {
  422.     $includewin="Win32DisableAcceptEx ON\r\n";
  423.     $datei = fopen($confhttpdroot,'r');
  424.     unset($newzeile);
  425.     $i=0;
  426.     while(!feof($datei)) 
  427.     {
  428.     $zeile = fgets($datei,255);
  429.     $newzeile[]=$zeile; 
  430.     $i++; 
  431.     }
  432.     fclose($datei);
  433.      $datei = fopen($confhttpdroot,'w'); 
  434.         if($datei) 
  435.             { 
  436.                 for($z=0;$z<$i+1;$z++) 
  437.                 { 
  438.                     if (eregi("Win32DisableAcceptEx",$newzeile[$z]))
  439.                     {
  440.                         fputs($datei, $includewin);
  441.                     }
  442.                     else 
  443.                     { 
  444.                     fputs($datei,$newzeile[$z]); 
  445.                     }
  446.                 }
  447.             }
  448.     fclose($datei);
  449.     }
  450. }
  451. else
  452. {
  453.     $confhttpdroot=$partwampp."\apache\\conf\\httpd.conf";
  454.     $includewin="# Win32DisableAcceptEx ON\r\n";
  455.     echo "\r\n  Enable AcceptEx Winsocks v2 support for NT systems";
  456.     $datei = fopen($confhttpdroot,'r');
  457.     $i=0;
  458.     unset($newzeile);
  459.     while(!feof($datei)) 
  460.     {
  461.     $zeile = fgets($datei,255);
  462.     $newzeile[]=$zeile; 
  463.     $i++; 
  464.     }
  465.     fclose($datei);
  466.      $datei = fopen($confhttpdroot,'w'); 
  467.         if($datei) 
  468.             { 
  469.                 for($z=0;$z<$i+1;$z++) 
  470.                 { 
  471.                     if (eregi("Win32DisableAcceptEx",$newzeile[$z]))
  472.                     {
  473.                         fputs($datei, $includewin);
  474.                     }
  475.                     else 
  476.                     { 
  477.                     fputs($datei,$newzeile[$z]); 
  478.                     }
  479.                 }
  480.             }
  481.     fclose($datei);
  482.  
  483.     $confhttpdroot=$partwampp."\php\\php4\\httpd4.conf";
  484.     if (file_exists($confhttpdroot))
  485.     {
  486.     $includewin="# Win32DisableAcceptEx ON\r\n";
  487.     $datei = fopen($confhttpdroot,'r');
  488.     $i=0;
  489.     unset($newzeile);
  490.     while(!feof($datei)) 
  491.     {
  492.     $zeile = fgets($datei,255);
  493.     $newzeile[]=$zeile; 
  494.     $i++; 
  495.     }
  496.     fclose($datei);
  497.      $datei = fopen($confhttpdroot,'w'); 
  498.         if($datei) 
  499.             { 
  500.                 for($z=0;$z<$i+1;$z++) 
  501.                 { 
  502.                     if (eregi("Win32DisableAcceptEx",$newzeile[$z]))
  503.                     {
  504.                         fputs($datei, $includewin);
  505.                     }
  506.                     else 
  507.                     { 
  508.                     fputs($datei,$newzeile[$z]); 
  509.                     }
  510.                 }
  511.             }
  512.     fclose($datei);
  513.     }
  514.     $confhttpdroot=$partwampp."\php\\httpd5.conf";
  515.     if (file_exists($confhttpdroot))
  516.     {
  517.     $includewin="# Win32DisableAcceptEx ON\r\n";
  518.     $datei = fopen($confhttpdroot,'r');
  519.     $i=0;
  520.     unset($newzeile);
  521.     while(!feof($datei)) 
  522.     {
  523.     $zeile = fgets($datei,255);
  524.     $newzeile[]=$zeile; 
  525.     $i++; 
  526.     }
  527.     fclose($datei);
  528.      $datei = fopen($confhttpdroot,'w'); 
  529.         if($datei) 
  530.             { 
  531.                 for($z=0;$z<$i+1;$z++) 
  532.                 { 
  533.                     if (eregi("Win32DisableAcceptEx",$newzeile[$z]))
  534.                     {
  535.                         fputs($datei, $includewin);
  536.                     }
  537.                     else 
  538.                     { 
  539.                     fputs($datei,$newzeile[$z]); 
  540.                     }
  541.                 }
  542.             }
  543.     fclose($datei);
  544.     }
  545. }
  546. }
  547. $substit="\"".$substit."\"";
  548. for ($i=1;$i<=$bcount;$i++)
  549. {
  550.  
  551.  
  552.  
  553.  
  554. $temp=$backslash[$i];
  555. $awkconfig=$backslashrootawk[$temp].$backslash[$i]."\"";
  556. $awkconfigtemp=$backslashrootawk[$temp].$backslash[$i]."temp\"";
  557. $configreal=$backslashrootreal[$temp].$backslash[$i];
  558. $configtemp=$backslashrootreal[$temp].$backslash[$i]."temp";
  559.  
  560.  
  561. ///////////// Section SET  NEW configfiles for addons/update OR DELETE /////////////
  562. $configrealnew=$backslashrootreal[$temp].$backslash[$i].".new";
  563. if (!file_exists($configreal) && file_exists($configrealnew))
  564.     { 
  565.             
  566.             if (!@copy($configrealnew, $configreal)) 
  567.                 {}            
  568.             else { unlink ($configrealnew); }
  569.         
  570.     }
  571.     elseif (file_exists($configrealnew))
  572.     { unlink ($configrealnew); }
  573.  
  574. if ($updatemake=="doppelt")
  575.     { break; }
  576.  
  577.  
  578. $awkrealm=$awkexe." -v DIR=".$awknewdir." -v CONFIG=".$awkconfig. " -v CONFIGNEW=".$awkconfigtemp. "  -v SUBSTIT=".$substit." -f ".$awk;  
  579.  
  580.  
  581.  
  582. if (file_exists($awk) && file_exists($awkexe) && file_exists($configreal)) 
  583. {        
  584.     shell_exec("$awkrealm");
  585. } 
  586.  
  587.     if (file_exists($configtemp) && file_exists($configreal))
  588.     {
  589.     if (!@copy($configtemp, $configreal)) 
  590.         {
  591.         // echo "\r\n\r\n$configtemp could not be copied to $configreal";
  592.         }
  593.         else { unlink ($configtemp); }
  594.     } 
  595. }
  596.  
  597.  
  598. $substitslash="\"".$substitslash."\"";
  599. for ($i=1;$i<=$scount;$i++)
  600. {
  601. $temp=$slash[$i];
  602. $awkconfig=$slashrootawk[$temp].$slash[$i]."\"";
  603. $awkconfigtemp=$slashrootawk[$temp].$slash[$i]."temp\"";
  604. $configreal=$slashrootreal[$temp].$slash[$i];
  605. $configtemp=$slashrootreal[$temp].$slash[$i]."temp";
  606.  
  607. ///////////// Section SET  NEW configfiles for addons/update OR DELETE /////////////
  608. $configrealnew=$slashrootreal[$temp].$slash[$i].".new";
  609. if (!file_exists($configreal) && file_exists($configrealnew))
  610.     { 
  611.             
  612.             if (!@copy($configrealnew, $configreal)) 
  613.                 {}            
  614.             else { unlink ($configrealnew); }
  615.         
  616.     }
  617.     elseif (file_exists($configrealnew))
  618.     { unlink ($configrealnew); }
  619.  
  620.     if ($updatemake=="doppelt")
  621.     { break; }
  622.  
  623. $awkrealm=$awkexe." -v DIR=".$awkslashdir." -v CONFIG=".$awkconfig. " -v CONFIGNEW=".$awkconfigtemp. "  -v SUBSTIT=".$substitslash." -f ".$awk;  
  624.  
  625.  
  626. if (file_exists($awk) && file_exists($awkexe) && file_exists($configreal)) 
  627. {
  628.     shell_exec("$awkrealm");
  629. } 
  630.  
  631.     if (file_exists($configtemp) && file_exists($configreal))
  632.     {
  633.     if (!@copy($configtemp, $configreal)) 
  634.         {
  635.         // echo "\r\n\r\n$configtemp could not be copied to $configreal";
  636.         }
  637.         else { unlink ($configtemp); }
  638.     } 
  639. }
  640.  
  641.  
  642.     
  643.     if ($xamppinstaller=="newpath" || $BS==1)
  644.     {
  645.         if (file_exists($installsysroot)) 
  646.         {
  647.         $datei = fopen($installsysroot,'r');
  648.         unset($newzeile);
  649.         $i=0;
  650.         while(!feof($datei)) 
  651.         {
  652.         $zeile = fgets($datei,255);
  653.         $newzeile[]=$zeile; 
  654.         $i++; 
  655.         }
  656.         fclose($datei);
  657.         }
  658.         
  659.         $datei = fopen($installsysroot,'w'); 
  660.         if($datei) 
  661.             { 
  662.                 for($z=0;$z<$i+1;$z++) 
  663.                 { 
  664.                     if (eregi("DIR",$newzeile[$z]))
  665.                     {
  666.                         $includenewdir="DIR = $partwampp\r\n";
  667.                         fputs($datei, $includenewdir);
  668.                     }
  669.                     else 
  670.                     { 
  671.                     $includenewdir=$newzeile[$z];
  672.                     fputs($datei, $includenewdir); 
  673.                     }
  674.                 }
  675.             }
  676.             fclose($datei);
  677.     }
  678.  
  679. ////////// Replace (copy) some newer files ////////////////
  680.     $phpbin=$partwampp."\apache\bin\php.ini";
  681.     $phpcgi=$partwampp."\php\php.ini";
  682.     $workersbin=$partwampp."\\tomcat\\conf\workers.properties";
  683.     $workersjk=$partwampp."\\tomcat\\conf\jk\workers.properties";
  684.         if (file_exists($phpbin)) 
  685.         {
  686.         copy($phpbin,$phpcgi);
  687.         }
  688.         if (file_exists($workersbin)) 
  689.         {
  690.         copy($workersbin,$workersjk);
  691.         }
  692.  
  693.     echo "  DONE!\r\n\r\n";
  694. echo "\r\n  ##### Have fun with ApacheFriends XAMPP! #####\r\n\r\n\r\n";
  695. sleep(3);
  696. exit();
  697. }
  698.  
  699.  
  700.  
  701. //////////////// Selection for modules  ////////////////
  702. if (($perlactive=="yes" || $pythonactive=="yes" || $javaactive=="yes") && $update=="")
  703. {
  704. $u=1;
  705.  
  706. if ($perlactive=="yes")
  707.     {
  708.     $moduleconf="conf/perl.conf";
  709.     $moduleconfigure="MOD_PERL";
  710.     $u++;
  711.     }
  712. if ($pythonactive=="yes")
  713.     {
  714.     $moduleconf="conf/pyton.conf";
  715.     $moduleconfigure="MOD_PYTHON";
  716.     $u++;
  717.     }
  718. if ($javaactive=="yes")
  719.     {
  720.     $moduleconf="conf/java.conf";
  721.     $moduleconfigure="MOD_JDK";
  722.     $u++;
  723.     }
  724.  
  725. set_time_limit(0);
  726. define('NEWSTDIN',fopen("php://stdin","r"));
  727. while($CS == "0")
  728. {
  729. echo "\n  Please select your choice!\n";
  730. echo "  Bitte jetzt auswaehlen!\n\n";
  731. if ($perlactive=="yes")
  732.     {
  733.     echo "  1) Configuration with MOD_PERL (mit MOD_PERL)\n";
  734.     echo "  2) Configuration without MOD_PERL (ohne MOD MOD_PERL)\n";
  735.     }
  736.     if ($pythonactive=="yes")
  737.     {
  738.     echo "  3) Configuration with MOD_PYTHON (mit MOD_PYTHON)\n";
  739.     echo "  4) Configuration without MOD_PYTHON (ohne MOD_PYTHON)\n";
  740.     }
  741.     if ($javaactive=="yes")
  742.     {
  743.     echo "  5) Configuration with MOD_JDK (mit MOD_JDK)\n";
  744.     echo "  6) Configuration without MOD_JDK (ohne MOD_JDK)\n";
  745.     }
  746.     echo "  x) Exit (Beenden)\n";
  747.  
  748. switch(trim(fgets(NEWSTDIN,256)))
  749. {
  750. case 1:
  751. $CS = 1;
  752. echo "\r\n  Starting configure XAMPP with MOD_PERL ...\r\n";
  753. sleep(1);
  754. break;
  755.  
  756. case 2:
  757. $CS = 2;
  758. echo "\r\n  Starting configure XAMPP without MOD_PERL ...\r\n";
  759. sleep(1);
  760. break;
  761.  
  762. case 3:
  763. $CS = 3;
  764. echo "\r\n  Starting configure XAMPP with MOD_PYTHON ...\r\n";
  765. sleep(1);
  766. break;
  767.  
  768. case 4:
  769. $CS = 4;
  770. echo "\r\n  Starting configure XAMPP without MOD_PYTHON ...\r\n";
  771. sleep(1);
  772. break;
  773.  
  774. case 5:
  775. $CS = 5;
  776. echo "\r\n  Starting configure XAMPP with MOD_JDK ...\r\n";
  777. sleep(1);
  778. break;
  779.  
  780. case 6:
  781. $CS = 6;
  782. echo "\r\n  Starting configure XAMPP without MOD_JDK ...\r\n";
  783. sleep(1);
  784. break;
  785.  
  786. case "x":
  787. echo "\r\n  Setup is terminating on demand ...  exit\r\n";
  788. echo "  Das Setup wurde auf Wunsch abgebrochen ...\r\n";
  789. sleep(3);
  790. exit();
  791.  
  792. default: 
  793. exit();
  794. }
  795. }
  796. fclose(NEWSTDIN);
  797.  
  798. if ($CS == 1)
  799.     { $include = "Include conf/perl.conf"; $searchstring="conf/perl.conf";}
  800. if ($CS == 2)
  801.     { $include = "# Include conf/perl.conf"; $searchstring="conf/perl.conf";}
  802. if ($CS == 3)
  803.     { $include = "Include conf/python.conf"; $searchstring="conf/python.conf"; }
  804. if ($CS == 4)
  805.     { $include = "# Include conf/python.conf"; $searchstring="conf/python.conf";}
  806. if ($CS == 5)
  807.     { $include = "Include conf/java.conf"; $searchstring="conf/java.conf";}
  808. if ($CS == 6)
  809.     { $include = "# Include conf/java.conf"; $searchstring="conf/java.conf";}
  810.  
  811.  
  812.  
  813.  
  814. if ($CS > 0)
  815. {    
  816.     $i=0;    
  817.     $datei = fopen($confhttpdroot,'r');
  818.     while(!feof($datei)) 
  819.     {
  820.     $zeile = fgets($datei,255);
  821.     $newzeile[]=$zeile; 
  822.     $i++; 
  823.     }
  824.     fclose($datei);
  825.      $datei = fopen($confhttpdroot,'w'); 
  826.         if($datei) 
  827.             { 
  828.                 for($z=0;$z<$i+1;$z++) 
  829.                 { 
  830.                     if (eregi($searchstring,$newzeile[$z]))
  831.                     {
  832.                         fputs($datei, $include);
  833.                     }
  834.                     else 
  835.                     { 
  836.                     fputs($datei,$newzeile[$z]); 
  837.                     }
  838.                 }
  839.             }
  840.     fclose($datei);
  841.     echo "  Done!\r\n\r\n";    
  842. }
  843. }
  844.  
  845. if ($updatemake=="")
  846.         {  $updatemake="nothingtodo"; }
  847.  
  848. if ($updatemake=="nothingtodo" && $xamppinstaller=="nothingtodo" && ($CS < 1 || $CS == ""))
  849. { echo "\r\n\r\n Sorry, but ... nothing to do!\r\n\r\n\r\n";  }
  850.  
  851.  
  852. exit();
  853. ?>
  854.