mirror of
https://github.com/hasura/graphql-engine.git
synced 2024-12-18 13:02:11 +03:00
b84db36ebb
* basic doc for actions * custom_types, sync and async actions * switch to graphql-parser-hs on github * update docs * metadata import/export * webhook calls are now supported * relationships in sync actions * initialise.sql is now in sync with the migration file * fix metadata tests * allow specifying arguments of actions * fix blacklist check on check_build_worthiness job * track custom_types and actions related tables * handlers are now triggered on async actions * default to pgjson unless a field is involved in relationships, for generating definition list * use 'true' for action filter for non admin role * fix create_action_permission sql query * drop permissions when dropping an action * add a hdb_role view (and relationships) to fetch all roles in the system * rename 'webhook' key in action definition to 'handler' * allow templating actions wehook URLs with env vars * add 'update_action' /v1/query type * allow forwarding client headers by setting `forward_client_headers` in action definition * add 'headers' configuration in action definition * handle webhook error response based on status codes * support array relationships for custom types * implement single row mutation, see https://github.com/hasura/graphql-engine/issues/3731 * single row mutation: rename 'pk_columns' -> 'columns' and no-op refactor * use top level primary key inputs for delete_by_pk & account select permissions for single row mutations * use only REST semantics to resolve the webhook response * use 'pk_columns' instead of 'columns' for update_by_pk input * add python basic tests for single row mutations * add action context (name) in webhook payload * Async action response is accessible for non admin roles only if the request session vars equals to action's * clean nulls, empty arrays for actions, custom types in export metadata * async action mutation returns only the UUID of the action * unit tests for URL template parser * Basic sync actions python tests * fix output in async query & add async tests * add admin secret header in async actions python test * document async action architecture in Resolve/Action.hs file * support actions returning array of objects * tests for list type response actions * update docs with actions and custom types metadata API reference * update actions python tests as per #f8e1330 Co-authored-by: Tirumarai Selvan <tirumarai.selvan@gmail.com> Co-authored-by: Aravind Shankar <face11301@gmail.com> Co-authored-by: Rakesh Emmadi <12475069+rakeshkky@users.noreply.github.com>
71 lines
2.2 KiB
Haskell
71 lines
2.2 KiB
Haskell
{-# OPTIONS_GHC -fno-warn-orphans #-}
|
|
|
|
module Hasura.RQL.Instances where
|
|
|
|
import Hasura.Prelude
|
|
|
|
import qualified Data.HashMap.Strict as M
|
|
import qualified Data.HashSet as S
|
|
import qualified Data.URL.Template as UT
|
|
import qualified Language.GraphQL.Draft.Syntax as G
|
|
import qualified Language.Haskell.TH.Syntax as TH
|
|
|
|
import Data.Functor.Product
|
|
import Data.GADT.Compare
|
|
import Instances.TH.Lift ()
|
|
|
|
instance NFData G.Argument
|
|
instance NFData G.Directive
|
|
instance NFData G.ExecutableDefinition
|
|
instance NFData G.Field
|
|
instance NFData G.FragmentDefinition
|
|
instance NFData G.FragmentSpread
|
|
instance NFData G.GType
|
|
instance NFData G.InlineFragment
|
|
instance NFData G.OperationDefinition
|
|
instance NFData G.OperationType
|
|
instance NFData G.Selection
|
|
instance NFData G.TypedOperationDefinition
|
|
instance NFData G.Value
|
|
instance NFData G.ValueConst
|
|
instance NFData G.VariableDefinition
|
|
instance (NFData a) => NFData (G.ObjectFieldG a)
|
|
instance NFData UT.Variable
|
|
instance NFData UT.TemplateItem
|
|
instance NFData UT.URLTemplate
|
|
|
|
deriving instance NFData G.Alias
|
|
deriving instance NFData G.EnumValue
|
|
deriving instance NFData G.ExecutableDocument
|
|
deriving instance NFData G.ListType
|
|
deriving instance NFData G.Name
|
|
deriving instance NFData G.NamedType
|
|
deriving instance NFData G.Nullability
|
|
deriving instance NFData G.StringValue
|
|
deriving instance NFData G.Variable
|
|
deriving instance NFData G.Description
|
|
deriving instance (NFData a) => NFData (G.ListValueG a)
|
|
deriving instance (NFData a) => NFData (G.ObjectValueG a)
|
|
|
|
instance (TH.Lift k, TH.Lift v) => TH.Lift (M.HashMap k v) where
|
|
lift m = [| M.fromList $(TH.lift $ M.toList m) |]
|
|
|
|
instance TH.Lift a => TH.Lift (S.HashSet a) where
|
|
lift s = [| S.fromList $(TH.lift $ S.toList s) |]
|
|
|
|
instance (GEq f, GEq g) => GEq (Product f g) where
|
|
Pair a1 a2 `geq` Pair b1 b2
|
|
| Just Refl <- a1 `geq` b1
|
|
, Just Refl <- a2 `geq` b2
|
|
= Just Refl
|
|
| otherwise = Nothing
|
|
|
|
instance (GCompare f, GCompare g) => GCompare (Product f g) where
|
|
Pair a1 a2 `gcompare` Pair b1 b2 = case gcompare a1 b1 of
|
|
GLT -> GLT
|
|
GEQ -> case gcompare a2 b2 of
|
|
GLT -> GLT
|
|
GEQ -> GEQ
|
|
GGT -> GGT
|
|
GGT -> GGT
|