source: branches/feature-module-zeus/data/include/mobile.inc @ 15461

<?php
/**
 * ¥â¥Ð¥¤¥ë¥µ¥¤¥È¶¦Í­´Ø¿ô¥Õ¥¡¥¤¥ë
 */

require_once DATA_PATH . 'module/Net/URL.php';
require_once DATA_PATH . 'class/SC_DbConn.php';
require_once DATA_PATH . 'class/SC_Query.php';

/**
 * EC-CUBE ¤¬¥µ¥Ý¡¼¥È¤¹¤ë·ÈÂÓüËö¤«¤É¤¦¤«¤ò¥Á¥§¥Ã¥¯¤¹¤ë¡£
 * ÈóÂбþüËö¤Î¾ì¹ç¤Ï unsupported/index.php ¤Ø¥ê¥À¥¤¥ì¥¯¥È¤¹¤ë¡£
 *
 * @return void
 */
function lfMobileCheckCompatibility() {
    

    
    if (!GC_MobileUserAgent::isSupported()) {
        header('Location: ' . URL_DIR . 'unsupported/index.php');
        exit;
    }
    

}

/**
 * ÆþÎϥǡ¼¥¿¤òÆâÉô¥¨¥ó¥³¡¼¥Ç¥£¥ó¥°¤ËÊÑ´¹¤·¡¢³¨Ê¸»ú¤ò½üµî¤¹¤ë¡£
 *
 * @param string &$value ÆþÎϥǡ¼¥¿¤Ø¤Î»²¾È
 * @return void
 */
function lfMobileConvertInputValue(&$value) {
    // Shift JIS ¤«¤éÆâÉô¥¨¥ó¥³¡¼¥Ç¥£¥ó¥°¤ËÊÑ´¹¤¹¤ë¡£
    // SoftBank °Ê³°¤Î³¨Ê¸»ú¤Ï³°»úÎΰè¤Ë´Þ¤Þ¤ì¤ë¤¿¤á¡¢¤³¤ÎÃʳ¬¤Ç½üµî¤µ¤ì¤ë¡£
    $value = mb_convert_encoding($value, CHAR_CODE, 'SJIS');

    // SoftBank ¤Î³¨Ê¸»ú¤ò½üµî¤¹¤ë¡£
    $value = preg_replace('/\\x1b\\$[^\\x0f]*\\x0f/', '', $value);
}

/**
 * ¥â¥Ð¥¤¥ë¥µ¥¤¥ÈÍѤÎÆþÎϤνé´ü½èÍý¤ò¹Ô¤¦¡£
 *
 * @return void
 */
function lfMobileInitInput() {
    array_walk($_GET, 'lfMobileConvertInputValue');
    array_walk($_POST, 'lfMobileConvertInputValue');
    array_walk($_REQUEST, 'lfMobileConvertInputValue');
}

/**
 * dtb_mobile_ext_session_id ¥Æ¡¼¥Ö¥ë¤ò¸¡º÷¤·¤Æ¥»¥Ã¥·¥ç¥óID¤ò¼èÆÀ¤¹¤ë¡£
 *
 * @return string|null ¼èÆÀ¤·¤¿¥»¥Ã¥·¥ç¥óID¤òÊÖ¤¹¡£
 *                     ¼èÆÀ¤Ç¤­¤Ê¤«¤Ã¤¿¾ì¹ç¤Ï null ¤òÊÖ¤¹¡£
 */
function lfMobileGetExtSessionId() {
    if (!preg_match('|^' . URL_DIR . '(.*)$|', $_SERVER['SCRIPT_NAME'], $matches)) {
        return null;
    }

    $url = $matches[1];
    $time = date('Y-m-d H:i:s', time() - MOBILE_SESSION_LIFETIME);
    $objQuery = new SC_Query;

    foreach ($_REQUEST as $key => $value) {
        $session_id = $objQuery->get('dtb_mobile_ext_session_id', 'session_id',
                                     'param_key = ? AND param_value = ? AND url = ? AND create_date >= ?',
                                     array($key, $value, $url, $time));
        if (isset($session_id)) {
            return $session_id;
        }
    }

    return null;
}

