<?php
//メールアドレス文字化け解消スクリプト
//2007/04/19 村元　恒徳
//メールアドレスが文字化けしたら使ってください。
//PHPのMCryptモジュールを使用しないで、古いOpenPNE付属の暗号化関数でアドレスをデコードして、
//新しいOpenPNEの関数でエンコードします。
//（Mcryptモジュールが使用できる環境では、新しい関数の中でMCryptを使います。）
//データベースを更新します。

require_once './config.inc.php';
require_once OPENPNE_WEBAPP_DIR . '/init.inc';

//変換するメンバー数（メンバー１から処理します。）
$start=1;
$num=30;

for($i=$start;$i<=$num;$i++){
   $buf=decodebyOldBlowfish($i);
   $switch=0;
   foreach ($buf as $tmp) {
    print "$tmp\n";
   }
   $pc=updatedatabase($i,array_shift($buf),0);
   $ktai=updatedatabase($i,array_shift($buf),1);
   $reg=updatedatabase($i,array_shift($buf),2);
   $easy=updatedatabase($i,array_shift($buf),3);
   if($pc) {
      print "PCアドレスの変換成功\n";
   }
   else{
      print "エラーまたはPCアドレスがない\n";
      }
   if($ktai) {
      print "携帯アドレスの変換成功\n";
   }
   else{
      print "エラーまたは携帯アドレスがない\n";
      }
   if($reg) {
      print "登録アドレスの変換成功\n";
   }
   else{
      print "エラーまたは登録アドレスがない\n";
      }
   if($easy) {
      print "Easy IDの変換成功\n";
   }
   else{
      print "エラーまたはEASY IDがない\n";
      }
}


function decodebyOldBlowfish($c_member_id)
{
    
    $sql = 'SELECT pc_address, ktai_address, regist_address, easy_access_id FROM c_member_secure WHERE c_member_id = ?';
    $c_member_secure = db_get_row($sql, array(intval($c_member_id)));
    
    if (is_array($c_member_secure)) {
        return array_map('old_decrypt', $c_member_secure);
    } else {
        return $c_member_secure;
    }
}


function updatedatabase($c_member_id,$address,$flg)
{
    if($flg==0){//pc
        $data = array(
        'pc_address' => new_encrypt($address)
        );
    }
    elseif($flg==1){//ktai
        $data = array(
        'ktai_address' => new_encrypt($address)
        );
      
    }
    elseif($flg==2){//regist        
        $data = array(
        'regist_address' => new_encrypt($address)
        );
   
    }
    elseif($flg==3){//easy id
        $data=array('easy_access_id' => new_encrypt($address));
     
    }
    $where = array('c_member_id' => intval($c_member_id));
    return db_update('c_member_secure', $data, $where);
}


function &get_oldcrypt_blowfish()
{
    static $singleton1;
    if (empty($singleton1)) {

        include_once OPENPNE_LIB_DIR . '/include/Crypt/BlowfishOldNOEXT.php';
        $singleton1 = new Crypt_BlowfishOld_NOEXT(ENCRYPT_KEY);

    }
    return $singleton1;
}
function &get_newcrypt_blowfish()
{
    static $singleton2;
    if (empty($singleton2)) {

        include_once OPENPNE_LIB_DIR . '/include/Crypt/Blowfish.php';
        $singleton2 = new Crypt_Blowfish(ENCRYPT_KEY);

    }
    return $singleton2;
}
/**
 * 可逆的な暗号化をする
 * 
 * @param string $str 平文
 * @return string 暗号文
 */

function new_encrypt($str)
{
    if (!$str) return '';

    $bf =& get_newcrypt_blowfish();
    $str = $bf->encrypt($str);

    //base64
    $str = base64_encode($str);
    print "$str\n";
    return $str;
}

/**
 * 可逆的な暗号を復号化する
 * 
 * @param string $str 暗号文
 * @return string 平文
 */
function old_decrypt($str)
{
    if (!$str) return '';

    //base64
    $str = base64_decode($str);

    $bf =& get_oldcrypt_blowfish();
    return rtrim($bf->decrypt($str));
}


?>