Function: gnutls-peer-status-warning-describe

gnutls-peer-status-warning-describe is a function defined in gnutls.c.

Signature

(gnutls-peer-status-warning-describe STATUS-SYMBOL)

Documentation

Describe the warning of a GnuTLS peer status from gnutls-peer-status.

Source Code

// Defined in /usr/src/emacs/src/gnutls.c
{
  CHECK_SYMBOL (status_symbol);

  if (EQ (status_symbol, QCinvalid))
    return build_string ("certificate could not be verified");

  if (EQ (status_symbol, QCrevoked))
    return build_string ("certificate was revoked (CRL)");

  if (EQ (status_symbol, QCself_signed))
    return build_string ("certificate signer was not found (self-signed)");

  if (EQ (status_symbol, QCunknown_ca))
    return build_string ("the certificate was signed by an unknown "
                         "and therefore untrusted authority");

  if (EQ (status_symbol, QCnot_ca))
    return build_string ("certificate signer is not a CA");

  if (EQ (status_symbol, QCinsecure))
    return build_string ("certificate was signed with an insecure algorithm");

  if (EQ (status_symbol, QCnot_activated))
    return build_string ("certificate is not yet activated");

  if (EQ (status_symbol, QCexpired))
    return build_string ("certificate has expired");

  if (EQ (status_symbol, QCno_host_match))
    return build_string ("certificate host does not match hostname");

  if (EQ (status_symbol, QCsignature_failure))
    return build_string ("certificate signature could not be verified");

  if (EQ (status_symbol, QCrevocation_data_superseded))
    return build_string ("certificate revocation data are old and have been "
                         "superseded");

  if (EQ (status_symbol, QCrevocation_data_issued_in_future))
    return build_string ("certificate revocation data have a future issue date");

  if (EQ (status_symbol, QCsigner_constraints_failure))
    return build_string ("certificate signer constraints were violated");

  if (EQ (status_symbol, QCpurpose_mismatch))
    return build_string ("certificate does not match the intended purpose");

  if (EQ (status_symbol, QCmissing_ocsp_status))
    return build_string ("certificate requires the server to send a OCSP "
                         "certificate status, but no status was received");

  if (EQ (status_symbol, QCinvalid_ocsp_status))
    return build_string ("the received OCSP certificate status is invalid");

  return Qnil;
}