/**
 * ¥Ñ¥é¥á¡¼¥¿¡¼¤«¤éÍ­¸ú¤Ê¥»¥Ã¥·¥ç¥óID¤ò¼èÆÀ¤¹¤ë¡£
 *
 * @return string|false ¼èÆÀ¤·¤¿Í­¸ú¤Ê¥»¥Ã¥·¥ç¥óID¤òÊÖ¤¹¡£
 *                      ¼èÆÀ¤Ç¤­¤Ê¤«¤Ã¤¿¾ì¹ç¤Ï false ¤òÊÖ¤¹¡£
 */
function lfMobileGetSessionId() {
    // ¥Ñ¥é¥á¡¼¥¿¡¼¤«¤é¥»¥Ã¥·¥ç¥óID¤ò¼èÆÀ¤¹¤ë¡£
    $sessionId = @$_POST[session_name()];
    if (!isset($sessionId)) {
        $sessionId = @$_GET[session_name()];
    }
    if (!isset($sessionId)) {
        $sessionId = lfMobileGetExtSessionId();
    }
    
    if (!isset($sessionId)) {
        return false;
    }

    // ¥»¥Ã¥·¥ç¥óID¤Î¸ºß¤ò¥Á¥§¥Ã¥¯¤¹¤ë¡£
    if (sfSessRead($sessionId) === null) {
        gfPrintLog("Non-existent session id : sid=$sessionId");
        return false;
    }
    
    return session_id($sessionId);
}

/**
 * ¥»¥Ã¥·¥ç¥ó¥Ç¡¼¥¿¤¬Í­¸ú¤«¤É¤¦¤«¤ò¥Á¥§¥Ã¥¯¤¹¤ë¡£
 *
 * @return boolean ¥»¥Ã¥·¥ç¥ó¥Ç¡¼¥¿¤¬Í­¸ú¤Ê¾ì¹ç¤Ï true¡¢Ìµ¸ú¤Ê¾ì¹ç¤Ï false ¤òÊÖ¤¹¡£
 */
function lfMobileValidateSession() {
    // ÇÛÎó mobile ¤¬ÅÐÏ¿¤µ¤ì¤Æ¤¤¤ë¤«¤É¤¦¤«¤ò¥Á¥§¥Ã¥¯¤¹¤ë¡£
    if (!is_array(@$_SESSION['mobile'])) {
        gfPrintLog("SESSIONüËö¾ðÊó¤¬ÅÐÏ¿¤µ¤ì¤Æ¤¤¤Þ¤»¤ó¡£");
        return false;
    }

    // Í­¸ú´ü¸Â¤ò²á¤®¤Æ¤¤¤Ê¤¤¤«¤É¤¦¤«¤ò¥Á¥§¥Ã¥¯¤¹¤ë¡£
    if (intval(@$_SESSION['mobile']['expires']) < time()) {
        gfPrintLog("Session expired at " .
                   date('Y/m/d H:i:s', @$_SESSION['mobile']['expires']) .
                   ' : sid=' . session_id());
        gfPrintLog("SESSIONÍ­¸ú´ü¸Â¤ò²á¤®¤Æ¤¤¤ë");                 
        return false;
    }

    // ·ÈÂÓüËö¤Îµ¡¼ï¤¬°ìÃפ¹¤ë¤«¤É¤¦¤«¤ò¥Á¥§¥Ã¥¯¤¹¤ë¡£
    $model = GC_MobileUserAgent::getModel();
    if (@$_SESSION['mobile']['model'] != $model) {
        gfPrintLog("User agent model mismatch : " .
                   "\"$model\" != \"" . @$_SESSION['mobile']['model'] .
                   '" (expected), sid=' . session_id());
        gfPrintLog("·ÈÂÓüËö¤Îµ¡¼ï¤¬°ìÃפ·¤Ê¤¤");   
        return false;
    }
    return true;
}

/**
 * ¥â¥Ð¥¤¥ë¥µ¥¤¥ÈÍѤΥ»¥Ã¥·¥ç¥ó´ØÏ¢¤Î½é´ü½èÍý¤ò¹Ô¤¦¡£
 *
 * @return void
 */
