summaryrefslogtreecommitdiff
path: root/includes/pages/admin_import.php
diff options
context:
space:
mode:
Diffstat (limited to 'includes/pages/admin_import.php')
-rw-r--r--includes/pages/admin_import.php253
1 files changed, 253 insertions, 0 deletions
diff --git a/includes/pages/admin_import.php b/includes/pages/admin_import.php
new file mode 100644
index 00000000..9b8af2e2
--- /dev/null
+++ b/includes/pages/admin_import.php
@@ -0,0 +1,253 @@
+<?php
+function admin_import() {
+ global $Room, $RoomID, $RoomName;
+ global $PentabarfGetWith, $PentabarfXMLpath, $PentabarfXMLhost;
+
+ require_once ("includes/funktion_xml.php");
+ ///////////
+ // DEBUG //
+ ///////////
+ $ShowDataStrukture = 0;
+ $EnableRoomFunctions = 1;
+ $EnableRooms = 1;
+ $EnableSchudleFunctions = 1;
+ $EnableSchudle = 1;
+ $EnableSchudleDB = 1;
+
+ CreateRoomArrays();
+
+ $html = "";
+
+ /*##############################################################################################
+ F I L E
+ ##############################################################################################*/
+ $html .= "\n\n<br />\n<h1>XML File:</h1>\n";
+ if (isset ($_POST["PentabarfUser"]) && isset ($_POST["password"]) && isset ($_POST["PentabarfURL"])) {
+ $html .= "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) {
+ $html .= "<h2>fail: File 'https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] . "' not readable!" .
+ "[$errstr ($errno)]</h2>";
+ } else {
+ if (($fileOut = fopen("$Tempdir/engelXML", "w")) != FALSE) {
+ $head = 'GET /' . $PentabarfXMLpath . $_POST["PentabarfURL"] . ' 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);
+
+ $html .= "<br />Es wurden $Zeilen Zeilen eingelesen<br />";
+ } else
+ $html .= "<h2>fail: File '$Tempdir/engelXML' not writeable!</h2>";
+ fclose($fp);
+ }
+ }
+ elseif ($PentabarfGetWith == "fopen") {
+ //user uns password in url einbauen
+ $FileNameIn = "https://" . $_POST["PentabarfUser"] . ':' . $_POST["password"] . "@" .
+ $PentabarfXMLhost . "/" . $PentabarfXMLpath . $_POST["PentabarfURL"];
+
+ 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);
+ $html .= "<br />Es wurden $Zeilen Zeilen eingelesen<br />";
+ } else
+ $html .= "<h2>fail: File '$Tempdir/engelXML' not writeable!</h2>";
+ fclose($fileIn);
+ } else
+ $html .= "<h2>fail: File 'https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] . "' not readable!</h2>";
+ }
+ elseif ($PentabarfGetWith == "wget") {
+ $Command = "wget --http-user=" . $_POST["PentabarfUser"] . " --http-passwd=" . $_POST["password"] . " " .
+ "https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] .
+ " --output-file=$Tempdir/engelXMLwgetLog --output-document=$Tempdir/engelXML" .
+ " --no-check-certificate";
+ $html .= system($Command, $Status);
+ if ($Status == 0)
+ $html .= "OK.<br />";
+ else
+ $html .= "fail ($Status)($Command).<br />";
+ }
+ elseif ($PentabarfGetWith == "lynx") {
+ $Command = "lynx -auth=" . $_POST["PentabarfUser"] . ":" . $_POST["password"] . " -dump " .
+ "https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] . " > $Tempdir/engelXML";
+ $html .= system($Command, $Status);
+ if ($Status == 0)
+ $html .= "OK.<br />";
+ else
+ $html .= "fail ($Status)($Command).<br />";
+ }
+ elseif ($PentabarfGetWith == "fopen") {
+ //user uns password in url einbauen
+ $FileNameIn = "https://" . $_POST["PentabarfUser"] . ':' . $_POST["password"] . "@" .
+ $PentabarfXMLhost . "/" . $PentabarfXMLpath . $_POST["PentabarfURL"];
+
+ 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);
+ $html .= "<br />Es wurden $Zeilen Zeilen eingelesen<br />";
+ } else
+ $html .= "<h2>fail: File '$Tempdir/engelXML' not writeable!</h2>";
+ fclose($fileIn);
+ } else
+ $html .= "<h2>fail: File 'https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] . "' not readable!</h2>";
+ }
+ elseif ($PentabarfGetWith == "wget") {
+ $Command = "wget --http-user=" . $_POST["PentabarfUser"] . " --http-passwd=" . $_POST["password"] . " " .
+ "https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] .
+ " --output-file=$Tempdir/engelXMLwgetLog --output-document=$Tempdir/engelXML" .
+ " --no-check-certificate";
+ $html .= system($Command, $Status);
+ if ($Status == 0)
+ $html .= "OK.<br />";
+ else
+ $html .= "fail ($Status)($Command).<br />";
+ }
+ elseif ($PentabarfGetWith == "lynx") {
+ $Command = "lynx -auth=" . $_POST["PentabarfUser"] . ":" . $_POST["password"] . " -dump " .
+ "https://$PentabarfXMLhost/$PentabarfXMLpath" . $_POST["PentabarfURL"] . " > $Tempdir/engelXML";
+ $html .= system($Command, $Status);
+ if ($Status == 0)
+ $html .= "OK.<br />";
+ else
+ $html .= "fail ($Status)($Command).<br />";
+ } else
+ $html .= "<h1>The PentabarfGetWith='$PentabarfGetWith' not supported</h1>";
+ } else {
+ $html .= "<form action=\"dbUpdateFromXLS.php\" method=\"post\">\n";
+ $html .= "<table border=\"0\">\n";
+ $html .= "\t<tr><td>XCAL-File: https://$PentabarfXMLhost/$PentabarfXMLpath</td>" .
+ "<td><input name=\"PentabarfURL\" type=\"text\" size=\"4\" maxlength=\"5\" " .
+ "value=\"$PentabarfXMLEventID\"></td></tr>\n";
+ $html .= "\t<tr><td>Username:</td>" .
+ "<td><input name=\"PentabarfUser\" type=\"text\" size=\"30\" maxlength=\"30\"></td></tr>\n";
+ $html .= "\t<tr><td>Password:</td>" .
+ "<td><input name=\"password\" type=\"password\" size=\"30\" maxlength=\"30\"></td></tr>\n";
+ $html .= "\t<tr><td></td><td><input type=\"submit\" name=\"FileUpload\" value=\"upload\"></td></tr>\n";
+ $html .= "</table>\n";
+ $html .= "</form>\n";
+ }
+
+ //readXMLfile("xml.php.xml");
+ if (readXMLfile("$Tempdir/engelXML") == 0) {
+ $XMLmain = getXMLsubPease($XMLmain, "VCALENDAR");
+
+ if ($ShowDataStrukture) {
+ $html .= "<pre><br />";
+ $html .= $XMLmain->name;
+ $html .= "<br />";
+ print_r(array_values($XMLmain->sub));
+ $html .= "</pre>";
+ }
+
+ /*
+ $html .= "<br />";
+ $Feld=7;
+ $html .= "$Feld#". $XMLmain->sub[$Feld]->name. "<br />";
+ $html .= "$Feld#". $XMLmain->sub[$Feld]->sub;
+ //print_r(array_values ($XMLmain->sub[$Feld]->sub));
+ while(list($key, $value) = each($XMLmain->sub[$Feld]->sub))
+ $html .= "?ID".$value->sub[1]->data. "=". $value->sub[2]->data. "\n";
+ $html .= "</pre>";
+ */
+
+ /*##############################################################################################
+ V e r s i o n
+ ##############################################################################################*/
+
+ $html .= "<hr>\n";
+ $XMLrelease = getXMLsubPease($XMLmain, "X-WR-CALDESC");
+ $html .= "release: " . $XMLrelease->data . "<br />\n";
+ //$XMLreleaseDate = getXMLsubPease( $XMLmain, "RELEASE-DATE");
+ //$html .= "release date: ". $XMLreleaseDate->data. "<br />\n";
+ $html .= "<hr>\n";
+
+ /*##############################################################################################
+ V e r s i o n
+ ##############################################################################################*/
+ if ($EnableRoomFunctions)
+ include ("includes/funktion_xml_room.php");
+
+ if ($EnableSchudleFunctions)
+ include ("includes/funktion_xml_schudle.php");
+
+ /*##############################################################################################
+ U P D A T E A L L
+ ##############################################################################################*/
+ $html .= "\n\n<br />\n<h1>Update ALL:</h1>\n";
+
+ $html .= "<form action=\"dbUpdateFromXLS.php\">\n";
+ $html .= "\t<input type=\"submit\" name=\"UpdateALL\" value=\"now\">\n";
+ $html .= "</form>\n";
+
+ } //if XMLopenOOK
+ return $html;
+}
+
+/*##############################################################################################
+ erstellt Arrays der Reume
+ ##############################################################################################*/
+function CreateRoomArrays() {
+ global $Room, $RoomID, $RoomName, $con;
+
+ $sql = "SELECT `RID`, `Name` FROM `Room` " .
+ "WHERE `Show`='Y'" .
+ "ORDER BY `Number`, `Name`;";
+ $Erg = mysql_query($sql, $con);
+ $rowcount = mysql_num_rows($Erg);
+
+ for ($i = 0; $i < $rowcount; $i++) {
+ $Room[$i]["RID"] = mysql_result($Erg, $i, "RID");
+ $Room[$i]["Name"] = mysql_result($Erg, $i, "Name");
+ $RoomID[mysql_result($Erg, $i, "RID")] = mysql_result($Erg, $i, "Name");
+ $RoomName[mysql_result($Erg, $i, "Name")] = mysql_result($Erg, $i, "RID");
+ }
+}
+?>
+
generated by cgit v1.2.3-70-g09d2 (git 2.46.2) at 2024-11-02 21:47:10 +0000