wp/wp-content/plugins/wp-filemanager/incl/functions.inc.php
author ymh <ymh.work@gmail.com>
Wed, 06 Nov 2013 03:21:17 +0000
changeset 0 d970ebf37754
permissions -rw-r--r--
first import
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     2
if ( ! defined( 'ABSPATH' ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     3
	die();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
function wp_fileman_remove_directory($directory)	## Remove a directory recursively
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     5
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     6
 $list_sub = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     7
 $list_files = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     8
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     9
 if (!($open = @opendir($directory)))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    10
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    11
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    12
 while(($index = @readdir($open)) != FALSE)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
  if (is_dir($directory.$index) && $index != "." && $index != "..")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    15
   $list_sub[] = $index."/";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
  else if (is_file($directory.$index))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    17
   $list_files[] = $index;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    18
 }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    19
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    20
 closedir($open);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
 foreach($list_files as $file)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
  if (!@unlink($directory.$file))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    24
   return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    25
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    26
 foreach($list_sub as $sub)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    27
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    28
  wp_fileman_remove_directory($directory.$sub);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    29
  if (!@rmdir($directory.$sub))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    30
   return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
 }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    32
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    33
 return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    34
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    35
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    36
function wp_fileman_get_icon($filename)	## Get the icon from the filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    37
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    38
 global $IconArray;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    39
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    40
 @reset($IconArray);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    41
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    42
 $extension = strtolower(substr(strrchr($filename, "."),1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    43
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
 if ($extension == "")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
  return "unknown.gif";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
 while (list($icon, $types) = each($IconArray))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
  foreach (explode(" ", $types) as $type)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
   if ($extension == $type)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
    return $icon;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
 return "unknown.gif";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    55
function wp_fileman_compare_filedata ($a, $b)	## Compare filedata (used to sort)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
 if (is_int($a[$_GET['sortby']]) && is_int($b[$_GET['sortby']]))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
  if ($a[$_GET['sortby']]==$b[$_GET['sortby']]) return 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
  if ($_GET['order'] == "asc")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
  {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
   if ($a[$_GET['sortby']] > $b[$_GET['sortby']]) return 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
   else return -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
  }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
  else if ($_GET['order'] == "desc")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
  {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
   if ($a[$_GET['sortby']] < $b[$_GET['sortby']]) return 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
   else return -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
  }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
 }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
 else if (is_string($a[$_GET['sortby']]) && is_string($b[$_GET['sortby']]) && $_GET['order'] == "asc")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
  return strcmp($a[$_GET['sortby']], $b[$_GET['sortby']]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
 else if (is_string($a[$_GET['sortby']]) && is_string($b[$_GET['sortby']]) && $_GET['order'] == "desc")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
  return -strcmp($a[$_GET['sortby']], $b[$_GET['sortby']]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
function wp_fileman_get_opposite_order($input, $order)	## Get opposite order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
 if ($_GET['sortby'] == $input)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
  if ($order == "asc")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
   return "desc";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
  else if ($order == "desc")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
   return "asc";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
 }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
 else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
  return "asc";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
function wp_fileman_is_editable_file($filename)	## Checks whether a file is editable
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
 global $EditableFiles;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
 $extension = strtolower(substr(strrchr($filename, "."),1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
 foreach(explode(",", $EditableFiles) as $type)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
  if ($extension == $type)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
   return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
 return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
function wp_fileman_is_viewable_file($filename)	## Checks whether a file is viewable
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
 global $ViewableFiles;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
 $extension = strtolower(substr(strrchr($filename, "."),1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
 foreach(explode(",", $ViewableFiles) as $type)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
  if ($extension == $type)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
   return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   115
 return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
function wp_fileman_is_valid_name($input)	## Checks whether the directory- or filename is valid
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
 if (strstr($input, "\\"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
 else if (strstr($input, "/"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
 else if (strstr($input, ":"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
 else if (strstr($input, "?"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
 else if (strstr($input, "*"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   130
 else if (strstr($input, "\""))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   132
 else if (strstr($input, "<"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
 else if (strstr($input, ">"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
 else if (strstr($input, "|"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
 else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
  return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
function wp_fileman_get_better_filesize($filesize)	## Converts filesize to KB/MB/GB/TB
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
 $kilobyte = 1024;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
 $megabyte = 1048576;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
 $gigabyte = 1073741824;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
 $terabyte = 1099511627776;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
 if ($filesize >= $terabyte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
  return number_format($filesize/$terabyte, 2, ',', '.')."&nbsp;TB";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
 else if ($filesize >= $gigabyte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   152
  return number_format($filesize/$gigabyte, 2, ',', '.')."&nbsp;GB";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
 else if ($filesize >= $megabyte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
  return number_format($filesize/$megabyte, 2, ',', '.')."&nbsp;MB";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
 else if ($filesize >= $kilobyte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
  return number_format($filesize/$kilobyte, 2, ',', '.')."&nbsp;KB";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
 else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   158
  return number_format($filesize, 0, ',', '.')."&nbsp;B";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   160
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
function wp_fileman_get_current_zoom_level($current_zoom_level, $zoom)	## Get current zoom level
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
 global $ZoomArray;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
 @reset($ZoomArray);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
 while(list($number, $zoom_level) = each($ZoomArray))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
  if ($zoom_level == $current_zoom_level)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
   if (($number+$zoom) < 0) return $number;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
   else if (($number+$zoom) >= count($ZoomArray)) return $number;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
   else return $number+$zoom;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
function wp_fileman_validate_path($wp_fileman_path)	## Validate path
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
 global $StrAccessDenied;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   177
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   178
 if (stristr($wp_fileman_path, "../") || stristr($wp_fileman_path, "..\\"))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   179
  return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   180
 else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
  return stripslashes($wp_fileman_path);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
function wp_fileman_authenticate_user()	## Authenticate user using cookies
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
 global $username, $password;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   188
 if (isset($_COOKIE['cookie_username']) && $_COOKIE['cookie_username'] == $username && isset($_COOKIE['cookie_password']) && $_COOKIE['cookie_password'] == md5($password))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   189
  return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   190
 else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
  return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   194
function wp_fileman_is_hidden_file($wp_fileman_path)	## Checks whether the file is hidden.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   195
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
 global $hide_file_extension, $hide_file_string, $hide_directory_string;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
 $extension = strtolower(substr(strrchr($wp_fileman_path, "."),1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
 
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
 if (is_array($hide_file_extension))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
 foreach ($hide_file_extension as $hidden_extension)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
  {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
  if ($hidden_extension == $extension)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
  {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
   return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
  }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
  }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
 }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   210
 if (is_array($hide_file_string))  
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
  foreach ($hide_file_string as $hidden_string)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
  {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
   if ($hidden_string != "" && stristr(basename($wp_fileman_path), $hidden_string))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
   {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
   return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
 return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
function wp_fileman_is_hidden_directory($wp_fileman_path)	## Checks whether the directory is hidden.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
 global $hide_directory_string;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
 if (is_array($hide_directory_string))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
 foreach ($hide_directory_string as $hidden_string)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
  if ($hidden_string != "" && stristr($wp_fileman_path, $hidden_string))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
   return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
 return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
function wp_fileman_get_mimetype($filename)	## Get MIME-type for file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
 global $MIMEtypes;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
 @reset($MIMEtypes);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
 $extension = strtolower(substr(strrchr($filename, "."),1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
 if ($extension == "")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
  return "Unknown/Unknown";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
 while (list($mimetype, $file_extensions) = each($MIMEtypes))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
  foreach (explode(" ", $file_extensions) as $file_extension)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
   if ($extension == $file_extension)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
    return $mimetype;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
 return "Unknown/Unknown";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
function wp_fileman_get_linked_path($wp_fileman_path,$base_url)	## Get path with links to each folder
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
 $string = "<a href='$base_url'>.</a> / ";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
 $array = explode("/",htmlentities($wp_fileman_path));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
 unset($array[count($array)-1]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
 foreach ($array as $entry)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
 {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
  @$temppath .= $entry."/";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
  $string .= "<a href='$base_url&amp;path=".htmlentities(rawurlencode($temppath))."'>$entry</a> / ";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
 }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
 return $string;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   263
?>