<?php
class ControllerExtensionPaymentLaybuy extends Controller {

    public function index() {
        $this->load->language('extension/payment/laybuy');

        $this->load->model('extension/payment/laybuy');

        $this->load->model('checkout/order');

        $data['heading_title'] = $this->language->get('heading_title');

        $data['text_plan_preview'] = $this->language->get('text_plan_preview');
        $data['text_payment'] = $this->language->get('text_payment');
        $data['text_due_date'] = $this->language->get('text_due_date');
        $data['text_amount'] = $this->language->get('text_amount');
        $data['text_downpayment'] = $this->language->get('text_downpayment');
        $data['text_today'] = $this->language->get('text_today');
        $data['text_delivery_msg'] = $this->language->get('text_delivery_msg');
        $data['text_fee_msg'] = $this->language->get('text_fee_msg');
        $data['text_month'] = $this->language->get('text_month');
        $data['text_loading'] = $this->language->get('text_loading');

        $data['entry_initial'] = $this->language->get('entry_initial');
        $data['entry_months'] = $this->language->get('entry_months');

        $data['button_confirm'] = $this->language->get('button_confirm');

        $data['action'] = $this->url->link('extension/payment/laybuy/postToLaybuy');

        $order_info = $this->model_checkout_order->getOrder($this->session->data['order_id']);

        $data['order_info'] = $order_info;

        $data['total'] = $order_info['total'];

        $data['currency_symbol_left'] = $this->currency->getSymbolLeft($this->session->data['currency']);

        $data['currency_symbol_right'] = $this->currency->getSymbolRight($this->session->data['currency']);

        $data['initial_payments'] = $this->model_extension_payment_laybuy->getInitialPayments();

        $data['months'] = $this->model_extension_payment_laybuy->getMonths();

        return $this->load->view('extension/payment/laybuy', $data);
    }

    public function postToLaybuy() {
        $this->load->model('extension/payment/laybuy');

        $this->model_extension_payment_laybuy->log('Posting to Laybuy');

        if ($this->request->server['REQUEST_METHOD'] == 'POST') {
            $this->load->model('checkout/order');

            $order_info = $this->model_checkout_order->getOrder($this->session->data['order_id']);

            if ($order_info) {
                $this->model_extension_payment_laybuy->log('Order ID: ' . $order_info['order_id']);

                $data = array();

                $data['VERSION'] = '0.2';
                $data['MEMBER'] = $this->config->get('laybuys_membership_id');
                $data['RETURNURL'] = $this->url->link('extension/payment/laybuy/callback', '', true);
                $data['CANCELURL'] = $this->url->link('extension/payment/laybuy/cancel', '', true);
                $data['AMOUNT'] = round(floatval($order_info['total']), 2, PHP_ROUND_HALF_DOWN);
                $data['CURRENCY'] = $order_info['currency_code'];
                $data['INIT'] = (int)$this->request->post['INIT'];
                $data['MONTHS'] = (int)$this->request->post['MONTHS'];
                $data['MIND'] = ((int)$this->config->get('laybuy_min_deposit')) ? (int)$this->config->get('laybuy_min_deposit') : 20;
                $data['MAXD'] = ((int)$this->config->get('laybuy_max_deposit')) ? (int)$this->config->get('laybuy_max_deposit') : 50;
                $data['CUSTOM'] = $order_info['order_id'] . ':' . md5($this->config->get('laybuy_token'));
                $data['EMAIL'] = $order_info['email'];

                $data_string = '';

                foreach ($data as $param => $value) {
                    $data_string .= $param . '=' . $value . '&';
                }

                $data_string = rtrim($data_string, '&');

                $this->model_extension_payment_laybuy->log('Data String: ' . $data_string);

                $this->model_extension_payment_laybuy->log('Gateway URL: ' . $this->config->get('laybuy_gateway_url'));

                $ch = curl_init();
                curl_setopt($ch, CURLOPT_URL, $this->config->get('laybuy_gateway_url'));
                curl_setopt($ch, CURLOPT_POST, true);
                curl_setopt($ch, CURLOPT_POSTFIELDS, $data_string);
                curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
                curl_setopt($ch, CURLOPT_HEADER, false);
                curl_setopt($ch, CURLOPT_TIMEOUT, 30);
                curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
                $result = curl_exec($ch);
                if (curl_errno($ch)) {
                    $this->model_extension_payment_laybuy->log('cURL error: ' . curl_errno($ch));
                }
                curl_close($ch);

                $result = json_decode($result, true);

                $this->model_extension_payment_laybuy->log('Response: ' . print_r($result, true));

                if (isset($result['ACK']) && isset($result['TOKEN']) && $result['ACK'] == 'SUCCESS') {
                    $this->model_extension_payment_laybuy->log('Success response. Redirecting to PayPal.');

                    $this->response->redirect($this->config->get('laybuy_gateway_url') . '?TOKEN=' . $result['TOKEN']);
                } else {
                    $this->model_extension_payment_laybuy->log('Failure response. Redirecting to checkout/failure.');

                    $this->response->redirect($this->url->link('checkout/failure', '', true));
                }
            } else {
                $this->model_extension_payment_laybuy->log('No matching order. Redirecting to checkout/failure.');

                $this->response->redirect($this->url->link('checkout/failure', '', true));
            }
        } else {
            $this->model_extension_payment_laybuy->log('No $_POST data. Redirecting to checkout/failure.');

            $this->response->redirect($this->url->link('checkout/failure', '', true));
        }
    }

