<?php
/* --------------------------------------------------------------
  payment.php 2018-02-16
  Gambio GmbH
  http://www.gambio.de
  Copyright (c) 2018 Gambio GmbH
  Released under the GNU General Public License (Version 2)
  [http://www.gnu.org/licenses/gpl-2.0.html]
  --------------------------------------------------------------


  based on:
  (c) 2000-2001 The Exchange Project  (earlier name of osCommerce)
  (c) 2002-2003 osCommerce(payment.php,v 1.36 2003/02/11); www.oscommerce.com
  (c) 2003	 nextcommerce (payment.php,v 1.11 2003/08/17); www.nextcommerce.org
  (c) 2003 XT-Commerce - community made shopping http://www.xt-commerce.com ($Id: payment.php 1136 2005-08-07 13:19:54Z mz $)

  Released under the GNU General Public License
  -----------------------------------------------------------------------------------------
  Third Party contribution:

  Credit Class/Gift Vouchers/Discount Coupons (Version 5.10)
  http://www.oscommerce.com/community/contributions,282
  Copyright (c) Strider | Strider@oscworks.com
  Copyright (c  Nick Stanko of UkiDev.com, nick@ukidev.com
  Copyright (c) Andre ambidex@gmx.net
  Copyright (c) 2001,2002 Ian C Wilson http://www.phesis.org


  Released under the GNU General Public License
  --------------------------------------------------------------------------------------- */

// include needed functions
require_once(DIR_FS_INC . 'xtc_count_payment_modules.inc.php');
require_once(DIR_FS_INC . 'xtc_in_array.inc.php');

class payment_ORIGIN
{
	var $modules, $selected_module;

	// class constructor
	public function __construct($module = '')
	{
		$coo_lang_file_master = MainFactory::create_object('LanguageTextManager', array(), true);

		if(defined('MODULE_PAYMENT_INSTALLED') && xtc_not_null(MODULE_PAYMENT_INSTALLED))
		{
			$t_gm_module_payment_installed = str_replace(';;', ';', MODULE_PAYMENT_INSTALLED);

			if(strpos($t_gm_module_payment_installed, ';') === 0)
			{
				$t_gm_module_payment_installed = substr($t_gm_module_payment_installed, 1);
			}

			if(substr($t_gm_module_payment_installed, -1) == ';')
			{
				$t_gm_module_payment_installed = substr($t_gm_module_payment_installed, 0, -1);
			}

			$this->modules = explode(';', $t_gm_module_payment_installed);
			$include_modules = array();

			if((xtc_not_null($module)) && (in_array($module . '.php', $this->modules)))
			{
				$this->selected_module = $module;

				$include_modules[] = array('class' => $module, 'file' => $module . '.php');
			}
			else
			{
				reset($this->modules);
				foreach($this->modules as $value)
				{
					$class = substr($value, 0, strrpos($value, '.'));
					$include_modules[] = array('class' => $class, 'file' => $value);
				}
			}

			// load unallowed modules into array
			$unallowed_modules = explode(',', $_SESSION['customers_status']['customers_status_payment_unallowed'] . ',' . $GLOBALS['order']->customer['payment_unallowed']);

			// add unallowed modules/Download
			if($GLOBALS['order']->content_type == 'virtual' || $GLOBALS['order']->content_type == 'virtual_weight' || $GLOBALS['order']->content_type == 'mixed')
			{
				$unallowed_modules = array_merge($unallowed_modules, explode(',', DOWNLOAD_UNALLOWED_PAYMENT));
			}

			// disable payment method 'cod' for gift vouchers
			if($_SESSION['cart']->count_contents_non_virtual() == 0 && array_search('cod', $unallowed_modules) === false)
			{
				$unallowed_modules[] = 'cod';
			}

			for($i = 0, $n = sizeof($include_modules); $i < $n; $i++)
			{
				if(!in_array($include_modules[$i]['class'], $unallowed_modules))
				{
					// check if zone is alowed to see module
					if(constant('MODULE_PAYMENT_' . strtoupper(str_replace('.php', '', $include_modules[$i]['file'])) . '_ALLOWED') != '')
					{
						$unallowed_zones = explode(',', constant('MODULE_PAYMENT_' . strtoupper(str_replace('.php', '', $include_modules[$i]['file'])) . '_ALLOWED'));
					}
					else
					{
						$unallowed_zones = array();
					}

					if(in_array($_SESSION['delivery_zone'], $unallowed_zones) == true || count($unallowed_zones) == 0)
					{
						if($include_modules[$i]['file'] != '' && $include_modules[$i]['file'] != 'no_payment')
						{
							$payment_class_file = DIR_WS_MODULES . 'payment/' . $include_modules[$i]['file'];
							if(file_exists($payment_class_file))
							{
								$coo_lang_file_master->init_from_lang_file('lang/' . $_SESSION['language'] . '/modules/payment/' . $include_modules[$i]['file']);
								include_once($payment_class_file);
							}
							else
							{
								continue;
							}
						}

						$GLOBALS[$include_modules[$i]['class']] = new $include_modules[$i]['class'];
					}
				}
			}

			// if there is only one payment method, select it as default because in
			// checkout_confirmation.php the $payment variable is being assigned the
			// $HTTP_POST_VARS['payment'] value which will be empty (no radio button selection possible)
			if((xtc_count_payment_modules() == 1) && (!is_object($_SESSION['payment']))
			   && $_SESSION['payment'] != 'no_payment'
			   && !isset($_SESSION['credit_covers'])
			)
			{
				$gm_selected_payment = $this->selection();

				if(!empty($gm_selected_payment[0]['id']))
				{
					$_SESSION['payment'] = $gm_selected_payment[0]['id'];
				}
				else
				{
					$_SESSION['payment'] = $include_modules[0]['class'];
				}
			}

			if((xtc_not_null($module)) && (in_array($module, $this->modules)) && (isset($GLOBALS[$module]->form_action_url)))
			{
				$this->form_action_url = $GLOBALS[$module]->form_action_url;
			}
		}
	}