function lfMobileInitSession() {
    $session_ok = true;
    
    // ¥»¥Ã¥·¥ç¥óID¤Î¼õ¤±ÅϤ·¤Ë¥¯¥Ã¥­¡¼¤ò»ÈÍѤ·¤Ê¤¤¡£
    ini_set('session.use_cookies', '0');

    // ¥Ñ¥é¥á¡¼¥¿¡¼¤«¤éÍ­¸ú¤Ê¥»¥Ã¥·¥ç¥óID¤ò¼èÆÀ¤¹¤ë¡£
    $sessionId = lfMobileGetSessionId();
    
    session_start();
    
    // ¿·µ¬¤Ë¥»¥Ã¥È¤µ¤ì¤ë¤¿¤álfMobileGetSessionId()¤«¤é¤ÎÌá¤ê¤Ï""¤È¤Ê¤ë¡£
    if(!$sessionId == "") {
        gfPrintLog("lfMobileInitSession()¡§¥»¥Ã¥·¥ç¥ó¤¬Àµ¤·¤¯¥»¥Ã¥È¤µ¤ì¤Þ¤»¤ó¤Ç¤·¤¿¡£");
        $session_ok = false;        
    }
    
    if(!lfMobileValidateSession()) {
        $session_ok = false;
    }
    
    // ¥»¥Ã¥·¥ç¥óID¤Þ¤¿¤Ï¥»¥Ã¥·¥ç¥ó¥Ç¡¼¥¿¤¬Ìµ¸ú¤Ê¾ì¹ç¤Ï¡¢¥»¥Ã¥·¥ç¥óID¤òºÆÀ¸À®¤·¡¢
    // ¥»¥Ã¥·¥ç¥ó¥Ç¡¼¥¿¤ò½é´ü²½¤¹¤ë¡£
    if (!$session_ok) {
        session_regenerate_id();
        $_SESSION['mobile']['model'] = GC_MobileUserAgent::getModel();
        $_SESSION['mobile']['phone_id'] = GC_MobileUserAgent::getId();
        if($_SESSION['mobile']['phone_id'] != "") {
            gfPrintLog("µ¡¼ïÈÖ¹æ¤Î¼èÆÀ¡§".$_SESSION['mobile']['phone_id']);
        } else {
            gfPrintLog("µ¡¼ïÈÖ¹æ¤Î¼èÆÀ¤¬¤Ç¤­¤Þ¤»¤ó¤Ç¤·¤¿¡£");
        }
        $_SESSION['mobile']['expires'] =  time() + MOBILE_SESSION_LIFETIME;

        // ¿·¤·¤¤¥»¥Ã¥·¥ç¥óID¤òÉղ䷤ƥê¥À¥¤¥ì¥¯¥È¤¹¤ë¡£
        if ($_GET['PHPSESSID'] != "") {
            gfPrintLog("GETÍ׵ᤢ¤ê:".$_GET['PHPSESSID']);
            gfPrintLog("¥ê¥À¥¤¥ì¥¯¥È:".gfAddSessionId());
            // GET ¤Î¾ì¹ç¤ÏƱ¤¸¥Ú¡¼¥¸¤Ë¥ê¥À¥¤¥ì¥¯¥È¤¹¤ë¡£
            header('Location: ' . gfAddSessionId());
        } else {
            gfPrintLog("GETÍ×µá¤Ê¤·");
            // GET °Ê³°¤Î¾ì¹ç¤Ï¥È¥Ã¥×¥Ú¡¼¥¸¤Ø¥ê¥À¥¤¥ì¥¯¥È¤¹¤ë¡£
            /*
                Äê¿ôSID¡§PHPSESSID=<¥»¥Ã¥·¥ç¥óID>
             */
            gfPrintLog("¥ê¥À¥¤¥ì¥¯¥È:".URL_SITE_TOP . '?' . SID);
            header('Location: ' . URL_SITE_TOP . '?' . SID);
        }
        exit;
    }
    // ¥»¥Ã¥·¥ç¥ó¤ÎÍ­¸ú´ü¸Â¤ò¹¹¿·¤¹¤ë¡£
    $_SESSION['mobile']['expires'] = time() + MOBILE_SESSION_LIFETIME;
}

