#moongql

#Quickstart

let s = @moongql.Schema::new()

let q = s.object("Query")
q.field("hello", @moongql.NonNull(@moongql.Scalar("String")))
q.field("user", @moongql.Named("User"))

let u = s.object("User")
u.field("id", @moongql.NonNull(@moongql.Scalar("ID")))
u.field("name", @moongql.NonNull(@moongql.Scalar("String")))
u.field("tags", @moongql.ListOf(@moongql.NonNull(@moongql.Scalar("String"))))

let sdl = s.to_sdl()

schema {
  query: Query
}

type Query {
  hello: String!
  user: User
}

type User {
  id: ID!
  name: String!
  tags: [String!]
}

#Roadmap (transliterating strawberry)

let doc = @moongql.parse(
  "query ($id: ID!) { user(id: $id) { name ...fields @skip(if: false) } }",
)
// doc.definitions[0] is an OperationDefinition; doc.to_query() prints it back.

#Executing a query

let s = @moongql.Schema::new()
let q = s.object("Query")
q.field_args("user", [("id", @moongql.NonNull(@moongql.Scalar("ID")))],
  @moongql.Named("User"))
let u = s.object("User")
u.field("id", @moongql.NonNull(@moongql.Scalar("ID")))
u.field("name", @moongql.NonNull(@moongql.Scalar("String")))

let r = @moongql.Resolvers::new()
r.field("Query", "user", fn(info) {
  match info.arg("id") {
    String("1") => { "id": "1", "name": "Alice" }
    _ => Json::null()
  }
})
// User.id / User.name fall back to the default resolver (read off the parent).

let vars : Map[String, Json] = { "uid": "1" }
let res = @moongql.execute(s, r,
  "query ($uid: ID!) { hero: user(id: $uid) { id name } }", variables=vars)
// res.stringify() == {"data":{"hero":{"id":"1","name":"Alice"}}}

#Design: faithful equivalences to strawberry

let s = @moongql.Schema::new()

let node = s.interface("Node")
node.field("id", @moongql.NonNull(@moongql.Scalar("ID")))

let q = s.object("Query")
q.field_args(
  "user",
  [("id", @moongql.NonNull(@moongql.Scalar("ID")))],
  @moongql.Named("User"),
)

let u = s.object("User")
u.implements("Node")
u.field("id", @moongql.NonNull(@moongql.Scalar("ID")))

let inp = s.input("UserFilter")
inp.field("name", @moongql.Scalar("String"))

s.enum_("Role", ["ADMIN", "USER"])

#Unions and custom scalars

s.union("SearchResult", ["Book", "Author"])
// { search { __typename ... on Book { title } ... on Author { name } } }

s.scalar("DateTime",
  serialize=fn(j) { j },      // value -> output JSON
  parse_value=fn(j) { j })    // input JSON -> value

#Subscriptions

let subs = @moongql.Subscribers::new()
subs.field("Subscription", "messageAdded", fn(info) {
  // one Json payload per event, in delivery order
  [msg1, msg2, msg3]
})

let payloads = @moongql.execute_subscription(schema, resolvers, subs,
  "subscription { messageAdded(channel: \"general\") { id body } }")
// payloads[0].stringify() == {"data":{"messageAdded":{"id":"1","body":"hello"}}}

#DataLoader

let loader : @moongql.DataLoader[Int, String] = @moongql.DataLoader::new(
  fn(ids) { load_authors(ids) },  // called once per pass
  fn(id) { id.to_string() },      // cache-key function
)
loader.load(1); loader.load(2); loader.load(1)  // three requests, two keys
loader.dispatch()                               // one batch call for {1, 2}
loader.get(1)                                   // Some("author#1")

#HTTP endpoint

let handler = @moongql.graphql_handler(schema, resolvers)      // path defaults to /graphql
let app = @moongql.graphql_app(schema, resolvers)              // the same, lifted onto an AsgiApp

let client = @moonasgi.TestClient::new(@moongql.graphql_handler(schema, resolvers))
let body = @utf8.encode(
  "{\"query\":\"{ user(id: \\\"1\\\") { name } }\"}",
)
let resp = client.post("/graphql", body~)
// resp.status == 200, resp.text() == {"data":{"user":{"name":"Alice"}}}

#Apollo Federation

let fed = @moongql.Federation::new()
fed.entity(name="User", key="id", resolve=(rep, _ctx) => {
  let id = match rep {
    Object(m) => match m.get("id") { Some(String(s)) => s; _ => "" }
    _ => ""
  }
  { "id": id, "name": "User#" + id }.to_json()  // materialise from the key
})
fed.apply(schema, resolvers)

// { _service { sdl } } -> the subgraph SDL with `type User @key(fields: "id")`
// _entities(representations: [{ __typename: "User", id: "7" }]) -> the User object

#Federation v2

let fed = @moongql.Federation::new(v2=true)
fed.entity(name="Product", key="upc", extends=true, external=["weight"],
  resolve=(rep, _ctx) => {
    // @requires(fields: "weight"): the gateway ships the external weight in the
    // representation, so the resolver can read it to compute the estimate.
    let weight = read_int(rep, "weight")
    { "upc": read_str(rep, "upc"), "shippingEstimate": weight * 2 }.to_json()
  })
fed.shareable("Product", "name")
fed.override_("Product", "price", from="legacy")
fed.requires("Product", "shippingEstimate", fields="weight")
fed.inaccessible("User", "ssn")   // present in the subgraph, hidden from the composed schema
fed.apply(schema, resolvers)

#Custom directives

s.directive("prefix",
  locations=["FIELD"],
  args=[("text", @moongql.NonNull(@moongql.Scalar("String")))],
  on_field=Some((value, args) => match (value, args.get("text")) {
    (String(x), Some(String(p))) => (p + x).to_json()
    _ => value
  }))
// { greeting @prefix(text: "Hello, ") } -> "Hello, world"

#Spec validation

#License