let the past begone in cvs land. welcome to igit igit!

world/net/utility/md5.c

@@ -0,0 +1,18 @@
+// $Id: md5.c,v 1.6 2007/08/10 19:07:44 lynx Exp $ // vim:syntax=lpc:ts=8
+#include <net.h>
+
+inherit NET_PATH "spawn";
+
+handback(mixed digest, closure callback) {
+    funcall(callback, digest);
+    unspawn();
+}
+
+
+dmd5(mixed text, closure callback) {
+    // init(); .... init????
+    spawn("md5.pl", 0, lambda(({ 'digest }), 
+			      ({ symbol_function("handback", ME), 'digest,
+			       callback })));
+    send(text);
+}

world/net/utility/onhold.c

@@ -0,0 +1,22 @@
+// $Id: onhold.c,v 1.2 2007/10/02 10:35:46 lynx Exp $ // vim:syntax=lpc:ts=8
+//
+// keep a connection on hold. used during shutdown period
+// to avoid clients and such to reconnect before we are
+// actually restarting.
+//
+#include <net.h>
+
+onhold(in) {
+	next_input_to(#'onhold);
+#if DEBUG > 0
+# ifdef _flag_log_hosts
+	log_file("ONHOLD", "[%s] %s (%O) %O\n", ctime(),
+             query_ip_name(ME) || "?", query_mud_port(ME), in);
+# endif
+#endif
+}
+
+logon() {
+	P1(("On hold: %s (%O)\n", query_ip_name(ME) || "?", query_mud_port(ME)))
+	next_input_to(#'onhold);
+}