projects / m6w6 / ext-http / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree | github
raw | inline | side by side
- add note about SSL connect errors on windows due to LIB/DLL mismatches
[m6w6/ext-http] / funcsummary.php
diff --git a/funcsummary.php b/funcsummary.php
index f5330e69e9bff18e44e6ed98118b4274bf0ee3b7..f4830e022223a79d2211c7b9f62fadc247b3e2ad 100644 (file)
--- a/funcsummary.php
+++ b/funcsummary.php
@@ -14,11 +14,18 @@ function ff($t)
 {
     $t = preg_replace('/^ \* /m', '', trim($t, "*/ \n"));
     $t = preg_replace_callback('/(\<\?php.*?\?\>)/s', 'hl', $t);
-    $t = nl2br(preg_replace('/\n *\* */', "\n", $t));
+    $t = str_replace("<br />\n<br />\n", "</p>\n<p>", nl2br(preg_replace('/\n *\* */', "\n", $t)));
     $t = preg_replace('/(\<br \/\>\n)+\<pre\>(\<br \/\>\n)+/', '</p><pre>', $t);
     $t = preg_replace('/(\<br \/\>\n)+\<\/pre\>(\<br \/\>\n)+/', '</pre><p>', $t);
+    $t = str_replace("</span><br />\n</code>", "</span></code>", $t);
     return sprintf('<p>%s</p>', ltrim($t, ' *'));
 }
+function e($s)
+{
+    $a = func_get_args();
+    array_unshift($a, STDERR);
+    call_user_func_array('fprintf', $a);
+}
 
 $preface = <<<_PREFACE
 <html>
@@ -29,13 +36,20 @@ $preface = <<<_PREFACE
             font-size: 80%%; 
             font-family: sans-serif; 
         } 
-        h2 { 
+        h2, h3 { 
             color: #339; 
             clear: both;
             font-size: 1.2em;
             background: #ffc;
             padding: .2em;
         } 
+        h2.o {
+            color: #66b; 
+            clear: both;
+            font-size: 1.3em;
+            background: #f0f0f0;
+            padding: .2em;
+        }
         p { 
             margin-left: 1em;
         } 
@@ -53,9 +67,32 @@ $preface = <<<_PREFACE
             width: auto;
             float: left;
         }
+        p, pre {
+            clear: both;
+        }
         p br, pre code br { 
             display: block; 
         } 
+        .toc {
+               position: absolute;
+               top: 10px;
+               right: 10px;
+               width: 300px;
+               height: 95%%;
+               overflow: scroll;
+               font-size: .9em;
+               }
+               body>div.toc {
+                       position: fixed;
+               }
+               .toc ul {
+                       padding-left: 15px;
+                       margin-left: 0;
+               }
+               .toc li {
+                       padding: 0;
+                       margin: 0;
+               }
     </style>
 </head>
 <body>
@@ -65,23 +102,59 @@ $footer = <<<_FOOTER
     <p><b>Generated at: %s</b></p>
 </body>
 </html>
+
 _FOOTER;
 
 if ($_SERVER['argc'] < 2) {
     die("Usage: {$_SERVER['argv'][0]} <file>[ <file> ...]\n");
 }
 
+$TOC = array();
+
 printf($preface, basename(getcwd()));
 
-foreach (array_slice($_SERVER['argv'], 1) as $f) {
-    if (mf($f, $m)) {
-        printf("<h1>%s</h1>\n", basename($f));
-        foreach ($m[1] as $i => $p) {
-            printf("<h2 id=\"%s\">%s</h2>\n%s\n", $m[4][$i], $p, ff($m[3][$i]));
+foreach (array_slice($_SERVER['argv'], 1) as $fp) {
+    foreach (glob($fp) as $f) {
+        
+        if (mf($f, $m)) {
+            e("\nAnalyzing %s\n", basename($f));
+            printf("<h1 id=\"%s\">%s</h1>\n", basename($f), basename($f));
+            foreach ($m[1] as $i => $p) {
+                e("Documenting $p\n");
+                if ($o = preg_match('/^(.*), (.*)$/', $m[4][$i], $n)) {
+                    if ($n[2] == '__construct') {
+                        printf("<h2 id=\"%s\" class=\"o\">%s</h2>\n", $n[1], $n[1]);
+                    }
+                       $TOC[basename($f)][$n[1]][$n[2]] = $n[1].'::'.$n[2].'()';
+                       printf("<h%d id=\"%s\">%s</h%d>\n", 3, $n[1].'_'.$n[2], $p, 3);
+                               } else {
+                                       $TOC[basename($f)][$m[4][$i]] = $m[4][$i].'()';
+                                       printf("<h%d id=\"%s\">%s</h%d>\n", 2, $m[4][$i], $p, 2);
+                               }
+                               print ff($m[3][$i]) ."\n";
+            }
+            print "<hr noshade>\n";
         }
-        print "<hr noshade>\n";
     }
 }
+printf("<div class=\"toc\"><strong>Table of Contents</strong>\n<ul>\n");
+foreach ($TOC as $file => $f) {
+       printf("<li><a href=\"#%s\">%s\n<ul>\n", $file, $file);
+       foreach ($f as $cof => $met) {
+               if (is_array($met)) {
+                       foreach ($met as $id => $m) {
+                               printf("<li><a href=\"#%s_%s\">%s</a></li>\n", $cof, $id, $m);
+                       }
+               } else {
+                       printf("<li><a href=\"#%s\">%s</a>\n", $cof, $cof);
+               }
+               printf("</li>\n");
+       }
+       printf("</ul>\n</li>\n");
+}
+printf("</ul>\n</div>\n");
 
 printf($footer, date('r'));
-?>
\ No newline at end of file
+e("\nDone\n");
+?>
+
Extended HTTP Support