| 1 | <?php |
|---|
| 2 | |
|---|
| 3 | require_once("../require.php"); |
|---|
| 4 | require_once("../../../data/module/Tar.php"); |
|---|
| 5 | //require_once("./Tar.php"); |
|---|
| 6 | |
|---|
| 7 | //¥Ú¡¼¥¸´ÉÍý¥¯¥é¥¹ |
|---|
| 8 | class LC_Page { |
|---|
| 9 | //¥³¥ó¥¹¥È¥é¥¯¥¿ |
|---|
| 10 | function LC_Page() { |
|---|
| 11 | //¥á¥¤¥ó¥Æ¥ó¥×¥ì¡¼¥È¤Î»ØÄê |
|---|
| 12 | $this->tpl_mainpage = 'system/bkup.tpl'; |
|---|
| 13 | $this->tpl_subnavi = 'system/subnavi.tpl'; |
|---|
| 14 | $this->tpl_mainno = 'system'; |
|---|
| 15 | $this->tpl_subno = 'bkup'; |
|---|
| 16 | $this->tpl_subtitle = '¥Ð¥Ã¥¯¥¢¥Ã¥×´ÉÍý'; |
|---|
| 17 | |
|---|
| 18 | // $this->bkup_dir = ROOT_DIR . USER_DIR . "bkup/"; |
|---|
| 19 | $this->bkup_dir = "../../test/bkup/"; |
|---|
| 20 | } |
|---|
| 21 | } |
|---|
| 22 | |
|---|
| 23 | $objPage = new LC_Page(); |
|---|
| 24 | $objView = new SC_AdminView(); |
|---|
| 25 | $objQuery = new SC_Query(); |
|---|
| 26 | |
|---|
| 27 | // ¥»¥Ã¥·¥ç¥ó¥¯¥é¥¹ |
|---|
| 28 | $objSess = new SC_Session(); |
|---|
| 29 | // ǧ¾Ú²ÄÈݤÎȽÄê |
|---|
| 30 | sfIsSuccess($objSess); |
|---|
| 31 | |
|---|
| 32 | switch($_POST['mode']) { |
|---|
| 33 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¤òºîÀ®¤¹¤ë |
|---|
| 34 | case 'bkup': |
|---|
| 35 | // ÆþÎÏʸ»úÎó¤ÎÊÑ´¹ |
|---|
| 36 | $arrData = lfConvertParam($_POST); |
|---|
| 37 | |
|---|
| 38 | // ¥¨¥é¡¼¥Á¥§¥Ã¥¯ |
|---|
| 39 | $arrErr = lfCheckError($arrData); |
|---|
| 40 | |
|---|
| 41 | // ¥¨¥é¡¼¤¬¤Ê¤±¤ì¤Ð¥Ð¥Ã¥¯¥¢¥Ã¥×½èÍý¤ò¹Ô¤¦ |
|---|
| 42 | if (count($arrErr) <= 0) { |
|---|
| 43 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Õ¥¡¥¤¥ëºîÀ® |
|---|
| 44 | $arrErr = lfCreateBkupData($arrData['bkup_name']); |
|---|
| 45 | |
|---|
| 46 | // DB¤Ë¥Ç¡¼¥¿¹¹¿· |
|---|
| 47 | if (count($arrErr) <= 0) { |
|---|
| 48 | lfUpdBkupData($arrData); |
|---|
| 49 | }else{ |
|---|
| 50 | $arrForm = $arrData; |
|---|
| 51 | } |
|---|
| 52 | }else{ |
|---|
| 53 | $arrForm = $arrData; |
|---|
| 54 | } |
|---|
| 55 | |
|---|
| 56 | break; |
|---|
| 57 | |
|---|
| 58 | // ¥¤¥ó¥¹¥È¡¼¥ë |
|---|
| 59 | case 'install': |
|---|
| 60 | // ¹¹¿·¾ðÊó¤òºÇ¿·¤Ë¤¹¤ë |
|---|
| 61 | lfLoadUpdateList(); |
|---|
| 62 | // ¥â¥¸¥å¡¼¥ë·´¤Î¥¤¥ó¥¹¥È¡¼¥ë |
|---|
| 63 | lfInstallModule(); |
|---|
| 64 | break; |
|---|
| 65 | |
|---|
| 66 | // ºï½ü |
|---|
| 67 | case 'del': |
|---|
| 68 | |
|---|
| 69 | // ¥Õ¥¡¥¤¥ë¤Îºï½ü |
|---|
| 70 | |
|---|
| 71 | |
|---|
| 72 | // DB¤«¤éºï½ü |
|---|
| 73 | $delsql = "DELETE FROM dtb_bkup WHERE bkup_name = ?"; |
|---|
| 74 | $objQuery->query($delsql, array($_POST['list_name'])); |
|---|
| 75 | |
|---|
| 76 | break; |
|---|
| 77 | default: |
|---|
| 78 | break; |
|---|
| 79 | } |
|---|
| 80 | |
|---|
| 81 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥ê¥¹¥È¤ò¼èÆÀ¤¹¤ë |
|---|
| 82 | $arrBkupList = lfGetBkupData("ORDER BY create_date DESC"); |
|---|
| 83 | |
|---|
| 84 | // ¥Æ¥ó¥×¥ì¡¼¥È¥Õ¥¡¥¤¥ë¤ËÅϤ¹¥Ç¡¼¥¿¤ò¥»¥Ã¥È |
|---|
| 85 | $objPage->arrErr = $arrErr; |
|---|
| 86 | $objPage->arrForm = $arrForm; |
|---|
| 87 | $objPage->arrBkupList = $arrBkupList; |
|---|
| 88 | |
|---|
| 89 | $objView->assignobj($objPage); //ÊÑ¿ô¤ò¥Æ¥ó¥×¥ì¡¼¥È¤Ë¥¢¥µ¥¤¥ó¤¹¤ë |
|---|
| 90 | $objView->display(MAIN_FRAME); //¥Æ¥ó¥×¥ì¡¼¥È¤Î½ÐÎÏ |
|---|
| 91 | |
|---|
| 92 | //------------------------------------------------------------------------------------------------------- |
|---|
| 93 | /* ¼èÆÀʸ»úÎó¤ÎÊÑ´¹ */ |
|---|
| 94 | function lfConvertParam($array) { |
|---|
| 95 | /* |
|---|
| 96 | * ʸ»úÎó¤ÎÊÑ´¹ |
|---|
| 97 | * K : ¡ÖȾ³Ñ(Êݶ¸)ÊÒ²¾Ì¾¡×¤ò¡ÖÁ´³ÑÊÒ²¾Ì¾¡×¤ËÊÑ´¹ |
|---|
| 98 | * C : ¡ÖÁ´³Ñ¤Ò¤é²¾Ì¾¡×¤ò¡ÖÁ´³Ñ¤«¤¿²¾Ì¾¡×¤ËÊÑ´¹ |
|---|
| 99 | * V : ÂùÅÀÉÕ¤¤Îʸ»ú¤ò°ìʸ»ú¤ËÊÑ´¹¡£"K","H"¤È¶¦¤Ë»ÈÍѤ·¤Þ¤¹ |
|---|
| 100 | * n : ¡ÖÁ´³Ñ¡×¿ô»ú¤ò¡ÖȾ³Ñ(Êݶ¸)¡×¤ËÊÑ´¹ |
|---|
| 101 | * a : Á´³Ñ±Ñ¿ô»ú¤òȾ³Ñ±Ñ¿ô»ú¤ËÊÑ´¹¤¹¤ë |
|---|
| 102 | */ |
|---|
| 103 | $arrConvList['bkup_name'] = "a"; |
|---|
| 104 | $arrConvList['bkup_memo'] = "KVa"; |
|---|
| 105 | |
|---|
| 106 | // ʸ»úÊÑ´¹ |
|---|
| 107 | foreach ($arrConvList as $key => $val) { |
|---|
| 108 | // POST¤µ¤ì¤Æ¤¤¿ÃͤΤßÊÑ´¹¤¹¤ë¡£ |
|---|
| 109 | if(isset($array[$key])) { |
|---|
| 110 | $array[$key] = mb_convert_kana($array[$key] ,$val); |
|---|
| 111 | } |
|---|
| 112 | } |
|---|
| 113 | return $array; |
|---|
| 114 | } |
|---|
| 115 | |
|---|
| 116 | // ¥¨¥é¡¼¥Á¥§¥Ã¥¯ |
|---|
| 117 | function lfCheckError($array){ |
|---|
| 118 | $objErr = new SC_CheckError($array); |
|---|
| 119 | |
|---|
| 120 | $objErr->doFunc(array("¥Ð¥Ã¥¯¥¢¥Ã¥×̾", "bkup_name", STEXT_LEN), array("EXIST_CHECK","MAX_LENGTH_CHECK","NO_SPTAB","ALNUM_CHECK")); |
|---|
| 121 | $objErr->doFunc(array("¥Ð¥Ã¥¯¥¢¥Ã¥×¥á¥â", "bkup_memo", MTEXT_LEN), array("MAX_LENGTH_CHECK")); |
|---|
| 122 | |
|---|
| 123 | // ½ÅÊ£¥Á¥§¥Ã¥¯ |
|---|
| 124 | $ret = lfGetBkupData("WHERE bkup_name = ?", array($array['bkup_name'])); |
|---|
| 125 | if (count($ret) > 0) { |
|---|
| 126 | $objErr->arrErr['bkup_name'] = "¥Ð¥Ã¥¯¥¢¥Ã¥×̾¤¬½ÅÊ£¤·¤Æ¤¤¤Þ¤¹¡£ÊÌ̾¤òÆþÎϤ·¤Æ¤¯¤À¤µ¤¤¡£"; |
|---|
| 127 | } |
|---|
| 128 | |
|---|
| 129 | return $objErr->arrErr; |
|---|
| 130 | } |
|---|
| 131 | |
|---|
| 132 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Õ¥¡¥¤¥ëºîÀ® |
|---|
| 133 | function lfCreateBkupData($bkup_name){ |
|---|
| 134 | global $objPage; |
|---|
| 135 | $objQuery = new SC_Query(); |
|---|
| 136 | $csv_data = ""; |
|---|
| 137 | $err = true; |
|---|
| 138 | |
|---|
| 139 | $bkup_dir = $objPage->bkup_dir; |
|---|
| 140 | $bkup_dir = $bkup_dir . $bkup_name . "/"; |
|---|
| 141 | |
|---|
| 142 | // Á´¥Æ¡¼¥Ö¥ë¼èÆÀ |
|---|
| 143 | $arrTableList = lfGetTableList(); |
|---|
| 144 | |
|---|
| 145 | // ³Æ¥Æ¡¼¥Ö¥ë¾ðÊó¤ò¼èÆÀ¤¹¤ë |
|---|
| 146 | foreach($arrTableList as $key => $val){ |
|---|
| 147 | |
|---|
| 148 | if ($val != "dtb_bkup") { |
|---|
| 149 | // ¥Æ¡¼¥Ö¥ë¹½À®¤ò¼èÆÀ |
|---|
| 150 | $arrColumnList = lfGetColumnList($val); |
|---|
| 151 | |
|---|
| 152 | // Á´¥Ç¡¼¥¿¤ò¼èÆÀ |
|---|
| 153 | $arrData = $objQuery->getAll("SELECT * FROM $val"); |
|---|
| 154 | |
|---|
| 155 | // CSV¥Ç¡¼¥¿À¸À® |
|---|
| 156 | if (count($arrData) > 0) { |
|---|
| 157 | |
|---|
| 158 | // ¥«¥é¥à¤òCSV·Á¼°¤ËÀ°¤¨¤ë |
|---|
| 159 | $arrKyes = sfGetCommaList(array_keys($arrData[0]), false); |
|---|
| 160 | |
|---|
| 161 | // ¥Ç¡¼¥¿¤òCSV·Á¼°¤ËÀ°¤¨¤ë |
|---|
| 162 | $data = ""; |
|---|
| 163 | foreach($arrData as $data_key => $data_val){ |
|---|
| 164 | $data .= sfGetCSVList($arrData[$data_key]); |
|---|
| 165 | } |
|---|
| 166 | |
|---|
| 167 | // CSV½ÐÎϥǡ¼¥¿À¸À® |
|---|
| 168 | $csv_data .= $val . "\n"; |
|---|
| 169 | $csv_data .= $arrKyes . "\n"; |
|---|
| 170 | $csv_data .= $data; |
|---|
| 171 | $csv_data .= "\n"; |
|---|
| 172 | } |
|---|
| 173 | } |
|---|
| 174 | } |
|---|
| 175 | |
|---|
| 176 | $csv_file = $bkup_dir . "bkup_data.csv"; |
|---|
| 177 | // CSV½ÐÎÏ |
|---|
| 178 | // ¥Ç¥£¥ì¥¯¥È¥ê¤¬Â¸ºß¤·¤Æ¤¤¤Ê¤±¤ì¤ÐºîÀ®¤¹¤ë |
|---|
| 179 | if (!is_dir(dirname($csv_file))) { |
|---|
| 180 | $err = mkdir(dirname($csv_file)); |
|---|
| 181 | } |
|---|
| 182 | if ($err) { |
|---|
| 183 | $fp = fopen($csv_file,"w"); |
|---|
| 184 | if($fp) { |
|---|
| 185 | $err = fwrite($fp, $csv_data); |
|---|
| 186 | fclose($fp); |
|---|
| 187 | } |
|---|
| 188 | } |
|---|
| 189 | |
|---|
| 190 | // ¾¦ÉʲèÁü¥Õ¥¡¥¤¥ë¤ò¥³¥Ô¡¼ |
|---|
| 191 | if ($err) { |
|---|
| 192 | $copy_mess = ""; |
|---|
| 193 | $copy_mess = sfCopyDir("../../upload/save_image/", $bkup_dir, $copy_mess); |
|---|
| 194 | |
|---|
| 195 | //¥ª¥Ö¥¸¥§¥¯¥È¤òºîÀ®¤¹¤ë |
|---|
| 196 | //new Archive_Tar(¥Õ¥¡¥¤¥ë̾,°µ½Ì¥Õ¥é¥°); |
|---|
| 197 | //°µ½Ì¥Õ¥é¥°TRUE¤Ïgzip°µ½Ì¤ò¤ª¤³¤Ê¤¦ |
|---|
| 198 | $tar = new Archive_Tar($objPage->bkup_dir . $bkup_name.".tar.gz", TRUE); |
|---|
| 199 | |
|---|
| 200 | //°µ½Ì¤ò¤ª¤³¤Ê¤¦ |
|---|
| 201 | $zip = $tar->create($bkup_dir); |
|---|
| 202 | |
|---|
| 203 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Ç¡¼¥¿¤Îºï½ü |
|---|
| 204 | if (!$zip) { |
|---|
| 205 | sfDelFile($bkup_dir); |
|---|
| 206 | } |
|---|
| 207 | |
|---|
| 208 | } |
|---|
| 209 | |
|---|
| 210 | |
|---|
| 211 | if (!$err) { |
|---|
| 212 | $arrErr['bkup_name'] = "¥Ð¥Ã¥¯¥¢¥Ã¥×¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£"; |
|---|
| 213 | } |
|---|
| 214 | |
|---|
| 215 | return $arrErr; |
|---|
| 216 | } |
|---|
| 217 | |
|---|
| 218 | // Á´¥Æ¡¼¥Ö¥ë¥ê¥¹¥È¤ò¼èÆÀ¤¹¤ë |
|---|
| 219 | function lfGetTableList(){ |
|---|
| 220 | $objQuery = new SC_Query(); |
|---|
| 221 | |
|---|
| 222 | if(DB_TYPE == "pgsql"){ |
|---|
| 223 | $sql = "SELECT tablename FROM pg_tables WHERE tableowner = ? ORDER BY tablename ; "; |
|---|
| 224 | $arrRet = $objQuery->getAll($sql, array(DB_USER)); |
|---|
| 225 | $arrRet = sfSwapArray($arrRet); |
|---|
| 226 | $arrRet = $arrRet['tablename']; |
|---|
| 227 | }else if(DB_TYPE == "mysql"){ |
|---|
| 228 | |
|---|
| 229 | } |
|---|
| 230 | |
|---|
| 231 | return $arrRet; |
|---|
| 232 | } |
|---|
| 233 | |
|---|
| 234 | // ¥Æ¡¼¥Ö¥ë¹½À®¤ò¼èÆÀ¤¹¤ë |
|---|
| 235 | function lfGetColumnList($table_name){ |
|---|
| 236 | $objQuery = new SC_Query(); |
|---|
| 237 | |
|---|
| 238 | if(DB_TYPE == "pgsql"){ |
|---|
| 239 | $sql = "SELECT |
|---|
| 240 | a.attname, t.typname, a.attnotnull, d.adsrc as defval, a.atttypmod, a.attnum as fldnum, e.description |
|---|
| 241 | FROM |
|---|
| 242 | pg_class c, |
|---|
| 243 | pg_type t, |
|---|
| 244 | pg_attribute a left join pg_attrdef d on (a.attrelid=d.adrelid and a.attnum=d.adnum) |
|---|
| 245 | left join pg_description e on (a.attrelid=e.objoid and a.attnum=e.objsubid) |
|---|
| 246 | WHERE (c.relname=?) AND (c.oid=a.attrelid) AND (a.atttypid=t.oid) AND a.attnum > 0 |
|---|
| 247 | ORDER BY fldnum"; |
|---|
| 248 | $arrRet = $objQuery->getAll($sql, array($table_name)); |
|---|
| 249 | } |
|---|
| 250 | |
|---|
| 251 | return sfswaparray($arrRet); |
|---|
| 252 | |
|---|
| 253 | } |
|---|
| 254 | |
|---|
| 255 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Æ¡¼¥Ö¥ë¤Ë¥Ç¡¼¥¿¤ò¹¹¿·¤¹¤ë |
|---|
| 256 | function lfUpdBkupData($data){ |
|---|
| 257 | $objQuery = new SC_Query(); |
|---|
| 258 | |
|---|
| 259 | $sql = "INSERT INTO dtb_bkup (bkup_name,bkup_memo,create_date) values (?,?,now())"; |
|---|
| 260 | $objQuery->query($sql, array($data['bkup_name'],$data['bkup_memo'])); |
|---|
| 261 | } |
|---|
| 262 | |
|---|
| 263 | // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Æ¡¼¥Ö¥ë¤«¤é¥Ç¡¼¥¿¤ò¼èÆÀ¤¹¤ë |
|---|
| 264 | function lfGetBkupData($where = "", $data = array()){ |
|---|
| 265 | $objQuery = new SC_Query(); |
|---|
| 266 | |
|---|
| 267 | $sql = "SELECT bkup_name, bkup_memo, create_date FROM dtb_bkup "; |
|---|
| 268 | if ($where != "") $sql .= $where; |
|---|
| 269 | |
|---|
| 270 | $ret = $objQuery->getall($sql,$data); |
|---|
| 271 | |
|---|
| 272 | return $ret; |
|---|
| 273 | } |
|---|
| 274 | |
|---|
| 275 | ?> |
|---|