source: temp/trunk/html/test/naka/shopcgi.php @ 7800

<?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' => '',
    'TdFlag' => '',
    'ShopId' => 'test',
    'Amount' => '1000',
    'ShopPass' => 'test',
    'Currency' => 'JPN',
    '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);

// ·èºÑ¾ðÊó¤ÎÁ÷¿®
$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',
    '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;
}
?>