1. <?php
  2. // table of contents over all dirs in the dir (with hyperlink)
  3. // (c) maximilianus7
  6. // please adapt...
  7. $ignore_list = 'docs~dokumente~ablage~sources~old~backup~install~adds~phpmyadmin'; //use ~ as delimiter!
  8. $title_prefix = '--> ';
  9. $title_pattern = '.title=';
  11. $lang = substr ($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0, 2);
  12. $host = $_SERVER[HTTP_HOST];
  14. echo "<html> <body> <h3>Shared Tables on $host</h3>";
  15. echo '<table>';
  16. show_list ('', "../projects/", 'R'); // title, dir, R=recursive
  17. show_list ('some text files', "./misc/", 'F'); // F=file
  18. // show_list ('old SToW clients', "../home/", 'D'); // D=directory (non-recursive)
  19. echo @file_get_contents('additional_links.html');
  20. echo '</table>';
  22. ////////////////////////////////////////////////////////////////////////////////////////
  23. function show_list ($title, $dir, $type, $level=1)
  24. {
  25. global $ignore_list;
  26. if ( $title > '' ): echo "<tr><td style='font-size:larger;font-weight:bold'><br>$title</td></tr>"; endif;
  27. $list = scandir ($dir);
  28. natcasesort ($list);
  29. //DD// echo "$level---$file <br>";
  30. foreach ( $list as $file ):
  31. if ( $file [0] == "." ) continue; // ignore ., .. and all starting with .
  33. switch ( $type ):
  34. case 'R': // recursive
  35. case 'D': // directory
  36. if ( is_file ("$dir$file") ): continue 2; endif;
  38. //$_i = stripos ("~$ignore_list~", "~$file~" ); var_dump($_i,$ignore_list,$file);
  39. if ( stripos ("~~$ignore_list~", "~$file~" ) > 0): continue 2; endif;
  40. if ( stripos ($file, '.' ) > 0): continue 2; endif;
  41. $descr = find_title ("$dir$file");
  42. break;
  43. case 'F': // file
  44. if ( is_dir ("$dir$file") ) continue 2;
  45. if ( substr (strrev ($file), 0, 4) == 'php.') continue 2; //continue 1 works as break inside the switch
  46. break;
  47. endswitch;
  49. $indent = str_repeat ('&nbsp;', ($level - 1) * 3);
  50. echo "<tr><td>$indent<a href=\"$dir$file\">$file</a></td><td>$descr</td></tr>";
  51. $descr = '';
  53. if ( $type == 'R' ): show_list ('', "$dir$file/", 'R', $level + 1); endif;
  54. endforeach;
  55. }
  57. ////////////////////////////////////////////////////////////////////////////////////////
  58. function find_title ($dir)
  59. {
  60. global $title_prefix, $title_pattern;
  61. $files = scandir ($dir);
  63. foreach ($files as $f):
  64. if ( substr ($f, 0, strlen ($title_pattern)) == $title_pattern ):
  65. return title_prefix . substr ($f, strlen ($title_pattern));
  66. endif;
  67. endforeach;
  68. return "";
  69. }
  70. ?>
  71. </body>
  72. </html>