webmaster@0: <?php
webmaster@0: 	include("classes.php");
webmaster@0: 	$Data = new DataAccess();
webmaster@0: 	$Data->Query("SELECT * FROM Mess WHERE num_mess=255");
webmaster@0: 	$row = $Data->GetRow();
webmaster@0: 	$tbAddress = "http://www.defr.org/blog/tb.php?id=255";
webmaster@0: 	$ar_tbAddress = parse_url($tbAddress);
webmaster@0: 	if(!array_key_exists('port', $ar_tbAddress)) $ar_tbAddress['port'] = 80;
webmaster@0: 	if(!array_key_exists('path', $ar_tbAddress)) $ar_tbAddress['path'] = '/';
webmaster@0: 	if(array_key_exists('query', $ar_tbAddress)) $ar_tbAddress['query'] = '?' . $ar_tbAddress['query'];
webmaster@0: 	var_export($ar_tbAddress);
webmaster@0: 		$fp = fsockopen($ar_tbAddress['host'], 80, $errno, $errstr, 15);
webmaster@0: 		if($fp) {
webmaster@0: 			$genToSend = "POST {$ar_tbAddress['path']}{$ar_tbAddress['query']} HTTP/1.0\r\n";
webmaster@0: 			$genToSend .= "Host: {$ar_tbAddress['host']}\r\n";
webmaster@0: 			$genToSend .= "Content-Type: application/x-www-form-urlencoded \n";
webmaster@0: 			
webmaster@0: 			// Essai de récuperation de l'encodage...Envoie en iso si pas d'indication d'UTF...
webmaster@0: 			$argToSend = "__info=1";
webmaster@0: 			$toSend = $genToSend . "Content-Length: " . strlen($argToSend) . "\n\n";
webmaster@0: 			$toSend .= $argToSend;
webmaster@0: 			echo("<pre>$toSend</pre>");
webmaster@0: 			fwrite($fp, $toSend);
webmaster@0: 			while(!feof($fp))
webmaster@0: 				$result .= fgets($fp, 128);
webmaster@0: 			fclose($fp);
webmaster@0: 			if(!preg_match('/<encoding>(UTF-8|utf-8)<\/encoding>/msU',$result)) {
webmaster@0: 				$row['Titre'] = utf8_decode($row['Titre']);
webmaster@0: 				$row['Message'] = utf8_decode($row['Message']);
webmaster@0: 				echo("Snif, utilisation d'ISO...");
webmaster@0: 			}
webmaster@0: 			
webmaster@0: 			$fp = fsockopen($ar_tbAddress['host'], 80, $errno, $errstr, 15);
webmaster@0: 			$argToSend = "title=" . htmlentities(urlencode($row['Titre'])) . "&blog_name=Dual+Blog";
webmaster@0: 			$argToSend .= "&url=http://defr.org/blog/posts/{$row['num_mess']}&excerpt=" . htmlentities(urlencode(substr(strip_tags($row['Message']), 0, 255) . "..."));
webmaster@0: 
webmaster@0: 			$toSend = $genToSend . "Content-Length: " . strlen($argToSend) . "\n\n";
webmaster@0: 			$toSend .= $argToSend;
webmaster@0: 			echo("<pre>$toSend</pre>");
webmaster@0: 			fwrite($fp, $toSend);
webmaster@0: 			while (!feof($fp)) {
webmaster@0: 				echo fgets($fp, 128);
webmaster@0: 			}
webmaster@0: 			fclose($fp);
webmaster@0: 		} else {
webmaster@0: 			echo("Pb de connexion : $errno - $errstr");
webmaster@0: 		}
webmaster@0: ?>