/**
 * ¥â¥Ð¥¤¥ë¥µ¥¤¥ÈÍѤνÐÎϤνé´ü½èÍý¤ò¹Ô¤¦¡£
 *
 * ½ÐÎϤÎή¤ì
 * 1. Smarty
 * 2. ÆâÉô¥¨¥ó¥³¡¼¥Ç¥£¥ó¥°¤«¤é Shift JIS ¤ËÊÑ´¹¤¹¤ë¡£
 * 3. Á´³Ñ¥«¥¿¥«¥Ê¤òȾ³Ñ¥«¥¿¥«¥Ê¤ËÊÑ´¹¤¹¤ë¡£
 * 4. ²èÁüÍѤΥ¿¥°¤òÄ´À°¤¹¤ë¡£
 * 5. ³¨Ê¸»ú¥¿¥°¤ò³¨Ê¸»ú¥³¡¼¥É¤ËÊÑ´¹¤¹¤ë¡£
 * 6. ½ÐÎÏ
 *
 * @return void
 */
function lfMobileInitOutput() {
    // Smarty ÍѤΥǥ£¥ì¥¯¥È¥ê¡¼¤òºîÀ®¤¹¤ë¡£
    @mkdir(COMPILE_DIR);

    // ½ÐÎÏÍѤΥ¨¥ó¥³¡¼¥Ç¥£¥ó¥°¤ò Shift JIS ¤Ë¸ÇÄꤹ¤ë¡£
    mb_http_output('SJIS-win');

    // ³¨Ê¸»ú¥¿¥°¤ò³¨Ê¸»ú¥³¡¼¥É¤ËÊÑ´¹¤¹¤ë¡£
    ob_start(array('GC_MobileEmoji', 'handler'));

    // üËö¤Ë¹ç¤ï¤»¤Æ²èÁü¥µ¥¤¥º¤òÊÑ´¹¤¹¤ë¡£
    ob_start(array('GC_MobileImage', 'handler'));

    // Á´³Ñ¥«¥¿¥«¥Ê¤òȾ³Ñ¥«¥¿¥«¥Ê¤ËÊÑ´¹¤¹¤ë¡£
    ob_start(create_function('$buffer', 'return mb_convert_kana($buffer, "k", "SJIS-win");'));

    // ÆâÉô¥¨¥ó¥³¡¼¥Ç¥£¥ó¥°¤«¤é Shift JIS ¤ËÊÑ´¹¤¹¤ë¡£
    ob_start('mb_output_handler');
}

/**
 * ¥â¥Ð¥¤¥ë¥µ¥¤¥ÈÍѤνé´ü½èÍý¤ò¹Ô¤¦¡£
 *
 * @return void
 */
function sfMobileInit() {
    lfMobileInitInput();
    if (basename(dirname($_SERVER['SCRIPT_NAME'])) != 'unsupported') {
        lfMobileCheckCompatibility();
        lfMobileInitSession();
    }

    lfMobileInitOutput();
}

/**
 * LocationÅù¤Ç¥»¥Ã¥·¥ç¥óID¤òÉղ乤ëɬÍפ¬¤¢¤ëURL¤Ë¥»¥Ã¥·¥ç¥óID¤òÉղ乤롣
 *
 * @return String
 */
function gfAddSessionId($url = null) {
    $objURL = new Net_URL($url);
    $objURL->addQueryString(session_name(), session_id());
    return $objURL->getURL();
}

/**
 * ¶õ¥á¡¼¥ëÍѤΥȡ¼¥¯¥ó¤òÀ¸À®¤¹¤ë¡£
 *
 * @return string À¸À®¤·¤¿¥È¡¼¥¯¥ó¤òÊÖ¤¹¡£
 */
function lfGenerateKaraMailToken() {
    $token_chars = '0123456789abcdefghijklmnopqrstuvwxyz';
    $token_chars_length = strlen($token_chars);
    $token_length = 10;
    $token = '';

    while ($token_length > 0) {
        $token .= $token_chars{mt_rand(0, $token_chars_length - 1)};
        --$token_length;
    }

    return $token;
}

