This library generates TypeScript client libraries for Servant.
First, make sure you have TypeScript instances defined for all of the types used in the API.
data User = User {
name :: String
, age :: Int
, email :: String
} deriving (Eq, Show)
deriveJSONAndTypeScript A.defaultOptions ''UserIf you need to generate lots of boilerplate instances, the functions in aeson-typescript's Recursive module can be your friend.
I've used recursivelyDeriveMissingTypeScriptInstancesFor to derive instances for the Kubernetes API.
Next, you'll need some Servant API:
type UserAPI = "users" :> Get '[JSON] [User]
:<|> "albert" :> Get '[JSON] User
:<|> "isaac" :> Get '[JSON] UserGenerating the library is as simple as this:
main = writeTypeScriptLibrary (Proxy :: Proxy UserAPI) "/my/destination/folder/"- This library doesn't yet support generating generic TypeScript functions to match generic TypeScript instances. You can hack around this by writing your own
getFunctionsand hardcoding them manually for the necessary types.
If you use unusual Servant combinators in your API, you may need to define additional HasForeign instances to explain how to convert them to TypeScript. For example, when I work with the servant-websockets package, I add instances like the following.
The same applies to custom AuthProtect combinators from Servant.API.Experimental.Auth, etc.
instance HasForeign LangTS Text WebSocket where
type Foreign Text WebSocket = Text
foreignFor _ _ _ _ = "void"
instance HasForeign LangTSDecls [TSDeclaration] WebSocket where
type Foreign [TSDeclaration] WebSocket = [TSDeclaration]
foreignFor _ _ _ _ = []