<?php
session_start();

# $Id: index.html,v 1.2 2015/01/27 12:34:35 usgmgr Exp $

# Template for new ESO Design
# please change only between the dotted lines, indicated by "CHANGE HERE" 

# ********************************************************************************************************************
# #####  "CHANGE HERE" please uncomment and change only the lines needed!
#
# #####  Area (only needed if not public), "science" or "intranet"
$area = "science"; 
#
# #####  Title of the page ($pageTitle should be the SECTION Title!)
$pageTitle = "Moving Targets - Converter for ephemeris files";
$browserTitle = "Moving Targets - Converter for ephemeris files";
#
# #####  insert the navigation item where your page is to be shown 
# #####  NEEDED if not a direct node
$current_page = "Moving Targets"; 
#
# #####  URL to be simulated for highlighting. 
# #####  Like $current_page, but not the menu name but the menu URL 
# #####  (needed if there are two menu items with the same name, like e.g. CAS2007/winners and CAS2005/winners, 
# #####  which would both be "winners" and can only be distinguished by using the url)

$simulate_url = "";

#
# #####  parameter for header e.g. JavaScript, make sure to escape quotes!
$headerparam = "";
#
# #####  submenu structure below 4th level, activate only if applicable
$menufile = "menu4CQPhase2.php"; 
#
# #####  Welcome Notice
#$welcomenotice = ""; 
#
# #####  Author and AuthorEmail to create a "Send comments to... " instead of the
# #####  the standard Contact Form link.
$author = "User Support Department";
$authorEmail = "usd-help@eso.org";
#
# ********************************************************************************************************************
# do not delete or change these lines

// This setting allows to read files with different line endings
// (e.g. files saved under Linux and MacOS X do not use the same line termination)
ini_set("auto_detect_line_endings", true);

// String sanitization (used for cleaning up the name of the uploaded file)
function sanitize($string) {
  $match = array("/\s+/","/[^a-zA-Z0-9\-]/","/-+/","/^-+/","/-+$/");
  $replace = array("-","","-","","");
  $string = preg_replace($match,$replace, $string);
  $string = strtolower($string);
  return $string;
}

// Function to test whether a value actually represents a floating point number
function isTrueFloat($val) 
{ 
    $pattern = '/^[+-]?(\d*\.\d+([eE]?[+-]?\d+)?|\d+[eE][+-]?\d+)$/';

    return (!is_bool($val) && (is_float($val) || preg_match($pattern, trim($val)))); 
} 

// Function to check Right Ascension against the expected format
function isRA($val)
{
  $pattern = '/^([0-1][0-9]|2[0-3])\ [0-5][0-9]\ [0-5][0-9](\.[0-9]*)?$/';

  return preg_match($pattern, trim($val));

}

// Function to check Declination against the expected format
function isDEC($val)
{
  $pattern = '/^[-+]?(([0-8][0-9]\ [0-5][0-9]\ [0-5][0-9](\.[0-9]*)?)|(90 00 00(\.0*)?))$/';

  return preg_match($pattern, trim($val));

}


/// FORM PROCESSING STARTS HERE

