'.get_string('paymentrequired').'
'; - echo ''.get_string('cost').": $curcost[currency] $curcost[cost]".'
'; - echo ''; - echo ''. get_string('paymentthanks', 'moodle', $course->fullname) .'
'; - echo $OUTPUT->container_start('buttons'); - echo $OUTPUT->single_button(new moodle_url("$CFG->wwwroot/enrol/authorize/index.php", array('order'=>$order->id)), get_string('payments')); - echo $OUTPUT->single_button(new moodle_url("$CFG->wwwroot/course/view.php", array('id'=>$course->id)), $course->fullname); - echo $OUTPUT->container_end(); - echo $OUTPUT->box_end(); - echo $OUTPUT->footer(); - exit; // break; - } - } - return NULL; - } - else - { - message_to_admin($message, $order); - return $message; - } - } - - - /** - * The user submitted echeck form. - * - * @param object $form Form parameters - * @param object $course Course info - * @return string NULL if ok, error message otherwise. - * @access private - */ - private function echeck_submit($form, $course) - { - global $CFG, $USER, $SESSION, $DB; - - prevent_double_paid($course); - - $useripno = getremoteaddr(); - $curcost = get_course_cost($course); - $isbusinesschecking = ($form->acctype == 'BUSINESSCHECKING'); - - // NEW ECHECK ORDER - $timenow = time(); - $order = new stdClass(); - $order->paymentmethod = AN_METHOD_ECHECK; - $order->refundinfo = $isbusinesschecking ? 1 : 0; - $order->ccname = $form->firstname . ' ' . $form->lastname; - $order->courseid = $course->id; - $order->userid = $USER->id; - $order->status = AN_STATUS_NONE; // it will be changed... - $order->settletime = 0; // cron changes this. - $order->transid = 0; // Transaction Id - $order->timecreated = $timenow; - $order->amount = $curcost['cost']; - $order->currency = $curcost['currency']; - $order->id = $DB->insert_record("enrol_authorize", $order); - if (!$order->id) { - message_to_admin("Error while trying to insert new data", $order); - return "Insert record error. Admin has been notified!"; - } - - $extra = new stdClass(); - $extra->x_bank_aba_code = $form->abacode; - $extra->x_bank_acct_num = $form->accnum; - $extra->x_bank_acct_type = $form->acctype; - $extra->x_echeck_type = $isbusinesschecking ? 'CCD' : 'WEB'; - $extra->x_bank_name = $form->bankname; - $extra->x_currency_code = $curcost['currency']; - $extra->x_amount = $curcost['cost']; - $extra->x_first_name = $form->firstname; - $extra->x_last_name = $form->lastname; - $extra->x_country = $USER->country; - $extra->x_address = $USER->address; - $extra->x_city = $USER->city; - $extra->x_state = ''; - $extra->x_zip = ''; - - $extra->x_invoice_num = $order->id; - $extra->x_description = $course->shortname; - - $extra->x_cust_id = $USER->id; - $extra->x_email = $USER->email; - $extra->x_customer_ip = $useripno; - $extra->x_email_customer = empty($CFG->enrol_mailstudents) ? 'FALSE' : 'TRUE'; - $extra->x_phone = ''; - $extra->x_fax = ''; - - $message = ''; - if (AN_REVIEW == AuthorizeNet::process($order, $message, $extra, AN_ACTION_AUTH_CAPTURE)) { - $SESSION->ccpaid = 1; // security check: don't duplicate payment - redirect($CFG->wwwroot, get_string("reviewnotify", "enrol_authorize"), '30'); - return NULL; - } - else { - message_to_admin($message, $order); - return $message; - } - } - - - /** - * Gets access icons. - * - * @param object $course - * @return string - * @access public - */ - public function get_access_icons($course) - { - $manual = enrolment_factory::factory('manual'); - $str = $manual->get_access_icons($course); - $curcost = get_course_cost($course); - - if (abs($curcost['cost']) > 0.00) { - $strrequirespayment = get_string("requirespayment"); - $strcost = get_string("cost"); - $currency = $curcost['currency']; - - switch ($currency) { - case 'USD': $currency = 'US$'; break; - case 'CAD': $currency = 'C$'; break; - case 'EUR': $currency = '€'; break; - case 'GBP': $currency = '£'; break; - case 'JPY': $currency = '¥'; break; - } - - $str .= ''.get_string('nocost', 'enrol_authorize').'
'; + + return $OUTPUT->box(ob_get_clean()); + } + + prevent_double_paid($instance); + + // Check https availability + if (empty($CFG->loginhttps) and substr($CFG->wwwroot, 0, 5) !== 'https') { + ob_start(); + echo ''.get_string('httpsrequired', 'enrol_authorize').'
'; + return $OUTPUT->box(ob_get_clean()); + } elseif (isset($_SERVER['SERVER_PORT']) && $_SERVER['SERVER_PORT'] != 443) { // MDL-9836 + if (empty($CFG->loginhttps)) { + ob_start(); + echo ''.get_string('httpsrequired', 'enrol_authorize').'
'; + + return $OUTPUT->box(ob_get_clean()); + } else { + $wwwsroot = str_replace('http:','https:', $CFG->wwwroot); + redirect("{$wwwsroot}/enrol/index.php?id=$instance->courseid"); + exit; + } + } + + $course = $DB->get_record('course', array('id'=>$instance->courseid)); + + $strcourses = get_string('courses'); + $strloginto = get_string('loginto', '', $course->shortname); + + if ($USER->username == 'guest') { // only real guest user, not for users with guest role + ob_start(); + $curcost = get_course_cost($instance); + echo ''.get_string('paymentrequired').'
'; + echo ''.get_string('cost').": {$curcost['currency']} {$curcost['cost']}".'
'; + echo ''; + echo ''.get_string('paymentrequired').'
'; + $form->display(); + + return $OUTPUT->box(ob_get_clean()); + } + } + + /** + * The user submitted credit card form. + * + * @param object $form Form parameters + * @param object $course Course info + * @param object $instance Enrol instance + * @return string NULL if ok, error message otherwise. + * @access private + */ + private function cc_submit($form, $course, $instance) { + global $CFG, $USER, $SESSION, $OUTPUT, $DB; + + $plugin = enrol_get_plugin('authorize'); + + prevent_double_paid($instance); + + $useripno = getremoteaddr(); + $curcost = get_course_cost($instance); + $exp_date = sprintf("%02d", $form->ccexpiremm) . $form->ccexpireyyyy; + + // NEW CC ORDER + $timenow = time(); + $order = new stdClass(); + $order->paymentmethod = AN_METHOD_CC; + $order->refundinfo = substr($form->cc, -4); + $order->ccname = $form->firstname . " " . $form->lastname; + $order->courseid = $course->id; + $order->instanceid = $form->instanceid; + $order->userid = $USER->id; + $order->status = AN_STATUS_NONE; // it will be changed... + $order->settletime = 0; // cron changes this. + $order->transid = 0; // Transaction Id + $order->timecreated = $timenow; + $order->amount = $curcost['cost']; + $order->currency = $curcost['currency']; + $order->id = $DB->insert_record("enrol_authorize", $order); + if (!$order->id) { + message_to_admin("Error while trying to insert new data", $order); + return "Insert record error. Admin has been notified!"; + } + + $extra = new stdClass(); + $extra->x_card_num = $form->cc; + $extra->x_card_code = $form->cvv; + $extra->x_exp_date = $exp_date; + $extra->x_currency_code = $curcost['currency']; + $extra->x_amount = $curcost['cost']; + $extra->x_first_name = $form->firstname; + $extra->x_last_name = $form->lastname; + $extra->x_country = $form->cccountry; + $extra->x_address = $form->ccaddress; + $extra->x_state = $form->ccstate; + $extra->x_city = $form->cccity; + $extra->x_zip = $form->cczip; + + $extra->x_invoice_num = $order->id; + $extra->x_description = $course->shortname; + + $extra->x_cust_id = $USER->id; + $extra->x_email = $USER->email; + $extra->x_customer_ip = $useripno; + $extra->x_email_customer = $plugin->get_config('enrol_mailstudents') ? 'FALSE' : 'TRUE'; + $extra->x_phone = ''; + $extra->x_fax = ''; + + if ($plugin->get_config('an_authcode') && !empty($form->ccauthcode)) { + $action = AN_ACTION_CAPTURE_ONLY; + $extra->x_auth_code = $form->ccauthcode; + } elseif ($plugin->get_config('an_review')) { + $action = AN_ACTION_AUTH_ONLY; + } else { + $action = AN_ACTION_AUTH_CAPTURE; + } + + $message = ''; + if (AN_APPROVED == AuthorizeNet::process($order, $message, $extra, $action, $form->cctype)) { + $SESSION->ccpaid = 1; // security check: don't duplicate payment + + switch ($action) + { + // review enabled (authorize but capture: draw money but wait for settlement during 30 days) + // the first step is to inform payment managers and to redirect the user to main page. + // the next step is to accept/deny payment (AN_ACTION_PRIOR_AUTH_CAPTURE/VOID) within 30 days (payment management or scheduled-capture CRON) + // unless you accept payment or enable auto-capture cron, the transaction is expired after 30 days and the user cannot enrol to the course during 30 days. + // see also: admin/cron.php, $this->cron(), $plugin->get_config('an_capture_day')... + case AN_ACTION_AUTH_ONLY: + { + $a = new stdClass; + $a->url = "$CFG->wwwroot/enrol/authorize/index.php?order=$order->id"; + $a->orderid = $order->id; + $a->transid = $order->transid; + $a->amount = "$order->currency $order->amount"; + $a->expireon = userdate(AuthorizeNet::getsettletime($timenow + (30 * 3600 * 24))); + $a->captureon = userdate(AuthorizeNet::getsettletime($timenow + (intval($plugin->get_config('an_capture_day')) * 3600 * 24))); + $a->course = $course->fullname; + $a->user = fullname($USER); + $a->acstatus = ($plugin->get_config('an_capture_day') > 0) ? get_string('yes') : get_string('no'); + $emailmessage = get_string('adminneworder', 'enrol_authorize', $a); + $a = new stdClass; + $a->course = $course->shortname; + $a->orderid = $order->id; + $emailsubject = get_string('adminnewordersubject', 'enrol_authorize', $a); + $context = get_context_instance(CONTEXT_COURSE, $course->id); + if (($paymentmanagers = get_users_by_capability($context, 'enrol/authorize:managepayments'))) { + foreach ($paymentmanagers as $paymentmanager) { + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $USER; + $eventdata->userto = $paymentmanager; + $eventdata->subject = $emailsubject; + $eventdata->fullmessage = $emailmessage; + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + } + redirect($CFG->wwwroot, get_string("reviewnotify", "enrol_authorize"), '30'); + break; + } + + case AN_ACTION_CAPTURE_ONLY: // auth code received via phone and the code accepted. + case AN_ACTION_AUTH_CAPTURE: // real time transaction, authorize and capture. + { + // Credit card captured, ENROL student now... + if ($instance->enrolperiod) { + $timestart = time(); + $timeend = $timestart + $instance->enrolperiod; + } else { + $timestart = 0; + $timeend = 0; + } + + $plugin->enrol_user($instance, $USER->id, $instance->roleid, $timestart, $timeend); + + // Send notifications + if ($plugin->get_config('enrol_mailstudents')) { + send_welcome_messages($order->id); + } + if ($plugin->get_config('enrol_mailteachers')) { + $context = get_context_instance(CONTEXT_COURSE, $course->id); + $paymentmanagers = get_users_by_capability($context, 'enrol/authorize:managepayments', '', '', '0', '1'); + $paymentmanager = array_shift($paymentmanagers); + $a = new stdClass; + $a->course = "$course->fullname"; + $a->user = fullname($USER); + + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $USER; + $eventdata->userto = $paymentmanager; + $eventdata->subject = get_string("enrolmentnew", '', format_string($course->shortname)); + $eventdata->fullmessage = get_string('enrolmentnewuser', '', $a); + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + if ($plugin->get_config('enrol_mailadmins')) { + $a = new stdClass; + $a->course = "$course->fullname"; + $a->user = fullname($USER); + $admins = get_admins(); + foreach ($admins as $admin) { + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $USER; + $eventdata->userto = $admin; + $eventdata->subject = get_string("enrolmentnew", '', format_string($course->shortname)); + $eventdata->fullmessage = get_string('enrolmentnewuser', '', $a); + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + } + + load_all_capabilities(); + + echo $OUTPUT->header(); + echo $OUTPUT->box_start('generalbox notice'); + echo ''. get_string('paymentthanks', 'moodle', $course->fullname) .'
'; + echo $OUTPUT->container_start('buttons'); + echo $OUTPUT->single_button(new moodle_url("$CFG->wwwroot/enrol/authorize/index.php", array('order'=>$order->id)), get_string('payments')); + echo $OUTPUT->single_button(new moodle_url("$CFG->wwwroot/course/view.php", array('id'=>$course->id)), $course->fullname); + echo $OUTPUT->container_end(); + echo $OUTPUT->box_end(); + echo $OUTPUT->footer(); + exit; // show output now! + } + } + return NULL; + } else { + message_to_admin($message, $order); + return $message; + } + } + + /** + * The user submitted echeck form. + * + * @param object $form Form parameters + * @param object $course Course info + * @param object $course Enrol instance + * @return string NULL if ok, error message otherwise. + * @access private + */ + private function echeck_submit($form, $course, $instance) + { + global $CFG, $USER, $SESSION, $DB; + + prevent_double_paid($instance); + + $useripno = getremoteaddr(); + $curcost = get_course_cost($instance); + $isbusinesschecking = ($form->acctype == 'BUSINESSCHECKING'); + + // NEW ECHECK ORDER + $timenow = time(); + $order = new stdClass(); + $order->paymentmethod = AN_METHOD_ECHECK; + $order->refundinfo = $isbusinesschecking ? 1 : 0; + $order->ccname = $form->firstname . ' ' . $form->lastname; + $order->courseid = $course->id; + $order->instanceid = $form->instanceid; + $order->userid = $USER->id; + $order->status = AN_STATUS_NONE; // it will be changed... + $order->settletime = 0; // cron changes this. + $order->transid = 0; // Transaction Id + $order->timecreated = $timenow; + $order->amount = $curcost['cost']; + $order->currency = $curcost['currency']; + $order->id = $DB->insert_record("enrol_authorize", $order); + if (!$order->id) { + message_to_admin("Error while trying to insert new data", $order); + return "Insert record error. Admin has been notified!"; + } + + $extra = new stdClass(); + $extra->x_bank_aba_code = $form->abacode; + $extra->x_bank_acct_num = $form->accnum; + $extra->x_bank_acct_type = $form->acctype; + $extra->x_echeck_type = $isbusinesschecking ? 'CCD' : 'WEB'; + $extra->x_bank_name = $form->bankname; + $extra->x_currency_code = $curcost['currency']; + $extra->x_amount = $curcost['cost']; + $extra->x_first_name = $form->firstname; + $extra->x_last_name = $form->lastname; + $extra->x_country = $USER->country; + $extra->x_address = $USER->address; + $extra->x_city = $USER->city; + $extra->x_state = ''; + $extra->x_zip = ''; + + $extra->x_invoice_num = $order->id; + $extra->x_description = $course->shortname; + + $extra->x_cust_id = $USER->id; + $extra->x_email = $USER->email; + $extra->x_customer_ip = $useripno; + $extra->x_email_customer = $plugin->get_config('enrol_mailstudents') ? 'TRUE' : 'FALSE'; + $extra->x_phone = ''; + $extra->x_fax = ''; + + $message = ''; + if (AN_REVIEW == AuthorizeNet::process($order, $message, $extra, AN_ACTION_AUTH_CAPTURE)) { + $SESSION->ccpaid = 1; // security check: don't duplicate payment + redirect($CFG->wwwroot, get_string("reviewnotify", "enrol_authorize"), '30'); + return NULL; + } + else { + message_to_admin($message, $order); + return $message; + } + } + + /** + * This function is run by admin/cron.php every time if admin has enabled this plugin. + * + * Everyday at settlement time (default is 00:05), it cleans up some tables + * and sends email to admin/teachers about pending orders expiring if manual-capture has enabled. + * + * If admin set up 'Order review' and 'Capture day', it captures credits cards and enrols students. + * + * @access public + */ + public function cron() + { + global $CFG, $DB; + + $oneday = 86400; + $timenow = time(); + $settlementtime = AuthorizeNet::getsettletime($timenow); + $timediff30 = $settlementtime - (30 * $oneday); + $mconfig = get_config('enrol_authorize'); + $plugin = enrol_get_plugin('authorize'); + + mtrace("Processing authorize cron..."); + + if (!isset($mconfig->an_dailysettlement) || intval($mconfig->an_dailysettlement) < $settlementtime) { + set_config('an_dailysettlement', $settlementtime, 'enrol_authorize'); + mtrace(" Daily cron:"); + $this->cron_daily(); + mtrace(" Done"); + } + + mtrace(" Scheduled capture", ": "); + if (!$mconfig->an_review or ($mconfig->an_test) or (intval($mconfig->an_capture_day) < 1) or (!check_curl_available())) { + mtrace("disabled"); + return; // order review disabled or test mode or manual capture or openssl wasn't loaded. + } + + $timediffcnf = $settlementtime - (intval($mconfig->an_capture_day) * $oneday); + $select = "(status = ?) AND (timecreated < ?) AND (timecreated > ?)"; + $params = array(AN_STATUS_AUTH, $timediffcnf, $timediff30); + if (!($ordercount = $DB->count_records_select('enrol_authorize', $select, $params))) { + mtrace("no pending orders"); + return; + } + + $eachconn = intval($mconfig->an_eachconnsecs); + $eachconn = (($eachconn > 60) ? 60 : (($eachconn <= 0) ? 3 : $eachconn)); + if (($ordercount * $eachconn) + intval($mconfig->an_lastcron) > $timenow) { + mtrace("blocked"); + return; + } + set_config('an_lastcron', $timenow, 'enrol_authorize'); + + mtrace(" $ordercount orders are being processed now", ": "); + + $faults = ''; + $sendem = array(); + $elapsed = time(); + @set_time_limit(0); + $this->log = "AUTHORIZE.NET AUTOCAPTURE CRON: " . userdate($timenow) . "\n"; + + $lastcourseid = 0; + $rs = $DB->get_recordset_select('enrol_authorize', $select, $params, 'courseid'); + foreach ( $rs as $order) + { + $message = ''; + $extra = NULL; + if (AN_APPROVED == AuthorizeNet::process($order, $message, $extra, AN_ACTION_PRIOR_AUTH_CAPTURE)) { + if ($lastcourseid != $order->courseid) { + $lastcourseid = $order->courseid; + $course = $DB->get_record('course', array('id'=>$lastcourseid)); + $role = get_default_course_role($course); + $context = get_context_instance(CONTEXT_COURSE, $lastcourseid); + } + $timestart = $timeend = 0; + if ($course->enrolperiod) { + $timestart = $timenow; + $timeend = $order->settletime + $course->enrolperiod; + } + $user = $DB->get_record('user', array('id'=>$order->userid)); + $pinstance = $DB->get_record('enrol', array('id'=>$order->instanceid)); + $plugin->enrol_user($pinstance, $order->userid, $pinstance->roleid, $timestart, $timeend); + $this->log .= "User($user->id) has been enrolled to course($course->id).\n"; + if (!empty($mconfig->enrol_mailstudents)) { + $sendem[] = $order->id; + } + } else { + $this->log .= "Error, Order# $order->id: " . $message . "\n"; + } + } + $rs->close(); + mtrace("processed"); + + $timenow = time(); + $elapsed = $timenow - $elapsed; + $eachconn = ceil($elapsed / $ordercount); + set_config('an_eachconnsecs', $eachconn, 'enrol_authorize'); + + $this->log .= "AUTHORIZE.NET CRON FINISHED: " . userdate($timenow); + + $adminuser = get_admin(); + if (!empty($faults)) { + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $adminuser; + $eventdata->userto = $adminuser; + $eventdata->subject = "AUTHORIZE.NET CRON FAULTS"; + $eventdata->fullmessage = $faults; + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + if (!empty($mconfig->enrol_mailadmins)) { + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $adminuser; + $eventdata->userto = $adminuser; + $eventdata->subject = "AUTHORIZE.NET CRON LOG"; + $eventdata->fullmessage = $this->log; + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + + // Send emails to students about which courses have enrolled. + if (!empty($sendem)) { + mtrace(" sending welcome messages to students", ": "); + send_welcome_messages($sendem); + mtrace("sent"); + } + } + + /** + * Daily cron. It executes at settlement time (default is 00:05). + * + * @access private + */ + private function cron_daily() + { + global $CFG, $SITE, $DB; + + $mconfig = get_config('enrol_authorize'); + + $oneday = 86400; + $timenow = time(); + $onepass = $timenow - $oneday; + $settlementtime = AuthorizeNet::getsettletime($timenow); + $timediff30 = $settlementtime - (30 * $oneday); + + $select = "(status=?) AND (timecreateddelete_records_select('enrol_authorize', $select, $params)) { + mtrace(" orders no transaction made have deleted"); + } + + $select = "(status=?) AND (timecreatedexecute("UPDATE {enrol_authorize} SET status=? WHERE $select", $params)) { + mtrace(" pending orders to expire have updated"); + } + + $timediff60 = $settlementtime - (60 * $oneday); + $select = "(status=?) AND (timecreateddelete_records_select('enrol_authorize', $select, $params)) { + mtrace(" orders expired older than 60 days have deleted"); + } + + $adminuser = get_admin(); + $select = "status IN(?,?) AND (timecreated?)"; + $params = array(AN_STATUS_UNDERREVIEW, AN_STATUS_APPROVEDREVIEW, $onepass, $timediff60); + if (($count = $DB->count_records_select('enrol_authorize', $select, $params)) && + ($csvusers = get_users_by_capability(get_context_instance(CONTEXT_SYSTEM), 'enrol/authorize:uploadcsv'))) { + $a = new stdClass; + $a->count = $count; + $a->course = $SITE->shortname; + $subject = get_string('pendingechecksubject', 'enrol_authorize', $a); + $a = new stdClass; + $a->count = $count; + $a->url = $CFG->wwwroot.'/enrol/authorize/uploadcsv.php'; + $message = get_string('pendingecheckemail', 'enrol_authorize', $a); + foreach($csvusers as $csvuser) { + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $adminuser; + $eventdata->userto = $csvuser; + $eventdata->subject = $subject; + $eventdata->fullmessage = $message; + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + mtrace(" users who have 'enrol/authorize:uploadcsv' were mailed"); + } + + mtrace(" early pending order warning email for manual capture", ": "); + if (empty($mconfig->an_emailexpired)) { + mtrace("not enabled"); + return; + } + + + $timediffem = $settlementtime - ((30 - intval($mconfig->an_emailexpired)) * $oneday); + $select = "(status=?) AND (timecreated?)"; + $params = array(AN_STATUS_AUTH, $timediffem, $timediff30); + $count = $DB->count_records_select('enrol_authorize', $select, $params); + if (!$count) { + mtrace("no orders prior to {$mconfig->an_emailexpired} days"); + return; + } + + mtrace("$count orders prior to {$mconfig->an_emailexpired} days"); + $a = new stdClass; + $a->pending = $count; + $a->days = $mconfig->an_emailexpired; + $a->course = $SITE->shortname; + $subject = get_string('pendingorderssubject', 'enrol_authorize', $a); + $a = new stdClass; + $a->pending = $count; + $a->days = $mconfig->an_emailexpired; + $a->course = $SITE->fullname; + $a->enrolurl = "$CFG->wwwroot/$CFG->admin/enrol_config.php?enrol=authorize"; + $a->url = $CFG->wwwroot.'/enrol/authorize/index.php?status='.AN_STATUS_AUTH; + $message = get_string('pendingordersemail', 'enrol_authorize', $a); + + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $adminuser; + $eventdata->userto = $adminuser; + $eventdata->subject = $subject; + $eventdata->fullmessage = $message; + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + + // Email to payment managers + if (empty($mconfig->an_emailexpiredteacher)) { + return; // email feature disabled for teachers. + } + + $sorttype = empty($mconfig->an_sorttype) ? 'ttl' : $mconfig->an_sorttype; + $sql = "SELECT e.courseid, e.currency, c.fullname, c.shortname, + COUNT(e.courseid) AS cnt, SUM(e.amount) as ttl + FROM {enrol_authorize} e + INNER JOIN {course} c ON c.id = e.courseid + WHERE (e.status = ?) + AND (e.timecreated < ?) + AND (e.timecreated > ?) + GROUP BY e.courseid + ORDER BY $sorttype DESC"; + $params = array(AN_STATUS_AUTH, $timediffem, $timediff30); + + $rs = $DB->get_recordset_sql($sql, $params); + foreach ($rs as $courseinfo) + { + $lastcourse = $courseinfo->courseid; + $context = get_context_instance(CONTEXT_COURSE, $lastcourse); + if (($paymentmanagers = get_users_by_capability($context, 'enrol/authorize:managepayments'))) { + $a = new stdClass; + $a->course = $courseinfo->shortname; + $a->pending = $courseinfo->cnt; + $a->days = $mconfig->an_emailexpired; + $subject = get_string('pendingorderssubject', 'enrol_authorize', $a); + $a = new stdClass; + $a->course = $courseinfo->fullname; + $a->pending = $courseinfo->cnt; + $a->currency = $courseinfo->currency; + $a->sumcost = $courseinfo->ttl; + $a->days = $mconfig->an_emailexpired; + $a->url = $CFG->wwwroot.'/enrol/authorize/index.php?course='.$lastcourse.'&status='.AN_STATUS_AUTH; + $message = get_string('pendingordersemailteacher', 'enrol_authorize', $a); + foreach ($paymentmanagers as $paymentmanager) { + $eventdata = new object(); + $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; + $eventdata->userfrom = $adminuser; + $eventdata->userto = $paymentmanager; + $eventdata->subject = $subject; + $eventdata->fullmessage = $message; + $eventdata->fullmessageformat = FORMAT_PLAIN; + $eventdata->fullmessagehtml = ''; + $eventdata->smallmessage = ''; + message_send($eventdata); + } + } + } + $rs->close(); + } +} + diff --git a/enrol/authorize/localfuncs.php b/enrol/authorize/localfuncs.php index 456ec94..cffe4a6 100644 --- a/enrol/authorize/localfuncs.php +++ b/enrol/authorize/localfuncs.php @@ -1,18 +1,43 @@ . + +/** + * Authorize enrolment plugin. + * + * This plugin allows you to set up paid courses, using authorize.net. + * + * @package enrol + * @subpackage authorize + * @copyright 2010 Eugene Venter + * @author Eugene Venter + * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later + */ require_once($CFG->libdir.'/eventslib.php'); -function get_course_cost($course) -{ - global $CFG; +function get_course_cost($plugininstance) { + $defaultplugin = enrol_get_plugin('authorize'); $cost = (float)0; - $currency = (!empty($course->currency)) - ? $course->currency :( empty($CFG->enrol_currency) - ? 'USD' : $CFG->enrol_currency ); + $currency = (!empty($plugininstance->currency)) + ? $plugininstance->currency :( empty($defaultplugin->currency) + ? 'USD' : $defaultplugin->enrol_currency ); - if (!empty($course->cost)) { - $cost = (float)(((float)$course->cost) < 0) ? $CFG->enrol_cost : $course->cost; + if (!empty($plugininstance->cost)) { + $cost = (float)(((float)$plugininstance->cost) < 0) ? $defaultplugin->cost : $plugininstance->cost; } $cost = format_float($cost, 2); @@ -24,26 +49,26 @@ function get_course_cost($course) return $ret; } -function zero_cost($course) { - $curcost = get_course_cost($course); +function zero_cost($plugininstance) { + $curcost = get_course_cost($plugininstance); return (abs($curcost['cost']) < 0.01); } -function prevent_double_paid($course) -{ +function prevent_double_paid($plugininstance) { global $CFG, $SESSION, $USER, $DB; + $plugin = enrol_get_plugin('authorize'); - $sql = "SELECT id FROM {enrol_authorize} WHERE userid = ? AND courseid = ? "; - $params = array($USER->id, $course->id); + $sql = "SELECT id FROM {enrol_authorize} WHERE userid = ? AND courseid = ? AND instanceid = ?"; + $params = array($USER->id, $plugininstance->courseid, $plugininstance->id); - if (empty($CFG->an_test)) { // Real mode - $sql .= 'AND status IN(?,?,?)'; + if (!$plugin->get_config('an_test')) { // Real mode + $sql .= ' AND status IN(?,?,?)'; $params[] = AN_STATUS_AUTH; $params[] = AN_STATUS_UNDERREVIEW; $params[] = AN_STATUS_APPROVEDREVIEW; } else { // Test mode - $sql .= 'AND status=?'; + $sql .= ' AND status=?'; $params[] = AN_STATUS_NONE; } @@ -61,9 +86,8 @@ function prevent_double_paid($course) } } -function get_list_of_creditcards($getall = false) -{ - global $CFG; +function get_list_of_creditcards($getall = false) { + $plugin = enrol_get_plugin('authorize'); $alltypes = array( 'mcd' => 'Master Card', @@ -77,44 +101,61 @@ function get_list_of_creditcards($getall = false) 'enr' => 'EnRoute' ); - if ($getall or empty($CFG->an_acceptccs)) { + if ($getall) { return $alltypes; } $ret = array(); - $ccs = explode(',', $CFG->an_acceptccs); - foreach ($ccs as $key) { - $ret[$key] = $alltypes[$key]; + foreach ($alltypes as $code=>$name) { + if ($plugin->get_config("an_acceptcc_{$code}")) { + $ret[$code] = $name; + } } + return $ret; } -function get_list_of_payment_methods($getall = false) -{ - global $CFG; +function get_list_of_payment_methods($getall = false) { + $plugin = enrol_get_plugin('authorize'); + $method_cc = $plugin->get_config('an_acceptmethod_cc'); + $method_echeck = $plugin->get_config('an_acceptmethod_echeck'); + - if ($getall || empty($CFG->an_acceptmethods)) { + if ($getall || (empty($method_cc) && empty($method_echeck))) { return array(AN_METHOD_CC, AN_METHOD_ECHECK); - } - else { - return explode(',', $CFG->an_acceptmethods); + } else { + $methods = array(); + if ($method_cc) { + $methods[] = AN_METHOD_CC; + } + + if ($method_echeck) { + $methods[] = AN_METHOD_ECHECK; + } + + return $methods; } } -function get_list_of_bank_account_types($getall = false) -{ - global $CFG; +function get_list_of_bank_account_types($getall = false) { + $plugin = enrol_get_plugin('authorize'); + $alltypes = array('CHECKING', 'BUSINESSCHECKING', 'SAVINGS'); - if ($getall || empty($CFG->an_acceptechecktypes)) { - return array('CHECKING', 'BUSINESSCHECKING', 'SAVINGS'); - } - else { - return explode(',', $CFG->an_acceptechecktypes); + if ($getall) { + return $alltypes; + } else { + $types = array(); + foreach ($alltypes as $type) { + if ($plugin->get_config("an_acceptecheck_{$type}")) { + $types[] = $type; + } + } + + return $types; } } -function message_to_admin($subject, $data) -{ +function message_to_admin($subject, $data) { global $SITE; $admin = get_admin(); @@ -124,6 +165,8 @@ function message_to_admin($subject, $data) $emailmessage .= print_r($data, true); $eventdata = new object(); $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; $eventdata->userfrom = $admin; $eventdata->userto = $admin; $eventdata->subject = "$SITE->fullname: Authorize.net ERROR"; @@ -134,8 +177,7 @@ function message_to_admin($subject, $data) message_send($eventdata); } -function send_welcome_messages($orderdata) -{ +function send_welcome_messages($orderdata) { global $CFG, $SITE, $DB; if (empty($orderdata)) { @@ -191,6 +233,8 @@ function send_welcome_messages($orderdata) $eventdata = new object(); $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; $eventdata->userfrom = $sender; $eventdata->userto = $user; $eventdata->subject = get_string("enrolmentnew", '', $SITE->shortname); @@ -207,20 +251,20 @@ function send_welcome_messages($orderdata) } } -function check_curl_available() -{ +function check_curl_available() { return function_exists('curl_init') && function_exists('stream_get_wrappers') && in_array('https', stream_get_wrappers()); } -function authorize_verify_account() -{ - global $CFG, $USER, $SITE; +function authorize_verify_account() { + global $USER, $SITE; + $plugin = enrol_get_plugin('authorize'); + require_once('authorizenet.class.php'); - $original_antest = $CFG->an_test; - $CFG->an_test = 1; // Test mode + $original_antest = $plugin->get_config('an_test'); + $plugin->set_config('an_test', 1); // Test mode $order = new stdClass(); $order->id = -1; @@ -257,7 +301,9 @@ function authorize_verify_account() else { $ret = get_string('verifyaccountresult', 'enrol_authorize', $message); } - $CFG->an_test = $original_antest; + + $plugin->set_config('an_test', $original_antest); + return $ret; } diff --git a/enrol/authorize/locallib.php b/enrol/authorize/locallib.php index 9e010ce..4a3a0bd 100644 --- a/enrol/authorize/locallib.php +++ b/enrol/authorize/locallib.php @@ -1,4 +1,30 @@ . + +/** + * Authorize enrolment plugin. + * + * This plugin allows you to set up paid courses, using authorize.net. + * + * @package enrol + * @subpackage authorize + * @copyright 2010 Eugene Venter + * @author Eugene Venter + * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later + */ if (!defined('MOODLE_INTERNAL')) { die('Direct access to this script is forbidden.'); @@ -17,6 +43,9 @@ function authorize_print_orders($courseid, $userid) { global $course; global $CFG, $USER, $SITE, $DB, $OUTPUT, $PAGE; global $strs, $authstrs; + + $plugin = enrol_get_plugin('authorize'); + require_once($CFG->libdir.'/tablelib.php'); $perpage = optional_param('perpage', 10, PARAM_INT); @@ -132,7 +161,7 @@ function authorize_print_orders($courseid, $userid) { switch ($status) { case AN_STATUS_NONE: - if (empty($CFG->an_test)) { + if (!$plugin->get_config('an_test')) { $where .= "AND (e.status != :status) "; $params['status'] = AN_STATUS_NONE; } @@ -223,6 +252,9 @@ function authorize_print_order($orderid) global $CFG, $USER, $DB, $OUTPUT, $PAGE; global $strs, $authstrs; + $plugin = enrol_get_plugin('authorize'); + $an_test = $plugin->get_config('an_test'); + $do = optional_param('do', '', PARAM_ALPHA); $unenrol = optional_param('unenrol', 0, PARAM_BOOL); $confirm = optional_param('confirm', 0, PARAM_BOOL); @@ -269,6 +301,7 @@ function authorize_print_order($orderid) } $PAGE->navbar->add($authstrs->paymentmanagement, 'index.php?course='.$course->id); $PAGE->navbar->add($authstrs->orderid . ': ' . $orderid, 'index.php'); + $PAGE->set_course($course); $PAGE->set_title("$course->shortname: $authstrs->paymentmanagement"); $PAGE->set_heading($authstrs->orderdetails); $PAGE->set_cacheable(false); @@ -302,9 +335,9 @@ function authorize_print_order($orderid) $message = ''; $extra = NULL; if (AN_APPROVED == AuthorizeNet::process($order, $message, $extra, AN_ACTION_PRIOR_AUTH_CAPTURE)) { - if (empty($CFG->an_test)) { + if (empty($an_test)) { if (enrol_into_course($course, $user, 'authorize')) { - if (!empty($CFG->enrol_mailstudents)) { + if ($plugin->get_config('enrol_mailstudents')) { send_welcome_messages($orderid); } redirect("$CFG->wwwroot/enrol/authorize/index.php?order=$orderid"); @@ -352,13 +385,15 @@ function authorize_print_order($orderid) $message = ''; $success = AuthorizeNet::process($order, $message, $extra, AN_ACTION_CREDIT); if (AN_APPROVED == $success || AN_REVIEW == $success) { - if (empty($CFG->an_test)) { + if (empty($an_test)) { if (empty($extra->id)) { redirect("$CFG->wwwroot/enrol/authorize/index.php?order=$orderid", "insert record error", 20); } else { if (!empty($unenrol)) { - role_unassign_all(array('userid'=>$order->userid, 'contextid'=>$coursecontext->id, 'component'=>'enrol_authorize'), true, true); + $pinstance = $DB->get_record('enrol', array('id'=>$order->instanceid)); + $plugin->unenrol_user($pinstance, $order->userid); + //role_unassign_all(array('userid'=>$order->userid, 'contextid'=>$coursecontext->id, 'component'=>'enrol_authorize'), true, true); } redirect("$CFG->wwwroot/enrol/authorize/index.php?order=$orderid"); } @@ -383,7 +418,9 @@ function authorize_print_order($orderid) elseif (ORDER_DELETE == $do && in_array(ORDER_DELETE, $statusandactions->actions)) { if ($confirm && confirm_sesskey()) { if (!empty($unenrol)) { - role_unassign_all(array('userid'=>$order->userid, 'contextid'=>$coursecontext->id, 'component'=>'enrol_authorize'), true, true); + $pinstance = $DB->get_record('enrol', array('id'=>$order->instanceid)); + $plugin->unenrol_user($pinstance, $order->userid); + //role_unassign_all(array('userid'=>$order->userid, 'contextid'=>$coursecontext->id, 'component'=>'enrol_authorize'), true, true); } $DB->delete_records('enrol_authorize', array('id'=>$orderid)); redirect("$CFG->wwwroot/enrol/authorize/index.php"); @@ -399,7 +436,7 @@ function authorize_print_order($orderid) $extra = NULL; $message = ''; if (AN_APPROVED == AuthorizeNet::process($order, $message, $extra, AN_ACTION_VOID)) { - if (empty($CFG->an_test)) { + if (empty($an_test)) { redirect("$CFG->wwwroot/enrol/authorize/index.php?order=$orderid"); } else { @@ -434,9 +471,11 @@ function authorize_print_order($orderid) $message = ''; $extra = NULL; if (AN_APPROVED == AuthorizeNet::process($suborder, $message, $extra, AN_ACTION_VOID)) { - if (empty($CFG->an_test)) { + if (empty($an_test)) { if (!empty($unenrol)) { - role_unassign_all(array('userid'=>$order->userid, 'contextid'=>$coursecontext->id, 'component'=>'enrol_authorize'), true, true); + $pinstance = $DB->get_record('enrol', array('id'=>$order->instanceid)); + $plugin->unenrol_user($pinstance, $order->userid); + //role_unassign_all(array('userid'=>$order->userid, 'contextid'=>$coursecontext->id, 'component'=>'enrol_authorize'), true, true); } redirect("$CFG->wwwroot/enrol/authorize/index.php?order=$orderid"); } diff --git a/enrol/authorize/settings.php b/enrol/authorize/settings.php new file mode 100644 index 0000000..fb4356b --- /dev/null +++ b/enrol/authorize/settings.php @@ -0,0 +1,176 @@ +. + +/** + * Paypal enrolments plugin settings and presets. + * + * @package enrol + * @subpackage authorize + * @copyright 2010 Eugene Venter + * @author Eugene Venter - based on code by others + * @author Eugene Venter + * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later + */ + +defined('MOODLE_INTERNAL') || die(); + +require_once('localfuncs.php'); +require_once('const.php'); + +if ($ADMIN->fulltree) { + global $CFG, $DB, $OUTPUT; + $mconfig = get_config('enrol_authorize'); + + // Check curl availability + if (!check_curl_available()) { + $settings->add(new admin_setting_heading('enrol_authorize_notification', '', 'PHP must be compiled with cURL+SSL support (--with-curl --with-openssl)')); + return; + } + + // Check https availability + if (empty($CFG->loginhttps) and substr($CFG->wwwroot, 0, 5) !== 'https') { + $a = new stdClass; + $a->url = "$CFG->wwwroot/$CFG->admin/settings.php?section=httpsecurity"; + $settings->add(new admin_setting_heading('enrol_authorize_notification', '', get_string('adminconfighttps', 'enrol_authorize', $a))); + return; + } elseif (isset($_SERVER['SERVER_PORT']) && $_SERVER['SERVER_PORT'] != 443) { // MDL-9836 + $wwwsroot = qualified_me(); + $wwwsroot = str_replace('http:', 'https:', $wwwsroot); + $a = new stdClass; + $a->url = $wwwsroot; + $settings->add(new admin_setting_heading('enrol_authorize_notification', '', get_string('adminconfighttpsgo', 'enrol_authorize', $a))); + return; + } + + // Account verification notification + if (optional_param('verifyaccount', 0, PARAM_INT)) { + $settings->add(new admin_setting_heading('enrol_authorize_notification', '', authorize_verify_account())); + } + + // Review check + if (!empty($mconfig->an_review)) { + $captureday = intval($mconfig->an_capture_day); + $emailexpired = intval($mconfig->an_emailexpired); + if ($captureday > 0 || $emailexpired > 0) { + $lastcron = $DB->get_field_sql('SELECT max(lastcron) FROM {modules}'); + if ((time() - intval($lastcron) > 3600 * 24)) { + $settings->add(new admin_setting_heading('enrol_authorize_cron_notification', '', get_string('admincronsetup', 'enrol_authorize'))); + } + } + } + + // Pending orders check + if (($count = $DB->count_records('enrol_authorize', array('status'=>AN_STATUS_AUTH)))) { + $a = new stdClass; + $a->count = $count; + $a->url = $CFG->wwwroot."/enrol/authorize/index.php?status=".AN_STATUS_AUTH; + $settings->add(new admin_setting_heading('enrol_authorize_status_notification', '', get_string('adminpendingorders', 'enrol_authorize', $a))); + } + + + // Set up the form + + $settings->add(new admin_setting_heading('enrol_authorize_settings', '', get_string('description', 'enrol_authorize'))); + + //--- sitewide settings --------------------------------------------------------------------------------- + $settings->add(new admin_setting_heading('enrol_authorize_sitewide', + get_string("adminauthorizewide", "enrol_authorize"), '')); + + $settings->add(new admin_setting_configtext('enrol_authorize/cost', get_string('cost', 'enrol_authorize'), '', 5, PARAM_FLOAT, 4)); + + $settings->add(new admin_setting_configselect('enrol_authorize/currency', get_string('currency', 'enrol_authorize'), '', 'USD', get_string_manager()->get_list_of_currencies())); + + if (!optional_param('verifyaccount', 0, PARAM_INT) && isset($mconfig->an_login) && (isset($mconfig->an_tran_key) || isset($mconfig->an_password))) { + + $settings->add(new admin_setting_heading('enrol_authorize_verification', '', + ''. + get_string("verifyaccount", "enrol_authorize").'')); + } + + //--- authorize.net settings ---------------------------------------------------------------------------- + $settings->add(new admin_setting_heading('enrol_authorize_net_settings', + get_string("adminauthorizesettings", "enrol_authorize"), get_string('logininfo', 'enrol_authorize'))); + + $settings->add(new admin_setting_configtext('enrol_authorize/an_login', get_string('anlogin', 'enrol_authorize'), '', '')); + + $settings->add(new admin_setting_configpasswordunmask('enrol_authorize/an_tran_key', get_string('antrankey', 'enrol_authorize'), '', '')); + + $settings->add(new admin_setting_configpasswordunmask('enrol_authorize/an_password', get_string('anpassword', 'enrol_authorize'), '', '')); + + $settings->add(new admin_setting_configtext('enrol_authorize/an_referer', get_string('anreferer', 'enrol_authorize'), get_string('anrefererdesc', 'enrol_authorize'), 'http://')); + + $settings->add(new admin_setting_configtime('enrol_authorize/an_cutoff_hour', 'an_cutoff_min', get_string('cutofftime', 'enrol_authorize'), get_string('cutofftimedesc', 'enrol_authorize'), '')); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_avs', get_string('anavs', 'enrol_authorize'), get_string('anavsdesc', 'enrol_authorize'), 0)); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_authcode', get_string('anauthcode', 'enrol_authorize'), get_string('anauthcodedesc', 'enrol_authorize'), 0)); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_test', get_string('antestmode', 'enrol_authorize'), get_string('antestmodedesc', 'enrol_authorize'), 0)); + + $paymentmethods = get_list_of_payment_methods(true); + $settings->add(new admin_setting_heading('enrol_authorize_net_payment_method_settings', + '', get_string('adminaccepts', 'enrol_authorize'))); + foreach ($paymentmethods as $key) { + if ($key == AN_METHOD_CC) { + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_acceptmethod_'.AN_METHOD_CC, + get_string('method'.AN_METHOD_CC, 'enrol_authorize'), + get_string('method'.AN_METHOD_CC.'desc', 'enrol_authorize'), + 0)); + $ccs = get_list_of_creditcards(true); + foreach ($ccs as $key => $val) { + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_acceptcc_'.$key, + $val, + '', 0)); + } + } elseif ($key == AN_METHOD_ECHECK) { + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_acceptmethod_'.AN_METHOD_ECHECK, + get_string('method'.AN_METHOD_ECHECK, 'enrol_authorize'), + get_string('method'.AN_METHOD_ECHECK.'desc', 'enrol_authorize'), + 0)); + $echecktypes = get_list_of_bank_account_types(true); + foreach ($echecktypes as $value) { + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_acceptecheck_'.$value, + $value, + '', 0)); + } + } + } + + //--- order review and capture settings ----------------------------------------------------------------- + $settings->add(new admin_setting_heading('enrol_authorize_capture', + get_string("adminauthorizeccapture", "enrol_authorize"), '')); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/an_review', get_string('anreview', 'enrol_authorize'), get_string('anreviewdesc', 'enrol_authorize'), 0)); + + $settings->add(new admin_setting_configtext('enrol_authorize/an_capture_day', get_string('ancaptureday', 'enrol_authorize'), get_string('ancapturedaydesc', 'enrol_authorize'), 5, PARAM_INT, 4)); + + + //--- email sending settings ---------------------------------------------------------------------------- + $settings->add(new admin_setting_heading('enrol_authorize_email', + get_string("adminauthorizeemail", "enrol_authorize"), '')); + + $settings->add(new admin_setting_configtext('enrol_authorize/an_emailexpired', get_string('anemailexpired', 'enrol_authorize'), get_string('anemailexpireddesc', 'enrol_authorize'), 5, PARAM_INT, 4)); + + $settings->add(new admin_setting_configtext('enrol_authorize/an_emailexpiredteacher', get_string('anemailexpiredteacher', 'enrol_authorize'), get_string('anemailexpiredteacherdesc', 'enrol_authorize'), 5, PARAM_INT, 4)); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/mailstudents', get_string('mailstudents'), '', 0)); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/mailteachers', get_string('mailteachers'), '', 0)); + + $settings->add(new admin_setting_configcheckbox('enrol_authorize/mailadmin', get_string('mailadmins'), '', 0)); + +} diff --git a/enrol/authorize/unenrolself.php b/enrol/authorize/unenrolself.php new file mode 100644 index 0000000..2333bd9 --- /dev/null +++ b/enrol/authorize/unenrolself.php @@ -0,0 +1,64 @@ +. + +/** + * Authorize.Net enrolment plugin - support for user self unenrolment. + * + * @package enrol + * @subpackage authorize + * @copyright 2010 Eugene Venter + * @author Eugene Venter + * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later + */ + +require('../../config.php'); + +$enrolid = required_param('enrolid', PARAM_INT); +$confirm = optional_param('confirm', 0, PARAM_BOOL); + +$instance = $DB->get_record('enrol', array('id'=>$enrolid, 'enrol'=>'authorize'), '*', MUST_EXIST); +$course = $DB->get_record('course', array('id'=>$instance->courseid), '*', MUST_EXIST); +$context = get_context_instance(CONTEXT_COURSE, $course->id, MUST_EXIST); + +require_login(); +if (!is_enrolled($context)) { + redirect(new moodle_url('/')); +} +require_login($course); + +$plugin = enrol_get_plugin('authorize'); + +// security defined inside following function +if (!$plugin->get_unenrolself_link($instance)) { + redirect(new moodle_url('/course/view.php', array('id'=>$course->id))); +} + +$PAGE->set_url('/enrol/authorize/unenrolself.php', array('enrolid'=>$instance->id)); +$PAGE->set_title($plugin->get_instance_name($instance)); + +if ($confirm and confirm_sesskey()) { + $plugin->unenrol_user($instance, $USER->id); + add_to_log($course->id, 'course', 'unenrol', '../enrol/users.php?id='.$course->id, $course->id); //there should be userid somewhere! + redirect(new moodle_url('/index.php')); +} + +echo $OUTPUT->header(); +$yesurl = new moodle_url($PAGE->url, array('confirm'=>1, 'sesskey'=>sesskey())); +$nourl = new moodle_url('/course/view.php', array('id'=>$course->id)); +$message = get_string('unenrolselfconfirm', 'enrol_authorize', format_string($course->fullname)); +echo $OUTPUT->confirm($message, $yesurl, $nourl); +echo $OUTPUT->footer(); diff --git a/enrol/authorize/uploadcsv.php b/enrol/authorize/uploadcsv.php index 11da31f..3f4b4f2 100644 --- a/enrol/authorize/uploadcsv.php +++ b/enrol/authorize/uploadcsv.php @@ -1,5 +1,4 @@ . +/** + * Authorize.Net enrolment plugin - support for user self unenrolment. + * + * @package enrol + * @subpackage authorize + * @copyright 2010 Eugene Venter + * @author Eugene Venter + * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later + */ + /// Load libraries require_once('../../config.php'); require_once($CFG->dirroot.'/enrol/authorize/const.php'); @@ -62,6 +71,8 @@ echo $OUTPUT->footer(); function authorize_process_csv($filename) { global $CFG, $SITE, $DB; + $plugin = enrol_get_plugin('authorize'); + /// We need these fields $myfields = array( 'Transaction ID', // enrol_authorize.transid or enrol_authorize_refunds.transid; See: Reference Transaction ID @@ -214,15 +225,13 @@ function authorize_process_csv($filename) { $timestart = time(); $timeend = $timestart + $course->enrolperiod; } - //TODO: do some real enrolment here - if (role_assign($role->id, $user->id, $coursecontext->id, 'enrol_authorize')) { - $imported++; - if (!empty($CFG->enrol_mailstudents)) { - $sendem[] = $order->id; - } - } - else { - $ignoredlines .= $transid . ": Error while trying to enrol " . fullname($user) . " in '$course->fullname' \n"; + // Enrol user + $pinstance = $DB->get_record('enrol', array('id'=>$order->instanceid)); + $plugin->enrol_user($pinstance, $user->id, $pinstance->roleid, $timestart, $timeend); + + $imported++; + if ($plugin->get_config('enrol_mailstudents')) { + $sendem[] = $order->id; } } } @@ -235,6 +244,8 @@ function authorize_process_csv($filename) { $eventdata = new object(); $eventdata->modulename = 'moodle'; + $eventdata->component = 'enrol_authorize'; + $eventdata->name = 'authorize_enrolment'; $eventdata->userfrom = $admin; $eventdata->userto = $admin; $eventdata->subject = "$SITE->fullname: Authorize.net CSV ERROR LOG"; diff --git a/enrol/authorize/version.php b/enrol/authorize/version.php index 933bb16..fbdccd0 100755 --- a/enrol/authorize/version.php +++ b/enrol/authorize/version.php @@ -1,6 +1,31 @@ . -$plugin->version = 2009042700; -$plugin->requires = 2007101507; +/** + * Authorize.Net enrolment plugin version specification. + * + * @package enrol + * @subpackage authorize + * @copyright 2010 Eugene Venter + * @author Eugene Venter + * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later + */ +defined('MOODLE_INTERNAL') || die(); +$plugin->version = 2010081203; +$plugin->requires = 2007101507; +$plugin->cron = 180;