1 files changed, 63 insertions, 0 deletions
diff --git a/ext/tidy/examples/urlgrab.php b/ext/tidy/examples/urlgrab.php
new file mode 100644
index 0000000000..63a2875a79
--- /dev/null
+++ b/ext/tidy/examples/urlgrab.php
@@ -0,0 +1,63 @@
+<?php
+
+    /*
+     * urlgrab.php
+     *
+     * A simple command-line utility to extract all of the URLS contained
+     * within <A HREF> tags from a document.
+     *
+     * By: John Coggeshall <john@php.net>
+     *
+     * Usage: php urlgrab.php <file>
+     *
+     */
+     
+    /* Create a Tidy Resource */
+    $tidy = tidy_create();
+    
+    /* Parse the document */
+    tidy_parse_file($tidy, $_SERVER['argv'][1]);
+    
+    /* Fix up the document */
+    tidy_clean_repair($tidy);
+    
+    /* Get an object representing everything from the <HTML> tag in */
+    $html = tidy_get_html($tidy);
+    
+    /* Traverse the document tree */
+    print_r(get_links($html));
+    
+    function get_links($node) {
+        $urls = array();
+        
+        /* Check to see if we are on an <A> tag or not */
+        if($node->id == TIDY_TAG_A) {
+            /* If we are, find the HREF attribute */
+            $attrib = $node->get_attr_type(TIDY_ATTR_HREF);
+            if($attrib) {
+                /* Add the value of the HREF attrib to $urls */
+                $urls[] = $attrib->value;
+            }
+            
+        }
+        
+        /* Are there any children? */
+        if($node->has_children()) {
+            
+            /* Traverse down each child recursively */
+            foreach($node->children as $child) {
+                   
+                /* Append the results from recursion to $urls */
+                foreach(get_links($child) as $url) {
+                    
+                    $urls[] = $url;
+                    
+                }
+                
+            }
+        }
+        
+        return $urls;
+    }
+    
+?>  
+\ No newline at end of file