Add generation of HTML search page from search_template.html; require…

…s jQuery UI
Raku · Jul 20, 2012 · 1b78322 · 1b78322
1 parent 36fe0e4
commit 1b78322
Show file tree

Hide file tree

Showing 2 changed files with 59 additions and 0 deletions.
diff --git a/htmlify.pl b/htmlify.pl
@@ -90,6 +90,7 @@ ($out_dir = 'html', Bool :$debug)
             %types<routine>{$name} = "/routine/" ~ uri_escape( $name );
         }
     }
+    write-search-file(:$out_dir);
     write-index-file(:$out_dir);
     say "Writing per-routine files...";
     for %routines.kv -> $name, @chunks {
@@ -162,6 +163,25 @@ ($out_dir = 'html', Bool :$debug)
     );
 }
 
+sub write-search-file(:$out_dir!) {
+    say "Writing $out_dir/search.html";
+    my $template = slurp("search_template.html");
+    my @items;
+    my sub fix-url ($raw) { $raw.substr(1) ~ '.html' };
+    @items.push: %types<language>.pairs.sort.map({
+        "\{ label: \"Language: {.key}\", value: \"{.key}\", url: \"{ fix-url(.value) }\" \}"
+    });
+    @items.push: %types<type>.sort.map({
+        "\{ label: \"Type: {.key}\", value: \"{.key}\", url: \"{ fix-url(.value) }\" \}"
+    });
+    @items.push: %types<routine>.sort.map({
+        "\{ label: \"Routine: {.key}\", value: \"{.key}\", url: \"{ fix-url(.value) }\" \}"
+    });
+
+    my $items = @items.join(",\n");
+    spurt("$out_dir/search.html", $template.subst("ITEMS", $items));
+}
+
 sub write-index-file(:$out_dir!) {
     say "Writing $out_dir/index.html";
     my $pod = pod-with-title('Perl 6 Documentation',

diff --git a/search_template.html b/search_template.html
@@ -0,0 +1,39 @@
+<!DOCTYPE html>
+<html>
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+<title>Perl 6 Doc Search</title>
+<link type="text/css" href="css/custom-theme/jquery-ui-1.8.21.custom.css" rel="stylesheet" />
+<script type="text/javascript" src="js/jquery-1.7.2.min.js"></script>
+<script type="text/javascript" src="js/jquery-ui-1.8.21.custom.min.js"></script>
+<script type="text/javascript">
+function display () {
+  var iframe_doc = $("#buffer").get()[0].contentDocument;
+  $("#display").html(iframe_doc.body.innerHTML);
+}
+$(function(){
+  $("#query").autocomplete({
+    source: [
+ITEMS
+    ],
+    select: function (event, ui) {
+      $("#buffer").attr("src", ui.item.url);
+    }
+  }).focus();
+});
+</script>
+<style type="text/css">
+#buffer { height: 0; width: 0; border: none; }
+
+</style>
+</head>
+
+<body>
+<div id="search" class="ui-widget">
+  <label for="query">Search for: </label>
+  <input id="query" style="z-index: 100; position: relative" title="Enter Perl 6 document to search for" />
+</div>
+<div id="display"></div>
+<iframe id="buffer" onload="display()"></iframe>
+</body>
+</html>