identity-kit 0.3.0

//! DIF Well Known DID Configuration: proving that the controller of an origin and the
//! controller of a DID are the same entity.
//!
//! An origin publishes a [`DomainLinkageConfiguration`] at `/.well-known/did-configuration.json`
//! ([`configuration_url`]) holding one domain linkage credential per linked DID. This crate
//! handles the JSON Web Token proof format: [`DomainLinkageCredentialBuilder`] issues such a
//! credential (a VCDM 1.1 [`Credential`] of type `DomainLinkageCredential` whose subject is
//! the DID with the `origin`), and [`DomainLinkageValidator`] checks one, or a whole
//! configuration, against the origin it was fetched from, resolving the DID's key under
//! `assertionMethod`. Linked Data Proof entries are carried as data and not validated.
//!
//! The specification writes the origin with its scheme (`https://identity.foundation`), its
//! own JWT example without (`identity.foundation`); the validator normalizes both to the
//! `scheme://host[:port]` form, `https` when none is given, before comparing.
//!
//! # Fetching
//!
//! [`fetch_configuration`] gets the resource of an origin through an [`HttpClient`], the one
//! `did:web` and status lists use, telling an origin that publishes no configuration
//! ([`DomainLinkageError::NotPublished`], on `404` or `410`) apart from one whose
//! configuration could not be fetched or read. [`DomainLinkageClient`] fetches and validates
//! in one call, for an origin, for one DID at an origin, or for every origin a DID document
//! lists in its `LinkedDomains` services ([`services`]), reporting per origin.
//!
//! # Maintaining a configuration
//!
//! The controller of an origin reads back the credentials it published with
//! [`DomainLinkageConfiguration::entries`]: the DID, origin and validity period of each JWT
//! entry ([`UnverifiedLinkage`]), read **without verifying it**, since it signed them itself.
//! [`earliest_expiry`](DomainLinkageConfiguration::earliest_expiry) says when to renew,
//! [`remove_origin`](DomainLinkageConfiguration::remove_origin) unlinks an origin, and
//! [`linked_dids`](DomainLinkageConfiguration::linked_dids) is a public `Vec` for anything
//! else, `retain` included.
//!
//! # Examples
//!
//! Verifying a domain: the specification's example resource, served for
//! `https://identity.foundation`, links one `did:key`, and another origin publishes nothing.
//!
//! ```
//! # #[cfg(feature = "did-key")]
//! # {
//! use chrono::{TimeZone as _, Utc};
//! use identity_kit::did::Did;
//! use identity_kit::domain_linkage::{DomainLinkageClient, DomainLinkageValidator};
//! use identity_kit::jose::DefaultVerifier;
//! use identity_kit::methods::DidKey;
//! use identity_kit::methods::web::{HttpClient, HttpError, HttpResponse};
//! use identity_kit::resolver::Resolver;
//! use identity_kit::vc::validation::{CredentialValidationOptions, TimeOptions};
//! use url::Url;
//!
//! /// Serves the example resource of `identity.foundation` and nothing else.
//! struct Static;
//!
//! #[async_trait::async_trait]
//! impl HttpClient for Static {
//!     async fn get(&self, url: &Url) -> Result<HttpResponse, HttpError> {
//!         Ok(match url.as_str() {
//!             "https://identity.foundation/.well-known/did-configuration.json" => {
//!                 # let resource = include_str!(concat!(env!("CARGO_MANIFEST_DIR"), "/tests/vectors/did_configuration/resource.json"));
//!                 HttpResponse::new(200, resource)
//!             }
//!             _ => HttpResponse::new(404, Vec::new()),
//!         })
//!     }
//! }
//!
//! # tokio::runtime::Builder::new_current_thread().build()?.block_on(async {
//! let resolver = Resolver::builder().with(DidKey::default()).build();
//! let client = DomainLinkageClient::new(Static, DomainLinkageValidator::new(resolver, DefaultVerifier));
//! // The example credential is valid from 2020-12-04 to 2025-12-04.
//! let options = CredentialValidationOptions::new()
//!     .with_time(TimeOptions::at(Utc.with_ymd_and_hms(2021, 1, 1, 0, 0, 0).unwrap()));
//!
//! let report = client
//!     .validate_origin(&Url::parse("https://identity.foundation")?, &options)
//!     .await?;
//! assert_eq!(
//!     report.dids().map(Did::as_str).collect::<Vec<_>>(),
//!     ["did:key:z6MkoTHsgNNrby8JzCNQ1iRLyW5QQ6R8Xuu6AA8igGrMVPUM"]
//! );
//!
//! let error = client
//!     .validate_origin(&Url::parse("https://example.com")?, &options)
//!     .await
//!     .unwrap_err();
//! assert!(error.is_not_published());
//! # Ok::<(), Box<dyn std::error::Error>>(())
//! # })?;
//! # }
//! # Ok::<(), Box<dyn std::error::Error>>(())
//! ```

use core::fmt;
use std::collections::BTreeMap;
use std::error::Error;

use chrono::{DateTime, Utc};
use serde::{Deserialize, Deserializer, Serialize};
use serde_json::Value;
use url::Url;

use crate::cause::cause;
use crate::did::{Did, DidDocument, DidUrl, ResolutionError, Service, ServiceEndpoint, Uri};
use crate::jose::{DefaultVerifier, JwsHeader, JwsVerifier, Signer};
use crate::methods::web::{HttpClient, HttpError};
use crate::resolver::Resolver;
use crate::vc::validation::{
    CredentialValidationOptions, DecodedCredential, JwtCredentialValidator, KeyReferenceError,
    KeyResolver, ValidationError, decode_credential,
};
use crate::vc::{Credential, CredentialError, Jwt, JwtClaims, Subject};

/// The context of the DID configuration resource and of domain linkage credentials.
pub const CONTEXT: &str = "https://identity.foundation/.well-known/did-configuration/v1";

/// The credential type, `DomainLinkageCredential`.
pub const CREDENTIAL_TYPE: &str = "DomainLinkageCredential";

/// The path of the resource under an origin.
pub const WELL_KNOWN_PATH: &str = "/.well-known/did-configuration.json";

/// The type of the DID document service listing the origins of a DID, `LinkedDomains`.
pub const SERVICE_TYPE: &str = "LinkedDomains";

/// The member of a map `serviceEndpoint` holding the origins of a `LinkedDomains` service.
const ORIGINS: &str = "origins";

/// The URL of the DID configuration resource of `origin`.
///
/// # Errors
///
/// [`DomainLinkageError::InvalidOrigin`] when `origin` has no host.
///
/// # Examples
///
/// ```
/// use identity_kit::domain_linkage::configuration_url;
/// use url::Url;
///
/// let url = configuration_url(&Url::parse("https://identity.foundation")?)?;
/// assert_eq!(url.as_str(), "https://identity.foundation/.well-known/did-configuration.json");
/// # Ok::<(), Box<dyn std::error::Error>>(())
/// ```
pub fn configuration_url(origin: &Url) -> Result<Url, DomainLinkageError> {
    let origin = normalize_origin(origin.as_str())?;
    Url::parse(&format!("{origin}{WELL_KNOWN_PATH}")).map_err(|e| {
        invalid_origin(
            &origin,
            "its well-known URL does not parse",
            Some(Box::new(e)),
        )
    })
}

