PageRenderTime 57ms CodeModel.GetById 28ms RepoModel.GetById 0ms app.codeStats 0ms

/application/views/pages/admin/uspsshipping.php

https://bitbucket.org/chadsaun/ifrogz-panel
PHP | 507 lines | 490 code | 5 blank | 12 comment | 126 complexity | 7e4c69cbc6545e49970fc7897abe1044 MD5 | raw file
    

  1. <?php
    2. 

  2. //This code is copyright (c) Internet Business Solutions SL, all rights reserved.
    3. 

  3. //The contents of this file are protect under law as the intellectual property of Internet
    4. 

  4. //Business Solutions SL. Any use, reproduction, disclosure or copying of any kind 
    5. 

  5. //without the express and written permission of Internet Business Solutions SL is forbidden.
    6. 

  6. //Author: Vince Reid, vince@virtualred.net
    7. 

  7. $numfirstclass=0;
    8. 

  8. $firstclasscost=0;
    9. 

  9. function sortshippingarray(){
    10. 

  10. 	global $intShipping,$maxshipoptions;
    11. 

  11. 	for($ssaindex2=0; $ssaindex2 < $maxshipoptions; $ssaindex2++){
    12. 

  12. 		$intShipping[$ssaindex2][2] = (double)$intShipping[$ssaindex2][2];
    13. 

  13. 		for($ssaindex=1; $ssaindex < 20; $ssaindex++){
    14. 

  14. 			if($intShipping[$ssaindex][3] && (double)$intShipping[$ssaindex][2] < (double)$intShipping[$ssaindex-1][2]){
    15. 

  15. 				$tt = $intShipping[$ssaindex];
    16. 

  16. 				$intShipping[$ssaindex] = $intShipping[$ssaindex-1];
    17. 

  17. 				$intShipping[$ssaindex-1] = $tt;
    18. 

  18. 			}
    19. 

  19. 		}
    20. 

  20. 	}
    21. 

  21. //	for($ssaindex=0; $ssaindex < $maxshipoptions; $ssaindex++)
    22. 

  22. //		print $intShipping[$ssaindex][0] . ":" . $intShipping[$ssaindex][1] . ":" . $intShipping[$ssaindex][2] . ":" . $intShipping[$ssaindex][3] . "<br>";
    23. 

  23. }
    24. 

  24. function ParseXMLOutput($sXML, $international, &$totalCost, &$errormsg, &$intShipping){
    25. 

  25. 	global $iTotItems, $numfirstclass, $firstclasscost, $xxDay,$xxDays;
    26. 

  26. 	$noError = TRUE;
    27. 

  27. 	$totalCost = 0;
    28. 

  28. 	$packCost = 0;
    29. 

  29. 	$errormsg = "";
    30. 

  30. 	$xmlDoc = new vrXMLDoc($sXML);
    31. 

  31. 

  32. 	if($xmlDoc->nodeList->nodeName[0] == "Error"){ // Top-level Error
    33. 

  33. 		$noError = FALSE;
    34. 

  34. 		$nodeList = $xmlDoc->nodeList->childNodes[0];
    35. 

  35. 		for($i = 0; $i < $nodeList->length; $i++){
    36. 

  36. 			if($nodeList->nodeName[$i]=="Description"){
    37. 

  37. 				$errormsg = $nodeList->nodeValue[$i];
    38. 

  38. 			}
    39. 

  39. 		}
    40. 

  40. 	}else{ // no Top-level Error
    41. 

  41. 		$nodeList = $xmlDoc->nodeList->childNodes[0];
    42. 

  42. 		for($i = 0; $i < $nodeList->length; $i++){
    43. 

  43. 			if($nodeList->nodeName[$i]=="Package"){
    44. 

  44. 				$tmpArr = split('x', getattributes($nodeList->attributes[$i], 'ID'));
    45. 

  45. 				$quantity = (int)$tmpArr[1];
    46. 

  46. 				$e = $nodeList->childNodes[$i];
    47. 

  47. 				for($j = 0; $j < $nodeList->childNodes[$i]->length; $j++){
    48. 

  48. 					if($e->nodeName[$j] == "Error"){ // Lower-level error
    49. 

  49. 						$noError = FALSE;
    50. 

  50. 						$t = $e->childNodes[$j];
    51. 

  51. 						for($k = 0; $k < $t->length; $k++){
    52. 

  52. 							if($t->nodeName[$k] == "Description")
    53. 

  53. 								$errormsg = $t->nodeValue[$k];
    54. 

  54. 						}
    55. 

  55. 					}else{
    56. 

  56. 						if($e->nodeName[$j] == "Postage"){
    57. 

  57. 							//$packCost += $e->nodeValue[$j];
    58. 

  58. 							if($international == ""){
    59. 

  59. 								$l = 0;
    60. 

  60. 								while($intShipping[$l][0] != $thisService && $intShipping[$l][0] != "")
    61. 

  61. 									$l++;
    62. 

  62. 								$intShipping[$l][0] = $thisService;
    63. 

  63. 								if($thisService=="PARCEL")
    64. 

  64. 									$intShipping[$l][1] = "2-7 " . $xxDays;
    65. 

  65. 								elseif($thisService=="EXPRESS")
    66. 

  66. 									$intShipping[$l][1] = "Overnight to most areas";
    67. 

  67. 								elseif($thisService=="PRIORITY")
    68. 

  68. 									$intShipping[$l][1] = "1-2 " . $xxDays;
    69. 

  69. 								elseif($thisService=="BPM")
    70. 

  70. 									$intShipping[$l][1] = "2-7 " . $xxDays;
    71. 

  71. 								elseif($thisService=="Media")
    72. 

  72. 									$intShipping[$l][1] = "2-7 " . $xxDays;
    73. 

  73. 								$intShipping[$l][2] = $intShipping[$l][2] + ($e->nodeValue[$j] * $quantity);
    74. 

  74. 								$intShipping[$l][3] = $intShipping[$l][3] + 1;
    75. 

  75. 							}
    76. 

  76. 						}elseif($e->nodeName[$j] == "Service"){
    77. 

  77. 							if($international != ""){
    78. 

  78. 								$t = $e->childNodes[$j];
    79. 

  79. 								for($k = 0; $k < $t->length; $k++){
    80. 

  80. 									if($t->nodeName[$k] == "SvcDescription")
    81. 

  81. 										$SvcDescription = $t->nodeValue[$k];
    82. 

  82. 									elseif($t->nodeName[$k] == "SvcCommitments")
    83. 

  83. 										$SvcCommitments = $t->nodeValue[$k];
    84. 

  84. 									elseif($t->nodeName[$k] == "Postage")
    85. 

  85. 										$Postage = $t->nodeValue[$k];
    86. 

  86. 								}
    87. 

  87. 								$l = 0;
    88. 

  88. 								while($intShipping[$l][0] != "" && $intShipping[$l][0] != $SvcDescription)
    89. 

  89. 									$l++;
    90. 

  90. 								$intShipping[$l][0] = $SvcDescription;
    91. 

  91. 								$intShipping[$l][1] = $SvcCommitments;
    92. 

  92. 								$intShipping[$l][2] += ($Postage * $quantity);
    93. 

  93. 								$intShipping[$l][3]++;
    94. 

  94. 							}
    95. 

  95. 							else
    96. 

  96. 								$thisService = $e->nodeValue[$j];
    97. 

  97. 						}
    98. 

  98. 					}
    99. 

  99. 				}
    100. 

  100. 				$totalCost += $packCost;
    101. 

  101. 				$packCost = 0;
    102. 

  102. 			}
    103. 

  103. 		}
    104. 

  104. 		if($iTotItems==$numfirstclass){
    105. 

  105. 			$l = 0;
    106. 

  106. 			while($intShipping[$l][0] != "")
    107. 

  107. 				$l++;
    108. 

  108. 			$intShipping[$l][0] = "FIRSTCLASS";
    109. 

  109. 			$intShipping[$l][1] = "1-3 " . $xxDays;
    110. 

  110. 			$intShipping[$l][2] = $firstclasscost;
    111. 

  111. 			$intShipping[$l][3] = $numfirstclass;
    112. 

  112. 		}
    113. 

  113. 	}
    114. 

  114. 	return $noError;
    115. 

  115. }
    116. 

  116. function checkUPSShippingMeth($method, &$discountsApply){
    117. 

  117. 	global $numuspsmeths, $uspsmethods;
    118. 

  118. 	for($index=0; $index < $numuspsmeths; $index++){
    119. 

  119. 		if($method==$uspsmethods[$index][0]){
    120. 

  120. 			$discountsApply = $uspsmethods[$index][1];
    121. 

  121. 			return(TRUE);
    122. 

  122. 		}
    123. 

  123. 	}
    124. 

  124. 	return(FALSE);
    125. 

  125. }
    126. 

  126. function ParseUPSXMLOutput($sXML, $international, &$totalCost, &$errormsg, &$errorcode, &$intShipping){
    127. 

  127. 	global $xxDay,$xxDays;
    128. 

  128. 	$noError = TRUE;
    129. 

  129. 	$totalCost = 0;
    130. 

  130. 	$packCost = 0;
    131. 

  131. 	$errormsg = "";
    132. 

  132. 	$l = 0;
    133. 

  133. 	$discntsApp = "";
    134. 

  134. 

  135. 	$xmlDoc = new vrXMLDoc($sXML);
    136. 

  136. 	$nodeList = $xmlDoc->nodeList->childNodes[0];
    137. 

  137. 	for($i = 0; $i < $nodeList->length; $i++){
    138. 

  138. 		if($nodeList->nodeName[$i]=="Response"){
    139. 

  139. 			$e = $nodeList->childNodes[$i];
    140. 

  140. 			for($j = 0; $j < $e->length; $j++){
    141. 

  141. 				if($e->nodeName[$j]=="ResponseStatusCode"){
    142. 

  142. 					$noError = ((int)$e->nodeValue[$j])==1;
    143. 

  143. 				}
    144. 

  144. 				if($e->nodeName[$j]=="Error"){
    145. 

  145. 					$errormsg = "";
    146. 

  146. 					$t = $e->childNodes[$j];
    147. 

  147. 					for($k = 0; $k < $t->length; $k++){
    148. 

  148. 						if($t->nodeName[$k]=="ErrorCode"){
    149. 

  149. 							$errorcode = $t->nodeValue[$k];
    150. 

  150. 						}elseif($t->nodeName[$k]=="ErrorSeverity"){
    151. 

  151. 							if($t->nodeValue[$k]=="Transient")
    152. 

  152. 								$errormsg = "This is a temporary error. Please wait a few moments then refresh this page.<br />" . $errormsg;
    153. 

  153. 						}elseif($t->nodeName[$k]=="ErrorDescription"){
    154. 

  154. 							$errormsg .= $t->nodeValue[$k];
    155. 

  155. 						}
    156. 

  156. 					}
    157. 

  157. 				}
    158. 

  158. 				// print "The Nodename is : " . e.nodeName . ":" . e.firstChild.nodeValue . "<br />";
    159. 

  159. 			}
    160. 

  160. 		}elseif($nodeList->nodeName[$i]=="RatedShipment"){ // no Top-level Error
    161. 

  161. 			$wantthismethod=TRUE;
    162. 

  162. 			$nodeList = $xmlDoc->nodeList->childNodes[0];
    163. 

  163. 			$e = $nodeList->childNodes[$i];
    164. 

  164. 			for($j = 0; $j < $e->length; $j++){
    165. 

  165. 				if($e->nodeName[$j] == "Service"){ // Lower-level error
    166. 

  166. 					$t = $e->childNodes[$j];
    167. 

  167. 					for($k = 0; $k < $t->length; $k++){
    168. 

  168. 						if($t->nodeName[$k]=="Code"){
    169. 

  169. 							if($t->nodeValue[$k]=="01")
    170. 

  170. 								$intShipping[$l][0] = "UPS Next Day Air&reg;";
    171. 

  171. 							elseif($t->nodeValue[$k]=="02")
    172. 

  172. 								$intShipping[$l][0] = "UPS 2nd Day Air&reg;";
    173. 

  173. 							elseif($t->nodeValue[$k]=="03")
    174. 

  174. 								$intShipping[$l][0] = "UPS Ground";
    175. 

  175. 							elseif($t->nodeValue[$k]=="07")
    176. 

  176. 								$intShipping[$l][0] = "UPS Worldwide Express";
    177. 

  177. 							elseif($t->nodeValue[$k]=="08")
    178. 

  178. 								$intShipping[$l][0] = "UPS Worldwide Expedited";
    179. 

  179. 							elseif($t->nodeValue[$k]=="11")
    180. 

  180. 								$intShipping[$l][0] = "UPS Standard";
    181. 

  181. 							elseif($t->nodeValue[$k]=="12")
    182. 

  182. 								$intShipping[$l][0] = "UPS 3 Day Select&reg;";
    183. 

  183. 							elseif($t->nodeValue[$k]=="13")
    184. 

  184. 								$intShipping[$l][0] = "UPS Next Day Air Saver&reg;";
    185. 

  185. 							elseif($t->nodeValue[$k]=="14")
    186. 

  186. 								$intShipping[$l][0] = "UPS Next Day Air&reg; Early A.M.&reg;";
    187. 

  187. 							elseif($t->nodeValue[$k]=="54")
    188. 

  188. 								$intShipping[$l][0] = "UPS Worldwide Express Plus";
    189. 

  189. 							elseif($t->nodeValue[$k]=="59")
    190. 

  190. 								$intShipping[$l][0] = "UPS 2nd Day Air A.M.&reg;";
    191. 

  191. 							elseif($t->nodeValue[$k]=="65")
    192. 

  192. 								$intShipping[$l][0] = "UPS Express Saver";
    193. 

  193. 							$wantthismethod = checkUPSShippingMeth($t->nodeValue[$k], $discntsApp);
    194. 

  194. 							$intShipping[$l][4] = $discntsApp;
    195. 

  195. 						}
    196. 

  196. 					}
    197. 

  197. 				}elseif($e->nodeName[$j] == "TotalCharges"){
    198. 

  198. 					$t = $e->childNodes[$j];
    199. 

  199. 					for($k = 0; $k < $t->length; $k++){
    200. 

  200. 						if($t->nodeName[$k]=="MonetaryValue"){
    201. 

  201. 							$intShipping[$l][2] = (double)$t->nodeValue[$k];
    202. 

  202. 						}
    203. 

  203. 					}
    204. 

  204. 				}elseif($e->nodeName[$j] == "GuaranteedDaysToDelivery"){
    205. 

  205. 					if(strlen($e->nodeValue[$j]) > 0){
    206. 

  206. 						if($e->nodeValue[$j]=="1")
    207. 

  207. 							$intShipping[$l][1] = "1 " . $xxDay . $intShipping[$l][1];
    208. 

  208. 						else
    209. 

  209. 							$intShipping[$l][1] = $e->nodeValue[$j] . " " . $xxDays . $intShipping[$l][1];
    210. 

  210. 					}
    211. 

  211. 				}elseif($e->nodeName[$j] == "ScheduledDeliveryTime"){
    212. 

  212. 					if(strlen($e->nodeValue[$j]) > 0){
    213. 

  213. 						$intShipping[$l][1] .= " by " . $e->nodeValue[$j];
    214. 

  214. 					}
    215. 

  215. 				}
    216. 

  216. 			}
    217. 

  217. 			if($wantthismethod){
    218. 

  218. 				$intShipping[$l][3] = TRUE;
    219. 

  219. 				$l++;
    220. 

  220. 			}else
    221. 

  221. 				$intShipping[$l][1] = "";
    222. 

  222. 			$wantthismethod=TRUE;
    223. 

  223. 		}
    224. 

  224. 	}
    225. 

  225. 	return $noError;
    226. 

  226. }
    227. 

  227. function ParseCanadaPostXMLOutput($sXML, $international, &$totalCost, &$errormsg, &$errorcode, &$intShipping){
    228. 

  228. 	global $xxDay,$xxDays;
    229. 

  229. 	$noError = TRUE;
    230. 

  230. 	$totalCost = 0;
    231. 

  231. 	$packCost = 0;
    232. 

  232. 	$errormsg = "";
    233. 

  233. 	$discntsApp = "";
    234. 

  234. 	$l = strpos($sXML, ']>');
    235. 

  235. 	if($l > 0) $sXML = substr($sXML, $l+2);
    236. 

  236. 	$l = 0;
    237. 

  237. 

  238. 	$xmlDoc = new vrXMLDoc($sXML);
    239. 

  239. 	$nodeList = $xmlDoc->nodeList->childNodes[0];
    240. 

  240. 	for($i = 0; $i < $nodeList->length; $i++){
    241. 

  241. 		if($nodeList->nodeName[$i]=="error"){
    242. 

  242. 			$noError = FALSE;
    243. 

  243. 			$e = $nodeList->childNodes[$i];
    244. 

  244. 			for($j = 0; $j < $e->length; $j++){
    245. 

  245. 				if($e->nodeName[$j]=="statusCode"){
    246. 

  246. 					$errorcode = $e->nodeValue[$j];
    247. 

  247. 				}elseif($e->nodeName[$j]=="statusMessage"){
    248. 

  248. 					$errormsg = $e->nodeValue[$j];
    249. 

  249. 				}
    250. 

  250. 			}
    251. 

  251. 		}elseif($nodeList->nodeName[$i]=="ratesAndServicesResponse"){ // no Top-level Error
    252. 

  252. 			$wantthismethod=TRUE;
    253. 

  253. 			$nodeList = $xmlDoc->nodeList->childNodes[0];
    254. 

  254. 			$e = $nodeList->childNodes[$i];
    255. 

  255. 			for($j = 0; $j < $e->length; $j++){
    256. 

  256. 				if($e->nodeName[$j] == "product"){
    257. 

  257. 					$wantthismethod = checkUPSShippingMeth(getattributes($e->attributes[$j], 'id'), $discntsApp);
    258. 

  258. 					$intShipping[$l][4] = $discntsApp;
    259. 

  259. 					$wantthismethod=TRUE;
    260. 

  260. 					$t = $e->childNodes[$j];
    261. 

  261. 					for($k = 0; $k < $t->length; $k++){
    262. 

  262. 						if($t->nodeName[$k]=="name"){
    263. 

  263. 							$intShipping[$l][0] = $t->nodeValue[$k];
    264. 

  264. 						}elseif($t->nodeName[$k]=="rate"){
    265. 

  265. 							$intShipping[$l][2] = (double)$t->nodeValue[$k];
    266. 

  266. 						}elseif($t->nodeName[$k]=="deliveryDate"){
    267. 

  267. 							$today = getdate();
    268. 

  268. 							$daytoday = $today["yday"];
    269. 

  269. 							if(($ttimeval = strtotime($t->nodeValue[$k])) < 0){
    270. 

  270. 								$intShipping[$l][1] = $t->nodeValue[$k] . $intShipping[$l][1];
    271. 

  271. 							}else{
    272. 

  272. 								$deldate = getdate($ttimeval);
    273. 

  273. 								$daydeliv = $deldate["yday"];
    274. 

  274. 								if($daydeliv < $daytoday) $daydeliv+=365;
    275. 

  275. 								$intShipping[$l][1] = ($daydeliv - $daytoday) . " " . ($daydeliv - $daytoday < 2?$xxDay:$xxDays) . $intShipping[$l][1];
    276. 

  276. 							}
    277. 

  277. 						}elseif($t->nodeName[$k]=="nextDayAM"){
    278. 

  278. 							if($t->nodeValue[$k]=="true")
    279. 

  279. 								$intShipping[$l][1] = $intShipping[$l][1] . " AM";
    280. 

  280. 						}
    281. 

  281. 					}
    282. 

  282. 					if($wantthismethod){
    283. 

  283. 						$intShipping[$l][3] = TRUE;
    284. 

  284. 						$l++;
    285. 

  285. 					}else
    286. 

  286. 						$intShipping[$l][1] = "";
    287. 

  287. 					$wantthismethod=TRUE;
    288. 

  288. 				}
    289. 

  289. 			}
    290. 

  290. 		}
    291. 

  291. 	}
    292. 

  292. 	return $noError;
    293. 

  293. }
    294. 

  294. function addDomestic($id,$service,$orig,$dest,$iWeight,$quantity,$container,$size,$machinable){
    295. 

  295. 	global $numuspsmeths,$uspsmethods,$numfirstclass,$firstclasscost;
    296. 

  296. 	$sXML="";
    297. 

  297. 	$pounds = (int)$iWeight;
    298. 

  298. 	$ounces = round(($iWeight-$pounds)*16.0);
    299. 

  299. 	if($pounds==0 && $ounces==0) $ounces=1;
    300. 

  300. 	for($index=0;$index<$numuspsmeths;$index++){
    301. 

  301. 		if($uspsmethods[$index][0]=="FIRSTCLASS"){
    302. 

  302. 			if($pounds==0 && $ounces<=13){
    303. 

  303. 				$numfirstclass++;
    304. 

  304. 				$firstclasscost += (((double)$ounces*0.23)+0.14);
    305. 

  305. 			}
    306. 

  306. 		}else{
    307. 

  307. 			$sXML .= '<Package ID="' . $uspsmethods[$index][0] . $id . 'x' . $quantity . '">';
    308. 

  308. 			$sXML .= "<Service>" . $uspsmethods[$index][0] . "</Service>";
    309. 

  309. 			$sXML .= "<ZipOrigination>" . $orig . "</ZipOrigination>";
    310. 

  310. 			$sXML .= "<ZipDestination>" . substr($dest, 0, 5) . "</ZipDestination>";
    311. 

  311. 			$sXML .= "<Pounds>" . $pounds . "</Pounds>";
    312. 

  312. 			$sXML .= "<Ounces>" . $ounces . "</Ounces>";
    313. 

  313. 			$sXML .= "<Container>" . $container . "</Container>";
    314. 

  314. 			$sXML .= "<Size>" . $size . "</Size>";
    315. 

  315. 			$sXML .= "<Machinable>" . $machinable . "</Machinable>";
    316. 

  316. 			$sXML .= "</Package>";
    317. 

  317. 		}
    318. 

  318. 	}
    319. 

  319. 	return $sXML;
    320. 

  320. }
    321. 

  321. function addInternational($id,$iWeight,$quantity,$mailtype,$country){
    322. 

  322. 	$pounds = (int)$iWeight;
    323. 

  323. 	$ounces = round(($iWeight-$pounds)*16.0);
    324. 

  324. 	if($pounds==0 && $ounces==0) $ounces=1;
    325. 

  325. 	$sXML = "<Package ID=\"" . $id . 'x' . $quantity . "\">";
    326. 

  326. 		$sXML .= "<Pounds>" . $pounds . "</Pounds>";
    327. 

  327. 		$sXML .= "<Ounces>" . $ounces . "</Ounces>";
    328. 

  328. 		$sXML .= "<MailType>" . $mailtype . "</MailType>";
    329. 

  329. 		$sXML .= "<Country>" . $country . "</Country>";
    330. 

  330. 	return $sXML . "</Package>";
    331. 

  331. }
    332. 

  332. function addUPSInternational($iWeight,$adminUnits,$packTypeCode,$country,$packcost){
    333. 

  333. 	global $addshippinginsurance, $countryCurrency;
    334. 

  334. 	if($iWeight<0.1) $iWeight=0.1;
    335. 

  335. 	$sXML = "<Package><PackagingType><Code>" . $packTypeCode . "</Code><Description>Package</Description></PackagingType>";
    336. 

  336. 	$sXML .= "<Description>Rate Shopping</Description><PackageWeight><UnitOfMeasurement><Code>" . $adminUnits . "</Code></UnitOfMeasurement><Weight>" . $iWeight . "</Weight></PackageWeight>";
    337. 

  337. 	if(abs(@$addshippinginsurance)==1 || (abs(@$addshippinginsurance)==2 && trim(@$_POST["wantinsurance"])=="Y")){
    338. 

  338. 		if($packcost > 50000) $packcost=50000;
    339. 

  339. 		$sXML .= "<PackageServiceOptions><InsuredValue><CurrencyCode>" . $countryCurrency . "</CurrencyCode><MonetaryValue>" . number_format($packcost,2,'.','') . "</MonetaryValue></InsuredValue></PackageServiceOptions>";
    340. 

  340. 	}
    341. 

  341. 	return $sXML . "</Package>";
    342. 

  342. }
    343. 

  343. function addCanadaPostPackage($iWeight,$adminUnits,$packTypeCode,$country,$packcost,$dimens){
    344. 

  344. 	global $addshippinginsurance, $countryCurrency, $packtogether, $productdimensions;
    345. 

  345. 	if($iWeight<0.1) $iWeight=0.1;
    346. 

  346. 	if($packtogether) $thesize = 1; else $thesize = 19;
    347. 

  347. 	if(@$productdimensions==TRUE){
    348. 

  348. 		$proddims = split("x", $dimens);
    349. 

  349. 		if(@$proddims[0] != '') $thelength = $proddims[0]; else $thelength = $thesize;
    350. 

  350. 		if(@$proddims[1] != '') $thewidth = $proddims[1]; else $thewidth = $thesize;
    351. 

  351. 		if(@$proddims[2] != '') $theheight =  $proddims[2]; else $theheight = $thesize;
    352. 

  352. 	}else{
    353. 

  353. 		$thelength = $thesize;
    354. 

  354. 		$thewidth = $thesize;
    355. 

  355. 		$theheight =  $thesize;
    356. 

  356. 	}
    357. 

  357. 	$sXML = "<item><quantity> 1 </quantity><weight> " . $iWeight . " </weight><length> ".$thelength." </length><width> ".$thewidth." </width><height> ".$theheight." </height><description> Goods for shipping rates selection </description></item>";
    358. 

  358. 	return $sXML;
    359. 

  359. }
    360. 

  360. function USPSCalculate($sXML,$international,&$totalCost,&$errormsg,&$intShipping){
    361. 

  361. 	global $usecurlforfsock,$pathtocurl,$curlproxy;
    362. 

  362. 	$success = TRUE;
    363. 

  363. 	$sXML = "API=" . $international . "Rate&XML=" . $sXML;
    364. 

  364. 	if(@$usecurlforfsock){
    365. 

  365. 		if(@$pathtocurl != ""){
    366. 

  366. 			exec($pathtocurl . ' --data-binary \'' . str_replace("'","\'",$sXML) . '\' http://production.shippingapis.com/ShippingAPI.dll', $res, $retvar);
    367. 

  367. 			$res = implode("\n",$res);
    368. 

  368. 		}else{
    369. 

  369. 			if (!$ch = curl_init()) {
    370. 

  370. 				$errormsg = "cURL package not installed in PHP";
    371. 

  371. 				return FALSE;
    372. 

  372. 			}else{
    373. 

  373. 				curl_setopt($ch, CURLOPT_URL,'http://production.shippingapis.com/ShippingAPI.dll'); 
    374. 

  374. 				curl_setopt($ch, CURLOPT_POST, 1);
    375. 

  375. 				curl_setopt($ch, CURLOPT_HEADER, 0);
    376. 

  376. 				curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
    377. 

  377. 				curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
    378. 

  378. 				curl_setopt($ch, CURLOPT_POSTFIELDS, $sXML);
    379. 

  379. 				curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
    380. 

  380. 				if(@$curlproxy!=''){
    381. 

  381. 					curl_setopt($ch, CURLOPT_PROXY, $curlproxy);
    382. 

  382. 				}
    383. 

  383. 				$res = curl_exec($ch);
    384. 

  384. 				if(curl_error($ch) != "") print "Error with cURL installation: " . curl_error($ch) . "<br />";
    385. 

  385. 				curl_close($ch);
    386. 

  386. 			}
    387. 

  387. 		}
    388. 

  388. 	}else{
    389. 

  389. 		$header = "POST /ShippingAPI.dll HTTP/1.0\r\n";
    390. 

  390. 		$header .= "Content-Type: application/x-www-form-urlencoded\r\n";
    391. 

  391. 		$header .= 'Content-Length: ' . strlen($sXML) . "\r\n\r\n";
    392. 

  392. 		$fp = fsockopen ('production.shippingapis.com', 80, $errno, $errstr, 30);
    393. 

  393. 		if (!$fp){
    394. 

  394. 			echo "$errstr ($errno)"; // HTTP error handling
    395. 

  395. 			return FALSE;
    396. 

  396. 		}else{
    397. 

  397. 			$res = "";
    398. 

  398. 			fputs ($fp, $header . $sXML);
    399. 

  399. 			while (!feof($fp)) {
    400. 

  400. 				$res .= fgets ($fp, 1024);
    401. 

  401. 			}
    402. 

  402. 			fclose ($fp);
    403. 

  403. 		}
    404. 

  404. 	}
    405. 

  405. 	if($success){
    406. 

  406. 		// print str_replace("<","<br />&lt;",$res) . "<br />\n";
    407. 

  407. 		$success = ParseXMLOutput($res, $international, $totalCost, $errormsg, $intShipping);
    408. 

  408. 		sortshippingarray();
    409. 

  409. 	}
    410. 

  410. 	return $success;
    411. 

  411. }
    412. 

  412. 

  413. function UPSCalculate($sXML,$international,&$totalCost, &$errormsg, &$intShipping){
    414. 

  414. 	global $pathtocurl,$curlproxy;
    415. 

  415. 	$success = true;
    416. 

  416. 	if(@$pathtocurl != ""){
    417. 

  417. 		exec($pathtocurl . ' --data-binary \'' . str_replace("'","\'",$sXML) . '\' https://www.ups.com/ups.app/xml/Rate', $res, $retvar);
    418. 

  418. 		$res = implode("\n",$res);
    419. 

  419. 	}else{
    420. 

  420. 		if (!$ch = curl_init()) {
    421. 

  421. 			$success = false;
    422. 

  422. 			$errormsg = "cURL package not installed in PHP";
    423. 

  423. 		}else{
    424. 

  424. 			curl_setopt($ch, CURLOPT_URL,'https://www.ups.com/ups.app/xml/Rate'); 
    425. 

  425. 			curl_setopt($ch, CURLOPT_POST, 1);
    426. 

  426. 			curl_setopt($ch, CURLOPT_HEADER, 0);
    427. 

  427. 			curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
    428. 

  428. 			curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
    429. 

  429. 			curl_setopt($ch, CURLOPT_POSTFIELDS, $sXML);
    430. 

  430. 			curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
    431. 

  431. 			if(@$curlproxy!=''){
    432. 

  432. 				curl_setopt($ch, CURLOPT_PROXY, $curlproxy);
    433. 

  433. 			}
    434. 

  434. 			$res = curl_exec($ch);
    435. 

  435. 			if(curl_error($ch) != ""){
    436. 

  436. 				$vsRESPMSG= "Error with cURL installation: " . curl_error($ch) . "<br />";
    437. 

  437. 				flush();
    438. 

  438. 			}
    439. 

  439. 			curl_close($ch);
    440. 

  440. 		}
    441. 

  441. 	}
    442. 

  442. 	if($success){
    443. 

  443. 		// print str_replace("<","<br />&lt;",$res) . "<br />\n";
    444. 

  444. 		$success = ParseUPSXMLOutput($res, $international, $totalCost, $errormsg, $errorcode, $intShipping);
    445. 

  445. 		sortshippingarray();
    446. 

  446. 		if($errorcode == 111210) $errormsg = "The destination zip / postal code is invalid.";
    447. 

  447. 	}
    448. 

  448. 	return $success;
    449. 

  449. }
    450. 

  450. 

  451. function CanadaPostCalculate($sXML,$international,&$totalCost, &$errormsg, &$intShipping){
    452. 

  452. 	global $pathtocurl,$canadaposttest,$usecurlforfsock,$curlproxy;
    453. 

  453. 	$success = true;
    454. 

  454. 	// print str_replace("<","<br />&lt;",$sXML) . "<HR>\n";
    455. 

  455. 	if(@$canadaposttest==TRUE)
    456. 

  456. 		$ipaddr = '206.191.4.228';
    457. 

  457. 	else
    458. 

  458. 		$ipaddr = '216.191.36.73';
    459. 

  459. 	if(@$usecurlforfsock){
    460. 

  460. 		if(@$pathtocurl != ""){
    461. 

  461. 			exec($pathtocurl . ' --data-binary \'' . str_replace("'","\'",$sXML) . '\' ' . $ipaddr . ":30000", $res, $retvar);
    462. 

  462. 			$res = implode("\n",$res);
    463. 

  463. 		}else{
    464. 

  464. 			if (!$ch = curl_init()) {
    465. 

  465. 				$success = false;
    466. 

  466. 				$errormsg = "cURL package not installed in PHP";
    467. 

  467. 			}else{
    468. 

  468. 				curl_setopt($ch, CURLOPT_URL, $ipaddr . ":30000");
    469. 

  469. 				curl_setopt($ch, CURLOPT_POST, 1);
    470. 

  470. 				curl_setopt($ch, CURLOPT_HEADER, 0);
    471. 

  471. 				curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
    472. 

  472. 				curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
    473. 

  473. 				curl_setopt($ch, CURLOPT_POSTFIELDS, $sXML);
    474. 

  474. 				curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
    475. 

  475. 				if(@$curlproxy!=''){
    476. 

  476. 					curl_setopt($ch, CURLOPT_PROXY, $curlproxy);
    477. 

  477. 				}
    478. 

  478. 				$res = curl_exec($ch);
    479. 

  479. 				if(curl_error($ch) != "") print "Error with cURL installation: " . curl_error($ch) . "<br />";
    480. 

  480. 				curl_close($ch);
    481. 

  481. 			}
    482. 

  482. 		}
    483. 

  483. 	}else{
    484. 

  484. 		$header = "POST / HTTP/1.0\r\n";
    485. 

  485. 		$header .= "Content-Type: application/x-www-form-urlencoded\r\n";
    486. 

  486. 		$header .= 'Content-Length: ' . strlen($sXML) . "\r\n\r\n";
    487. 

  487. 		$fp = fsockopen ($ipaddr, 30000, $errno, $errstr, 30);
    488. 

  488. 		if (!$fp){
    489. 

  489. 			echo "$errstr ($errno)"; // HTTP error handling
    490. 

  490. 			return FALSE;
    491. 

  491. 		}else{
    492. 

  492. 			$res = "";
    493. 

  493. 			fputs ($fp, $header . $sXML);
    494. 

  494. 			while (!feof($fp)) {
    495. 

  495. 				$res .= fgets ($fp, 1024);
    496. 

  496. 			}
    497. 

  497. 			fclose ($fp);
    498. 

  498. 		}
    499. 

  499. 	}
    500. 

  500. 	if($success){
    501. 

  501. 		// print str_replace("<","<br />&lt;",$res) . "<br />\n";
    502. 

  502. 		$success = ParseCanadaPostXMLOutput($res, $international, $totalCost, $errormsg, $errorcode, $intShipping);
    503. 

  503. 		sortshippingarray();
    504. 

  504. 	}
    505. 

  505. 	return $success;
    506. 

  506. }
    507. 

  507. ?>
    508. 

  508.