packages feed

Spock-api (empty) → 0.11.0.0

raw patch · 4 files changed

+95/−0 lines, 4 filesdep +aesondep +basedep +deepseqsetup-changed

Dependencies added: aeson, base, deepseq, hvect, reroute

Files

+ LICENSE view
@@ -0,0 +1,30 @@+Copyright (c) 2013 - 2016, Alexander Thiemann <mail@athiemann.net>++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 Alexander Thiemann <mail@agrafix.net> 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.
+ Setup.hs view
@@ -0,0 +1,2 @@+import Distribution.Simple+main = defaultMain
+ Spock-api.cabal view
@@ -0,0 +1,30 @@+name:                Spock-api+version:             0.11.0.0+synopsis:            Another Haskell web framework for rapid development+description:         API definition DSL for Spock web framework+Homepage:            https://www.spock.li+Bug-reports:         https://github.com/agrafix/Spock/issues+license:             BSD3+license-file:        LICENSE+author:              Alexander Thiemann <mail@athiemann.net>+maintainer:          Alexander Thiemann <mail@athiemann.net>+copyright:           (c) 2013 - 2016 Alexander Thiemann+category:            Web+build-type:          Simple+cabal-version:       >=1.8+tested-with:         GHC==7.8.4, GHC==7.10.2, GHC==8.0.1++library+  hs-source-dirs:      src+  exposed-modules:     Web.Spock.Api+  build-depends:+                aeson >= 0.7,+                base >= 4 && < 5,+                reroute >= 0.3,+                hvect >= 0.3.1,+                deepseq+  ghc-options: -auto-all -Wall++source-repository head+  type:     git+  location: https://github.com/agrafix/Spock
+ src/Web/Spock/Api.hs view
@@ -0,0 +1,33 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE GADTs #-}+{-# LANGUAGE KindSignatures #-}+{-# LANGUAGE TypeFamilies #-}+module Web.Spock.Api+    ( Endpoint(..)+    , Proxy(..)+    , MaybeToList+    , (<//>), var, Path(..), renderRoute+    , Generic, ToJSON, FromJSON, NFData, Typeable+    )+where++import Control.DeepSeq+import Data.Aeson+import Data.HVect+import Data.Proxy+import Data.Typeable+import GHC.Generics+import Web.Routing.Combinators++(<//>) :: Path as 'Open -> Path bs ps -> Path (Append as bs) ps+(<//>) = (</>)++-- | Describes an endpoint with path parameters, an optional json body and a json response+data Endpoint (p :: [*]) (i :: Maybe *) (o :: *) where+    MethodGet :: (ToJSON o, FromJSON o) => Path p 'Open -> Endpoint p 'Nothing o+    MethodPost ::+        (ToJSON i, FromJSON i, ToJSON o, FromJSON o)+        => Proxy (i -> o) -> Path p 'Open -> Endpoint p ('Just i) o+    MethodPut ::+        (ToJSON i, FromJSON i, ToJSON o, FromJSON o)+        => Proxy (i -> o) -> Path p 'Open -> Endpoint p ('Just i) o