// Has the form been submitted? If yes then process the input...
if (isset($_POST['upload'])) {


  /// Check uploaded file (security checks)

  // Error flag 
  $uploadError = false;

  // Upload directory is fixed
  $uploadDir = "./eph";


  try {
    
    // Undefined | Multiple Files | $_FILES Corruption Attack
    // If this request falls under any of them, treat it invalid.
    if (
        !isset($_FILES['ephemfile']['error']) ||
        is_array($_FILES['ephemfile']['error'])
	) {
      throw new RuntimeException('Invalid parameters.');
    }
    
    // Check $_FILES['ephemfile']['error'] value.
    switch ($_FILES['ephemfile']['error']) {
    case UPLOAD_ERR_OK:
      break;
    case UPLOAD_ERR_NO_FILE:
      throw new RuntimeException('No file sent.');
    case UPLOAD_ERR_INI_SIZE:
    case UPLOAD_ERR_FORM_SIZE:
      throw new RuntimeException('Exceeded filesize limit.');
    default:
      throw new RuntimeException('Unknown error.');
    }
    
    // Also check filesize here. 
    if ($_FILES['ephemfile']['size'] > 3000000) {
      throw new RuntimeException('Exceeded filesize limit.');
    }
    
    // Check MIME type. Only accept text files.
    if (!preg_match('/text\//', $_FILES['ephemfile']['type'])) {
      throw new RuntimeException('Accepting only text files.');
    }


    // You should name it uniquely.
    // DO NOT USE $_FILES['ephemfile']['name'] WITHOUT ANY VALIDATION !!
    // On this example, obtain safe unique name from its binary data.

    $hash = sha1_file($_FILES['ephemfile']['tmp_name']);
    $uploadedFile = sprintf($uploadDir.'/%s.%s',$hash,'txt');

    if (!move_uploaded_file($_FILES['ephemfile']['tmp_name'],$uploadedFile)) {
      throw new RuntimeException('Failed to record uploaded file.');
    }

    
  } catch (RuntimeException $e) {
    
    $uploadError = true;
    $errorMessage = $e->getMessage();

  }
  
  // Proceed with processing of Horizons file if upload was successful
  if ($uploadError == false) {

 
    // Read JPL ephemeris file
    // - capture info from header
    // - determine type of date (JD, CAL or BOTH)
    // - store ephemeris data
    // 
  
    // Flag: detect processing errors
    $processError = false;

    // Flag: are we processing lines in the area containing the ephemeris data?
    $withinEphemZone = false;

    // Time format: can be CAL, JD or BOTH depending on user's choice when running Horizons
    $timeFormat = "";


    // Open the input file
    $input = fopen($uploadedFile,"r");


    // Create the name for the output file
    if ($_POST['outputName'] != "") {
      
      // If output name was given in the form, remove any path information and sanitize the file name
      $outputFileName = sanitize(pathinfo($_POST['outputName'],PATHINFO_FILENAME)) ;

    } else {

      // If no name was given, simply use the name of the temp file (random).
      $outputFileName = pathinfo($_FILES['ephemfile']['tmp_name'],PATHINFO_FILENAME) ;

    }

    // Append standard extension ie ".eph" to name of output file
    $outputFileName .= ".eph";

    $tempName = tempnam($uploadDir,"PAF");

    // Full path for the output file (impose the output directory)
    // $outputFile = sprintf($uploadDir.'/%s', $outputFileName);
    $outputFile = $tempName;

    // Proceed only if the input file could be opened w/o errors
    if ($input) {

      // Open output file
      $output = fopen($outputFile,"w");

      // Write standard PAF header
      fwrite($output,"PAF.HDR.START;                                              # Start of PAF Header\n");
      fwrite($output,"PAF.TYPE                  \"Instrument Setup\";               # Type of PAF\n");
      fwrite($output,"PAF.ID                    \"\";                               # ID for PAF\n"); 
      
      fwrite($output,str_pad("PAF.NAME                  \"$outputFileName\";",60," ",STR_PAD_RIGHT) . "# Name of PAF\n");


      // We make sure that we process all dates as UT time (set the default timezone)
      date_default_timezone_set('UTC');
      
      $warningMessages = "";
      
      // Flag: did we find data with invalid format?
      $invalidFormat = false;
      $foundData = false;

      /// Main loop on the lines of the input file
      while (($line = fgets($input)) !== false) {

	// process the line we just read...

	// trim the line
	$line = trim($line);

	// skip the line if it is empty
	if ( $line == "" ) { continue; }

	// detect start of ephemeris data (marker: $$SOE)
 	if ( $line == "\$\$SOE" ) {

	  // Set the flag: we found the start of the actual data
	  $withinEphemZone = true;
	  $foundData = true;

	  // Write rest of PAF header to output file
	  fwrite($output,"PAF.CRTE.NAME             \"crossEphem2PAF.php\";             # Name of creator\n");

	  // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	  // Generates the date for today
	  // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~

	  $cDate = gmdate('c');
   
	  // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	  // Generates the last part of PAF header
	  // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	  
	  fwrite($output,str_pad("PAF.CRTE.DAYTIM           \"$cDate\";",60," ",STR_PAD_RIGHT) . "# UTC time of creation\n");
		 
	  fwrite($output,"PAF.LCHG.NAME             \"\";                               # Name of person/appl. changing\n");
	  fwrite($output,"PAF.LCHG.DAYTIM           \"\";                               # Timestamp of last change\n");
	  fwrite($output,"PAF.CHCK.NAME             \"\";                               # Name of appl. checking\n");
	  fwrite($output,"PAF.HDR.END;                                                # End of PAF Header\n");
	  fwrite($output,"\n#------------------------------------------------------------------------------\n\n");
	  fwrite($output,"TPL.FILE.DIRNAME          \"\$INS_ROOT/SYSTEM/DETDATA\";       # Storage filename\n");
	  fwrite($output,"\n#------------------------------------------------------------------------------\n\n");
	  
	  continue;

	}

	
	// detect end of ephemeris data (marker: $$EOE)
	if ( $line == "\$\$EOE" ) {
	  $withinEphemZone = false;
	  break;
	}


	// If we are within the 'data zone' but did not detect the time format, issue error.
	if ( $withinEphemZone && $timeFormat == "" ) {
	  
	  // Found ephemeris data but no time format info available: cannot proceed
	  $processError = true;
	  $processMessage = "ERROR: no info about chosen time format in input file!";

	} elseif ( $withinEphemZone ) {

	  //// now we deal with ephemeris data
	  
	  // The line must start with a numeric entry and not contain '>' (comment lines are sometimes inserted
	  // in the output, we skip those).
	  if ( is_numeric($line[0]) && !strpos($line,">") ) {

	    // Retrieve the line elements (we split the csv line)
	    $lineElements = explode(",",$line);

	    // PAF Keyword for epehemeris data
	    $newLine = "INS.EPHEM.RECORD          \"";

	    // Depending on the chosen time format the input file contains
	    // the Gregorian date, Julian date, or both.
	    switch ($timeFormat) {
	      
	      // Julian date
	    case "JD":
	      $CALdate = "";
	      $JDdate = trim($lineElements[0]);
	      $RA = trim($lineElements[3]);
	      $DEC = trim($lineElements[4]);
	      $dRA = trim($lineElements[5]);
	      $dDEC = trim($lineElements[6]);
	      $otherInfoIndex = 7;
	      break;
 
	      // Gregorian date
	    case "CAL":
	      $CALdate = trim($lineElements[0]);
	      $JDdate = "";
	      $RA = trim($lineElements[3]);
	      $DEC = trim($lineElements[4]);
	      $dRA = trim($lineElements[5]);
	      $dDEC = trim($lineElements[6]);
	      $otherInfoIndex = 7;
	      break;

	      // ... or both types of date
	    case "BOTH":
	      $CALdate = trim($lineElements[0]);
	      $JDdate = trim($lineElements[1]);
	      $RA = trim($lineElements[4]);
	      $DEC = trim($lineElements[5]);
	      $dRA = trim($lineElements[6]);
	      $dDEC = trim($lineElements[7]);
	      $otherInfoIndex = 8;
	      break;
	      
	    }


	    // Convert dRA and dDEC from arcsec/h to arcsec/s
	    // if no value given, set to 0.
	    if ( $dRA == "" || $dDEC == "" ) {

	      $dRAsec = 0.;
	      $dDECsec = 0.;

	    } elseif ( !is_numeric($dRA) || !is_numeric($dDEC) ) {

	      // If not numbers, raise error flag and skip the line altogether
	      $invalidFormat = true;
	      $errorTypes[] = "diffVel";
	      continue;

	    } else {
	      
	      // Convert to arcsec/s from arcsec/h
	      $dRAsec = sprintf("%+9.6f",$dRA/3600.0);
	      $dDECsec = sprintf("%+9.6f",$dDEC/3600.0);

	    }

	    // Proceed with date conversions and/or reformatting


	    if ( $CALdate == "" ) {
	      
	      // If the Gregorian date is not present in the input file...
	      
	      
	      // Check that the Julian date is a number as expected,
	      // otherwise raise the error flag and skip the line
	      if ( !isTrueFloat($JDdate) ) {
		$invalidFormat = true;
		$errorTypes[] = "JDdate";
		continue;
	      }

	      // Create 'Unix' timestamp based on Julian date
	      $timeStamp = ($JDdate - 2440587.5) * 86400 ;

	      // Trick: fractional seconds are not handled natively by PHP...

	      // ... retrieve the seconds based on the timestamp (this is truncated
	      // to the nearest second by PHP
	      $seconds = gmdate('s',$timeStamp);


	      // ... then get the fractional seconds
	      $milliseconds = $timeStamp - floor($timeStamp);

	      // ...and create the string with seconds + fractional part
	      $secondsString = sprintf("%06.3f",$seconds + $milliseconds);

	      //echo('<p>secondsString='.$secondsString.' seconds='.$seconds.' milliseconds='.$milliseconds.' timeStamp='.$timeStamp.'</p>');

	      if ($secondsString == '60.000') {

		$timeStamp = $timeStamp + 60;
		$secondsString = '00.000';

	      }

	      // Concatenate the date with the seconds
	      $CALdate = gmdate('Y-m-d\TH:i:',$timeStamp) . $secondsString;

	      // Format the Julian date for uniformity
	      $JDdate = sprintf("%7.9f",$JDdate);

	    } elseif ( $JDdate == "" ) {
	      
	      // If the Julian date is not present in the input file

	      try {

		// Create new DateTime object based on Gregorian date
		$date = new DateTime($CALdate);

		// Compute the 'Unix' timestamp: use strtotime and retrieve the 
		// fractional seconds from the DateTime instance (that handles microseconds) 
		$timeStamp = strtotime($CALdate) + $date->format('u')/1000000 ;
		$CALdate = $date->format('Y-m-d\TH:i:') . sprintf("%06.3f",$date->format('s.u'));
		
		// Compute the Julian date based on the Unix timestamp
		$JDdate=sprintf("%7.9f",$timeStamp/86400 + 2440587.5) ;

	      } catch (Exception $e) {

		// Catch possible exceptions if DateTime object could not be created
		// (case of wrong date formatting)
		$invalidFormat = true;
		$errorTypes[] = "CALdate";
		continue;
	      } 
	      

	    } else {
	     
	      // Third case: both dates are present in the input file, then
	      // we just reformat them to the agreed format

	      try {

		// Create new DateTime object based on Gregorian date
		$date = new DateTime($CALdate);

		// Reformat the Gregorian date, DateTime object handles the microseconds
		$CALdate = $date->format('Y-m-d\TH:i:') . sprintf("%06.3f",$date->format('s.u'));

		// Check the format of the Julian date, if incorrect then skip line
		if ( !isTrueFloat($JDdate) ) {
		  $invalidFormat = true;
		  $errorTypes[] = "JDdate";
		  continue;
		}


		// Format the Julian date for uniformity
		$JDdate = sprintf("%7.9f",$JDdate);

	      }	catch (Exception $e) {

		// Catch possible exceptions if DateTime object could not be created
		// (case of wrong date formatting)
		$invalidFormat = true;
		$errorTypes[] = "CALdate";
		continue;
	      } 
		
	    }

	    // Check format of RA and DEC
	    if ( !isRA($RA) || !isDEC($DEC) ) {

	      // If RA or DEC not in expected format, raise error flag and skip the line
	      $invalidFormat = true;
	      $errorTypes[] = "coords";
	      continue;

	    }

	    // If everything went fine we format the new line for the ephemeris file in PAF format...
	    $newLine .= $CALdate . ", " . $JDdate . ", " . $RA . ", " . $DEC . ", " . $dRAsec . ", " . $dDECsec ;

	    // .. and we include possible other fields (ancillary information)

	    for ($i = $otherInfoIndex ; $i < count($lineElements); $i++) {

	      $dataField = trim($lineElements[$i]);

	      // We only include those fields that are not empty
	      if ( $dataField != "" ) {
		$newLine .= ", " . $dataField ;
	      }

	    }

	    $newLine .= "\"";

	    // Last step: write the new line to the output file
	    fwrite($output,$newLine . "\n");

	  }


	} else {


	  // Here we deal with other data than the ephemeris itself (header)

	  if ( strstr($line,"Ephemeris / WWW_USER") ) {

	    fwrite($output,"PAF.DESC                  \"" . str_pad($line,79," ",STR_PAD_RIGHT) . "\"\n");

	  }

	  // We identify the header items we want to keep in the PAF file
	  $colonIndex = strpos($line,":");

	  if ($colonIndex != false) {

	    $headerItem = trim(substr($line,0,$colonIndex));

	    switch ($headerItem) {
	      
	    case "Time format" :
	      // Get the chosen time format (CAL, JD or BOTH) in order to know
	      // what date(s) to expect in the ephemeris
	      $timeFormat = trim(substr($line,$colonIndex+1));
	      break;
	     
	    case "Target body name" :
	    case "Center bocy name" :
	    case "Center-site name" :
	    case "Start time" :
	    case "Stop  time" :
	    case "Step-size" :
	    case "Target pole/equ" :
	    case "Target radii" :
	    case "Atmos refraction" :
	    case "Table cut-offs 1" :
	    case "Table cut-offs 2" :
	      // Write the header line to the PAF header
	      fwrite($output,"PAF.DESC                  \"" . str_pad($line,79," ",STR_PAD_RIGHT) . "\"\n");
	      break;

	    default:
	      break;
	    }
	    

	  }


	}
	
      }

      if ($foundData == false) {
	$processError = true;
	$processMessage = "ERROR: could not find ephemeris data in input file!";
      }


      // Processing finished: close the input and output file
      fclose($input);
      fclose($output);

      // Remove the input file uploaded by user
      unlink($uploadedFile);

      // Deal with warnings/errors: if we encountered data with unexpected format raise a warning
      if ($invalidFormat) {

	$warningMessages .= "<p>WARNING! Found some data with unexpected format in input file. Please check the output carefully!</p>";
	$warningMessages .= "<p>Problems were found with:<ul>";

	$errorTypes = array_unique($errorTypes);

	foreach ($errorTypes as $key => $val) {

	  switch ($val) {
	    
	  case "diffVel":
	    $warningMessages .= "<li>differential velocities (expected value must be a float)</li>";
	    break;

	  case "JDdate":
	    $warningMessages .= "<li>Julian date (expected value must be a float)</li>";
	    break;

	  case "CALdate":
	    $warningMessages .= "<li>Calendar date (format not recognized)</li>";
	    break;

	  case "coords":
	    $warningMessages .= "<li>RA or/and DEC (must be 'hh mm ss.sss' or '+/-dd mm ss.sss')</li>";
	    break;

	  }


	}

	$warningMessages .= "</ul></p>";

      }


    } else {
      // error opening the file: raise error
      $processError = true;
      $processMessage = "ERROR opening the file!";
    }

  }

  // If no fatal error was detected during the upload or the processing,
  // we trigger an automatic download of the resulting file after 3 seconds.
  if ( $uploadError == false && $processError == false) {
    $p=pathinfo($tempName,PATHINFO_BASENAME) ;
    header("Refresh: 3; url=ephemDownload.php?f=$outputFileName&p=$p");
  }

}   

