Brandon Cook phylake

## _service.md

      
              3 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                phylake
                / _service.md
            
            
              Last active
              August 29, 2015 13:56
                — forked from naholyr/_service.md
            
          
    Sample service script for debianoids

Look at LSB init scripts for more information.
Usage

Copy to /etc/init.d:
# replace "$YOUR_SERVICE_NAME" with your service's name (whenever it's not enough obvious)

  
## warp.hs
-- warp-2.1.5.2
-- ghc -O2 -threaded -rtsopts warp
-- ./warp +RTS -N -A1G
{-# LANGUAGE OverloadedStrings #-}
module Main where

import           Blaze.ByteString.Builder (copyByteString)
import           Data.Text (unpack)
import           Network.HTTP.Types.Status (status200)
import           Network.Wai

## main.hs
module Main where

class A a where
class B a where

foo :: (A a, B b) => IO a -> (a -> IO b) -> IO ()
foo _ func = return ()
    where
        -- this breaks because func is not passed in
        barBroken :: (A a, B b) => a -> IO b

## ssh_port_forward.sh
# forward local port 8080 to remotehost.com:3001
ssh -L 8080:localhost:3001 -N user@remotehost.com

## install_erlang.sh
wget http://packages.erlang-solutions.com/erlang-solutions_1.0_all.deb
sudo dpkg -i erlang-solutions_1.0_all.deb
sudo apt-get update
sudo apt-get install -y erlang

## .gitattributes
*     text=auto
*.bat text eol=crlf

## service-checklist.md

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                phylake
                / service-checklist.md
            
            
              Last active
              August 29, 2015 14:21
                — forked from acolyer/service-checklist.md
            
          
    Internet Scale Services Checklist

A checklist for designing and developing internet scale services, inspired by James Hamilton's 2007 paper "On Desgining and Deploying Internet-Scale Services."

http://mvdirona.com/jrh/talksandpapers/jamesrh_lisa.pdf

Basic tenets


 Does the design expect failures to happen regularly and handle them gracefully?
 Have we kept things as simple as possible?


## vigenere.rb
l = "xfbhlqtlj".split('').collect {|c| c[0] - 97}
k = [6,1,8,0,3,3,9,8,8]

l = l.zip(k).collect do |p|
   t = (p[0] - p[1]) % 26
   t += 97
   t.chr
end

p l.join('')

## .gemrc
gem: --no-rdoc --no-ri

## hosts.sh
ifconfig | grep broadcast | arp -a
	-- warp-2.1.5.2
	-- ghc -O2 -threaded -rtsopts warp
	-- ./warp +RTS -N -A1G
	{-# LANGUAGE OverloadedStrings #-}
	module Main where

	import Blaze.ByteString.Builder (copyByteString)
	import Data.Text (unpack)
	import Network.HTTP.Types.Status (status200)
	import Network.Wai
	module Main where

	class A a where
	class B a where

	foo :: (A a, B b) => IO a -> (a -> IO b) -> IO ()
	foo _ func = return ()
	where
	-- this breaks because func is not passed in
	barBroken :: (A a, B b) => a -> IO b
	# forward local port 8080 to remotehost.com:3001
	ssh -L 8080:localhost:3001 -N user@remotehost.com
	wget http://packages.erlang-solutions.com/erlang-solutions_1.0_all.deb
	sudo dpkg -i erlang-solutions_1.0_all.deb
	sudo apt-get update
	sudo apt-get install -y erlang
	l = "xfbhlqtlj".split('').collect {\|c\| c[0] - 97}
	k = [6,1,8,0,3,3,9,8,8]

	l = l.zip(k).collect do \|p\|
	t = (p[0] - p[1]) % 26
	t += 97
	t.chr
	end

	p l.join('')