source: branches/feature-module-zeus/html/test/naka/shopcgi.php @ 8

<?php

require_once("../../require.php");
require_once(DATA_PATH . "module/Request.php");

$entry_url = "http://mod-i.ccsware.net/ohayou/EntryTran.php";
$exec_url = "https://mod-i.ccsware.net/ohayou/ExecTran.php";
// ¼õÃíÈÖ¹æ¤Î¼èÆÀ
$order_id = sfGetUniqRandomId();

// ŹÊÞ¾ðÊó¤ÎÁ÷¿®
$arrData = array(
    'OrderId' => $order_id,     // ŹÊÞ¤´¤È¤Ë°ì°Õ¤ÊÃíʸID¤òÁ÷¿®¤¹¤ë¡£
    'TdTenantName' => '',       // 3Dǧ¾Ú»þɽ¼¨ÍÑŹÊÞ̾
    'TdFlag' => '',             // 3D¥Õ¥é¥°
    'ShopId' => 'test000003087',// ¥·¥ç¥Ã¥×ID
    'ShopPass' => 'lockon',     // ¥·¥ç¥Ã¥×¥Ñ¥¹¥ï¡¼¥É
    'Currency' => 'JPN',        // Ä̲ߥ³¡¼¥É
    'Amount' => '1000',         // ¶â³Û
    'Tax' => '50',              // ¾ÃÈñÀÇ
    'JobCd' => 'CHECK',         // ½èÍý¶èʬ
    'TenantNo' => '111111111',  // cgi-4¤ÇºîÀ®¤·¤¿Å¹ÊÞID¤òÁ÷¿®¤¹¤ë¡£
);

$req = new HTTP_Request($entry_url);
$req->setMethod(HTTP_REQUEST_METHOD_POST);
        
$req->addPostDataArray($arrData);

if (!PEAR::isError($req->sendRequest())) {
    $response = $req->getResponseBody();
} else {
    $response = "";
}
$req->clearPostData();
$arrRet = lfGetPostArray($response);

sfPrintR($arrRet);

// ·èºÑ¾ðÊó¤ÎÁ÷¿®
$arrData = array(
    'AccessId' => $arrRet['ACCESS_ID'],
    'AccessPass' => $arrRet['ACCESS_PASS'],
    'OrderId' => $order_id,
    'RetURL' => 'http://test.ec-cube.net/ec-cube/test/naka/recv.php',
    // ¥×¥í¥Ñ¡¼¥«¡¼¥É¤ò°·¤ï¤Ê¤¤¾ì¹ç¤ÏVISA¸ÇÄê¤ÇOK
    'CardType' => 'VISA, 11111, 111111111111111111111111111111111111, 1111111111',
    // »Ùʧ¤¤ÊýË¡
    /*
        1:°ì³ç
        2:ʬ³ä
        3:¥Ü¡¼¥Ê¥¹°ì³ç
        4:¥Ü¡¼¥Ê¥¹Ê¬³ä
        5:¥ê¥Üʧ¤¤
     */
    'Method' => '2',
    // »Ùʧ²ó¿ô
    'PayTimes' => '4',
    'CardNo1' => '4444',
    'CardNo2' => '4444',
    'CardNo3' => '4444',
    'CardNo4' => '5780',
    'ExpireMM' => '06',
    'ExpireYY' => '07',
    // ²ÃÌÁŹ¼«Í³¹àÌÜÊֵѥե饰
    'ClientFieldFlag' => '1',
    'ClientField1' => 'f1',
    'ClientField2' => 'f2',
    'ClientField3' => 'f3',
    // ¥ê¥À¥¤¥ì¥¯¥È¥Ú¡¼¥¸¤Ç¤Î±þÅú¤ò¼õ¤±¼è¤é¤Ê¤¤
    'ModiFlag' => '1',  
);

$req = new HTTP_Request($exec_url);
$req->setMethod(HTTP_REQUEST_METHOD_POST);

$req->addPostDataArray($arrData);

if (!PEAR::isError($req->sendRequest())) {
    $response = $req->getResponseBody();
} else {
    $response = "";
}
$req->clearPostData();

$arrRet = lfGetPostArray($response);

sfPrintR($arrRet);

//---------------------------------------------------------------------------------------------------------------------------------
function lfGetPostArray($text) {
    if($text != "") {
        $text = ereg_replace("[\n\r]", "", $text);
        $arrTemp = split("&", $text);
        foreach($arrTemp as $ret) {
            list($key, $val) = split("=", $ret);
            $arrRet[$key] = $val;
        }
    }
    return $arrRet;
}
?>