env.php

<?php
$line_clicked=-1;
$one_name_state="";
function count_names_in_entries($name) {
	$count=0;
	
	global $targetdir;
	global $one_name_state;
	$state="";
    $file = $targetdir.'/entries.html'; 
    $fh = fopen($file, 'r') or die('Could not open file: '.$file); 
    while (!feof($fh)) { 
       $buffer = fgets($fh); 
   
       if (strpos($buffer, "<label>".$name."</label>") !== false) {
		$count++;
		if($count==1)
				$one_name_state="enabled";
       }  
       if (strpos($buffer, "<label>".$name.".") !== false) {
		$count++;
		if($count==1)
				$one_name_state="disabled";
       }  
    } 
    fclose($fh); 
	return $count;
}
///////////////////////////////////////////////////////////////////////////////
function enable_name_in_entries($name, $num, $except_line) {
	global $targetdir;
	global $line_clicked;
    $file = $targetdir.'/entries.html'; 
    $fh = fopen($file, 'r') or die('Could not open file: '.$file); 
    $i = 0; 
	$done = false;
    $content="";
//echo "call "; 
    while (!feof($fh)) { 
       $buffer = fgets($fh); 
   
       if ((strpos($buffer, "<label>".$name.".".$num."</label>") !== false) && (!$done) && ($i != $except_line)){
//echo "en num=".$num." i=".$i." ";
		$buffer=str_replace("enaction=1&num=".$num,"disaction=1",$buffer);
		$buffer=str_replace("delaction=1&num=".$num,"delaction=1",$buffer);
		$buffer=str_replace("off.png","on.png",$buffer);
		// change the name by removing .0
		$buffer=str_replace(".".$num."</label>","</label>",$buffer);
		$buffer=str_replace("/".$name.".sh.bat.".$num,"/".$name.".sh.bat", $buffer);
        $content.=$buffer;
		$done=true;; // enable only one
		$line_clicked=$i;
       }  else {
         //echo $buffer."<br/>\n";
        $content.=$buffer;
      }   
      $i++;   
    } 
    fclose($fh); 
    file_put_contents($file, $content);  // entries.html
}
//////////////////////////////////////////////////////////////////////////////
function disable_name_in_entries($name, $except_line, $num) {
	global $targetdir;
	global $line_clicked;
    $file = $targetdir.'/entries.html'; 
    $fh = fopen($file, 'r') or die('Could not open file: '.$file); 
    $i = 0; 
	$done = false;
    $content="";
    while (!feof($fh)) { 
       $buffer = fgets($fh); 
   $nunum=0;
   $nunum=$num;
       if ((strpos($buffer, "<label>".$name."</label>") !== false) && (!$done) && ($i != $except_line)){
//echo "dis i=".$i." ";
		$buffer=str_replace("disaction=1","enaction=1&num=".($nunum),$buffer);
		$buffer=str_replace("delaction=1","delaction=1&num=".($nunum),$buffer);
		$buffer=str_replace("on.png","off.png",$buffer);
		// change the name by adding .0
//echo "xnum=".$num." \n";
		$buffer=str_replace("<label>".$name."</label>","<label>".$name.".".($nunum)."</label>",$buffer);
		$buffer=str_replace("/".$name.".sh.bat\"","/".$name.".sh.bat.".($nunum)."\"",$buffer);
        $content.=$buffer;
		$done=true; // disable only one
		$line_clicked=$i;
       }  else {
         //echo $buffer."<br/>\n";
        $content.=$buffer;
      }   
      $i++;   
    } 
    fclose($fh); 
    file_put_contents($file, $content);  // entries.html
}
////////////////////////////////////////////////////////////////////////////////

$targetdir="";
  if (isset($_GET['targetdir'])) {
	  $targetdir=$_GET['targetdir'];
	  $targetdir = str_replace('\\', '/', $targetdir);
  } else {
    #echo $_SERVER['HTTP_REFERER']."<br/>";
    $strdir1=substr(getcwd(),0,-7);
    $strdir1=str_replace("\\","/",$strdir1);
    #echo $strdir1."<br/>";
    $strdir2=$_SERVER['HTTP_REFERER'];
    $pos=strpos($strdir2,"/doc/files");
    $strdir2=substr($strdir2,$pos+10,-30);
    #echo $strdir2."<br/>";
    $targetdir=$strdir1.$strdir2;
  }
  
// faire comme une macro definition pour l'html
echo "<!--#set var=\"targetdir\" value=".$targetdir." -->\n";
$targetdir_macro='<!--#echo var=\'targetdir\' -->';
$num=0;
  if (isset($_GET['num'])) {
	$num=$_GET['num'];
  }
  
  //file_put_contents("debug.txt","targetdir ".$targetdir."\n", FILE_APPEND);
  //file_put_contents("debug.txt","targetdir ".$targetdir."\n", FILE_APPEND);
  //exit(0);