/// `origin` as `scheme://host[:port]`, lowercased, with `https` assumed when no scheme is
/// given and a path, query or fragment dropped.
///
/// # Errors
///
/// [`DomainLinkageError::InvalidOrigin`] when `origin` has no host, or one that is not an
/// RFC 3986 host.
pub fn normalize_origin(origin: &str) -> Result<String, DomainLinkageError> {
    let with_scheme = if has_scheme(origin) {
        origin.to_owned()
    } else {
        format!("https://{origin}")
    };
    let url = Url::parse(&with_scheme)
        .map_err(|e| invalid_origin(origin, "not a URL", Some(Box::new(e))))?;
    if url.host_str().is_none() {
        return Err(invalid_origin(origin, "no host", None));
    }
    let normalized = url.origin();
    if !normalized.is_tuple() {
        return Err(invalid_origin(origin, "not a domain origin", None));
    }
    let normalized = normalized.ascii_serialization();
    // The WHATWG URL parser accepts host characters RFC 3986 does not, such as `` ` ``.
    Uri::parse(&normalized)
        .map_err(|e| invalid_origin(origin, "not an RFC 3986 URI", Some(Box::new(e))))?;
    Ok(normalized)
}

/// A [`DomainLinkageError::InvalidOrigin`] for `origin`.
fn invalid_origin(
    origin: &str,
    reason: &str,
    source: Option<Box<dyn Error + Send + Sync>>,
) -> DomainLinkageError {
    DomainLinkageError::InvalidOrigin {
        origin: origin.to_owned(),
        reason: reason.to_owned(),
        source,
    }
}

/// Whether `s` starts with a URI scheme (RFC 3986 §3.1) rather than a `host:port`.
fn has_scheme(s: &str) -> bool {
    let Some((scheme, rest)) = s.split_once(':') else {
        return false;
    };
    let mut chars = scheme.chars();
    chars.next().is_some_and(|c| c.is_ascii_alphabetic())
        && chars.all(|c| c.is_ascii_alphanumeric() || matches!(c, '+' | '-' | '.'))
        && !rest.starts_with(|c: char| c.is_ascii_digit())
}

/// A `LinkedDomains` service of `id` listing `origins`, normalized: the origin string when
/// there is one, `{"origins": [...]}` otherwise, the two forms the specification defines.
///
/// # Errors
///
/// [`DomainLinkageError::InvalidService`] when `origins` is empty or an origin has no host.
///
/// # Examples
///
/// ```
/// use identity_kit::did::{DidUrl, ServiceEndpoint};
/// use identity_kit::domain_linkage::{SERVICE_TYPE, service};
/// use url::Url;
///
/// let service = service(
///     DidUrl::parse("did:example:123#foo")?,
///     [Url::parse("https://foo.example.com")?, Url::parse("https://identity.foundation")?],
/// )?;
/// assert!(service.has_type(SERVICE_TYPE));
/// assert_eq!(
///     serde_json::to_value(&service.service_endpoint)?,
///     serde_json::json!({ "origins": ["https://foo.example.com", "https://identity.foundation"] })
/// );
/// # Ok::<(), Box<dyn std::error::Error>>(())
/// ```
pub fn service(
    id: DidUrl,
    origins: impl IntoIterator<Item = Url>,
) -> Result<Service, DomainLinkageError> {
    let invalid = |reason: String, source: Option<Box<dyn Error + Send + Sync>>| {
        DomainLinkageError::InvalidService {
            id: id.clone(),
            reason,
            source,
        }
    };
    let origins = origins
        .into_iter()
        .map(|origin| {
            normalize_origin(origin.as_str())
                .map_err(|e| invalid(format!("origin `{origin}` is invalid"), Some(Box::new(e))))
        })
        .collect::<Result<Vec<_>, _>>()?;
    let endpoint = match origins.as_slice() {
        [] => return Err(invalid("no origin".to_owned(), None)),
        [origin] => ServiceEndpoint::Uri(
            Uri::parse(origin)
                .map_err(|e| invalid(format!("`{origin}` is not a URI"), Some(Box::new(e))))?,
        ),
        _ => ServiceEndpoint::Map([(ORIGINS.to_owned(), Value::from(origins))].into()),
    };
    Ok(Service::new(id, SERVICE_TYPE, endpoint))
}

/// A `LinkedDomains` service of a DID document, with its origins.
#[derive(Debug, Clone, PartialEq, Eq)]
#[non_exhaustive]
pub struct LinkedDomainsService<'a> {
    /// The service entry.
    pub service: &'a Service,
    /// Its origins, normalized, in document order.
    pub origins: Vec<Url>,
}

impl LinkedDomainsService<'_> {
    /// The id of the service.
    pub fn id(&self) -> &DidUrl {
        &self.service.id
    }
}

/// The `LinkedDomains` services of `document`, in document order, with their origins
/// normalized as by [`normalize_origin`].
///
/// `serviceEndpoint` is an origin string or an object whose `origins` member is a non-empty
/// array of origin strings, the two forms the specification defines, or an array of origins,
/// the set form DID Core allows for any service. A service of that type whose endpoint is
/// none of these, or holds something that is not an origin, is a
/// [`DomainLinkageError::InvalidService`] rather than silently skipped.
///
/// # Examples
///
/// ```
/// use identity_kit::did::DidDocument;
/// use identity_kit::domain_linkage::services;
/// use serde_json::json;
///
/// let document: DidDocument = serde_json::from_value(json!({
///   "id": "did:example:123",
///   "service": [
///     {
///       "id": "did:example:123#foo",
///       "type": "LinkedDomains",
///       "serviceEndpoint": { "origins": ["https://foo.example.com", "https://identity.foundation"] }
///     },
///     { "id": "did:example:123#bar", "type": "LinkedDomains", "serviceEndpoint": "https://bar.example.com" }
///   ]
/// }))?;
/// let origins: Vec<String> = services(&document)
///     .map(|service| service.map(|service| service.origins))
///     .collect::<Result<Vec<_>, _>>()?
///     .into_iter()
///     .flatten()
///     .map(|origin| origin.origin().ascii_serialization())
///     .collect();
/// assert_eq!(origins, ["https://foo.example.com", "https://identity.foundation", "https://bar.example.com"]);
/// # Ok::<(), Box<dyn std::error::Error>>(())
/// ```
pub fn services(
    document: &DidDocument,
) -> impl Iterator<Item = Result<LinkedDomainsService<'_>, DomainLinkageError>> {
    document
        .service
        .iter()
        .filter(|service| service.has_type(SERVICE_TYPE))
        .map(linked_domains_service)
}

