ひとくち予報を1週間分表示させる

あるサイト用に作っていたのですが、RSS配信元から「法人利用はNG」と判断されてしまって、使いみちがなくなってしまったので公開します(@_@)

手続き型のダラダラしたソースになってしまいますが、今後もっと美しく改良してくれる人がいたらいいなと思っています。
もっとよくできたよという方がいましたら、ぜひ教えてください<(_ _)>

凡例アイコンのpng詰め合わせ（rar）（31個しかできていません。雪関連が未完成）
凡例アイコンのFireworks元ファイル（こっちからすぐ書き出し可能）
※右クリック＞保存してください。
layout.css

必須ファイルである xmlToArray_class.php については、PHPのテクメモさん「XMLを配列に・・・これが最適解かも」で公開してくれています。
下記スクリプトではファイル名を変更しているので、その点ご注意ください。

<?php
/**************************************************
 PHP Version 4.3以上
 --------------------------------------------------
 必要ファイル：
 天気凡例アイコン40種(./w_ico/)
 xmlToArray_class.php
 layout.css
 --------------------------------------------------
 Author：MS-K  http://till-daylight.org
 2007-10-19(金)
 ■ひとくち予報バージョン■
 --------------------------------------------------
 注意事項：
 ひとくち予報の制限により法人での利用は不可！
 http://www.weathermap.co.jp/hitokuchi_rss/
 
 他、改造することでGooやlivedoorにも対応できるかも
 しれませんがともに法人での利用は不可！
 
 個人での利用は自由です。
***************************************************/

ini_set("default_charset", "UTF-8"); 
ini_set("mbstring.internal_encoding", "UTF-8");
ini_set('display_errors', 0);

// TRUEで配列の全データを確認可能
define('DEBUG', TRUE);

// このファイル
$myfile = 'hitokuchiWeather_test.php';
// フィード元ベースURI
$feedbase = 'http://feeds.feedburner.jp/hitokuchi_';
// キャッシュディレクトリ(permission 707)
$cachedir = './cache/';
// キャッシュ間隔（ひとまず2時間）
$cacheage = 60*60*2;
// 凡例アイコンディレクトリ
$icondir = './w_ico/';
// 支庁番号(北海道)
// 他に必要ならひとくち予報で各リンクアドレスを確認して書き換え
$areas = array(
    '1100' => '宗谷',
    '1200' => '上川',
    '1300' => '留萌',
    '1400' => '石狩',
    '1500' => '空知',
    '1600' => '後志',
    '1710' => '網走',
    '1720' => '北見',
    '1730' => '紋別',
    '1800' => '根室',
    '1900' => '釧路',
    '2000' => '十勝',
    '2100' => '胆振',
    '2200' => '日高',
    '2300' => '渡島',
    '2400' => '檜山',
);

// 選択された地域
// 元々はデータベースから取得していましたが、
// 今回、やっつけ的にPOSTから取得することに変更
if(isset($_POST['warea'])) {
    $warea = intval($_POST['warea']);
} else {
    // デフォルト地域
    $warea = '1400';
}

// 設定外地域はNG
if(!array_key_exists($warea, $areas)) {
    $warea = '1400';
}

// 地域セレクトオプション生成
$op = '';
foreach($areas as $k => $v) {
    if($k == $warea) {
        $op .= "<option value=\"{$k}\" selected=\"selected\">{$v}</option>\n";
    } else {
        $op .= "<option value=\"{$k}\">{$v}</option>\n";
    }
}

