Packages
credo
1.5.0
1.7.19
1.7.18
1.7.17
1.7.16
1.7.15
1.7.14
1.7.13
1.7.12
1.7.11
1.7.10
1.7.9
1.7.8
1.7.7
1.7.7-rc.0
1.7.6
1.7.5
1.7.4
1.7.3
1.7.2
1.7.2-rc.4
1.7.2-rc.3
1.7.2-rc.2
1.7.2-rc.1
1.7.2-rc.0
1.7.1
1.7.0
1.7.0-rc.2
1.7.0-rc.1
1.6.7
1.6.6
1.6.5
1.6.4
1.6.3
1.6.2
1.6.1
1.6.0
1.6.0-rc.1
1.6.0-rc.0
1.5.6
1.5.5
1.5.4
1.5.3
1.5.2
1.5.1
1.5.0
1.5.0-rc.5
1.5.0-rc.4
1.5.0-rc.3
1.5.0-rc.2
1.5.0-rc.1
1.4.1
1.4.0
1.4.0-rc.2
1.4.0-rc.1
1.3.2
1.3.1
1.3.0
1.3.0-rc3
1.3.0-rc2
1.3.0-rc1
1.2.3
1.2.2
1.2.1
1.2.0
1.2.0-rc4
1.2.0-rc3
1.2.0-rc2
1.2.0-rc1
1.1.5
1.1.4
1.1.3
1.1.2
1.1.1
1.1.0
1.1.0-rc3
1.1.0-rc2
1.1.0-rc1
1.0.5
1.0.4
1.0.3
1.0.2
1.0.1
1.0.1-rc1
1.0.0
1.0.0-rc1
0.10.2
0.10.1
0.10.0
0.9.3
0.9.2
0.9.1
0.9.0
0.9.0-rc8
0.9.0-rc7
0.9.0-rc6
0.9.0-rc5
0.9.0-rc4
0.9.0-rc3
0.9.0-rc2
0.9.0-rc1
0.8.10
0.8.9
0.8.8
0.8.7
0.8.6
0.8.5
0.8.4
0.8.3
0.8.2
0.8.1
0.8.0
0.8.0-rc7
0.8.0-rc6
0.8.0-rc5
0.8.0-rc4
0.8.0-rc3
0.8.0-rc2
0.8.0-rc1
0.7.4
0.7.3
0.7.2
0.7.1
0.7.0
0.6.1
0.6.0
0.6.0-rc2
0.6.0-rc1
0.5.3
0.5.2
0.5.1
0.5.0
0.4.14
0.4.13
0.4.12
0.4.11
0.4.10
0.4.10-dev
0.4.9
0.4.8
0.4.7
0.4.6
0.4.5
0.4.4
0.4.3
0.4.2
0.4.1
0.4.0
0.4.0-beta5
0.4.0-beta4
0.4.0-beta3
0.4.0-beta2
0.4.0-beta1
0.3.13
0.3.12
0.3.11
0.3.10
0.3.9
0.3.8
0.3.7
0.3.6
0.3.5
0.3.4
0.3.3
0.3.2
0.3.1
0.3.0
0.3.0-dev2
0.3.0-dev
0.2.6
0.2.5
0.2.4
0.2.3
0.2.2
0.2.1
0.2.0
0.1.10
0.1.9
0.1.8
0.1.7
0.1.6
0.1.5
0.1.4
0.1.3
0.1.2
0.1.1
0.1.0
0.0.1-dev
A static code analysis tool with a focus on code consistency and teaching.
Current section
Files
Jump to
Current section
Files
lib/credo/code/scope.ex
defmodule Credo.Code.Scope do
@moduledoc """
This module provides helper functions to determine the scope name at a certain
point in the analysed code.
"""
@def_ops [:def, :defp, :defmacro]
@doc """
Returns the module part of a scope.
iex> Credo.Code.Scope.mod_name("Credo.Code")
"Credo.Code"
iex> Credo.Code.Scope.mod_name("Credo.Code.ast")
"Credo.Code"
"""
def mod_name(nil), do: nil
def mod_name(scope_name) do
names = String.split(scope_name, ".")
base_name = List.last(names)
if String.match?(base_name, ~r/^[a-z]/) do
names
|> Enum.slice(0..(length(names) - 2))
|> Enum.join(".")
else
scope_name
end
end
@doc """
Returns the scope for the given line as a tuple consisting of the call to
define the scope (`:defmodule`, `:def`, `:defp` or `:defmacro`) and the
name of the scope.
Examples:
{:defmodule, "Foo.Bar"}
{:def, "Foo.Bar.baz"}
"""
def name(_ast, line: 0), do: nil
def name(ast, line: line) do
ast
|> scope_info_list()
|> name_from_scope_info_list(line)
end
@doc false
def name_from_scope_info_list(scope_info_list, line) do
result =
Enum.find(scope_info_list, fn
{line_no, _op, _arguments} when line_no <= line -> true
_ -> false
end)
case result do
{_line_no, op, arguments} ->
name = Credo.Code.Name.full(arguments)
{op, name}
_ ->
{nil, ""}
end
end
@doc false
def scope_info_list(ast) do
{_, scope_info_list} = Macro.prewalk(ast, [], &traverse_modules(&1, &2, nil, nil))
Enum.reverse(scope_info_list)
end
defp traverse_modules({:defmodule, meta, arguments} = ast, acc, current_scope, _current_op)
when is_list(arguments) do
new_scope_part = Credo.Code.Module.name(ast)
scope_name =
[current_scope, new_scope_part]
|> Enum.reject(&is_nil/1)
|> Credo.Code.Name.full()
defmodule_scope_info = {meta[:line], :defmodule, scope_name}
{_, def_scope_infos} =
Macro.prewalk(arguments, [], &traverse_defs(&1, &2, scope_name, :defmodule))
new_acc = (acc ++ [defmodule_scope_info]) ++ def_scope_infos
{nil, new_acc}
end
defp traverse_modules({_op, meta, _arguments} = ast, acc, current_scope, current_op) do
scope_info = {meta[:line], current_op, current_scope}
{ast, acc ++ [scope_info]}
end
defp traverse_modules(ast, acc, _current_scope, _current_op) do
{ast, acc}
end
defp traverse_defs({:defmodule, _meta, arguments} = ast, acc, current_scope, _current_op)
when is_list(arguments) do
{_, scopes} = Macro.prewalk(ast, [], &traverse_modules(&1, &2, current_scope, :defmodule))
{nil, acc ++ scopes}
end
for op <- @def_ops do
defp traverse_defs({unquote(op), meta, arguments} = ast, acc, current_scope, _current_op)
when is_list(arguments) do
new_scope_part = Credo.Code.Module.def_name(ast)
scope_name =
[current_scope, new_scope_part]
|> Enum.reject(&is_nil/1)
|> Credo.Code.Name.full()
scope_info = {meta[:line], unquote(op), scope_name}
new_acc = acc ++ [scope_info]
{nil, new_acc}
end
end
defp traverse_defs({_op, meta, _arguments} = ast, acc, current_scope, current_op) do
scope_info = {meta[:line], current_op, current_scope}
{ast, acc ++ [scope_info]}
end
defp traverse_defs(ast, acc, _current_scope, _current_op) do
{ast, acc}
end
end