503 lines
17 KiB
PHP
503 lines
17 KiB
PHP
|
<?php
|
||
|
/*
|
||
|
+--------------------------------------------------------------------+
|
||
|
| CiviCRM version 4.7 |
|
||
|
+--------------------------------------------------------------------+
|
||
|
| Copyright CiviCRM LLC (c) 2004-2017 |
|
||
|
+--------------------------------------------------------------------+
|
||
|
| This file is a part of CiviCRM. |
|
||
|
| |
|
||
|
| CiviCRM is free software; you can copy, modify, and distribute it |
|
||
|
| under the terms of the GNU Affero General Public License |
|
||
|
| Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
|
||
|
| |
|
||
|
| CiviCRM is distributed in the hope that it will be useful, but |
|
||
|
| WITHOUT ANY WARRANTY; without even the implied warranty of |
|
||
|
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
|
||
|
| See the GNU Affero General Public License for more details. |
|
||
|
| |
|
||
|
| You should have received a copy of the GNU Affero General Public |
|
||
|
| License and the CiviCRM Licensing Exception along |
|
||
|
| with this program; if not, contact CiviCRM LLC |
|
||
|
| at info[AT]civicrm[DOT]org. If you have questions about the |
|
||
|
| GNU Affero General Public License or the licensing of CiviCRM, |
|
||
|
| see the CiviCRM license FAQ at http://civicrm.org/licensing |
|
||
|
+--------------------------------------------------------------------+
|
||
|
*/
|
||
|
|
||
|
/**
|
||
|
*
|
||
|
* @package CRM
|
||
|
* @copyright CiviCRM LLC (c) 2004-2017
|
||
|
*/
|
||
|
class CiviContributeProcessor {
|
||
|
static $_paypalParamsMapper = array(
|
||
|
//category => array(paypal_param => civicrm_field);
|
||
|
'contact' => array(
|
||
|
'salutation' => 'prefix_id',
|
||
|
'firstname' => 'first_name',
|
||
|
'lastname' => 'last_name',
|
||
|
'middlename' => 'middle_name',
|
||
|
'suffix' => 'suffix_id',
|
||
|
'email' => 'email',
|
||
|
),
|
||
|
'location' => array(
|
||
|
'shiptoname' => 'address_name',
|
||
|
'shiptostreet' => 'street_address',
|
||
|
'shiptostreet2' => 'supplemental_address_1',
|
||
|
'shiptocity' => 'city',
|
||
|
'shiptostate' => 'state_province',
|
||
|
'shiptozip' => 'postal_code',
|
||
|
'countrycode' => 'country',
|
||
|
),
|
||
|
'transaction' => array(
|
||
|
'amt' => 'total_amount',
|
||
|
'feeamt' => 'fee_amount',
|
||
|
'transactionid' => 'trxn_id',
|
||
|
'currencycode' => 'currency',
|
||
|
'l_name0' => 'source',
|
||
|
'ordertime' => 'receive_date',
|
||
|
'note' => 'note',
|
||
|
'custom' => 'note',
|
||
|
'l_number0' => 'note',
|
||
|
'is_test' => 'is_test',
|
||
|
'transactiontype' => 'trxn_type',
|
||
|
'recurrences' => 'installments',
|
||
|
'l_amt2' => 'amount',
|
||
|
'l_period2' => 'lol',
|
||
|
'invnum' => 'invoice_id',
|
||
|
'subscriptiondate' => 'start_date',
|
||
|
'subscriptionid' => 'processor_id',
|
||
|
'timestamp' => 'modified_date',
|
||
|
),
|
||
|
);
|
||
|
|
||
|
static $_csvParamsMapper = array(
|
||
|
// Note: if csv header is not present in the mapper, header itself
|
||
|
// is considered as a civicrm field.
|
||
|
//category => array(csv_header => civicrm_field);
|
||
|
'contact' => array(
|
||
|
'first_name' => 'first_name',
|
||
|
'last_name' => 'last_name',
|
||
|
'middle_name' => 'middle_name',
|
||
|
'email' => 'email',
|
||
|
),
|
||
|
'location' => array(
|
||
|
'street_address' => 'street_address',
|
||
|
'supplemental_address_1' => 'supplemental_address_1',
|
||
|
'city' => 'city',
|
||
|
'postal_code' => 'postal_code',
|
||
|
'country' => 'country',
|
||
|
),
|
||
|
'transaction' => array(
|
||
|
'total_amount' => 'total_amount',
|
||
|
'trxn_id' => 'trxn_id',
|
||
|
'currency' => 'currency',
|
||
|
'source' => 'source',
|
||
|
'receive_date' => 'receive_date',
|
||
|
'note' => 'note',
|
||
|
'is_test' => 'is_test',
|
||
|
),
|
||
|
);
|
||
|
|
||
|
/**
|
||
|
* @param $paymentProcessor
|
||
|
* @param $paymentMode
|
||
|
* @param $start
|
||
|
* @param $end
|
||
|
*/
|
||
|
public static function paypal($paymentProcessor, $paymentMode, $start, $end) {
|
||
|
$url = "{$paymentProcessor['url_api']}nvp";
|
||
|
|
||
|
$keyArgs = array(
|
||
|
'user' => $paymentProcessor['user_name'],
|
||
|
'pwd' => $paymentProcessor['password'],
|
||
|
'signature' => $paymentProcessor['signature'],
|
||
|
'version' => 3.0,
|
||
|
);
|
||
|
|
||
|
$args = $keyArgs;
|
||
|
$args += array(
|
||
|
'method' => 'TransactionSearch',
|
||
|
'startdate' => $start,
|
||
|
'enddate' => $end,
|
||
|
);
|
||
|
|
||
|
require_once 'CRM/Core/Payment/PayPalImpl.php';
|
||
|
|
||
|
// as invokeAPI fetch only last 100 transactions.
|
||
|
// we should require recursive calls to process more than 100.
|
||
|
// first fetch transactions w/ give date intervals.
|
||
|
// if we get error code w/ result, which means we do have more than 100
|
||
|
// manipulate date interval accordingly and fetch again.
|
||
|
|
||
|
do {
|
||
|
$result = CRM_Core_Payment_PayPalImpl::invokeAPI($args, $url);
|
||
|
require_once "CRM/Contribute/BAO/Contribution/Utils.php";
|
||
|
|
||
|
$keyArgs['method'] = 'GetTransactionDetails';
|
||
|
foreach ($result as $name => $value) {
|
||
|
if (substr($name, 0, 15) == 'l_transactionid') {
|
||
|
|
||
|
// We don't/can't process subscription notifications, which appear
|
||
|
// to be identified by transaction ids beginning with S-
|
||
|
if (substr($value, 0, 2) == 'S-') {
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
// Before we bother making a remote API call to PayPal to lookup
|
||
|
// details about a transaction, let's make sure that it doesn't
|
||
|
// already exist in the database.
|
||
|
require_once 'CRM/Contribute/DAO/Contribution.php';
|
||
|
$dao = new CRM_Contribute_DAO_Contribution();
|
||
|
$dao->trxn_id = $value;
|
||
|
if ($dao->find(TRUE)) {
|
||
|
preg_match('/(\d+)$/', $name, $matches);
|
||
|
$seq = $matches[1];
|
||
|
$email = $result["l_email{$seq}"];
|
||
|
$amt = $result["l_amt{$seq}"];
|
||
|
CRM_Core_Error::debug_log_message("Skipped (already recorded) - $email, $amt, $value ..<p>", TRUE);
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
$keyArgs['transactionid'] = $value;
|
||
|
$trxnDetails = CRM_Core_Payment_PayPalImpl::invokeAPI($keyArgs, $url);
|
||
|
if (is_a($trxnDetails, 'CRM_Core_Error')) {
|
||
|
echo "PAYPAL ERROR: Skipping transaction id: $value<p>";
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
// only process completed payments
|
||
|
if (strtolower($trxnDetails['paymentstatus']) != 'completed') {
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
// only process receipts, not payments
|
||
|
if (strtolower($trxnDetails['transactiontype']) == 'sendmoney') {
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
$params = self::formatAPIParams($trxnDetails,
|
||
|
self::$_paypalParamsMapper,
|
||
|
'paypal'
|
||
|
);
|
||
|
if ($paymentMode == 'test') {
|
||
|
$params['transaction']['is_test'] = 1;
|
||
|
}
|
||
|
else {
|
||
|
$params['transaction']['is_test'] = 0;
|
||
|
}
|
||
|
|
||
|
try {
|
||
|
if (self::processAPIContribution($params)) {
|
||
|
CRM_Core_Error::debug_log_message("Processed - {$trxnDetails['email']}, {$trxnDetails['amt']}, {$value} ..<p>", TRUE);
|
||
|
}
|
||
|
else {
|
||
|
CRM_Core_Error::debug_log_message("Skipped - {$trxnDetails['email']}, {$trxnDetails['amt']}, {$value} ..<p>", TRUE);
|
||
|
}
|
||
|
}
|
||
|
catch (CiviCRM_API3_Exception $e) {
|
||
|
CRM_Core_Error::debug_log_message("Skipped - {$trxnDetails['email']}, {$trxnDetails['amt']}, {$value} ..<p>", TRUE);
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
if ($result['l_errorcode0'] == '11002') {
|
||
|
$end = $result['l_timestamp99'];
|
||
|
$end_time = strtotime("{$end}", time());
|
||
|
$end_date = date('Y-m-d\T00:00:00.00\Z', $end_time);
|
||
|
$args['enddate'] = $end_date;
|
||
|
}
|
||
|
} while ($result['l_errorcode0'] == '11002');
|
||
|
}
|
||
|
|
||
|
public static function csv() {
|
||
|
$csvFile = '/home/deepak/Desktop/crm-4247.csv';
|
||
|
$delimiter = ";";
|
||
|
$row = 1;
|
||
|
|
||
|
$handle = fopen($csvFile, "r");
|
||
|
if (!$handle) {
|
||
|
CRM_Core_Error::fatal("Can't locate csv file.");
|
||
|
}
|
||
|
|
||
|
require_once "CRM/Contribute/BAO/Contribution/Utils.php";
|
||
|
while (($data = fgetcsv($handle, 1000, $delimiter)) !== FALSE) {
|
||
|
if ($row !== 1) {
|
||
|
$data['header'] = $header;
|
||
|
$params = self::formatAPIParams($data,
|
||
|
self::$_csvParamsMapper,
|
||
|
'csv'
|
||
|
);
|
||
|
if (self::processAPIContribution($params)) {
|
||
|
CRM_Core_Error::debug_log_message("Processed - line $row of csv file .. {$params['email']}, {$params['transaction']['total_amount']}, {$params['transaction']['trxn_id']} ..<p>", TRUE);
|
||
|
}
|
||
|
else {
|
||
|
CRM_Core_Error::debug_log_message("Skipped - line $row of csv file .. {$params['email']}, {$params['transaction']['total_amount']}, {$params['transaction']['trxn_id']} ..<p>", TRUE);
|
||
|
}
|
||
|
|
||
|
// clean up memory from dao's
|
||
|
CRM_Core_DAO::freeResult();
|
||
|
}
|
||
|
else {
|
||
|
// we assuming - first row is always the header line
|
||
|
$header = $data;
|
||
|
CRM_Core_Error::debug_log_message("Considering first row ( line $row ) as HEADER ..<p>", TRUE);
|
||
|
|
||
|
if (empty($header)) {
|
||
|
CRM_Core_Error::fatal("Header is empty.");
|
||
|
}
|
||
|
}
|
||
|
$row++;
|
||
|
}
|
||
|
fclose($handle);
|
||
|
}
|
||
|
|
||
|
public static function process() {
|
||
|
require_once 'CRM/Utils/Request.php';
|
||
|
|
||
|
$type = CRM_Utils_Request::retrieve('type', 'String', CRM_Core_DAO::$_nullObject, FALSE, 'csv', 'REQUEST');
|
||
|
$type = strtolower($type);
|
||
|
|
||
|
switch ($type) {
|
||
|
case 'paypal':
|
||
|
$start = CRM_Utils_Request::retrieve('start', 'String',
|
||
|
CRM_Core_DAO::$_nullObject, FALSE, 31, 'REQUEST'
|
||
|
);
|
||
|
$end = CRM_Utils_Request::retrieve('end', 'String',
|
||
|
CRM_Core_DAO::$_nullObject, FALSE, 0, 'REQUEST'
|
||
|
);
|
||
|
if ($start < $end) {
|
||
|
CRM_Core_Error::fatal("Start offset can't be less than End offset.");
|
||
|
}
|
||
|
|
||
|
$start = date('Y-m-d', time() - $start * 24 * 60 * 60) . 'T00:00:00.00Z';
|
||
|
$end = date('Y-m-d', time() - $end * 24 * 60 * 60) . 'T23:59:00.00Z';
|
||
|
|
||
|
$ppID = CRM_Utils_Request::retrieve('ppID', 'Integer',
|
||
|
CRM_Core_DAO::$_nullObject, TRUE, NULL, 'REQUEST'
|
||
|
);
|
||
|
$mode = CRM_Utils_Request::retrieve('ppMode', 'String',
|
||
|
CRM_Core_DAO::$_nullObject, FALSE, 'live', 'REQUEST'
|
||
|
);
|
||
|
|
||
|
$paymentProcessor = CRM_Financial_BAO_PaymentProcessor::getPayment($ppID, $mode);
|
||
|
|
||
|
CRM_Core_Error::debug_log_message("Start Date=$start, End Date=$end, ppID=$ppID, mode=$mode <p>", TRUE);
|
||
|
|
||
|
return self::$type($paymentProcessor, $mode, $start, $end);
|
||
|
|
||
|
case 'csv':
|
||
|
return self::csv();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* @param array $apiParams
|
||
|
* @param $mapper
|
||
|
* @param string $type
|
||
|
* @param bool $category
|
||
|
*
|
||
|
* @return array
|
||
|
*/
|
||
|
public static function formatAPIParams($apiParams, $mapper, $type = 'paypal', $category = TRUE) {
|
||
|
$type = strtolower($type);
|
||
|
|
||
|
if (!in_array($type, array(
|
||
|
'paypal',
|
||
|
'csv',
|
||
|
))
|
||
|
) {
|
||
|
// return the params as is
|
||
|
return $apiParams;
|
||
|
}
|
||
|
$params = $transaction = array();
|
||
|
|
||
|
if ($type == 'paypal') {
|
||
|
foreach ($apiParams as $detail => $val) {
|
||
|
if (isset($mapper['contact'][$detail])) {
|
||
|
$params[$mapper['contact'][$detail]] = $val;
|
||
|
}
|
||
|
elseif (isset($mapper['location'][$detail])) {
|
||
|
$params['address'][1][$mapper['location'][$detail]] = $val;
|
||
|
}
|
||
|
elseif (isset($mapper['transaction'][$detail])) {
|
||
|
switch ($detail) {
|
||
|
case 'l_period2':
|
||
|
// Sadly, PayPal seems to send two distinct data elements in a single field,
|
||
|
// so we break them out here. This is somewhat ugly and tragic.
|
||
|
$freqUnits = array(
|
||
|
'D' => 'day',
|
||
|
'W' => 'week',
|
||
|
'M' => 'month',
|
||
|
'Y' => 'year',
|
||
|
);
|
||
|
list($frequency_interval, $frequency_unit) = explode(' ', $val);
|
||
|
$transaction['frequency_interval'] = $frequency_interval;
|
||
|
$transaction['frequency_unit'] = $freqUnits[$frequency_unit];
|
||
|
break;
|
||
|
|
||
|
case 'subscriptiondate':
|
||
|
case 'timestamp':
|
||
|
// PayPal dates are in ISO-8601 format. We need a format that
|
||
|
// MySQL likes
|
||
|
$unix_timestamp = strtotime($val);
|
||
|
$transaction[$mapper['transaction'][$detail]] = date('YmdHis', $unix_timestamp);
|
||
|
break;
|
||
|
|
||
|
case 'note':
|
||
|
case 'custom':
|
||
|
case 'l_number0':
|
||
|
if ($val) {
|
||
|
$val = "[PayPal_field:{$detail}] {$val}";
|
||
|
$transaction[$mapper['transaction'][$detail]] = !empty($transaction[$mapper['transaction'][$detail]]) ? $transaction[$mapper['transaction'][$detail]] . " <br/> " . $val : $val;
|
||
|
}
|
||
|
break;
|
||
|
|
||
|
default:
|
||
|
$transaction[$mapper['transaction'][$detail]] = $val;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (!empty($transaction) && $category) {
|
||
|
$params['transaction'] = $transaction;
|
||
|
}
|
||
|
else {
|
||
|
$params += $transaction;
|
||
|
}
|
||
|
|
||
|
CRM_Contribute_BAO_Contribution_Utils::_fillCommonParams($params, $type);
|
||
|
|
||
|
return $params;
|
||
|
}
|
||
|
|
||
|
if ($type == 'csv') {
|
||
|
$header = $apiParams['header'];
|
||
|
unset($apiParams['header']);
|
||
|
foreach ($apiParams as $key => $val) {
|
||
|
if (isset($mapper['contact'][$header[$key]])) {
|
||
|
$params[$mapper['contact'][$header[$key]]] = $val;
|
||
|
}
|
||
|
elseif (isset($mapper['location'][$header[$key]])) {
|
||
|
$params['address'][1][$mapper['location'][$header[$key]]] = $val;
|
||
|
}
|
||
|
elseif (isset($mapper['transaction'][$header[$key]])) {
|
||
|
$transaction[$mapper['transaction'][$header[$key]]] = $val;
|
||
|
}
|
||
|
else {
|
||
|
$params[$header[$key]] = $val;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (!empty($transaction) && $category) {
|
||
|
$params['transaction'] = $transaction;
|
||
|
}
|
||
|
else {
|
||
|
$params += $transaction;
|
||
|
}
|
||
|
|
||
|
CRM_Contribute_BAO_Contribution_Utils::_fillCommonParams($params, $type);
|
||
|
|
||
|
return $params;
|
||
|
}
|
||
|
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* @deprecated function.
|
||
|
*
|
||
|
* This function has probably been defunct for quite a long time.
|
||
|
*
|
||
|
* @param array $params
|
||
|
*
|
||
|
* @return bool
|
||
|
*/
|
||
|
public static function processAPIContribution($params) {
|
||
|
if (empty($params) || array_key_exists('error', $params)) {
|
||
|
return FALSE;
|
||
|
}
|
||
|
|
||
|
$params['contact_id'] = CRM_Contact_BAO_Contact::getFirstDuplicateContact($params, 'Individual', 'Unsupervised', array(), FALSE);
|
||
|
|
||
|
$contact = civicrm_api3('Contact', 'create', $params);
|
||
|
|
||
|
// only pass transaction params to contribution::create, if available
|
||
|
if (array_key_exists('transaction', $params)) {
|
||
|
$params = $params['transaction'];
|
||
|
$params['contact_id'] = $contact['id'];
|
||
|
}
|
||
|
|
||
|
$params['custom'] = CRM_Core_BAO_CustomField::postProcess($params,
|
||
|
CRM_Utils_Array::value('id', $params, NULL),
|
||
|
'Contribution'
|
||
|
);
|
||
|
// create contribution
|
||
|
|
||
|
// if this is a recurring contribution then process it first
|
||
|
if ($params['trxn_type'] == 'subscrpayment') {
|
||
|
// see if a recurring record already exists
|
||
|
$recurring = new CRM_Contribute_BAO_ContributionRecur();
|
||
|
$recurring->processor_id = $params['processor_id'];
|
||
|
if (!$recurring->find(TRUE)) {
|
||
|
$recurring = new CRM_Contribute_BAO_ContributionRecur();
|
||
|
$recurring->invoice_id = $params['invoice_id'];
|
||
|
$recurring->find(TRUE);
|
||
|
}
|
||
|
|
||
|
// This is the same thing the CiviCRM IPN handler does to handle
|
||
|
// subsequent recurring payments to avoid duplicate contribution
|
||
|
// errors due to invoice ID. See:
|
||
|
// ./CRM/Core/Payment/PayPalIPN.php:200
|
||
|
if ($recurring->id) {
|
||
|
$params['invoice_id'] = md5(uniqid(rand(), TRUE));
|
||
|
}
|
||
|
|
||
|
$recurring->copyValues($params);
|
||
|
$recurring->save();
|
||
|
if (is_a($recurring, 'CRM_Core_Error')) {
|
||
|
return FALSE;
|
||
|
}
|
||
|
else {
|
||
|
$params['contribution_recur_id'] = $recurring->id;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
$contribution = CRM_Contribute_BAO_Contribution::create($params);
|
||
|
if (!$contribution->id) {
|
||
|
return FALSE;
|
||
|
}
|
||
|
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
}
|
||
|
|
||
|
// bootstrap the environment and run the processor
|
||
|
session_start();
|
||
|
require_once '../civicrm.config.php';
|
||
|
require_once 'CRM/Core/Config.php';
|
||
|
$config = CRM_Core_Config::singleton();
|
||
|
|
||
|
CRM_Utils_System::authenticateScript(TRUE);
|
||
|
|
||
|
//log the execution of script
|
||
|
CRM_Core_Error::debug_log_message('ContributionProcessor.php');
|
||
|
|
||
|
$lock = Civi::lockManager()->acquire('worker.contribute.CiviContributeProcessor');
|
||
|
|
||
|
if ($lock->isAcquired()) {
|
||
|
// try to unset any time limits
|
||
|
if (!ini_get('safe_mode')) {
|
||
|
set_time_limit(0);
|
||
|
}
|
||
|
|
||
|
CiviContributeProcessor::process();
|
||
|
}
|
||
|
else {
|
||
|
throw new Exception('Could not acquire lock, another CiviContributeProcessor process is running');
|
||
|
}
|
||
|
|
||
|
$lock->release();
|
||
|
|
||
|
echo "Done processing<p>";
|