git.m6w6.name Git - m6w6/ext-http/blob - tests/helper/dump.inc

   1 <?php
   2
   3 function dump_headers($stream, array $headers) {
   4         if (!is_resource($stream)) {
   5                 $stream = fopen("php://output", "w");
   6         }
   7         ksort($headers);
   8         foreach ($headers as $key => $val) {
   9                 fprintf($stream, "%s: %s\n", $key, $val);
  10         }
  11         fprintf($stream, "\n");
  12 }
  13
  14 function dump_message($stream, http\Message $msg, $parent = false) {
  15         if (!is_resource($stream)) {
  16                 $stream = fopen("php://output", "w");
  17         }
  18         fprintf($stream, "%s\n", $msg->getInfo());
  19         dump_headers($stream, $msg->getHeaders());
  20         $msg->getBody()->toStream($stream);
  21
  22         if ($parent && ($msg = $msg->getParentMessage())) {
  23                 dump_message($stream, $msg, true);
  24         }
  25 }
  26
  27 ?>