/**
 * ¶õ¥á¡¼¥ë´ÉÍý¥Æ¡¼¥Ö¥ë¤Ë¿·µ¬¥¨¥ó¥È¥ê¡¼¤òÅÐÏ¿¤·¡¢¥È¡¼¥¯¥ó¤òÊÖ¤¹¡£
 *
 * @param string $next_url ¶õ¥á¡¼¥ë¼õ¤±ÉÕ¤±¸å¤ËÁ«°Ü¤µ¤»¤ë¥Ú¡¼¥¸ (¥â¥Ð¥¤¥ë¥µ¥¤¥È¥È¥Ã¥×¤«¤é¤ÎÁêÂÐURL)
 * @param string $session_id ¥»¥Ã¥·¥ç¥óID (¾Êά¤·¤¿¾ì¹ç¤Ï¸½ºß¤Î¥»¥Ã¥·¥ç¥óID)
 * @return string|false ¥È¡¼¥¯¥ó¤òÊÖ¤¹¡£¥¨¥é¡¼¤¬È¯À¸¤·¤¿¾ì¹ç¤Ïfalse¤òÊÖ¤¹¡£
 */
function gfPrepareKaraMail($next_url, $session_id = null) {
    if (!isset($session_id)) {
        $session_id = session_id();
    }

    $objQuery = new SC_Query;

    // GC
    $time = date('Y-m-d H:i:s', time() - MOBILE_SESSION_LIFETIME);
    $objQuery->delete('dtb_mobile_kara_mail', 'email IS NULL AND create_date < ?', array($time));

    $objQuery->delete('dtb_mobile_kara_mail', 'session_id = ?', array($session_id));

    $arrValues = array('session_id' => $session_id,
                       'next_url'   => $next_url);

    $try = 10;

    while ($try > 0) {
        $arrValues['token'] = $token = lfGenerateKaraMailToken();

        $objQuery->insert('dtb_mobile_kara_mail', $arrValues);
        $count = $objQuery->count('dtb_mobile_kara_mail', 'token = ?', array($token));

        if ($count == 1) {
            break;
        }

        $objQuery->delete('dtb_mobile_kara_mail', 'session_id = ?', array($session_id));
        $token = false;
        --$try;
    }

    return $token;
}

/**
 * ¶õ¥á¡¼¥ë¤«¤é¼èÆÀ¤·¤¿¥á¡¼¥ë¥¢¥É¥ì¥¹¤ò¶õ¥á¡¼¥ë´ÉÍý¥Æ¡¼¥Ö¥ë¤ËÅÐÏ¿¤¹¤ë¡£
 *
 * @param string $token ¥È¡¼¥¯¥ó
 * @param string $email ¥á¡¼¥ë¥¢¥É¥ì¥¹
 * @return boolean À®¸ù¤·¤¿¾ì¹ç¤Ïtrue¡¢¼ºÇÔ¤·¤¿¾ì¹ç¤Ïfalse¤òÊÖ¤¹¡£
 */
function gfRegisterKaraMail($token, $email) {
    $objQuery = new SC_Query;

    // GC
    $time = date('Y-m-d H:i:s', time() - MOBILE_SESSION_LIFETIME);
    $objQuery->delete('dtb_mobile_kara_mail',
                      '(email IS NULL AND create_date < ?) OR (email IS NOT NULL AND receive_date < ?)',
                      array($time, $time));

    $kara_mail_id = $objQuery->get('dtb_mobile_kara_mail', 'kara_mail_id', 'token = ?', array($token));
    if (!isset($kara_mail_id)) {
        return false;
    }

    $arrValues = array('email' => $email);
    $arrRawValues = array('receive_date' => 'now()');
    $objQuery->update('dtb_mobile_kara_mail', $arrValues, 'kara_mail_id = ?', array($kara_mail_id), $arrRawValues);

    return true;
}

