s2Member v110815
Source Code: s2member-pro\includes\classes\gateways\clickbank\clickbank-return-in.inc.php
Docs updated: August 15, 2011, 4:17 pm
Open for public discussion.
(!-- s-words :: --)Source Code Documentation Packages ( Overview ) Classes Deprecated Todo Index Source Code jQuery(window).load(function(){ if(typeof location.hash === 'string' && location.hash.match(/^#/)) jQuery('olli'+location.hash).addClass('hilite'); }); jQuery(window).bind('hashchange', function(){ if(typeof location.hash === 'string' && location.hash.match(/^#/)) jQuery('olli').removeClass('hilite'); jQuery('olli'+location.hash).addClass('hilite'); }); [ full view ]s2member-pro\includes\classes\gateways\clickbank\clickbank-return-in.inc.php ?php /** * ClickBank® Return URL handler ( inner processing routines ). * * Copyright: © 2009-2011 * {@link http://www.websharks-inc.com/ WebSharks, Inc.} * ( coded in the USA ) * * This WordPress® plugin ( s2Member Pro ) is comprised of two parts: * * o (1) Its PHP code is licensed under the GPL license, as is WordPress®. * You should have received a copy of the GNU General Public License, * along with this software. In the main directory, see: /licensing/ * If not, see: {@link http://www.gnu.org/licenses/}. * * o (2) All other parts of ( s2Member Pro ); including, but not limited to: * the CSS code, some JavaScript code, images, and design; * are licensed according to the license purchased. * See: {@link http://www.s2member.com/prices/} * * Unless you have our prior written consent, you must NOT directly or indirectly license, * sub-license, sell, resell, or provide for free; part (2) of the s2Member Pro Module; * or make an offer to do any of these things. All of these things are strictly * prohibited with part (2) of the s2Member Pro Module. * * Your purchase of s2Member Pro includes free lifetime upgrades via s2Member.com * ( i.e. new features, bug fixes, updates, improvements ); along with full access * to our video tutorial library: {@link http://www.s2member.com/videos/} * * @package s2Member\ClickBank * @since 1.5 */ if ( realpath ( __FILE__ ) === realpath ( $_SERVER [ "SCRIPT_FILENAME" ] ) ) exit ( "Do not access this file directly." ) ; /**/ if ( ! class_exists ( "c_ws_plugin__s2member_pro_clickbank_return_in" ) ) { /** * ClickBank® Return URL handler ( inner processing routines ). * * @package s2Member\ClickBank * @since 1.5 */ class c_ws_plugin__s2member_pro_clickbank_return_in { /** * Handles ClickBank® Return URL processing. * * @package s2Member\ClickBank * @since 1.5 * * @attaches-to ``add_action("init");`` * * @return null Or exits script execution after redirection. */ public static function clickbank_return ( ) { global $current_site , $current_blog ; /* For Multisite support. */ /**/ if ( ! empty ( $_GET [ "s2member_pro_clickbank_return" ] ) && $GLOBALS [ "WS_PLUGIN__" ] [ "s2member" ] [ "o" ] [ "pro_clickbank_username" ] ) { if ( is_array ( $clickbank = c_ws_plugin__s2member_pro_clickbank_utilities:: clickbank_postvars ( ) ) && ( $_clickbank = $clickbank ) ) { $clickbank [ "s2member_log" ] [ ] = "Return-Data received on: " . date ( "D M j, Y g:i:s a T" ) ; $clickbank [ "s2member_log" ] [ ] = "s2Member POST vars verified with ClickBank®." ; /**/ $clickbank [ "s2member_log" ] [ ] = "Sleeping for 5 seconds. Giving ClickBank® a chance to finalize processing." ; sleep ( 5 ) ; /* Sleep here to give ClickBank® a chance to finalize processing. Allows the API call to succeed. */ $clickbank [ "s2member_log" ] [ ] = "Awake. It's " . date ( "D M j, Y g:i:s a T" ) . ". Processing will continue." ; /**/ if ( is_array ( $order = json_decode (c_ws_plugin__s2member_utils_urls:: remote ( "https://api.clickbank.com/rest/1.2/orders/" . $clickbank [ "cbreceipt" ] , false , array_merge (c_ws_plugin__s2member_pro_clickbank_utilities:: clickbank_api_headers ( ) , array ( "timeout" = 20 ) ) ) , true ) ) && ( $order = $order [ "orderData" ] ) ) { $clickbank [ "s2member_log" ] [ ] = "Order API variables have been obtained from ClickBank®." ; /**/ foreach ( $clickbank as $var = $value ) /* Pulls out the s2_ variables from Return Data. */ if ( preg_match ( "/^s2_/" , $var ) ) $s2vars [ $var ] = $value ; /**/ if ( isset ( $s2vars [ "s2_p1" ] ) && $s2vars [ "s2_p1" ] === "0 D" ) /* Initial Period. */ $s2vars [ "s2_p1" ] = $s2vars [ "s2_p3" ] ; /* No Trial defaults to Regular Period. */ /**/ $clickbank [ "s2vars" ] = $s2vars ; /* So they appear in the log entry for this Notification. */ /**/ if ( preg_match ( "/^(TEST_)?SALE$/i" , $order [ "txnType" ] ) && ! ( isset ( $s2vars [ "s2_p1" ] ) && isset ( $s2vars [ "s2_p3" ] ) ) ) { $clickbank [ "s2member_log" ] [ ] = "ClickBank® transaction identified as ( `SALE/STANDARD` )." ; $clickbank [ "s2member_log" ] [ ] = "Return-Data reformulated. Piping through s2Member's core/standard PayPal® processor as `txn_type` ( `web_accept` )." ; $clickbank [ "s2member_log" ] [ ] = "Please check PayPal® RTN logs for further processing details." ; /**/ $rtn = array ( ) ; /* Reset. */ /**/ $rtn [ "txn_type" ] = "web_accept" ; /**/ $rtn [ "txn_id" ] = $order [ "receipt" ] ; $rtn [ "custom" ] = $s2vars [ "s2_custom" ] ; /**/ $rtn [ "mc_gross" ] = number_format ( $order [ "amount" ] , 2 , "." , "" ) ; $rtn [ "mc_currency" ] = strtoupper ( $order [ "currency" ] ) ; $rtn [ "tax" ] = "0.00" ; /* No tax. */ /**/ $rtn [ "payer_email" ] = $order [ "email" ] ; $rtn [ "first_name" ] = ucwords ( strtolower ( $order [ "firstName" ] ) ) ; $rtn [ "last_name" ] = ucwords ( strtolower ( $order [ "lastName" ] ) ) ; /**/ $rtn [ "option_name1" ] = ( $s2vars [ "s2_referencing" ] ) ? "Referencing Customer ID" : "Originating Domain" ; $rtn [ "option_selection1" ] = ( $s2vars [ "s2_referencing" ] ) ? $s2vars [ "s2_referencing" ] : $_SERVER [ "HTTP_HOST" ] ; /**/ $rtn [ "option_name2" ] = "Customer IP Address" ; $rtn [ "option_selection2" ] = $s2vars [ "s2_customer_ip" ] ; /**/ $rtn [ "item_number" ] = $s2vars [ "s2_invoice" ] ; $rtn [ "item_name" ] = $s2vars [ "s2_desc" ] ; /**/ $rtn_q = "&s2member_paypal_proxy=clickbank&s2member_paypal_proxy_use=standard-emails" ; $rtn_q .= "&s2member_paypal_proxy_verification=" . urlencode (c_ws_plugin__s2member_paypal_utilities:: paypal_proxy_key_gen ( ) ) ; /**/ if ( ! empty ( $_GET [ "s2member_pro_clickbank_return_success" ] ) ) $rtn_q .= "&s2member_paypal_return_success=" . rawurlencode ( trim ( stripslashes ( $_GET [ "s2member_pro_clickbank_return_success" ] ) ) ) ; /**/ $clickbank [ "s2member_log" ] [ ] = add_query_arg ( urlencode_deep ( $rtn ) , site_url ( "/?s2member_pro_clickbank_return&s2member_paypal_return=1" . $rtn_q ) ) ; /**/ wp_redirect ( add_query_arg ( urlencode_deep ( $rtn ) , site_url ( "/?s2member_pro_clickbank_return&s2member_paypal_return=1" . $rtn_q ) ) ) ; } else if ( preg_match ( "/^(TEST_)?SALE$/i" , $order [ "txnType" ] ) && ( isset ( $s2vars [ "s2_p1" ] ) && isset ( $s2vars [ "s2_p3" ] ) ) ) { $clickbank [ "s2member_log" ] [ ] = "ClickBank® transaction identified as ( `SALE/RECURRING` )." ; $clickbank [ "s2member_log" ] [ ] = "Return-Data reformulated. Piping through s2Member's core/standard PayPal® processor as `txn_type` ( `subscr_signup` )." ; $clickbank [ "s2member_log" ] [ ] = "Please check PayPal® RTN logs for further processing details." ; /**/ $rtn = array ( ) ; /* Reset. */ /**/ $rtn [ "txn_type" ] = "subscr_signup" ; $rtn [ "subscr_id" ] = $s2vars [ "s2_subscr_id" ] ; $rtn [ "recurring" ] = ( $order [ "futurePayments" ] 1 ) ? "1" : "0" ; /**/ $rtn [ "txn_id" ] = $order [ "receipt" ] ; $rtn [ "custom" ] = $s2vars [ "s2_custom" ] ; /**/ $rtn [ "period1" ] = $s2vars [ "s2_p1" ] ; $rtn [ "period3" ] = $s2vars [ "s2_p3" ] ; /**/ $rtn [ "mc_amount1" ] = number_format ( $order [ "amount" ] , 2 , "." , "" ) ; $rtn [ "mc_amount3" ] = number_format ( $order [ "rebillAmount" ] , 2 , "." , "" ) ; /**/ $rtn [ "mc_currency" ] = strtoupper ( $order [ "currency" ] ) ; $rtn [ "tax" ] = "0.00" ; /* No tax. */ /**/ $rtn [ "payer_email" ] = $order [ "email" ] ; $rtn [ "first_name" ] = ucwords ( strtolower ( $order [ "firstName" ] ) ) ; $rtn [ "last_name" ] = ucwords ( strtolower ( $order [ "lastName" ] ) ) ; /**/ $rtn [ "option_name1" ] = ( $s2vars [ "s2_referencing" ] ) ? "Referencing Customer ID" : "Originating Domain" ; $rtn [ "option_selection1" ] = ( $s2vars [ "s2_referencing" ] ) ? $s2vars [ "s2_referencing" ] : $_SERVER [ "HTTP_HOST" ] ; /**/ $rtn [ "option_name2" ] = "Customer IP Address" ; $rtn [ "option_selection2" ] = $s2vars [ "s2_customer_ip" ] ; /**/ $rtn [ "item_number" ] = $s2vars [ "s2_invoice" ] ; $rtn [ "item_name" ] = $s2vars [ "s2_desc" ] ; /**/ $rtn_q = "&s2member_paypal_proxy=clickbank&s2member_paypal_proxy_use=standard-emails" ; $rtn_q .= "&s2member_paypal_proxy_verification=" . urlencode (c_ws_plugin__s2member_paypal_utilities:: paypal_proxy_key_gen ( ) ) ; /**/ if ( ! empty ( $_GET [ "s2member_pro_clickbank_return_success" ] ) ) $rtn_q .= "&s2member_paypal_return_success=" . rawurlencode ( trim ( stripslashes ( $_GET [ "s2member_pro_clickbank_return_success" ] ) ) ) ; /**/ $clickbank [ "s2member_log" ] [ ] = add_query_arg ( urlencode_deep ( $rtn ) , site_url ( "/?s2member_pro_clickbank_return&s2member_paypal_return=1" . $rtn_q ) ) ; /**/ wp_redirect ( add_query_arg ( urlencode_deep ( $rtn ) , site_url ( "/?s2member_pro_clickbank_return&s2member_paypal_return=1" . $rtn_q ) ) ) ; } else { $clickbank [ "s2member_log" ] [ ] = "Unexpected txnType. The ClickBank® txnType did not match a required action." ; /**/ $clickbank [ "s2member_log" ] [ ] = "Redirecting Customer to the Home Page, due to an error that occurred." ; /**/ echo 'script type="text/javascript"' . "\n" ; echo "alert('ERROR: Unexpected txnType. Please contact Support for assistance.\\n\\nThe ClickBank® txnType did not match a required action.');" . "\n" ; echo "window.location = '" . esc_js ( home_url ( "/" ) ) . "';" ; echo '/script' . "\n" ; } } else /* Extensive log reporting here. Sometimes it takes a few seconds for the ClickBank® API to receive data for new orders. This is here in case that happens. */ { $clickbank [ "s2member_log" ] [ ] = "Unable to obtain API vars. The ClickBank® API may NOT have data for this order yet. Or, your ClickBank® API Keys are NOT configured properly under `s2Member - ClickBank® Options`." ; $clickbank [ "s2member_log" ] [ ] = var_export ( $_REQUEST , true ) ; /* Recording _POST + _GET vars for analysis and debugging. */ /**/ $clickbank [ "s2member_log" ] [ ] = "Return-Data reformulated. Piping through s2Member's core/standard PayPal® processor with `proxy_use` ( `ty-email` )." ; $clickbank [ "s2member_log" ] [ ] = "Please check PayPal® RTN logs for further processing details." ; /**/ $rtn_q = "&s2member_paypal_proxy=clickbank&s2member_paypal_proxy_use=standard-emails,ty-email" ; $rtn_q .= "&s2member_paypal_proxy_verification=" . urlencode (c_ws_plugin__s2member_paypal_utilities:: paypal_proxy_key_gen ( ) ) ; /**/ if ( ! empty ( $_GET [ "s2member_pro_clickbank_return_success" ] ) ) $rtn_q .= "&s2member_paypal_return_success=" . rawurlencode ( trim ( stripslashes ( $_GET [ "s2member_pro_clickbank_return_success" ] ) ) ) ; /**/ $clickbank [ "s2member_log" ] [ ] = site_url ( "/?s2member_pro_clickbank_return&s2member_paypal_return=1" . $rtn_q ) ; /**/ wp_redirect ( site_url ( "/?s2member_pro_clickbank_return&s2member_paypal_return=1" . $rtn_q ) ) ; } } else /* Extensive log reporting here. This is an area where many site owners find trouble. Depending on server configuration; remote HTTPS connections may fail. */ { $clickbank [ "s2member_log" ] [ ] = "Unable to verify POST vars. This is most likely related to an invalid ClickBank® configuration. Please check: s2Member - ClickBank® Options." ; $clickbank [ "s2member_log" ] [ ] = "If you're absolutely SURE that your ClickBank® configuration is valid, you may want to run some tests on your server, just to be sure \$_POST variables are populated, and that your server is able to connect to ClickBank® over an HTTPS connection." ; $clickbank [ "s2member_log" ] [ ] = "s2Member uses the WP_Http class for remote connections; which will try to use cURL first, and then fall back on the FOPEN method when cURL is not available. On a Windows® server, you may have to disable your cURL extension. Instead, set allow_url_fopen = yes in your php.ini file. The cURL extension (usually) does NOT support SSL connections on a Windows® server." ; $clickbank [ "s2member_log" ] [ ] = var_export ( $_REQUEST , true ) ; /* Recording _POST + _GET vars for analysis and debugging. */ /**/ $clickbank [ "s2member_log" ] [ ] = "Redirecting Customer to the Home Page, due to an error that occurred." ; /**/ echo 'script type="text/javascript"' . "\n" ; echo "alert('ERROR: Unable to verify POST vars. Please contact Support for assistance.\\n\\nThis is most likely related to an invalid ClickBank® configuration. If you are the site owner, please check: s2Member - ClickBank® Options.');" . "\n" ; echo "window.location = '" . esc_js ( home_url ( "/" ) ) . "';" ; echo '/script' . "\n" ; } /* If debugging/logging is enabled; we need to append $clickbank to the log file. Logging now supports Multisite Networking as well. */ $logv = c_ws_plugin__s2member_utilities:: ver_details ( ) ; $logm = c_ws_plugin__s2member_utilities:: mem_details ( ) ; $log4 = $_SERVER [ "HTTP_HOST" ] . $_SERVER [ "REQUEST_URI" ] . "\nUser-Agent: " . $_SERVER [ "HTTP_USER_AGENT" ] ; $log4 = ( is_multisite ( ) && ! is_main_site ( ) ) ? ( $_log4 = $current_blog - domain . $current_blog - path ) . "\n" . $log4 : $log4 ; $log2 = ( is_multisite ( ) && ! is_main_site ( ) ) ? "clickbank-rtn-4-" . trim ( preg_replace ( "/[^a-z0-9]/i" , "-" , $_log4 ) , "-" ) . ".log" : "clickbank-rtn.log" ; /**/ if ( $GLOBALS [ "WS_PLUGIN__" ] [ "s2member" ] [ "o" ] [ "gateway_debug_logs" ] ) if ( is_dir ( $logs_dir = $GLOBALS [ "WS_PLUGIN__" ] [ "s2member" ] [ "c" ] [ "logs_dir" ] ) ) if ( is_writable ( $logs_dir ) && c_ws_plugin__s2member_utils_logs:: archive_oversize_log_files ( ) ) file_put_contents ( $logs_dir . "/" . $log2 , $logv . "\n" . $logm . "\n" . $log4 . "\n" . var_export ( $clickbank , true ) . "\n \n" , FILE_APPEND) ; /**/ exit ( ) ; /* Exit now. */ } } } } ? [ full view ]s2member-pro\includes\classes\gateways\clickbank\clickbank-return-in.inc.php Source Code Documentation Packages ( Overview ) Classes Deprecated Todo Index Source Code(!-- :: s-words --)Statistics: Posted by System Robot — August 15th, 2011, 3:17 pm
]]>