Added lot of junk laying around on harvie.cz

[mirrors/Programs.git] / php / skripty / m3u_browser.php

diff --git a/php/skripty/m3u_browser.php b/php/skripty/m3u_browser.php
new file mode 100644 (file)
index 0000000..bf0d936
--- /dev/null
+++ b/php/skripty/m3u_browser.php
@@ -0,0 +1,18 @@
+<?php\r
+\r
+function dir_m3u($dir) {\r
+  $files=opendir ($dir); \r
+               while (false!==($file = readdir($files))) \r
+               { \r
+                               if ($file != "." && $file != "..") \r
+                               {\r
+          echo "$dir$file\">$file</a><br />\n"; \r
+          $num = ($num + 1);\r
+                               }\r
+               }\r
+               closedir($files); \r
+}\r
+\r
+$dir = ".";\r
+if(isset($_GET["dir"])) $dir = $_GET["dir"];\r
+\r