/////////////////////////////////////////////////////////////////////////////////////////
  if (isset($_POST['submit'])) {
    if(isset($_POST['envVar']) && !empty($_POST['envVar'])) {
    
	  if(!is_file($targetdir.'/entries.html')){
	    file_put_contents($targetdir.'/entries.html', "");
	  }	  
	  $envVar = $_POST['envVar'];
	  $cnt=count_names_in_entries($envVar);
	  if(($cnt==0) || ( ($cnt==1) && ($one_name_state=="disabled")   )) {
			$txt = "<a href=\"".$_SERVER["PHP_SELF"]."?targetdir=".$targetdir."&disaction=1&name=".$envVar."\"><img src=\"images/on.png\"></a>&nbsp;<a href=\"".$_SERVER["PHP_SELF"]."?targetdir=".$targetdir."&delaction=1&name=".$envVar."\"><img src=\"images/delete.png\"></a>&nbsp;<label>".$envVar."</label>  <span id=\"".$targetdir.'/'.$envVar.".sh.bat"."\" class=\"editText\"></span><hr/>";
//file_put_contents("debug.txt",$_POST['syntax']."\n", FILE_APPEND);
			if($_POST['syntax']=="export")
			  file_put_contents($targetdir.'/'.$envVar.'.sh.bat', "export ".$envVar."=new" , LOCK_EX);  // was set
			if($_POST['syntax']=="setenv")
			  file_put_contents($targetdir.'/'.$envVar.'.sh.bat', "setenv ".$envVar." new" , LOCK_EX);  // was set
			if($_POST['syntax']=="set")
			  file_put_contents($targetdir.'/'.$envVar.'.sh.bat', "set ".$envVar."=new" , LOCK_EX);  // was set
	  } else {
			$txt = "<a href=\"".$_SERVER["PHP_SELF"]."?targetdir=".$targetdir."&enaction=1&num=".($cnt-1)."&name=".$envVar."\"><img src=\"images/off.png\"></a>&nbsp;<a href=\"".$_SERVER["PHP_SELF"]."?targetdir=".$targetdir."&delaction=1&num=".($cnt-1)."&name=".$envVar."\"><img src=\"images/delete.png\"></a>&nbsp;<label>".$envVar.".".($cnt-1)."</label>  <span id=\"".$targetdir.'/'.$envVar.".sh.bat.".($cnt-1)."\" class=\"editText\"></span><hr/>";
			if($_POST['syntax']=="export")
			  file_put_contents($targetdir.'/'.$envVar.'.sh.bat.'.($cnt-1), "export ".$envVar."=new" , LOCK_EX);  // was set
			if($_POST['syntax']=="setenv")
			  file_put_contents($targetdir.'/'.$envVar.'.sh.bat.'.($cnt-1), "setenv ".$envVar." new" , LOCK_EX);  // was set
			if($_POST['syntax']=="set")
			  file_put_contents($targetdir.'/'.$envVar.'.sh.bat.'.($cnt-1), "set ".$envVar."=new" , LOCK_EX);  // was set
	  }
      file_put_contents($targetdir.'/entries.html', $txt.PHP_EOL , FILE_APPEND | LOCK_EX);
	  
    }
  }///////////////////////////////////////////////////////////////////////////////////////
  else if (isset($_GET['delaction'])) {
	//$num=-1;
	//if (isset($_GET['num'])) {
	//	$num=$_GET['num'];
	//}

    $file = $targetdir.'/entries.html'; 
    $fh = fopen($file, 'r') or die('Could not open file: '.$file); 
    $i = 0; 
    $content="";
    while (!feof($fh)) { 
       $buffer = fgets($fh); 
   
       if (isset($_GET['num'])) {
         if (strpos($buffer, "<label>".$_GET["name"].".".$num."</label>") !== false) {
           //echo "=====<label>".$_GET["name"].".".$num."</label>====\n";
		   // skip
         }  else {
           //echo $buffer."<br/>\n";
           $content.=$buffer;
        }
	   } else {
         if (strpos($buffer, "<label>".$_GET["name"]."</label>") !== false) {
           //echo $buffer." skiped<br/>\n";
         }  else {
           //echo $buffer."<br/>\n";
           $content.=$buffer;
         }
	   }
	  
      $i++;   
    } 
    fclose($fh); 

    file_put_contents($file, $content); // entries.html
	
    if (isset($_GET['num'])) {
      unlink($targetdir.'/'.$_GET["name"].".sh.bat.".$num);
	} else {
      unlink($targetdir.'/'.$_GET["name"].".sh.bat");
	}

  }///////////////////////////////////////////////////////////////////////////////////////
  else if (isset($_GET['disaction'])) {
	// we disable this entry, but we may enable another entry
	$countnames=count_names_in_entries($_GET["name"]);
	$nameexist=false;
	if ($countnames > 1) {
		$nameexist=true;		// we enable the another entry .0
		// saving because it will be overwritten
//echo "num=".$num." \n";
		copy($targetdir.'/'.$_GET["name"].".sh.bat.".$num, $targetdir.'/'.$_GET["name"].".sh.bat.".$num.".nameexist");
		}

	disable_name_in_entries($_GET["name"], -1, $num);

//echo "num=".$num." \n";
	copy($targetdir.'/'.$_GET["name"].".sh.bat", $targetdir.'/'.$_GET["name"].".sh.bat.".$num);
	if($nameexist) {
		copy($targetdir.'/'.$_GET["name"].".sh.bat.".$num.".nameexist",$targetdir.'/'.$_GET["name"].".sh.bat");
	} else {
		unlink($targetdir.'/'.$_GET["name"].".sh.bat");
	}
	// remove temp file
//echo "num=".$num." \n";
	unlink($targetdir.'/'.$_GET["name"].".sh.bat.".$num.".nameexist");

	if($nameexist) {
		enable_name_in_entries($_GET["name"], 0, $line_clicked);
	}
  }///////////////////////////////////////////////////////////////////////////////////////
  else if (isset($_GET['enaction'])) {
	// we enable this entry, but we may disable another entry
	$countnames=count_names_in_entries($_GET["name"]);
	$nameexist=false;
	if ($countnames > 1) {
		$nameexist=true;
		// saving because it will be overwritten
		copy($targetdir.'/'.$_GET["name"].".sh.bat", $targetdir.'/'.$_GET["name"].".sh.bat.nameexist");
		}
  
	//$num=$_GET['num'];
//echo "num=".$num." <br/>\n";
	
	enable_name_in_entries($_GET["name"], $num, -1);

	copy($targetdir.'/'.$_GET["name"].".sh.bat.".$num, $targetdir.'/'.$_GET["name"].".sh.bat");
	if($nameexist) {
		copy($targetdir.'/'.$_GET["name"].".sh.bat.nameexist", $targetdir.'/'.$_GET["name"].".sh.bat.".$num);
	} else {
		unlink($targetdir.'/'.$_GET["name"].".sh.bat.".$num);
	}
	// remove temp file
	unlink($targetdir.'/'.$_GET["name"].".sh.bat.nameexist");
	

	if($nameexist) {
		// here we disable another entry
		disable_name_in_entries($_GET["name"], $line_clicked, $num);
	}
  }//////////////////////////////////////////////////////////////////////////////////////////

  
