Packages

mongodb_driver

1.6.2
1.6.3 1.6.2 1.6.1 1.6.0 1.5.6 1.5.5 1.5.4 1.5.2 1.5.1 1.5.0 1.4.1 1.4.0 1.2.1 1.2.0 1.1.0 1.0.3 1.0.2 1.0.1 1.0.0 0.9.2 0.9.1 0.9.0 0.9.0-rc.1 0.9.0-rc.0 0.8.4 0.8.3 0.8.2 0.8.1 0.8.0 0.7.4 0.7.3 0.7.2 0.7.1 0.7.0 0.6.5 0.6.4 0.6.3 0.6.2 0.6.1 0.6.0 0.5.7 0.5.6 0.5.5 0.5.4 0.5.3 0.5.2 0.5.1 0.5.0

The MongoDB driver for Elixir

HexDocs

Current section

Files

Jump to
Readme
48 Versions
4 Dependencies
Dependants
Files
Activity
mongodb_driver lib mongo auth cr.ex
Raw

lib/mongo/auth/cr.ex 

defmodule Mongo.Auth.CR do

  @moduledoc false

  alias Mongo.MongoDBConnection.Utils



  def auth({nil, nil}, _s) do

    :ok

  end



  def auth({username, password}, s) do

    with {:ok, _flags, message} <- Utils.command(-2, [getnonce: 1], s),

         do: nonce(message, username, password, s)

  end



  # Note that we use numeric comparisons in guards (e.g., `... when ok == 1`)

  # instead of pattern matching below. This is to accommodate responses that

  # return either integer or float values. Pattern matching treats 1 and 1.0,

  # and 0, 0.0 and -0.0 (OTP 27+), as distinct values due to their different

  # types/internal representation. By using numeric comparisons, we can ensure

  # correct behavior regardless of the numeric type returned.

  defp nonce(%{"nonce" => nonce, "ok" => ok}, username, password, s) when ok == 1 do

    digest = Utils.digest(nonce, username, password)

    command = [authenticate: 1, user: username, nonce: nonce, key: digest]



    case Utils.command(-3, command, s) do

      {:ok, _flags, %{"ok" => ok}} when ok == 1 ->

        :ok



      {:ok, _flags, %{"ok" => ok, "errmsg" => reason, "code" => code}} when ok == 0 ->

        {:error, Mongo.Error.exception(message: "auth failed for '#{username}': #{reason}", code: code)}



      {:ok, _flags, nil} ->

        {:error, Mongo.Error.exception(message: "auth failed for '#{username}'")}



      error ->

        error

    end

  end

end