This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(require '[com.keminglabs.zmq-async.core :refer [register-socket!]] | |
'[clojure.core.async :refer [>! <! <!! >!! go chan sliding-buffer close!]]) | |
(let [addr "tcp://*:9999" | |
[s-in s-out] (repeatedly 2 #(chan (sliding-buffer 64)))] | |
(register-socket! {:in s-in :out s-out :socket-type :rep | |
:configurator (fn [socket] (.bind socket addr))}) | |
(println "waiting messages...") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/python | |
import hmac, struct, time, base64, hashlib # for totp generation | |
import re, sys, subprocess # for general stuff | |
from getopt import getopt, GetoptError # pretending to be easy-to-use | |
# | |
# gtb - Google(auth) + Tunnelblick | |
# |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
## Dependencies: $ brew install oath-toolkit | |
function connect { | |
service="$1" | |
password='123456' | |
secret=$(cat $HOME/.google_authenticator) | |
totp=$(oathtool --base32 --totp $secret) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env python | |
import base64,hashlib,hmac,struct,time,sys | |
if not len(sys.argv[1:]): sys.exit('usage: totp <secret>') | |
digest = hmac.new(base64.b32decode(sys.argv[1]), struct.pack('>Q', int(time.time()) // 30), hashlib.sha1).digest() | |
offset = ord(digest[19]) & 15 | |
print '06d' % (struct.unpack('>I', digest[offset:offset+4])[0] & 0x7fffffff % 1000000) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh -e | |
cmd=connect | |
name=$(scutil --nc list | sed -n 's/^* \+.\+\? \+.\+\? \+IPSec \+"\(.\+\?\)" \+\[IPSec\]/\1/p') | |
password= | |
secret= | |
token= | |
_usage() { | |
echo "Usage: $(basename $0) <command> [-n name] [-p pass] [-s secret] [-t token] [-h]" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh -e | |
if [ "$#" -ne 2 ] ; then | |
echo "Usage: compact-vmdk <VM_NAME> <IMAGE_PATH>" | |
echo | |
echo "Compacts VMDK images by converting it temporarily to a VDI image, compacting it," | |
echo "and then converting it back." | |
echo | |
echo "Example:" | |
echo |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
PROFILE=Default | |
strings $HOME/Library/Application\ Support/Google/Chrome/$PROFILE/Current\ Session | sort | uniq | grep ^http |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[pull-request] | |
group = firstname@lastname.com firstname2@lastname2.com | |
[alias] | |
pull-request = "!branch=$(git name-rev --name-only HEAD) ; echo \"git pull $(git remote) $branch\n\n $(git log -1 HEAD --stat)\" | mail -s \"Pull request: $branch\" $(git config pull-request.group)" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
SL s·l [ˈəsːəl] n. Swedish company that resists customer comfort delivering train and bus transportation service in time. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
» brew install --use-gcc emacs --cocoa --with-x | |
==> Downloading http://ftp.gnu.org/pub/gnu/emacs/emacs-23.3.tar.bz2 | |
File already downloaded and cached to /Users/uwe/Library/Caches/Homebrew | |
==> Downloading patches | |
######################################################################## 100.0% | |
==> Patching | |
patching file lisp/term/ns-win.el | |
Hunk #1 succeeded at 1267 (offset 4 lines). | |
patching file src/nsfns.m | |
Hunk #1 succeeded at 2591 (offset 2 lines). |
OlderNewer