    public function callback() {
        $this->load->model('extension/payment/laybuy');

        $this->model_extension_payment_laybuy->log('Receiving callback');

        if ($this->request->server['REQUEST_METHOD'] == 'POST' && isset($this->request->post['RESULT']) && $this->request->post['RESULT'] == 'SUCCESS') {
            $this->load->model('checkout/order');

            $custom = $this->request->post['CUSTOM'];

            $custom = explode(':', $custom);

            $order_id = $custom[0];

            $token = $custom[1];

            $this->model_extension_payment_laybuy->log('Received Token: ' . $token);

            $this->model_extension_payment_laybuy->log('Actual Token: ' . md5($this->config->get('laybuy_token')));

            if (hash_equals(md5($this->config->get('laybuy_token')), $token)) {
                $this->model_extension_payment_laybuy->log('Order ID: ' . $order_id);

                $order_info = $this->model_checkout_order->getOrder($order_id);

                if ($order_info) {
                    $this->model_checkout_order->addOrderHistory($order_id, $this->config->get('laybuy_order_status_id_pending'));

                    $transaction_report = $this->model_extension_payment_laybuy->prepareTransactionReport($this->request->post);

                    $this->model_extension_payment_laybuy->addTransaction($transaction_report, 1);

                    $this->model_extension_payment_laybuy->log('Success. Redirecting to checkout/success.');

                    $this->response->redirect($this->url->link('checkout/success', '', true));
                } else {
                    $this->model_extension_payment_laybuy->log('No matching order. Redirecting to checkout/failure.');

                    $this->response->redirect($this->url->link('checkout/failure', '', true));
                }
            } else {
                $this->model_extension_payment_laybuy->log('Token does not match. Redirecting to checkout/failure.');

                $this->response->redirect($this->url->link('checkout/failure', '', true));
            }
        } elseif ($this->request->server['REQUEST_METHOD'] == 'POST' && isset($this->request->post['RESULT']) && $this->request->post['RESULT'] == 'FAILURE') {
            $this->model_extension_payment_laybuy->log('Failure Response: ' . $this->request->post);

            $this->model_extension_payment_laybuy->log('Redirecting to checkout/failure.');

            $this->response->redirect($this->url->link('checkout/failure', '', true));
        } else {
            $this->model_extension_payment_laybuy->log('Either no $_POST data or unknown response. Redirecting to checkout/failure.');

            $this->response->redirect($this->url->link('checkout/failure', '', true));
        }
    }

    public function cancel() {
        $this->load->model('extension/payment/laybuy');

        $this->model_extension_payment_laybuy->log('Transaction canceled by user. Redirecting to checkout/checkout.');

        $this->response->redirect($this->url->link('checkout/checkout', '', true));
    }

