<?php
if( !defined( '_VALID_MOS' ) && !defined( '_JEXEC' ) ) die( 'Direct Access to '.basename(__FILE__).' is not allowed.' );
/**
*
* @version $Id: standard_shipping.php 2286 2010-02-01 15:28:00Z soeren_nb $
* @package VirtueMart
* @subpackage shipping
* @copyright Copyright (C) 2004-2010 soeren - All rights reserved.
* @license http://www.gnu.org/copyleft/gpl.html GNU/GPL, see LICENSE.php
* VirtueMart is free software. This version may have been modified pursuant
* to the GNU General Public License, and as distributed it includes or
* is derivative of works licensed under the GNU General Public License or
* other free or open source software licenses.
* See /administrator/components/com_virtuemart/COPYRIGHT.php for copyright notices and details.
*
* http://virtuemart.net
*/
class standard_shipping {
/**
* returns a HTML list with selectable rates
* $d[]: Array with search criteria
* "country", "zip", "weight"
* @param array $d
* @return string
*/
function list_rates( &$d ) {
global $VM_LANG, $CURRENCY_DISPLAY, $vmLogger ;
$auth = $_SESSION["auth"] ;
if( defined( __CLASS__ . '_list_rates_called' ) ) {
return ;
}
// Prevent that list_rates is called more than once
// as this is a fallback method when other classes fail to
// list their rates
define( __CLASS__ . '_list_rates_called', 1 ) ;
$dbc = new ps_DB( ) ; // Carriers
$dbr = new ps_DB( ) ; // Rates
$dbs = new ps_DB( ) ; // Shipping_Currensy
$selected = False ;
$d['ship_to_info_id'] = vmGet( $_REQUEST, 'ship_to_info_id' ) ;
$q = "SELECT country,zip FROM #__{vm}_user_info WHERE user_info_id='" . $d['ship_to_info_id'] . "'" ;
$dbc->query( $q ) ;
$dbc->next_record() ;
$zip = $dbc->f( "zip" ) ;
$country = $dbc->f( "country" ) ;
$q = "SELECT shipping_carrier_id,shipping_carrier_name FROM #__{vm}_shipping_carrier ORDER BY shipping_carrier_list_order ASC" ;
$dbc->query( $q ) ;
$i = 0 ;
$html = "" ;
while( $dbc->next_record() ) {
$q = "SELECT shipping_rate_id,shipping_rate_name,shipping_rate_value,shipping_rate_package_fee,shipping_rate_currency_id FROM #__{vm}_shipping_rate WHERE " ;
$q .= "shipping_rate_carrier_id='" . $dbc->f( "shipping_carrier_id" ). "' AND " ;
$q .= "(shipping_rate_country LIKE '%" . $country . "%' OR " ;
$q .= "shipping_rate_country = '') AND " ;
if( is_numeric( $zip ) ) {
$q .= "(shipping_rate_zip_start <= '" . $zip . "' OR LENGTH(shipping_rate_zip_start) = 0 ) AND " ;
$q .= "(shipping_rate_zip_end >= '" . $zip . "' OR LENGTH(shipping_rate_zip_end) = 0 ) AND " ;
}
$q .= "shipping_rate_weight_start <= '" . $d["weight"] . "'AND " ;
$q .= "shipping_rate_weight_end >= '" . $d["weight"] . "'" ;
$q .= " ORDER BY shipping_rate_list_order ASC, shipping_rate_name" ;
$dbr->query( $q ) ;
while( $dbr->next_record() ) {
if( ! defined( "_SHIPPING_RATE_TABLE_HEADER" ) ) {
$html = "<table width=\"100%\">\n<tr class=\"sectiontableheader\"><th> </th>" ;
$html .= "<th>" . $VM_LANG->_('PHPSHOP_INFO_MSG_CARRIER'). "</th><th>" ;
//$html .= $VM_LANG->_('PHPSHOP_INFO_MSG_SHIPPING_METHOD'). "</th>" ;
//$html .= "<th>"+$VM_LANG->_('PHPSHOP_INFO_MSG_SHIPPING_PRICE'). "</th></tr>\n" ;
$html .="</tr>\n" ;
define( "_SHIPPING_RATE_TABLE_HEADER", "1" ) ;
}
if( $i ++ % 2 )
$class = "sectiontableentry1" ; else
$class = "sectiontableentry2" ;
if( $_SESSION['auth']['show_price_including_tax'] != 1 ) {
$taxrate = 1 ;
} else {
$taxrate = $this->get_tax_rate( $dbr->f( "shipping_rate_id" ) ) + 1 ;
}
// Select shipping_rate_currency_code
$q = "SELECT currency_code FROM #__{vm}_currency WHERE currency_id ='" . $dbr->f( "shipping_rate_currency_id" ). "'" ;
$dbs->query( $q ) ;
if( $dbs->next_record() ) {
$shipping_rate_currency_code = $dbs->f( "currency_code" ) ;
}
$total_shipping_handling = $dbr->f( "shipping_rate_value" ) + $dbr->f( "shipping_rate_package_fee" ) ;
$total_shipping_handling = $GLOBALS['CURRENCY']->convert( $total_shipping_handling, $shipping_rate_currency_code, $GLOBALS['product_currency'] ) ;
$total_shipping_handling *= $taxrate ;
$show_shipping_handling = $CURRENCY_DISPLAY->getFullValue( $total_shipping_handling ) ;
// THE ORDER OF THOSE VALUES IS IMPORTANT:
// ShippingClassName|carrier_name|rate_name|totalshippingcosts|rate_id
$shipping_rate_id = urlencode( __CLASS__ . "|" . $dbc->f( "shipping_carrier_name" ). "|" . $dbr->f( "shipping_rate_name" ). "|" . number_format( $total_shipping_handling, 2, '.', '' ). "|" . $dbr->f( "shipping_rate_id" ) ) ;
$_SESSION[$shipping_rate_id] = 1 ;
$html .= "<tr class=\"$class\">" ;
$html .= "<td width=\"10\">
<input type=\"radio\" id=\"shipping_rate_id_ss_" . $dbr->f( "shipping_rate_id" ). "\" name=\"shipping_rate_id\" value=\"" . $shipping_rate_id . "\" " ;
if( ! $selected ) {
$selected = True ;
$html .= "checked=\"checked\"" ;
}
$html .= " /></td>" ;
$html .= "<td><label for=\"shipping_rate_id_ss_" . $dbr->f( "shipping_rate_id" ). "\">" . $dbc->f( "shipping_carrier_name" ). "</label></td>" ;
//$html .= "<td><label for=\"shipping_rate_id_ss_" . $dbr->f( "shipping_rate_id" ). "\">" . $dbr->f( "shipping_rate_name" ). "</label></td>" ;
//$html .= "<td>" . $show_shipping_handling . "</td>";
$html .= "</tr>\n" ;
}
}
if( defined( "_SHIPPING_RATE_TABLE_HEADER" ) ) {
$html .= "</table>\n" ;
}
if( ! empty( $html ) ) {
echo $html ;
} else {
$vmLogger->debug( "The Shipping Module '" . __CLASS__ . "' couldn't
find a Shipping Rate that matches the current Checkout configuration:
Weight: " . $d['weight'] . "
Country: $country
ZIP: $zip" ) ;
}
return True ;
}
/**************************************************************************
* name: get_rate()
* created by: soeren
* description: returns the money to payfor from the given rate id
* parameters: $rate_id : The id of therate
* returns: a decimal value
**************************************************************************/
function get_rate( &$d ) {
$shipping_rate_id = $d["shipping_rate_id"] ;
$is_arr = explode( "|", urldecode( urldecode( $shipping_rate_id ) ) ) ;
$order_shipping = $is_arr[3] ;
return $order_shipping ;
}
/**
* Retrieves the tax rate to apply to a shipping rate
*
* @param int $shipping_rate_id
* @return float
*/
function get_tax_rate( $shipping_rate_id = 0 ) {
$database = new ps_DB( ) ;
// added by sobers_2002 to fix the issue with shipping tax being calculated for non-state orders
$db = new ps_DB();
$ship_to_info_id = vmGet( $_REQUEST, 'ship_to_info_id');
$q = "SELECT state, country FROM #__{vm}_user_info ";
$q .= "WHERE user_info_id='".$ship_to_info_id. "'";
$db->query($q);
$db->next_record();
$state = $db->f("state");
if( $shipping_rate_id == 0 ) {
$shipping_rate_id = vmGet( $_REQUEST, "shipping_rate_id" ) ;
$ship_arr = explode( "|", urldecode( urldecode( $shipping_rate_id ) ) ) ;
$shipping_rate_id = (int)$ship_arr[4] ;
}
$q = "SELECT tax_rate FROM #__{vm}_shipping_rate,#__{vm}_tax_rate WHERE shipping_rate_id='$shipping_rate_id' AND shipping_rate_vat_id=tax_rate_id";
// check if state tax is applicable to the user
if ($state) {
$q .= " AND (tax_state='$state' OR tax_state=' $state ' OR rtrim(ltrim(tax_state))='-' OR tax_state is null)";
}
$database->query($q);
$database->next_record() ;
if( $database->f( 'tax_rate' ) ) {
return $database->f( 'tax_rate' ) ;
} else {
return 0.00 ;
}
}
/**
* returns the money to payfor from the given rate id
*
* @param array $d
* @return array
*/
function get_rate_details( &$d ) {
$rvalue["pure_rate"] = 0 ;
$rvalue["pack_rate"] = 0 ;
$rvalue["total_rate"] = 0 ;
$rvalue["vat_rate"] = 0 ;
$rvalue["vat_value"] = 0 ;
$rvalue["rate_curr"] = 0 ;
$details = explode( "|", urldecode( $d['shipping_rate_id'] ) ) ;
$rate_id = $details[4] ;
$dbr = new ps_DB( ) ; // Rates
$q = "SELECT * FROM #__{vm}_shipping_rate WHERE " ;
$q .= "shipping_rate_id='$rate_id'" ;
$dbr->query( $q ) ;
if( $dbr->next_record() ) {
$rvalue["name"] = $dbr->f( "shipping_rate_name" ) ;
$rvalue["pure_rate"] = $dbr->f( "shipping_rate_value" ) ;
$rvalue["pack_rate"] = $dbr->f( "shipping_rate_package_fee" ) ;
$rvalue["total_rate"] = $dbr->f( "shipping_rate_value" ) + $dbr->f( "shipping_rate_package_fee" ) ;
$rvalue["vat_id"] = $dbr->f( "shipping_rate_vat_id" ) ;
if( TAX_MODE == '1' ) {
$dbv = new ps_DB( ) ;
$q = "SELECT * FROM #__{vm}_tax_rate WHERE tax_rate_id ='" . $dbr->f( "shipping_rate_vat_id" ). "'" ;
$dbv->query( $q ) ;
if( $dbv->next_record() ) {
$rvalue["vat_rate"] = $dbv->f( "tax_rate" ) ;
$rvalue["vat_value"] = ($rvalue["total_rate"] * $rvalue["vat_rate"]) / (100 + $rvalue["vat_rate"]) ;
}
}
$dbc = new ps_DB( ) ;
$q = "SELECT * FROM #__{vm}_shipping_carrier WHERE shipping_carrier_id ='" . $dbr->f( "shipping_rate_carrier_id" ). "'" ;
$dbc->query( $q ) ;
if( $dbc->next_record() ) {
$rvalue["carrier"] = $dbc->f( "shipping_carrier_name" ) ;
}
$q = "SELECT * FROM #__{vm}_currency WHERE currency_id ='" . $dbr->f( "shipping_rate_currency_id" ). "'" ;
$dbc->query( $q ) ;
if( $dbc->next_record() ) {
$rvalue["rate_curr"] = $dbc->f( "currency_code" ) ;
}
}
return $rvalue ;
}
/**
* Validate a selected Shipping Rate
*
* @param array $d
* @return boolean
*/
function validate( &$d ) {
global $VM_LANG, $vmLogger ;
$cart = $_SESSION['cart'] ;
$d['shipping_rate_id'] = vmGet( $_REQUEST, 'shipping_rate_id' ) ;
$d['ship_to_info_id'] = vmGet( $_REQUEST, 'ship_to_info_id' ) ;
if( empty( $_SESSION[$d['shipping_rate_id']] ) ) {
// Fixed this because PayPal returned a slightly different string
$d['shipping_rate_id'] = str_replace('++%26', '%2B+%26', urlencode(htmlentities(urldecode($d['shipping_rate_id']))));
if( empty( $_SESSION[$d['shipping_rate_id']] ) ) {
return false ;
}
}
$details = explode( "|", urldecode( $d['shipping_rate_id'] ) ) ;
$rate_id = intval( $details[4] ) ;
$totalweight = 0 ;
require_once (CLASSPATH . 'ps_shipping_method.php') ;
for( $i = 0 ; $i < $cart["idx"] ; $i ++ ) {
$weight_subtotal = ps_shipping_method::get_weight( $cart[$i]["product_id"] ) * $cart[$i]['quantity'] ;
$totalweight += $weight_subtotal ;
}
$dbu = new ps_DB( ) ; //DB User
$q = "SELECT country,zip FROM #__{vm}_user_info WHERE user_info_id = '" . $dbu->getEscaped( $d["ship_to_info_id"] ). "'" ;
$dbu = new ps_DB( ) ; //DB User
$dbu->query( $q ) ;
if( ! $dbu->next_record() ) {
/*$vmLogger->err( $VM_LANG->_('PHPSHOP_CHECKOUT_ERR_SHIPTO_NOT_FOUND',false) );
return False;*/
}
$zip = $dbu->f( "zip" ) ;
$country = $dbu->f( "country" ) ;
$q = "SELECT shipping_rate_id FROM #__{vm}_shipping_rate WHERE shipping_rate_id = '$rate_id'" ;
$dbs = new ps_DB( ) ; // DB Shiping_rate
$dbs->query( $q ) ;
if( ! $dbs->next_record() ) {
$vmLogger->err( $VM_LANG->_('PHPSHOP_CHECKOUT_ERR_RATE_NOT_FOUND',false) ) ;
return False ;
}
return $this->rate_id_valid( $rate_id, $country, $zip, $totalweight ) ;
}
/**
* checks if the rate is valid for the country, zip and weight
*
* @param int $rate_id
* @param string $country
* @param int $zip
* @param float $weight
* @return boolean
*/
function rate_id_valid( $rate_id, $country, $zip, $weight ) {
global $VM_LANG, $vmLogger ;
$db = new ps_DB( ) ; // Rates
$q = "SELECT * FROM #__{vm}_shipping_rate WHERE shipping_rate_id=$rate_id" ;
$db->query( $q ) ;
if( $db->next_record() ) {
$valid = true ;
if( ! stristr( $db->f( "shipping_rate_country" ), $country ) && $db->f( 'shipping_rate_country' )!= "" ) {
$vmLogger->debug( 'The country ' . $country . ' is not supported by this shipping rate.' ) ;
$valid = false ;
}
if( $db->f( "shipping_rate_weight_start" ) > $weight ) {
$vmLogger->debug( 'The weight ' . $weight . ' is not enough for this shipping rate.' ) ;
$valid = false ;
}
if( $db->f( "shipping_rate_weight_end" ) < $weight ) {
$vmLogger->debug( 'The weight ' . $weight . ' is too high for this shipping rate.' ) ;
$valid = false ;
}
if( is_numeric( $zip ) ) {
if( $db->f( "shipping_rate_zip_start" ) > $zip ) {
$vmLogger->debug( 'The ZIP ' . $zip . ' is smaller than the supported ZIP code range of this shipping rate.' ) ;
$valid = false ;
}
if( $db->f( "shipping_rate_zip_end" ) < $zip ) {
$vmLogger->debug( 'The ZIP ' . $zip . ' is higher than the supported ZIP code range of this shipping rate.' ) ;
$valid = false ;
}
}
if( ! $valid ) {
$vmLogger->err( $VM_LANG->_('PHPSHOP_CHECKOUT_ERR_OTHER_SHIP',false) ) ;
}
return $valid ;
} else {
$vmLogger->debug( 'The rate id ' . $rate_id . ' is not a valid shipping rate' ) ;
return false ;
}
}
/**
* Show all configuration parameters for this Shipping method
* @returns boolean False when the Shipping method has no configration
*/
function show_configuration() {
return true ;
}
/**
* Returns the "is_writeable" status of the configuration file
* @param void
* @returns boolean True when the configuration file is writeable, false when not
*/
function configfile_writeable() {
return is_writeable( CLASSPATH . "shipping/" . __CLASS__ . ".cfg.php" ) ;
}
/**
* Writes the configuration file for this shipping method
* @param array An array of objects
* @returns boolean True when writing was successful
*/
function write_configuration( &$d ) {
return true ;
}
}
?>
08.05.2014, 14:39:29