Initial commit

Author: fakenickels

.gitignore

@@ -0,0 +1,6 @@
+node_modules
+.merlin
+.bsb.lock
+lib/
+*.bs.js
+yarn-error.log

.npmignore

@@ -0,0 +1,4 @@
+node_modules
+.merlin
+.bsb.lock
+lib/

LICENSE

@@ -0,0 +1,101 @@
+# reason-apollo-hooks
+
+Reason bindings for https://github.com/trojanowski/react-apollo-hooks
+
+## Installation
+
+```
+yarn add reason-apollo-hooks reason-apollo
+```
+
+Follow the installation instructions of [https://github.com/mhallin/graphql_ppx](graphql_ppx).
+
+Then update your bsconfig.json
+
+```diff
+"bs-dependencies": [
+  ...
++ "reason-apollo-hooks",
++ "reason-apollo"
+]
+```
+
+# Available hooks
+
+## useQuery
+
+```reason
+module UserQueryConfig = [%graphql {|
+  query UserQuery {
+    currentUser {
+      name
+    }
+  }
+|}];
+
+module UserQuery = ReasonApolloHooks.Query.Make(UserQueryConfig);
+
+[@react.component]
+let make = () => {
+  /* Both variant and records available */
+  let ( result, { data, loading, error } ) = UserQuery.use(());
+
+  <div>
+  {
+    switch(result) {
+      | Loading => <p>{React.string("Loading...")}</p>
+      | Data(data) =>
+        <p>{React.string(data##currentUser##name)}</p>
+      | NoData
+      | Error(_) => <p>{React.string("Get off my lawn!")}</p>
+    }
+  }
+  </div>
+}
+```
+
+
+## useMutation
+
+```reason
+module ScreamMutationConfig = [%graphql {|
+  mutation ScreamMutation($screamLevel: Int!) {
+    scream(level: $screamLevel) {
+      error
+    }
+  }
+|}];
+
+module ScreamMutation = ReasonApolloHooks.Mutation.Make(ScreamMutationConfig);
+
+[@react.component]
+let make = () => {
+  /* Both variant and records available */
+  let screamMutation = ScreaMutation.use(());
+  let scream = (_) => {
+    screamMutation(~variables=ScreamMutationConfig.make(~screamLevel=10, ())##variables)
+      |> Js.Promise.then_(result => {
+          switch(result) {
+            | Data(data) => ...
+            | Error(error) => ...
+            | NoData => ...
+          }
+          Js.Promise.resolve()
+        })
+      |> ignore
+  } 
+
+  <div>
+    <button onClick={scream}>
+      {React.string("You kids get off my lawn!")}
+    </button>
+  </div>
+}
+```
+
+## Getting it running
+
+```sh
+npm install
+npm start
+```

README.md

@@ -0,0 +1,22 @@
+
+{
+  "name": "reason-apollo-hooks",
+  "reason": {
+    "react-jsx": 3
+  },
+  "sources": {
+    "dir" : "src",
+    "subdirs" : true
+  },
+  "package-specs": [{
+    "module": "commonjs",
+    "in-source": true
+  }],
+  "suffix": ".bs.js",
+  "namespace": true,
+  "bs-dependencies": [
+    "reason-react",
+    "reason-apollo"
+  ],
+  "refmt": 3
+}

bsconfig.json

@@ -0,0 +1,35 @@
+{
+  "name": "reason-apollo-hooks",
+  "version": "0.2.0-beta.2",
+  "scripts": {
+    "build": "bsb -make-world",
+    "start": "bsb -make-world -w",
+    "clean": "bsb -clean-world",
+    "test": "echo \"Error: no test specified\" && exit 1",
+    "webpack": "webpack -w",
+    "webpack:production": "NODE_ENV=production webpack",
+    "server": "webpack-dev-server"
+  },
+  "keywords": [
+    "BuckleScript"
+  ],
+  "author": "",
+  "license": "MIT",
+  "dependencies": {
+    "react": "^16.8.1",
+    "react-apollo-hooks": "^0.4.5",
+    "react-dom": "^16.8.1",
+    "reason-react": ">=0.7.0"
+  },
+  "devDependencies": {
+    "bs-platform": "^5.0.2",
+    "html-webpack-plugin": "^3.2.0",
+    "reason-apollo": "^0.15.2",
+    "webpack": "^4.0.1",
+    "webpack-cli": "^3.1.1",
+    "webpack-dev-server": "^3.1.8"
+  },
+  "peerDependencies": {
+    "reason-apollo": "^0.15.2"
+  }
+}

package.json

@@ -0,0 +1,3 @@
+[@bs.module "react-apollo-hooks"] 
+[@react.component]
+external make: (~client: ApolloClient.generatedApolloClient) => React.element = "ApolloProvider";

src/ApolloProvider.re

@@ -0,0 +1,52 @@
+module type Config = {
+  let query: string;
+  type t;
+  let parse: Js.Json.t => t;
+};
+
+module Make = (Config: Config) => {
+  type error = {. "message": string};
+
+  [@bs.module "react-apollo-hooks"]
+  external useMutation:
+    (
+      string,
+      {. "variables": Js.Nullable.t(Js.Json.t)},
+      {. "variables": Js.Nullable.t(Js.Json.t)}
+    ) =>
+    Js.Promise.t({
+      .
+      "data": Js.Nullable.t(Js.Json.t),
+      "error": Js.Nullable.t(error),
+    }) =
+    "useMutation";
+
+  type result =
+    | Data(Config.t)
+    | Error(error)
+    | NoData;
+
+  let use = (~variables=?, ()) => {
+    let jsMutate =
+      useMutation(
+        Config.query,
+        {"variables": Js.Nullable.fromOption(variables)},
+      );
+
+    (~variables=?, ()) =>
+      jsMutate({"variables": Js.Nullable.fromOption(variables)})
+      |> Js.Promise.then_(jsResult =>
+           (
+             switch (
+               Js.Nullable.toOption(jsResult##data),
+               Js.Nullable.toOption(jsResult##error),
+             ) {
+             | (Some(data), _) => Data(Config.parse(data))
+             | (None, Some(error)) => Error(error)
+             | (None, None) => NoData
+             }
+           )
+           |> Js.Promise.resolve
+         );
+  };
+};

src/Mutation.re

@@ -0,0 +1,56 @@
+module type Config = {
+  let query: string;
+  type t;
+  let parse: Js.Json.t => t;
+};
+
+module Make = (Config: Config) => {
+  type error = {. "message": string};
+
+  [@bs.module "react-apollo-hooks"]
+  external useQuery:
+    (string, {. "variables": Js.Nullable.t(Js.Json.t)}) =>
+    {
+      .
+      "data": Js.Nullable.t(Js.Json.t),
+      "loading": bool,
+      "error": Js.Nullable.t(error),
+    } =
+    "useQuery";
+
+  type variant =
+    | Data(Config.t)
+    | Error(error)
+    | Loading
+    | NoData;
+  type result = {
+    data: option(Config.t),
+    loading: bool,
+    error: option(error),
+  };
+
+  let use = (~variables=?, ()) => {
+    let jsResult =
+      useQuery(
+        Config.query,
+        {"variables": Js.Nullable.fromOption(variables)},
+      );
+
+    let result = {
+      data:
+        jsResult##data->Js.Nullable.toOption->Belt.Option.map(Config.parse),
+      loading: jsResult##loading,
+      error: jsResult##error->Js.Nullable.toOption,
+    };
+
+    (
+      switch (result) {
+      | {data: Some(data)} => Data(data)
+      | {error: Some(error)} => Error(error)
+      | {loading: true} => Loading
+      | _ => NoData
+      },
+      result,
+    );
+  };
+};