Move DRep reg certificate anchor types from cardano-cli to cardano-api

cardano-api/cardano-api.cabal

@@ -48,6 +48,7 @@ library internal
   -- to expose new functionality is via Cardano.Api or
   -- Cardano.Api.Shelley
   exposed-modules:      Cardano.Api.Address
+                        Cardano.Api.Anchor
                         Cardano.Api.Block
                         Cardano.Api.Certificate
                         Cardano.Api.Convenience.Construction

cardano-api/internal/Cardano/Api/Anchor.hs

@@ -0,0 +1,19 @@
+module Cardano.Api.Anchor (
+    AnchorUrl(..),
+    AnchorDataHash(..)
+  ) where
+
+import qualified Cardano.Ledger.BaseTypes as L
+import qualified Cardano.Ledger.Crypto as Crypto
+import qualified Cardano.Ledger.SafeHash as L
+
+
+-- | The URL to build the anchor to pass to DRep registration certificate
+newtype AnchorUrl = AnchorUrl
+  { unAnchorUrl :: L.Url
+  } deriving (Eq, Show)
+
+-- | The hash to build the anchor to pass to DRep registration certificate
+newtype AnchorDataHash = AnchorDataHash
+  { unAnchorDataHash :: L.SafeHash Crypto.StandardCrypto L.AnchorData
+  } deriving (Eq, Show)

cardano-api/src/Cardano/Api.hs

@@ -999,6 +999,8 @@ module Cardano.Api (
     validateAndHashDRepMetadata,
 
     -- ** Governance related certificates
+    AnchorDataHash(..),
+    AnchorUrl(..),
     CommitteeColdkeyResignationRequirements(..),
     CommitteeHotKeyAuthorizationRequirements(..),
     DRepRegistrationRequirements(..),
@@ -1012,6 +1014,7 @@ module Cardano.Api (
   ) where
 
 import           Cardano.Api.Address
+import           Cardano.Api.Anchor
 import           Cardano.Api.Block
 import           Cardano.Api.Certificate
 import           Cardano.Api.Convenience.Construction