CRM/Core/Payment/BaseIPN.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | Copyright CiviCRM LLC. All rights reserved.                        |
   5  |                                                                    |
   6  | This work is published under the GNU AGPLv3 license with some      |
   7  | permitted exceptions and without any warranty. For full license    |
   8  | and copyright information, see https://civicrm.org/licensing       |
   9  +--------------------------------------------------------------------+
  10  */
  11
  12 /**
  13  * Class CRM_Core_Payment_BaseIPN.
  14  */
  15 class CRM_Core_Payment_BaseIPN {
  16
  17   public static $_now = NULL;
  18
  19   /**
  20    * Input parameters from payment processor. Store these so that
  21    * the code does not need to keep retrieving from the http request
  22    * @var array
  23    */
  24   protected $_inputParameters = [];
  25
  26   /**
  27    * Only used by AuthorizeNetIPN.
  28    * @var bool
  29    *
  30    * @deprecated
  31    *
  32    */
  33   protected $_isRecurring = FALSE;
  34
  35   /**
  36    * Only used by AuthorizeNetIPN.
  37    * @var bool
  38    *
  39    * @deprecated
  40    *
  41    */
  42   protected $_isFirstOrLastRecurringPayment = FALSE;
  43
  44   /**
  45    * Constructor.
  46    */
  47   public function __construct() {
  48     self::$_now = date('YmdHis');
  49   }
  50
  51   /**
  52    * Store input array on the class.
  53    *
  54    * @param array $parameters
  55    *
  56    * @throws CRM_Core_Exception
  57    */
  58   public function setInputParameters($parameters) {
  59     if (!is_array($parameters)) {
  60       throw new CRM_Core_Exception('Invalid input parameters');
  61     }
  62     $this->_inputParameters = $parameters;
  63   }
  64
  65   /**
  66    * Validate incoming data.
  67    *
  68    * This function is intended to ensure that incoming data matches
  69    * It provides a form of pseudo-authentication - by checking the calling fn already knows
  70    * the correct contact id & contribution id (this can be problematic when that has changed in
  71    * the meantime for transactions that are delayed & contacts are merged in-between. e.g
  72    * Paypal allows you to resend Instant Payment Notifications if you, for example, moved site
  73    * and didn't update your IPN URL.
  74    *
  75    * @param array $input
  76    *   Interpreted values from the values returned through the IPN.
  77    * @param array $ids
  78    *   More interpreted values (ids) from the values returned through the IPN.
  79    * @param array $objects
  80    *   An empty array that will be populated with loaded object.
  81    * @param bool $required
  82    *   Boolean Return FALSE if the relevant objects don't exist.
  83    * @param int $paymentProcessorID
  84    *   Id of the payment processor ID in use.
  85    *
  86    * @return bool
  87    */
  88   public function validateData($input, &$ids, &$objects, $required = TRUE, $paymentProcessorID = NULL) {
  89
  90     // Check if the contribution exists
  91     // make sure contribution exists and is valid
  92     $contribution = new CRM_Contribute_BAO_Contribution();
  93     $contribution->id = $ids['contribution'];
  94     if (!$contribution->find(TRUE)) {
  95       CRM_Core_Error::debug_log_message("Could not find contribution record: {$contribution->id} in IPN request: " . print_r($input, TRUE));
  96       echo "Failure: Could not find contribution record for {$contribution->id}<p>";
  97       return FALSE;
  98     }
  99
 100     // make sure contact exists and is valid
 101     // use the contact id from the contribution record as the id in the IPN may not be valid anymore.
 102     $contact = new CRM_Contact_BAO_Contact();
 103     $contact->id = $contribution->contact_id;
 104     $contact->find(TRUE);
 105     if ($contact->id != $ids['contact']) {
 106       // If the ids do not match then it is possible the contact id in the IPN has been merged into another contact which is why we use the contact_id from the contribution
 107       CRM_Core_Error::debug_log_message("Contact ID in IPN {$ids['contact']} not found but contact_id found in contribution {$contribution->contact_id} used instead");
 108       echo "WARNING: Could not find contact record: {$ids['contact']}<p>";
 109       $ids['contact'] = $contribution->contact_id;
 110     }
 111
 112     if (!empty($ids['contributionRecur'])) {
 113       $contributionRecur = new CRM_Contribute_BAO_ContributionRecur();
 114       $contributionRecur->id = $ids['contributionRecur'];
 115       if (!$contributionRecur->find(TRUE)) {
 116         CRM_Core_Error::debug_log_message("Could not find contribution recur record: {$ids['ContributionRecur']} in IPN request: " . print_r($input, TRUE));
 117         echo "Failure: Could not find contribution recur record: {$ids['ContributionRecur']}<p>";
 118         return FALSE;
 119       }
 120     }
 121
 122     $contribution->receive_date = CRM_Utils_Date::isoToMysql($contribution->receive_date);
 123     $contribution->receipt_date = CRM_Utils_Date::isoToMysql($contribution->receipt_date);
 124
 125     $objects['contact'] = &$contact;
 126     $objects['contribution'] = &$contribution;
 127
 128     // CRM-19478: handle oddity when p=null is set in place of contribution page ID,
 129     if (!empty($ids['contributionPage']) && !is_numeric($ids['contributionPage'])) {
 130       // We don't need to worry if about removing contribution page id as it will be set later in
 131       //  CRM_Contribute_BAO_Contribution::loadRelatedObjects(..) using $objects['contribution']->contribution_page_id
 132       unset($ids['contributionPage']);
 133     }
 134
 135     if (!$this->loadObjects($input, $ids, $objects, $required, $paymentProcessorID)) {
 136       return FALSE;
 137     }
 138     //the process is that the loadObjects is kind of hacked by loading the objects for the original contribution and then somewhat inconsistently using them for the
 139     //current contribution. Here we ensure that the original contribution is available to the complete transaction function
 140     //we don't want to fix this in the payment processor classes because we would have to fix all of them - so better to fix somewhere central
 141     if (isset($objects['contributionRecur'])) {
 142       $objects['first_contribution'] = $objects['contribution'];
 143     }
 144     return TRUE;
 145   }
 146
 147   /**
 148    * Load objects related to contribution.
 149    *
 150    * @input array information from Payment processor
 151    *
 152    * @param array $input
 153    * @param array $ids
 154    * @param array $objects
 155    * @param bool $required
 156    * @param int $paymentProcessorID
 157    * @param array $error_handling
 158    *
 159    * @return bool|array
 160    */
 161   public function loadObjects($input, &$ids, &$objects, $required, $paymentProcessorID, $error_handling = NULL) {
 162     if (empty($error_handling)) {
 163       // default options are that we log an error & echo it out
 164       // note that we should refactor this error handling into error code @ some point
 165       // but for now setting up enough separation so we can do unit tests
 166       $error_handling = [
 167         'log_error' => 1,
 168         'echo_error' => 1,
 169       ];
 170     }
 171     $ids['paymentProcessor'] = $paymentProcessorID;
 172     if (is_a($objects['contribution'], 'CRM_Contribute_BAO_Contribution')) {
 173       $contribution = &$objects['contribution'];
 174     }
 175     else {
 176       //legacy support - functions are 'used' to be able to pass in a DAO
 177       $contribution = new CRM_Contribute_BAO_Contribution();
 178       $contribution->id = $ids['contribution'] ?? NULL;
 179       $contribution->find(TRUE);
 180       $objects['contribution'] = &$contribution;
 181     }
 182     try {
 183       $success = $contribution->loadRelatedObjects($input, $ids);
 184       if ($required && empty($contribution->_relatedObjects['paymentProcessor'])) {
 185         throw new CRM_Core_Exception("Could not find payment processor for contribution record: " . $contribution->id);
 186       }
 187     }
 188     catch (Exception $e) {
 189       $success = FALSE;
 190       if (!empty($error_handling['log_error'])) {
 191         CRM_Core_Error::debug_log_message($e->getMessage());
 192       }
 193       if (!empty($error_handling['echo_error'])) {
 194         echo $e->getMessage();
 195       }
 196       if (!empty($error_handling['return_error'])) {
 197         return [
 198           'is_error' => 1,
 199           'error_message' => ($e->getMessage()),
 200         ];
 201       }
 202     }
 203     $objects = array_merge($objects, $contribution->_relatedObjects);
 204     return $success;
 205   }
 206
 207   /**
 208    * Set contribution to failed.
 209    *
 210    * @param array $objects
 211    * @param object $transaction
 212    * @param array $input
 213    *
 214    * @return bool
 215    * @throws \CiviCRM_API3_Exception
 216    */
 217   public function failed(&$objects, $transaction = NULL, $input = []) {
 218     $contribution = &$objects['contribution'];
 219     $memberships = [];
 220     if (!empty($objects['membership'])) {
 221       $memberships = &$objects['membership'];
 222       if (is_numeric($memberships)) {
 223         $memberships = [$objects['membership']];
 224       }
 225     }
 226
 227     $addLineItems = FALSE;
 228     if (empty($contribution->id)) {
 229       $addLineItems = TRUE;
 230     }
 231     $participant = &$objects['participant'];
 232
 233     // CRM-15546
 234     $contributionStatuses = CRM_Core_PseudoConstant::get('CRM_Contribute_DAO_Contribution', 'contribution_status_id', [
 235       'labelColumn' => 'name',
 236       'flip' => 1,
 237     ]);
 238     $contribution->contribution_status_id = $contributionStatuses['Failed'];
 239     $contribution->receive_date = CRM_Utils_Date::isoToMysql($contribution->receive_date);
 240     $contribution->receipt_date = CRM_Utils_Date::isoToMysql($contribution->receipt_date);
 241     $contribution->thankyou_date = CRM_Utils_Date::isoToMysql($contribution->thankyou_date);
 242     $contribution->save();
 243
 244     // Add line items for recurring payments.
 245     if (!empty($objects['contributionRecur']) && $objects['contributionRecur']->id && $addLineItems) {
 246       CRM_Contribute_BAO_ContributionRecur::addRecurLineItems($objects['contributionRecur']->id, $contribution);
 247     }
 248
 249     //add new soft credit against current contribution id and
 250     //copy initial contribution custom fields for recurring contributions
 251     if (!empty($objects['contributionRecur']) && $objects['contributionRecur']->id) {
 252       CRM_Contribute_BAO_ContributionRecur::addrecurSoftCredit($objects['contributionRecur']->id, $contribution->id);
 253       CRM_Contribute_BAO_ContributionRecur::copyCustomValues($objects['contributionRecur']->id, $contribution->id);
 254     }
 255
 256     if (empty($input['IAmAHorribleNastyBeyondExcusableHackInTheCRMEventFORMTaskClassThatNeedsToBERemoved'])) {
 257       if (!empty($memberships)) {
 258         foreach ($memberships as $membership) {
 259           // @fixme Should we cancel only Pending memberships? per cancelled()
 260           $this->cancelMembership($membership, $membership->status_id, FALSE);
 261         }
 262       }
 263
 264       if ($participant) {
 265         $this->cancelParticipant($participant->id);
 266       }
 267     }
 268
 269     if ($transaction) {
 270       $transaction->commit();
 271     }
 272     Civi::log()->debug("Setting contribution status to Failed");
 273     return TRUE;
 274   }
 275
 276   /**
 277    * Handled pending contribution status.
 278    *
 279    * @deprecated
 280    *
 281    * @param array $objects
 282    * @param object $transaction
 283    *
 284    * @return bool
 285    */
 286   public function pending(&$objects, &$transaction) {
 287     CRM_Core_Error::deprecatedFunctionWarning('This function will be removed at some point');
 288     $transaction->commit();
 289     Civi::log()->debug('Returning since contribution status is Pending');
 290     echo 'Success: Returning since contribution status is pending<p>';
 291     return TRUE;
 292   }
 293
 294   /**
 295    * Process cancelled payment outcome.
 296    *
 297    * @param array $objects
 298    * @param CRM_Core_Transaction $transaction
 299    * @param array $input
 300    *
 301    * @return bool
 302    * @throws \CiviCRM_API3_Exception
 303    */
 304   public function cancelled(&$objects, $transaction = NULL, $input = []) {
 305     $contribution = &$objects['contribution'];
 306     $memberships = [];
 307     if (!empty($objects['membership'])) {
 308       $memberships = &$objects['membership'];
 309       if (is_numeric($memberships)) {
 310         $memberships = [$objects['membership']];
 311       }
 312     }
 313
 314     $addLineItems = FALSE;
 315     if (empty($contribution->id)) {
 316       $addLineItems = TRUE;
 317     }
 318     $participant = &$objects['participant'];
 319
 320     // CRM-15546
 321     $contributionStatuses = CRM_Core_PseudoConstant::get('CRM_Contribute_DAO_Contribution', 'contribution_status_id', [
 322       'labelColumn' => 'name',
 323       'flip' => 1,
 324     ]);
 325     $contribution->contribution_status_id = $contributionStatuses['Cancelled'];
 326     $contribution->receive_date = CRM_Utils_Date::isoToMysql($contribution->receive_date);
 327     $contribution->receipt_date = CRM_Utils_Date::isoToMysql($contribution->receipt_date);
 328     $contribution->thankyou_date = CRM_Utils_Date::isoToMysql($contribution->thankyou_date);
 329     $contribution->cancel_date = self::$_now;
 330     $contribution->cancel_reason = $input['reasonCode'] ?? NULL;
 331     $contribution->save();
 332
 333     // Add line items for recurring payments.
 334     if (!empty($objects['contributionRecur']) && $objects['contributionRecur']->id && $addLineItems) {
 335       CRM_Contribute_BAO_ContributionRecur::addRecurLineItems($objects['contributionRecur']->id, $contribution);
 336     }
 337
 338     //add new soft credit against current $contribution and
 339     //copy initial contribution custom fields for recurring contributions
 340     if (!empty($objects['contributionRecur']) && $objects['contributionRecur']->id) {
 341       CRM_Contribute_BAO_ContributionRecur::addrecurSoftCredit($objects['contributionRecur']->id, $contribution->id);
 342       CRM_Contribute_BAO_ContributionRecur::copyCustomValues($objects['contributionRecur']->id, $contribution->id);
 343     }
 344
 345     if (empty($input['IAmAHorribleNastyBeyondExcusableHackInTheCRMEventFORMTaskClassThatNeedsToBERemoved'])) {
 346       if (!empty($memberships)) {
 347         foreach ($memberships as $membership) {
 348           if ($membership) {
 349             $this->cancelMembership($membership, $membership->status_id);
 350           }
 351         }
 352       }
 353
 354       if ($participant) {
 355         $this->cancelParticipant($participant->id);
 356       }
 357     }
 358     if ($transaction) {
 359       $transaction->commit();
 360     }
 361     Civi::log()->debug("Setting contribution status to Cancelled");
 362     return TRUE;
 363   }
 364
 365   /**
 366    * Rollback unhandled outcomes.
 367    *
 368    * @deprecated
 369    *
 370    * @param array $objects
 371    * @param CRM_Core_Transaction $transaction
 372    *
 373    * @return bool
 374    */
 375   public function unhandled(&$objects, &$transaction) {
 376     CRM_Core_Error::deprecatedFunctionWarning('This function will be removed at some point');
 377     $transaction->rollback();
 378     Civi::log()->debug('Returning since contribution status is not handled');
 379     echo 'Failure: contribution status is not handled<p>';
 380     return FALSE;
 381   }
 382
 383   /**
 384    * Logic to cancel a participant record when the related contribution changes to failed/cancelled.
 385    * @todo This is part of a bigger refactor for dev/core/issues/927 - "duplicate" functionality exists in CRM_Contribute_BAO_Contribution::cancel()
 386    *
 387    * @param $participantID
 388    *
 389    * @throws \CiviCRM_API3_Exception
 390    */
 391   private function cancelParticipant($participantID) {
 392     // @fixme https://lab.civicrm.org/dev/core/issues/927 Cancelling membership etc is not desirable for all use-cases and we should be able to disable it
 393     $participantParams['id'] = $participantID;
 394     $participantParams['status_id'] = 'Cancelled';
 395     civicrm_api3('Participant', 'create', $participantParams);
 396   }
 397
 398   /**
 399    * Logic to cancel a membership record when the related contribution changes to failed/cancelled.
 400    * @todo This is part of a bigger refactor for dev/core/issues/927 - "duplicate" functionality exists in CRM_Contribute_BAO_Contribution::cancel()
 401    * @param \CRM_Member_BAO_Membership $membership
 402    * @param int $membershipStatusID
 403    * @param boolean $onlyCancelPendingMembership
 404    *   Do we only cancel pending memberships? OR memberships in any status? (see CRM-18688)
 405    * @fixme Historically failed() cancelled membership in any status, cancelled() cancelled only pending memberships so we retain that behaviour for now.
 406    *
 407    */
 408   private function cancelMembership($membership, $membershipStatusID, $onlyCancelPendingMembership = TRUE) {
 409     // @fixme https://lab.civicrm.org/dev/core/issues/927 Cancelling membership etc is not desirable for all use-cases and we should be able to disable it
 410     // Cancel only Pending memberships
 411     $pendingMembershipStatusId = CRM_Core_PseudoConstant::getKey('CRM_Member_BAO_Membership', 'status_id', 'Pending');
 412     if (($membershipStatusID == $pendingMembershipStatusId) || ($onlyCancelPendingMembership == FALSE)) {
 413       $cancelledMembershipStatusId = CRM_Core_PseudoConstant::getKey('CRM_Member_BAO_Membership', 'status_id', 'Cancelled');
 414
 415       $membership->status_id = $cancelledMembershipStatusId;
 416       $membership->save();
 417
 418       $params = ['status_id' => $cancelledMembershipStatusId];
 419       CRM_Member_BAO_Membership::updateRelatedMemberships($membership->id, $params);
 420
 421       // @todo Convert the above to API
 422       // $membershipParams = [
 423       //   'id' => $membership->id,
 424       //   'status_id' => $cancelledMembershipStatusId,
 425       // ];
 426       // civicrm_api3('Membership', 'create', $membershipParams);
 427       // CRM_Member_BAO_Membership::updateRelatedMemberships($membershipParams['id'], ['status_id' => $cancelledMembershipStatusId]);
 428     }
 429
 430   }
 431
 432   /**
 433    * @deprecated
 434    *
 435    * Jumbled up function.
 436    *
 437    * The purpose of this function is to transition a pending transaction to Completed including updating any
 438    * related entities.
 439    *
 440    * It has been overloaded to also add recurring transactions to the database, cloning the original transaction and
 441    * updating related entities.
 442    *
 443    * It is recommended to avoid calling this function directly and call the api functions:
 444    *  - contribution.completetransaction
 445    *  - contribution.repeattransaction
 446    *
 447    * These functions are the focus of testing efforts and more accurately reflect the division of roles
 448    * (the job of the IPN class is to determine the outcome, transaction id, invoice id & to validate the source
 449    * and from there it should be possible to pass off transaction management.)
 450    *
 451    * This function has been problematic for some time but there are now several tests via the api_v3_Contribution test
 452    * and the Paypal & Authorize.net IPN tests so any refactoring should be done in conjunction with those.
 453    *
 454    * This function needs to have the 'body' moved to the CRM_Contribute_BAO_Contribute class and to undergo
 455    * refactoring to separate the complete transaction and repeat transaction functionality into separate functions with
 456    * a shared function that updates related components.
 457    *
 458    * Note that it is not necessary payment processor extension to implement an IPN class now. In general the code on the
 459    * IPN class is better accessed through the api which de-jumbles it a bit.
 460    *
 461    * e.g the payment class can have a function like (based on Omnipay extension):
 462    *
 463    *   public function handlePaymentNotification() {
 464    *     $response = $this->getValidatedOutcome();
 465    *     if ($response->isSuccessful()) {
 466    *      try {
 467    *        // @todo check if it is a repeat transaction & call repeattransaction instead.
 468    *        civicrm_api3('contribution', 'completetransaction', array('id' => $this->transaction_id));
 469    *      }
 470    *     catch (CiviCRM_API3_Exception $e) {
 471    *     if (!stristr($e->getMessage(), 'Contribution already completed')) {
 472    *       $this->handleError('error', $this->transaction_id  . $e->getMessage(), 'ipn_completion', 9000, 'An error may
 473    *         have occurred. Please check your receipt is correct');
 474    *       $this->redirectOrExit('success');
 475    *     }
 476    *     elseif ($this->transaction_id) {
 477    *        civicrm_api3('contribution', 'create', array('id' => $this->transaction_id, 'contribution_status_id' =>
 478    *        'Failed'));
 479    *     }
 480    *
 481    * @param array $input
 482    * @param array $ids
 483    * @param array $objects
 484    * @param CRM_Core_Transaction $transaction
 485    *
 486    * @throws \CRM_Core_Exception
 487    * @throws \CiviCRM_API3_Exception
 488    */
 489   public function completeTransaction(&$input, &$ids, &$objects, $transaction = NULL) {
 490     CRM_Contribute_BAO_Contribution::completeOrder($input, $ids, $objects, $transaction);
 491   }
 492
 493   /**
 494    * @deprecated
 495    * Get site billing ID.
 496    *
 497    * @param array $ids
 498    *
 499    * @return bool
 500    */
 501   public function getBillingID(&$ids) {
 502     CRM_Core_Error::deprecatedFunctionWarning('CRM_Core_BAO_LocationType::getBilling()');
 503     $ids['billing'] = CRM_Core_BAO_LocationType::getBilling();
 504     if (!$ids['billing']) {
 505       CRM_Core_Error::debug_log_message(ts('Please set a location type of %1', [1 => 'Billing']));
 506       echo "Failure: Could not find billing location type<p>";
 507       return FALSE;
 508     }
 509     return TRUE;
 510   }
 511
 512   /**
 513    * @deprecated
 514    *
 515    * @todo confirm this function is not being used by any payment processor outside core & remove.
 516    *
 517    * Note that the compose message part has been moved to contribution
 518    * In general LoadObjects is called first to get the objects but the composeMessageArray function now calls it
 519    *
 520    * @param array $input
 521    *   Incoming data from Payment processor.
 522    * @param array $ids
 523    *   Related object IDs.
 524    * @param array $objects
 525    *
 526    * @throws \CiviCRM_API3_Exception
 527    */
 528   public function sendMail($input, $ids, $objects) {
 529     CRM_Core_Error::deprecatedFunctionWarning('this should be done via completetransaction api');
 530     civicrm_api3('Contribution', 'sendconfirmation', [
 531       'id' => $objects['contribution']->id,
 532     ]);
 533   }
 534
 535 }