function getDirContents($params, $sfl_dirlocation, $sfl_basepath, $sfl_maxfiles, $sfl_userlocation)
{
$session = JFactory::getSession();
$results = "";
$sfl_goupdir = "";
$sfl_currentdir = "";
$browsedir = "";
$filelist = "";
$sfl_dirlocationdefault = $params->get('sfl_dirlocation', '.' . DIRECTORY_SEPARATOR . 'images');
$sfl_next = $params->get('sfl_next', '0');
$sfl_showfilesize = $params->get('sfl_showfilesize', '0');
$sfl_onlyimg = $params->get('sfl_onlyimg', '0');
$sfl_imgthumbs = $params->get('sfl_imgthumbs', '0');
$sfl_thumbheight = $params->get('sfl_thumbheight', '30');
$sfl_thumbwidth = $params->get('sfl_thumbwidth', '30');
$sfl_thumbkeepaspect = $params->get('sfl_thumbkeepaspect', '0');
$sfl_listdir = $params->get('sfl_listdir', '0');
$sfl_browsedir = $params->get('sfl_browsedir', '0');
$sfl_showdir = $params->get('sfl_showdir', '1');
$sfl_showicon = $params->get('sfl_showicon', '1');
$sfl_sortorder = $params->get('sfl_sortorder', 'asc');
$sfl_showsort = $params->get('sfl_showsort', '0');
$sfl_setbasepath = $params->get('sfl_basepath', '');
$sfl_basepathusr = $params->get('sfl_basepathusr', '');
$sfl_listleft = $params->get('sfl_listleft', '-10');
$sfl_allowdelete = $params->get('sfl_allowdelete', '0');
$sfl_allowdeleteall = $params->get('sfl_allowdeleteall', '0');
$sfl_allowdeletereg = $params->get('sfl_allowdeletereg', '0');
$sfl_allowdeleteedt = $params->get('sfl_allowdeleteedt', '0');
$sfl_movedeleted = $params->get('sfl_movedeleted', '0');
$sfl_movedeletedpath = $params->get('sfl_movedeletedpath', '');
$sfl_disablegdthreshold = $params->get('sfl_disablegdthreshold', '0');
$sfl_allowupdir = $params->get('sfl_allowupdir', '0');
$subdirlocation = "";
$tmpSort = $session->get('sfl_sort', '');
if (strlen($tmpSort) > 0) {
$sfl_sortorder = $tmpSort;
}
// Get current logged in user
$user = JFactory::getUser();
$usr_name = $user->get('username');
if (stripos($usr_name, "/") !== false) {
$usr_name = "";
}
if (stripos($usr_name, "\\") !== false) {
$usr_name = "";
}
if (stripos($usr_name, "..") !== false) {
$usr_name = "";
}
$show_delete = "0";
if ($sfl_allowdelete === "1") {
if ($sfl_allowdeleteall === "1") {
$show_delete = "1";
}
if ($sfl_allowdeletereg === "1" && !$user->guest) {
$show_delete = "1";
}
if ($sfl_allowdeleteedt === "1" && $user->authorise('core.edit', 'com_content')) {
$show_delete = "1";
}
}
//echo "sfl_dirlocation=$sfl_dirlocation<br/>";
//echo "sfl_dirlocationdefault=$sfl_dirlocationdefault<br/>";
// Don't allow moving upwards in dirs through AJAX
if ($sfl_allowupdir == 0 && strlen(strstr($sfl_dirlocation, "../")) > 0) {
$sfl_dirlocation = $sfl_dirlocationdefault;
}
if (strlen(strstr($sfl_dirlocation, $sfl_dirlocationdefault)) <= 0) {
$sfl_dirlocation = $sfl_dirlocationdefault;
}
//echo "sfl_dirlocation=$sfl_dirlocation<br/>";
// If only sfl_userlocation is set!
if (strlen($sfl_dirlocation) == 0 || strlen($sfl_dirlocation) > 0 && strlen($sfl_userlocation) > 0) {
$sfl_dirlocation = $sfl_userlocation;
if (substr($sfl_dirlocation, strlen($sfl_dirlocation) - 1) !== DIRECTORY_SEPARATOR) {
$sfl_dirlocation .= DIRECTORY_SEPARATOR;
}
if (strlen($sfl_basepathusr) > 0 && $usr_name !== "") {
if (substr($sfl_basepathusr, strlen($sfl_basepathusr) - 1) !== DIRECTORY_SEPARATOR) {
$sfl_basepathusr .= "/" . $usr_name . "/";
} else {
$sfl_basepathusr .= $usr_name . "/";
}
$sfl_setbasepath = $sfl_basepathusr;
$session->set('sfl_userdir', $sfl_setbasepath);
}
} else {
// check if we are in "user" mode
$sfl_basepathusr = $session->get('sfl_userdir', '');
if (strlen($sfl_basepathusr) > 0) {
$sfl_setbasepath = $sfl_basepathusr;
}
}
//echo "sfl_dirlocation=$sfl_dirlocation<br/>";
//echo "sfl_setbasepath=$sfl_setbasepath<br/>";
$baseurl = ModSimpleFileListerHelperv10::getBaseURL($sfl_dirlocation, $sfl_setbasepath);
// Remove final slash to get dir.
if (substr($sfl_dirlocation, strlen($sfl_dirlocation) - 1) === DIRECTORY_SEPARATOR) {
$sfl_dirlocation = substr($sfl_dirlocation, 0, strlen($sfl_dirlocation) - 1);
}
$startdir = $session->get('sfl_startdir', '');
if ($startdir === '') {
$session->set('sfl_startdir', $sfl_dirlocation);
}
if (strlen($startdir) > 0 && str_replace(DIRECTORY_SEPARATOR, "", $startdir) !== str_replace(DIRECTORY_SEPARATOR, "", $sfl_dirlocation)) {
// We have browsed!
$browsedir = substr($sfl_dirlocation, strlen($startdir));
// Remove any leading slash
$browsedir = str_replace(DIRECTORY_SEPARATOR, "/", substr($browsedir, 1));
// Remove any trialing slash
if (substr($browsedir, strlen($browsedir) - 1) === DIRECTORY_SEPARATOR) {
$browsedir = substr($browsedir, 0, strlen($browsedir) - 1);
}
// Make sure we are working with front-slash only
$browsedir = str_replace(DIRECTORY_SEPARATOR, "/", $browsedir);
$sfl_breadcrumb = "<a class=\"sfl_btnBrowseDir\" rel=\"" . $startdir . "\" href=\"javascript: void(0);\">" . $startdir . "</a>/";
$dirvals = "/";
$icntdir = 0;
$pathcol = explode("/", $browsedir);
foreach ($pathcol as $dirval) {
$dirvals .= $dirval . "/";
$icntdir++;
if ($icntdir < count($pathcol)) {
$sfl_breadcrumb .= "<a class=\"sfl_btnBrowseDir\" rel=\"" . $startdir . $dirvals . "\" href=\"javascript: void(0);\">" . $dirval . "</a>/";
// Get parent dir for "go up"
$sfl_goupdir = "<a class=\"sfl_btnBrowseDir\" rel=\"" . $startdir . $dirvals . "\" href=\"javascript: void(0);\">" . JText::_('UP_DIR') . "</a>";
} else {
$sfl_breadcrumb .= $dirval;
$sfl_currentdir = " " . $dirval;
}
}
// Fix AW 2001-05-20, if web server path is set subdir is omitted without below
$subdirlocation = $dirvals;
// Remove initial slash if exist
if (substr($subdirlocation, 0, 1) === "/") {
$subdirlocation = substr($subdirlocation, 1);
}
// Add trainling slash
if (substr($subdirlocation, strlen($subdirlocation) - 1) !== "/") {
$subdirlocation .= "/";
}
$baseurl .= $subdirlocation;
//$results .= "[$subdirlocation]";
/*
$results .= "$baseurl .= $browsedir";
// Set new browsedir and add one slash at the end if missing
$baseurl .= $browsedir;
if ( substr( $baseurl , strlen($baseurl) - 1) !== "/" )
$baseurl .= "/";
*/
} else {
if ($startdir === "") {
$startdir = $sfl_dirlocation;
}
$sfl_breadcrumb = $startdir;
}
// Open directory
if ($bib = @opendir($sfl_dirlocation)) {
$idx = 0;
$dir_list = null;
$file_list = null;
$idx_startat = $session->get('sfl_nextindex', 0);
$idx_endat = $session->get('sfl_stopindex', $sfl_maxfiles);
//$results .= "idx_startat=$idx_startat | idx_endat=$idx_endat";
if ($sfl_next === '1' && $idx_startat > 0) {
$fil_list[] = "<input type=\"hidden\" id=\"sflPrevVal\" value=\"" . $idx_startat . "\" /><a id=\"sfl_btnPrev\" href=\"javascript:void(0)\">" . JText::_('PREV_BTN') . "</a>";
} else {
$fil_list[] = "<input type=\"hidden\" id=\"sflPrevVal\" value=\"-1\" />";
}
// Intially set previous to -1 to make sure it exists
//$fil_list[] = "<form id=\"frm_sflprevious\" value=\"prev\" enctype=\"multipart/form-data\" action=\"\" method=\"POST\"><input type=\"hidden\" name=\"sflPrevious\" value=\"".$idx_startat."\" /><a href=\"javascript:void(0)\" onclick=\"javascript: sfl_MovePrevious(); sflSubmitForm('frm_sflprevious');\">".JText::_('PREV BTN')."</a></form>";
while (false !== ($lfile = readdir($bib))) {
if (is_dir($sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile)) {
// Safe it, dir or filenames can't contain a *
if ($lfile !== "." && $lfile !== ".." && $sfl_listdir == 1) {
$dir_list[] = array("sort" => strtolower($lfile), "name" => "*dir*" . $lfile);
}
} else {
$file_list[] = array("sort" => strtolower($lfile), "name" => $lfile);
}
}
//Sort Directories
if (is_array($dir_list)) {
//Asc
if ($sfl_sortorder === "asc") {
asort($dir_list);
}
//Desc
if ($sfl_sortorder === "desc") {
rsort($dir_list);
}
}
//Sort Files
if (is_array($file_list)) {
//Asc
if ($sfl_sortorder === "asc") {
asort($file_list);
}
//Desc
if ($sfl_sortorder === "desc") {
rsort($file_list);
}
}
//print_r($file_list);
if ($sfl_listdir == 1 && is_array($dir_list) && is_array($file_list)) {
$full_list = array_merge($dir_list, $file_list);
} elseif (is_array($file_list)) {
$full_list = $file_list;
} elseif ($sfl_listdir == 1 && is_array($dir_list)) {
$full_list = $dir_list;
} else {
$full_list = null;
}
if (is_array($full_list)) {
foreach ($full_list as $lfile) {
//while (false !== ($lfile = readdir($bib))) {
//$sfl_listdir
//$sfl_browsedir
$fdir = substr($lfile['name'], 0, 5) === "*dir*";
if ($lfile['name'] != "." && $lfile['name'] != ".." && !preg_match("/^\\..+/", $lfile['name']) && $lfile['name'] != "index.html") {
// Capture a list of files to be put in session var. This to protect delete
$filelist .= $lfile['name'] . '*';
if ($idx >= $idx_endat) {
$session->set('sfl_nextindex', $idx);
$session->set('sfl_stopindex', $idx + $sfl_maxfiles);
break;
}
$idx += 1;
if ($idx > $idx_startat && $idx <= $idx_endat) {
$tmpfile = "<span>";
$tmpthumb = "";
$is_img = false;
if (($sfl_imgthumbs === '1' || $sfl_imgthumbs === '2') && !$fdir) {
//Check image
if (filesize($sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile['name']) <= $sfl_disablegdthreshold || $sfl_disablegdthreshold == 0) {
if ($img = @getimagesize($sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile['name'])) {
// Show thumbnail
//if($img = @getimagesize($baseurl.str_replace(" ", "%20", $lfile['name']))) {
//list($width, $height, $type, $attr) = getimagesize($baseurl.str_replace(" ", "%20", $lfile['name']));
list($width, $height, $type, $attr) = getimagesize($sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile['name']);
if ($height > $sfl_thumbheight && $sfl_thumbkeepaspect === '1') {
$tmpthumb = "<img border=\"0\" height={$sfl_thumbheight} src=\"" . $baseurl . str_replace(" ", "%20", $lfile['name']) . "\"/>";
} else {
$tmpthumb = "<img border=\"0\" height={$sfl_thumbheight} width={$sfl_thumbheight} src=\"" . $baseurl . str_replace(" ", "%20", $lfile['name']) . "\"/>";
}
$is_img = true;
} else {
// no thumbnail and show icon
if ($sfl_showicon == 1) {
$tmpfile .= "<img height=\"24\" src=\"" . JURI::root() . $sfl_basepath . "images/file.png\"/>";
}
}
} else {
$tmpfile .= "<img height=\"24\" src=\"" . JURI::root() . $sfl_basepath . "images/file.png\"/>";
}
} elseif ($fdir) {
$lfile['name'] = substr($lfile['name'], 5);
$tmpfile .= "<img height=\"24\" src=\"" . JURI::root() . $sfl_basepath . "images/directory.png\"/>";
} elseif ($sfl_showicon == 1) {
$tmpfile .= "<img height=\"24\" src=\"" . JURI::root() . $sfl_basepath . "images/file.png\"/>";
}
if ($fdir) {
if ($sfl_browsedir == 1) {
$tmpfile .= "<a class=\"sfl_btnBrowseDir\" rel=\"" . $sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile['name'] . "\" href=\"javascript: void(0);\">" . $lfile['name'] . "</a>";
} else {
$tmpfile .= $lfile['name'];
}
} else {
// Add thumb-nail as clickable, empty string if no thumb option
$linktext = $tmpthumb;
if ($sfl_imgthumbs !== '2' || !$is_img) {
// Add the filename if it is not an image and/or thumb is not created
$linktext .= $lfile['name'];
}
$tmpfile .= "<a href=\"" . $baseurl . str_replace(" ", "%20", $lfile['name']) . "\" target=\"blank\">" . $linktext . "</a>";
}
// Show size but not for directories
if ($sfl_showfilesize === '1' && !$fdir) {
$tmpfile .= " (" . ModSimpleFileListerHelperv10::getFileSizePP(filesize($sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile['name'])) . ")";
}
// Allow delete?
if ($show_delete === '1' && !$fdir) {
$tmpfile .= " <a class=\"sfl_btnDelete\" rel=\"" . $sfl_dirlocation . DIRECTORY_SEPARATOR . $lfile['name'] . "**" . $lfile['name'] . "\" href=\"javascript:void(0)\"><img class=\"sfldel\" src=\"" . JURI::root() . $sfl_basepath . "images/delete.png\" /></a>";
}
if ($sfl_onlyimg === '1' && $is_img || $sfl_onlyimg !== '1') {
$fil_list[] = $tmpfile . "</span>";
}
}
}
}
$session->set('sfl_filelist', $filelist);
}
closedir($bib);
if ($sfl_next === '1' && $idx >= $idx_endat) {
$fil_list[] = "<input type=\"hidden\" id=\"sflNextVal\" value=\"" . $idx_endat . "\" /><a id=\"sfl_btnNext\" href=\"javascript:void(0)\">" . JText::_('NEXT_BTN') . "</a>";
}
//$fil_list[] = "<form id=\"frm_sflnext\" value=\"next\" enctype=\"multipart/form-data\" action=\"\" method=\"POST\"><input type=\"hidden\" name=\"sflNext\" value=\"".$idx_endat."\" /><a id=\"sfl_btnNext\" href=\"javascript:void(0)\" onclick=\"javascript: sfl_MoveNext(); sflSubmitForm('frm_sflnext');\">".JText::_('NEXT BTN')."</a></form>";
if (is_array($fil_list)) {
$liste = "<div class=\"sfl_item\">" . join("</div><div class=\"sfl_item\">", $fil_list) . "</div>";
} else {
$liste = "<div class=\"sfl_item\">" . JText::_('NO_FILES_FOUND') . " " . $sfl_dirlocation . "</div>";
}
$sortascclass = "";
$sortdescclass = "";
if ($sfl_sortorder === "desc") {
$sortascclass = "class=\"sfl_shadow\" ";
} elseif ($sfl_sortorder === "asc") {
$sortdescclass = "class=\"sfl_shadow\" ";
}
$sort_arrows = "";
if ($sfl_showsort == 1) {
$sort_arrows = "<div style=\"width: 90%; height: 12px; text-align: right;\"><a id=\"sfl_ASortAsc\" class=\"sfl_ASortAsc\" href=\"javascript:void(0)\"><img id=\"sflSortAsc\" " . $sortascclass . "alt=\"Sort ascending\" style=\"cursor: n-resize ;\" src=\"" . JURI::root() . $sfl_basepath . "images/sort_up.png\" /></a> <a id=\"sfl_ASortDesc\" class=\"sfl_ASortDesc\" href=\"javascript:void(0)\"><img id=\"sflSortDesc\" " . $sortdescclass . "alt=\"Sort descending\" style=\"cursor: n-resize ;\" src=\"" . JURI::root() . $sfl_basepath . "images/sort_down.png\" /></a></div>";
}
if ($sfl_showdir == 1) {
$results .= "<b>" . JText::_('FILES_IN_DIR') . " (" . $sfl_breadcrumb . "):</b>";
} elseif ($sfl_showdir == 0) {
$results .= "<b>" . JText::_('FILES_IN_DIR') . $sfl_currentdir . ":</b><br />";
// If no breadcrumb we must have "home" and "up" buttons
if (strlen($browsedir) > 0) {
$results .= "<a class=\"sfl_btnBrowseDir\" rel=\"" . $startdir . "\" href=\"javascript: void(0);\">" . JText::_('GO_HOME') . "</a> " . $sfl_goupdir . "<br />";
}
}
$results .= $sort_arrows . "<div>" . $liste . "</div>";
} else {
$results .= "<b>" . JText::_('ERROR_READ') . " (Dir: " . $sfl_dirlocation . ")</b>";
}
return $results;
}
