home *** CD-ROM | disk | FTP | other *** search
/ linuxmafia.com 2016 / linuxmafia.com.tar / linuxmafia.com / jordan / wot-redirect.inc < prev    next >
Text File  |  2010-11-08  |  2KB  |  54 lines
  1. <?
  2.     // Keep Leigh_Butler@paramount.com, leighdb@pacbell.net, 
  3.     // leigh.butler@gmail.com in the loop on changes.
  4.     //    seed with microseconds
  5.     function make_seed()
  6.     {
  7.         list($usec, $sec) = explode(' ', microtime());
  8.         return (float) $sec + ((float) $usec * 100000);
  9.     }
  10.     srand(make_seed());
  11.     // Pick a number from 0 to 20.  Mirror is selected later based on value.
  12.     $randval = rand(0, 20);
  13.     
  14. //    // Is the number between 0 and 6?
  15. //    if ($randval < 6)
  16. //    {
  17. //        // Alistair Young's <avatar@arkane.demon.co.uk> 
  18. //        // <silicate@gmail.com> mirror 
  19. //        // Replaces http://www.arkane-systems.net/faqs/WOTFAQ/
  20. //        $address = " http://www.siliconcerebrate.com/faqs/WOTFAQ/";
  21. //        header("Location: $address");
  22. //    }
  23.     // Is the number between 0 and 7?
  24.     if ($randval < 7)
  25.     {
  26.         // David Scotton's <dscotton@bantha.org> and Maggie Brazeau's
  27.         // <maggie_sedai@darkfriends.net> mirror
  28.         $address = "http://www.darkfriends.net/wheel/";
  29.         header("Location: $address");
  30.     }
  31.     // Is the number between 8 and 14?
  32.     else if ($randval < 14)
  33.     {
  34.         // Kate Nepveu's <knepveu@steelypips.org> mirror
  35.         $address = " http://www.steelypips.org/wot-tgs/";
  36.         header("Location: $address");
  37.     }
  38. // Kate Nepveu's location was http://steelypips.org/wotfaq/ to 2010-11-08.
  39. // If number is between 15 and 20, stay at http://linuxmafia.com/jordan/.
  40. //
  41. // Discontinued mirrors -- don't use!
  42. //        // Jeff S. Dougan's <jffdougan@usawide.net> uneditable mirror, 
  43. //        $address = "http://www.sit.wisc.edu/~jsdougan/wotfaq/";
  44. //         // Pam Korda's <kor2@midway.uchicago.edu> going-away mirror
  45. //        $address = "http://home.uchicago.edu/~kor2/WH_FAQ/";
  46. //        // Alistair Young's  <avatar@arkane.demon.co.uk> 
  47. //              // <silicate@gmail.com> original mirror
  48. //        $address = "http://www.arkane.demon.co.uk/WOTFAQ/";
  49. //
  50. // Unofficial mirror:
  51. //              // Nils Amlehn's <admin@amlehn.ch> mirror
  52. //              $address = "http://www.amlehn.ch/WoT/";
  53. ?>
  54.