Summoning IRC service.

diff --git a/irc-summon b/irc-summon
new file mode 100644 (file)
index 0000000..fd62556
--- /dev/null
+++ b/irc-summon
@@ -0,0 +1,16 @@
+if ! glob calling-user ian ijackson
+       reject
+       quit
+fi
+
+no-disconnect-hup
+ignore-fd 0
+
+if ! grep service-user /etc/userlist
+       execute sh -c "echo problem is not a user"
+       quit
+fi
+
+no-suppress-args
+execute /usr/local/lib/ircbot/summon \
+       /usr/local/lib/ircbot/summon-write.pl