    public function reviseCallback() {
        $this->load->model('extension/payment/laybuy');

        $this->load->language('extension/payment/laybuy');

        $this->model_extension_payment_laybuy->log('Receiving callback');

        if ($this->request->server['REQUEST_METHOD'] == 'POST') {
            if (isset($this->request->post['RESULT']) && $this->request->post['RESULT'] == 'SUCCESS') {
                $this->load->model('checkout/order');

                $custom = $this->request->post['CUSTOM'];

                $custom = explode(':', $custom);

                $order_id = $custom[0];

                $token = $custom[1];

                $this->model_extension_payment_laybuy->log('Received Token: ' . $token);

                $this->model_extension_payment_laybuy->log('Actual Token: ' . md5($this->config->get('laybuy_token')));

                if (hash_equals(md5($this->config->get('laybuy_token')), $token)) {
                    $this->model_extension_payment_laybuy->log('Order ID: ' . $order_id);

                    $order_info = $this->model_checkout_order->getOrder($order_id);

                    if ($order_info) {
                        $response = $this->request->post;

                        $this->model_extension_payment_laybuy->log('Response: ' . print_r($response, true));

                        $revised_transaction_id = $response['MERCHANTS_REF_NO'];

                        $revised_transaction = $this->model_extension_payment_laybuy->getRevisedTransaction($revised_transaction_id);

                        $this->model_extension_payment_laybuy->log('Revised transaction: ' . print_r($revised_transaction, true));

                        $status = 1;

                        $current_date = date('Y-m-d h:i:s');

                        if (!isset($response['DOWNPAYMENT']) && !$revised_transaction['payment_type']) {
                            $this->model_extension_payment_laybuy->log('Buy-Now');

                            $response['DOWNPAYMENT'] = 100;
                            $response['MONTHS'] = 0;
                            $response['DOWNPAYMENT_AMOUNT'] = $response['AMOUNT'];
                            $response['PAYMENT_AMOUNTS'] = 0;
                            $response['FIRST_PAYMENT_DUE'] = $current_date;
                            $response['LAST_PAYMENT_DUE'] = $current_date;
                            $response['PAYPAL_PROFILE_ID'] = '';

                            $status = 5;

                            $this->model_checkout_order->addOrderHistory($order_id, $this->config->get('laybuy_order_status_id_processing'), $this->language->get('text_comment'));
                        } else {
                            $this->model_extension_payment_laybuy->log('Lay-Buy');
                        }

                        $this->session->data['order_id'] = $order_id;

                        $transaction_report = $this->model_extension_payment_laybuy->prepareTransactionReport($response);

                        $transaction_report['order_id'] = $order_id;

                        $this->model_extension_payment_laybuy->addTransaction($transaction_report, $status);

                        $old_transaction = $this->model_extension_payment_laybuy->getTransaction($revised_transaction['laybuy_transaction_id']);

                        $report_content = json_decode($old_transaction['report'], true);

                        foreach ($report_content as &$array) {
                            $array['status'] = str_replace('Pending', 'Canceled', $array['status']);
                        }

                        $report_content = json_encode($report_content);

                        if ($old_transaction['paypal_profile_id']) {
                            $this->model_extension_payment_laybuy->log('Canceling transaction');

                            $data_string = 'mid=' . $this->config->get('laybuys_membership_id') . '&' . 'paypal_profile_id=' . $old_transaction['paypal_profile_id'];

                            $this->model_extension_payment_laybuy->log('Data String: ' . $data_string);

                            $ch = curl_init();
                            $url = 'https://lay-buys.com/vtmob/deal5cancel.php';
                            curl_setopt($ch, CURLOPT_URL, $url);
                            curl_setopt($ch, CURLOPT_POST, true);
                            curl_setopt($ch, CURLOPT_POSTFIELDS, $data_string);
                            curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
                            curl_setopt($ch, CURLOPT_HEADER, false);
                            curl_setopt($ch, CURLOPT_TIMEOUT, 30);
                            curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
                            $result = curl_exec($ch);
                            if (curl_errno($ch)) {
                                $this->model_extension_payment_laybuy->log('cURL error: ' . curl_errno($ch));
                            }
                            curl_close($ch);

                            $this->model_extension_payment_laybuy->log('Response: ' . $result);

                            if ($result == 'success') {
                                $this->model_extension_payment_laybuy->log('Success');
                            } else {
                                $this->model_extension_payment_laybuy->log('Failure');
                            }
                        } else {
                            $this->model_extension_payment_laybuy->log('Transaction has no paypal_profile_id');
                        }

                        $this->model_extension_payment_laybuy->updateTransaction($old_transaction['laybuy_transaction_id'], '51', $report_content, $old_transaction['transaction']);

                        $this->model_extension_payment_laybuy->deleteRevisedTransaction($revised_transaction['laybuy_revise_request_id']);

                        $this->response->redirect($this->url->link('checkout/success', '', true));
                    } else {
                        $this->model_extension_payment_laybuy->log('No matching order. Redirecting to checkout/failure.');

                        $this->response->redirect($this->url->link('checkout/failure', '', true));
                    }
                } else {
                    $this->model_extension_payment_laybuy->log('Token does not match. Redirecting to checkout/failure.');

                    $this->response->redirect($this->url->link('checkout/failure', '', true));
                }
            } else {
                $this->model_extension_payment_laybuy->log('No success response');

                $this->response->redirect($this->url->link('checkout/failure', '', true));
            }
        } else {
            $this->model_extension_payment_laybuy->log('No $_POST data');

            $this->response->redirect($this->url->link('checkout/failure', '', true));
        }
    }