// アイコン一覧
// 全凡例OKのはず
$icons = array (
    '晴れ' => 'hare.png',//ico ok
    '晴れ一時くもり' => 'harekumori.png',//ico ok
    '晴れ時々くもり' => 'hare-kumori.png',//ico ok
    '晴れのちくもり' => 'hare_kumori.png',//ico ok
    '晴れ一時雨' => 'hareame.png',//ico ok
    '晴れ時々雨' => 'hare-ame.png',//ico ok
    '晴れのち雨' => 'hare_ame.png',//ico ok
    '晴れ一時雪' => 'hareyuki.png',//ico ok
    '晴れ時々雪' => 'hare_yuki.png',//ico ok
    '晴れのち雪' => 'hare_yuki.png',//ico ok
    'くもり' => 'kumori.png',//ico ok
    'くもり一時晴れ' => 'kumorihare.png',//ico ok
    'くもり時々晴れ' => 'kumori-hare.png',//ico ok
    'くもりのち晴れ' => 'kumori_hare.png',//ico ok
    'くもり一時雨' => 'kumoriame.png',//ico ok
    'くもり時々雨' => 'kumori-ame.png',//ico ok
    'くもりのち雨' => 'kumori_ame.png',//ico ok
    'くもり一時雪' => 'kumoriyuki.png',//ico ok
    'くもり時々雪' => 'kumori-yuki.png',//ico ok
    'くもりのち雪' => 'kumori_yuki.png',//ico ok
    '雨' => 'ame.png',//ico ok
    '雨一時晴れ' => 'amehare.png',//ico ok
    '雨時々晴れ' => 'ame-hare.png',//ico ok
    '雨のち晴れ' => 'ame_hare.png',//ico ok
    '雨一時くもり' => 'amekumori.png',//ico ok
    '雨時々くもり' => 'ame-kumori.png',//ico ok
    '雨のちくもり' => 'ame_kumori.png',//ico ok
    '雨一時雪' => 'ameyuki.png',//ico ok
    '雨時々雪' => 'ame-yuki.png',//ico ok
    '雨のち雪' => 'ame_yuki.png',//ico ok
    '雪' => 'yuki.png',//ico ok
    '雪一時晴れ' => 'yukihare.png',//以下アイコン未制作
    '雪時々晴れ' => 'yuki-hare.png',
    '雪のち晴れ' => 'yuki_hare.png',
    '雪一時くもり' => 'yukikumori.png',
    '雪時々くもり' => 'yuki-kumori.png',
    '雪のちくもり' => 'yuki_kumori.png',
    '雪一時雨' => 'yukiame.png',
    '雪時々雨' => 'yuki-ame.png',
    '雪のち雨' => 'yuki_ame.png',
);

// xmlデータを配列にするクラス
require 'xmlToArray_class.php';

// cache確認
// cache2時間以内なら$feeduriはcacheから取得
// それ以外は元RSSから取得
list($cacheflg, $feeduri, $newcache) = checkCache();

// 予報データ取得（ベースまたはcacheから）
$xml_data  = file_get_contents($feeduri);

// cacheファイルが無ければまたは古ければ生成
switch($cacheflg) {
    case 'NEW':
    case 'UP':
    $fp = @fopen($newcache, 'w');
    flock($fp, LOCK_EX);
    fwrite($fp, $xml_data);
    flock($fp, LOCK_UN);
    fclose($fp);
    break;
}

// xmlデータを配列に格納
$xmlObj    = new XmlToArray($xml_data);
$arrayData = $xmlObj->createArray();

// 週間天気予報のみ
$showdata = $arrayData['rss']['channel'][0]['item'][5];

if(DEBUG) {
    echo "<small>\n<pre>\n";
    print_r($showdata);
    echo "</pre>\n</small>\n";
}


/****************
 *  項目を代入
 ****************/

// 曜日
$dow = array(
    '0' => '日',
    '1' => '月',
    '2' => '火',
    '3' => '水',
    '4' => '木',
    '5' => '金',
    '6' => '土',
);

// タイトル
$title = $showdata['wm:forecast'][0]['wm:area'][0]['wm:region'] .'の週間予報';

// 日付
// RSSの日付がおかしい？
// $datadate = $showdata['pubDate'];
$datadate = date("Ymd");

// 予報内容
$weeklydata = $showdata['wm:forecast'][0]['wm:content'];
$weathers = array();
$weathericons = array();
$tempmaxs = array();
$tempmins = array();

