View Single Post
  #8  
Old 09-08-2005, 08:23 AM
 
cotc2001 cotc2001 is offline
 

X-Man
  
Join Date: Feb 2003
Location: Shrewsbury, UK
Posts: 2,351
 

Default

Yeah done all that still just hangs,
This is my code - I will happily pay if someone can sort this out

Code:
<?php /*****************************************************************************\ +-----------------------------------------------------------------------------+ | X-Cart | | Copyright (c) 2001-2005 Ruslan R. Fazliev <rrf@rrf.ru> | | All rights reserved. | +-----------------------------------------------------------------------------+ | PLEASE READ THE FULL TEXT OF SOFTWARE LICENSE AGREEMENT IN THE "COPYRIGHT" | | FILE PROVIDED WITH THIS DISTRIBUTION. THE AGREEMENT TEXT IS ALSO AVAILABLE | | AT THE FOLLOWING URL: http://www.x-cart.com/license.php | | | | THIS AGREEMENT EXPRESSES THE TERMS AND CONDITIONS ON WHICH YOU MAY USE | | THIS SOFTWARE PROGRAM AND ASSOCIATED DOCUMENTATION THAT RUSLAN R. | | FAZLIEV (hereinafter referred to as "THE AUTHOR") IS FURNISHING OR MAKING | | AVAILABLE TO YOU WITH THIS AGREEMENT (COLLECTIVELY, THE "SOFTWARE"). | | PLEASE REVIEW THE TERMS AND CONDITIONS OF THIS LICENSE AGREEMENT | | CAREFULLY BEFORE INSTALLING OR USING THE SOFTWARE. BY INSTALLING, | | COPYING OR OTHERWISE USING THE SOFTWARE, YOU AND YOUR COMPANY | | (COLLECTIVELY, "YOU") ARE ACCEPTING AND AGREEING TO THE TERMS OF THIS | | LICENSE AGREEMENT. IF YOU ARE NOT WILLING TO BE BOUND BY THIS | | AGREEMENT, DO NOT INSTALL OR USE THE SOFTWARE. VARIOUS COPYRIGHTS AND | | OTHER INTELLECTUAL PROPERTY RIGHTS PROTECT THE SOFTWARE. THIS | | AGREEMENT IS A LICENSE AGREEMENT THAT GIVES YOU LIMITED RIGHTS TO USE | | THE SOFTWARE AND NOT AN AGREEMENT FOR SALE OR FOR TRANSFER OF TITLE.| | THE AUTHOR RETAINS ALL RIGHTS NOT EXPRESSLY GRANTED BY THIS AGREEMENT. | | | | The Initial Developer of the Original Code is Ruslan R. Fazliev | | Portions created by Ruslan R. Fazliev are Copyright (C) 2001-2005 | | Ruslan R. Fazliev. All Rights Reserved. | +-----------------------------------------------------------------------------+ \*****************************************************************************/ # # $Id: cc_fuse.php,v 1.13.2.2 2005/01/12 07:43:07 svowl Exp $ # if (!defined('XCART_START')) { header("Location: ../"); die("Access denied"); } @set_time_limit(100); $pp_login = $module_params["param01"]; $pp_pass = $module_params["param02"]; $pp_client = $module_params["param03"]; $domen = ($module_params["testmode"]=="N" ? $module_params["param06"] : $module_params["param07"]); $port = ($module_params["testmode"]=="N" ? 443 : 443); $curr = $module_params["param08"]; switch($module_params["testmode"]) { case "N": $pp_mode="P"; break; case "A": $pp_mode="Y"; break; default: $pp_mode="N"; break; } if ($userinfo["card_type"] == "VISA") { $card_type = "1"; } elseif ($userinfo["card_type"] == "MC") { $card_type = "2"; } elseif ($userinfo["card_type"] == "SW") { $card_type = "10"; } elseif ($userinfo["card_type"] == "SO") { $card_type = "9"; } elseif ($userinfo["card_type"] == "UKE") { $card_type = "11"; } $post = ""; $post[] = "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>"; $post[] = "<EngineDocList><DocVersion>1.0</DocVersion><EngineDoc><ContentType>OrderFormDoc</ContentType>"; $post[] = "<User><Name>$pp_login</Name><Password>$pp_pass</Password><ClientId DataType=\"S32\">$pp_client</ClientId></User>"; $post[] = "<Instructions><Pipeline>Payment</Pipeline></Instructions><OrderFormDoc><Mode>$pp_mode</Mode>"; #$post[] = "<Instructions><Pipeline>PaymentNoFraud</Pipeline></Instructions><OrderFormDoc><Mode>Y</Mode>"; $post[] = "<Consumer>"; $post[] = "<Email>".$userinfo["email"]."</Email>"; $post[] = "<BillTo><Location><TelVoice>".$userinfo["phone"]."</TelVoice>"; $post[] = "<Address><Name>".$userinfo["b_firstname"]." ".$userinfo["b_lastname"]."</Name>"; $post[] = "<City>".$userinfo["b_city"]."</City><Street1>".$userinfo["b_address"]."</Street1>"; $post[] = "<StateProv>".$userinfo["b_state"]."</StateProv><PostalCode>".$userinfo["b_zipcode"]."</PostalCode></Address></Location></BillTo>"; $post[] = "<PaymentMech><CreditCard><Number>".$userinfo["card_number"]."</Number>"; $post[] = "<Expires DataType=\"ExpirationDate\" Locale=\"840\">".substr($userinfo["card_expire"],0,2)."/".substr($userinfo["card_expire"],2,2)."</Expires>"; $post[] = "<IssueNum>".$userinfo["card_issue_no"]."</IssueNum>"; $post[] = "<StartDate DataType=\"StartDate\" Locale=\"840\">".substr($userinfo["card_valid_from"],0,2)."/".substr($userinfo["card_valid_from"],2,2)."</StartDate>"; $post[] = "<Type>".$card_type."</Type>"; $post[] = "<Cvv2Val>".$userinfo["card_cvv2"]."</Cvv2Val>"; $post[] = "<Cvv2Indicator>".(!empty($userinfo["card_cvv2"])?1:2)."</Cvv2Indicator>"; $post[] = "</CreditCard></PaymentMech></Consumer>"; $post[] = "<Transaction><Type>Auth</Type><ChargeDesc1></ChargeDesc1>"; $post[] = "<CurrentTotals><Totals><Total DataType=\"Money\" Currency=\"".$curr."\">".(100*$cart["total_cost"])."</Total></Totals></CurrentTotals>"; $post[] = "</Transaction></OrderFormDoc></EngineDoc></EngineDocList>"; $pst = array("CLRCMRC_XML=".join("",$post)); list($a,$return)=func_https_request("POST","https://".$domen.":$port/",$pst); $return=preg_replace("/\n/","",$return); if (preg_match("/<CcReturnMsg(.*)>(.*)<\/CcReturnMsg>/",$return,$out)) $bill_output["billmes"] = $out[2]; if (preg_match("/<CcErrCode(.*)>(.*)<\/CcErrCode>/",$return,$out)) { $bill_output["code"] = ($out[2] == "1") ? 1 : 2; $bill_output["billmes"] .= " (CcErrCode: ".$out[2].")"; } else $bill_output["code"] = 0; if ($bill_output["code"] == 1) { preg_match("/<AuthCode(.*)>(.*)<\/AuthCode>/",$return,$out); $bill_output["billmes"] .= " (AuthCode: ".$out[2].")"; preg_match("/<CardholderPresentCode(.*)>(.*)<\/CardholderPresentCode>/",$return,$out); $bill_output["billmes"] .= " (CardholderPresentCode: ".$out[2].")"; preg_match("/<InputEnvironment(.*)>(.*)<\/InputEnvironment>/",$return,$out); $bill_output["billmes"] .= " (InputEnvironment: ".$out[2].")"; preg_match("/<TerminalInputCapability(.*)>(.*)<\/TerminalInputCapability>/",$return,$out); $bill_output["billmes"] .= " (TerminalInputCapability: ".$out[2].")"; preg_match("/<SecurityIndicator(.*)>(.*)<\/SecurityIndicator>/",$return,$out); $bill_output["cvvmes"] = "SecurityIndicator: ".$out[2]; } elseif ($bill_output["code"] == 2) { preg_match("/<Text(.*)>(.*)<\/Text>/",$return,$out); $bill_output["billmes"] .= $out[2]; preg_match("/<ResourceId(.*)>(.*)<\/ResourceId>/",$return,$out); $bill_output["billmes"] .= " (ResourceID: ".$out[2].")"; preg_match("/<Sev(.*)>(.*)<\/Sev>/",$return,$out); $bill_output["billmes"] .= " (Sev: ".$out[2].")"; } else { $bill_output["code"] = 0; } if(preg_match("/<DocumentId(.*)>(.*)<\/DocumentId>/",$return,$out)) $bill_output["billmes"].= " (DocumentId: ".$out[2].")"; if(preg_match("/<FraudResultCode(.*)>(.*)<\/FraudResultCode>/",$return,$out)) $bill_output["avsmes"] = "FraudResultCode: ".$out[2]; ?>
__________________
x-cart 4.0.5 (live and heavily modded)
Server: freebsd
Reply With Quote