begin pentabarf import
This commit is contained in:
Philip Häusler
parent
7bee3ce4d2
commit
586272ccec
|
|
@ -1,22 +1,35 @@
|
|||
<?php
|
||||
class element {
|
||||
var $name = '';
|
||||
var $attributes = array();
|
||||
var $attributes = array ();
|
||||
var $data = '';
|
||||
var $depth = 0;
|
||||
var $sub = array();
|
||||
var $sub = array ();
|
||||
}
|
||||
|
||||
$XMLDEBUG = 0;
|
||||
$depth = 0;
|
||||
$XMLmain = new element;
|
||||
$XMLpos = array( 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);
|
||||
$XMLpos = array (
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0,
|
||||
0
|
||||
);
|
||||
//$XMLpos = array( 0, 0, 0, 0, 0, 0);
|
||||
|
||||
function convertValues( $Data) {
|
||||
function convertValues($Data) {
|
||||
global $XMLDEBUG;
|
||||
|
||||
if($XMLDEBUG) {
|
||||
if ($XMLDEBUG) {
|
||||
$Data = htmlspecialchars($Data);
|
||||
$Data = mysql_escape_string($Data);
|
||||
$Data = htmlentities($Data);
|
||||
|
|
@ -26,76 +39,71 @@ function convertValues( $Data) {
|
|||
return $Data;
|
||||
}
|
||||
|
||||
function dataXMLmain($Data, &$Objekt, $Tiefe) {
|
||||
function dataXMLmain($Data, & $Objekt, $Tiefe) {
|
||||
global $XMLmain, $XMLpos, $depth, $XMLDEBUG;
|
||||
|
||||
if($XMLDEBUG)
|
||||
if ($XMLDEBUG)
|
||||
echo "?$Tiefe$depth";
|
||||
|
||||
if(($depth-1) == $Tiefe) {
|
||||
$Objekt->sub[ $XMLpos[$Tiefe] ]->data .= htmlentities( convertValues($Data), ENT_QUOTES);
|
||||
if (($depth -1) == $Tiefe) {
|
||||
$Objekt->sub[$XMLpos[$Tiefe]]->data .= htmlentities(convertValues($Data), ENT_QUOTES);
|
||||
|
||||
if($XMLDEBUG)
|
||||
echo "???". $Objekt->sub[ $XMLpos[$Tiefe] ]->name. "|$Data|$Tiefe???<br />";
|
||||
if ($XMLDEBUG)
|
||||
echo "???" . $Objekt->sub[$XMLpos[$Tiefe]]->name . "|$Data|$Tiefe???<br />";
|
||||
} else
|
||||
dataXMLmain( $Data, $Objekt->sub[ $XMLpos[$Tiefe] ], $Tiefe+1);
|
||||
dataXMLmain($Data, $Objekt->sub[$XMLpos[$Tiefe]], $Tiefe +1);
|
||||
}
|
||||
|
||||
function startXMLmain( $Data, &$Objekt, $Tiefe ) {
|
||||
function startXMLmain($Data, & $Objekt, $Tiefe) {
|
||||
global $XMLpos, $depth, $XMLDEBUG;
|
||||
|
||||
if( $XMLDEBUG)
|
||||
if($Tiefe==1)
|
||||
{ print_r(array_values ($XMLpos)); echo "--".$Data->name;
|
||||
if ($XMLDEBUG)
|
||||
if ($Tiefe == 1) {
|
||||
print_r(array_values($XMLpos));
|
||||
echo "--" . $Data->name;
|
||||
echo " #$Tiefe/$depth#";
|
||||
}
|
||||
|
||||
if( $depth==$Tiefe)
|
||||
{
|
||||
$Objekt->sub[ $XMLpos[$Tiefe] ] = $Data;
|
||||
if( $XMLDEBUG)
|
||||
echo "|". $XMLpos[$Tiefe]."|". $Objekt->sub[ $XMLpos[$Tiefe] ]->name. " ". $Data->name." save|". "#-#<br />";
|
||||
}
|
||||
else
|
||||
startXMLmain( $Data, $Objekt->sub[ $XMLpos[$Tiefe] ], $Tiefe+1);
|
||||
if ($depth == $Tiefe) {
|
||||
$Objekt->sub[$XMLpos[$Tiefe]] = $Data;
|
||||
if ($XMLDEBUG)
|
||||
echo "|" . $XMLpos[$Tiefe] . "|" . $Objekt->sub[$XMLpos[$Tiefe]]->name . " " . $Data->name . " save|" . "#-#<br />";
|
||||
} else
|
||||
startXMLmain($Data, $Objekt->sub[$XMLpos[$Tiefe]], $Tiefe +1);
|
||||
}
|
||||
|
||||
function start_element_handler($parser, $name, $attribs)
|
||||
{
|
||||
function start_element_handler($parser, $name, $attribs) {
|
||||
global $depth, $XMLmain, $XMLpos;
|
||||
|
||||
$Data = new element;
|
||||
$Data->name = $name;
|
||||
while(list($key, $value) = each($attribs))
|
||||
while (list ($key, $value) = each($attribs))
|
||||
$Data->attributes[$key] = convertValues($value);
|
||||
$Data->depth = $depth;
|
||||
$XMLpos[$depth]++;
|
||||
|
||||
if( $depth==0)
|
||||
$XMLmain= $Data;
|
||||
if ($depth == 0)
|
||||
$XMLmain = $Data;
|
||||
else
|
||||
startXMLmain( $Data, $XMLmain, 1);
|
||||
startXMLmain($Data, $XMLmain, 1);
|
||||
|
||||
$depth++;
|
||||
}
|
||||
|
||||
function end_element_handler($parser, $name)
|
||||
{
|
||||
function end_element_handler($parser, $name) {
|
||||
global $depth, $XMLpos;
|
||||
$XMLpos[$depth]=0;
|
||||
$XMLpos[$depth] = 0;
|
||||
$depth--;
|
||||
}
|
||||
|
||||
function character_data_handler($parser, $data)
|
||||
{
|
||||
function character_data_handler($parser, $data) {
|
||||
global $XMLmain;
|
||||
if( strlen(trim($data)) )
|
||||
dataXMLmain( $data, $XMLmain, 1);
|
||||
if (strlen(trim($data)))
|
||||
dataXMLmain($data, $XMLmain, 1);
|
||||
}
|
||||
|
||||
/*#######################################################################################*/
|
||||
function readXMLfile( $file )
|
||||
{
|
||||
function readXMLfile($file) {
|
||||
global $XMLDEBUG;
|
||||
|
||||
//$xml_parser = xml_parser_create_ns();
|
||||
|
|
@ -103,52 +111,44 @@ function readXMLfile( $file )
|
|||
xml_set_element_handler($xml_parser, "start_element_handler", "end_element_handler");
|
||||
xml_set_character_data_handler($xml_parser, "character_data_handler");
|
||||
|
||||
if (file_exists($file))
|
||||
{
|
||||
if (!($fp = fopen($file, "r")))
|
||||
{
|
||||
echo(" <h1>could not open XML file \"$file\"</h1>");
|
||||
if (file_exists($file)) {
|
||||
if (!($fp = fopen($file, "r"))) {
|
||||
echo (" <h1>could not open XML file \"$file\"</h1>");
|
||||
return -1;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
echo(" <h1>XML file \"$file\" not exist</h1>");
|
||||
} else {
|
||||
echo (" <h1>XML file \"$file\" not exist</h1>");
|
||||
return -1;
|
||||
}
|
||||
|
||||
if( $XMLDEBUG) echo "<pre>";
|
||||
while ($data = fread($fp, 4096))
|
||||
{
|
||||
if (!xml_parse($xml_parser, $data, feof($fp)))
|
||||
{
|
||||
die(sprintf("XML error: %s at line %d",
|
||||
xml_error_string(xml_get_error_code($xml_parser)),
|
||||
xml_get_current_line_number($xml_parser)));
|
||||
if ($XMLDEBUG)
|
||||
echo "<pre>";
|
||||
while ($data = fread($fp, 4096)) {
|
||||
if (!xml_parse($xml_parser, $data, feof($fp))) {
|
||||
die(sprintf("XML error: %s at line %d", xml_error_string(xml_get_error_code($xml_parser)), xml_get_current_line_number($xml_parser)));
|
||||
}
|
||||
}
|
||||
if( $XMLDEBUG) echo "</pre>";
|
||||
if ($XMLDEBUG)
|
||||
echo "</pre>";
|
||||
xml_parser_free($xml_parser);
|
||||
return 0;
|
||||
}
|
||||
|
||||
/*#######################################################################################*/
|
||||
function getXMLsubPease( $Sourse, $Name )
|
||||
{
|
||||
foreach($Sourse->sub as $key => $value) {
|
||||
function getXMLsubPease($Sourse, $Name) {
|
||||
foreach ($Sourse->sub as $key => $value) {
|
||||
if ($value->name == $Name) {
|
||||
return $value;
|
||||
}
|
||||
}
|
||||
|
||||
echo "<h1>Fehler: getXMLsubPease( $Sourse, $Name ) not found</h1>";
|
||||
// die;
|
||||
// die;
|
||||
}
|
||||
|
||||
/*#######################################################################################*/
|
||||
function getXMLsubData( $Sourse, $Name )
|
||||
{
|
||||
$XML = getXMLsubPease( $Sourse, $Name);
|
||||
function getXMLsubData($Sourse, $Name) {
|
||||
$XML = getXMLsubPease($Sourse, $Name);
|
||||
return $XML->data;
|
||||
}
|
||||
?>
|
||||
|
|
|
|||
|
|
@ -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");
|
||||
}
|
||||
}
|
||||
?>
|
||||
|
||||
|
|
@ -42,6 +42,7 @@ function make_navigation() {
|
|||
"admin_groups",
|
||||
"admin_faq",
|
||||
"admin_language",
|
||||
"admin_import",
|
||||
"admin_log"
|
||||
));
|
||||
return $menu;
|
||||
|
|
|
|||
|
|
@ -106,6 +106,10 @@ if (in_array($p, $privileges)) {
|
|||
require_once ('includes/pages/admin_language.php');
|
||||
$content = admin_language();
|
||||
}
|
||||
elseif ($p == "admin_import") {
|
||||
require_once ('includes/pages/admin_import.php');
|
||||
$content = admin_import();
|
||||
}
|
||||
elseif ($p == "admin_log") {
|
||||
require_once ('includes/pages/admin_log.php');
|
||||
$content = admin_log();
|
||||
|
|
|
|||
Loading…
Reference in New Issue