\n"; if (substr($wd_PathParam,-1,1) <> "/") $wd_PathParam .= "/"; if (($wd_PathParam == "./") || ($wd_PathParam == "/")) $wd_PathParam = ""; if (substr($wd_PathParam,0,2) == "./") $wd_PathParam = substr($wd_PathParam,2); $wd_path = $pth['folder']['base'] . $wd_PathParam; if(eregi("true",$plugin_cf['wdir']['debug'])) { $wdo .= "Path-Parameter: $wd_PathParam
"; $wdo .= "Fileserver-Dir: $wd_path
"; $wdo .= "HTTP_HOST: " . $_SERVER['HTTP_HOST'] . "
"; $wdo .= "PHP_SELF: " . $_SERVER['PHP_SELF'] . "
"; $wdo .= "
"; } $d = dir($wd_path); $wd_fnames = array(); $wd_ftypes = array(); $fcount = 0; while (false !== ($entry = $d->read())) { if ($entry != "." && $entry != "..") { if ((eregi("true",$plugin_cf['wdir']['show_hiddenfiles'])) || (substr($entry,0,1) != '.')) { $fcount++; array_push($wd_fnames, $entry); array_push($wd_ftypes, filetype($wd_path."/".$entry)); } } } $d->close(); $fcount--; $wd_lowfnames = array_map('strtolower', $wd_fnames); array_multisort($wd_ftypes, $wd_lowfnames, $wd_fnames); $wd_http = "http://" . $_SERVER['HTTP_HOST'] . $_SERVER['PHP_SELF']; $wd_http = substr($wd_http,0,strrpos($wd_http,'/')+1); if (substr($wd_http,-4,4) == '/'.$sl.'/') $wd_http = substr($wd_http,0,strlen($wd_http)-3); if(eregi("true",$plugin_cf['wdir']['show_path'])) { $wdo .= "" . " Path: " . $wd_http.$wd_PathParam. " " . "
\n"; } $wdo .= "
| " . $plugin_tx['wdir']['txt_name'] . " | "; if(eregi("true",$plugin_cf['wdir']['show_size'])) $wdo .= "" . $plugin_tx['wdir']['txt_size'] . " | "; if(eregi("true",$plugin_cf['wdir']['show_changed'])) $wdo .= "" . $plugin_tx['wdir']['txt_changed'] . " | "; if(eregi("true",$plugin_cf['wdir']['show_attributes'])) $wdo .= "" . $plugin_tx['wdir']['txt_perms'] . " | "; $wdo .= "|||||||||
| "; $wdo .= " | ". $wd_fnames[$i] . " | "; $wdo .= " | "; //$wdo .= " | Dateiordner | "; $wdo .= " | " . date("d.m.Y H:i:s", filemtime($fullname)) . " | "; $wdo .= "||||||
| "; $wdo .= " | ". $wd_fnames[$i] . " | "; if(eregi("true",$plugin_cf['wdir']['show_size'])) $wdo .= "". number_format(filesize($fullname),0,',','.') . " Bytes | "; $wd_total += filesize($fullname); //$wdo .= " | ".strtoupper($wd_fext)."-Datei | "; if(eregi("true",$plugin_cf['wdir']['show_changed'])) $wdo .= " | " . date("d.m.Y H:i:s", filemtime($fullname)) . " | "; if(eregi("true",$plugin_cf['wdir']['show_attributes'])) { //$wdo .= "".decoct(fileperms($fullname))." | "; $wdo .= "".wd_FilePerms(decoct(fileperms($fullname)))." | "; } $wdo .= "
"; if(eregi("true",$plugin_cf['wdir']['show_summary'])) { $fcount++; $wdo .= "" . " " . $fcount . " " . $plugin_tx['wdir']['txt_files'] . ", " . number_format($wd_total,0,',','.') . " Bytes" . "
\n"; } if(eregi("true",$plugin_cf['wdir']['show_creator'])) { $wdo .= "
";
} else {
$wdo .= "";
$wdo .= "
";
$wdo .= "\n\n";
return $wdo;
}
function wd_FileIcon($wd_fext) {
GLOBAL $su, $sl, $plugin_cf, $plugin_tx, $pth, $plugin;
$wd_FullPath = $pth['folder']['plugins']."wdir/images/" . strtoupper($wd_fext) . "icon.gif";
if (!file_exists($wd_FullPath)) $wd_FullPath = $pth['folder']['plugins']."wdir/images/" . "UFO" . "icon.gif";
return $wd_FullPath;
}
function wd_FilePerms($fperms) {
$cRet = "| R | "; } else { $cChrAcc = "- | "; } if ($cOctAcc-2 >= 0) { $cOctAcc -= 2; $cChrAcc .= "W | "; } else { $cChrAcc .= "- | "; } if ($cOctAcc == 1) { //$cOctAcc -= 2; $cChrAcc .= "X | "; } else { $cChrAcc .= "- | "; } $cRet .= $cChrAcc; $cRet .= ""; } $cRet .= " |
';
} else{
$t.= '
';
}
$t.= ''.$title.' -
'.$description.'';
}
$num += 1;
}
$t.="
';
}
$t.= ''.$title.' -
'.$description.'Linkex plugin, by Amir
"; $postyp='send'; $postval=$plugin_tx['linkex']['form_addlink']; if($admin=='plugin_main'){ $geturi='?&'.$plugin.'&admin=plugin_main'; if (isset($_GET['editid'])){ if (count($err)==0){ $linp=explode($linkdelimiter,$lines[$_GET['editid']]); $data = array('email'=> $linp[0],'title'=> $linp[1],'url'=> $linp[2],'recurl'=> $linp[3],'description'=> $linp[4]); } $postyp=$_GET['editid']; $postval=$plugin_tx['linkex']['form_update']; $geturi .='&editid='.$postyp; } $t.=' '; $t.='Use this form to add or edit links.
To add a site with no reciprocal link, write "nolink" in "URL with reciprocal:"
'.$plugin_tx['linkex']['form_title1'].'
'.$plugin_tx['linkex']['form_title2'].'
'.$err[0].'
'; return $t; } function prob($problem) { //echo "problem".$problem; if (!($problem)){ $problem='Couldn\'t open file data.dat for appending! Please CHMOD this file to 666 !'; } echo 'ERROR
'.$problem.'
'; exit; } function checkfields($ln,$num,$errorm ){ global $err; $ln = trim($ln); if (strlen($ln)){ $ln = htmlspecialchars($ln); } else{ $err[$num]=$errorm; } return stripslashes($ln); } ?> ",$sbmessage); $sbmessage = str_replace(chr(13),"
",$sbmessage); $sbmessage = str_replace(chr(10),"
",$sbmessage); $sbmessage = str_replace(";",",",$sbmessage); if(eregi("true",$plugin_cf['sblog']['cleanText'])){ $sbmessage = sb_cleantext(stripslashes($sbmessage)); } if (!$fp = fopen($sbfile, 'a')) { $tvari.="
ERROR: Cannot open file ($sbfile)"; } else { if(eregi("true",$plugin_cf['sblog']['record_Release'])){ $sbentry = "\n##" . $sbname .";". $sbemail .";". $sbwebsite .";". date($plugin_cf['sblog']['time_format']) .";". date($plugin_cf['sblog']['date_format']) .";". $sbimage .";". $sbmessage .";". $_SERVER["REMOTE_ADDR"] . ";[END OF RECORD]"; } else { $sbentry = "\n" . $sbname .";". $sbemail .";". $sbwebsite .";". date($plugin_cf['sblog']['time_format']) .";". date($plugin_cf['sblog']['date_format']) .";". $sbimage .";". $sbmessage .";". $_SERVER["REMOTE_ADDR"] . ";[END OF RECORD]"; } if ($plugin_cf['sblog']['emailNotice'] !=="") { //////////////////////////////////////////////////// //Mailer: // $kopf = $plugin_tx['sblog']['mail_header']." ".$page; $page = $_SERVER[QUERY_STRING]; $ipbesucher = $_SERVER['REMOTE_ADDR']; $nachrichtanmich = "\n\n" . $kopf . " ".$plugin_tx['sblog']['mail_file']." \"".$page."\"\n\n" ."*******************************************************\n" // ." From: ".$kopf." ".$plugin_tx['sblog']['mail_file']." \"".$page."\"\n\n" ." Text: \n".$sbmessage."\n\n From IP: $ipbesucher \n\n" ."*******************************************************\n" .""; $webmaster=$plugin_cf['sblog']['emailNoticeTo']; $header ="FROM:CMSimple sBlog <$webmaster>\n"; $header .="X-Mailer :PHP/" . phpversion()."\n"; $header .="X-Sender-IP: " .$_SERVER['REMOTE_ADDR']. "\n"; $header .="Content-Type: text/plain"; mail ($webmaster, $kopf, $nachrichtanmich, $header); /////////////////////////////////////////////// } if (fputs($fp,$sbentry) == FALSE) $tvari.="
ERROR: Cannot write to file ($sbfile)"; fclose($fp); header('Location: '.$_SERVER['REQUEST_URI']);exit; } } $tvari .= "
\n"; // first DIV encompasses whole output with editor, closes at the bottom
/////// OUTPUT 1 /////////////////////
if(eregi("true",$plugin_cf['sblog']['chronological_order'])){
if(ini_get('allow_url_fopen') != 1){
$vartl = "\n";
}
sb_commentOutput();
$tvari .= $vartl;
$tvari .= "
"; // $tvari .= "
\n"; /////// OUTPUT 2 ///////////////////// if(!eregi("true",$plugin_cf['sblog']['chronological_order'])){ if(ini_get('allow_url_fopen') != 1){ $vartIE = "\n"; $tvari .= $vartIE; } sb_commentOutput(); $tvari .= $vartl; } ///////// End of OUTPUT 2 //////////////////////// $tvari .= "
\n"; // closing of first DIV
return $tvari;
}
function sb_cleantext($rawcode){
// This will remove HTML tags, javascript sections
// and white space. It will also convert some
// common HTML entities to their text equivalent
// Clever bits cut and pasted from php_manual_en.html#ref.pcre
$search = array ("'"; // $tvari .= "
"; } ///////// End of OUTPUT 1 //////////////////////// $tvari .= "\n"; $tvari .= "\n"; $tvari .= "
\n";
$tvari .= "
\n";
// $tvari .= " \n";
$tvari .= "\n";
$tvari .= "
\n"; /////// OUTPUT 2 ///////////////////// if(!eregi("true",$plugin_cf['sblog']['chronological_order'])){ if(ini_get('allow_url_fopen') != 1){ $vartIE = "\n"; $tvari .= $vartIE; } sb_commentOutput(); $tvari .= $vartl; } ///////// End of OUTPUT 2 //////////////////////// $tvari .= "
\n"; if ($sbmessage != '') $vartm .= "
" . $sbname . " | \n";
if ($sbmessage != '') $vartm .= "" . $sbdate . ", " . $sbtime . " | \n";
if ($sbemail != '') $vartm .= "![\""](\"".$imgpath."./images/email.gif\" "\\"\"") \n";
if ($sbwebsite != '') $vartm .= "![\""](\"".$imgpath."./images/website.gif\" "\\"\"") \n";
if ($sbmessage != '') $vartm .= "![\""](\"".$imgpath."./images/machine.gif\" "\\"\"") \n";
if ($sbmessage != '') $vartm .= " |
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||||||
| Powered by CMSimple.dk |
|
||||||||||||||||||||||||||||||||||||||
