Get Ping Results from rpc.pingomatic.com via fsockopen

[soma56]

I found a pretty cool function that allows me to ping Pingomatic for new blogs that I have. Great. Now I can automate the process instead of manually going to their website. My problem is actually simple. Sometime Pingomatic is quite busy and is unable to receive the request. I want to be able to check the status of my ping request but I don't know how to get this specific field/variable? from the result.

 

Here is the ping script:

 

$title = "My blog title";

$url = "http://mynewbloglink";

function pingomatic($title,$url,$debug=true) {
    $content='<?xml version="1.0"?>'.
        '<methodCall>'.
        ' <methodName>weblogUpdates.ping</methodName>'.
        '  <params>'.
        '   <param>'.
        '    <value>'.$title.'</value>'.
        '   </param>'.
        '  <param>'.
        '   <value>'.$url.'</value>'.
        '  </param>'.
        ' </params>'.
        '</methodCall>';

    $headers="POST / HTTP/1.0\r\n".
    "User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.1) Gecko/20090624 Firefox/3.5 (.NET CLR 3.5.30729)\r\n".
    "Host: rpc.pingomatic.com\r\n".
    "Content-Type: text/xml\r\n".
    "Content-length: ".strlen($content);

    if ($debug) nl2br($headers);

    $request=$headers."\r\n\r\n".$content;
    $response = "";
    $fs=fsockopen('rpc.pingomatic.com',80, $errno, $errstr);
    if ($fs) {
        fwrite ($fs, $request);
        while (!feof($fs)) $response .= fgets($fs);
        if ($debug) echo "<xmp>".$response."</xmp>";
        fclose ($fs);
        preg_match_all("/<(name|value|boolean|string)>(.*)<\/(name|value|boolean|string)>/U",$response,$ar, PREG_PATTERN_ORDER);
        for($i=0;$i<count($ar[2]);$i++) $ar[2][$i]= strip_tags($ar[2][$i]);
        return array('status'=> ( $ar[2][1]==1 ? 'ko' : 'ok' ), 'msg'=>$ar[2][3] );
    } else {
        if ($debug) echo "<xmp>".$errstr." (".$errno.")</xmp>";
        return array('status'=>'ko', 'msg'=>$errstr." (".$errno.")");
    }
}

pingomatic($title,$url,$debug=true); 

 

This script works and when Pingomatic 'is available' returns something to the effect of Thanks for pinging, you're blog is being forwarded...etc. etc.

 

When Pingomatic is too busy I receive the following result:

 

HTTP/1.1 200 OK 
Server: nginx 
Date: Mon, 30 Apr 2012 22:23:17 GMT 
Content-Type: text/xml;charset=utf-8 
Connection: close 
Content-Length: 390
<?xml version="1.0"?> 
<methodResponse> 
<params> 
<param> 
<value> 
<struct> 
<member><name>flerror</name><value><boolean>1</boolean></value></member> 
<member><name>message</name><value><string>Pingomatic is a bit overloaded at the moment</string></value></member> 
</struct> 
</value> 
</param>
</params>
</methodResponse>

 

What I'm trying to get in a variable is the '<member><name>message' result. In this case it's "Pingomatic is a bit overloaded at the moment". This way I can try to ping the server again later at another time knowing that the ping was not successful.

 

What I've tried:

 

I've attempted to see if the 'message' (Pingomatic is a bit overloaded at the moment) is in some of the variables within the original function:

 

$pingresponse = "<xmp>".$errstr." (".$errno.")</xmp>";

$pingresponse2 = "<xmp>".$response."</xmp>";

$pingresponse3 = array('status'=> ( $ar[2][1]==1 ? 'ko' : 'ok' ), 'msg'=>$ar[2][3] );

echo "Ping Server Response : Debug: ".$debug." Errstr :".$errstr." Errno: ".$errno."Response: ".$response;

 

But it isn't. My plan was to use strpos to search for the term "Pingomatic is a bit overloaded at the moment" in which I'll be able to know whether or not the ping was successful or not.

 

Any ideas?