Beispiel #1
0
         if ($msg) {
             print "message: {$tag}\n";
         }
         if ($cd < 0) {
             if ($cd == PN_EOS) {
                 // now that we hit the end of the message, updated the
                 // disposition and advance the link to the next message
                 pn_disposition($delivery, PN_ACCEPTED);
                 pn_advance($lnk);
                 break;
             } else {
                 print "error reading message: {$cd}\n";
             }
         }
     }
     if (pn_credit($lnk) < 10) {
         pn_flow($lnk, 10);
     }
 } else {
     if (pn_writable($delivery)) {
         // we have capacity to write, so let's send a message
         list($cd, $msg) = pn_message_data("this is message {$tag}", 1024);
         $n = pn_send($lnk, $msg);
         if ($n != strlen($msg)) {
             print "error sending message: {$cd}";
         }
         if (pn_advance($lnk)) {
             print "sent {$tag}\n";
             pn_delivery($lnk, "delivery-{$counter}");
             $counter++;
         }
Beispiel #2
0
         }
         if ($cd < 0) {
             if ($cd == PN_EOS) {
                 // now that we hit the end of the message, updated the
                 // disposition and advance the link to the next message
                 pn_disposition($delivery, PN_ACCEPTED);
                 pn_advance($lnk);
                 $rcvd++;
                 break;
             } else {
                 print "error reading message: {$cd}\n";
             }
         }
     }
     $delta = min($count ? $count : 10 - $rcvd, 10);
     if ($delta && pn_credit($lnk) < $delta) {
         pn_flow($lnk, $delta);
     }
     if ($count && $rcvd == $count) {
         pn_link_close($lnk);
     }
 } else {
     if (pn_writable($delivery)) {
         // we have capacity to write, so let's send a message
         list($cd, $msg) = pn_message_data("this is message {$tag}", 1024);
         $n = pn_send($lnk, $msg);
         if ($n != strlen($msg)) {
             print "error sending message: {$cd}";
         }
         if (pn_advance($lnk)) {
             print "sent {$tag}\n";