slitaz-base-files annotate rootfs/var/www/cgi-bin/index.cgi @ rev 318

Add Japanese translations (thanks Keiichi Shiga)
author Aleksej Bobylev <al.bobylev@gmail.com>
date Tue Jan 10 12:30:48 2017 +0200 (2017-01-10)
parents 0a476090cd09
children
rev   line source
pankso@107 1 #!/bin/sh
pankso@235 2 #
pankso@235 3 # Directory lister for BusyBox HTTPd
pankso@235 4 # Copyright (C) 2014 SliTaz GNU/Linux - BSD License
pankso@235 5 #
pankso@235 6 . /usr/lib/slitaz/httphelper.sh
pankso@235 7 header
pankso@107 8
pankso@235 9 # Security check
pankso@235 10 case "$QUERY_STRING" in
pankso@235 11 ..*) echo "Security exit" && exit 1 ;;
pankso@235 12 esac
al@179 13
al@318 14 # HTML5 head
al@318 15 cat <<EOT
pankso@235 16 <!DOCTYPE html>
pankso@235 17 <html lang="en">
pankso@235 18 <head>
al@318 19 <meta charset="UTF-8">
pankso@235 20 <title>Index of /$QUERY_STRING</title>
al@318 21 <link rel="stylesheet" href="/style.css">
al@318 22 <style>
pankso@235 23 #header h1 { width: auto; }
pankso@235 24 ul { line-height: 1.5em; } li { color: #666; }
pankso@235 25 </style>
pankso@235 26 </head>
pankso@235 27 <body>
pankso@235 28 <div id="header">
pankso@235 29 <h1>Index of /$QUERY_STRING</h1>
pankso@235 30 </div>
pankso@235 31 <section id="content">
pankso@235 32 <div>Files: $(ls ../$QUERY_STRING | wc -l)</div>
pankso@235 33 <ul>
pankso@235 34 EOT
pankso@107 35
pankso@235 36 [ "$QUERY_STRING" ] && echo '<li><a href="../">../</a></li>'
pankso@107 37
pankso@235 38 # We need ?/path
pankso@235 39 for i in $(ls -p ../$QUERY_STRING)
pankso@235 40 do
pankso@235 41 if [ -f "../$QUERY_STRING/$i" ]; then
pankso@235 42 echo "<li><a href='/${QUERY_STRING}${i}'>$i</a></li>"
pankso@235 43 else
pankso@235 44 echo "<li><a href='/${QUERY_STRING}${i}?${QUERY_STRING}${i}'>$i</a></li>"
pankso@235 45 fi
pankso@235 46 done
pankso@107 47
pankso@235 48 cat << EOT
pankso@235 49 </ul>
pankso@235 50 </section>
pankso@235 51 <footer id="footer"></footer>
pankso@107 52 </body>
pankso@107 53 </html>
pankso@107 54 EOT