/// `service` with its origins read and normalized.
fn linked_domains_service(
    service: &Service,
) -> Result<LinkedDomainsService<'_>, DomainLinkageError> {
    let invalid = |reason: String, source: Option<Box<dyn Error + Send + Sync>>| {
        DomainLinkageError::InvalidService {
            id: service.id.clone(),
            reason,
            source,
        }
    };
    let origins: Vec<&str> = match &service.service_endpoint {
        ServiceEndpoint::Map(map) => {
            let Some(Value::Array(origins)) = map.get(ORIGINS) else {
                return Err(invalid(
                    format!("`serviceEndpoint` is a map without an `{ORIGINS}` array"),
                    None,
                ));
            };
            origins
                .iter()
                .map(|origin| {
                    origin
                        .as_str()
                        .ok_or_else(|| invalid(format!("origin {origin} is not a string"), None))
                })
                .collect::<Result<_, _>>()?
        }
        endpoint => endpoint.uris().map(Uri::as_str).collect(),
    };
    if origins.is_empty() {
        return Err(invalid("no origin".to_owned(), None));
    }
    let origins = origins
        .into_iter()
        .map(|origin| {
            let normalized = normalize_origin(origin)
                .map_err(|e| invalid(format!("origin {origin:?} is invalid"), Some(Box::new(e))))?;
            Url::parse(&normalized)
                .map_err(|e| invalid(format!("origin {origin:?} is not a URL"), Some(Box::new(e))))
        })
        .collect::<Result<_, _>>()?;
    Ok(LinkedDomainsService { service, origins })
}

/// One entry of `linked_dids`.
#[derive(Debug, Clone, PartialEq, Eq, Serialize, Deserialize)]
#[serde(untagged)]
#[non_exhaustive]
pub enum LinkedDid {
    /// A domain linkage credential in the JSON Web Token proof format.
    Jwt(Jwt),
    /// A domain linkage credential in the Linked Data Proof format, carried as data. An entry
    /// that is neither a compact JWT nor an object is a parse error, not a silently skipped
    /// credential.
    LinkedDataProof(serde_json::Map<String, Value>),
}

/// The DID configuration resource: `@context` and the domain linkage credentials.
///
/// # Examples
///
/// ```
/// use identity_kit::domain_linkage::{DomainLinkageConfiguration, LinkedDid};
/// use serde_json::json;
///
/// let configuration: DomainLinkageConfiguration = serde_json::from_value(json!({
///   "@context": "https://identity.foundation/.well-known/did-configuration/v1",
///   "linked_dids": [
///     "eyJhbGciOiJFZERTQSJ9.RXhhbXBsZSBvZiBFZDI1NTE5IHNpZ25pbmc.hgyY0il_MGCjP0JzlnLWG1PPOt7-09PGcvMg3AIbQR6dWbhijcNR4ki4iylGjg5BhVsPt9g7sVvpAr_MuM0KAg"
///   ]
/// }))?;
/// assert_eq!(configuration.jwts().count(), 1);
/// assert!(serde_json::from_value::<DomainLinkageConfiguration>(json!({
///   "@context": "https://example.com/other", "linked_dids": []
/// })).is_err());
/// # Ok::<(), serde_json::Error>(())
/// ```
#[derive(Debug, Clone, PartialEq, Eq, Serialize)]
#[non_exhaustive]
pub struct DomainLinkageConfiguration {
    /// `@context`, [`CONTEXT`].
    #[serde(rename = "@context")]
    pub context: String,
    /// The domain linkage credentials, one per linked DID.
    pub linked_dids: Vec<LinkedDid>,
}

impl Default for DomainLinkageConfiguration {
    fn default() -> Self {
        Self::new()
    }
}

impl DomainLinkageConfiguration {
    /// An empty configuration.
    pub fn new() -> Self {
        Self {
            context: CONTEXT.to_owned(),
            linked_dids: Vec::new(),
        }
    }

    /// This configuration with `credential` added.
    #[must_use]
    pub fn with_credential(mut self, credential: Jwt) -> Self {
        self.linked_dids.push(LinkedDid::Jwt(credential));
        self
    }

    /// The credentials in the JSON Web Token proof format, with their positions.
    pub fn jwts(&self) -> impl Iterator<Item = (usize, &Jwt)> {
        self.linked_dids
            .iter()
            .enumerate()
            .filter_map(|(i, entry)| match entry {
                LinkedDid::Jwt(jwt) => Some((i, jwt)),
                _ => None,
            })
    }

    /// The credentials in the JSON Web Token proof format, with their positions, each read
    /// **without verifying it** ([`UnverifiedLinkage::from_jwt`]), or why it does not read.
    /// Linked Data Proof entries are not among them.
    ///
    /// For the controller of the origin, maintaining the configuration it publishes; a
    /// verifier validates with [`DomainLinkageValidator`].
    pub fn entries(
        &self,
    ) -> impl Iterator<Item = (usize, Result<UnverifiedLinkage, DomainLinkageError>)> + '_ {
        self.jwts()
            .map(|(index, jwt)| (index, UnverifiedLinkage::from_jwt(jwt)))
    }

    /// The earliest expiry among the JWT credentials that read ([`entries`](Self::entries)),
    /// or `None` when none reads or none expires: when the configuration needs renewing at
    /// the latest.
    pub fn earliest_expiry(&self) -> Option<DateTime<Utc>> {
        self.entries()
            .filter_map(|(_, entry)| entry.ok()?.expires)
            .min()
    }

    /// Removes the JWT credentials linking `origin`, compared normalized
    /// ([`normalize_origin`]), and returns how many it removed. Credentials that do not
    /// read ([`entries`](Self::entries)) and Linked Data Proof entries are kept; remove them
    /// from [`linked_dids`](Self::linked_dids) directly.
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::InvalidOrigin`] when `origin` has no host.
    pub fn remove_origin(&mut self, origin: &Url) -> Result<usize, DomainLinkageError> {
        let origin = normalize_origin(origin.as_str())?;
        let before = self.linked_dids.len();
        self.linked_dids.retain(|entry| match entry {
            LinkedDid::Jwt(jwt) => {
                UnverifiedLinkage::from_jwt(jwt).map_or(true, |linkage| linkage.origin != origin)
            }
            LinkedDid::LinkedDataProof(_) => true,
        });
        Ok(before - self.linked_dids.len())
    }

    /// Checks that `@context` is [`CONTEXT`].
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::InvalidContext`].
    pub fn check(&self) -> Result<(), DomainLinkageError> {
        if self.context != CONTEXT {
            return Err(DomainLinkageError::InvalidContext(self.context.clone()));
        }
        Ok(())
    }
}

