react_gleam

-module(react_gleam@router).
-compile(no_auto_import).

-export([use_url/0, push/1, back/0]).
-export_type([location/0, dom_event/0]).

-type location() :: {location, list(binary()), binary(), binary()}.

-type dom_event() :: any().

-spec use_url() -> location().
use_url() ->
    Location = '../ffi.mjs':'currentLocation'(),
    {Current_location, Set_current_location} = '../ffi.mjs':'useState'(Location),
    '../ffi.mjs':'useEffect0'(
        fun() ->
            Location_change_callback = fun() ->
                New_location = '../ffi.mjs':'currentLocation'(),
                Set_current_location(New_location)
            end,
            Location_pop_callback = fun() ->
                '../ffi.mjs':'dispatchEvent'(
                    '../ffi.mjs':'newEvent'(<<"locationchange"/utf8>>)
                )
            end,
            '../ffi.mjs':'addEventListener'(
                <<"locationchange"/utf8>>,
                Location_change_callback
            ),
            '../ffi.mjs':'addEventListener'(
                <<"popstate"/utf8>>,
                Location_pop_callback
            ),
            {some,
                fun() ->
                    '../ffi.mjs':'removeEventListener'(
                        <<"locationchange"/utf8>>,
                        Location_change_callback
                    ),
                    '../ffi.mjs':'removeEventListener'(
                        <<"popstate"/utf8>>,
                        Location_pop_callback
                    )
                end}
        end
    ),
    Current_location.

-spec push(binary()) -> nil.
push(Field@0) ->
    '../ffi.mjs':'pushState'(Field@0).

-spec back() -> nil.
back() ->
    '../ffi.mjs':'popState'().