	// class methods
	/* The following method is needed in the checkout_confirmation.php page
	  due to a chicken and egg problem with the payment class and order class.
	  The payment modules needs the order destination data for the dynamic status
	  feature, and the order class needs the payment module title.
	  The following method is a work-around to implementing the method in all
	  payment modules available which would break the modules in the contributions
	  section. This should be looked into again post 2.2.
	 */
	function update_status()
	{
		if(is_array($this->modules) && is_object($GLOBALS[$this->selected_module]) && method_exists($GLOBALS[$this->selected_module], 'update_status'))
		{
			$GLOBALS[$this->selected_module]->update_status();
		}
	}

	function refresh()
	{
		if(is_array($this->modules) && is_object($GLOBALS[$this->selected_module]) && method_exists($GLOBALS[$this->selected_module], 'refresh'))
		{
			$GLOBALS[$this->selected_module]->refresh();
		}
	}

	function javascript_validation()
	{
		$js = '';
		// BOF GM_MOD
		/*
		  if (is_array($this->modules)) {
		  $js = '<script type="text/javascript"><!-- ' . "\n" .
		  'function check_form() {' . "\n" .
		  '  var error = 0;' . "\n" .
		  '  var error_message = unescape("' . xtc_js_lang(JS_ERROR) . '");' . "\n" .
		  '  var payment_value = null;' . "\n" .
		  '  if (document.getElementById("checkout_payment").payment.length) {' . "\n" .
		  '    for (var i=0; i<document.getElementById("checkout_payment").payment.length; i++) {' . "\n" .
		  '      if (document.getElementById("checkout_payment").payment[i].checked) {' . "\n" .
		  '        payment_value = document.getElementById("checkout_payment").payment[i].value;' . "\n" .
		  '      }' . "\n" .
		  '    }' . "\n" .
		  '  } else if (document.getElementById("checkout_payment").payment.checked) {' . "\n" .
		  '    payment_value = document.getElementById("checkout_payment").payment.value;' . "\n" .
		  '  } else if (document.getElementById("checkout_payment").payment.value) {' . "\n" .
		  '    payment_value = document.getElementById("checkout_payment").payment.value;' . "\n" .
		  '  }' . "\n\n";

		  reset($this->modules);
		  foreach($this->modules as $value) {
		  $class = substr($value, 0, strrpos($value, '.'));
		  if ($GLOBALS[$class]->enabled) {
		  $js .= $GLOBALS[$class]->javascript_validation();
		  }
		  }
		  if (DISPLAY_CONDITIONS_ON_CHECKOUT == 'true') {
		  $js .= "\n" . '  if (!document.getElementById("checkout_payment").conditions.checked) {' . "\n" .
		  '    error_message = error_message + unescape("' . xtc_js_lang(ERROR_CONDITIONS_NOT_ACCEPTED) . '");' . "\n" .
		  '    error = 1;' . "\n" .
		  '  }' . "\n\n";
		  }
		  $js .= "\n" . '  if (payment_value == null) {' . "\n" .
		  '    error_message = error_message + unescape("' . xtc_js_lang(JS_ERROR_NO_PAYMENT_MODULE_SELECTED) . '");' . "\n" .
		  '    error = 1;' . "\n" .
		  '  }' . "\n\n" .
		  '  if (error == 1 && submitter != 1) {' . "\n" . // GV Code Start/End
		  '    alert(error_message);' . "\n" .
		  '    return false;' . "\n" .
		  '  } else {' . "\n" .
		  '    return true;' . "\n" .
		  '  }' . "\n" .
		  '}' . "\n" .
		  '//--></script>' . "\n";
		  }
		 */
		// EOF GM_MOD

		return $js;
	}

