anchor.diff:      ok = escalus_connection:send(Conn, Stanza),
       wait_for_success(Username, Conn).
   
  +-spec auth_digest_md5(client(), user_spec()) -> ok.
   auth_digest_md5(Conn, Props) ->
       ok = escalus_connection:send(Conn, escalus_stanza:auth(<<"DIGEST-MD5">>)),
       ChallengeData = get_challenge(Conn, challenge1),
  
positive.code: %% Helpers - actions
  %%--------------------------------------------------------------------
  
  get_challenge(Conn, Descr) ->
      get_challenge(Conn, Descr, true).
  
  
negative.code:     ok = escalus_connection:send(Conn, ResponseStanza2),
      wait_for_success(get_property(username, Props), Conn).
  
  -spec auth_sasl_scram_sha1(client(), user_spec()) -> ok.
  auth_sasl_scram_sha1(Conn, Props) ->
      Username = get_property(username, Props),
      Nonce = base64:encode(crypto:rand_bytes(16)),
  