if ($p['completed']) {
fatal_error(sprintf(_PLUG_PAY_CC_CORE_FERROR5, "<a href='{$config['root_url']}/member.php'>", "</a>"), 0);
}
$vars1 = $vars;
$vars1['cc-expire'] = sprintf('%02d%02d', $vars['cc_expire_Month'], substr($vars['cc_expire_Year'], 2, 2));
$vars1['cc_startdate'] = sprintf('%02d%02d', $vars['cc_startdate_Month'], substr($vars['cc_startdate_Year'], 2, 2));
$vars1['cc'] = get_visible_cc_number($vars['cc_number']);
$product = $db->get_product($payment['product_id']);
$x = list($res, $err_msg, $receipt_id, $log) = $plugin->cc_bill($vars1, $member, $payment['amount'], $product[$payment['paysys_id'] . '_currency'], $title, $charge_type, $payment['payment_id'], $payment);
$payment = $db->get_payment($payment['payment_id']);
foreach ($log as $v) {
$payment['data'][] = $v;
}
$db->update_payment($payment['payment_id'], $payment);
if ($res == CC_RESULT_SUCCESS) {
$err = $db->finish_waiting_payment($payment['payment_id'], $payment['paysys_id'], $receipt_id, $payment['amount'], '', cc_core_get_payer_id($vars, $member));
if ($err) {
fatal_error($err . ": payment_id = {$payment['payment_id']}");
}
$member = $db->get_user($member['member_id']);
// get possible changes does in site.inc.php
/// save cc info to db
if ($charge_type != CC_CHARGE_TYPE_REGULAR) {
$features = $plugin->get_plugin_features();
if (!$features['no_recurring']) {
save_cc_info($vars, $member, $payment['paysys_id']);
}
}
/// display thanks page
$product = $db->get_product($payment['product_id']);
$member = $db->get_user($payment['member_id']);
function cc_core_rebill($plugin, $dat = '', $running_from_cron = true, $repeat_declined = false)
{
global $config, $db, $t;
if (!$config['use_cron'] && $running_from_cron) {
$db->log_error("{$plugin} rebill can be run only with external cron");
}
$amDb =& amDb();
if ($dat == '') {
$dat = date('Y-m-d');
}
$tomorrow = date('Y-m-d', strtotime($dat) + 3600 * 24);
$pl =& instantiate_plugin('payment', $plugin);
if (!method_exists($pl, 'cc_bill')) {
fatal_error("This plugin ({$plugin}) is not handled by cc_core!");
}
// check if another rebilling process is active
// last status_tm / added_tm in rebill_log is < 5 minutes ago
// to avoiding starting new process while a PHP rebill script runned
// less than 10 minutes ago is still running
if ($running_from_cron) {
if ($last_rebill_log_id = $amDb->selectCell("SELECT MAX(rebill_log_id) FROM ?_rebill_log")) {
$last_tm_diff = $amDb->selectCell("SELECT UNIX_TIMESTAMP(NOW()) - UNIX_TIMESTAMP(IFNULL(status_tm, added_tm)) \n\t\t\t\tFROM ?_rebill_log WHERE rebill_log_id=?", $last_rebill_log_id);
if ($last_tm_diff < 5 * 60) {
$db->log_error("[Notice] cc_core_rebill({$plugin}, {$dat}) skipped because previous rebilling process still working ({$last_tm_diff} seconds ago)");
return;
}
}
print ".\n";
// to avoid Apache's timeout
}
$payments = $db->get_expired_payments($dat, $dat, $plugin);
$renewed = array();
$log = "{$plugin} Rebill\n";
foreach ($payments as $p) {
if ($p['data']['CANCELLED']) {
continue;
}
$member_id = $p['member_id'];
$member = $db->get_user($member_id);
$product_id = $p['product_id'];
if ($renewed[$member_id][$product_id]++) {
continue;
}
$product =& get_product($product_id);
if (!$product->config['is_recurring']) {
continue;
}
if ($product->config['rebill_times'] && !cc_core_check_rebill_times($product->config['rebill_times'], $p)) {
continue;
}
// check if we've already tried to rebill the customer today
$check = $repeat_declined ? "SUM(status = 0)" : "MAX(status IS NOT NULL)";
if ($amDb->selectCell("SELECT {$check} FROM ?_rebill_log\n\t\t\tWHERE payment_id = ? AND payment_date = ? ", $p['payment_id'], $dat)) {
// retry on payment processor failure? todo, real tests needed
continue;
}
$vars = array('RENEWAL_ORIG' => "RENEWAL_ORIG: {$p['payment_id']}");
$pc =& new PriceCalculator();
$pc->setTax(get_member_tax($member_id));
$coupon_code = $p['data'][0]['COUPON_CODE'];
if ($config['use_coupons'] && $coupon_code != '') {
$coupon = $db->coupon_get($coupon_code, null, 1);
if ($coupon['coupon_id'] && $coupon['is_recurring']) {
$pc->setCouponDiscount($coupon['discount'], split(',', trim($coupon['product_id'])));
$vars['COUPON_CODE'] = $coupon_code;
}
}
$pc->addProduct($product_id);
$terms =& $pc->calculate();
$additional_values = array();
$additional_values['COUPON_DISCOUNT'] = $terms->discount;
$additional_values['TAX_AMOUNT'] = $terms->tax;
$payment_id = $db->add_waiting_payment($member_id, $product_id, $plugin, $terms->total, $dat, $product->get_expire($dat), $vars, $additional_values);
$rebill_log_id = $amDb->query("INSERT INTO ?_rebill_log \n\t\t(payment_id, added_tm, payment_date, amount, rebill_payment_id)\n\t\tVALUES\n\t\t(?d, ?, ?, ?f, ?d)", $p['payment_id'], date('Y-m-d H:i:s'), $dat, $terms->total, $payment_id);
$payment = $db->get_payment($payment_id);
$cc_info = $member['data'];
$cc_info['cc_number'] = amember_decrypt($cc_info['cc-hidden']);
$x = list($res, $err_msg, $receipt_id, $log) = $pl->cc_bill($cc_info, $member, $payment['amount'], $product->config[$payment['paysys_id'] . '_currency'], $product->config['title'], CC_CHARGE_TYPE_RECURRING, $payment['payment_id'], $payment);
foreach ($log as $v) {
$payment['data'][] = $v;
}
$db->update_payment($payment['payment_id'], $payment);
$amDb->query("UPDATE ?_rebill_log \n \tSET status = ?, status_tm = ?, status_msg = ? \n \tWHERE rebill_payment_id = ?d", $res, date('Y-m-d H:i:s'), $err_msg, $payment_id);
switch ($res) {
case CC_RESULT_SUCCESS:
$err = $db->finish_waiting_payment($payment['payment_id'], $payment['paysys_id'], $receipt_id, $payment['amount'], '', cc_core_get_payer_id($vars, $member));
if ($err) {
$db->log_error($err . ": payment_id = {$payment['payment_id']} (rebilling)");
}
if ($config['cc_rebill_success']) {
mail_rebill_success_member($member, $payment_id, $product);
}
break;
case CC_RESULT_INTERNAL_ERROR:
case CC_RESULT_DECLINE_TEMP:
if ($pl->config['reattempt'] != '') {
$new_expire = cc_core_prorate_subscription($p['payment_id'], $pl->config['reattempt'], $dat);
}
if ($config['cc_rebill_failed']) {
mail_rebill_failed_member($member, $payment_id, $product, "{$err_msg}", $new_expire);
}
if ($config['cc_rebill_failed_admin']) {
mail_rebill_failed_admin($member, $payment_id, $product, "{$err_msg}", $new_expire);
}
break;
case CC_RESULT_DECLINE_PERM:
if ($pl->config['reattempt'] != '') {
$new_expire = cc_core_prorate_subscription($p['payment_id'], $pl->config['reattempt'], $dat);
}
if ($config['cc_rebill_failed']) {
mail_rebill_failed_member($member, $payment_id, $product, "{$err_msg}", $new_expire);
}
if ($config['cc_rebill_failed_admin']) {
mail_rebill_failed_admin($member, $payment_id, $product, "{$err_msg}", $new_expire);
}
// clean_cc_info($member);
break;
case CC_RESULT_IGNORE:
break;
default:
$db->log_error("Unknown return from plugin_bill: {$res}");
}
}
}
function process_postback($vars)
{
global $db;
$this->config['disable_postback_log'] = 1;
$vars['PaRes'] = urlencode($vars['PaRes']);
$vars['MD'] = urlencode($vars['MD']);
$log = array();
$log[] = $vars;
$s = cc_core_get_url("https://www.beanstream.com/scripts/process_transaction_auth.asp" . "?PaRes={$vars['PaRes']}&MD={$vars['MD']}");
parse_str($s, $ret);
$log[] = $ret;
if ($ret['trnApproved']) {
$x = array(CC_RESULT_SUCCESS, "", $ret['trnId'], $log);
} else {
if ($ret['errorType'] == 'S') {
$x = array(CC_RESULT_INTERNAL_ERROR, $ret['messageText'], "", $log);
} else {
$x = array(CC_RESULT_DECLINE_PERM, $ret['messageText'], "", $log);
}
}
list($res, $err_msg, $receipt_id, $log) = $x;
$payment = $db->get_payment($ret['trnOrderNumber']);
$member = $db->get_user($payment['member_id']);
foreach ($log as $v) {
$payment['data'][] = $v;
}
$db->update_payment($payment['payment_id'], $payment);
if ($res == CC_RESULT_SUCCESS) {
$cc_info = array('cc_number' => amember_decrypt($member['cc-hidden']));
$err = $db->finish_waiting_payment($payment['payment_id'], $payment['paysys_id'], $receipt_id, $payment['amount'], '', cc_core_get_payer_id($cc_info, $member));
if ($err) {
fatal_error($err . ": payment_id = {$payment['payment_id']}");
}
/// save cc info to db
// if ($charge_type != CC_CHARGE_TYPE_REGULAR){
// save_cc_info($cc_info, $member, $payment['paysys_id']);
// }
/// display thanks page
$product = $db->get_product($payment['product_id']);
$t =& new_smarty();
$t->assign('payment', $payment);
if ($payment) {
$t->assign('product', $db->get_product($payment['product_id']));
$t->assign('member', $db->get_user($payment['member_id']));
}
if (!($prices = $payment['data'][0]['BASKET_PRICES'])) {
$prices = array($payment['product_id'] => $payment['amount']);
}
$pr = array();
$subtotal = 0;
foreach ($prices as $product_id => $price) {
$v = $db->get_product($product_id);
// $v['price'] = $price;
$subtotal += $v['price'];
$pr[$product_id] = $v;
}
$t->assign('subtotal', $subtotal);
$t->assign('total', array_sum($prices));
$t->assign('products', $pr);
$t->display("thanks.html");
} else {
$member = $db->get_user($payment['member_id']);
$v = get_cc_info_hash($member, $action = "mfp");
$_GET = $_POST = $vars = array('action' => 'mfp', 'payment_id' => $payment['payment_id'], 'paysys_id' => $payment['paysys_id'], 'member_id' => $member_id, 'v' => $v);
global $t;
$t = new_smarty();
foreach ($vars as $k => $v) {
$t->_smarty_vars['request'][$k] = $v;
}
ask_cc_info($member, $payment, $vars, 0, array(_PLUG_PAY_BEANSTREAM_PFAILED . $err_msg));
}
}
