wip

Author: lukaszsamson

apps/language_server/lib/language_server/providers/completion/reducers/params.ex

@@ -45,19 +45,66 @@ defmodule ElixirLS.LanguageServer.Providers.Completion.Reducers.Params do
              env,
              mods_funs,
              metadata_types,
-             {1, 1},
+             cursor_context.cursor_position,
              not elixir_prefix
            ) do
-      list =
-        if Code.ensure_loaded?(mod) do
-          TypeInfo.extract_param_options(mod, fun, npar)
-          |> Kernel.++(TypeInfo.extract_param_options(mod, :"MACRO-#{fun}", npar + 1))
-          |> options_to_suggestions(mod)
-          |> Enum.filter(&Matcher.match?(&1.name, hint))
-        else
-          # TODO metadata?
-          []
-        end
+      list = for {name, type} <- ElixirSense.Core.Options.get_param_options(mod, fun, npar + 1, buffer_metadata) do
+        %{
+          doc: "",
+          expanded_spec: "",
+          name: name |> Atom.to_string(),
+          origin: inspect(mod),
+          type: :param_option,
+          type_spec: Introspection.to_string_with_parens(type)
+        }
+      end
+
+      
+      # list =
+      #   if Code.ensure_loaded?(mod) do
+      #     if function_exported?(mod, fun, npar + 1) do
+      #       TypeInfo.extract_param_options(mod, fun, npar)
+      #     else
+      #       TypeInfo.extract_param_options(mod, :"MACRO-#{fun}", npar + 1)
+      #     end
+      #     |> options_to_suggestions(mod)
+      #     |> Enum.filter(&Matcher.match?(&1.name, hint))
+      #     |> dbg
+      #   else
+      #     # TODO metadata?
+      #     dbg(buffer_metadata.specs)
+
+      #     with %ElixirSense.Core.State.SpecInfo{specs: [spec | _]} = info <-
+      #            buffer_metadata.specs[{mod, fun, npar + 1}],
+      #          {:ok,
+      #           {:@, _,
+      #            [
+      #              {:spec, _,
+      #               [
+      #                 {:"::", _,
+      #                  [
+      #                    {^fun, _, params},
+      #                    _
+      #                  ]}
+      #               ]}
+      #            ]}}
+      #          when is_list(params) <- Code.string_to_quoted(spec),
+      #          {:list, _, [options]} <- List.last(params) |> dbg do
+      #       for {name, type} <- extract_options(options, []) do
+      #         %{
+      #           doc: "",
+      #           expanded_spec: "",
+      #           name: name |> Atom.to_string(),
+      #           origin: inspect(mod),
+      #           type: :param_option,
+      #           type_spec: Introspection.to_string_with_parens(type)
+      #         }
+      #       end
+      #       |> dbg
+      #     else
+      #       _ -> []
+      #     end
+      #   end
 
       {:cont, %{acc | result: acc.result ++ list}}
     else
@@ -66,6 +113,20 @@ defmodule ElixirLS.LanguageServer.Providers.Completion.Reducers.Params do
     end
   end
 
+  defp extract_options({:|, _, [{atom, type}, rest]}, acc) when is_atom(atom) do
+    extract_options(rest, [{atom, type} | acc])
+  end
+
+  defp extract_options({:|, _, [_other, rest]}, acc) do
+    extract_options(rest, acc)
+  end
+
+  defp extract_options({atom, type}, acc) when is_atom(atom) do
+    [{atom, type} | acc]
+  end
+
+  defp extract_options(_other, acc), do: acc
+
   defp options_to_suggestions(options, original_module) do
     Enum.map(options, fn
       {mod, name, type} ->

apps/language_server/test/providers/completion/suggestions_test.exs

@@ -4015,6 +4015,22 @@ defmodule ElixirLS.LanguageServer.Providers.Completion.SuggestionTest do
                     atom(), node()}\
              """
     end
+
+    test "metadata params" do
+      buffer = """
+      defmodule Foo do
+        @spec some([{:foo, integer()} | {:bar, String.t()}]) :: :ok
+        def some(options), do: :ok
+
+        def go do
+          some()
+        end
+      end
+      """
+
+      list = Suggestion.suggestions(buffer, 6, 10)
+      assert [%{name: "remote_with_params_o"}] = list |> Enum.filter(&(&1.type == :param_option))
+    end
   end
 
   describe "suggestions for typespecs" do