100)
{
// Delete bad cookie
setcookie('rc_weatherloc');
}
else
{
// Get locality from cookie value
$weatherloc = $_COOKIE['rc_weatherloc'];
}
}
// See if user has just entered a new zip code
if (isset($_GET['weatherzip']) and $_GET['weatherzip'] <> "00000")
{
$weatherzip = $_GET['weatherzip'];
// Validate zip code
$weatherbox = "(Bad zip code entered.)
";
if (ereg('^[0-9]{5}$', $weatherzip))
{
// Find out name of locality and set a cookie
$weatherbox = "(Couldn't find new locality.)
";
if ($pageArray = file("http://www.wunderground.com/cgi-bin/findweather/getForecast?query=$weatherzip"))
{
$page = implode("", $pageArray);
if (ereg("/geo/BannerPromo/([A-Za-z/]*)\.html", $page, $regs) and strlen($regs[1]) <= 30)
{
$weatherbox = '';
$weatherloc = $regs[1];
if (!setcookie('rc_weatherloc', $weatherloc, time()+60*60*24*3000, '/', '.rootcentral.org', 0))
{
$weatherbox = "(Cannot set cookie!)";
}
}
}
}
}
// If we know a location, show the weather info
if (isset($weatherloc) and $_GET['weatherzip'] <> "00000")
{
if (ereg('^[A-Za-z]*/([A-Za-z]*)/([A-Za-z]*)$', $weatherloc, $regs))
{
$weatherbox .= "Weather for $regs[2], $regs[1]:
";
}
// Display weather for this location
$weatherbox .= "(Click for forcast)
";
$weatherbox .= "";
$weatherbox .= "![](\"http://banners.wunderground.com/banner/gizmotimetemp_both/language/www/$weatherloc.gif\""; "\\"Click")
";
$weatherbox .= "Change location";
}
else
{
// Provide a form for setting the zip code
$weatherbox .= "";
}
?>