    public function reviseCancel() {
        $this->load->model('extension/payment/laybuy');

        $this->model_extension_payment_laybuy->log('Revise canceled. Redirecting to checkout/checkout.');

        $this->response->redirect($this->url->link('checkout/checkout', '', true));
    }

    public function deleteOrder($route = '', $output = '', $order_id = 0, $order_status_id = 0) {
        $this->load->model('extension/payment/laybuy');

        if (isset($this->session->data['api_id'])) {
            $this->model_extension_payment_laybuy->log('Deleting order #' . $order_id);

            $this->model_extension_payment_laybuy->deleteTransactionByOrderId($order_id);
        } else {
            $this->model_extension_payment_laybuy->log('No API ID in session');
        }
    }

    public function cron() {
        $this->load->model('extension/payment/laybuy');

        $this->load->language('extension/payment/laybuy');

        $this->model_extension_payment_laybuy->log('Running cron');

        if (isset($this->request->get['token']) && hash_equals($this->config->get('laybuy_token'), $this->request->get['token'])) {
            $paypal_profile_id_array = $this->model_extension_payment_laybuy->getPayPalProfileIds();

            if ($paypal_profile_id_array) {
                $paypal_profile_ids = '';

                foreach ($paypal_profile_id_array as $profile_id) {
                    $paypal_profile_ids .= $profile_id['paypal_profile_id'] . ',';
                }

                $paypal_profile_ids = rtrim($paypal_profile_ids, ',');

                $data_string = 'mid=' . $this->config->get('laybuys_membership_id') . '&' . 'profileIds=' . $paypal_profile_ids;

                $this->model_extension_payment_laybuy->log('Data String: ' . $data_string);

                $this->model_extension_payment_laybuy->log('API URL: ' . $this->config->get('laybuy_api_url'));

                $ch = curl_init();
                curl_setopt($ch, CURLOPT_URL, $this->config->get('laybuy_api_url'));
                curl_setopt($ch, CURLOPT_POST, true);
                curl_setopt($ch, CURLOPT_POSTFIELDS, $data_string);
                curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
                curl_setopt($ch, CURLOPT_HEADER, false);
                curl_setopt($ch, CURLOPT_TIMEOUT, 30);
                curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
                $result = curl_exec($ch);
                if (curl_errno($ch)) {
                    $this->model_extension_payment_laybuy->log('cURL error: ' . curl_errno($ch));
                }
                curl_close($ch);

                $results = json_decode($result, true);

                $this->model_extension_payment_laybuy->log('Response: ' . print_r($results, true));

                if ($results) {
                    $this->load->model('checkout/order');

                    foreach ($results as $laybuy_ref_id => $reports) {
                        $status = $reports['status'];

                        $report = $reports['report'];

                        $transaction = array();

                        $transaction = $this->model_extension_payment_laybuy->getTransactionByLayBuyRefId($laybuy_ref_id);

                        $order_id = $transaction['order_id'];

                        $paypal_profile_id = $transaction['paypal_profile_id'];

                        $months = $transaction['months'];

                        $report_content = array();

                        $pending_flag = false;

                        $next_payment_status = $this->language->get('text_status_1');

                        foreach ($report as $month => $payment) {
                            $payment['paymentDate'] = date('Y-m-d h:i:s', strtotime(str_replace('/', '-', $payment['paymentDate'])));
                            $date = date($this->language->get('date_format_short'), strtotime($payment['paymentDate']));
                            $next_payment_date = $payment['paymentDate'];

                            if ($payment['type'] == 'd') {
                                $report_content[] = array(
                                    'instalment'  => 0,
                                    'amount'      => $this->currency->format($payment['amount'], $transaction['currency']),
                                    'date'        => $date,
                                    'pp_trans_id' => $payment['txnID'],
                                    'status'      => $payment['paymentStatus']
                                );
                            } elseif ($payment['type'] == 'p') {
                                $pending_flag = true;

                                $report_content[] = array(
                                    'instalment'  => $month,
                                    'amount'      => $this->currency->format($payment['amount'], $transaction['currency']),
                                    'date'        => $date,
                                    'pp_trans_id' => $payment['txnID'],
                                    'status'      => $payment['paymentStatus']
                                );

                                $next_payment_status = $payment['paymentStatus'];
                            }
                        }

                        if ($pending_flag) {
                            $start_index = $month + 1;
                        } else {
                            $start_index = $month + 2;
                        }

                        if ($month < $months) {
                            for ($month = 1; $month <= $months; $month++) {
                                $next_payment_date = date("Y-m-d h:i:s", strtotime($next_payment_date . " +1 month"));
                                $date = date($this->language->get('date_format_short'), strtotime($next_payment_date));

                                $report_content[] = array(
                                    'instalment'  => $month,
                                    'amount'      => $this->currency->format($transaction['payment_amounts'], $transaction['currency']),
                                    'date'        => $date,
                                    'pp_trans_id' => '',
                                    'status'      => $next_payment_status
                                );
                            }
                        }

                        $report_content = json_encode($report_content);

                        switch ($status) {
                            case -1: // Cancel
                                $this->model_extension_payment_laybuy->log('Transaction #' . $transaction['laybuy_transaction_id'] . ' canceled');
                                $this->model_checkout_order->addOrderHistory($order_id, $this->config->get('laybuy_order_status_id_canceled'), $this->language->get('text_comment'), false, false);
                                $this->model_extension_payment_laybuy->updateTransaction($transaction['laybuy_transaction_id'], '7', $report_content, $start_index);
                                break;
                            case 0: // Pending
                                $this->model_extension_payment_laybuy->log('Transaction #' . $transaction['laybuy_transaction_id'] . ' still pending');
                                $this->model_extension_payment_laybuy->updateTransaction($transaction['laybuy_transaction_id'], $transaction['status'], $report_content, $start_index);
                                break;
                            case 1: // Paid
                                $this->model_extension_payment_laybuy->log('Transaction #' . $transaction['laybuy_transaction_id'] . ' paid');
                                $this->model_checkout_order->addOrderHistory($order_id, $this->config->get('laybuy_order_status_id_processing'), $this->language->get('text_comment'), false, false);
                                $this->model_extension_payment_laybuy->updateTransaction($transaction['laybuy_transaction_id'], '5', $report_content, $start_index);
                                break;
                        }
                    }
                }
            } else {
                $this->model_extension_payment_laybuy->log('No PayPal Profile IDs to update');
            }

            $this->model_extension_payment_laybuy->updateCronRunTime();
        } else {
            $this->model_extension_payment_laybuy->log('Token does not match.');
        }
    }

}