\n

XML File:

\n"; if( isset($_POST["PentabarfUser"]) && isset($_POST["password"]) && isset($_POST["PentabarfURL"])) { echo "Update XCAL-File from Pentabarf.."; //backup error messeges and delate $Backuperror_messages = $error_messages; $fp = fsockopen( "ssl://$PentabarfXMLhost", 443, $errno, $errstr, 30); $error_messages = $Backuperror_messages; if( !$fp) { echo "

fail: File 'https://$PentabarfXMLhost/$PentabarfXMLpath$PentabarfXMLEventID' not readable!". "[$errstr ($errno)]

"; } else { if( ($fileOut = fopen( "$Tempdir/engelXML", "w")) != FALSE) { $head = 'GET /'. $PentabarfXMLpath. $PentabarfXMLEventID. ' HTTP/1.1'."\r\n". 'Host: '. $PentabarfXMLhost. "\r\n". 'User-Agent: Engelsystem'. "\r\n". 'Authorization: Basic '. base64_encode($_POST["PentabarfUser"]. ':'. $_POST["password"])."\r\n". "\r\n"; fputs( $fp, $head); $Zeilen = -1; while (!feof($fp)) { $Temp= fgets($fp,1024); // ende des headers if( $Temp== "f20\r\n" ) { $Zeilen = 0; $Temp=""; } //file ende? if( $Temp=="0\r\n") break; if( ($Zeilen>-1) && ($Temp!="ffb\r\n") ) { //steuerzeichen ausfiltern if( strpos( "#$Temp", "\r\n") > 0) $Temp = substr($Temp, 0, strlen($Temp)-2); if( strpos( "#$Temp", "1005") > 0) $Temp = ""; if( strpos( "#$Temp", "783") > 0) $Temp = ""; //schreiben in file fputs( $fileOut, $Temp); $Zeilen++; } } fclose( $fileOut); echo "
Es wurden $Zeilen Zeilen eingelesen
"; } else echo "

fail: File '$Tempdir/engelXML' not writeable!

"; fclose($fp); } } else { echo "
\n"; echo "\n"; echo "\t". "\n"; echo "\t". "\n"; echo "\t". "\n"; echo "\t\n"; echo "
XCAL-File: https://$PentabarfXMLhost/$PentabarfXMLpath
Username:
Password:
\n"; echo "
\n"; } //readXMLfile("xml.php.xml"); if( readXMLfile("$Tempdir/engelXML") == 0) { $XMLmain = getXMLsubPease( $XMLmain, "VCALENDAR"); if( $ShowDataStrukture) { echo "

"; echo $XMLmain->name; echo "
"; print_r(array_values ($XMLmain->sub)); echo "
"; } /* echo "
"; $Feld=7; echo "$Feld#". $XMLmain->sub[$Feld]->name. "
"; echo "$Feld#". $XMLmain->sub[$Feld]->sub; //print_r(array_values ($XMLmain->sub[$Feld]->sub)); while(list($key, $value) = each($XMLmain->sub[$Feld]->sub)) echo "?ID".$value->sub[1]->data. "=". $value->sub[2]->data. "\n"; echo ""; */ /*############################################################################################## V e r s i o n ##############################################################################################*/ echo "
\n"; $XMLrelease = getXMLsubPease( $XMLmain, "X-WR-CALDESC"); echo "release: ". $XMLrelease->data. "
\n"; //$XMLreleaseDate = getXMLsubPease( $XMLmain, "RELEASE-DATE"); //echo "release date: ". $XMLreleaseDate->data. "
\n"; echo "
\n"; /*############################################################################################## V e r s i o n ##############################################################################################*/ if( $EnableRoomFunctions) include("./inc/funktion_xml_room.php"); if( $EnableSchudleFunctions) include("./inc/funktion_xml_schudle.php"); /*############################################################################################## U P D A T E A L L ##############################################################################################*/ echo "\n\n
\n

Update ALL:

\n"; echo "
\n"; echo "\t\n"; echo "
\n"; } //if XMLopenOOK include ("./inc/footer.php"); ?>