//echo "debug: pour l'instant limite a 2 entree par nom"."<br/>\n";
//echo "count_test=".count_names_in_entries("test")." line=".$line_clicked."<br/>\n";
//echo "one_name_state=".$one_name_state."<br/>\n";

$pos=strrpos($targetdir, "/");
$prjname=substr($targetdir, $pos+1);
  
?>


<html>
<head>
<title>Manage environment variables for <?php echo $prjname; ?></title>
<script type="text/javascript" src="./instanteditenv.js"></script>
<style type='text/css'>
body{
	font-family: verdana;
	font-size: .9em;

}

input, textarea, pre{
	font-family: verdana;
	font-size: inherit;
	font-family: inherit;
}

label{
	width: 110px;
}


#userName, #userName_field{
	font-size: 14px;
}

.editText {
	font-size: 14px;
	background-color: #333;
	color: #fff;
}


#blogTitle, #blogTitle_field{

	font-size: 24px;


}

#blogText, #blogText_field{

	width: 240px;


}

#lorumText, #lorumText_field{
	width: 500px;

}

</style>
</head>
<body>
<script type="text/javascript">
setVarsForm("pageID=profileEdit&userID=11&sessionID=28ydk3478Hefwedkbj73bdIB8H");
</script>

<form action="" method="post">
New environment variable name: <input type="text" name="envVar" placeholder="Variable name" />&nbsp;
<input type="submit" name="submit" value="Add new" /> 
  <input type="radio" name="syntax" value="export"> export |
  <input type="radio" name="syntax" value="setenv"> setenv |
  <input type="radio" name="syntax" value="set" checked> set  
</form>


<hr />
<?php 
  //echo "env var posted : ".$envVar."<br/>\n";

$strHTML="<html></html>"; // empty page
if(file_exists($targetdir."/entries.html")) {
  $strHTML=file_get_contents($targetdir."/entries.html"); 
}
  //echo $strHTML;
  $doc = new DOMDocument();
  
  // set error level to tolerate malformed HTML
  // to prevent : Warning: DOMDocument::loadHTML(): htmlParseEntityRef: expecting ';' in Entity, line: etc...
