<?php // gepackt: 30.12.2005 23:13:25
/*
UH - View v0.9

        Copyright 2005  Ulrich Herrmann
        eMail: ulli@wer-ist-ulli.de
        URL: http://www.u-herrmann.de


        Dieses PHP-Script darf von Privatpersonen kostenlos
        benutzt werden, solange dieser Copyrightverweis, sowie der
        Copyrightverweis in der HTML-Ausgabe und der Quellcode des
        PHP-Scripts unverändert bleiben!

        Mit dem Einsatz dieses PHP-Scripts akzeptieren
        Sie, dass Ulrich Herrmann von jeglicher Haftung
        und Gewährleistung hinsichtlich des Einsatzes
        befreit ist.

        Der Verkauf dieses Skripts, auch in modifizierter
        Form, ist ohne vorherige Absprache ausdrücklich
        untersagt!

        Um dieses Skript über das Internet oder irgendein
        anderes Medium weiter zu verbreiten, benötigen
        Sie vorher die Erlaubnis von Ulrich Herrmann.

*/define('uhview',1);$rooteditpasswort="demo";$haupt_fenster_titel="Ulli's Bilderviewer";$konfigeditpasswort="konf";$kommentarpasswort="komm";$tn_size=120;$tn_size2=490;$back_pic_haupt=$rooturl."uhview_haupt_back.gif";$back_pic_links=$rooturl."uhview_links_back.gif";$text_holen_farbe="ffffff";$text_holen_border=3;$zeit_holen_farbe="aaaaaa";$zeit_holen_border=6;$beschreibung_holen_farbe="bbbbbb";$beschreibung_holen_border=0;$pic_size_farbe="cecece";$klick_zaehl_farbe="efefef";$verz_liste_farbe="ffffff";$verz_liste_border=4;$pic_size_border=5;$kommtar_input_border=3;$kommtar_input_farbe="eeeeee";$beschreibung_input_farbe="eeeeaa";$beschreibung_input_border=2;$icon_back_farbe="111111";$icon_titel_farbe="ffffff";$icon_border_size=2;$titel_border=10;$out_size=1000;$max_neuste=100;$diag="";$total_count=1;if (file_exists("uhview.vars_free.php")) {include_once("uhview.vars_free.php");$suchtext.="<!-- uhview.vars_free.php gelesen -->";}else {if (file_exists("uhview.vars.php")) {include_once("uhview.vars.php");$suchtext.="<!-- uhview.vars.php gelesen -->";}}if (file_exists("uhview.passwd_free.php")) {include_once("uhview.passwd_free.php");}if (defined('uhviewpasswdincludet')){;}else{ include_once("uhview.passwd.php");}if (file_exists("uhview.inc_free.php")) {include_once("uhview.inc_free.php");$suchtext.="<!-- uhview.inc_free.php gelesen -->";} else {if (file_exists("uhview.inc.php")) {include_once("uhview.inc.php");$suchtext.="<!-- uhview.inc.php gelesen -->";}}if (!defined('uhviewincludet')){$link_home="<a href=\"http://www.supernull.de\" target=\"_blank\">U.Herrmann</a>";$horiz="recht";$verti="unten";$logo_rand="10";$logo="uat_view_logo34x35.jpg";$start_dir=0;$start_pic=3;$erlaube_upload=0;$erlaube_upload_passwd="bla";}$rooturl="http://".$_SERVER['HTTP_HOST'].dirname($_SERVER['PHP_SELF'])."/";$rootcommand="http://".$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF'];$transparent_pic="uhview_out.gif";$fragezeichen_pic="uhview_fragezeichen.gif";$default_pic="uh_view_default_pic.jpg";$favicon_pic="favicon.ico";$total_count_file="uhtotal_count.txt";$dir_map="uh_anzeigenamen.txt";
$ext="_t60.jpg";$ext2="_t400.jpg";$ext3="_kom";$ext4="_cou";$ext5="_des";$ext6="_own";$feldtrenner="\t";$command=$_SERVER['PHP_SELF'];$thumbs="/thumbs/";$org_dir="/orginal_pic/";$logo_dir="/a_u_s_gabe_dir/";$email_dir="/zz_per_E_Mail/";$tmp_dir="Datenbank/";$lokalkonf="uhview_conf.txt";$erlaubte_typen=array("image/jpeg","image/pjpeg");$erlaubte_groes='2000000';$papierkorb="zum_loeschen";$tmp_file="tmp_text".time();$suchtext.="<!-- plumperquatsch ulli uhview -->\n<!-- vielleicht finde ich etwas im Netz wieder -->\n";$dirliste=array();$fileliste=array();if ($pfad=="") {$pfad="./";}$f=$_GET["f"] ;$m=$_GET["m"] ;$d=$_GET["d"] ;$a=$_POST["a"];if ( $d != "" ) {$pfad=$d; }if ( $d == "admin") {$d=admin_verteil(); echo $d ;exit();}if ( $a == "upload") {$d=upload_bild(); echo $d ;exit();}if ($m == "del_file") {$d=delete_bild("del"); echo $d ;exit();}if ($m == "move_file") {$d=delete_bild("move"); echo $d ;exit();}if ($m == "move_del_file") {$d=delete_bild("move_del_do"); echo $d ;exit();}if ($m == "_file") {$d=leerbild(); echo $d ;exit();}if ($f == "start_haupt") {html_head();erstes_bild("");exit();}if ($f == "start_links") {iconszeigen("");exit();}if ( $f != "" ) {$pfad=$f; }$total_count=zaehle_hoch($pfad,$m,$f);if ($m == "zzzzzz"){if ( $f != "" ) { $pfad=slashdran($f); }html_head(); erstes_bild($f);html_ende();machclean();exit();}if ($m == "zzz")   {if ( $f != "" ) {$pfad=slashdran($f); } add_comment($f,"user");exit();}if ($m == "zz")   {if ( $f != "" ) {$pfad=slashdran($f); } add_comment($f,"owner");exit();}if ($a == "add"){  $f=$_POST["f"]; $t=$_POST["user_eingabe"];$kenn=$_POST["kenn"];$wer=$_POST["wer"]; comment_to_file($f,$t,$kenn,$wer); exit();}if ($m == "zzzzz"){ if ( $f != "" ) {$pfad=dirname(dirname($f))."/"; } grosses_bild($f);exit();}if ($m == "zzzz"){ if ( $f != "" ) {$pfad=$f; } iconszeigen($f);exit();}if ($m == "z"){ if ( $f != "" ) {$pfad=$f; } alle_icon($f,$m);exit();}if ($m == "t"){ if ( $f != "" ) {$pfad=$f; } alle_icon($f,$m);exit();}if ($m == "config"){ edit_config($d,$f) ;exit();}if ($m == "anzeigen"){ einzelbild($d) ;exit();}if ($m == "papierkorb"){ papierkorb_func($d) ;exit();}if ($m == "up_mail"){ mailcheck($d,$f) ;exit();}if ($m == "user_upload"){ user_upload_func($d,$f) ;exit();}if ($a == "user_upload"){ $f=$_POST["f"]; $d=$_POST["d"];$a=user_upload_func($d,$f);echo $a ;exit();}if ($m == "") { frameschreiben($d); exit();}function erstes_bild($bi){global $dirliste, $fileliste,$pfad,$thumbs,$ext,$ext2,$tn_size,$tn_size2,$delta_pos,$transparent_pic,$back_pic_haupt;global $total_count,$link_home,$logo_dir,$rooturl,$start_pic;if ($bi == "" ) { sleep (1);$di=hol_dir_liste($pfad);$weg =$dirliste[0];hol_bilder_liste($weg.$logo_dir,"0");if (defined('uhviewincludet')){$bi= set_start_pic();}else { $bi=$fileliste[0];}} else { $bi=dirname($bi).$logo_dir.basename($bi);}if (!file_exists($bi)){ echo "<br>Bild ".kurz($bi)." ist nicht da "; return(0);}$aa=dirname(dirname($bi)).$thumbs.basename($bi).$ext2;$ab=dirname(dirname($bi))."/".basename($bi);
$call=tmp_bild($aa);$back=tmp_bild(basename($transparent_pic));lesconf(dirname($bi),"erstes_bild");$xv=getxsize($aa);$yv=getysize($aa);$t=zeit_holen($bi);$tx=text_holen($bi);$tb=beschreibung_holen($bi);echo "<table border=0 cellpadding=0 cellspacing=0 width=\"100%\" height=\"100%\" style=\"position:relative; top:".$delta_pos."\"><tr><td  valign=\"top\" style=\"background-image:url($back_pic_haupt)\" height=\"".$yv."\" >";echo "<br><center>";echo "<table cellpadding=0 cellspacing=0 border=1><tr>";echo "<td style=\"background-image:url($call)\">";echo "<a href=".$command."?m=zzzzz&f=".$ab." target=haupt>";echo "<img src=\"$back\" width=\"$xv\" height=\"$yv\" title=\"In Gross ==> Klick\" border=\"0\"></a></td>";echo "</tr></table><br><center>$tb</center>";echo "</center>";echo "<a href=".$command."?m=zzzzz&f=".$ab." target=haupt>GROSS</a><br>$tx</td>";echo "</tr><tr><td valign=\"bottom\" style=\"background-image:url($back_pic_haupt)\" >";echo "$t";echo "</td></tr>";if (defined('uhviewincludet')){;}else{echo "<tr><td valign=\"bottom\" align=\"right\"><font size=1>Copyright by $link_home</td></tr>";}echo "</table>";return(0);}function grosses_bild($bi){global $dirliste, $fileliste,$pfad,$thumbs,$ext,$ext2,$tn_size,$tn_size2,$delta_pos,$transparent_pic,$back_pic_haupt;global $logo_dir,$total_count,$link_home;html_head();$aa=dirname($bi).$logo_dir.basename($bi);$xs=getxsize($aa);$ys=getysize($aa);$txx=klick_zaehl_hoch($bi);lesconf(dirname($bi),"grosses_bild");$call=tmp_bild($aa);$back=tmp_bild(basename($transparent_pic));echo "<table border=0 width=\"100%\" height=\"100%\" style=\"position:relative; top:".$delta_pos."\"><tr><td valign=\"top\" style=\"background-image:url($back_pic_haupt)\" ><br><center>";echo "<table cellpadding=0 cellspacing=0 border=0><tr><td style=\"background-image:url($call)\">";echo "<a href=".$command."?m=zzzzzz&f=".$bi." target=haupt>";echo "<img src=\"$back\" width=\"$xs\" height=\"$ys\" title=\"in Klein --> Klick \" border=\"0\"></a></td></tr></table><br><a href=".$command."?m=zzzzzz&f=".$bi." target=haupt>Zur&uuml;ck</a></center>";echo "</td></tr>";if (defined('uhviewincludet')){;}else{echo "<tr><td valign=\"bottom\" align=\"right\"><font size=1>Copyright by $link_home</td></tr>";}echo "</table>";echo "</body></html>";}function iconszeigen($weg){global $dirliste, $fileliste,$pfad,$thumbs,$ext,$ext2,$tn_size,$tn_size2,$delta_pos,$back_pic_links,$total_count;global $icon_border_size,$icon_back_farbe,$icon_titel_farbe,$titel_border,$link_home,$iconspalten,$logo_dir;global $start_dir;html_head();$di=hol_dir_liste($pfad);if ($weg == "" ) {$weg =$dirliste[0];if ($start_dir<>""){if (defined('uhviewincludet')){$weg=set_start_dir();}}}$anza=hol_bilder_liste($weg.$logo_dir,"0");lesconf($weg,"iconszeigen");$aaa=dirname($weg)."/";$di=hol_dir_liste($aaa);$di=du_string($aaa);$a=basename($weg);$a=hol_map_namen(dirname($weg)."/",$a);$anz=count($fileliste);echo "<a name=\"anfang\">";echo "<table border=0 width=\"100%\" height=\"100%\" style=\"position:relative; top:".$delta_pos."\" cellpadding=6 cellspacing=0><tr><td valign=\"top\" style=\"background-image:url($back_pic_links)\">";
echo "$di";echo "<a name=\"listentop\">";echo "<table width=100% border=".$titel_border." bgcolor=\"#".$icon_titel_farbe."\" style=\"position:relative; top:8\"><tr><td>$a </td><td>$anz Bilder</td></tr></table>";echo "<br>";if (!defined('uhviewincludet')){$iconspalten=2;}else{echo "\n\n<!-- Spaltenzahl in der Updateversion veraenderbar -->\n\n";}$in=0;echo "\n<center><table width=80% border=0 bgcolor=\"#".$icon_back_farbe."\" >";if ( $anza < 1 ) {echo "Keine Bilder im Verzeichnis $pfad ";}foreach($fileliste as $a){$b=dirname(dirname($a)).$thumbs.basename($a).$ext;$aa=kurz($a);if ($in == 0) { echo "\n<tr>"; }echo "<td><center><a href=".$command."?m=zzzzzz&f=".$aa." target=haupt><img src=".$b." border=".$icon_border_size."></a></center></td>";$in++;if ($in == $iconspalten) { echo "</tr>"; $in =0;}}if ($in == 1){ echo "<td>&nbsp;</td></tr>";}echo "</table></center><br>\n";echo "<br><center><table bgcolor=\"#ffffff\" cellpadding=6 cellspacing=0><tr><td><a href=\"#anfang\"> <b>nach oben Seitenanfang</b> </a></td></tr><tr><td><center>";if (defined('uhviewincludet')){$a=mailcheck("link",dirname($weg));$a.=user_upload_func("link",$weg);echo $a ;}echo "<a href=".$command."?m=config&d=show&f=".dirname($weg)." target=haupt>Optionen</a></center> </td></tr></table></center>";echo "</td></tr>";if (defined('uhviewincludet')){;}else{echo "<tr><td valign=\"bottom\" align=\"right\"><font size=1>Copyright by $link_home</td></tr>";}echo "</table>";echo "</body></html>";}function alle_icon($weg,$wie){global $dirliste,$fileliste,$thumbs,$ext,$ext2,$ext4,$tn_size,$tn_size2,$back_pic_links,$delta_pos,$total_count;global $logo_dir,$icon_border_size,$icon_back_farbe,$icon_titel_farbe,$titel_border,$link_home,$iconspalten;global $max_neuste;html_head();$alle=array();$full=array();$y=0;$di=hol_dir_liste($weg);$di=du_string($weg);lesconf($weg,"alle_icon");foreach ($dirliste as $aa){hol_bilder_liste($aa.$logo_dir,"0");$alle=array_merge($alle,$fileliste);}if ($wie == "z"){$b_text="nach Uploaddatum...";foreach ($alle as $bb){if ( $bb != '' ) {$zeit = filectime($bb);$fu=array("$bb"=>"$zeit");$full=array_merge($full,$fu);}}}if ($wie == "t"){$b_text="Meist gesehen....";foreach ($alle as $bb){if ( $bb != '' ) {$bbf=basename($bb);$bbd=dirname(dirname($bb));$bbx=$bbd.$thumbs.$bbf.$ext4;$bbk=0;if (file_exists($bbx)){$array = file($bbx);$bbk=$array[0];}$fu=array("$bb"=>"$bbk");$full=array_merge($full,$fu);}}}asort($full,SORT_NUMERIC);$full=array_reverse($full);$anz=count($full);echo "<a name=\"anfang\">";echo "<table border=0 width=\"100%\" height=\"100%\" style=\"position:relative; top:".$delta_pos."\" cellpadding=6 cellspacing=0><tr><td valign=\"top\" style=\"background-image:url($back_pic_links)\">";echo "$di";echo "<a name=\"listentop\">";echo "<table width=100% border=".$titel_border." bgcolor=\"#".$icon_titel_farbe."\" style=\"position:relative; top:8\"><tr><td>".$b_text."</td><td> $anz </td></tr></table><br>";echo "\n\n<!-- Spaltenzahl in der Updateversion veraenderbar -->\n\n";if (!defined('uhviewincludet')){$iconspalten=2;$max_neuste=100;}
if ($max_neuste < $anz ){ echo "<center>angezeigt: $max_neuste von $anz</center><br>"; }$in=0;echo "\n<center><table width=80% border=0 bgcolor=\"#".$icon_back_farbe."\" >";foreach ($full  as $key=>$value){$b=dirname(dirname($key)).$thumbs.basename($key).$ext;$key=kurz($key);if ($in == 0) { echo "\n<tr>"; }echo "<td><center><a href=".$command."?m=zzzzzz&f=".$key." target=haupt><img src=".$b." border=".$icon_border_size."></a></center></td>";$in++;if ($in == $iconspalten) { echo "</tr>"; $in =0;}$a_pi++;if ($a_pi >= $max_neuste){ break;}}if ($in == 1){ echo "<td>&nbsp;</td></tr>";}echo "</table></center><br>\n";echo "\n\n<!-- Anzahl der angezeigten Bilder in der Updateversion veraenderbar -->\n\n";echo "<br><center><table bgcolor=\"#ffffff\" cellpadding=6 cellspacing=0><tr><td><a href=\"#anfang\"> <b>nach oben Seitenanfang</b> </a></td></tr><tr><td><center>";echo "<a href=".$command."?m=config&d=show&f=".$weg." target=haupt>Optionen</a></center></td></tr></table></center>";echo "</td></tr>";if (defined('uhviewincludet')){;}else{echo "<tr><td valign=\"bottom\" align=\"right\"><font size=1>Copyright by $link_home</td></tr>";}echo "</table>";echo "</body></html>";}function add_comment($bi,$wer){global $command,$thumbs,$ext,$ext2,$ext5,$tn_size,$tn_size2,$delta_pos,$transparent_pic,$back_pic_haupt,$ext3,$total_count;global $kommtar_input_farbe,$kommtar_input_border,$link_home,$beschreibung_input_farbe,$beschreibung_input_border;global $link_home;html_head();$aa=dirname($bi).$thumbs.basename($bi).$ext2;lesconf(dirname($bi),"add_comment");$xv=getxsize($aa);$yv=getysize($aa);$o="Dein Kommentar:";$m="<br>";$b=dirname($bi).$thumbs.(basename($bi)).$ext3;$call=tmp_bild($aa);$back=tmp_bild(basename($transparent_pic));$n=text_ausdatei($b);if ( $wer == "owner"){$m="<hr>";$m=$m."Dein Kennwort:<input type=text size=30 name=kenn >";$o="Bitte den Text richtigstellen:";if (defined('uhviewincludet')){$bb=dirname($bi).$thumbs.(basename($bi)).$ext5;$nn=text_ausdatei($bb);$mm="\n<form action=$command method=post>";$mm=$mm."<table width=90% bgcolor=\"#".$beschreibung_input_farbe."\" cellpadding=10 cellspacing=0 ";$mm=$mm." border=".$beschreibung_input_border."><tr><td> Beschreibung : ";$mm=$mm." <textarea name=\"user_eingabe\" cols=\"50\" ";$mm=$mm." rows=\"3\">$nn</textarea>";$mm=$mm."<input type=hidden name=f value=$bi>";$mm=$mm."<input type=hidden name=a value=add>";$mm=$mm."\n<input type=hidden name=wer value=".$wer."_beschreibung>";$mm=$mm." $m <input type=submit name=send value=Abschicken>";$mm=$mm."</form></td></tr></table>";} else {$mm="<hr><table width=\"100%\" border=3 bgcolor=#ffffff><tr><td><center> Eingabe von";$mm=$mm." Beschreibungen nur in der Vollversion $link_home";$mm=$mm."</center></td></tr></table>";}} else {if ($n != "" ) { $n=str_replace("\n","<br>",$n); $o="Bisherige Kommentare:<br>".$n."<hr>".$o."<br>"; $n="";}}echo "<table border=1 width=\"100%\" height=\"100%\" style=\"position:relative; top:".$delta_pos."\"><tr><td  valign=\"top\" style=\"background-image:url($back_pic_haupt)\" >";
echo "<table cellpadding=0 cellspacing=0 border=1><tr><td style=\"background-image:url($call)\">";echo "<img src=\"$back\" width=\"$xv\" height=\"$yv\" border=\"0\"></td></tr></table>";echo $mm;echo "\n<form action=$command method=post>";echo "<table width=90% bgcolor=\"#".$kommtar_input_farbe."\" cellpadding=10 cellspacing=0 border=".$kommtar_input_border."><tr><td>$o <textarea name=\"user_eingabe\" cols=\"50\" rows=\"10\">$n</textarea>";echo "<input type=hidden name=f value=$bi>";echo "<input type=hidden name=a value=add>";echo "\n<input type=hidden name=wer value=$wer>";echo "    $m ";echo "<input type=submit name=send value=Abschicken>";echo "</form>";echo "</td></tr></table>\n";echo "</td></tr>";if (defined('uhviewincludet')){;}else{echo "<tr><td valign=\"bottom\" align=\"right\"><font size=1>Copyright by $link_home</td></tr>";}echo "</table>";echo "</body></html>\n";}function comment_to_file($f,$te,$kenn,$wer){global $thumbs, $ext3,$feldtrenner,$total_count,$rooturl,$kommentarpasswort,$rooteditpasswort,$lokalkonf,$link_home;global $ext5,$rootcommand;html_head();$ou="<center>Bild links waehlen &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;oder&nbsp;&nbsp;&nbsp;&nbsp;";$dd=dirname(dirname($f));$ou.="<a href=\"".$rootcommand."?d=".$dd."\" target=\"_parent\">Zur &Uuml;bersicht</a></center>";$b=dirname($f).$thumbs.(basename($f)).$ext3;if ($wer == "user"){if ($te != "" ) {$te=nl2br(stripslashes(htmlspecialchars($te)));$datum = getdate();$te="\n$datum[mday].$datum[mon].$datum[year] $datum[hours]:$datum[minutes]:$datum[seconds] => ".$te." <=";haengdran($b,$te);$ou="Kommentar hinzugef&uuml;gt<br>".$ou;if (defined('uhviewincludet')){ $tex="Zum Bild :".$f." \n ist ein ne&uuml;r Kommentar hinzugef&uuml;gt worden\n";$tex=$tex."Text: $te \n\n ".$rootcommand."?m=anzeigen&d=".$f;$ou=$ou.kommentar_mail_versand($f,$tex);}else{$ou=$ou."<hr>Mailversand nur im Update<br> siehe hier ".$link_home;}}}if ($wer == "owner"){$ou=" ";$wo=dirname($f);lesconf($wo,"comment_to_file");if (( $rooteditpasswort == $kenn )||($kommentarpasswort == $kenn)) {dateineu($b,$te);$ou="Datei editiert!".$ou;} else {$ou=$ou." Kennwort falsch";}}if ($wer == "owner_beschreibung"){$b=dirname($f).$thumbs.(basename($f)).$ext5;$ou=" ";$wo=dirname($f);lesconf($wo,"comment_to_file");if (( $rooteditpasswort == $kenn )||($kommentarpasswort == $kenn)) {dateineu($b,$te);$ou="Datei editiert!".$ou;} else {$ou=$ou." Kennwort falsch";}}echo "<hr><center> $ou </center><hr>";echo "</body></html>\n";}function edit_config($was,$dir){global $command,$dir_map,$dirliste,$feldtrenner,$rooteditpasswort,$konfigeditpasswort,$lokalkonf,$link_home;$link="<hr width=80%><a href=".$command."?m=config&d=show&f=".$dir.">EDIT Config</a>";if ($was == "show"){$di=hol_dir_liste($dir."/");html_head();echo "<br>edit Mapliste ";echo "<form action=$command method=get><input type=hidden value=store name=d><input type=hidden value=$dir name=f><input type=hidden value=config name=m><table border=1><tr><td>Verzeichnis</td><td>Anzeige</td></tr>";$y=0;
foreach ($dirliste as $aa){$ou=hol_map_namen($dir."/",basename($aa));echo "<tr><td>".basename($aa)."</td><td><input type=hidden value=".basename($aa)." name=key".$y." ><input type=text name=map".$y." value=\"".$ou."\" size=40></td></tr>";$y++;}echo "</tr></table><input type=hidden value=".$y." name=count>Das Kennwort:<input type=text size=30 name=kenn ><input type=submit name=send value=Abschicken></form> ";echo "<hr>Konfigurationsdateien anlegen/&auml;ndern<hr>";echo"<table border=1>";$aa=array($dir);$dirliste=array_merge($aa,$dirliste);foreach ($dirliste as $aa){$ou=hol_map_namen($dir."/",basename($aa));echo "<tr><td>".basename($aa)."</td><td>";$aa=slashdazu($aa);if (file_exists($aa.$lokalkonf)){echo "<form action=$command method=get><input type=hidden value=edit_conf name=d><input type=hidden value=$dir name=f><input type=hidden value=config name=m><input type=hidden value=$aa name=wo>editieren:Das Kennwort:<input type=text size=30 name=kenn ><input type=submit name=send value=Abschicken></form>";} else {echo "<form action=$command method=get><input type=hidden value=create name=d><input type=hidden value=$dir name=f><input type=hidden value=config name=m><input type=hidden value=$aa name=wo>anlegen:Das Kennwort:<input type=text size=30 name=kenn ><input type=submit name=send value=Abschicken></form>";}echo"</td></tr>";}echo "</tr></table>";if (defined('uhviewincludet')){ $ou=admin_zusatz($dir);}else{$ou="<br><hr><table width=100% border=1><tr><td>Upload,L&ouml;schen e.t.c<br>Weitere Adminm&ouml;glichkeiten nur im Update. Informationen hier: $link_home</td></tr></table> ";}echo $ou;echo "</body></html>\n";}if ($was == "store"){$key=$_GET["key"];$map=$_GET["map"];$count=$_GET["count"];$kenn=$_GET["kenn"];$f=$_GET["f"];$ou="";html_head();for($a=0;$a<=$count;$a++){$key=$_GET["key".$a];$map=$_GET["map".$a];$ou=$ou.$key.$feldtrenner.$map."\n";}$a=$dir."/".$dir_map;if ($rooteditpasswort == $kenn) {dateineu($a,$ou);echo " Map-Datei $a geschrieben";}else{echo "<hr>Nur der Besitzer des Rootpasswort darf die Namen &auml;ndern"; }echo " <br><hr><a href=".$command."?m=config&d=show&f=".$f." target=haupt>EDIT Config</a>";echo "<hr>Bild Links w&auml;hlen";echo "</body></html>\n";}if ($was == "create"){$d=$_GET["d"];$f=$_GET["f"];$m=$_GET["m"];$wo=$_GET["wo"];$kenn=$_GET["kenn"];$wo=slashdazu($wo);if (( $rooteditpasswort == $kenn )||( $konfigeditpasswort == $kenn))  {schreib_config($wo.$lokalkonf);$o="<hr>  angelegt $wo$lokalkonf ".time();}else{$o="Nur der Besitzer des Rootpasswort oder des Konfigpasswort darf Konfigdateien anlegen ";}html_head();echo "$o $link";echo "</body></html>\n";}if ($was == "del_conf"){$d=$_GET["d"];$f=$_GET["f"];$m=$_GET["m"];$wo=$_GET["wo"];$kenn=$_GET["kenn"];echo "konf l&ouml;schen";$wo=slashdazu($wo);if (($rooteditpasswort == $kenn )||( $konfigeditpasswort == $kenn))  { $o="<hr> l&ouml;schen $wo$lokalkonf ";if(@unlink($wo.$lokalkonf)){$o=$o."Die Datei $wo$lokalkonf wurde gelöscht!";}else{ $o=$o."Konnte die Datei $wo$lokalkonf nicht löschen!";}
}else{$o="Nur der Besitzer des Rootpasswort oder des Konfigurationspasswort darf Konfigdateien l&ouml;schen";}html_head();echo "$o $link";echo "</body></html>\n";}if ($was == "edit_conf"){$d=$_GET["d"];$f=$_GET["f"];$m=$_GET["m"];$wo=$_GET["wo"];$kenn=$_GET["kenn"];echo "<hr>konf edit";$wo=slashdazu($wo);lese_config($wo.$lokalkonf);if (($rooteditpasswort == $kenn )||( $konfigeditpasswort == $kenn))  { $o="<hr> edit $wo$lokalkonf ";lese_config($wo.$lokalkonf);$o=$o."<form action=$command method=get><input type=hidden value=store_edit name=d><input type=hidden value=$dir name=f><input type=hidden value=config name=m><input type=hidden value=$wo name=wo> <input type=hidden value=$kenn name=kenn>";$o=$o.zeig_config($wo.$lokalkonf);$o=$o."<input type=submit name=send value=Abschicken></form>";$o=$o.$link."<hr>";$o=$o."<form action=$command method=get><input type=hidden value=del_conf name=d><input type=hidden value=$dir name=f><input type=hidden value=config name=m><input type=hidden value=$wo name=wo>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Datei l&ouml;schen:  Das Kennwort:<input type=text size=30 name=kenn ><input type=submit name=send value=Abschicken></form>";}else{$o="Nur der Besitzer des Rootpasswort oder des Konfigurationspasswort darf Konfigdateien &auml;ndern";}html_head();echo "$o  ";echo "</body></html>\n";}if ($was == "store_edit"){$d=$_GET["d"];$f=$_GET["f"];$m=$_GET["m"];$wo=$_GET["wo"];$kenn=$_GET["kenn"];echo "<hr>konf edit";$wo=slashdazu($wo);lese_config($wo.$lokalkonf);if (($rooteditpasswort == $kenn )||( $konfigeditpasswort == $kenn))  { $o="<hr> gespeichert $wo$lokalkonf ";config_aus_form();schreib_config($wo.$lokalkonf);}else{$o="Nur der Besitzer des Rootpasswort oder des Konfigurationspasswort darf Konfigdateien $auml;ndern";}html_head();echo "$o $link ";echo "</body></html>\n";}}function schreib_config($f){global $konfigeditpasswort,$kommentarpasswort,$tn_size,$tn_size2,$back_pic_haupt,$back_pic_links,$text_holen_farbe;global $text_holen_border,$zeit_holen_farbe,$zeit_holen_border,$pic_size_farbe,$klick_zaehl_farbe,$verz_liste_farbe;global $verz_liste_border,$pic_size_border,$kommtar_input_border,$kommtar_input_farbe,$icon_back_farbe;global $icon_titel_farbe,$icon_border_size,$titel_border,$erlaube_upload,$erlaube_upload_passwd;global $beschreibung_input_farbe,$beschreibung_input_border,$beschreibung_holen_farbe,$beschreibung_holen_border;dateineu($f,"");haengdran($f,$konfigeditpasswort."\n");haengdran($f,$kommentarpasswort."\n");haengdran($f,$tn_size."\n");haengdran($f,$tn_size2."\n");haengdran($f,$back_pic_haupt."\n");haengdran($f,$back_pic_links."\n");haengdran($f,$text_holen_farbe."\n");haengdran($f,$text_holen_border."\n");haengdran($f,$zeit_holen_farbe."\n");haengdran($f,$zeit_holen_border."\n");haengdran($f,$pic_size_farbe."\n");haengdran($f,$klick_zaehl_farbe."\n");haengdran($f,$verz_liste_farbe."\n");haengdran($f,$verz_liste_border."\n");haengdran($f,$pic_size_border."\n");haengdran($f,$kommtar_input_border."\n");
haengdran($f,$kommtar_input_farbe."\n");haengdran($f,$icon_back_farbe."\n");haengdran($f,$icon_titel_farbe."\n");haengdran($f,$icon_border_size."\n");haengdran($f,$titel_border."\n");haengdran($f,$beschreibung_input_farbe."\n");haengdran($f,$beschreibung_input_border."\n");haengdran($f,$beschreibung_holen_farbe."\n");haengdran($f,$beschreibung_holen_border."\n");haengdran($f,$erlaube_upload."\n");haengdran($f,$erlaube_upload_passwd."\n");}function lese_config($f){global $konfigeditpasswort,$kommentarpasswort,$tn_size,$tn_size2,$back_pic_haupt,$back_pic_links,$text_holen_farbe;global $text_holen_border,$zeit_holen_farbe,$zeit_holen_border,$pic_size_farbe,$klick_zaehl_farbe,$verz_liste_farbe;global $verz_liste_border,$pic_size_border,$kommtar_input_border,$kommtar_input_farbe,$icon_back_farbe;global $icon_titel_farbe,$icon_border_size,$titel_border,$erlaube_upload,$erlaube_upload_passwd;global $beschreibung_input_farbe,$beschreibung_input_border,$beschreibung_holen_farbe,$beschreibung_holen_border;$a = file($f);$konfigeditpasswort=trim($a[0]);$kommentarpasswort=trim($a[1]);$tn_size=trim($a[2]);$tn_size2=trim($a[3]);$back_pic_haupt=trim($a[4]);$back_pic_links=trim($a[5]);$text_holen_farbe=trim($a[6]);$text_holen_border=trim($a[7]);$zeit_holen_farbe=trim($a[8]);$zeit_holen_border=trim($a[9]);$pic_size_farbe=trim($a[10]);$klick_zaehl_farbe=trim($a[11]);$verz_liste_farbe=trim($a[12]);$verz_liste_border=trim($a[13]);$pic_size_border=trim($a[14]);$kommtar_input_border=trim($a[15]);$kommtar_input_farbe=trim($a[16]);$icon_back_farbe=trim($a[17]);$icon_titel_farbe=trim($a[18]);$icon_border_size=trim($a[19]);$titel_border=trim($a[20]);$beschreibung_input_farbe=trim($a[21]);$beschreibung_input_border=trim($a[22]);$beschreibung_holen_farbe=trim($a[23]);$beschreibung_holen_border=trim($a[24]);$erlaube_upload=trim($a[25]);$erlaube_upload_passwd=trim($a[26]);}function zeig_config($f){global $konfigeditpasswort,$kommentarpasswort,$tn_size,$tn_size2,$back_pic_haupt,$back_pic_links,$text_holen_farbe;global $text_holen_border,$zeit_holen_farbe,$zeit_holen_border,$pic_size_farbe,$klick_zaehl_farbe,$verz_liste_farbe;global $verz_liste_border,$pic_size_border,$kommtar_input_border,$kommtar_input_farbe,$icon_back_farbe;global $icon_titel_farbe,$icon_border_size,$titel_border,$erlaube_upload,$erlaube_upload_passwd;global $beschreibung_input_farbe,$beschreibung_input_border,$beschreibung_holen_farbe,$beschreibung_holen_border;$a= "<table><tr><td>DATEi $f <br>Passwort f&uuml;r Konfig <input type=text name=konfigeditpasswort value=".$konfigeditpasswort."><br>Passwort f&uuml;r kommentare <input type=text name=kommentarpasswort value=".$kommentarpasswort."><br>Tumbnailgr&ouml;sse :<input type=text name=tn_size value=".$tn_size."><br>Bildgr&ouml;sse : <input type=text name=tn_size2 value=".$tn_size2."><br>Hintergrundbild Hauptfenster :<input type=text name=back_pic_haupt value=".$back_pic_haupt." size=70><br>Hintergrundbild Iconfenster:<input type=text name=back_pic_links value=".$back_pic_links." size=70><br>
Farbe Dateiinfo:<input type=text name=text_holen_farbe value=".$text_holen_farbe."><br>Rand Dateiinfo:<input type=text name=text_holen_border value=".$text_holen_border."><br>Farbe Zeiteninfo:<input type=text name=zeit_holen_farbe value=".$zeit_holen_farbe."><br>Rand Zeiteninfo:<input type=text name=zeit_holen_border value=".$zeit_holen_border."><br>Farbe Bildgr&ouml;ssentext:<input type=text name=pic_size_farbe value=".$pic_size_farbe."><br>Farbe Klickz&auml;hler:<input type=text name=klick_zaehl_farbe value=".$klick_zaehl_farbe."><br>Farbe Verzeichnisname:<input type=text name=verz_liste_farbe value=".$verz_liste_farbe."><br>Rand Verzeichnisname:<input type=text name=verz_liste_border value=".$verz_liste_border."><br>Rand Bildgr&ouml;ssetext:<input type=text name=pic_size_border value=".$pic_size_border."><br>Rand Kommentareingabe:<input type=text name=kommtar_input_border value=".$kommtar_input_border."><br>Farbe Kommentareingabe:<input type=text name=kommtar_input_farbe value=".$kommtar_input_farbe."><br>Hintergrundfarbe Icon:<input type=text name=icon_back_farbe value=".$icon_back_farbe."><br>Farbe Icontabelle:<input type=text name=icon_titel_farbe value=".$icon_titel_farbe."><br>Rand um Icon <input type=text name=icon_border_size value=".$icon_border_size."><br>TitelRand <input type=text name=titel_border value=".$titel_border."><br>Bildbeschreibung Input Farbe <input type=text name=beschreibung_input_farbe value=".$beschreibung_input_farbe."><br>Bildbeschreibung Input Rand <input type=text name=beschreibung_input_border value=".$beschreibung_input_border."><br>Bildbeschreibung Farbe  <input type=text name=beschreibung_holen_farbe value=".$beschreibung_holen_farbe."><br>Bildbeschreibung Rand   <input type=text name=beschreibung_holen_border value=".$beschreibung_holen_border."><br>";$a.="<hr>Folgende Werte greifen nur bei der UpdateVersion<hr>Erlaube Upload in das Verzeichnis <input type=text name=erlaube_upload value=".$erlaube_upload." size=2> 0/1<br>Erlaube Upload nur mit Passwort<input type=text name=erlaube_upload_passwd value=\"".$erlaube_upload_passwd."\" size=20> nichts==> Upload ohne Passwort<br><br></td></tr></table>";return $a;}function config_aus_form(){global $konfigeditpasswort,$kommentarpasswort,$tn_size,$tn_size2,$back_pic_haupt,$back_pic_links,$text_holen_farbe;global $text_holen_border,$zeit_holen_farbe,$zeit_holen_border,$pic_size_farbe,$klick_zaehl_farbe,$verz_liste_farbe;global $verz_liste_border,$pic_size_border,$kommtar_input_border,$kommtar_input_farbe,$icon_back_farbe;global $icon_titel_farbe,$icon_border_size,$titel_border,$erlaube_upload,$erlaube_upload_passwd;global $beschreibung_input_farbe,$beschreibung_input_border,$beschreibung_holen_farbe,$beschreibung_holen_border;$konfigeditpasswort=$_GET["konfigeditpasswort"];$kommentarpasswort=$_GET["kommentarpasswort"];$tn_size=$_GET["tn_size"];$tn_size2=$_GET["tn_size2"];$back_pic_haupt=$_GET["back_pic_haupt"];$back_pic_links=$_GET["back_pic_links"];$text_holen_farbe=$_GET["text_holen_farbe"];
$text_holen_border=$_GET["text_holen_border"];$zeit_holen_farbe=$_GET["zeit_holen_farbe"];$zeit_holen_border=$_GET["zeit_holen_border"];$pic_size_farbe=$_GET["pic_size_farbe"];$klick_zaehl_farbe=$_GET["klick_zaehl_farbe"];$verz_liste_farbe=$_GET["verz_liste_farbe"];$verz_liste_border=$_GET["verz_liste_border"];$pic_size_border=$_GET["pic_size_border"];$kommtar_input_border=$_GET["kommtar_input_border"];$kommtar_input_farbe=$_GET["kommtar_input_farbe"];$icon_back_farbe=$_GET["icon_back_farbe"];$icon_titel_farbe=$_GET["icon_titel_farbe"];$icon_border_size=$_GET["icon_border_size"];$titel_border=$_GET["titel_border"];$beschreibung_input_farbe=$_GET["beschreibung_input_farbe"];$beschreibung_input_border=$_GET["beschreibung_input_border"];$beschreibung_holen_farbe=$_GET["beschreibung_holen_farbe"];$beschreibung_holen_border=$_GET["beschreibung_holen_border"];$erlaube_upload=$_GET["erlaube_upload"];$erlaube_upload_passwd=$_GET["erlaube_upload_passwd"];}function hol_dir_liste($pfad){global $dirliste, $fileliste,$papierkorb,$copy_dir;$y=0;$dirliste="";if (file_exists($pfad)){if($Verzeichniszeiger=opendir($pfad)){while($Datei=readdir($Verzeichniszeiger)){if(is_dir($pfad.$Datei)){if ( $Datei != "." && $Datei != ".." && $Datei != "$papierkorb" && $Datei != "$copy_dir"){clearstatcache();$dirliste[$y]=$pfad.$Datei."/";$y++;}}}}if ( $y == 0 ) {echo "Keine Verzeichnis in $pfad gefunden ABBRUCH <hr>"; exit();}closedir($Verzeichniszeiger);asort($dirliste,SORT_STRING);}}function tmp_bild($w){global $tmp_dir;srand((double)microtime()*1000000);$o=$tmp_dir."pic_"."_".time()."_".rand()."_";for ($a=0;$a<10000000;$a++){ if(file_exists($o)) { $o=$o."_".$a;} else {break;}}if (@copy($w,$o)){;}else{echo "Kein Vorschaubild vorhanden";}return($o);}function machclean(){global $tmp_dir;$t=20;if($Verzeichniszeiger=opendir($tmp_dir)){while($Datei=readdir($Verzeichniszeiger)){if(is_file($tmp_dir.$Datei)){$alt_zeit=filectime($tmp_dir.$Datei);$akt_zeit=time();$c=$t;$alt_zeit=$alt_zeit+$c;if ( $alt_zeit < $akt_zeit ) { unlink($tmp_dir.$Datei); }}}}closedir($Verzeichniszeiger);}function du_string($pfad){global $dirliste,$verz_liste_farbe,$verz_liste_border;$dl="<table border=".$verz_liste_border." width=100% bgcolor=\"#".$verz_liste_farbe."\"><tr>";foreach ($dirliste as $aa){$ou=hol_map_namen($pfad,basename($aa));$dl=$dl."<td colspan=2><a href=".$command."?m=zzzz&f=".$aa."#listentop target=links >".$ou."</a></td></tr><tr>";}$dl=$dl."</td><td><a href=".$command."?m=z&f=".$pfad.$Datei."#listentop target=links >neuste</a></td><td><a href=".$command."?m=t&f=".$pfad.$Datei."#listentop target=links >Top Ten</a></td></tr></table>";return($dl);}function kurz($f){return slashdran($f).basename($f);}function hol_map_namen($weg,$was){global $feldtrenner,$dir_map;$ers=bestimmtes_feld_aus_datei($weg.$dir_map,$feldtrenner,1,$was,0);for($x=0;$x<count($ers);$x++){ $c=$c.$ers[$x];}if ($c == "" ) {$ou=$was;}else{$ou=$c;}return ($ou);}function hol_bilder_liste($a,$full){global $dirliste, $fileliste;$y=0;$out=0;
$fileliste="";if (file_exists($a)){if($Verzeichniszeiger=opendir($a)){while($Datei=readdir($Verzeichniszeiger)){if (!is_dir($a.$Datei)){$path_parts = pathinfo($a.$Datei); $aa=strtolower($path_parts["extension"]);if ($aa == "jpg"){$out=1;}if ($aa == "jpeg"){$out=1;}if ($full==1){$out=1;}if ( $out == 1 ){if((is_file($a.$Datei))){clearstatcache();$fileliste[$y]=$a.$Datei;$y++;$out=0;}} else {;}}}}if ( $y == 0 ) {return(0);}asort($fileliste,SORT_STRING);}else{echo " Kann Verzeichnis > $a < nicht lesen";}return($y);}function getxsize($f){global $diag;if (!ist_jpeg($f)) {return(0);}$Bilddaten = getimagesize($f);$OriginalBreite = $Bilddaten[0];if ($diag){ echo "<br>getxsize FILE: $f SIZE $OriginalBreite";}return($OriginalBreite);}function getysize($f){global $diag;if (!ist_jpeg($f)) {return(0);}$Bilddaten = getimagesize($f);$Originalhoehe = $Bilddaten[1];if ($diag){ echo "<br>getxsize FILE: $f SIZE $Originalhoehe";}return($Originalhoehe);}function ist_jpeg($f){if (!file_exists($f)) {return(0);}$path_parts = pathinfo($f);$aa=strtolower($path_parts["extension"]);$out=0;if ($aa == "jpg"){$out=1;}if ($aa == "jpeg"){$out=1;}if ( $out == 0 ) {return(0);}return(1);}function zaehle_hoch($pfad,$m,$f){global $total_count,$total_count_file;if (!$total_count){return("");}$a= "Kein M mit z ";if (substr($m,0,1) == "z"){$b=$pfad;for ($aa=0;$aa<6;$aa++){$x=$b.$total_count_file;$b=slashdazu(dirname($b));if (file_exists($x)){$array = file($x);$c=chop($array[0]);$c=$c+1;dateineu($x,$c);$aa=7;}$a="PFAD $pfad M $m F $f XXX $x C $c XX";}$a=" $c ";}return($a);}function klick_zaehl_zeig($f){global $ext4,$thumbs,$total_count,$klick_zaehl_farbe;$f=kurz($f);$b=dirname($f).$thumbs.(basename($f)).$ext4;if (!file_exists($b)){ $a=" ";}else {$array = file($b);$a=" DATEI Zeig $f  $b $array[0]";$a="<table width=100% border=0 bgcolor=\"#".$klick_zaehl_farbe."\"><tr><td width=1%>Klicks: </td><td> $array[0] </td><td> $total_count </td></tr></table>";}return($a);}function klick_zaehl_hoch($f){global $ext4,$thumbs;$b=dirname($f).$thumbs.(basename($f)).$ext4;$adr=$_SERVER["REMOTE_ADDR"];if (!file_exists($b)){ dateineu($b,"1\n".$adr."_".time()."\n"); return("datei angelegt");}$array = file($b);$c=$array[0];$ca=1;$c=$c+1;for($x=1;$x<count($array);$x++){$y=$array[$x];$p=strpos($y,"_");$xx=substr($y,0,$p);$yy=substr($y,$p+1,(strlen($y)));$yy=chop($yy);if ($xx == $adr) {if ($ca == 1 ){$yy=$yy+300;$yt=time();settype($yy,"integer");settype($yt,"integer");if ( $yt > $yy ){$er="erhoehen";$d=$d.$adr."_".time()."\n";$ca=0; }else {$er="NICHTerhoehen";$d=$d.$adr."_".time()."\n"; $c=$c-1; $ca=0;}}} else {$d=$d.$y;}}$d=$c."\n".$d;if ($ca == 1){ $e=$d.$adr."_".time()."\n";} else { $e=$d;}dateineu($b,$e);$a=" DATEI Hoch $f $b $e CC $c YY $yy XX $xx YT $yt ER $er";$a="";return($a);}function beschreibung_holen($f){global $logo_dir,$thumbs,$ext5,$beschreibung_holen_border,$beschreibung_holen_farbe;if (!file_exists($f)) {return("Keine Textdatei gefunden $f");}$b=str_replace($logo_dir,$thumbs,$f).$ext5;if (!file_exists($b)) {$c="Keine Beschreibungsdatei gefunden $b <br> $f";
$c="";} else {$c=text_ausdatei($b);$c=str_replace("\n","<br>",$c);}if ($c != "" ) {$c="<table border=".$beschreibung_holen_border." bgcolor=\"#".$beschreibung_holen_farbe."\"><tr><td>$c</td></tr></table>";}else {$c="<br>"; }$a= "$c";return($a);}function text_holen($f){global $logo_dir,$ext3,$thumbs,$command,$text_holen_farbe,$text_holen_border;if (!file_exists($f)) {return("Keine Textdatei gefunden $f");}$b=str_replace($logo_dir,$thumbs,$f).$ext3;if (!file_exists($b)) {$c="Keine Kommentardatei gefunden $b $f ";$c=" ";} else {$c=text_ausdatei($b);$c=str_replace("\n","<br>",$c);}if ($c != "" ) {$c="<table width=100% border=".$text_holen_border." bgcolor=\"#".$text_holen_farbe."\"><tr><td width=1%>Kommentar:</td><td>$c</td><td> <a href=\"".$command."?m=zzz&f=".kurz($f)."\">Hinzuf&uuml;gen</a></td><td> <a href=\"".$command."?m=zz&f=".kurz($f)."\">Edit</a></td></tr></table>";}$a= "$c";return($a);}function text_ausdatei($f){if (file_exists($f)){$array = file($f);for($x=0;$x<count($array);$x++){ $c=$c.$array[$x]; }} else {$c="";}return($c);}function haengdran($f,$txt){$fp = fopen ($f, "a");fwrite ($fp, $txt);fclose ($fp);}function dateineu($f,$txt){if (($fp = fopen ($f, "w")) == 0 ){return(0);}fwrite ($fp, $txt);fclose ($fp);return(1);}function zeit_holen($f){global $zeit_holen_farbe,$pic_size_farbe,$pic_size_border,$zeit_holen_border,$command;if (!file_exists($f)) {return("_");}$tx=klick_zaehl_zeig($f);clearstatcache();$zeit = fileatime($f);$a="Letzter Zugriff auf die Datei: " .gmdate("d M Y H:i:s", $zeit);clearstatcache();$zeit = filectime($f);$a=$a."<br>Uploaddatum: " .gmdate("d M Y H:i:s", $zeit);$a=$a."<br>Datei: ".basename($f);$a=$a."<br>Verzeichnis: ".dirname(dirname($f));if (defined('uhviewincludet')){$loe="<td><a href=".$command."?m=del_file&f=".kurz($f).">L&ouml;schen</a><br><br><br><a href=".$command."?m=move_file&f=".kurz($f).">Verschieben</a></td>";}else{;}$xs=getxsize($f);$ys=getysize($f);$a="<table width=100% border=".$zeit_holen_border." bgcolor=\"#".$zeit_holen_farbe."\"><tr><td>$a</td><td>";$a=$a."<table width=100% border=".$pic_size_border." bgcolor=\"#".$pic_size_farbe."\"><tr><td> Bildgr&ouml;sse: $xs x $ys Pixel</td></tr><tr><td> $tx </td></tr></table></td>$loe</tr></table>";return($a);}function hole_feld_aus_datei($datei,$feldtrenner,$feld) {global $diag;if ($diag) { echo "<br>hole_feld_aus_datei DATEI: $datei TRENNER: $feldtrenner FELD $feld <hr>";}$con=0;$fp = fopen($datei,"r");while($zeile = fgetcsv($fp,1500,$feldtrenner)){if ($diag) {$a=implode(" : ",$zeile); echo "<br>ZEILE  $a <br>"; }$ergeb[$con]=$zeile[$feld]; $con++;}if ($ergeb == "") {$ergeb=$feld." nicht gefunden";}fclose($fp);if ($diag) {$a=implode(" : ",$ergeb); echo "<br>ENDE $a <br>"; }return($ergeb);}function bestimmtes_feld_aus_datei($datei,$feldtrenner,$holfeld,$feldinhalt,$sollfeld) {global $diag;if ($diag) { echo "bestimmtes_Feld_holen DATEI: $datei soll $sollfeld hol $holfeld Inhalt $feldinhalt <hr>";}if (!file_exists($datei)){ return(0);}$ergeb=array(); $con=0;
$fp = fopen($datei,"r");while($zeile = fgetcsv($fp,1500,$feldtrenner)){if ($diag) {$a=implode(" : ",$zeile); echo "<br>ZEILE  $a<br>"; }if ( trim(strtolower($feldinhalt)) == trim(strtolower($zeile[$sollfeld])) ) { $ergeb[$con]=trim($zeile[$holfeld]); $con++;if ($diag){ echo "GEFUNDEN $zeile[$sollfeld] <br>";}}}if ($ergeb == "") {$ergeb=$feld." nicht gefunden";}fclose($fp);if ($diag) {$a=implode(" : ",$ergeb); echo "<br>ENDE $a<br>"; }return($ergeb);}function frameschreiben($d){global $delta_pos, $command, $linkes_fenster;html_head();if ( $d != "" ) {  if (substr($d,strlen($d)-1,1) != "/" ){$d=$d."/";} $a="&d=".$d;}else { echo "Kein Verzeichnis angegeben Abbruch"; exit();}setup();if (!defined('uhviewincludet')){$linkes_fenster=300;}echo "<center><table border=0 width=\"99%\" height=\"99%\" style=\"position:relative; top:".$delta_pos."\" cellpadding=0 cellspacing=0><tr><td width=\"".$linkes_fenster."\">\n\n<!-- Breite in der Updateversion einstellbar -->\n<iframe src=\"$command?f=start_links$a\" width=\"99%\" height=\"99%\" name=\"links\" marginwidth=\"0\" marginheight=\"0\" frameborder=0>Ihr Browser kann leider keine eingebetteten Frames:</iframe></td><td><iframe src=\"$command?f=start_haupt$a\" width=\"99%\" height=\"99%\" name=\"haupt\" marginwidth=\"0\" marginheight=\"0\" frameborder=0>Ihr Browser kann leider keine eingebetteten Frames anzeigen!</iframe></td></tr></table></center></body></html>";}function html_head(){global $haupt_fenster_titel,$suchtext;if (defined('uhviewincludet')) {$haupt=$haupt_fenster_titel;}else{$haupt=$haupt_fenster_titel."&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;.....aus der kleinen Softwareschmiede &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;";}echo "<html><head>";echo "<title>".$haupt."</title>\n";echo "<META http-equiv=\"Cache-Control\" content=\"no-cache , must-revalidate\"> \n";echo "<META http-equiv=\"Pragma\" content=\"no-cache\"> \n";echo "<META http-equiv=\"Expires\" content=\"Mon, 26 Jul 1997 05:00:00 GMT\"> \n";echo "<META http-equiv=\"Last-Modified\" content=\"" . gmdate("D,  d M Y H:i:s") . "\"GMT\"> \n";echo"<style type=\"text/css\"><!--body {background-color:#ffffff; margin-left:0px;margin-right:0px; margin-top:0px;margin-bottom:0px;font-family:\"Arial\"; }--></style>";echo "</head><body>\n $suchtext \n<!--                             -->\n<!--   Alle Rechte vorbehalten   -->\n<!--   U.Herrmann                -->\n<!--   http://www.supernull.de   -->\n<!--   mail@u-herrmann.de        -->\n<!--                             -->\n";}function html_ende(){echo "</body></html>";}function setup(){if (file_exists("uhview.startup.php")) {include_once("uhview.startup.php");echo "<!-- uhview.startup.php lesen -->";} else {if (file_exists("uhview.startup_free.php")) {include_once("uhview.startup_free.php");echo "<!-- uhview.startup_free.php lesen -->";}}if (!defined('uhviewstartupincludet')) {echo "Kann Startup.php nicht finden Abbruch!"; exit(); }setup_extern();}function lesconf($w,$xx)
{global $lokalkonf;if (substr($w,strlen($w)-1,1) != "/" ){$w=$w."/";}$v=dirname($w);if (substr($v,strlen($v)-1,1) != "/" ){$v=$v."/";}if (file_exists($v.$lokalkonf)) { lese_config($v.$lokalkonf);echo "<!-- gelesen $v.$lokalkonf fuer $xx -->\n";}else {echo "<!-- NICHT gelesen $v.$lokalkonf fuer $xx -->\n";}if (file_exists($w.$lokalkonf)) { lese_config($w.$lokalkonf);echo "<!-- gelesen $w.$lokalkonf fuer $xx -->\n";} else {echo "<!-- NICHT gelesen $w.$lokalkonf fuer $xx -->\n";}}function slashdran($a){$a=dirname(dirname($a));$a=slashdazu($a);return ($a);}function slashdazu($a){if (substr($a,strlen($a)-1,1) != "/" ){$a=$a."/";}return ($a);}function leerbild(){global $link_home;html_head(); $a="<br><br><center><b>Diese Funktionen nur mit einem Update</b><br> siehe hier $link_home </center><hr>";return($a);}function datei_da($d){$path_parts = pathinfo($d);$aa=($path_parts["extension"]);$aa=".".$aa;$bb=basename($d);$cc=dirname($d);$cc=slashdazu($cc);$bb=substr($bb,0,((strlen($bb))-(strlen($aa))));for ($a=0;$a<10000000;$a++){ if(file_exists($d)) { $d=$cc.$bb."_".$a.$aa;} else {break;}}return($d);}
?>