<?php
/*
 * This file is part of EC-CUBE
 *
 * Copyright(c) 2000-2010 LOCKON CO.,LTD. All Rights Reserved.
 *
 * http://www.lockon.co.jp/
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */

// {{{ requires
require_once(CLASS_PATH . "pages/admin/LC_Page_Admin.php");

/**
 * メイン編集 のページクラス.
 *
 * @package Page
 * @author LOCKON CO.,LTD.
 * @version $Id$
 */
class LC_Page_Admin_Design_MainEdit extends LC_Page_Admin {

    // }}}
    // {{{ functions

    /**
     * Page を初期化する.
     *
     * @return void
     */
    function init() {
        parent::init();
        $this->tpl_mainpage = 'design/main_edit.tpl';
        $this->tpl_subnavi  = 'design/subnavi.tpl';
        $this->user_URL     = USER_URL;
        $this->text_row     = 13;
        $this->tpl_subno = "main_edit";
        $this->tpl_mainno = "design";
        $this->tpl_subtitle = 'ページ詳細設定';
    }

    /**
     * Page のプロセス.
     *
     * @return void
     */
    function process() {
        $this->action();
        $this->sendResponse();
    }

    /**
     * Page のアクション.
     *
     * @return void
     */
    function action() {
        $objView = new SC_AdminView();
        $this->objLayout = new SC_Helper_PageLayout_Ex();

        // 認証可否の判定
        $objSess = new SC_Session();
        SC_Utils_Ex::sfIsSuccess($objSess);

        // ページ一覧を取得
        $this->arrPageList = $this->objLayout->lfgetPageData();
        
        // ブロックIDを取得
        if (isset($_POST['page_id'])) {
            $page_id = $_POST['page_id'];
        }else if (isset($_GET['page_id'])){
            $page_id = $_GET['page_id'];
        }else{
            $page_id = '';
        }

        $this->page_id = $page_id;

        // メッセージ表示
        if (isset($_GET['msg']) && $_GET['msg'] == "on"){
            $this->tpl_onload="alert('登録が完了しました。');";
        }

        // page_id が指定されている場合にはテンプレートデータの取得
        if (is_numeric($page_id) and $page_id != '') {
            $this->lfGetPageData($page_id, $objView);
        }

        if (!isset($_POST['mode'])) $_POST['mode'] = "";
        
        // プレビュー処理
        if ($_POST['mode'] == 'preview') {
            $this->lfPreviewPageData($page_id);
            exit;
        }

        // データ登録処理
        if ($_POST['mode'] == 'confirm') {
            $this->lfConfirmPageData($page_id);
        }

        // データ削除処理 ベースデータでなければファイルを削除
        if ($_POST['mode'] == 'delete' and !$this->objLayout->lfCheckBaseData($page_id)) {
            $this->lfDeletePageData($page_id);
            exit;
        }
    }

    /**
     * デストラクタ.
     *
     * @return void
     */
    function destroy() {
        parent::destroy();
    }

    /**
     * ページデータを取得する.
     *
     * @param integer $page_id ページID
     * @param object $objView ビューオブジェクト
     * @return void
     */
    function lfGetPageData($page_id, $objView){
        $arrPageData = $this->objLayout->lfgetPageData(" page_id = ? " , array($page_id));

        if (strlen($arrPageData[0]['filename']) == 0) {
            $this->arrErr['page_id_err'] = "※ 指定されたページは編集できません。";
            // 画面の表示
            $objView->assignobj($this);
            $objView->display(MAIN_FRAME);
            exit;
        }

        // テンプレートファイルが存在していれば読み込む
        $tpl_file =  USER_TEMPLATE_PATH . "/" . TEMPLATE_NAME . "/" . $arrPageData[0]['filename'] . ".tpl";
        if (file_exists($tpl_file)){
            $arrPageData[0]['tpl_data'] = file_get_contents($tpl_file);
        // 存在してなければ, 指定されたテンプレートのファイルを読み込む
        } else {
            $arrPageData[0]['tpl_data'] = file_get_contents(TEMPLATE_DIR . $arrPageData[0]['filename'] . ".tpl");
        }

        // チェックボックスの値変更
        $arrPageData[0]['header_chk'] = SC_Utils_Ex::sfChangeCheckBox($arrPageData[0]['header_chk'], true);
        $arrPageData[0]['footer_chk'] = SC_Utils_Ex::sfChangeCheckBox($arrPageData[0]['footer_chk'], true);

        // ディレクトリを画面表示用に編集
        $arrPageData[0]['directory'] = str_replace(USER_DIR, '', $arrPageData[0]['php_dir']);

        $this->arrPageData = $arrPageData[0];
    }