include 'frame_top.php';
?>
<div id="col3">
<div id="col3_content" class="clearfix">
<div class="subcolumns">
<div class="c75l">
<div class="subcl">
<?php
# ******************************************************************************************************************** 
#  "CHANGE HERE" ******************************* change below here text for center area *******************************  
?>

<h1>Moving targets - Converter for ephemeris files</h1>

<p>This online converter allows you to upload an ephemeris file produced with the 
<a href="http://ssd.jpl.nasa.gov/horizons.cgi">JPL Horizons</a> tool 
and to retrieve it in a format suitable for use with your Observation Blocks prepared with P2PP. Simply
upload the Horizons file, optionally choose a name for the resulting file and click on 'Convert'.</p>

<hr/>

<h2>Convert your Horizons file to VLT format</h2>

<?php

// Display error message in case the file could not be properly uploaded
if ( $uploadError == true) {

  echo "<p class=\"error\">ERROR uploading your file: $errorMessage<br/>";
  echo "Cannot proceed with the conversion.</p>";

} elseif ( isset($processError) && $processError == false ) {

  // If no fatal processing error was detected...
 
  if ($invalidFormat) {

    // In case of data with invalid format, issue an error message
    echo("<div class=\"hint\"><div class=\"error\">$warningMessages</div><br/>");
    echo("Your ephemeris file was converted to PAF format but there were some errors. The generated file may thus be incomplete. 
          Your download should start automatically. 
          If not, please click on the following link and save the file to the directory of your choice:<br/><br/>");
    echo("<a href=\"ephemDownload.php?f=$outputFileName&p=$p\">$outputFileName</a></div> <hr/>");

  } else {
  
    // If everything went well display standard message only
    echo("<p class=\"hint\">Your ephemeris file was successfully converted to PAF format for use with your Observation Blocks.
        Your download should start automatically. 
        If not, please click on the following link and save the file to the directory of your choice:<br/><br/>");
    echo("<a href=\"ephemDownload.php?f=$outputFileName&p=$p\">$outputFileName</a><p> <hr/>");
    
  }
  
} elseif ( isset($processError) && $processError == true ) {

  // Issue error message if fatal error occurred while processing the file
  echo("<p class=\"error\">$processMessage <br/>Cannot proceed with the conversion.</p>");

}

?>

<p></p>

<!-- Main form : accepts file for upload and (optional) name of output file -->

<form id="ephemConverter" name="ephemConverter" action="<?php echo htmlentities($_SERVER['PHP_SELF']); ?>" method="POST" ENCTYPE="multipart/form-data">
   
<p>
<label for="ephemfile">Select the file to upload:</label>
<input type="file" name="ephemfile" id="ephemfile" size="25">
</p>
<input type="hidden" name="MAX_FILE_SIZE" value="3000000" />

<p>
<label for="outputName">Choose a name for your ephemeris file (optional):</label>
<input type="text" name="outputName" size="30" />
</p>
<input type="submit" name="upload" value="Convert"><br />
    
</form>

<p></p>

<hr/>

<p><u>Please note</u>: the following settings must be used when running the JPL Horizons tool in order 
to produce a VLT-compliant ephemeris file:</p>
<ul>
<li>In the &quot;Current Settings&quot; table set the value in the right column:<br>
</li>
</ul>
<table width="436" cellspacing="0" cellpadding="1" border="1" height="121">
<tbody><tr><th colspan="2">Current Settings</th>
</tr><tr><td>Ephemeris type</td>
<td>OBSERVER</td>
</tr><tr><td>Target Body</td>
<td><i>favorite target </i>or<i> reference object</i></td>
</tr><tr><td>Observer Location</td>
<td>Cerro Paranal [309]</td>
</tr><tr><td>Time Span</td>
<td><i>start and end of the ephemerides, time step</i></td>
</tr><tr><td>Display/Output</td>
<td>download/save</td>
</tr></tbody></table>
<p>&nbsp;</p>
<ul>
<li>The &quot;Table Settings&quot; parameters should have the following values:<br>
</li>
</ul>
<table width="436" cellspacing="0" cellpadding="1" border="1" height="121">
<tbody><tr><th colspan="2">Table Settings</th>
</tr><tr><td>observer quantities</td>
<td><p>1 Astrometric RA &amp; DEC&nbsp;&nbsp;<i></i></p>
<p>3 Rates: RA &amp; DEC</p>
<p>9 Visual mag. & Surface Brght</p>
<p><i>(other quantities are optional)</i><br>
</p>
</td>
</tr><tr><td>day/time format</td>
<td>Julian day</td>
</tr><tr><td>angle format</td>
<td>hours/degrees minutes seconds</td>
</tr><tr><td>Refraction model</td>
<td>airless model (no refraction)</td>
</tr><tr><td>Airmass Limit</td>
<td>2.6 (or <i>smaller</i>)</td>
</tr><tr><td>Elevation cutoff</td>
<td>20 (or <i>larger</i>)</td>
</tr><tr><td>Skip daylight</td>
<td>checked</td>
</tr><tr><td>Extra precision</td>
<td>checked</td>
</tr><tr><td>Reference system</td>
<td>ICRF/J2000.0</td>
</tr><tr><td>CSV format</td>
<td>checked</td>
</tr></tbody></table></p>

<?php
# ********************************************* change above here text for center area ******************************* 
# ******************************************************************************************************************** 
# do not delete or change these lines 
?>
	    </div> <!-- subcl -->
	  </div> <!-- c75l -->
      <!-- rechte spalte -->
	  <div class="c25r">
		<div class="subcr">
<?php
#  ******************************************************************************************************************** 
# "CHANGE HERE" *********************** change below here text for right column  **************************************
?>

<?php
//$includeFile="InsMenu.php";
//include($includeFile);
?>

<?php
# ******************************************************************************************************************** 
# ******************************************************************************************************************** 
# do not change below  here 
?>
		</div> <!-- subcr -->
	  </div> <!-- c25r -->
    </div> <!-- subcolumns -->
  </div>  <!-- col3 content -->    
  <!-- IE Column Clearing -->
  <div id="ie_clearing">&nbsp;</div>
</div> <!-- #col3: - Ende -->
</div> <!-- #main: - Ende -->
<?php include 'frame_bottom.php'; ?>