stackspot-audited-contracts

(use-trait stackspot-trait .stackspot-trait.stackspot-trait)

(define-map audited-contracts principal bool)

(define-constant ERR_ADMIN_ONLY (err u1102))

(define-constant platform-admin tx-sender)

(define-public (update-audited-contract (contract <stackspot-trait>) (is-audited bool))
    (begin
        (asserts! (contract-call? .stackspot-admin is-admin) ERR_ADMIN_ONLY)
        (ok (map-set audited-contracts (contract-of contract) is-audited))
    )
)

(define-public (remove-audited-contract (contract <stackspot-trait>))
    (begin
        (asserts! (contract-call? .stackspot-admin is-admin) ERR_ADMIN_ONLY)
        (ok (map-delete audited-contracts (contract-of contract)))
    )
)

(define-read-only (is-audited-contract (contract <stackspot-trait>))
    (ok (default-to false (map-get? audited-contracts (contract-of contract))))
)