impl<'de> Deserialize<'de> for DomainLinkageConfiguration {
    fn deserialize<D: Deserializer<'de>>(deserializer: D) -> Result<Self, D::Error> {
        #[derive(Deserialize)]
        #[serde(deny_unknown_fields)]
        struct Raw {
            #[serde(rename = "@context")]
            context: String,
            linked_dids: Vec<LinkedDid>,
        }
        let raw = Raw::deserialize(deserializer)?;
        let configuration = Self {
            context: raw.context,
            linked_dids: raw.linked_dids,
        };
        configuration.check().map_err(serde::de::Error::custom)?;
        Ok(configuration)
    }
}

/// A domain linkage credential in the JSON Web Token proof format as its JWT says, read
/// **without verifying it**: neither the signature nor the format rules
/// [`DomainLinkageValidator`] enforces are checked, only what these fields need.
///
/// For the controller of an origin reading back credentials it signed itself, to renew them
/// before they expire or to drop an origin's; never for deciding whether a DID and an origin
/// are linked.
///
/// # Examples
///
/// ```
/// use chrono::{TimeZone as _, Utc};
/// use identity_kit::domain_linkage::UnverifiedLinkage;
/// use identity_kit::vc::Jwt;
///
/// // The example JWT of the specification, whose `origin` has no scheme.
/// # let jwt: Jwt = include_str!(concat!(env!("CARGO_MANIFEST_DIR"), "/tests/vectors/did_configuration/jwt.txt")).trim().parse()?;
/// let linkage = UnverifiedLinkage::from_jwt(&jwt)?;
/// assert_eq!(linkage.did.as_str(), "did:key:z6MkoTHsgNNrby8JzCNQ1iRLyW5QQ6R8Xuu6AA8igGrMVPUM");
/// assert_eq!(linkage.origin, "https://identity.foundation");
/// assert_eq!(linkage.expires, Some(Utc.with_ymd_and_hms(2025, 12, 4, 20, 12, 19).unwrap()));
/// # Ok::<(), Box<dyn std::error::Error>>(())
/// ```
#[derive(Debug, Clone, PartialEq, Eq)]
#[non_exhaustive]
pub struct UnverifiedLinkage {
    /// The DID the credential links: its `credentialSubject.id`.
    pub did: Did,
    /// The origin it links: its `credentialSubject.origin`, normalized
    /// ([`normalize_origin`]).
    pub origin: String,
    /// The issuer it names, which the format requires to be [`did`](Self::did).
    pub issuer: Uri,
    /// When it becomes valid: `nbf`, or `issuanceDate` without one.
    pub not_before: DateTime<Utc>,
    /// When it expires: `exp`, or `expirationDate` without one, when either is present.
    pub expires: Option<DateTime<Utc>>,
}

impl UnverifiedLinkage {
    /// Reads `jwt` without verifying it.
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::Validation`] when `jwt` does not decode as a credential JWT,
    /// [`DomainLinkageError::SubjectNotDid`] when its one subject is not a DID, and
    /// [`DomainLinkageError::InvalidOriginProperty`] or [`DomainLinkageError::InvalidOrigin`]
    /// when its `origin` is not one origin.
    pub fn from_jwt(jwt: &Jwt) -> Result<Self, DomainLinkageError> {
        let credential = decode_credential(jwt)?.credential;
        let subject = credential
            .subject()
            .ok_or(DomainLinkageError::SubjectNotDid(None))?;
        Ok(Self {
            did: subject_did(subject)?,
            origin: subject_origin(subject)?,
            issuer: credential.issuer.id().clone(),
            not_before: credential.issuance_date,
            expires: credential.expiration_date,
        })
    }
}

/// Builds a domain linkage credential in the JSON Web Token proof format: a VCDM 1.1
/// credential of type `DomainLinkageCredential` issued by `did` about `did` and `origin`,
/// carried in the `vc` claim with `iss`, `sub`, `nbf` and `exp` and nothing else.
///
/// # Examples
///
/// ```
/// use chrono::{TimeZone as _, Utc};
/// use identity_kit::did::Did;
/// use identity_kit::domain_linkage::DomainLinkageCredentialBuilder;
/// use url::Url;
///
/// let did = Did::parse("did:key:z6MkoTHsgNNrby8JzCNQ1iRLyW5QQ6R8Xuu6AA8igGrMVPUM")?;
/// let builder = DomainLinkageCredentialBuilder::new(
///     did.clone(),
///     &Url::parse("https://identity.foundation")?,
///     Utc.with_ymd_and_hms(2020, 12, 4, 20, 12, 19).unwrap(),
///     Utc.with_ymd_and_hms(2025, 12, 4, 20, 12, 19).unwrap(),
/// )?;
/// let claims = builder.jwt_claims();
/// assert_eq!(claims.iss.as_deref(), Some(did.as_str()));
/// assert_eq!(claims.sub, claims.iss);
/// assert_eq!(claims.nbf, Some(1607112739));
/// assert_eq!(claims.exp, Some(1764879139));
/// assert_eq!(claims.additional["vc"]["credentialSubject"]["origin"], "https://identity.foundation");
/// # Ok::<(), Box<dyn std::error::Error>>(())
/// ```
#[derive(Debug, Clone, PartialEq, Eq)]
#[non_exhaustive]
pub struct DomainLinkageCredentialBuilder {
    /// The DID: issuer and subject of the credential.
    pub did: Did,
    /// The origin, normalized.
    pub origin: String,
    /// `issuanceDate` and `nbf`.
    pub issuance_date: DateTime<Utc>,
    /// `expirationDate` and `exp`.
    pub expiration_date: DateTime<Utc>,
}

impl DomainLinkageCredentialBuilder {
    /// A credential linking `did` and `origin`, valid from `issuance_date` to
    /// `expiration_date`.
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::InvalidOrigin`] when `origin` has no host.
    pub fn new(
        did: Did,
        origin: &Url,
        issuance_date: DateTime<Utc>,
        expiration_date: DateTime<Utc>,
    ) -> Result<Self, DomainLinkageError> {
        Ok(Self {
            did,
            origin: normalize_origin(origin.as_str())?,
            issuance_date,
            expiration_date,
        })
    }

    /// The credential.
    pub fn credential(&self) -> Credential {
        let subject =
            Subject::new(Uri::from(self.did.clone())).with_property("origin", self.origin.clone());
        Credential::new(self.did.clone(), self.issuance_date, subject)
            .with_context(CONTEXT)
            .with_type(CREDENTIAL_TYPE)
            .with_expiration_date(self.expiration_date)
    }

    /// The JWT claims: `iss` and `sub` the DID, `nbf` and `exp` the validity period, `vc` the
    /// whole credential.
    ///
    /// # Panics
    ///
    /// Never: the credential this builder makes always serializes to JSON.
    pub fn jwt_claims(&self) -> JwtClaims {
        let mut claims = JwtClaims::new()
            .with_nbf(self.issuance_date)
            .with_exp(self.expiration_date);
        claims.iss = Some(self.did.as_str().to_owned());
        claims.sub = Some(self.did.as_str().to_owned());
        claims.additional.insert(
            "vc".to_owned(),
            serde_json::to_value(self.credential()).expect("a credential serializes"),
        );
        claims
    }

    /// The credential signed with `signer` under a header of `alg` and `kid` only, `kid`
    /// naming the verification method of the DID.
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::Validation`] with [`ValidationError::Jws`] when signing fails.
    pub async fn sign(&self, kid: &DidUrl, signer: &dyn Signer) -> Result<Jwt, DomainLinkageError> {
        let header = JwsHeader::new(signer.alg()).with_kid(kid.as_str());
        let jwt = Jwt::sign(&header, &self.jwt_claims(), signer)
            .await
            .map_err(ValidationError::from)?;
        Ok(jwt)
    }
}

