<?
/*
+-----------------------------------------------------------------------+
| CalcFrete v0.1                                                       	|
+-----------------------------------------------------------------------+
| Data: 28/08/2003 - 22:38                                             	|
| Copyright (c) 2003                                                   	|
+-----------------------------------------------------------------------+
| Script de cálculo de frente junto aos correios                       	|
| 40215 - SEDEX 10                                                     	|
| 40010 - SEDEX Convencional                                           	|
+-----------------------------------------------------------------------+
| Autor: Rafael Verdi Sachetto <http://www.labstyle.com.br>            	|
+-----------------------------------------------------------------------+
| Exemplo:																|
| include ('calcfrete.class.php');											|
| $frete = new CalcFrete();												|
| $resultado=$frete->calcular("21740210","21875350","2");				|
| echo $resultado;														|
+-----------------------------------------------------------------------+
| Modificação:
+-----------------------------------------------------------------------+
*/
class CalcFrete{
	var $servico,$ceporigem,$cepdestino,$peso;
	//Deixei SEDEX Convencional como padrão por ser mais commum
	function calcular($ceporigem,$cepdestino,$peso,$servico = '40010'){
		$this->servico = $servico;
		$this->ceporigem = $ceporigem;
		$this->cepdestino = $cepdestino;
		$this->peso = $peso;
		if(!($this->peso == "0" || $this->peso > "30")){
		/*
		REMOVIDO POR RAFAEL
		if($this->servico=="40215"){
		*/
			$correioFile = "http://www.correios.com.br/encomendas/precos/calculo.cfm?servico=" . $this->servico . "&CepOrigem=".$this->ceporigem."&CepDestino=".$this->cepdestino."&Peso=".$this->peso;
			$resultado = join("",file($correioFile));
			$procura = strpos($resultado,'Tarifa=')+strlen('Tarifa=');
			$resultado = trim(substr($resultado,$procura));
			$fim = strpos($resultado,"&erro=");
			return trim(substr($resultado,0,$fim));
		/*
		ATUALIZADO O CAMINHO POR RAFAEL
		}elseif($this->servico=="40010"){
			$resultado=file("http://www.correios.com.br/encomendas/precos/calculo.asp?servico=40010&CepOrigem=".$this->ceporigem."&CepDestino=".$this->cepdestino."&Peso=".$this->peso."&parametro=resultado");
			return str_replace("Tarifa=","",end($resultado));
		}
		*/
		}else{
			return false;
		}
	}
}
?>