silky

I wasn't first to get the key. Nor was I second, third, or even fourth. I'm probably not even the
10th to get it. But I'm happy that I was able to prove to myself that I too could do it.

The sleepless adventure began yesterday afternoon, 2014-04-12 15:19:04.827516279 -0700.

First, I have to admit I was a skeptic. Like the handful of other dissenters, I had initially
believed that it would be highly improbable under normal conditions to obtain the private key
through exploiting Heartbleed. So this was my motivation for participating in Cloudflare's
challenge. I had extracted a lot of other things with Heartbleed, but I hadn't actually set out to
extract private keys. So I wanted to see first-hand if it was possible or not.

silky

{-# LANGUAGE BangPatterns #-}


-- Preview on Youtube: http://www.youtube.com/watch?v=bK01Bgh32Sc

import Data.Complex

type C = Complex Float
type Color = (Float,Float,Float)
type Point = (Float,Float)

silky

#!/usr/bin/env node

// npm install connect

var port = process.argv[2];
var cwd  = process.cwd();

if(! port) {
	throw("Usage: serve <port>");
}

silky

{-# LANGUAGE QuasiQuotes #-}

import Text.InterpolatedString.Perl6 -- For tests
import System.Environment (getArgs)
import Data.List.Split    (splitOn)
import Data.List          (intercalate)

-- IO:

main :: IO ()

silky

In the Beginning was the Command Line

by Neal Stephenson


About twenty years ago Jobs and Wozniak, the founders of Apple, came up with the very strange idea of selling information processing machines for use in the home. The business took off, and its founders made a lot of money and received the credit they deserved for being daring visionaries. But around the same time, Bill Gates and Paul Allen came up with an idea even stranger and more fantastical: selling computer operating systems. This was much weirder than the idea of Jobs and Wozniak. A computer at least had some sort of physical reality to it. It came in a box, you could open it up and plug it in and watch lights blink. An operating system had no tangible incarnation at all. It arrived on a disk, of course, but the disk was, in effect, nothing more than the box that the OS came in. The product itself was a very long string of ones and zeroes that, when properly installed and coddled, gave you the ability to manipulate other very long strings of o

silky

#!/bin/bash

cabal init \
 --version="0.1.0.0" \
 --non-interactive \
 --no-comments \
 --minimal \
 --license=MIT \
 --author="Lyndon Maydwell" \
 --email=maydwell@gmail.com \

silky

#!/bin/bash

echo 'digraph {'
data="$(grep '^data' Prototype.hs | sed 's/data //; s/ .*//')"
for i in $data
do
	echo "$i;"
	targets="$(grep "data $i .*=" Prototype.hs -A 6 \
		| sed '/^$/,$d' \
		| grep '::' \

silky

{- 
    Zachary Weaver <zaw6@pitt.edu>
    JSONParser.hs
    Version 0.1.1
    
    A simple example of parsing JSON with Parsec in haskell.  Note that 
    since the primary point of this excersize is demonstration, 
    Text.Parsec.Token was avoided to expose more of the grammar.  Also,
    complicated optimizations and shorcuts were avoided (mostly).

silky

do androids dream of cooking?

The following recipes are sampled from a trained neural net. You can find the repo to train your own neural net here: https://github.com/karpathy/char-rnn Thanks to Andrej Karpathy for the great code! It's really easy to setup.

The recipes I used for training the char-rnn are from a recipe collection called ffts.com And here is the actual zipped data (uncompressed ~35 MB) I used for training.

It seems to be in a format intended to be read by a program called Meal-Master, therefore you will see those lines repeated all over:

silky

(ns repl-test.mud-experiment
  (:use [overtone.live])
  (:use [overtone.studio.scope])
  (:use mud.core)
  (:require [mud.timing :as timing]))

(defn bpm->rate-of-16 [bpm]
  (* (/ bpm 60) 4.))

(ctl timing/root-s :rate (bpm->rate-of-16 127))