From f9957d11ed3674b5c2ff7ba7c234bed7cb036b5f Mon Sep 17 00:00:00 2001
From: Peter Simons <simons@cryp.to>
Date: Fri, 10 Oct 2008 00:13:19 +0200
Subject: google plugin: Use google.com to search the local site.

Google allows has a nice feature, sitesearch, that allows anyone to
limit search results to a specific site. Obviously, this feature can be
used to provide a search engine for the local ikiwiki site without the
need to install any additional software. Just enable the 'google' plugin
and make sure that --url uses the proper hostname. Thanks to Joey for
helping to get the Perl implementation right.
---
 IkiWiki/Plugin/google.pm  | 49 +++++++++++++++++++++++++++++++++++++++++++++++
 templates/googleform.tmpl |  6 ++++++
 2 files changed, 55 insertions(+)
 create mode 100644 IkiWiki/Plugin/google.pm
 create mode 100644 templates/googleform.tmpl

diff --git a/IkiWiki/Plugin/google.pm b/IkiWiki/Plugin/google.pm
new file mode 100644
index 000000000..be07ca2be
--- /dev/null
+++ b/IkiWiki/Plugin/google.pm
@@ -0,0 +1,49 @@
+#!/usr/bin/perl
+package IkiWiki::Plugin::google;
+
+use warnings;
+use strict;
+use IkiWiki 2.00;
+use URI;
+
+sub import { #{{{
+	hook(type => "getsetup", id => "google", call => \&getsetup);
+	hook(type => "checkconfig", id => "google", call => \&checkconfig);
+	hook(type => "pagetemplate", id => "google", call => \&pagetemplate);
+} # }}}
+
+sub getsetup () { #{{{
+	return
+		plugin => {
+			safe => 1,
+			rebuild => 1,
+		},
+} #}}}
+
+sub checkconfig () { #{{{
+	foreach my $required (qw(url)) {
+		if (! length $config{$required}) {
+			error(sprintf(gettext("Must specify %s when using the google search plugin"), $required));
+		}
+	}
+} #}}}
+
+my $form;
+sub pagetemplate (@) { #{{{
+	my %params=@_;
+	my $page=$params{page};
+	my $template=$params{template};
+
+	# Add search box to page header.
+	if ($template->query(name => "searchform")) {
+		if (! defined $form) {
+			my $searchform = template("googleform.tmpl", blind_cache => 1);
+			$searchform->param(sitefqdn => URI->new($config{url})->host);
+			$form=$searchform->output;
+		}
+
+		$template->param(searchform => $form);
+	}
+} #}}}
+
+1
diff --git a/templates/googleform.tmpl b/templates/googleform.tmpl
new file mode 100644
index 000000000..523cff001
--- /dev/null
+++ b/templates/googleform.tmpl
@@ -0,0 +1,6 @@
+<form method="get" action="http://www.google.com/search" id="searchform">
+ <div>
+  <input name="sitesearch" value="<TMPL_VAR SITEFQDN>" type="hidden">
+  <input name="q" value="" id="searchbox" size="16" maxlength="255" type="text">
+ </div>
+</form>
-- 
cgit v1.2.3