callback.php

<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle 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 General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

/**
 * Listens payment result callback from WeePay
 *
 * @package    enrol_weepaypayment
 * @copyright  2019 Dualcube Team
 * @copyright  2021 WebTech Bilişim
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */
global $CFG, $USER;
// Disable moodle specific debug messages and any errors in output,
// comment out when debugging or better look into error log!
define('NO_DEBUG_DISPLAY', true);

require("../../config.php");
require_once("lib.php");
require_once($CFG->libdir . '/enrollib.php');
require_once($CFG->libdir . '/filelib.php');


/**
 * Send payment error message to the admin.
 *
 * @param string $subject
 * @param stdClass $data
 */
function message_weepaypayment_error_to_admin($subject, $data)
{
    die($subject);
    $admin = get_admin();
    $site = get_site();

    $message = "$site->fullname:  Transaction failed.\n\n$subject\n\n";

    foreach ($data as $key => $value) {
        $message .= s($key) . " => " . s($value) . "\n";
    }

    $subject = "weepay PAYMENT ERROR: " . $subject;
    $fullmessage = $message;
    $fullmessagehtml = html_to_text('<p>' . $message . '</p>');

    // Send test email.
    ob_start();
    $success = email_to_user($admin, $admin, $subject, $fullmessage, $fullmessagehtml);
    $smtplog = ob_get_contents();
    ob_end_clean();
}

$data = [];

//  weepay START
$plugin = enrol_get_plugin('weepaypayment');

require_once "weepay/weepayBootstrap.php";

weepayBootstrap::initialize();
$options = new \weepay\Auth();
$options->setBayiID($plugin->get_config('merchantid'));
$options->setApiKey($plugin->get_config('publishablekey'));
$options->setSecretKey($plugin->get_config('secretkey'));
if ($plugin->get_config('sandboxmode')) {
  $options->setBaseUrl("https://api.weepay.co/");
} else {
  $options->setBaseUrl("https://api.weepay.co/");
}

//Request
$request = new \weepay\Request\GetPaymentRequest();
$request->setOrderId($_GET['oid']);
// Payment Language Selector
if($USER->lang=='en')
{
	$request->setLocale(\weepay\Model\Locale::EN);
}
else if ($USER->lang=='tr')
{
	$request->setLocale(\weepay\Model\Locale::TR);
}
else // Otherwise English
{
	$request->setLocale(\weepay\Model\Locale::EN);
}

$getPaymentRequest = \weepay\Model\GetPaymentRequestInitialize::create($request, $options);

$PaymentInfo = json_decode($getPaymentRequest->getRawResult());

