diff --git a/LICENSE b/LICENSE
new file mode 100644
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1,30 @@
+Copyright (c) 2014, Silk
+
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+
+    * Redistributions of source code must retain the above copyright
+      notice, this list of conditions and the following disclaimer.
+
+    * Redistributions in binary form must reproduce the above
+      copyright notice, this list of conditions and the following
+      disclaimer in the documentation and/or other materials provided
+      with the distribution.
+
+    * Neither the name of Silk nor the names of other
+      contributors may be used to endorse or promote products derived
+      from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
+OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
diff --git a/Setup.hs b/Setup.hs
new file mode 100644
--- /dev/null
+++ b/Setup.hs
@@ -0,0 +1,2 @@
+import Distribution.Simple
+main = defaultMain
diff --git a/rest-snap.cabal b/rest-snap.cabal
new file mode 100644
--- /dev/null
+++ b/rest-snap.cabal
@@ -0,0 +1,42 @@
+Name:             rest-snap
+Version:          0.1.17.4
+Description:      Rest driver for Snap.
+Synopsis:         Rest driver for Snap.
+Maintainer:       code@silk.co
+Category:         Web
+Build-Type:       Simple
+Cabal-Version:    >= 1.8
+License:          BSD3
+License-File:     LICENSE
+
+Library
+  GHC-Options:     -Wall
+  Hs-Source-Dirs:   src
+  Build-Depends:
+
+      base                 == 4.*
+    , bytestring           >= 0.9    &&  < 0.11
+    , case-insensitive     >= 0.4    &&  < 1.2
+    , containers           >= 0.4    &&  < 0.6
+    , snap-core            == 0.9.*
+    , hxt                  >= 9.2    &&  < 9.4
+    , fclabels             == 2.0.*
+    , json                 >= 0.4    &&  < 0.8
+    , json-schema          == 0.4.*
+    , mtl                  >= 2.0    &&  < 2.2
+    , regular-xmlpickler   == 0.2.*
+    , rest-types           == 1.9.0.1
+    , safe                 >= 0.2    &&  < 0.4
+    , split                >= 0.1    &&  < 0.3
+    , text                 == 0.11.*
+    , transformers         == 0.3.*
+    , unordered-containers == 0.2.*
+    , uri-encode           == 1.5.*
+    , utf8-string          == 0.3.*
+    , rest-core            == 0.27.*
+
+  Exposed-Modules:  Rest.Driver.Snap
+
+Source-repository head
+  Type:              Git
+  Location:          https://github.com/silkapp/rest.git
diff --git a/src/Rest/Driver/Snap.hs b/src/Rest/Driver/Snap.hs
new file mode 100644
--- /dev/null
+++ b/src/Rest/Driver/Snap.hs
@@ -0,0 +1,44 @@
+{-# OPTIONS_GHC -fno-warn-orphans #-}
+{-# LANGUAGE RankNTypes #-}
+module Rest.Driver.Snap (apiToHandler, apiToHandler') where
+
+import Safe
+import Snap.Core
+import Snap.Util.FileServe (defaultMimeTypes)
+
+import qualified Data.ByteString.Char8 as Char8
+import qualified Data.ByteString.UTF8  as UTF8
+import qualified Data.CaseInsensitive  as CI
+import qualified Data.HashMap.Strict   as M
+import qualified Network.URI.Encode    as URI
+import qualified Snap.Core             as Snap
+
+import Rest.Api (Api)
+import Rest.Driver.Perform (Rest (..))
+import Rest.Driver.Types (Run)
+
+import qualified Rest.Run          as Rest
+import qualified Rest.Driver.Types as Rest
+
+apiToHandler :: Api Snap -> Snap ()
+apiToHandler = apiToHandler' id
+
+apiToHandler' :: Run m Snap -> Api m -> Snap ()
+apiToHandler' run api = Rest.apiToHandler' run api >>= writeLBS
+
+instance Rest Snap where
+  getHeader nm       = getsRequest (fmap UTF8.toString . Snap.getHeader (CI.mk . UTF8.fromString $ nm))
+  getParameter  nm   = getsRequest (fmap UTF8.toString . (>>= headMay) . rqParam (UTF8.fromString nm))
+  getBody            = readRequestBody (1 * 1024 * 1024)
+  getMethod          = getsRequest (toRestMethod . rqMethod)
+  getPaths           = getsRequest (map (UTF8.toString . URI.decodeByteString) . Char8.split '/' . rqPathInfo)
+  lookupMimeType     = return . fmap UTF8.toString . flip M.lookup defaultMimeTypes
+  setHeader nm v     = modifyResponse (Snap.setHeader (CI.mk . UTF8.fromString $ nm) (UTF8.fromString v))
+  setResponseCode cd = modifyResponse (Snap.setResponseCode cd)
+
+toRestMethod :: Snap.Method -> Rest.Method
+toRestMethod Snap.GET    = Rest.GET
+toRestMethod Snap.POST   = Rest.POST
+toRestMethod Snap.PUT    = Rest.PUT
+toRestMethod Snap.DELETE = Rest.DELETE
+toRestMethod mthd        = Rest.Unknown (show mthd)