function payready_rebill()
{
    global $config, $db, $t;
    if (!$config['use_cron']) {
        fatal_error("PayReady rebill can be run only with external cron");
    }
    $dat = date('Y-m-d');
    $tomorrow = date('Y-m-d', time() + 3600 * 24);
    $payments = $db->get_expired_payments($dat, $dat, 'payready');
    $renewed = array();
    $log = "PayReady 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'] && !payready_check_rebill_times($product->config['rebill_times'], $p)) {
            continue;
        }
        $vars = array('RENEWAL_ORIG' => "RENEWAL_ORIG: {$p['payment_id']}");
        $payment_id = $db->add_waiting_payment($member_id, $product_id, 'payready', $product->config['price'], $dat, $product->get_expire($dat), $vars);
        list($err, $errno) = payready_payment($payment_id, $member_id);
        if ($errno > 1) {
            mail_rebill_failed_member($member, $payment_id, $product, "{$err} ({$errno})");
        } elseif (!$errno) {
            $db->log_error("no return from PayReady, payment #{$payment_id}");
        } elseif ($errno == 1) {
            $err = "COMPLETED";
            mail_rebill_success_member($member, $payment_id, $product);
        }
        $log .= "login: {$p['member_login']} payment#: {$payment_id}: {$err} ({$errno})\n";
    }
    #    print $log;
}
示例#2
0
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}");
        }
    }
}