/// Why a domain linkage credential or configuration did not validate.
#[derive(Debug, thiserror::Error)]
#[non_exhaustive]
pub enum DomainLinkageError {
    /// An origin is not `scheme://host[:port]`. The source is the URL or URI error, when
    /// there is one.
    #[error("invalid origin {origin:?}: {reason}{}", cause(.source.as_ref()))]
    InvalidOrigin {
        /// The origin, as given.
        origin: String,
        /// What is wrong with it.
        reason: String,
        /// The underlying error.
        source: Option<Box<dyn Error + Send + Sync>>,
    },
    /// The configuration's `@context` is not [`CONTEXT`].
    #[error("`@context` is {0:?}, not `{CONTEXT}`")]
    InvalidContext(String),
    /// The JWT header has a `typ`, which the format forbids.
    #[error("header `typ` {0:?} must not be present")]
    TypPresent(String),
    /// The JWT header has a parameter other than `alg` and `kid`.
    #[error("header parameter `{0}` must not be present")]
    UnexpectedHeaderParameter(String),
    /// The JWT payload has a claim other than `iss`, `sub`, `nbf`, `exp` and `vc`.
    #[error("claim `{0}` must not be present")]
    UnexpectedClaim(String),
    /// A required claim is missing: `iss`, `sub`, `exp` or `nbf`.
    #[error("claim `{0}` is required")]
    MissingClaim(&'static str),
    /// The credential has an `id`, which the format forbids.
    #[error("the credential must not have an `id`")]
    IdPresent,
    /// The credential's context does not include [`CONTEXT`].
    #[error("the credential's `@context` does not include `{CONTEXT}`")]
    MissingContext,
    /// The credential's type does not include [`CREDENTIAL_TYPE`].
    #[error("the credential's `type` does not include `{CREDENTIAL_TYPE}`")]
    MissingType,
    /// The credential has no `expirationDate`.
    #[error("the credential must have an `expirationDate`")]
    MissingExpirationDate,
    /// `credentialSubject.id` is missing or not a DID.
    #[error("`credentialSubject.id` {0:?} is not a DID")]
    SubjectNotDid(Option<String>),
    /// The issuer, `iss` or `sub` differs from `credentialSubject.id`.
    #[error("{role} `{found}` is not the subject `{subject}`")]
    SubjectMismatch {
        /// `issuer`, `iss` or `sub`.
        role: &'static str,
        /// The value found.
        found: String,
        /// `credentialSubject.id`.
        subject: Did,
    },
    /// `credentialSubject.origin` is missing or not one string.
    #[error("`credentialSubject.origin` {0:?} is not one origin")]
    InvalidOriginProperty(Option<Value>),
    /// `credentialSubject.origin` is not the origin the resource was fetched from.
    #[error("origin {found:?} is not {expected:?}")]
    OriginMismatch {
        /// The normalized origin expected.
        expected: String,
        /// The credential's origin, normalized.
        found: String,
    },
    /// The credential did not decode or validate as a credential JWT.
    #[error(transparent)]
    Validation(#[from] ValidationError),
    /// The configuration holds no JWT credential for the DID.
    #[error("the configuration holds no JWT credential for `{0}`")]
    NoCredentialFor(Did),
    /// No credential of the configuration validated; the error of each JWT entry by its
    /// position.
    #[error("no domain linkage credential validated: {}", format_errors(.0))]
    NoValidCredential(BTreeMap<usize, DomainLinkageError>),
    /// A `LinkedDomains` service does not list one or more origins. The source is the
    /// [`InvalidOrigin`](Self::InvalidOrigin) error of an origin, or the URI or URL error, when
    /// there is one.
    #[error("service `{id}`: {reason}{}", cause(.source.as_ref()))]
    InvalidService {
        /// The id of the service.
        id: DidUrl,
        /// What is wrong with it.
        reason: String,
        /// The underlying error.
        source: Option<Box<dyn Error + Send + Sync>>,
    },
    /// The origin is not `https`, the only scheme the resource is fetched over.
    #[error("`{0}` is not an HTTPS origin")]
    InsecureOrigin(String),
    /// The [`HttpClient`] got no response.
    #[error("fetching `{url}` failed: {source}")]
    Http {
        /// The URL of the resource.
        url: Url,
        /// Why there was no response.
        #[source]
        source: HttpError,
    },
    /// The origin publishes no DID configuration: the server answered `404` or `410`. A
    /// legitimate state of an origin rather than a failure; see
    /// [`is_not_published`](Self::is_not_published).
    #[error("`{url}` publishes no DID configuration (HTTP {status})")]
    NotPublished {
        /// The URL of the resource.
        url: Url,
        /// `404` or `410`.
        status: u16,
    },
    /// The server answered with a status other than `2xx`, `404` and `410`.
    #[error("fetching `{url}` returned HTTP {status}")]
    HttpStatus {
        /// The URL of the resource.
        url: Url,
        /// The status code.
        status: u16,
    },
    /// The body is not a DID configuration resource: not JSON, not of its shape, or of
    /// another `@context`.
    #[error("`{url}` is not a DID configuration resource: {source}")]
    InvalidConfiguration {
        /// The URL of the resource.
        url: Url,
        /// Why the body did not deserialize.
        #[source]
        source: serde_json::Error,
    },
    /// The DID did not resolve.
    #[error("resolving the DID failed: {0}")]
    Resolution(#[from] ResolutionError),
    /// The origin was not fetched: the DID document lists more origins than the client's
    /// limit, given here.
    #[error("the DID document lists more than {0} origins")]
    TooManyOrigins(usize),
    /// The entry was not validated: the configuration holds more JWT entries, or more naming
    /// the DID, than the validator's limit, given here.
    #[error("the configuration holds more than {0} credentials to validate")]
    TooManyCredentials(usize),
}

impl DomainLinkageError {
    /// Whether the origin publishes no DID configuration ([`NotPublished`](Self::NotPublished)),
    /// as opposed to a configuration that could not be fetched, read or validated.
    pub fn is_not_published(&self) -> bool {
        matches!(self, Self::NotPublished { .. })
    }
}

impl From<CredentialError> for DomainLinkageError {
    fn from(error: CredentialError) -> Self {
        Self::Validation(error.into())
    }
}

/// `errors` as `index: error; …`.
fn format_errors(errors: &BTreeMap<usize, DomainLinkageError>) -> String {
    errors
        .iter()
        .map(|(index, error)| format!("{index}: {error}"))
        .collect::<Vec<_>>()
        .join("; ")
}

/// A validated DID configuration resource: which entries linked which DIDs, and which failed.
#[derive(Debug)]
#[non_exhaustive]
pub struct DomainLinkageReport {
    /// The entries that validated, by position, with the DID each links.
    pub linked: Vec<(usize, Did, DecodedCredential)>,
    /// The JWT entries that failed, by position.
    pub failed: BTreeMap<usize, DomainLinkageError>,
}

impl DomainLinkageReport {
    /// The DIDs linked to the origin, in the order of the resource.
    pub fn dids(&self) -> impl Iterator<Item = &Did> {
        self.linked.iter().map(|(_, did, _)| did)
    }
}

/// Validates domain linkage credentials and DID configuration resources (DID Configuration
/// Resource Verification): the subject is a DID equal to the issuer, `iss` and `sub`, the
/// one `origin` is the requested origin, the credential has an expiration date, no `id`, no
/// extra claims or header parameters, and its signature verifies under a key of the DID
/// listed under `assertionMethod`.
///
/// A configuration is written by whoever controls the origin, and every entry validated
/// resolves its issuer's DID, so [`validate_configuration`](Self::validate_configuration) and
/// [`validate_linkage`](Self::validate_linkage) validate at most
/// [`max_credentials`](Self::max_credentials) entries of one configuration.
///
/// # Examples
///
/// ```
/// # #[cfg(feature = "did-key")]
/// # {
/// use identity_kit::domain_linkage::DomainLinkageValidator;
/// use identity_kit::jose::DefaultVerifier;
/// use identity_kit::methods::DidKey;
/// use identity_kit::resolver::Resolver;
///
/// let resolver = Resolver::builder().with(DidKey::default()).build();
/// let validator = DomainLinkageValidator::new(resolver, DefaultVerifier);
/// assert!(!validator.credential_validator().has_status_check());
/// # }
/// ```
#[derive(Debug)]
pub struct DomainLinkageValidator<R, V = DefaultVerifier> {
    credentials: JwtCredentialValidator<R, V>,
    max_credentials: usize,
}

impl<R, V> DomainLinkageValidator<R, V> {
    /// The most entries of one configuration [`new`](Self::new) validates: 32.
    pub const DEFAULT_MAX_CREDENTIALS: usize = 32;
}

impl<R: KeyResolver, V: JwsVerifier> DomainLinkageValidator<R, V> {
    /// A validator resolving keys with `resolver` and verifying signatures with `verifier`,
    /// validating at most [`DEFAULT_MAX_CREDENTIALS`](Self::DEFAULT_MAX_CREDENTIALS) entries
    /// of a configuration.
    pub fn new(resolver: R, verifier: V) -> Self {
        Self::from_credential_validator(JwtCredentialValidator::new(resolver, verifier))
    }

    /// A validator over `credentials`, validating at most
    /// [`DEFAULT_MAX_CREDENTIALS`](Self::DEFAULT_MAX_CREDENTIALS) entries of a configuration.
    pub fn from_credential_validator(credentials: JwtCredentialValidator<R, V>) -> Self {
        Self {
            credentials,
            max_credentials: Self::DEFAULT_MAX_CREDENTIALS,
        }
    }

    /// This validator validating at most `max_credentials` entries of a configuration.
    #[must_use]
    pub fn with_max_credentials(mut self, max_credentials: usize) -> Self {
        self.max_credentials = max_credentials;
        self
    }

    /// The most entries of one configuration [`validate_configuration`](Self::validate_configuration)
    /// and [`validate_linkage`](Self::validate_linkage) validate.
    pub fn max_credentials(&self) -> usize {
        self.max_credentials
    }

    /// The credential validator.
    pub fn credential_validator(&self) -> &JwtCredentialValidator<R, V> {
        &self.credentials
    }

    /// Validates `jwt` as a domain linkage credential for `origin`.
    ///
    /// # Errors
    ///
    /// The first [`DomainLinkageError`] found: the format checks first, then the signature,
    /// issuer binding and validity period of [`JwtCredentialValidator::validate`].
    pub async fn validate_credential(
        &self,
        jwt: &Jwt,
        origin: &Url,
        options: &CredentialValidationOptions,
    ) -> Result<DecodedCredential, DomainLinkageError> {
        let expected = normalize_origin(origin.as_str())?;
        let decoded = decode_credential(jwt)?;
        check_format(&decoded, &expected)?;
        self.credentials.validate(jwt, options).await?;
        Ok(decoded)
    }

    /// Validates the credential of `configuration` linking `did` to `origin`: the first JWT
    /// entry issued by `did` that validates. Entries naming `did` past the first
    /// [`max_credentials`](Self::max_credentials) are not validated.
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::NoCredentialFor`] when no JWT entry names `did` as issuer,
    /// [`DomainLinkageError::NoValidCredential`] with the error of each such entry otherwise,
    /// [`DomainLinkageError::TooManyCredentials`] for those past the limit.
    pub async fn validate_linkage(
        &self,
        configuration: &DomainLinkageConfiguration,
        did: &Did,
        origin: &Url,
        options: &CredentialValidationOptions,
    ) -> Result<DecodedCredential, DomainLinkageError> {
        configuration.check()?;
        let mut errors = BTreeMap::new();
        let mut validated = 0;
        for (index, jwt) in configuration.jwts() {
            if issuer_of(jwt).as_ref() != Some(did) {
                continue;
            }
            if validated == self.max_credentials {
                errors.insert(
                    index,
                    DomainLinkageError::TooManyCredentials(self.max_credentials),
                );
                continue;
            }
            validated += 1;
            match self.validate_credential(jwt, origin, options).await {
                Ok(decoded) => return Ok(decoded),
                Err(error) => {
                    errors.insert(index, error);
                }
            }
        }
        if errors.is_empty() {
            return Err(DomainLinkageError::NoCredentialFor(did.clone()));
        }
        Err(DomainLinkageError::NoValidCredential(errors))
    }

    /// Validates every JWT entry of `configuration` for `origin`: succeeds when at least one
    /// does, reporting the rest as errors. Entries past the first
    /// [`max_credentials`](Self::max_credentials) are not validated and report
    /// [`DomainLinkageError::TooManyCredentials`].
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::InvalidContext`], or [`DomainLinkageError::NoValidCredential`]
    /// with the error of every JWT entry.
    ///
    /// # Panics
    ///
    /// Never: a credential that validates has a DID as its issuer.
    pub async fn validate_configuration(
        &self,
        configuration: &DomainLinkageConfiguration,
        origin: &Url,
        options: &CredentialValidationOptions,
    ) -> Result<DomainLinkageReport, DomainLinkageError> {
        configuration.check()?;
        let mut linked = Vec::new();
        let mut failed = BTreeMap::new();
        for (position, (index, jwt)) in configuration.jwts().enumerate() {
            if position >= self.max_credentials {
                failed.insert(
                    index,
                    DomainLinkageError::TooManyCredentials(self.max_credentials),
                );
                continue;
            }
            match self.validate_credential(jwt, origin, options).await {
                Ok(decoded) => {
                    let did = Did::parse(decoded.credential.issuer.id().as_str())
                        .expect("the format check accepted the issuer as a DID");
                    linked.push((index, did, decoded));
                }
                Err(error) => {
                    failed.insert(index, error);
                }
            }
        }
        if linked.is_empty() {
            return Err(DomainLinkageError::NoValidCredential(failed));
        }
        Ok(DomainLinkageReport { linked, failed })
    }
}

/// Fetches the DID configuration resource of `origin` with `http`: a `GET` of
/// [`configuration_url`] over HTTPS, the body deserialized as a
/// [`DomainLinkageConfiguration`], so its `@context` is checked and Linked Data Proof entries
/// are carried as data. Nothing is validated.
///
/// # Errors
///
/// - [`DomainLinkageError::InvalidOrigin`] when `origin` has no host, and
///   [`DomainLinkageError::InsecureOrigin`] when it is not `https`, both without fetching;
/// - [`DomainLinkageError::NotPublished`] on `404` or `410`: the origin publishes no
///   configuration;
/// - [`DomainLinkageError::Http`] when there is no response, and
///   [`DomainLinkageError::HttpStatus`] for any other status that is not `2xx`;
/// - [`DomainLinkageError::InvalidConfiguration`] when the body is not a configuration.
pub async fn fetch_configuration<C: HttpClient + ?Sized>(
    http: &C,
    origin: &Url,
) -> Result<DomainLinkageConfiguration, DomainLinkageError> {
    let url = configuration_url(origin)?;
    if url.scheme() != "https" {
        return Err(DomainLinkageError::InsecureOrigin(
            url.origin().ascii_serialization(),
        ));
    }
    let response = match http.get(&url).await {
        Ok(response) => response,
        Err(source) => return Err(DomainLinkageError::Http { url, source }),
    };
    match response.status {
        200..=299 => {}
        status @ (404 | 410) => return Err(DomainLinkageError::NotPublished { url, status }),
        status => return Err(DomainLinkageError::HttpStatus { url, status }),
    }
    serde_json::from_slice(&response.body)
        .map_err(|source| DomainLinkageError::InvalidConfiguration { url, source })
}

/// What became of one origin of a `LinkedDomains` service.
#[derive(Debug)]
#[non_exhaustive]
pub struct LinkedDomainReport {
    /// The id of the service.
    pub service: DidUrl,
    /// The origin, normalized; `None` when the service entry itself is invalid.
    pub origin: Option<Url>,
    /// The domain linkage credential of the DID at that origin, validated, or why there is
    /// none. [`DomainLinkageError::is_not_published`] tells an origin without a configuration
    /// apart.
    pub result: Result<DecodedCredential, DomainLinkageError>,
}

/// Fetches DID configuration resources with an [`HttpClient`] and validates them with a
/// [`DomainLinkageValidator`]: for an origin, for one DID at an origin, or for every origin a
/// DID document lists.
///
/// Origins come from callers and from DID documents, so the client fetches whatever a DID
/// controller names, and validating a whole configuration resolves every DID it names:
/// `http`, and the `did:web` client of the resolver, must enforce the protections
/// `ReqwestClient` (feature `reqwest`) does (HTTPS only, no redirects, no non-public
/// addresses after name resolution, a body limit and a timeout), or fetching becomes a
/// request forgery primitive. A DID document can also list any number of origins, so
/// [`validate_document`](Self::validate_document) fetches at most
/// [`max_origins`](Self::max_origins) of them.
#[derive(Debug)]
pub struct DomainLinkageClient<C, R, V = DefaultVerifier> {
    http: C,
    validator: DomainLinkageValidator<R, V>,
    max_origins: usize,
}

impl<C, R, V> DomainLinkageClient<C, R, V> {
    /// The most origins [`new`](Self::new) fetches for one DID document: 32.
    pub const DEFAULT_MAX_ORIGINS: usize = 32;
}

impl<C: HttpClient, R: KeyResolver, V: JwsVerifier> DomainLinkageClient<C, R, V> {
    /// A client fetching with `http` and validating with `validator`, fetching at most
    /// [`DEFAULT_MAX_ORIGINS`](Self::DEFAULT_MAX_ORIGINS) origins of a DID document.
    pub fn new(http: C, validator: DomainLinkageValidator<R, V>) -> Self {
        Self {
            http,
            validator,
            max_origins: Self::DEFAULT_MAX_ORIGINS,
        }
    }

    /// This client fetching at most `max_origins` origins of a DID document.
    #[must_use]
    pub fn with_max_origins(mut self, max_origins: usize) -> Self {
        self.max_origins = max_origins;
        self
    }

    /// The most origins [`validate_document`](Self::validate_document) fetches for one
    /// document.
    pub fn max_origins(&self) -> usize {
        self.max_origins
    }

    /// The HTTP client.
    pub fn http(&self) -> &C {
        &self.http
    }

    /// The validator.
    pub fn validator(&self) -> &DomainLinkageValidator<R, V> {
        &self.validator
    }

    /// The DID configuration resource of `origin`, unvalidated.
    ///
    /// # Errors
    ///
    /// As [`fetch_configuration`].
    pub async fn fetch_configuration(
        &self,
        origin: &Url,
    ) -> Result<DomainLinkageConfiguration, DomainLinkageError> {
        fetch_configuration(&self.http, origin).await
    }

    /// Fetches the configuration of `origin` and validates every JWT entry, as
    /// [`DomainLinkageValidator::validate_configuration`].
    ///
    /// # Errors
    ///
    /// As [`fetch_configuration`] and
    /// [`validate_configuration`](DomainLinkageValidator::validate_configuration).
    pub async fn validate_origin(
        &self,
        origin: &Url,
        options: &CredentialValidationOptions,
    ) -> Result<DomainLinkageReport, DomainLinkageError> {
        let configuration = self.fetch_configuration(origin).await?;
        self.validator
            .validate_configuration(&configuration, origin, options)
            .await
    }

    /// Fetches the configuration of `origin` and validates the credential linking `did`, as
    /// [`DomainLinkageValidator::validate_linkage`]. Only `did` is resolved.
    ///
    /// # Errors
    ///
    /// As [`fetch_configuration`] and
    /// [`validate_linkage`](DomainLinkageValidator::validate_linkage).
    pub async fn validate_linkage(
        &self,
        did: &Did,
        origin: &Url,
        options: &CredentialValidationOptions,
    ) -> Result<DecodedCredential, DomainLinkageError> {
        let configuration = self.fetch_configuration(origin).await?;
        self.validator
            .validate_linkage(&configuration, did, origin, options)
            .await
    }

    /// Validates the linkage of the DID of `document` to every origin of its `LinkedDomains`
    /// services: one report per origin in document order, and one for each invalid service
    /// entry. Origins past the first [`max_origins`](Self::max_origins) are not fetched and
    /// report [`DomainLinkageError::TooManyOrigins`].
    pub async fn validate_document(
        &self,
        document: &DidDocument,
        options: &CredentialValidationOptions,
    ) -> Vec<LinkedDomainReport> {
        let mut reports = Vec::new();
        let mut fetched = 0;
        for service in document
            .service
            .iter()
            .filter(|service| service.has_type(SERVICE_TYPE))
        {
            let linked = match linked_domains_service(service) {
                Ok(linked) => linked,
                Err(error) => {
                    reports.push(LinkedDomainReport {
                        service: service.id.clone(),
                        origin: None,
                        result: Err(error),
                    });
                    continue;
                }
            };
            for origin in linked.origins {
                let result = if fetched < self.max_origins {
                    fetched += 1;
                    self.validate_linkage(&document.id, &origin, options).await
                } else {
                    Err(DomainLinkageError::TooManyOrigins(self.max_origins))
                };
                reports.push(LinkedDomainReport {
                    service: service.id.clone(),
                    origin: Some(origin),
                    result,
                });
            }
        }
        reports
    }
}

impl<C: HttpClient, V: JwsVerifier> DomainLinkageClient<C, Resolver, V> {
    /// Resolves `did` with the validator's resolver, then validates its linkage to every
    /// origin its document lists, as [`validate_document`](Self::validate_document).
    ///
    /// # Errors
    ///
    /// [`DomainLinkageError::Resolution`] when `did` does not resolve to a document.
    pub async fn validate_did(
        &self,
        did: &Did,
        options: &CredentialValidationOptions,
    ) -> Result<Vec<LinkedDomainReport>, DomainLinkageError> {
        let document = self
            .validator
            .credential_validator()
            .resolver()
            .resolve_document(did)
            .await?;
        Ok(self.validate_document(&document, options).await)
    }
}

/// The issuer DID of `jwt`, read without verifying; `None` when it has none or it is not a
/// DID.
fn issuer_of(jwt: &Jwt) -> Option<Did> {
    crate::vc::validation::extract_issuer(jwt).ok()
}

/// The checks of the JSON Web Token proof format and of DID Configuration Resource
/// Verification that need no key.
fn check_format(
    decoded: &DecodedCredential,
    expected_origin: &str,
) -> Result<(), DomainLinkageError> {
    let header = &decoded.header;
    if let Some(typ) = &header.typ {
        return Err(DomainLinkageError::TypPresent(typ.clone()));
    }
    if header.kid.is_none() {
        return Err(ValidationError::KeyReference(KeyReferenceError::Missing).into());
    }
    for (name, present) in [
        ("cty", header.cty.is_some()),
        ("jwk", header.jwk.is_some()),
        ("crit", header.crit.is_some()),
    ] {
        if present {
            return Err(DomainLinkageError::UnexpectedHeaderParameter(
                name.to_owned(),
            ));
        }
    }
    if let Some(name) = header.additional.keys().next() {
        return Err(DomainLinkageError::UnexpectedHeaderParameter(name.clone()));
    }

    let claims = &decoded.claims;
    for (name, present) in [
        ("aud", claims.aud.is_some()),
        ("iat", claims.iat.is_some()),
        ("jti", claims.jti.is_some()),
    ] {
        if present {
            return Err(DomainLinkageError::UnexpectedClaim(name.to_owned()));
        }
    }
    if let Some(name) = claims.additional.keys().find(|name| *name != "vc") {
        return Err(DomainLinkageError::UnexpectedClaim(name.clone()));
    }
    let iss = claims
        .iss
        .as_deref()
        .ok_or(DomainLinkageError::MissingClaim("iss"))?;
    let sub = claims
        .sub
        .as_deref()
        .ok_or(DomainLinkageError::MissingClaim("sub"))?;
    if claims.nbf.is_none() {
        return Err(DomainLinkageError::MissingClaim("nbf"));
    }
    if claims.exp.is_none() {
        return Err(DomainLinkageError::MissingClaim("exp"));
    }

    let credential = &decoded.credential;
    if credential.id.is_some() {
        return Err(DomainLinkageError::IdPresent);
    }
    if !credential.context.contains(CONTEXT) {
        return Err(DomainLinkageError::MissingContext);
    }
    if !credential.has_type(CREDENTIAL_TYPE) {
        return Err(DomainLinkageError::MissingType);
    }
    if credential.expiration_date.is_none() {
        return Err(DomainLinkageError::MissingExpirationDate);
    }
    // A JWT with `sub` and several subjects does not decode as a credential, so one subject
    // is all that gets here.
    let subject = credential
        .subject()
        .ok_or(DomainLinkageError::SubjectNotDid(None))?;
    let subject_did = subject_did(subject)?;
    for (role, found) in [
        ("issuer", credential.issuer.id().as_str()),
        ("iss", iss),
        ("sub", sub),
    ] {
        if found != subject_did.as_str() {
            return Err(DomainLinkageError::SubjectMismatch {
                role,
                found: found.to_owned(),
                subject: subject_did,
            });
        }
    }
    let found = subject_origin(subject)?;
    if found != expected_origin {
        return Err(DomainLinkageError::OriginMismatch {
            expected: expected_origin.to_owned(),
            found,
        });
    }
    Ok(())
}

/// The DID `credentialSubject.id` names.
fn subject_did(subject: &Subject) -> Result<Did, DomainLinkageError> {
    let id = subject.id.as_ref().map(Uri::as_str);
    id.and_then(|id| Did::parse(id).ok())
        .ok_or_else(|| DomainLinkageError::SubjectNotDid(id.map(str::to_owned)))
}

/// `credentialSubject.origin`, normalized.
fn subject_origin(subject: &Subject) -> Result<String, DomainLinkageError> {
    let origin = subject.properties.get("origin");
    let Some(Value::String(origin)) = origin else {
        return Err(DomainLinkageError::InvalidOriginProperty(origin.cloned()));
    };
    normalize_origin(origin)
}

impl fmt::Display for DomainLinkageConfiguration {
    fn fmt(&self, f: &mut fmt::Formatter<'_>) -> fmt::Result {
        let json = serde_json::to_string(self).map_err(|_| fmt::Error)?;
        f.write_str(&json)
    }
}