$internalErrors = libxml_use_internal_errors(true);

// load HTML
$doc->loadHTML($strHTML);

// Restore error level
libxml_use_internal_errors($internalErrors);
  
  //OK
  $item_num=0;
  $spans = $doc->getElementsByTagName('span');
  $labels = $doc->getElementsByTagName('label');
  foreach ($spans as $span) {
	  $elem_label = $doc->getElementsByTagName('label')->item($item_num);
	  $var_name=$elem_label->nodeValue;
//echo "item ".$item_num."-".$span->nodeValue."-".$var_name."<br/>\n";
	  $elem = $doc->getElementsByTagName('span')->item($item_num);
	  
	  $name_in_var="";
	  $number_in_var=-1;
	  if ($pos=strrpos($var_name, ".")) {  //disabled
		$number_in_var=substr($var_name, $pos+1);
		$name_in_var=substr($var_name, 0, $pos);
		  $var_name= str_replace(".".$number_in_var,"",$var_name);
		  $strVal=file_get_contents($targetdir.'/'.$var_name.".sh.bat.".$number_in_var);
		
	  } else {
		$strVal=file_get_contents($targetdir.'/'.$var_name.".sh.bat"); 
	  }
	//echo "name ".$name_in_var." number ".$number_in_var."<br/>\n";;
    
    if (substr( $strVal, 0, 3 ) === "rem" ) {
        // this is an array of env variables 
/* convention:
set FEDEX_CREDENTIAL=production new[g82zlEEMRoBirLlQ,F4O3UrPD0AEMj0zPr5vsT1yBA,246730121,254453224]

doit etre converti en

rem production new
set FEDEX_CREDENTIAL[0]=g82zlEEMRoBirLlQ
set FEDEX_CREDENTIAL[1]=F4O3UrPD0AEMj0zPr5vsT1yBA
set FEDEX_CREDENTIAL[2]=246730121
set FEDEX_CREDENTIAL[3]=254453224

*/
        $matches=preg_match('/^rem.*/', $strVal, $output_array);
        //file_put_contents("debug.txt", "matches=".$matches.PHP_EOL, FILE_APPEND);
        if ($matches == 1)
        {
			
		//replace all the = characters with ___EQU___ except the first in the line
			$strVal=str_replace('=','___EQU___',$strVal);
			$newstrVal="";
			foreach(preg_split("/((\r?\n)|(\r\n?))/", $strVal) as $line){
				$pos = strpos($line, '___EQU___');
				if ($pos !== false) {
					$line = substr_replace($line, '=', $pos, strlen('___EQU___'));
					$newstrVal=$newstrVal.$line.PHP_EOL;
				} else {
					$newstrVal=$newstrVal.$line.PHP_EOL;
				}
			} 
			$strVal=$newstrVal;
			
			
            $strValTabComment=$output_array[0];
            $strValTabComment=str_replace('rem ', '', $strValTabComment);
            $strValTabComment = rtrim($strValTabComment);
            preg_match('/set.*=/', $strVal, $output_array);  // problem if there are more than 1 = in the line
            $envVarName=$output_array[0];
            $envVarName=str_replace('[0]', '', $envVarName);
            $strValTab=$envVarName.$strValTabComment.'[';

            preg_match_all('/\].*/', $strVal, $output_array);            
            foreach ($output_array[0] as $env_value) 
            {
                $env_value=str_replace(']=', '', $env_value);
                $env_value = rtrim($env_value);
                $strValTab=$strValTab.$env_value.',';
            }
            $strValTab=$strValTab.']';
            $strValTab=str_replace(',]', ']', $strValTab);
			$strValTab=str_replace('___EQU___','=',$strValTab);
        }
        $elem->nodeValue=$strValTab;
    }
    else
    {
        # issue when there is an ampersand in the variable
        $strVal=trim(preg_replace('/\s\s+/', '___EOL___', $strVal));
        $elem->nodeValue=htmlspecialchars($strVal);
    }
	  $item_num++;
  }  
  
  echo $doc->saveHTML();
?>
<br/>
<?php
# unused for test
#echo $_SERVER['HTTP_REFERER']."<br/>";
$strdir1=substr(getcwd(),0,-7);
$strdir1=str_replace("\\","/",$strdir1);
#echo $strdir1."<br/>";
$strdir2=$_SERVER['HTTP_REFERER'];
$pos=strpos($strdir2,"/doc/files");
$strdir2=substr($strdir2,$pos+10,-30);
#echo $strdir2."<br/>";
$guessed_dir=$strdir1.$strdir2;
#echo "guessed_dir ".$guessed_dir."<br/>";
?>
</body>
</html>