source: branches/feature-module-update/data/class/pages/admin/system/LC_Page_Admin_System_Bkup.php @ 16582

Revision 16582, 22.3 KB checked in by nanasess, 17 years ago (diff)

ライセンス表記変更

  • Property svn:eol-style set to LF
  • Property svn:keywords set to Id Revision Date
  • Property svn:mime-type set to text/x-httpd-php
Line 
1<?php
2/*
3 * This file is part of EC-CUBE
4 *
5 * Copyright(c) 2000-2007 LOCKON CO.,LTD. All Rights Reserved.
6 *
7 * http://www.lockon.co.jp/
8 *
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License
11 * as published by the Free Software Foundation; either version 2
12 * of the License, or (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22 */
23
24// {{{ requires
25require_once(CLASS_PATH . "pages/LC_Page.php");
26require_once(DATA_PATH. "module/Tar.php");
27/**
28 * バックアップ のページクラス.
29 *
30 * @package Page
31 * @author LOCKON CO.,LTD.
32 * @version $Id$
33 */
34class LC_Page_Admin_System_Bkup extends LC_Page {
35
36    // }}}
37    // {{{ functions
38
39    /**
40     * Page を初期化する.
41     *
42     * @return void
43     */
44    function init() {
45        parent::init();
46        $this->tpl_mainpage = 'system/bkup.tpl';
47        $this->tpl_subnavi = 'system/subnavi.tpl';
48        $this->tpl_mainno = 'system';
49        $this->tpl_subno = 'bkup';
50        $this->tpl_subtitle = 'バックアップ管理';
51
52        $this->bkup_dir = USER_PATH . "bkup/";
53
54    }
55
56    /**
57     * Page のプロセス.
58     *
59     * @return void
60     */
61    function process() {
62        $objView = new SC_AdminView();
63        $objQuery = new SC_Query();
64
65        // セッションクラス
66        $objSess = new SC_Session();
67        // 認証可否の判定
68        SC_Utils_Ex::sfIsSuccess($objSess);
69
70        // バックアップテーブルがなければ作成する
71        $this->lfCreateBkupTable();
72
73        if (!isset($_POST['mode'])) $_POST['mode'] = "";
74
75        switch($_POST['mode']) {
76            // バックアップを作成する
77        case 'bkup':
78            // 入力文字列の変換
79            $arrData = $this->lfConvertParam($_POST);
80
81            // エラーチェック
82            $arrErr = $this->lfCheckError($arrData);
83
84            // エラーがなければバックアップ処理を行う
85            if (count($arrErr) <= 0) {
86                // バックアップファイル作成
87                $arrErr = $this->lfCreateBkupData($arrData['bkup_name']);
88
89                // DBにデータ更新
90                if (count($arrErr) <= 0) {
91                    $this->lfUpdBkupData($arrData);
92                }else{
93                    $arrForm = $arrData;
94                }
95
96                $this->tpl_onload = "alert('バックアップ完了しました');";
97            }else{
98                $arrForm = $arrData;
99            }
100
101            break;
102
103            // リストア
104        case 'restore':
105        case 'restore_config':
106            if ($_POST['mode'] == 'restore_config') {
107                $this->mode = "restore_config";
108            }
109
110            $this->lfRestore($_POST['list_name']);
111
112            break;
113
114            // 削除
115        case 'delete':
116            $del_file = $this->bkup_dir.$_POST['list_name'] . ".tar.gz";
117            // ファイルの削除
118            if(is_file($del_file)){
119                $ret = unlink($del_file);
120            }
121
122            // DBから削除
123            $delsql = "DELETE FROM dtb_bkup WHERE bkup_name = ?";
124            $objQuery->query($delsql, array($_POST['list_name']));
125
126            break;
127
128            // ダウンロード
129        case 'download' :
130            $filename = $_POST['list_name'] . ".tar.gz";
131            $dl_file = $this->bkup_dir.$_POST['list_name'] . ".tar.gz";
132
133            // ダウンロード開始
134            Header("Content-disposition: attachment; filename=${filename}");
135            Header("Content-type: application/octet-stream; name=${filename}");
136            header("Content-Length: " .filesize($dl_file));
137            readfile ($dl_file);
138            exit();
139            break;
140
141        default:
142            break;
143        }
144
145        // バックアップリストを取得する
146        $arrBkupList = $this->lfGetBkupData("ORDER BY create_date DESC");
147        // テンプレートファイルに渡すデータをセット
148        $this->arrErr = isset($arrErr) ? $arrErr : "";
149        $this->arrForm = isset($arrForm) ? $arrForm : "";
150        $this->arrBkupList = $arrBkupList;
151
152        $objView->assignobj($this);     //変数をテンプレートにアサインする
153        $objView->display(MAIN_FRAME);      //テンプレートの出力
154    }
155
156    /**
157     * デストラクタ.
158     *
159     * @return void
160     */
161    function destroy() {
162        parent::destroy();
163    }
164
165    /* 取得文字列の変換 */
166    function lfConvertParam($array) {
167        /*
168         *  文字列の変換
169         *  K :  「半角(ハンカク)片仮名」を「全角片仮名」に変換
170         *  C :  「全角ひら仮名」を「全角かた仮名」に変換
171         *  V :  濁点付きの文字を一文字に変換。"K","H"と共に使用します
172         *  n :  「全角」数字を「半角(ハンカク)」に変換
173         *  a :  全角英数字を半角英数字に変換する
174         */
175        $arrConvList['bkup_name'] = "a";
176        $arrConvList['bkup_memo'] = "KVa";
177
178        // 文字変換
179        foreach ($arrConvList as $key => $val) {
180            // POSTされてきた値のみ変換する。
181            if(isset($array[$key])) {
182                $array[$key] = mb_convert_kana($array[$key] ,$val);
183            }
184        }
185        return $array;
186    }
187
188    // エラーチェック
189    function lfCheckError($array){
190        $objErr = new SC_CheckError($array);
191
192        $objErr->doFunc(array("バックアップ名", "bkup_name", STEXT_LEN), array("EXIST_CHECK","MAX_LENGTH_CHECK","NO_SPTAB","ALNUM_CHECK"));
193        $objErr->doFunc(array("バックアップメモ", "bkup_memo", MTEXT_LEN), array("MAX_LENGTH_CHECK"));
194
195        // 重複チェック
196        $ret = $this->lfGetBkupData("WHERE bkup_name = ?", array($array['bkup_name']));
197        if (count($ret) > 0) {
198            $objErr->arrErr['bkup_name'] = "バックアップ名が重複しています。別名を入力してください。";
199        } else {
200            $objErr->arrErr = array();
201        }
202
203        return $objErr->arrErr;
204    }
205
206    // バックアップファイル作成
207    function lfCreateBkupData($bkup_name){
208        $objQuery = new SC_Query();
209        $csv_data = "";
210        $csv_autoinc = "";
211        $err = true;
212
213        $bkup_dir = $this->bkup_dir;
214        if (!is_dir(dirname($bkup_dir))) $err = mkdir(dirname($bkup_dir));
215        $bkup_dir = $bkup_dir . $bkup_name . "/";
216
217        // 全テーブル取得
218        $arrTableList = $this->lfGetTableList();
219
220        // 各テーブル情報を取得する
221        foreach($arrTableList as $key => $val){
222
223            if (!($val == "dtb_bkup" || $val == "mtb_zip")) {
224
225                // 自動採番型の構成を取得する
226                $csv_autoinc .= $this->lfGetAutoIncrement($val);
227
228                // 全データを取得
229                if ($val == "dtb_pagelayout"){
230                    $arrData = $objQuery->getAll("SELECT * FROM $val ORDER BY page_id");
231                }else{
232                    $arrData = $objQuery->getAll("SELECT * FROM $val");
233                }
234
235                // CSVデータ生成
236                if (count($arrData) > 0) {
237
238                    // カラムをCSV形式に整える
239                    $arrKyes = SC_Utils_Ex::sfGetCommaList(array_keys($arrData[0]), false);
240
241                    // データをCSV形式に整える
242                    $data = "";
243                    foreach($arrData as $data_key => $data_val){
244                        //$val = str_replace("\"", "\\\"", $val);
245                        $data .= $this->lfGetCSVList($arrData[$data_key]);
246
247                    }
248                    // CSV出力データ生成
249                    $csv_data .= $val . "\r\n";
250                    $csv_data .= $arrKyes . "\r\n";
251                    $csv_data .= $data;
252                    $csv_data .= "\r\n";
253                }
254
255                // タイムアウトを防ぐ
256                SC_Utils_Ex::sfFlush();
257            }
258        }
259
260        $csv_file = $bkup_dir . "bkup_data.csv";
261        $csv_autoinc_file = $bkup_dir . "autoinc_data.csv";
262        mb_internal_encoding(CHAR_CODE);
263        // CSV出力
264        // ディレクトリが存在していなければ作成する
265        if (!is_dir(dirname($csv_file))) {
266            $err = mkdir(dirname($csv_file));
267        }
268        if ($err) {
269            // dataをCSV出力
270            $fp = fopen($csv_file,"w");
271            if($fp) {
272                if($csv_data != ""){
273                    $err = fwrite($fp, $csv_data);
274                }
275                fclose($fp);
276            }
277
278            // 自動採番をCSV出力
279            $fp = fopen($csv_autoinc_file,"w");
280            if($fp) {
281                if($csv_autoinc != ""){
282                    $err = fwrite($fp, $csv_autoinc);
283                }
284                fclose($fp);
285            }
286        }
287
288        // 各種ファイルコピー
289        if ($err) {
290            // 商品画像ファイルをコピー
291            // ディレクトリが存在していなければ作成する
292            $image_dir = $bkup_dir . "save_image/";
293            if (!is_dir(dirname($image_dir))) $err = mkdir(dirname($image_dir));
294            $copy_mess = "";
295            $copy_mess = SC_Utils_Ex::sfCopyDir("../../upload/save_image/",$image_dir, $copy_mess);
296
297            // テンプレートファイルをコピー
298            // ディレクトリが存在していなければ作成する
299            $templates_dir = $bkup_dir . "templates/";
300            if (!is_dir(dirname($templates_dir))) $err = mkdir(dirname($templates_dir));
301            $copy_mess = "";
302            $copy_mess = SC_Utils_Ex::sfCopyDir("../../user_data/templates/",$templates_dir, $copy_mess);
303
304            // インクルードファイルをコピー
305            // ディレクトリが存在していなければ作成する
306            $inc_dir = $bkup_dir . "include/";
307            if (!is_dir(dirname($inc_dir))) $err = mkdir(dirname($inc_dir));
308            $copy_mess = "";
309            $copy_mess = SC_Utils_Ex::sfCopyDir("../../user_data/include/",$inc_dir, $copy_mess);
310
311            // CSSファイルをコピー
312            // ディレクトリが存在していなければ作成する
313            $css_dir = $bkup_dir . "css/";
314            if (!is_dir(dirname($css_dir))) $err = mkdir(dirname($css_dir));
315            $copy_mess = "";
316            $copy_mess = SC_Utils_Ex::sfCopyDir("../../user_data/css/",$css_dir, $copy_mess);
317
318            //圧縮フラグTRUEはgzip圧縮をおこなう
319            $tar = new Archive_Tar($this->bkup_dir . $bkup_name.".tar.gz", TRUE);
320
321            //bkupフォルダに移動する
322            chdir($this->bkup_dir);
323
324            //圧縮をおこなう
325            $zip = $tar->create("./" . $bkup_name . "/");
326
327            // バックアップデータの削除
328            if ($zip) SC_Utils_Ex::sfDelFile($bkup_dir);
329        }
330
331        if (!$err) {
332            $arrErr['bkup_name'] = "バックアップに失敗しました。";
333            // バックアップデータの削除
334            SC_Utils_Ex::sfDelFile($bkup_dir);
335        }
336
337        return isset($arrErr) ? $arrErr : array();
338    }
339
340    /* 配列の要素をCSVフォーマットで出力する。*/
341    function lfGetCSVList($array) {
342        if (count($array) > 0) {
343            foreach($array as $key => $val) {
344                $val = mb_convert_encoding($val, CHAR_CODE, CHAR_CODE);
345                $val = str_replace("\"", "\\\"", $val);
346                $line .= "\"".$val."\",";
347            }
348            $line = ereg_replace(",$", "\r\n", $line);
349        }else{
350            return false;
351        }
352        return $line;
353    }
354
355    // 全テーブルリストを取得する
356    function lfGetTableList(){
357        $objQuery = new SC_Query();
358
359        if(DB_TYPE == "pgsql"){
360            $sql = "SELECT tablename FROM pg_tables WHERE tableowner = ? ORDER BY tablename ; ";
361            $arrRet = $objQuery->getAll($sql, array(DB_USER));
362            $arrRet = SC_Utils_Ex::sfSwapArray($arrRet);
363            $arrRet = $arrRet['tablename'];
364        }else if(DB_TYPE == "mysql"){
365            $sql = "SHOW TABLES;";
366            $arrRet = $objQuery->getAll($sql);
367            $arrRet = SC_Utils_Ex::sfSwapArray($arrRet);
368
369            // キーを取得
370            $arrKey = array_keys($arrRet);
371
372            $arrRet = $arrRet[$arrKey[0]];
373        }
374        return $arrRet;
375    }
376
377    // 自動採番型をCSV出力形式に変換する
378    function lfGetAutoIncrement($table_name){
379        $arrColList = $this->lfGetColumnList($table_name);
380        $ret = "";
381
382        if(DB_TYPE == "pgsql"){
383            $match = 'nextval(\'';
384        }else if(DB_TYPE == "mysql"){
385            $match = "auto_incr";
386        }
387
388        foreach($arrColList['col_def'] as $key => $val){
389
390            if (substr($val,0,9) == $match) {
391                $col = $arrColList['col_name'][$key];
392                $autoVal = $this->lfGetAutoIncrementVal($table_name, $col);
393                $ret .= "$table_name,$col,$autoVal\n";
394            }
395        }
396
397        return $ret;
398    }
399
400    // テーブル構成を取得する
401    Function Lfgetcolumnlist($table_name){
402        $objQuery = new SC_Query();
403
404        if(DB_TYPE == "pgsql"){
405            $sql = "SELECT
406                    a.attname, t.typname, a.attnotnull, d.adsrc as defval, a.atttypmod, a.attnum as fldnum, e.description
407                FROM
408                    pg_class c,
409                    pg_type t,
410                    pg_attribute a left join pg_attrdef d on (a.attrelid=d.adrelid and a.attnum=d.adnum)
411                                   left join pg_description e on (a.attrelid=e.objoid and a.attnum=e.objsubid)
412                WHERE (c.relname=?) AND (c.oid=a.attrelid) AND (a.atttypid=t.oid) AND a.attnum > 0
413                ORDER BY fldnum";
414            $arrColList = $objQuery->getAll($sql, array($table_name));
415            $arrColList = SC_Utils_Ex::sfSwapArray($arrColList);
416
417            $arrRet['col_def'] = $arrColList['defval'];
418            $arrRet['col_name'] = $arrColList['attname'];
419        }else if(DB_TYPE == "mysql"){
420            $sql = "SHOW COLUMNS FROM $table_name";
421            $arrColList = $objQuery->getAll($sql);
422            $arrColList = SC_Utils_Ex::sfSwapArray($arrColList);
423
424            $arrRet['col_def'] = $arrColList['Extra'];
425            $arrRet['col_name'] = $arrColList['Field'];
426        }
427        return $arrRet;
428    }
429
430    // 自動採番型の値を取得する
431    function lfGetAutoIncrementVal($table_name , $colname = ""){
432        $objQuery = new SC_Query();
433        $ret = "";
434
435        if(DB_TYPE == "pgsql"){
436            $ret = $objQuery->nextval($table_name, $colname) - 1;
437        }else if(DB_TYPE == "mysql"){
438            $sql = "SHOW TABLE STATUS LIKE ?";
439            $arrData = $objQuery->getAll($sql, array($table_name));
440            $ret = $arrData[0]['Auto_increment'];
441        }
442        return $ret;
443    }
444
445    // バックアップテーブルにデータを更新する
446    function lfUpdBkupData($data){
447        $objQuery = new SC_Query();
448
449        $sql = "INSERT INTO dtb_bkup (bkup_name,bkup_memo,create_date) values (?,?,now())";
450        $objQuery->query($sql, array($data['bkup_name'],$data['bkup_memo']));
451    }
452
453    // バックアップテーブルからデータを取得する
454    function lfGetBkupData($where = "", $data = array()){
455        $objQuery = new SC_Query();
456
457        $sql = "SELECT bkup_name, bkup_memo, create_date FROM dtb_bkup ";
458        if ($where != "")   $sql .= $where;
459
460        $ret = $objQuery->getall($sql,$data);
461
462        return $ret;
463    }
464
465    // バックアップファイルをリストアする
466    function lfRestore($bkup_name){
467        $objQuery = new SC_Query("", false);
468        $csv_data = "";
469        $err = true;
470
471        $bkup_dir = $this->bkup_dir . $bkup_name . "/";
472
473        //バックアップフォルダに移動する
474        chdir($this->bkup_dir);
475
476        //圧縮フラグTRUEはgzip解凍をおこなう
477        $tar = new Archive_Tar($bkup_name . ".tar.gz", TRUE);
478
479        //指定されたフォルダ内に解凍する
480        $err = $tar->extract("./");
481
482        // 無事解凍できれば、リストアを行う
483        if ($err) {
484
485            // トランザクション開始
486            $objQuery->begin();
487
488            // DBをクリア
489            $err = $this->lfDeleteAll($objQuery);
490
491            // INSERT実行
492            if ($err) $err = $this->lfExeInsertSQL($objQuery, $bkup_dir . "bkup_data.csv");
493
494            // 自動採番の値をセット
495            if ($err) $this->lfSetAutoInc($objQuery, $bkup_dir . "autoinc_data.csv");
496
497            // 各種ファイルのコピー
498            if ($err) {
499                // 画像のコピー
500                $image_dir = $bkup_dir . "save_image/";
501                $copy_mess = "";
502                $copy_mess = SC_Utils_Ex::sfCopyDir($image_dir, "../../upload/save_image/", $copy_mess, true);
503
504                // テンプレートのコピー
505                $tmp_dir = $bkup_dir . "templates/";
506                $copy_mess = "";
507                $copy_mess = SC_Utils_Ex::sfCopyDir($tmp_dir, "../../user_data/templates/", $copy_mess, true);
508
509                // インクルードファイルのコピー
510                $inc_dir = $bkup_dir . "include/";
511                $copy_mess = "";
512                $copy_mess = SC_Utils_Ex::sfCopyDir($inc_dir, "../../user_data/include/", $copy_mess, true);
513
514                // CSSのコピー
515                $css_dir = $bkup_dir . "css/";
516                $copy_mess = "";
517                $copy_mess = SC_Utils_Ex::sfCopyDir($css_dir, "../../user_data/css/", $copy_mess, true);
518
519                // バックアップデータの削除
520                SC_Utils_Ex::sfDelFile($bkup_dir);
521            }
522
523            // リストア成功ならコミット失敗ならロールバック
524            if ($err) {
525                $objQuery->commit();
526                $this->restore_msg = "リストア終了しました。";
527                $this->restore_err = true;
528            }else{
529                $objQuery->rollback();
530                $this->restore_msg = "リストアに失敗しました。";
531                $this->restore_name = $bkup_name;
532                $this->restore_err = false;
533            }
534        }
535    }
536
537    // CSVファイルからインサート実行
538    function lfExeInsertSQL($objQuery, $csv){
539
540        $sql = "";
541        $base_sql = "";
542        $tbl_flg = false;
543        $col_flg = false;
544        $ret = true;
545        $pagelayout_flg = false;
546        $mode = $this->mode;
547
548        // csvファイルからデータの取得
549        $fp = fopen($csv, "r");
550        while (!feof($fp)) {
551            $data = fgetcsv($fp, 1000000);
552
553            //空白行のときはテーブル変更
554            if (count($data) <= 1 and $data[0] == "") {
555                $base_sql = "";
556                $tbl_flg = false;
557                $col_flg = false;
558                continue;
559            }
560
561            // テーブルフラグがたっていない場合にはテーブル名セット
562            if (!$tbl_flg) {
563                $base_sql = "INSERT INTO $data[0] ";
564                $tbl_flg = true;
565
566                if($data[0] == "dtb_pagelayout"){
567                    $pagelayout_flg = true;
568                }
569
570                continue;
571            }
572
573            // カラムフラグがたっていない場合にはカラムセット
574            if (!$col_flg) {
575                if ($mode != "restore_config"){
576                    $base_sql .= " ( $data[0] ";
577                    for($i = 1; $i < count($data); $i++){
578                        $base_sql .= "," . $data[$i];
579                    }
580                    $base_sql .= " ) ";
581                }
582                $col_flg = true;
583                continue;
584            }
585
586            // インサートする値をセット
587            $sql = $base_sql . "VALUES ( ? ";
588            for($i = 1; $i < count($data); $i++){
589                $sql .= ", ?";
590            }
591            $sql .= " );";
592            $data = str_replace("\\\"", "\"", $data);
593            $err = $objQuery->query($sql, $data);
594
595            // エラーがあれば終了
596            if ($err->message != ""){
597                SC_Utils_Ex::sfErrorHeader(">> " . $objQuery->getlastquery(false));
598                return false;
599            }
600
601            if ($pagelayout_flg) {
602                // dtb_pagelayoutの場合には最初のデータはpage_id = 0にする
603                $sql = "UPDATE dtb_pagelayout SET page_id = '0'";
604                $objQuery->query($sql);
605                $pagelayout_flg = false;
606            }
607
608            // タイムアウトを防ぐ
609            SC_Utils_Ex::sfFlush();
610        }
611        fclose($fp);
612
613        return $ret;
614    }
615
616    // 自動採番をセット
617    function lfSetAutoInc($objQuery, $csv){
618        // csvファイルからデータの取得
619        $arrCsvData = file($csv);
620
621        foreach($arrCsvData as $key => $val){
622            $arrData = split(",", trim($val));
623
624            if ($arrData[2] == 0)   $arrData[2] = 1;
625            $objQuery->setval($arrData[0], $arrData[1], $arrData[2]);
626        }
627    }
628
629    // DBを全てクリアする
630    function lfDeleteAll($objQuery){
631        $ret = true;
632
633        $arrTableList = $this->lfGetTableList();
634
635        foreach($arrTableList as $key => $val){
636            // バックアップテーブルは削除しない
637            if ($val != "dtb_bkup") {
638                $trun_sql = "DELETE FROM $val;";
639                $ret = $objQuery->query($trun_sql);
640
641                if (!$ret) return $ret;
642            }
643        }
644
645        return $ret;
646    }
647
648    // バックアップテーブルを作成する
649    function lfCreateBkupTable(){
650        $objQuery = new SC_Query();
651
652        // テーブルの存在チェック
653        $arrTableList = $this->lfGetTableList();
654
655        if(!in_array("dtb_bkup", $arrTableList)){
656            // 存在していなければ作成
657            $cre_sql = "
658            create table dtb_bkup
659            (
660                bkup_name   text,
661                bkup_memo   text,
662                create_date timestamp
663            );
664        ";
665
666            $objQuery->query($cre_sql);
667        }
668    }
669}
670?>
Note: See TracBrowser for help on using the repository browser.