function cw_shipper_CPC($weight, $customer_id, $address, $debug, $cart)
{
global $config, $tables;
if ($config['Company']['country'] != "CA" || empty($config['Shipping']['CPC_merchant_id'])) {
return;
}
$cpc_methods = array();
foreach ($allowed_shipping_methods as $v) {
if ($v['code'] == "CPC") {
$cpc_methods[] = $v;
}
}
if (empty($cpc_methods)) {
return;
}
$cp_merchant = $config['Shipping']['CPC_merchant_id'];
$cp_language = "en";
$cp_qnty = "1";
$cp_packed = true;
$cp_weight = round(cw_weight_in_grams($weight) / 1000, 3);
if ($cp_weight < 0.1) {
$cp_weight = 0.1;
}
$cp_description = $params['param00'];
$cp_length = $params['param01'];
$cp_width = $params['param02'];
$cp_height = $params['param03'];
$cp_currency_rate = $params['param05'];
$cp_insured_value = $params['param04'];
$cp_dest_country = $address['country'];
$cp_dest_city = $address['city'];
$cp_dest_zip = $address['zipcode'];
$cp_dest_state = empty($address['state']) ? "NA" : $address['state'];
$cp_orig_zip = $config['Company']['zipcode'];
# Server DNS; if does not work, use 'cybervente.postescanada.ca:30000'
$cp_host = "sellonline.canadapost.ca:30000";
if (isset($cart['discounted_subtotal'])) {
$itemsPrice = "<itemsPrice>{$cart['discounted_subtotal']}</itemsPrice>";
} elseif (!empty($cp_insured_value)) {
$itemsPrice = "<itemsPrice>{$cp_insured_value}</itemsPrice>";
} else {
$itemsPrice = "";
}
$cp_request = "<?xml version=\"1.0\" ?>\n" . "<eparcel>" . "<language>{$cp_language}</language>\n" . "<ratesAndServicesRequest>\n" . " <merchantCPCID>{$cp_merchant}</merchantCPCID>\n" . " <fromPostalCode>{$cp_orig_zip}</fromPostalCode>\n" . " {$itemsPrice}\n" . " <lineItems>\n" . " <item>\n" . " <quantity>{$cp_qnty}</quantity>\n" . " <weight>{$cp_weight}</weight>\n" . " <length>{$cp_length}</length>\n" . " <width>{$cp_width}</width>\n" . " <height>{$cp_height}</height>\n" . " <description>{$cp_description}</description>\n" . ($cp_packed ? " <readyToShip/>\n" : "") . " </item>\n" . " </lineItems>\n" . " <city>{$cp_dest_city}</city>\n" . " <provOrState>{$cp_dest_state}</provOrState>\n" . " <country>{$cp_dest_country}</country>\n" . " <postalCode>{$cp_dest_zip}</postalCode>\n" . "</ratesAndServicesRequest>\n" . "</eparcel>";
$md5_request = md5($cp_request);
if (!cw_is_shipping_result_in_cache($md5_request) || $debug == "Y") {
list($a, $result) = cw_http_post_request($cp_host, "/", $cp_request);
$parse_errors = false;
$options = array('XML_OPTION_CASE_FOLDING' => 1, 'XML_OPTION_TARGET_ENCODING' => 'ISO-8859-1');
$parsed = cw_xml_parse($result, $parse_errors, $options);
$products =& cw_array_path($parsed, 'EPARCEL/RATESANDSERVICESRESPONSE/PRODUCT');
if (is_array($products)) {
foreach ($products as $product) {
$pid = $product['@']['ID'];
$rate = cw_array_path($product, 'RATE/0/#');
if ($pid === false || $rate === false) {
continue;
}
$is_found = false;
foreach ($cpc_methods as $v) {
if ($v['service_code'] == $pid) {
$rates[] = array("methodid" => $v['subcode'], "rate" => $rate * $cp_currency_rate);
$is_found = true;
break;
}
}
if (!empty($pid) && !$is_found) {
$tmp_name = cw_array_path($product, "NAME/0/#");
cw_add_new_smethod($tmp_name, "CPC", array("service_code" => $pid));
}
}
}
if ($debug != "Y") {
cw_save_shipping_result_to_cache($md5_request, $rates);
}
$error_code = cw_array_path($parsed, 'EPARCEL/ERROR/STATUSCODE/0/#');
if ($error_code !== false) {
$error_msg = cw_array_path($parsed, 'EPARCEL/ERROR/STATUSMESSAGE/0/#');
}
} else {
$rates = cw_get_shipping_result_from_cache($md5_request);
}
}
function cw_shipper_USPS($weight, $customer_id, $address, $debug, $cart)
{
global $config, $tables, $current_language;
$USPS_username = $config['Shipping']['USPS_username'];
$USPS_password = $config['Shipping']['USPS_password'];
$USPS_servername = $config['Shipping']['USPS_servername'];
$use_usps_https = false;
if (empty($USPS_username) || empty($USPS_servername)) {
return;
}
$USPS_FOUND = false;
if (is_array($allowed_shipping_methods)) {
foreach ($allowed_shipping_methods as $key => $value) {
if ($value['code'] == "USPS") {
$USPS_FOUND = true;
break;
}
}
}
if (!$USPS_FOUND) {
return;
}
cw_load('http', 'xml');
$pounds = 0;
$ounces = ceil(round(cw_weight_in_grams($weight) / 28.35, 3));
if ($ounces < 1) {
$ounces = 1;
}
$mailtype = $params['param00'];
$package_size = $params['param01'];
$machinable = $params['param02'];
$container_express = $params['param03'];
$container_priority = $params['param04'];
if (!empty($container_express) && $container_express != 'None') {
$container_express = "<Container>" . $container_express . "</Container>";
} else {
$container_express = "";
}
if (!empty($container_priority) && $container_priority != 'None') {
$container_priority = "<Container>" . $container_priority . "</Container>";
} else {
$container_priority = "";
}
if ($address['country'] == 'PR' || $address['country'] == 'GU' || $address['country'] == 'VI') {
$address['country'] = 'US';
}
$dst_country = USPS_get_country($address['country']);
if (empty($dst_country)) {
$dst_country = cw_query_first_cell("SELECT value FROM {$tables['languages']} WHERE name = 'country_" . $address['country'] . "' AND code = '{$current_language}'");
}
$USPS_file = $USPS_servername == "testing.shippingapis.com" ? "/ShippingAPITest.dll" : "/ShippingAPI.dll";
$hash = array();
if ($address['country'] != $config['Company']['country']) {
# International shipping
$query = <<<EOT
<IntlRateRequest USERID="{$USPS_username}" PASSWORD="******">
<Package ID="0">
<Pounds>{$pounds}</Pounds>
<Ounces>{$ounces}</Ounces>
<MailType>{$mailtype}</MailType>
<Country>{$dst_country}</Country>
</Package>
</IntlRateRequest>
EOT;
$md5_request = md5($query);
if (cw_is_shipping_result_in_cache($md5_request) && $debug != "Y") {
$rates = cw_get_shipping_result_from_cache($md5_request);
return;
}
if ($use_usps_https) {
$post = array("API=IntlRate", "XML=" . urlencode($query));
list($header, $result) = cw_https_request("GET", "https://" . $USPS_servername . ":443" . $USPS_file . "?API=IntlRate&XML=" . urlencode($query));
} else {
list($header, $result) = cw_http_get_request($USPS_servername, $USPS_file, "API=IntlRate&XML=" . urlencode($query));
}
$xml = cw_xml_parse($result, $err);
# Get <Error> elemenet
$err = cw_array_path($xml, "IntlRateResponse/Package/Error");
if (empty($err)) {
# Get <Service> elements
$packages = cw_array_path($xml, "IntlRateResponse/Package/Service");
if (!empty($packages) && is_array($packages)) {
foreach ($packages as $p) {
# Get shipping method name
$sname = cw_array_path($p, "SvcDescription/0/#");
# Get rate
$rate = cw_array_path($p, "Postage/0/#");
# Get comment
#$comment = cw_array_path($p, "SvcCommitments/0/#");
if (empty($sname) || zerolen($rate)) {
continue;
}
# Define shipping method
$is_found = false;
foreach ($allowed_shipping_methods as $sm) {
if ($sm['code'] == "USPS" && $sm['destination'] == "I" && preg_match("/^" . preg_quote($sm['shipping'], "/") . "/S", "USPS " . $sname)) {
if (!in_array($sm['subcode'], $hash)) {
$rates[] = array("methodid" => $sm['subcode'], "rate" => $rate, "warning" => "");
$hash[] = $sm['subcode'];
}
$is_found = true;
break;
}
}
if (!$is_found) {
# Add new shipping method
cw_add_new_smethod("USPS " . $sname, "USPS", array("destination" => "I"));
}
}
if ($debug != "Y") {
cw_save_shipping_result_to_cache($md5_request, $rates);
}
}
}
} else {
# Domestic shipping
$ZO = $config['Company']['zipcode'];
$ZD = $address['zipcode'];
$query = <<<EOT
<RateV2Request USERID="{$USPS_username}">
\t<Package ID="0">
\t\t<Service>EXPRESS</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t{$container_express}
\t\t<Size>{$package_size}</Size>
\t</Package>
\t<Package ID="1">
\t\t<Service>FIRST CLASS</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t<Container>None</Container>
\t\t<Size>{$package_size}</Size>
\t</Package>
\t<Package ID="2">
\t\t<Service>PRIORITY</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t{$container_priority}
\t\t<Size>{$package_size}</Size>
\t</Package>
\t<Package ID="3">
\t\t<Service>PARCEL</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t<Container>None</Container>
\t\t<Size>{$package_size}</Size>
\t\t<Machinable>{$machinable}</Machinable>
\t</Package>
\t<Package ID="4">
\t\t<Service>BPM</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t<Container>None</Container>
\t\t<Size>{$package_size}</Size>
\t</Package>
\t<Package ID="5">
\t\t<Service>LIBRARY</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t<Container>None</Container>
\t\t<Size>{$package_size}</Size>
\t</Package>
\t<Package ID="6">
\t\t<Service>MEDIA</Service>
\t\t<ZipOrigination>{$ZO}</ZipOrigination>
\t\t<ZipDestination>{$ZD}</ZipDestination>
\t\t<Pounds>{$pounds}</Pounds>
\t\t<Ounces>{$ounces}</Ounces>
\t\t<Container>None</Container>
\t\t<Size>{$package_size}</Size>
\t</Package>
</RateV2Request>
EOT;
$md5_request = md5($query);
if (cw_is_shipping_result_in_cache($md5_request) && $debug != "Y") {
$rates = cw_get_shipping_result_from_cache($md5_request);
return;
}
if ($use_usps_https) {
$post = array("API=RateV2", "XML=" . urlencode($query));
list($header, $result) = cw_https_request("GET", "https://" . $USPS_servername . ":443" . $USPS_file . "?API=RateV2&XML=" . urlencode($query));
} else {
list($header, $result) = cw_http_get_request($USPS_servername, $USPS_file, "API=RateV2&XML=" . urlencode($query));
}
$xml = cw_xml_parse($result, $err);
# Get <Package> elements
$packages = cw_array_path($xml, "RateV2Response/Package");
if (is_array($packages)) {
foreach ($packages as $p) {
# Get <Error> element
$err = cw_array_path($p, "Error");
if (!empty($err)) {
continue;
}
# Get shipping method name
$sname = cw_array_path($p, "Postage/MailService/0/#");
# Get rate
$rate = cw_array_path($p, "Postage/Rate/0/#");
if (empty($sname) || zerolen($rate)) {
continue;
}
# Define shipping method
$is_found = false;
foreach ($allowed_shipping_methods as $sm) {
if ($sm['code'] == "USPS" && $sm['destination'] == "L" && preg_match("/^" . preg_quote($sm['shipping'], "/") . "/S", "USPS " . $sname)) {
if (!in_array($sm['subcode'], $hash)) {
$rates[] = array("methodid" => $sm['subcode'], "rate" => $rate, "warning" => "");
$hash[] = $sm['subcode'];
}
$is_found = true;
break;
}
}
if (!$is_found) {
# Add new shipping method
cw_add_new_smethod("USPS " . $sname, "USPS", array("destination" => "L"));
}
}
if ($debug != "Y") {
cw_save_shipping_result_to_cache($md5_request, $rates);
}
}
// if (is_array($packages))
}
}