	function selection()
	{
		$selection_array = array();

		if(is_array($this->modules))
		{
			reset($this->modules);
			foreach($this->modules as $value)
			{
				$class = substr($value, 0, strrpos($value, '.'));

				if($GLOBALS[$class]->enabled)
				{
					$selection = $GLOBALS[$class]->selection();

					if(is_array($selection))
					{
						$selection = $this->extendSelection($selection);
						$selection_array[] = $selection;
					}
				}
			}
		}

		return $selection_array;
	}
	
	public function getPaymentModuleSelectionLogoUrl($selection)
	{
		$logoFile = 'default.png';
		$logoExtensions = ['.svg', '.png', '.gif', '.jpg'];
		$languageExtensions = [strtolower($_SESSION['language_code']), ''];
		foreach($languageExtensions as $languageExtension)
		{
			$languageExtension = empty($languageExtension) ? $languageExtension : '_' . $languageExtension;
			foreach($logoExtensions as $extension)
			{
				$logoFileCandidate = $selection['id'] . $languageExtension . $extension;
				if(file_exists(DIR_FS_CATALOG . 'images/icons/payment/' . $logoFileCandidate))
				{
					$logoFile = $logoFileCandidate;
					break 2;
				}
			}
		}
		
		$logoUrl = xtc_href_link('images/icons/payment/' . $logoFile, '', 'SSL', false, false, false, true, true);
		return $logoUrl;
	}

	protected function extendSelection($selection)
	{
		$selectionDefaults = [
			'logo_url' => $this->getPaymentModuleSelectionLogoUrl($selection),
			'logo_alt' => $selection['module'],
		];
		$selection = array_merge($selectionDefaults, $selection);
		return $selection;
	}

	//GV Code Start
	//ICW CREDIT CLASS Gift Voucher System
	// check credit covers was setup to test whether credit covers is set in other parts of the code
	function check_credit_covers()
	{
		global $credit_covers;

		return $credit_covers;
	}

	// GV Code End

	function pre_confirmation_check()
	{
		// GV Code ICW CREDIT CLASS Gift Voucher System

		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && $GLOBALS[$this->selected_module]->enabled)
			{
				if($GLOBALS['credit_covers'])
				{ // GV Code ICW CREDIT CLASS Gift Voucher System
					$GLOBALS[$this->selected_module]->enabled = false; // GV Code ICW CREDIT CLASS Gift Voucher System
					$GLOBALS[$this->selected_module] = NULL; // GV Code ICW CREDIT CLASS Gift Voucher System
					$GLOBALS['payment_modules'] = ''; // GV Code ICW CREDIT CLASS Gift Voucher System
				}
				else
				{ // GV Code ICW CREDIT CLASS Gift Voucher System
					$GLOBALS[$this->selected_module]->pre_confirmation_check();
				}
			}
		}
	}

	function confirmation()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->confirmation();
			}
		}
	}

	function process_button()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->process_button();
			}
		}
	}

	function before_process()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->before_process();
			}
		}
	}

	function payment_action()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->payment_action();
			}
		}
	}

	function after_process()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->after_process();
			}
		}
	}

	function get_error()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->get_error();
			}
		}
	}

	/* BOF GM MONEYBOOKERS */
	function iframeAction()
	{
		if(is_array($this->modules))
		{
			if(is_object($GLOBALS[$this->selected_module]) && ($GLOBALS[$this->selected_module]->enabled))
			{
				return $GLOBALS[$this->selected_module]->iframeAction();
			}
		}
	}
	/* BOF GM MONEYBOOKERS */
}