Improve admin views (2)

Signed-off-by: Thomas Citharel <tcit@tcit.fr>

test/graphql/resolvers/user_test.exs

@@ -35,8 +35,22 @@ defmodule Mobilizon.GraphQL.Resolvers.UserTest do
   """
 
   @list_users_query """
-  query ListUsers($page: Int, $limit: Int, $sort: SortableUserField, $direction: SortDirection) {
-    users(page: $page, limit: $limit, sort: $sort, direction: $direction) {
+  query ListUsers(
+    $email: String
+    $currentSignInIp: String
+    $page: Int
+    $limit: Int
+    $sort: SortableUserField
+    $direction: SortDirection
+  ) {
+    users(
+      email: $email
+      currentSignInIp: $currentSignInIp
+      page: $page
+      limit: $limit
+      sort: $sort
+      direction: $direction
+    ) {
       total,
       elements {
         email
@@ -262,6 +276,62 @@ defmodule Mobilizon.GraphQL.Resolvers.UserTest do
                "riri@example.com"
              ]
     end
+
+    test "list_users/3 allows filtering the list of users by email", %{conn: conn} do
+      user = insert(:user, email: "donald@somewhere.fr", role: :moderator)
+      insert(:user, email: "riri@only.fr")
+      insert(:user, email: "fifi@we.fr")
+      insert(:user, email: "loulou@know.com")
+
+      res =
+        conn
+        |> auth_conn(user)
+        |> AbsintheHelpers.graphql_query(
+          query: @list_users_query,
+          variables: %{email: "e.fr"}
+        )
+
+      assert res["errors"] == nil
+      assert res["data"]["users"]["total"] == 2
+      assert res["data"]["users"]["elements"] |> length == 2
+
+      assert res["data"]["users"]["elements"]
+             |> Enum.map(& &1["email"]) == [
+               "fifi@we.fr",
+               "donald@somewhere.fr"
+             ]
+    end
+
+    test "list_users/3 allows filtering the list of users by currentSignInIp", %{conn: conn} do
+      user =
+        insert(:user,
+          email: "donald@somewhere.fr",
+          current_sign_in_ip: "144.76.131.212",
+          role: :moderator
+        )
+
+      insert(:user, email: "riri@only.fr", current_sign_in_ip: "94.130.212.178")
+      insert(:user, email: "fifi@we.fr", current_sign_in_ip: "2a01:4f8:221:131d::178")
+      insert(:user, email: "loulou@know.com", current_sign_in_ip: "144.76.131.212")
+
+      res =
+        conn
+        |> auth_conn(user)
+        |> AbsintheHelpers.graphql_query(
+          query: @list_users_query,
+          variables: %{currentSignInIp: "144.76.131.212"}
+        )
+
+      assert res["errors"] == nil
+      assert res["data"]["users"]["total"] == 2
+      assert res["data"]["users"]["elements"] |> length == 2
+
+      assert res["data"]["users"]["elements"]
+             |> Enum.map(& &1["email"]) == [
+               "loulou@know.com",
+               "donald@somewhere.fr"
+             ]
+    end
   end
 
   describe "Resolver: Create an user & actor" do