    /**
     * プレビュー画面を表示する.
     *
     * @param integer $page_id ページID
     * @return void
     */
    function lfPreviewPageData($page_id){

        $page_id_old = $page_id;
        // プレビューの場合ページIDを0にセットする。
        $page_id = "0";
        $url = basename($_POST['url']);
        
        $tmpPost = $_POST;
        $tmpPost['page_id'] = $page_id;
        $tmpPost['url'] = $url;
        $tmpPost['tpl_dir'] = USER_PATH . "templates/preview/";
        
        $arrPreData = $this->objLayout->lfgetPageData("page_id = ?" , array($page_id));
        
        // tplファイルの削除 (XXX: 処理の意図が不明。存在していると都合が悪いファイル?)
        $del_tpl = USER_PATH . "templates/" . $arrPreData[0]['filename'] . '.tpl';
        if (file_exists($del_tpl)){
            unlink($del_tpl);
        }

        // DBへデータを更新する
        $this->lfEntryPageData($tmpPost);

        // TPLファイル作成
        $preview_tpl = USER_PATH . "templates/preview/" . TEMPLATE_NAME . "/" . $url . '.tpl';
        $this->lfCreateFile($preview_tpl, $_POST['tpl_data']);
        
        // blocposition を削除
        $objQuery = new SC_Query();		// DB操作オブジェクト
        $sql = 'delete from dtb_blocposition where page_id = 0';
        $ret = $objQuery->query($sql);

        if ($page_id_old != "") {
            // 登録データを取得
            $sql = "SELECT 0, target_id, bloc_id, bloc_row FROM dtb_blocposition WHERE page_id = ?";
            $ret = $objQuery->getAll($sql,array($page_id_old));

            if (count($ret) > 0) {

                // blocposition を複製
                $sql = " insert into dtb_blocposition (";
                $sql .= "     page_id,";
                $sql .= "     target_id,";
                $sql .= "     bloc_id,";
                $sql .= "     bloc_row";
                $sql .= "     )values(?, ?, ?, ?)";

                // 取得件数文INSERT実行
                foreach($ret as $key => $val){
                    $ret = $objQuery->query($sql,$val);
                }
            }
        }
        $_SESSION['preview'] = "ON";
        $this->objDisplay->redirect($this->getLocation(URL_DIR . "preview/" . DIR_INDEX_URL, array("filename" => $arrPageData[0]["filename"])));

    }

    /**
     * データ登録処理.
     *
     * @param integer $page_id ページID
     * @return void
     */
    function lfConfirmPageData($page_id){
        // エラーチェック
        $this->arrErr = $this->lfErrorCheck($_POST);

        // エラーがなければ更新処理を行う
        if (count($this->arrErr) == 0) {
            // DBへデータを更新する
            $this->lfEntryPageData($_POST);

            // ベースデータでなければファイルを削除し、PHPファイルを作成する
            if (!$this->objLayout->lfCheckBaseData($page_id)) {
                // PHPファイル作成
                $this->lfCreatePHPFile($_POST['url']);
            }

            // TPLファイル作成
            $cre_tpl = USER_TEMPLATE_PATH . "/" . TEMPLATE_NAME . "/" . basename($_POST['url']) . '.tpl';
            $this->lfCreateFile($cre_tpl, $_POST['tpl_data']);

            // 新規作成の場合、
            if ($page_id == '') {
                // ページIDを取得する
                $arrPageData = $this->objLayout->lfgetPageData(" url = ? AND page_id <> 0" , array(USER_DIR . $_POST['url'] . '.php'));
                $page_id = $arrPageData[0]['page_id'];
            }
            $this->objDisplay->redirect($this->getLocation("./main_edit.php",
                                    array("page_id" => $page_id,
                                          "msg"     => "on")));
            exit;
        } else {
            // エラーがあれば入力時のデータを表示する
            $this->arrPageData = $_POST;
            $this->arrPageData['header_chk'] = SC_Utils_Ex::sfChangeCheckBox(SC_Utils_Ex::sfChangeCheckBox($_POST['header_chk']), true);
            $this->arrPageData['footer_chk'] = SC_Utils_Ex::sfChangeCheckBox(SC_Utils_Ex::sfChangeCheckBox($_POST['footer_chk']), true);
            $this->arrPageData['directory'] = '';
            $this->arrPageData['filename'] = $_POST['url'];
        }
    }

    /**
     * ブロック情報を更新する.
     *
     * @param array $arrData 更新データ
     * @return void
     */
    function lfEntryPageData($arrData){
        $objQuery = new SC_Query();
        $arrChk = array();          // 排他チェック用

        // 更新データの変換
        $sqlval = $this->lfGetUpdData($arrData);

        // データが存在しているかチェックを行う
        if($arrData['page_id'] !== ''){
            $arrChk = $this->objLayout->lfgetPageData("page_id = ?", array($arrData['page_id']));
        }

        // page_id が空 若しくは データが存在していない場合にはINSERTを行う
        if ($arrData['page_id'] === '' or !isset($arrChk[0])) {
            $sqlval['page_id'] = $objQuery->nextVal('dtb_pagelayout_page_id');
            $sqlval['create_date'] = 'now()';
            $objQuery->insert('dtb_pagelayout', $sqlval);
        }
        // データが存在してる場合にはアップデートを行う
        else {
            $objQuery->update('dtb_pagelayout', $sqlval, 'page_id = ?', array($arrData['page_id']));
        }
    }

