waffle2k

#!/bin/sh

echo -e '\n' | openssl s_client -connect $1:443 -crlf -tlsextdebug 2>&1| grep 'server extension "heartbeat" (id=15)' || echo safe

waffle2k

--- debian/rules.old    2013-07-15 08:16:12.000000000 -0400
+++ debian/rules        2014-04-08 03:06:31.584582710 -0400
@@ -53,7 +53,7 @@
        dh_testdir
 #      perl util/ssldir.pl /usr/lib/ssl
 #      chmod +x debian/libtool
-       ./Configure no-shared $(CONFARGS) debian-$(DEB_HOST_ARCH)
+       ./Configure no-shared $(CONFARGS) linux-elf
        $(if $(filter enable-ec_nistp_64_gcc_128, $(CONFARGS)), make $(CROSS) -f Makefile depend)
        make $(CROSS) -f Makefile all

waffle2k

#!/usr/bin/perl
use strict;

use LWP::UserAgent;
use LWP::Simple;

sub contact_lookup_ip {
	my $ip = shift;

	my $q = join( ".", reverse( split( /\./, $ip ) ) ) . ".abuse-contacts.abusix.org";

waffle2k

#!/bin/sh

curl -s weather.opensrs.com | perl -E 'print grep { /Currently/ .. /-?\d+\.\d+/ } <>' | perl -lane 'print $1 if /(-?\d+\.\d+)/'

waffle2k

        std::clog.rdbuf(new log::FileLog("/dev/stderr"));

        if (char *l = getenv("DEBUGLOG")){
                if (0==strcmp("syslog",l)){
                        std::clog.rdbuf(new log::SysLog(argv[0], LOG_LOCAL0));
                }
                else {
                        // Assign it to the supplied file
                        std::clog.rdbuf(new log::FileLog(l));
                }

waffle2k

#!/bin/sh
# git-sub

git submodule foreach git pull origin master

waffle2k

METARULE "dkim-test-fail" ( 
    "dkim-gmail-not-verified", 
    "from-gmail",
    "grab-from", 
    "grab-subject" ) 
{
    log "Failed-to-pass-DKIM-signature-verification";
    iter "dkim:d";
    iter "log:recipient";
    iter "log:sender";

waffle2k

#!/bin/bash
#
# Import public keys from a wiki page, etc.
# Poor man's keyserver.

SOURCE=$1

if [ -z $SOURCE ]; then
  echo "Please supply a URL"
  exit 1

waffle2k

#!/usr/bin/perl
use strict;

my $author = `git config user.email`;

if ($ARGV[0] =~ /^\S+?\@\S+$/){
	$author = shift;
}

my $since = join( " ", @ARGV );

waffle2k

#!/usr/bin/python
import sys

numerator_set = []

for input in sys.stdin.readlines():
    numerator_set.append( float(input) )

numerator = sum( numerator_set ) * 1.0