aboutsummaryrefslogtreecommitdiff
path: root/src/ffi.mjs
diff options
context:
space:
mode:
authorHayleigh Thompson <me@hayleigh.dev>2023-04-27 21:52:15 +0100
committerHayleigh Thompson <me@hayleigh.dev>2023-04-27 21:52:15 +0100
commit10bc93f41efdd9aab25e1e0d29b02b3b961158c5 (patch)
tree9d9c8fc3daf61326b7ebe4781be8d58e7dc8444a /src/ffi.mjs
parent19ec0b446041f77a623e574656442c76d75107ae (diff)
downloadlustre-3.0.0-rc.1.tar.gz
lustre-3.0.0-rc.1.zip
:bookmark: Code for 3.0.0-rc.13.0.0-rc.1
Diffstat (limited to 'src/ffi.mjs')
-rw-r--r--src/ffi.mjs174
1 files changed, 0 insertions, 174 deletions
diff --git a/src/ffi.mjs b/src/ffi.mjs
deleted file mode 100644
index b6883d4..0000000
--- a/src/ffi.mjs
+++ /dev/null
@@ -1,174 +0,0 @@
-import * as Cmd from "./lustre/cmd.mjs";
-import * as Gleam from "./gleam.mjs";
-import * as React from "react";
-import * as ReactDOM from "react-dom";
-
-// -----------------------------------------------------------------------------
-
-export const mount = ({ init, update, render }, selector) => {
- const el = document.querySelector(selector);
-
- if (!el) {
- console.warn(
- [
- "[lustre] Oops, it looks like I couldn't find an element on the ",
- 'page matching the selector "' + selector + '".',
- "",
- "Hint: make sure you aren't running your script before the rest of ",
- "the HTML document has been parsed! you can add the `defer` attribute ",
- "to your script tag to make sure that can't happen.",
- ].join("\n")
- );
-
- return new Gleam.Error();
- }
-
- // OK this looks sus, what's going on here? We want to be able to return the
- // dispatch function given to us from `useReducer` so that the rest of our
- // Gleam code *outside* the application and dispatch commands.
- //
- // That's great but because `useReducer` is part of the callback passed to
- // `createElement` we can't just save it to a variable and return it. We
- // immediately render the app so this all happens synchronously. There's no
- // chance of accidentally returning `null` and our Gleam code consuming it as
- // if it was a function.
- //
- let dispatch = null;
-
- let init_cmds = null;
-
- const App = React.createElement(() => {
- const [state, $dispatch] = React.useReducer(
- (state, action) => {
- let [new_state, cmds] = update(state, action)
- // Handle cmds immediately, they're not React-kind-of-state
- for (const cmd of Cmd.to_list(cmds)) {
- cmd(dispatch);
- }
- return new_state
- },
- undefined,
- () => {
- let [state, cmds] = init
- // postpone handling cmds, as we do not have the dispatch, yet
- init_cmds = cmds
- return state
- }
- );
-
- if (dispatch === null) dispatch = $dispatch;
-
- const el = render(state);
-
- React.useEffect(() => {
- for (const cmd of Cmd.to_list(init_cmds)) {
- cmd($dispatch);
- }
- init_cmds = undefined; // Just so we get an error, rather than re-execute
- }, []); // empty deps array means this effect will only run on initial render
-
- return typeof el == "string" ? el : el($dispatch);
- });
-
- ReactDOM.createRoot(el).render(App);
-
- return new Gleam.Ok(dispatch);
-};
-
-// -----------------------------------------------------------------------------
-
-export const node = (tag, attributes, children) => (dispatch) => {
- return React.createElement(
- tag,
- toProps(attributes, dispatch),
- // Recursively pass down the dispatch function to all children. Text nodes
- // – constructed below – aren't functions
- //
- ...children.toArray().map((child) => (typeof child === "function" ? child(dispatch) : child))
- );
-};
-
-export const stateful = (init, render) => (dispatch) => {
- const [state, setState] = React.useState(init);
-
- return render(state, setState)(dispatch);
-};
-
-export const fragment = (children) => (dispatch) => {
- return React.createElement(
- React.Fragment,
- null,
- ...children.toArray().map((child) => (typeof child === "function" ? child(dispatch) : child))
- );
-};
-
-// This is just an identity function! We need it because we want to trick Gleam
-// into converting a `String` into an `Element(action)` .
-//
-export const text = (content) => content;
-
-// -----------------------------------------------------------------------------
-
-export const map = (element, f) => (dispatch) => {
- return element((action) => dispatch(f(action)));
-};
-
-// React expects an object of "props" where the keys are attribute names
-// like "class" or "onClick" and their corresponding values. Lustre's API
-// works with lists, though.
-//
-// The snippet below converts our Gleam list of attributes to a a plain ol'
-// object. Duplicate attributes are replaced with the last one in the list,
-// except for string attributes which are concatenated together.
-//
-export const toProps = (attributes, dispatch) => {
- const capitalise = (s) => s && s[0].toUpperCase() + s.slice(1);
-
- return attributes.toArray().reduce((props, attr) => {
- // The constructors for the `Attribute` type are not public in the
- // gleam source to prevent users from constructing them directly.
- // This has the unfortunate side effect of not letting us `instanceof`
- // the constructors to pattern match on them and instead we have to
- // rely on the structure to work out what kind of attribute it is.
- //
- if ("name" in attr && "value" in attr) {
- const prop =
- attr.name in props && typeof props[attr.name] === "string"
- ? props[attr.name] + " " + attr.value
- : attr.value;
-
- return { ...props, [attr.name]: prop };
- }
-
- // This case handles `Event` variants.
- else if ("name" in attr && "handler" in attr) {
- const name = "on" + capitalise(attr.name);
- const handler = (e) => attr.handler(e, dispatch);
-
- return { ...props, [name]: handler };
- }
-
- // This should Never Happen™️ but if it does we don't want everything
- // to explode, so we'll print a friendly error, ignore the attribute
- // and carry on as normal.
- //
- else {
- console.warn(
- [
- "[lustre] Oops, I'm not sure how to handle attributes with ",
- 'the type "' + attr.constructor.name + '". Did you try calling ',
- "this function from JavaScript by mistake?",
- "",
- "If not, it might be an error in lustre itself. Please open ",
- "an issue at https://github.com/hayleigh-dot-dev/gleam-lustre/issues",
- ].join("\n")
- );
-
- return props;
- }
- }, {});
-};
-
-// -----------------------------------------------------------------------------
-
-export const object = (entries) => Object.fromEntries(entries);