    /**
     * DBへ更新を行うデータを生成する.
     *
     * @param array $arrData 更新データ
     * @return array 更新データ
     */
    function lfGetUpdData($arrData){
        $arrUpdData = array(
            'header_chk'    => SC_Utils_Ex::sfChangeCheckBox($arrData['header_chk']),   // ヘッダー使用
            'footer_chk'    => SC_Utils_Ex::sfChangeCheckBox($arrData['footer_chk']),   // フッター使用
            'update_url'    => $_SERVER['HTTP_REFERER'],                                // 更新URL
            'update_date'   => 'now()',
        );

        // ベースデータの場合には変更しない。
        if (!$this->objLayout->lfCheckBaseData($arrData['page_id'])) {
            $arrUpdData['page_name']    = $arrData['page_name'] ;
            $arrUpdData['url']          = USER_DIR . $arrData['url'] . '.php';
            $arrUpdData['php_dir']      = dirname($arrUpdData['url']);
            if ($arrUpdData['php_dir'] == '.') {
                $arrUpdData['php_dir'] = '';
            } else {
                $arrUpdData['php_dir'] .= '/';
            }
            $arrUpdData['tpl_dir']      = substr(TPL_DIR, strlen(URL_DIR));
            $arrUpdData['filename']     = basename($arrData['url']); // 拡張子を付加しない
        }

        return $arrUpdData;
    }

    /**
     * ページデータを削除する.
     *
     * @param integer $page_id ページID
     * @return void
     */
    function lfDeletePageData($page_id){
        $this->objLayout->lfDelPageData($_POST['page_id']);
        $this->objDisplay->redirect($this->getLocation("./main_edit.php"));
    }

    /**
     * 入力項目のエラーチェックを行う.
     *
     * @param array $arrData 入力データ
     * @return array エラー情報
     */
    function lfErrorCheck($array) {
        $objErr = new SC_CheckError($array);
        $objErr->doFunc(array("名称", "page_name", STEXT_LEN), array("EXIST_CHECK", "SPTAB_CHECK", "MAX_LENGTH_CHECK"));
        $objErr->doFunc(array("URL", "url", STEXT_LEN), array("EXIST_CHECK", "SPTAB_CHECK", "MAX_LENGTH_CHECK"));
        
        // URLチェック
        $okUrl = true;
        foreach (explode('/', $array['url']) as $url_part) {
            if (!ereg( '^[a-zA-Z0-9:_~\.-]+$', $url_part)) {
                $okUrl = false;
            }
            if ($url_part == '.' || $url_part == '..') {
                $okUrl = false;
            }
        }
        if (!$okUrl) {
            $objErr->arrErr['url'] = "※ URLを正しく入力してください。<br />";
        }
        
        // 同一のURLが存在している場合にはエラー
        $params = array();
        
        $sqlWhere = 'url = ?';
        $params[] = USER_DIR . $array['url'] . '.php';
        
        // プレビュー用のレコードは除外
        $sqlWhere .= ' AND page_id <> 0';
        
        // 変更の場合、自身のレコードは除外
        if (strlen($array['page_id']) != 0) {
            $sqlWhere .= ' AND page_id <> ?';
            $params[] = $array['page_id'];
        }
        
        $arrChk = $this->objLayout->lfgetPageData($sqlWhere , $params);
        
        if (count($arrChk) >= 1) {
            $objErr->arrErr['url'] = '※ 同じURLのデータが存在しています。別のURLを付けてください。<br />';
        }
        
        return $objErr->arrErr;
    }

    /**
     * ファイルを作成する.
     *
     * @param string $path テンプレートファイルのパス
     * @param string $data テンプレートの内容
     * @return void
     */
    function lfCreateFile($path, $data){

        // ディレクトリが存在していなければ作成する
        if (!is_dir(dirname($path))) {
            mkdir(dirname($path));
        }

        // ファイル作成
        $fp = fopen($path,"w");
        fwrite($fp, $data); // FIXME いきなり POST はちょっと...
        fclose($fp);
    }

    /**
     * PHPファイルを作成する.
     *
     * @param string $path PHPファイルのパス
     * @return void
     */
    function lfCreatePHPFile($url){

        $path = USER_PATH . $url . ".php";

        // カスタマイズを考慮し、上書きしない。(#831)
        if (file_exists($path)) {
            return;
        }

        // php保存先ディレクトリが存在していなければ作成する
        if (!is_dir(dirname($path))) {
            mkdir(dirname($path));
        }

        // ベースとなるPHPファイルの読み込み
        if (file_exists(USER_DEF_PHP)){
            $php_data = file_get_contents(USER_DEF_PHP);
        }

        // require.phpの場所を書き換える
        $php_data = str_replace("###require###", str_repeat('../', substr_count($url, '/')) . '../require.php', $php_data);

        // phpファイルの作成
        $fp = fopen($path,"w");
        fwrite($fp, $php_data);
        fclose($fp);
    }

}
?>
