Skip to content

Instantly share code, notes, and snippets.

View sharl's full-sized avatar
🐰

Sharl Morlaroll sharl

🐰
View GitHub Profile
@sharl
sharl / sslexpire
Last active August 29, 2015 14:01
#!/bin/bash
#
# usage: $0 domain[:port] [alert days] [timeout]
# ex)
# $0 yahoo.com 365
#
server=${1//:*/}
port=${1/*:/}
test "$server" = "$port" && port=443
@sharl
sharl / gist:79d6b9d0d4b1358d5f6c
Last active August 29, 2015 14:02
git-clone-alter result
$ git clone-alter --name hoge --email "hoge@hoge" git@github.com:uricle/tiarra-modules.git
Cloning into 'tiarra-modules'...
remote: Counting objects: 41, done.
remote: Compressing objects: 100% (19/19), done.
remote: Total 41 (delta 22), reused 40 (delta 22)
Receiving objects: 100% (41/41), 21.26 KiB, done.
Resolving deltas: 100% (22/22), done.
$ tail -3 tiarra-modules/.git/config
[user]
name = hoge
@sharl
sharl / git-clone-alter
Last active August 29, 2015 14:02
git-clone-alter
#!/bin/bash
function usage() {
prog=$(basename $0)
cat <<EOF
Usage: $prog [option] [--] [git clone command]
-n, --name <name>
-e, --email <email>
class MentionWithURLQuoteCommand(TypableMapCommand): # {{{2
''' 最近対応したインライン引用をする発言を行います '''
def __init__(self, manager, processor, msg, status, args):
TypableMapCommand.__init__(self, manager, processor, msg, status, args)
self.include_user = False
def process(self):
text = '%s ' % self.args if self.args else ''
url = 'https://twitter.com/%s/status/%s' % (self.status.User.ScreenName, self.status.Id)
update_text = '%s\n%s' % (text, url)
$ date; for h in twitter.com:443 smtp.spmode.ne.jp:465 imap.spmode.ne.jp:993 imap2.spmode.ne.jp:993 smtp.ezweb.ne.jp:465 imap.ezweb.ne.jp:993 smtp.softbank.jp:465 imap.softbank.jp:993; do (openssl s_client -connect $h -ssl3 -no_tls1 < /dev/null > /dev/null) 2>&1 | grep -q "handshake failure" && echo OK $h || echo NG $h; done
Thu Oct 16 10:49:39 JST 2014
OK twitter.com:443
NG smtp.spmode.ne.jp:465
NG imap.spmode.ne.jp:993
NG imap2.spmode.ne.jp:993
NG smtp.ezweb.ne.jp:465
NG imap.ezweb.ne.jp:993
NG smtp.softbank.jp:465
NG imap.softbank.jp:993
@sharl
sharl / gist:604e05180fbd158c5555
Last active August 29, 2015 14:07
POODLE test revised
$ date; for h in twitter.com:443 smtp.spmode.ne.jp:465 imap.spmode.ne.jp:993 imap2.spmode.ne.jp:993 smtp.ezweb.ne.jp:465 imap.ezweb.ne.jp:993 smtp.softbank.jp:465 imap.softbank.jp:993; do for c in $(openssl ciphers -v | egrep "RC4|CBC" | cut -d" " -f1); do (openssl s_client -connect $h -ssl3 -cipher $c < /dev/null > /dev/null 2>&1) && echo NG $h $c; done; done
Thu Oct 16 13:25:21 JST 2014
NG smtp.spmode.ne.jp:465 DES-CBC3-SHA
NG imap.spmode.ne.jp:993 DES-CBC3-SHA
NG imap2.spmode.ne.jp:993 DES-CBC3-SHA
NG smtp.ezweb.ne.jp:465 DES-CBC3-SHA
NG smtp.ezweb.ne.jp:465 RC4-SHA
NG imap.ezweb.ne.jp:993 DES-CBC3-SHA
NG imap.ezweb.ne.jp:993 RC4-SHA
NG smtp.softbank.jp:465 DES-CBC3-SHA
@sharl
sharl / gist:1139256
Created August 11, 2011 09:25
cpan2deb speed up test (Web::Scraper)
real 0m19.031s (use locate)
real 0m14.668s (use corelist)
@sharl
sharl / lynx-dev.rb
Created October 20, 2011 09:21
lynx-dev brew formula
require 'formula'
class LynxDev < Formula
url 'http://lynx.isc.org/current/lynx2.8.8dev.9.tar.bz2'
homepage 'http://lynx.isc.org/current/'
md5 '35c4dfbacfd3c7024e2da079cd3e46ea'
def install
system "./configure", "--disable-debug", "--disable-dependency-tracking",
"--prefix=#{prefix}",
@sharl
sharl / gist:1816742
Created February 13, 2012 12:52
Freetype2 2.4.8 Formula
require 'formula'
class Freetype2 <Formula
url 'http://download.savannah.gnu.org/releases/freetype/freetype-2.4.8.tar.bz2'
homepage 'http://freetype.sourceforge.net/index2.html'
md5 'dbf2caca1d3afd410a29217a9809d397'
version '2.4.8'
def install
system "./configure", "--disable-debug", "--disable-dependency-tracking",
@sharl
sharl / emacs.rb
Created February 24, 2012 08:29
Yet Another Emacs 23.4 homebrew Formula (ATOK support? unconfirmed)
require 'formula'
class Emacs < Formula
url 'http://ftp.gnu.org/pub/gnu/emacs/emacs-23.4.tar.bz2'
md5 '070c68ad8e3c31fb3cb2414feaf5e6f0'
homepage 'http://www.gnu.org/software/emacs/'
if ARGV.include? "--use-git-head"
head 'git://git.sv.gnu.org/emacs.git'
else