Function: gnutls-digests

gnutls-digests is a function defined in gnutls.c.

Signature

(gnutls-digests)

Documentation

Return alist of GnuTLS digest-algorithm method descriptions as plists.

Use the value of the alist (extract it with alist-get for instance) with gnutls-hash-digest. The alist key is the digest-algorithm method name.

Probably introduced at or before Emacs version 26.1.

Source Code

// Defined in /usr/src/emacs/src/gnutls.c
{
  Lisp_Object digest_algorithms = Qnil;
  const gnutls_digest_algorithm_t *digests = gnutls_digest_list ();
  for (ptrdiff_t pos = 0; digests[pos] != 0; pos++)
    {
      const gnutls_digest_algorithm_t gda = digests[pos];

      /* A symbol representing the GnuTLS digest algorithm.  */
      Lisp_Object gda_symbol = intern (gnutls_digest_get_name (gda));

      Lisp_Object mp  = list (gda_symbol,
			      QCdigest_algorithm_id, make_fixnum (gda),
			      QCtype, Qgnutls_type_digest_algorithm,

                              QCdigest_algorithm_length,
                              make_fixnum (gnutls_hash_get_len (gda)));

      digest_algorithms = Fcons (mp, digest_algorithms);
    }

  return digest_algorithms;
}