if ($getPaymentRequest->getStatus() == 'success') {
	
	$OrderID = $_GET['oid'];
    $Payment = explode("-", $OrderID);
    $userId = $Payment[1];
    $courseId = $Payment[2];
    $instanceId = $Payment[3];	
	
	// If Payment Success
    if($getPaymentRequest->getPaymentStatus() == 'SUCCESS'){
        
		// User Validation
		if (!$user = $DB->get_record("user", array("id" => $userId))) {
			message_weepaypayment_error_to_admin("Not a valid user id", $data);
			redirect($CFG->wwwroot);
		}
		// Course - Payment Validation
		if (!$course = $DB->get_record("course", array("id" => $courseId))) {
			message_weepaypayment_error_to_admin("Not a valid course id", $data);
			redirect($CFG->wwwroot);
		}
		// Context Validation
		if (!$context = context_course::instance(
			$course->id,
			IGNORE_MISSING
		)) {
			message_weepaypayment_error_to_admin("Not a valid context id", $data);
			redirect($CFG->wwwroot);
		}

		$PAGE->set_context($context);

		if (!$plugininstance = $DB->get_record("enrol", array("id" => $instanceId, "status" => 0))) {
			message_weepaypayment_error_to_admin("Not a valid instance id", $data);
			redirect($CFG->wwwroot);
		}

		if ($courseId != $plugininstance->courseid) {
			message_weepaypayment_error_to_admin("Course Id does not match to the course settings, received: " . $data->courseid, $data);
			redirect($CFG->wwwroot);
		}

			// ALL CLEAR !

			$paymentData = new stdClass;
			$paymentData->payment_id = $PaymentInfo->data->orderId;
			$paymentData->course_id = $courseId;
			$paymentData->user_id = $userId;
			$paymentData->instance_id = $instanceId;
			$paymentData->price = $PaymentInfo->data->price;
			$paymentData->paid_price = $PaymentInfo->data->price;
			$paymentData->currency = $PaymentInfo->data->currency;
			$paymentData->payment_status = $PaymentInfo->data->paymentStatus;
			$paymentData->pending_reason = "";
			$paymentData->reason_code = "";
			$paymentData->time_updated = time();

			$DB->insert_record("enrol_weepaypayment", $paymentData);
			
			// Enrol Period Config
			if ($plugininstance->enrolperiod) {
				$timestart = time();
				$timeend   = $timestart + $plugininstance->enrolperiod;
			} else {
				$timestart = 0;
				$timeend   = 0;
			}

			// Enrol user.
			$plugin->enrol_user($plugininstance, $user->id, $plugininstance->roleid, $timestart, $timeend);

			// Pass $view=true to filter hidden caps if the user cannot see them.
			if ($users = get_users_by_capability(
				$context,
				'moodle/course:update',
				'u.*',
				'u.id ASC',
				'',
				'',
				'',
				'',
				false,
				true
			)) {
				$users = sort_by_roleassignment_authority($users, $context);
				$teacher = array_shift($users);
			} else {
				$teacher = false;
			}

			$mailstudents = $plugin->get_config('mailstudents');
			$mailteachers = $plugin->get_config('mailteachers');
			$mailadmins   = $plugin->get_config('mailadmins');
			$shortname = format_string($course->shortname, true, array('context' => $context));

			$coursecontext = context_course::instance($course->id);

			if (!empty($mailstudents)) {
				$a = new stdClass();
				$a->coursename = format_string($course->fullname, true, array('context' => $coursecontext));
				$a->profileurl = "$CFG->wwwroot/user/view.php?id=$user->id";

				$userfrom = empty($teacher) ? core_user::get_support_user() : $teacher;
				$subject = get_string("enrolmentnew", 'enrol', $shortname);
				$fullmessage = get_string('welcometocoursetext', '', $a);
				$fullmessagehtml = html_to_text('<p>' . get_string('welcometocoursetext', '', $a) . '</p>');

				// Send test email.
				ob_start();
				$success = email_to_user($user, $userfrom, $subject, $fullmessage, $fullmessagehtml);
				$smtplog = ob_get_contents();
				ob_end_clean();
			}

			if (!empty($mailteachers) && !empty($teacher)) {
				$a->course = format_string($course->fullname, true, array('context' => $coursecontext));
				$a->user = fullname($user);

				$subject = get_string("enrolmentnew", 'enrol', $shortname);
				$fullmessage = get_string('enrolmentnewuser', 'enrol', $a);
				$fullmessagehtml = html_to_text('<p>' . get_string('enrolmentnewuser', 'enrol', $a) . '</p>');

				// Send test email.
				ob_start();
				$success = email_to_user($teacher, $user, $subject, $fullmessage, $fullmessagehtml);
				$smtplog = ob_get_contents();
				ob_end_clean();
			}

			if (!empty($mailadmins)) {
				$a->course = format_string($course->fullname, true, array('context' => $coursecontext));
				$a->user = fullname($user);
				$admins = get_admins();
				foreach ($admins as $admin) {
					$subject = get_string("enrolmentnew", 'enrol', $shortname);
					$fullmessage = get_string('enrolmentnewuser', 'enrol', $a);
					$fullmessagehtml = html_to_text('<p>' . get_string('enrolmentnewuser', 'enrol', $a) . '</p>');

					// Send test email.
					ob_start();
					$success = email_to_user($admin, $user, $subject, $fullmessage, $fullmessagehtml);
					$smtplog = ob_get_contents();
					ob_end_clean();
				}
			}

			$destination = "$CFG->wwwroot/course/view.php?id=$course->id";

			$fullname = format_string($course->fullname, true, array('context' => $context));

			if (is_enrolled($context, null, '', true)) { // TODO: use real weepay check.
				redirect($destination, get_string('paymentthanks', '', $fullname));
			} else {   // Somehow they aren't enrolled yet!
				$PAGE->set_url($destination);
				echo $OUTPUT->header();
				$a = new stdClass();
				$a->teacher = get_string('defaultcourseteacher');
				$a->fullname = $fullname;
				notice(get_string('paymentsorry', '', $a), $destination);
			}
		
		}
		else {
			echo "<p>" . print_r($getPaymentRequest->getErrorCode()) . ":" . $getPaymentRequest->getMessage() . "</p>"; 
			redirect($CFG->wwwroot);
		}
  
} else {
	echo "<p>" . print_r($getPaymentRequest->getErrorCode()) . ":" . $getPaymentRequest->getMessage() . "</p>"; 
	redirect($CFG->wwwroot);
}