// 7日分ループして各情報を配列に再定義
for($i=0; $i<7; $i++) {
    // 予報
    $weathers[] = $weeklydata[$i]['wm:weather'];
    // アイコン代入
    if(isset($weeklydata[$i]['wm:weather'], $icons)) {
        $weathericons[] = $icons[$weeklydata[$i]['wm:weather']];
    } else {
        $weathericons[] = '';
    }
    // 最高・最低気温
    $tempmaxs[] = $weeklydata[$i]['wm:temperature'][0]['wm:max'];
    $tempmins[] = $weeklydata[$i]['wm:temperature'][0]['wm:min'];
}


// 1週間分のHTML出力内容
$out = '';
for($i=0; $i<7; $i++) {
    $datecss = '';
    // 1週間分の日付
    $dates = date("n/j",
        mktime(0, 0, 0, date("m",strtotime($datadate)),
        date("d",strtotime($datadate))+$i,
        date("Y",strtotime($datadate)))
    );
    // 1週間分の曜日
    $weeks = date("w",
        mktime(0, 0, 0, date("m",strtotime($datadate)),
        date("d",strtotime($datadate))+$i,
        date("Y",strtotime($datadate)))
    );
    
    if($weeks === '0') {
        $datecss = ' sun';
    }
    if($weeks === '6') {
        $datecss = ' sat';
    }
    $out .=<<< EOD

<div class="weather">
<p class="date{$datecss}">{$dates}（{$dow[$weeks]}）</p>
<p class="wicon"><img src="{$icondir}{$weathericons[$i]}" alt="{$weathers[$i]}" title="{$weathers[$i]}" /></p>
    <div class="temps">
    <span class="tempmin">$tempmins[$i]℃</span>
    <span class="tempmax">$tempmaxs[$i]℃</span>
    </div>
</div>

EOD;
}


/**
 * 最終表示内容
 */
$output =<<< EOD

<div id="weatherinfo">
<h5>$title</h5>
<form method="post" action="{$myfile}" name="areaform" id="areaform">
<select id="areasel" name="warea" onChange="document.forms['areaform'].submit();">
$op
</select>
<noscript>
<input type="submit" value="切り替え" name="submit" id="submit" />
</noscript>
</form>

<br style="clear: left;" />
$out
<p id="weatherlink">
<a href="http://www.weathermap.co.jp/hitokuchi_rss/">ひとくち予報</a> のRSSを利用させていただいております。</a>
</p>
</div>

EOD;


/**
 * HTML出力開始。
 * 他のページに埋め込む場合は呼び出し元で、
 * include 'hitokuchiWeather_test.php' して echo $output で出力。
 * 以下は全てコメントアウト。
 */
echo <<< EOD
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ja" lang="ja">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="content-style-type" content="text/css" />
<meta http-equiv="content-script-type" content="text/javascript" />
<link rel="stylesheet" href="layout.css" type="text/css" />
<title>天気予報</title>
</head>
<body>

$output

</body>
</html>
EOD;
/* HTML出力ここまで */


function checkCache() {
    global $cachedir,$cacheage,$warea,$feedbase;
    $cachefile = $cachedir.$warea;
    $feeduri = $feedbase.$warea;
    $cacheflg = FALSE;
    
    // 現在時刻
    $now = date("H");
    
    if(file_exists($cachefile)) {
        // cacheの更新時刻
        $mtime = filemtime($cachefile);
        // cacheと現在との時間差
        $age = time() - $mtime;

        // cache有効間隔より古く、今が6時～20時ならフィード元から
        // この辺、ひとくち予報の更新時刻に合わせています。
        if ($age > $cacheage and ($now > 5 and $now < 21)) {
            $feeduri = $feeduri;
            $cacheflg = 'UP';
            $newcache = $cachedir.$warea;
        }
        // cache有効間隔内または今が21時～5時ならcacheから
        else {
            $feeduri = $cachefile;
            $newcache = '';
        }
    // 初アクセスの場合、新規cache
    } else {
        $feeduri = $feeduri;
        $cacheflg = 'NEW';
        $newcache = $cachedir.$warea;
    }
    return array($cacheflg, $feeduri, $newcache);
}
?>

過去の日記は「はてな」にあります。

石狩地方の週間予報

ひとくち予報を1週間分表示させる

北海道石狩地方（札幌）の週間予報