<?

/** This script indexes directories in sound_dir by their first letter in the 
  * outdir directory. It creates symlinks to the real directories, thus wasting
  * no disk space.
  *
  * To run it, install php4-cgi in order to execute php scripts on the command 
  * line. Place the script above the directory containing the stuff to be 
  * indexed. Now type on the command line
  * php4 indexer.php
  * and look out for error messages.
  *
  * Place image files for the letters into the dir specified by letterdir. 
  * They must be named from A.png to Z.png, plus one named indexed.png for the 
  * top output directory.
  *
  * Please note that directories beginning with small letters will be ignored,
  * only capital letters get indexed.
  *
  * When the original directory changes, just rerun the script. It will add
  * the missing links. (However, it does not check if there is something
  * removed in the original directory. Thus if you deleted something, you
  * should remove the index directory to let the script regenerate the index.)
  *
  * (c) David Buchmann, 31.10.2004
  * Comments, suggestions etc. to budda at budda.ch
  *
  * THIS CODE IS PROVIDED 'AS IS' WITHOUT ANY WARRENTY WHATSOEVER. USE AT YOUR OWN RISK. 
  */

$letterdir = '.img';
$sound_dir = 'sound';
$outdir = 'sound_indexed';


$lower = 65; //(A) 
$upper = 90; // (Z)


if (! file_exists($outdir)) {
  mkdir($outdir, 0777);
  copy("$letterdir/indexed.png", "$outdir/cover.png");
}

for ($i = $lower; $i<=$upper; $i++) {
   if (! file_exists($outdir.'/'.chr($i))) {
       mkdir($outdir.'/'. chr($i), 0777);
       copy("$letterdir/".chr($i).".png", 
         "$outdir/".chr($i)."/cover.png");
       echo "Created directory for letter ".chr($i)."\n";
    }  
}
echo "\n";

if ($dh = opendir($sound_dir)) {
  while (($dirname = readdir($dh)) !== false) {
    if (is_dir($sound_dir.'/'.$dirname)) {
      $first = substr($dirname, 0,1);
      if (ord($first)>=$lower && ord($first)<=$upper) {
        if (!file_exists("$outdir/$first/$dirname")) {
	$cwd = getcwd();
	chdir("$outdir/$first/");
	   symlink("$cwd/$sound_dir/$dirname", "$dirname");
	   echo "Created Link to $cwd/$sound_dir/$dirname in $outdir/$first/\n";
	chdir($cwd);
	}
      }
    }
  }
  closedir($dh);
}