\n

XML File:

\n"; if( isset($_POST["PentabarfUser"]) && isset($_POST["password"]) && isset($_POST["PentabarfURL"])) { echo "Update XCAL-File from Pentabarf.."; if($PentabarfGetWith=="fsockopen") { //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); } } elseif($PentabarfGetWith=="fopen") { //user uns password in url einbauen $FileNameIn = "https://". $_POST["PentabarfUser"]. ':'. $_POST["password"]. "@". $PentabarfXMLhost. "/". $PentabarfXMLpath. $PentabarfXMLEventID; if( ($fileIn = fopen( $FileNameIn, "r")) != FALSE) { if( ($fileOut = fopen( "$Tempdir/engelXML", "w")) != FALSE) { $Zeilen = 0; while (!feof($fileIn)) { $Zeilen++; fputs( $fileOut, fgets( $fileIn)); } fclose( $fileOut); echo "
Es wurden $Zeilen Zeilen eingelesen
"; } else echo "

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

"; fclose( $fileIn); } else echo "

fail: File 'https://$PentabarfXMLhost/$PentabarfXMLpath$PentabarfXMLEventID' not readable!

"; } elseif( $PentabarfGetWith=="wget") { $Command = "wget --http-user=". $_POST["PentabarfUser"]. " --http-passwd=".$_POST["password"]. " ". "https://$PentabarfXMLhost/$PentabarfXMLpath$PentabarfXMLEventID". " --output-file=$Tempdir/engelXMLwgetLog --output-document=$Tempdir/engelXML". " --no-check-certificate"; echo system( $Command, $Status); if( $Status==0) echo "OK.
"; else echo "fail ($Status)($Command).
"; } elseif( $PentabarfGetWith=="lynx") { $Command = "lynx -auth=". $_POST["PentabarfUser"]. ":".$_POST["password"]. " -dump ". "https://$PentabarfXMLhost/$PentabarfXMLpath$PentabarfXMLEventID > $Tempdir/engelXML"; echo system( $Command, $Status); if( $Status==0) echo "OK.
"; else echo "fail ($Status)($Command).
"; } else echo "

The PentabarfGetWith='$PentabarfGetWith' not supported

"; } 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"); ?>