/**
 * ¶õ¥á¡¼¥ë´ÉÍý¥Æ¡¼¥Ö¥ë¤«¤é¥È¡¼¥¯¥ó¤¬°ìÃפ¹¤ë¹Ô¤òºï½ü¤·¡¢
 * ¼¡¤ËÁ«°Ü¤µ¤»¤ë¥Ú¡¼¥¸¤ÎURL¤òÊÖ¤¹¡£¡¡
 *
 * ¥á¡¼¥ë¥¢¥É¥ì¥¹¤Ï $_SESSION['mobile']['kara_mail_from'] ¤ËÅÐÏ¿¤µ¤ì¤ë¡£
 *
 * @param string $token ¥È¡¼¥¯¥ó
 * @return string|false URL¤òÊÖ¤¹¡£¥¨¥é¡¼¤¬È¯À¸¤·¤¿¾ì¹ç¤Ïfalse¤òÊÖ¤¹¡£
 */
function gfFinishKaraMail($token) {
    $objQuery = new SC_Query;

    $arrRow = $objQuery->getrow('dtb_mobile_kara_mail', 'session_id, next_url, email',
                                'token = ? AND email IS NOT NULL AND receive_date >= ?',
                                array($token, date('Y-m-d H:i:s', time() - MOBILE_SESSION_LIFETIME)));
    if (!isset($arrRow)) {
        return false;
    }

    $objQuery->delete('dtb_mobile_kara_mail', 'token = ?', array($token));

    list($session_id, $next_url, $email) = $arrRow;
    $objURL = new Net_URL(MOBILE_SITE_URL . $next_url);
    $objURL->addQueryString(session_name(), $session_id);
    $url = $objURL->getURL();

    session_id($session_id);
    session_start();
    $_SESSION['mobile']['kara_mail_from'] = $email;
    session_write_close();

    return $url;
}

/**
 * ³°Éô¥µ¥¤¥ÈÏ¢·ÈÍѤ˥»¥Ã¥·¥ç¥óID¤È¥Ñ¥é¥á¡¼¥¿¡¼¤ÎÁȤ߹ç¤ï¤»¤òÊݸ¤¹¤ë¡£
 *
 * @param string $param_key ¥Ñ¥é¥á¡¼¥¿¡¼Ì¾
 * @param string $param_value ¥Ñ¥é¥á¡¼¥¿¡¼ÃÍ
 * @param string $url URL
 * @return void
 */
function sfMobileSetExtSessionId($param_key, $param_value, $url) {
    $objQuery = new SC_Query;

    // GC
    $time = date('Y-m-d H:i:s', time() - MOBILE_SESSION_LIFETIME);
    $objQuery->delete('dtb_mobile_ext_session_id', 'create_date < ?', array($time));

    $arrValues = array('session_id'  => session_id(),
                       'param_key'   => $param_key,
                       'param_value' => $param_value,
                       'url'         => $url);

    $objQuery->insert('dtb_mobile_ext_session_id', $arrValues);
}

/**
 * ¥á¡¼¥ë¥¢¥É¥ì¥¹¤¬·ÈÂӤΤâ¤Î¤«¤É¤¦¤«¤òȽÊ̤¹¤ë¡£
 *
 * @param string $address ¥á¡¼¥ë¥¢¥É¥ì¥¹
 * @return boolean ·ÈÂӤΥ᡼¥ë¥¢¥É¥ì¥¹¤Î¾ì¹ç¤Ïtrue¡¢¤½¤ì°Ê³°¤Î¾ì¹ç¤Ïfalse¤òÊÖ¤¹¡£
 */
function gfIsMobileMailAddress($address) {
    $arrMobileMailDomains = array('docomo.ne.jp', 'ezweb.ne.jp', 'softbank.ne.jp', 'vodafone.ne.jp');

    if (defined('MOBILE_ADDITIONAL_MAIL_DOMAINS')) {
        $arrMobileMailDomains = array_merge($arrMobileMailDomains, split('[ ,]+', MOBILE_ADDITIONAL_MAIL_DOMAINS));
    }

    foreach ($arrMobileMailDomains as $domain) {
        $domain = str_replace('.', '\\.', $domain);
        if (preg_match("/@([^@]+\\.)?$domain\$/", $address)) {
            return true;
        }
    }

    return false;
}
?>