@lucid-evolution/utils 0.1.75 → 0.1.76

package/dist/index.cjs

@@ -32,6 +32,7 @@ var index_exports = {};
 __export(index_exports, {
   CBOREncodingLevel: () => CBOREncodingLevel,
   PROTOCOL_PARAMETERS_DEFAULT: () => PROTOCOL_PARAMETERS_DEFAULT,
+  ScriptCache: () => ScriptCache,
   addAssets: () => addAssets,
   addressFromHexOrBech32: () => addressFromHexOrBech32,
   applyDoubleCborEncoding: () => applyDoubleCborEncoding,
@@ -66,6 +67,7 @@ __export(index_exports, {
   networkToId: () => networkToId,
   parseCMLNative: () => parseCMLNative,
   paymentCredentialOf: () => paymentCredentialOf,
+  scriptCborBytes: () => scriptCborBytes,
   scriptFromCMLNative: () => scriptFromCMLNative,
   scriptFromNative: () => scriptFromNative,
   scriptHashToCredential: () => scriptHashToCredential,
@@ -199,7 +201,107 @@ function networkToId(network) {
 // src/cbor.ts
 var import_core_utils = require("@lucid-evolution/core-utils");
 var import_cbor_x = require("cbor-x");
+
+// src/script-cache.ts
+var SHORT_SCRIPT_LENGTH = 1024;
+var SAMPLE_COUNT = 32;
+var SAMPLE_WIDTH = 16;
+var TAIL_WIDTH = 512;
+var MAX_CHAIN = 4;
+var fingerprint = (namespace, script) => {
+  const length = script.length;
+  if (length <= SHORT_SCRIPT_LENGTH) return namespace + ":" + script;
+  const stride = Math.floor((length - TAIL_WIDTH) / SAMPLE_COUNT);
+  let key = namespace + ":" + length + ":";
+  for (let offset = 0; offset < SAMPLE_COUNT; offset++) {
+    const start = offset * stride;
+    key += script.slice(start, start + SAMPLE_WIDTH);
+  }
+  return key + script.slice(length - TAIL_WIDTH);
+};
+var ScriptCache = class {
+  /**
+   * @param capacity maximum number of entries
+   * @param maxWeight maximum total weight, see `weigh`
+   * @param weigh approximate retained bytes of an entry besides its key
+   */
+  constructor(capacity, maxWeight, weigh = () => 0) {
+    this.capacity = capacity;
+    this.maxWeight = maxWeight;
+    this.weigh = weigh;
+  }
+  buckets = /* @__PURE__ */ new Map();
+  /** Insertion order, for first-in first-out eviction. */
+  order = /* @__PURE__ */ new Set();
+  totalWeight = 0;
+  get size() {
+    return this.order.size;
+  }
+  get(namespace, script) {
+    const bucket = this.buckets.get(fingerprint(namespace, script));
+    if (bucket === void 0) return void 0;
+    for (const entry of bucket) {
+      if (entry.script === script) return entry.value;
+    }
+    return void 0;
+  }
+  set(namespace, script, value) {
+    const weight = script.length + this.weigh(value);
+    if (weight > this.maxWeight) return;
+    const key = fingerprint(namespace, script);
+    const previous = this.buckets.get(key);
+    if (previous !== void 0) {
+      const existing = previous.find((entry2) => entry2.script === script);
+      if (existing !== void 0) this.remove(existing);
+      if (previous.length >= MAX_CHAIN) this.remove(previous[0]);
+    }
+    const entry = { key, script, value, weight };
+    const bucket = this.buckets.get(key);
+    if (bucket === void 0) this.buckets.set(key, [entry]);
+    else bucket.push(entry);
+    this.order.add(entry);
+    this.totalWeight += weight;
+    while (this.order.size > this.capacity || this.totalWeight > this.maxWeight) {
+      this.remove(this.order.values().next().value);
+    }
+  }
+  clear() {
+    this.buckets.clear();
+    this.order.clear();
+    this.totalWeight = 0;
+  }
+  remove(entry) {
+    const bucket = this.buckets.get(entry.key);
+    if (bucket !== void 0) {
+      const index = bucket.indexOf(entry);
+      if (index !== -1) bucket.splice(index, 1);
+      if (bucket.length === 0) this.buckets.delete(entry.key);
+    }
+    if (this.order.delete(entry)) this.totalWeight -= entry.weight;
+  }
+  /**
+   * Returns the cached value, or computes, stores and returns it. A `compute`
+   * that throws stores nothing.
+   */
+  getOrCompute(namespace, script, compute) {
+    const cached = this.get(namespace, script);
+    if (cached !== void 0) return cached;
+    const value = compute();
+    this.set(namespace, script, value);
+    return value;
+  }
+};
+
+// src/cbor.ts
 var applyDoubleCborEncoding = (script) => {
+  if (typeof script !== "string") return decodingDoubleCborEncoding(script);
+  const cached = doubleCborCache.get("", script);
+  if (cached !== void 0) return cached;
+  const encoded = doubleCborEncoding(script);
+  doubleCborCache.set("", script, encoded);
+  return encoded;
+};
+var decodingDoubleCborEncoding = (script) => {
   try {
     (0, import_cbor_x.decode)((0, import_cbor_x.decode)((0, import_core_utils.fromHex)(script)));
     return script;
@@ -212,6 +314,75 @@ var applyDoubleCborEncoding = (script) => {
     }
   }
 };
+var doubleCborEncoding = (script) => {
+  const layers = bytestringLayers(script);
+  switch (layers) {
+    case 2:
+      return script;
+    case 1:
+      return bytestringHeaderHex(script.length / 2) + script.toLowerCase();
+    case 0: {
+      const inner = bytestringHeaderHex(script.length / 2);
+      const innerLength = script.length / 2 + inner.length / 2;
+      return bytestringHeaderHex(innerLength) + inner + script.toLowerCase();
+    }
+    default:
+      return decodingDoubleCborEncoding(script);
+  }
+};
+var doubleCborCache = new ScriptCache(
+  4096,
+  64 * 1024 * 1024,
+  // Overcounts a script that is already double encoded, whose result is the
+  // key itself.
+  (encoded) => encoded.length
+);
+var NON_HEX = /[^0-9a-fA-F]/;
+var hexByte = (hex, index) => parseInt(hex.slice(index * 2, index * 2 + 2), 16);
+var itemHeader = (hex, offset, end) => {
+  if (offset >= end) return void 0;
+  const token = hexByte(hex, offset);
+  const major = token >> 5;
+  if (major > 2) return void 0;
+  const info = token & 31;
+  let argument;
+  let headerLength;
+  if (info < 24) {
+    argument = info;
+    headerLength = 1;
+  } else if (info <= 26) {
+    headerLength = 1 + (1 << info - 24);
+    if (offset + headerLength > end) return void 0;
+    argument = 0;
+    for (let index = offset + 1; index < offset + headerLength; index++) {
+      argument = argument * 256 + hexByte(hex, index);
+    }
+  } else {
+    return void 0;
+  }
+  const payload = major === 2 ? argument : 0;
+  return { major, span: headerLength + payload, headerLength };
+};
+var bytestringLayers = (script) => {
+  if (script.length === 0 || script.length % 2 !== 0) return void 0;
+  if (NON_HEX.test(script)) return void 0;
+  const length = script.length / 2;
+  const outer = itemHeader(script, 0, length);
+  if (outer === void 0) return void 0;
+  if (outer.span !== length) return 0;
+  if (outer.major !== 2) return 1;
+  if (outer.headerLength === length) return void 0;
+  const inner = itemHeader(script, outer.headerLength, length);
+  if (inner === void 0) return void 0;
+  return inner.span === length - outer.headerLength ? 2 : 1;
+};
+var bytestringHeaderHex = (length) => {
+  if (length < 24) return byteHex(64 + length);
+  if (length < 256) return "58" + byteHex(length);
+  if (length < 65536) return "59" + length.toString(16).padStart(4, "0");
+  return "5a" + length.toString(16).padStart(8, "0");
+};
+var byteHex = (byte) => byte.toString(16).padStart(2, "0");
 var applySingleCborEncoding = (script) => {
   try {
     (0, import_cbor_x.decode)((0, import_cbor_x.decode)((0, import_core_utils.fromHex)(script)));
@@ -314,77 +485,165 @@ function validatorToAddress(network, validator, stakeCredential) {
   });
 }
 function validatorToScriptHash(validator) {
-  return (0, import_core_utils2.withCMLScope)((own) => {
-    switch (validator.type) {
-      case "Native":
-        return own(
-          own(CML.NativeScript.from_cbor_hex(validator.script)).hash()
-        ).to_hex();
-      case "PlutusV1": {
-        const script = own(
-          CML.PlutusV1Script.from_cbor_hex(
-            applyDoubleCborEncoding(validator.script)
-          )
-        );
-        return own(own(CML.PlutusScript.from_v1(script)).hash()).to_hex();
-      }
-      case "PlutusV2": {
-        const script = own(
-          CML.PlutusV2Script.from_cbor_hex(
-            applyDoubleCborEncoding(validator.script)
-          )
-        );
-        return own(own(CML.PlutusScript.from_v2(script)).hash()).to_hex();
-      }
-      case "PlutusV3": {
-        const script = own(
-          CML.PlutusV3Script.from_cbor_hex(
-            applyDoubleCborEncoding(validator.script)
-          )
-        );
-        return own(own(CML.PlutusScript.from_v3(script)).hash()).to_hex();
-      }
-      default:
-        throw new Error("No variant matched");
-    }
-  });
+  const info = tryScriptInfo(validator);
+  return info === void 0 ? decodingValidatorToScriptHash(validator) : info.hash;
+}
+function scriptCborBytes(script) {
+  return scriptInfo(script).bytes.slice();
 }
 function toScriptRef(script) {
+  const info = tryScriptInfo(script);
+  if (info === void 0) return decodingToScriptRef(script);
+  const { bytes } = info;
   return (0, import_core_utils2.withCMLScope)((own) => {
     switch (script.type) {
       case "Native":
         return CML.Script.new_native(
-          own(CML.NativeScript.from_cbor_hex(script.script))
+          own(CML.NativeScript.from_cbor_bytes(bytes))
         );
       case "PlutusV1":
         return CML.Script.new_plutus_v1(
-          own(
-            CML.PlutusV1Script.from_cbor_hex(
-              applyDoubleCborEncoding(script.script)
-            )
-          )
+          own(CML.PlutusV1Script.from_cbor_bytes(bytes))
         );
       case "PlutusV2":
         return CML.Script.new_plutus_v2(
-          own(
-            CML.PlutusV2Script.from_cbor_hex(
-              applyDoubleCborEncoding(script.script)
-            )
-          )
+          own(CML.PlutusV2Script.from_cbor_bytes(bytes))
         );
       case "PlutusV3":
         return CML.Script.new_plutus_v3(
-          own(
-            CML.PlutusV3Script.from_cbor_hex(
-              applyDoubleCborEncoding(script.script)
-            )
-          )
+          own(CML.PlutusV3Script.from_cbor_bytes(bytes))
         );
       default:
         throw new Error("No variant matched.");
     }
   });
 }
+var scriptInfoCache = new ScriptCache(
+  4096,
+  64 * 1024 * 1024,
+  (info) => info.bytes.length + info.hash.length
+);
+var scriptInfo = (script) => scriptInfoCache.getOrCompute(
+  script.type,
+  script.script,
+  () => computeScriptInfo(script)
+);
+var tryScriptInfo = (script) => {
+  try {
+    if (typeof script.script !== "string") return void 0;
+    return scriptInfo(script);
+  } catch {
+    return void 0;
+  }
+};
+var computeScriptInfo = ({ type, script }) => (0, import_core_utils2.withCMLScope)((own) => {
+  switch (type) {
+    case "Native": {
+      const bytes = (0, import_core_utils2.fromHex)(script);
+      const hash = own(
+        own(CML.NativeScript.from_cbor_bytes(bytes)).hash()
+      ).to_hex();
+      return { hash, bytes };
+    }
+    case "PlutusV1": {
+      const bytes = (0, import_core_utils2.fromHex)(applyDoubleCborEncoding(script));
+      const plutus = own(
+        CML.PlutusScript.from_v1(
+          own(CML.PlutusV1Script.from_cbor_bytes(bytes))
+        )
+      );
+      return { hash: own(plutus.hash()).to_hex(), bytes };
+    }
+    case "PlutusV2": {
+      const bytes = (0, import_core_utils2.fromHex)(applyDoubleCborEncoding(script));
+      const plutus = own(
+        CML.PlutusScript.from_v2(
+          own(CML.PlutusV2Script.from_cbor_bytes(bytes))
+        )
+      );
+      return { hash: own(plutus.hash()).to_hex(), bytes };
+    }
+    case "PlutusV3": {
+      const bytes = (0, import_core_utils2.fromHex)(applyDoubleCborEncoding(script));
+      const plutus = own(
+        CML.PlutusScript.from_v3(
+          own(CML.PlutusV3Script.from_cbor_bytes(bytes))
+        )
+      );
+      return { hash: own(plutus.hash()).to_hex(), bytes };
+    }
+    default:
+      throw new Error("No variant matched");
+  }
+});
+var decodingValidatorToScriptHash = (validator) => (0, import_core_utils2.withCMLScope)((own) => {
+  switch (validator.type) {
+    case "Native":
+      return own(
+        own(CML.NativeScript.from_cbor_hex(validator.script)).hash()
+      ).to_hex();
+    case "PlutusV1": {
+      const script = own(
+        CML.PlutusV1Script.from_cbor_hex(
+          applyDoubleCborEncoding(validator.script)
+        )
+      );
+      return own(own(CML.PlutusScript.from_v1(script)).hash()).to_hex();
+    }
+    case "PlutusV2": {
+      const script = own(
+        CML.PlutusV2Script.from_cbor_hex(
+          applyDoubleCborEncoding(validator.script)
+        )
+      );
+      return own(own(CML.PlutusScript.from_v2(script)).hash()).to_hex();
+    }
+    case "PlutusV3": {
+      const script = own(
+        CML.PlutusV3Script.from_cbor_hex(
+          applyDoubleCborEncoding(validator.script)
+        )
+      );
+      return own(own(CML.PlutusScript.from_v3(script)).hash()).to_hex();
+    }
+    default:
+      throw new Error("No variant matched");
+  }
+});
+var decodingToScriptRef = (script) => (0, import_core_utils2.withCMLScope)((own) => {
+  switch (script.type) {
+    case "Native":
+      return CML.Script.new_native(
+        own(CML.NativeScript.from_cbor_hex(script.script))
+      );
+    case "PlutusV1":
+      return CML.Script.new_plutus_v1(
+        own(
+          CML.PlutusV1Script.from_cbor_hex(
+            applyDoubleCborEncoding(script.script)
+          )
+        )
+      );
+    case "PlutusV2":
+      return CML.Script.new_plutus_v2(
+        own(
+          CML.PlutusV2Script.from_cbor_hex(
+            applyDoubleCborEncoding(script.script)
+          )
+        )
+      );
+    case "PlutusV3":
+      return CML.Script.new_plutus_v3(
+        own(
+          CML.PlutusV3Script.from_cbor_hex(
+            applyDoubleCborEncoding(script.script)
+          )
+        )
+      );
+    default:
+      throw new Error("No variant matched.");
+  }
+});
 function fromScriptRef(scriptRef) {
   return (0, import_core_utils2.withCMLScope)((own) => {
     const kind = scriptRef.kind();
@@ -482,12 +741,24 @@ var addressDetails = (address) => ({
   bech32: address.to_bech32(void 0),
   hex: address.to_hex()
 });
-function getAddressDetails(address) {
+var HEX_PATTERN = /^[0-9a-fA-F]*$/;
+var parseShelleyAddress = (address) => {
+  if (HEX_PATTERN.test(address)) {
+    try {
+      return CML.Address.from_hex(address);
+    } catch (_e) {
+    }
+  }
   try {
-    return (0, import_core_utils3.withCMLScope)((own) => {
-      const parsedAddress = own(
-        CML.BaseAddress.from_address(own(addressFromHexOrBech32(address)))
-      );
+    return CML.Address.from_bech32(address);
+  } catch (_e) {
+    return void 0;
+  }
+};
+var shelleyAddressDetails = (address, own) => {
+  switch (address.kind()) {
+    case CML.AddressKind.Base: {
+      const parsedAddress = own(CML.BaseAddress.from_address(address));
       const paymentCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -506,16 +777,9 @@ function getAddressDetails(address) {
         paymentCredential,
         stakeCredential
       };
-    });
-  } catch (_e) {
-  }
-  try {
-    return (0, import_core_utils3.withCMLScope)((own) => {
-      const parsedAddress = own(
-        CML.EnterpriseAddress.from_address(
-          own(addressFromHexOrBech32(address))
-        )
-      );
+    }
+    case CML.AddressKind.Enterprise: {
+      const parsedAddress = own(CML.EnterpriseAddress.from_address(address));
       const paymentCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -529,14 +793,9 @@ function getAddressDetails(address) {
         address: details,
         paymentCredential
       };
-    });
-  } catch (_e) {
-  }
-  try {
-    return (0, import_core_utils3.withCMLScope)((own) => {
-      const parsedAddress = own(
-        CML.PointerAddress.from_address(own(addressFromHexOrBech32(address)))
-      );
+    }
+    case CML.AddressKind.Ptr: {
+      const parsedAddress = own(CML.PointerAddress.from_address(address));
       const paymentCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -550,14 +809,9 @@ function getAddressDetails(address) {
         address: details,
         paymentCredential
       };
-    });
-  } catch (_e) {
-  }
-  try {
-    return (0, import_core_utils3.withCMLScope)((own) => {
-      const parsedAddress = own(
-        CML.RewardAddress.from_address(own(addressFromHexOrBech32(address)))
-      );
+    }
+    case CML.AddressKind.Reward: {
+      const parsedAddress = own(CML.RewardAddress.from_address(address));
       const stakeCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -566,36 +820,83 @@ function getAddressDetails(address) {
         own(parsedAddress.to_address())
       );
       return { type: "Reward", networkId, address: details, stakeCredential };
+    }
+    default:
+      return void 0;
+  }
+};
+var byronAddressDetails = (address) => (0, import_core_utils3.withCMLScope)((own) => {
+  const parsedAddress = own(
+    ((address2) => {
+      if (HEX_PATTERN.test(address2)) {
+        try {
+          return CML.ByronAddress.from_cbor_hex(address2);
+        } catch (_e) {
+        }
+      }
+      try {
+        return CML.ByronAddress.from_base58(address2);
+      } catch (_e) {
+        return void 0;
+      }
+    })(address)
+  );
+  if (!parsedAddress) return void 0;
+  return {
+    type: "Byron",
+    networkId: own(parsedAddress.content()).network_id(),
+    address: {
+      bech32: "",
+      hex: own(parsedAddress.to_address()).to_hex()
+    }
+  };
+});
+var parseAddressDetails = (address) => {
+  try {
+    const details = (0, import_core_utils3.withCMLScope)((own) => {
+      const parsedAddress = own(parseShelleyAddress(address));
+      return parsedAddress && shelleyAddressDetails(parsedAddress, own);
     });
+    if (details) return details;
   } catch (_e) {
   }
   try {
-    return (0, import_core_utils3.withCMLScope)((own) => {
-      const parsedAddress = own(
-        ((address2) => {
-          try {
-            return CML.ByronAddress.from_cbor_hex(address2);
-          } catch (_e) {
-            try {
-              return CML.ByronAddress.from_base58(address2);
-            } catch (_e2) {
-              throw new Error("Could not deserialize address.");
-            }
-          }
-        })(address)
-      );
-      return {
-        type: "Byron",
-        networkId: own(parsedAddress.content()).network_id(),
-        address: {
-          bech32: "",
-          hex: own(parsedAddress.to_address()).to_hex()
-        }
-      };
-    });
+    const details = byronAddressDetails(address);
+    if (details) return details;
   } catch (_e) {
   }
   throw new Error("No address type matched for: " + address);
+};
+var ADDRESS_DETAILS_CACHE_CAPACITY = 1e4;
+var addressDetailsCache = /* @__PURE__ */ new Map();
+var copyCredential = (credential) => ({
+  type: credential.type,
+  hash: credential.hash
+});
+var copyAddressDetails = (details) => {
+  const copy = {
+    type: details.type,
+    networkId: details.networkId,
+    address: { bech32: details.address.bech32, hex: details.address.hex }
+  };
+  if (details.paymentCredential) {
+    copy.paymentCredential = copyCredential(details.paymentCredential);
+  }
+  if (details.stakeCredential) {
+    copy.stakeCredential = copyCredential(details.stakeCredential);
+  }
+  return copy;
+};
+function getAddressDetails(address) {
+  let details = addressDetailsCache.get(address);
+  if (!details) {
+    details = parseAddressDetails(address);
+    if (addressDetailsCache.size >= ADDRESS_DETAILS_CACHE_CAPACITY) {
+      addressDetailsCache.delete(addressDetailsCache.keys().next().value);
+    }
+    addressDetailsCache.set(address, details);
+  }
+  return copyAddressDetails(details);
 }
 
 // src/cost_model.ts
@@ -1745,6 +2046,7 @@ var fromCMLRedeemerTag = (tag) => {
 0 && (module.exports = {
   CBOREncodingLevel,
   PROTOCOL_PARAMETERS_DEFAULT,
+  ScriptCache,
   addAssets,
   addressFromHexOrBech32,
   applyDoubleCborEncoding,
@@ -1779,6 +2081,7 @@ var fromCMLRedeemerTag = (tag) => {
   networkToId,
   parseCMLNative,
   paymentCredentialOf,
+  scriptCborBytes,
   scriptFromCMLNative,
   scriptFromNative,
   scriptHashToCredential,

package/dist/index.d.cts

@@ -93,6 +93,12 @@ declare function networkToId(network: Network): number;
 
 declare function validatorToAddress(network: Network, validator: SpendingValidator, stakeCredential?: Credential): Address;
 declare function validatorToScriptHash(validator: Validator): ScriptHash;
+/**
+ * The script's CBOR as CML reads it: the double CBOR encoded script
+ * (`applyDoubleCborEncoding`) for Plutus scripts, the script itself for native
+ * scripts. Returns a fresh copy.
+ */
+declare function scriptCborBytes(script: Script): Uint8Array;
 declare function toScriptRef(script: Script): CML.Script;
 declare function fromScriptRef(scriptRef: CML.Script): Script;
 declare function mintingPolicyToId(mintingPolicy: MintingPolicy): PolicyId;
@@ -103,6 +109,49 @@ declare function mintingPolicyToId(mintingPolicy: MintingPolicy): PolicyId;
  */
 declare function applyParamsToScript<T extends unknown[] = Data[]>(plutusScript: string, params: Exact<[...T]>, type?: T): string;
 
+/**
+ * Bounded memo tables keyed by script text.
+ *
+ * Script hex strings are long (a typical Plutus validator is 10-40k hex
+ * characters). V8 hashes a string longer than 16383 characters by its length
+ * alone, so a `Map` keyed by the script text puts every script of the same
+ * length in one hash bucket and a lookup can compare tens of kilobytes per
+ * entry. Parameterized validators make that common: every instance has the
+ * same length and differs only near the end. The tables here hash a short
+ * fingerprint of the script instead and confirm a hit by comparing the full
+ * text, keeping at most `MAX_CHAIN` scripts per fingerprint.
+ *
+ * Store only immutable values: strings, or byte arrays that are never handed
+ * to callers (return copies). Never store CML objects. Eviction is first-in
+ * first-out.
+ */
+/** A bounded memo table keyed by a namespace (such as the script type) and script text. */
+declare class ScriptCache<V> {
+    private readonly capacity;
+    private readonly maxWeight;
+    private readonly weigh;
+    private readonly buckets;
+    /** Insertion order, for first-in first-out eviction. */
+    private readonly order;
+    private totalWeight;
+    /**
+     * @param capacity maximum number of entries
+     * @param maxWeight maximum total weight, see `weigh`
+     * @param weigh approximate retained bytes of an entry besides its key
+     */
+    constructor(capacity: number, maxWeight: number, weigh?: (value: V) => number);
+    get size(): number;
+    get(namespace: string, script: string): V | undefined;
+    set(namespace: string, script: string, value: V): void;
+    clear(): void;
+    private remove;
+    /**
+     * Returns the cached value, or computes, stores and returns it. A `compute`
+     * that throws stores nothing.
+     */
+    getOrCompute(namespace: string, script: string, compute: () => V): V;
+}
+
 /**
  * Converts unix time to slot based on the network. For "Custom" network
  * it is advisable use `unixTimeToSlot` method from `LucidEvolution`
@@ -205,4 +254,4 @@ declare const stringify: (data: any) => string;
 declare const toCMLRedeemerTag: (tag: string) => CML.RedeemerTag;
 declare const fromCMLRedeemerTag: (tag: CML.RedeemerTag) => RedeemerTag;
 
-export { CBOREncodingLevel, type CMLNative, PROTOCOL_PARAMETERS_DEFAULT, type SortOrder, addAssets, addressFromHexOrBech32, applyDoubleCborEncoding, applyParamsToScript, applySingleCborEncoding, assetsToValue, calculateMinLovelaceFromUTxO, coreToOutRef, coreToTxOutput, coreToUtxo, coresToOutRefs, coresToTxOutputs, coresToUtxos, createCostModels, credentialToAddress, credentialToRewardAddress, datumJsonToCbor, datumToHash, drepIDToCredential, fromCMLRedeemerTag, fromLabel, fromScriptRef, fromUnit, generatePrivateKey, generateSeedPhrase, getAddressDetails, getInputIndices, getUniqueTokenName, isEqualUTxO, keyHashToCredential, mintingPolicyToId, networkToId, parseCMLNative, paymentCredentialOf, scriptFromCMLNative, scriptFromNative, scriptHashToCredential, selectUTxOs, slotToUnixTime, sortCanonical, sortUTxOs, stakeCredentialOf, stringify, toCMLNativeScript, toCMLRedeemerTag, toLabel, toPublicKey, toScriptRef, toUnit, unixTimeToSlot, utxoToCore, utxoToTransactionInput, utxoToTransactionOutput, utxosToCores, validatorToAddress, validatorToRewardAddress, validatorToScriptHash, valueToAssets };
+export { CBOREncodingLevel, type CMLNative, PROTOCOL_PARAMETERS_DEFAULT, ScriptCache, type SortOrder, addAssets, addressFromHexOrBech32, applyDoubleCborEncoding, applyParamsToScript, applySingleCborEncoding, assetsToValue, calculateMinLovelaceFromUTxO, coreToOutRef, coreToTxOutput, coreToUtxo, coresToOutRefs, coresToTxOutputs, coresToUtxos, createCostModels, credentialToAddress, credentialToRewardAddress, datumJsonToCbor, datumToHash, drepIDToCredential, fromCMLRedeemerTag, fromLabel, fromScriptRef, fromUnit, generatePrivateKey, generateSeedPhrase, getAddressDetails, getInputIndices, getUniqueTokenName, isEqualUTxO, keyHashToCredential, mintingPolicyToId, networkToId, parseCMLNative, paymentCredentialOf, scriptCborBytes, scriptFromCMLNative, scriptFromNative, scriptHashToCredential, selectUTxOs, slotToUnixTime, sortCanonical, sortUTxOs, stakeCredentialOf, stringify, toCMLNativeScript, toCMLRedeemerTag, toLabel, toPublicKey, toScriptRef, toUnit, unixTimeToSlot, utxoToCore, utxoToTransactionInput, utxoToTransactionOutput, utxosToCores, validatorToAddress, validatorToRewardAddress, validatorToScriptHash, valueToAssets };

package/dist/index.d.ts

@@ -93,6 +93,12 @@ declare function networkToId(network: Network): number;
 
 declare function validatorToAddress(network: Network, validator: SpendingValidator, stakeCredential?: Credential): Address;
 declare function validatorToScriptHash(validator: Validator): ScriptHash;
+/**
+ * The script's CBOR as CML reads it: the double CBOR encoded script
+ * (`applyDoubleCborEncoding`) for Plutus scripts, the script itself for native
+ * scripts. Returns a fresh copy.
+ */
+declare function scriptCborBytes(script: Script): Uint8Array;
 declare function toScriptRef(script: Script): CML.Script;
 declare function fromScriptRef(scriptRef: CML.Script): Script;
 declare function mintingPolicyToId(mintingPolicy: MintingPolicy): PolicyId;
@@ -103,6 +109,49 @@ declare function mintingPolicyToId(mintingPolicy: MintingPolicy): PolicyId;
  */
 declare function applyParamsToScript<T extends unknown[] = Data[]>(plutusScript: string, params: Exact<[...T]>, type?: T): string;
 
+/**
+ * Bounded memo tables keyed by script text.
+ *
+ * Script hex strings are long (a typical Plutus validator is 10-40k hex
+ * characters). V8 hashes a string longer than 16383 characters by its length
+ * alone, so a `Map` keyed by the script text puts every script of the same
+ * length in one hash bucket and a lookup can compare tens of kilobytes per
+ * entry. Parameterized validators make that common: every instance has the
+ * same length and differs only near the end. The tables here hash a short
+ * fingerprint of the script instead and confirm a hit by comparing the full
+ * text, keeping at most `MAX_CHAIN` scripts per fingerprint.
+ *
+ * Store only immutable values: strings, or byte arrays that are never handed
+ * to callers (return copies). Never store CML objects. Eviction is first-in
+ * first-out.
+ */
+/** A bounded memo table keyed by a namespace (such as the script type) and script text. */
+declare class ScriptCache<V> {
+    private readonly capacity;
+    private readonly maxWeight;
+    private readonly weigh;
+    private readonly buckets;
+    /** Insertion order, for first-in first-out eviction. */
+    private readonly order;
+    private totalWeight;
+    /**
+     * @param capacity maximum number of entries
+     * @param maxWeight maximum total weight, see `weigh`
+     * @param weigh approximate retained bytes of an entry besides its key
+     */
+    constructor(capacity: number, maxWeight: number, weigh?: (value: V) => number);
+    get size(): number;
+    get(namespace: string, script: string): V | undefined;
+    set(namespace: string, script: string, value: V): void;
+    clear(): void;
+    private remove;
+    /**
+     * Returns the cached value, or computes, stores and returns it. A `compute`
+     * that throws stores nothing.
+     */
+    getOrCompute(namespace: string, script: string, compute: () => V): V;
+}
+
 /**
  * Converts unix time to slot based on the network. For "Custom" network
  * it is advisable use `unixTimeToSlot` method from `LucidEvolution`
@@ -205,4 +254,4 @@ declare const stringify: (data: any) => string;
 declare const toCMLRedeemerTag: (tag: string) => CML.RedeemerTag;
 declare const fromCMLRedeemerTag: (tag: CML.RedeemerTag) => RedeemerTag;
 
-export { CBOREncodingLevel, type CMLNative, PROTOCOL_PARAMETERS_DEFAULT, type SortOrder, addAssets, addressFromHexOrBech32, applyDoubleCborEncoding, applyParamsToScript, applySingleCborEncoding, assetsToValue, calculateMinLovelaceFromUTxO, coreToOutRef, coreToTxOutput, coreToUtxo, coresToOutRefs, coresToTxOutputs, coresToUtxos, createCostModels, credentialToAddress, credentialToRewardAddress, datumJsonToCbor, datumToHash, drepIDToCredential, fromCMLRedeemerTag, fromLabel, fromScriptRef, fromUnit, generatePrivateKey, generateSeedPhrase, getAddressDetails, getInputIndices, getUniqueTokenName, isEqualUTxO, keyHashToCredential, mintingPolicyToId, networkToId, parseCMLNative, paymentCredentialOf, scriptFromCMLNative, scriptFromNative, scriptHashToCredential, selectUTxOs, slotToUnixTime, sortCanonical, sortUTxOs, stakeCredentialOf, stringify, toCMLNativeScript, toCMLRedeemerTag, toLabel, toPublicKey, toScriptRef, toUnit, unixTimeToSlot, utxoToCore, utxoToTransactionInput, utxoToTransactionOutput, utxosToCores, validatorToAddress, validatorToRewardAddress, validatorToScriptHash, valueToAssets };
+export { CBOREncodingLevel, type CMLNative, PROTOCOL_PARAMETERS_DEFAULT, ScriptCache, type SortOrder, addAssets, addressFromHexOrBech32, applyDoubleCborEncoding, applyParamsToScript, applySingleCborEncoding, assetsToValue, calculateMinLovelaceFromUTxO, coreToOutRef, coreToTxOutput, coreToUtxo, coresToOutRefs, coresToTxOutputs, coresToUtxos, createCostModels, credentialToAddress, credentialToRewardAddress, datumJsonToCbor, datumToHash, drepIDToCredential, fromCMLRedeemerTag, fromLabel, fromScriptRef, fromUnit, generatePrivateKey, generateSeedPhrase, getAddressDetails, getInputIndices, getUniqueTokenName, isEqualUTxO, keyHashToCredential, mintingPolicyToId, networkToId, parseCMLNative, paymentCredentialOf, scriptCborBytes, scriptFromCMLNative, scriptFromNative, scriptHashToCredential, selectUTxOs, slotToUnixTime, sortCanonical, sortUTxOs, stakeCredentialOf, stringify, toCMLNativeScript, toCMLRedeemerTag, toLabel, toPublicKey, toScriptRef, toUnit, unixTimeToSlot, utxoToCore, utxoToTransactionInput, utxoToTransactionOutput, utxosToCores, validatorToAddress, validatorToRewardAddress, validatorToScriptHash, valueToAssets };

package/dist/index.js

@@ -104,7 +104,107 @@ function networkToId(network) {
 // src/cbor.ts
 import { fromHex, toHex } from "@lucid-evolution/core-utils";
 import { decode, encode } from "cbor-x";
+
+// src/script-cache.ts
+var SHORT_SCRIPT_LENGTH = 1024;
+var SAMPLE_COUNT = 32;
+var SAMPLE_WIDTH = 16;
+var TAIL_WIDTH = 512;
+var MAX_CHAIN = 4;
+var fingerprint = (namespace, script) => {
+  const length = script.length;
+  if (length <= SHORT_SCRIPT_LENGTH) return namespace + ":" + script;
+  const stride = Math.floor((length - TAIL_WIDTH) / SAMPLE_COUNT);
+  let key = namespace + ":" + length + ":";
+  for (let offset = 0; offset < SAMPLE_COUNT; offset++) {
+    const start = offset * stride;
+    key += script.slice(start, start + SAMPLE_WIDTH);
+  }
+  return key + script.slice(length - TAIL_WIDTH);
+};
+var ScriptCache = class {
+  /**
+   * @param capacity maximum number of entries
+   * @param maxWeight maximum total weight, see `weigh`
+   * @param weigh approximate retained bytes of an entry besides its key
+   */
+  constructor(capacity, maxWeight, weigh = () => 0) {
+    this.capacity = capacity;
+    this.maxWeight = maxWeight;
+    this.weigh = weigh;
+  }
+  buckets = /* @__PURE__ */ new Map();
+  /** Insertion order, for first-in first-out eviction. */
+  order = /* @__PURE__ */ new Set();
+  totalWeight = 0;
+  get size() {
+    return this.order.size;
+  }
+  get(namespace, script) {
+    const bucket = this.buckets.get(fingerprint(namespace, script));
+    if (bucket === void 0) return void 0;
+    for (const entry of bucket) {
+      if (entry.script === script) return entry.value;
+    }
+    return void 0;
+  }
+  set(namespace, script, value) {
+    const weight = script.length + this.weigh(value);
+    if (weight > this.maxWeight) return;
+    const key = fingerprint(namespace, script);
+    const previous = this.buckets.get(key);
+    if (previous !== void 0) {
+      const existing = previous.find((entry2) => entry2.script === script);
+      if (existing !== void 0) this.remove(existing);
+      if (previous.length >= MAX_CHAIN) this.remove(previous[0]);
+    }
+    const entry = { key, script, value, weight };
+    const bucket = this.buckets.get(key);
+    if (bucket === void 0) this.buckets.set(key, [entry]);
+    else bucket.push(entry);
+    this.order.add(entry);
+    this.totalWeight += weight;
+    while (this.order.size > this.capacity || this.totalWeight > this.maxWeight) {
+      this.remove(this.order.values().next().value);
+    }
+  }
+  clear() {
+    this.buckets.clear();
+    this.order.clear();
+    this.totalWeight = 0;
+  }
+  remove(entry) {
+    const bucket = this.buckets.get(entry.key);
+    if (bucket !== void 0) {
+      const index = bucket.indexOf(entry);
+      if (index !== -1) bucket.splice(index, 1);
+      if (bucket.length === 0) this.buckets.delete(entry.key);
+    }
+    if (this.order.delete(entry)) this.totalWeight -= entry.weight;
+  }
+  /**
+   * Returns the cached value, or computes, stores and returns it. A `compute`
+   * that throws stores nothing.
+   */
+  getOrCompute(namespace, script, compute) {
+    const cached = this.get(namespace, script);
+    if (cached !== void 0) return cached;
+    const value = compute();
+    this.set(namespace, script, value);
+    return value;
+  }
+};
+
+// src/cbor.ts
 var applyDoubleCborEncoding = (script) => {
+  if (typeof script !== "string") return decodingDoubleCborEncoding(script);
+  const cached = doubleCborCache.get("", script);
+  if (cached !== void 0) return cached;
+  const encoded = doubleCborEncoding(script);
+  doubleCborCache.set("", script, encoded);
+  return encoded;
+};
+var decodingDoubleCborEncoding = (script) => {
   try {
     decode(decode(fromHex(script)));
     return script;
@@ -117,6 +217,75 @@ var applyDoubleCborEncoding = (script) => {
     }
   }
 };
+var doubleCborEncoding = (script) => {
+  const layers = bytestringLayers(script);
+  switch (layers) {
+    case 2:
+      return script;
+    case 1:
+      return bytestringHeaderHex(script.length / 2) + script.toLowerCase();
+    case 0: {
+      const inner = bytestringHeaderHex(script.length / 2);
+      const innerLength = script.length / 2 + inner.length / 2;
+      return bytestringHeaderHex(innerLength) + inner + script.toLowerCase();
+    }
+    default:
+      return decodingDoubleCborEncoding(script);
+  }
+};
+var doubleCborCache = new ScriptCache(
+  4096,
+  64 * 1024 * 1024,
+  // Overcounts a script that is already double encoded, whose result is the
+  // key itself.
+  (encoded) => encoded.length
+);
+var NON_HEX = /[^0-9a-fA-F]/;
+var hexByte = (hex, index) => parseInt(hex.slice(index * 2, index * 2 + 2), 16);
+var itemHeader = (hex, offset, end) => {
+  if (offset >= end) return void 0;
+  const token = hexByte(hex, offset);
+  const major = token >> 5;
+  if (major > 2) return void 0;
+  const info = token & 31;
+  let argument;
+  let headerLength;
+  if (info < 24) {
+    argument = info;
+    headerLength = 1;
+  } else if (info <= 26) {
+    headerLength = 1 + (1 << info - 24);
+    if (offset + headerLength > end) return void 0;
+    argument = 0;
+    for (let index = offset + 1; index < offset + headerLength; index++) {
+      argument = argument * 256 + hexByte(hex, index);
+    }
+  } else {
+    return void 0;
+  }
+  const payload = major === 2 ? argument : 0;
+  return { major, span: headerLength + payload, headerLength };
+};
+var bytestringLayers = (script) => {
+  if (script.length === 0 || script.length % 2 !== 0) return void 0;
+  if (NON_HEX.test(script)) return void 0;
+  const length = script.length / 2;
+  const outer = itemHeader(script, 0, length);
+  if (outer === void 0) return void 0;
+  if (outer.span !== length) return 0;
+  if (outer.major !== 2) return 1;
+  if (outer.headerLength === length) return void 0;
+  const inner = itemHeader(script, outer.headerLength, length);
+  if (inner === void 0) return void 0;
+  return inner.span === length - outer.headerLength ? 2 : 1;
+};
+var bytestringHeaderHex = (length) => {
+  if (length < 24) return byteHex(64 + length);
+  if (length < 256) return "58" + byteHex(length);
+  if (length < 65536) return "59" + length.toString(16).padStart(4, "0");
+  return "5a" + length.toString(16).padStart(8, "0");
+};
+var byteHex = (byte) => byte.toString(16).padStart(2, "0");
 var applySingleCborEncoding = (script) => {
   try {
     decode(decode(fromHex(script)));
@@ -225,77 +394,165 @@ function validatorToAddress(network, validator, stakeCredential) {
   });
 }
 function validatorToScriptHash(validator) {
-  return withCMLScope((own) => {
-    switch (validator.type) {
-      case "Native":
-        return own(
-          own(CML.NativeScript.from_cbor_hex(validator.script)).hash()
-        ).to_hex();
-      case "PlutusV1": {
-        const script = own(
-          CML.PlutusV1Script.from_cbor_hex(
-            applyDoubleCborEncoding(validator.script)
-          )
-        );
-        return own(own(CML.PlutusScript.from_v1(script)).hash()).to_hex();
-      }
-      case "PlutusV2": {
-        const script = own(
-          CML.PlutusV2Script.from_cbor_hex(
-            applyDoubleCborEncoding(validator.script)
-          )
-        );
-        return own(own(CML.PlutusScript.from_v2(script)).hash()).to_hex();
-      }
-      case "PlutusV3": {
-        const script = own(
-          CML.PlutusV3Script.from_cbor_hex(
-            applyDoubleCborEncoding(validator.script)
-          )
-        );
-        return own(own(CML.PlutusScript.from_v3(script)).hash()).to_hex();
-      }
-      default:
-        throw new Error("No variant matched");
-    }
-  });
+  const info = tryScriptInfo(validator);
+  return info === void 0 ? decodingValidatorToScriptHash(validator) : info.hash;
+}
+function scriptCborBytes(script) {
+  return scriptInfo(script).bytes.slice();
 }
 function toScriptRef(script) {
+  const info = tryScriptInfo(script);
+  if (info === void 0) return decodingToScriptRef(script);
+  const { bytes } = info;
   return withCMLScope((own) => {
     switch (script.type) {
       case "Native":
         return CML.Script.new_native(
-          own(CML.NativeScript.from_cbor_hex(script.script))
+          own(CML.NativeScript.from_cbor_bytes(bytes))
         );
       case "PlutusV1":
         return CML.Script.new_plutus_v1(
-          own(
-            CML.PlutusV1Script.from_cbor_hex(
-              applyDoubleCborEncoding(script.script)
-            )
-          )
+          own(CML.PlutusV1Script.from_cbor_bytes(bytes))
         );
       case "PlutusV2":
         return CML.Script.new_plutus_v2(
-          own(
-            CML.PlutusV2Script.from_cbor_hex(
-              applyDoubleCborEncoding(script.script)
-            )
-          )
+          own(CML.PlutusV2Script.from_cbor_bytes(bytes))
         );
       case "PlutusV3":
         return CML.Script.new_plutus_v3(
-          own(
-            CML.PlutusV3Script.from_cbor_hex(
-              applyDoubleCborEncoding(script.script)
-            )
-          )
+          own(CML.PlutusV3Script.from_cbor_bytes(bytes))
         );
       default:
         throw new Error("No variant matched.");
     }
   });
 }
+var scriptInfoCache = new ScriptCache(
+  4096,
+  64 * 1024 * 1024,
+  (info) => info.bytes.length + info.hash.length
+);
+var scriptInfo = (script) => scriptInfoCache.getOrCompute(
+  script.type,
+  script.script,
+  () => computeScriptInfo(script)
+);
+var tryScriptInfo = (script) => {
+  try {
+    if (typeof script.script !== "string") return void 0;
+    return scriptInfo(script);
+  } catch {
+    return void 0;
+  }
+};
+var computeScriptInfo = ({ type, script }) => withCMLScope((own) => {
+  switch (type) {
+    case "Native": {
+      const bytes = fromHex2(script);
+      const hash = own(
+        own(CML.NativeScript.from_cbor_bytes(bytes)).hash()
+      ).to_hex();
+      return { hash, bytes };
+    }
+    case "PlutusV1": {
+      const bytes = fromHex2(applyDoubleCborEncoding(script));
+      const plutus = own(
+        CML.PlutusScript.from_v1(
+          own(CML.PlutusV1Script.from_cbor_bytes(bytes))
+        )
+      );
+      return { hash: own(plutus.hash()).to_hex(), bytes };
+    }
+    case "PlutusV2": {
+      const bytes = fromHex2(applyDoubleCborEncoding(script));
+      const plutus = own(
+        CML.PlutusScript.from_v2(
+          own(CML.PlutusV2Script.from_cbor_bytes(bytes))
+        )
+      );
+      return { hash: own(plutus.hash()).to_hex(), bytes };
+    }
+    case "PlutusV3": {
+      const bytes = fromHex2(applyDoubleCborEncoding(script));
+      const plutus = own(
+        CML.PlutusScript.from_v3(
+          own(CML.PlutusV3Script.from_cbor_bytes(bytes))
+        )
+      );
+      return { hash: own(plutus.hash()).to_hex(), bytes };
+    }
+    default:
+      throw new Error("No variant matched");
+  }
+});
+var decodingValidatorToScriptHash = (validator) => withCMLScope((own) => {
+  switch (validator.type) {
+    case "Native":
+      return own(
+        own(CML.NativeScript.from_cbor_hex(validator.script)).hash()
+      ).to_hex();
+    case "PlutusV1": {
+      const script = own(
+        CML.PlutusV1Script.from_cbor_hex(
+          applyDoubleCborEncoding(validator.script)
+        )
+      );
+      return own(own(CML.PlutusScript.from_v1(script)).hash()).to_hex();
+    }
+    case "PlutusV2": {
+      const script = own(
+        CML.PlutusV2Script.from_cbor_hex(
+          applyDoubleCborEncoding(validator.script)
+        )
+      );
+      return own(own(CML.PlutusScript.from_v2(script)).hash()).to_hex();
+    }
+    case "PlutusV3": {
+      const script = own(
+        CML.PlutusV3Script.from_cbor_hex(
+          applyDoubleCborEncoding(validator.script)
+        )
+      );
+      return own(own(CML.PlutusScript.from_v3(script)).hash()).to_hex();
+    }
+    default:
+      throw new Error("No variant matched");
+  }
+});
+var decodingToScriptRef = (script) => withCMLScope((own) => {
+  switch (script.type) {
+    case "Native":
+      return CML.Script.new_native(
+        own(CML.NativeScript.from_cbor_hex(script.script))
+      );
+    case "PlutusV1":
+      return CML.Script.new_plutus_v1(
+        own(
+          CML.PlutusV1Script.from_cbor_hex(
+            applyDoubleCborEncoding(script.script)
+          )
+        )
+      );
+    case "PlutusV2":
+      return CML.Script.new_plutus_v2(
+        own(
+          CML.PlutusV2Script.from_cbor_hex(
+            applyDoubleCborEncoding(script.script)
+          )
+        )
+      );
+    case "PlutusV3":
+      return CML.Script.new_plutus_v3(
+        own(
+          CML.PlutusV3Script.from_cbor_hex(
+            applyDoubleCborEncoding(script.script)
+          )
+        )
+      );
+    default:
+      throw new Error("No variant matched.");
+  }
+});
 function fromScriptRef(scriptRef) {
   return withCMLScope((own) => {
     const kind = scriptRef.kind();
@@ -393,12 +650,24 @@ var addressDetails = (address) => ({
   bech32: address.to_bech32(void 0),
   hex: address.to_hex()
 });
-function getAddressDetails(address) {
+var HEX_PATTERN = /^[0-9a-fA-F]*$/;
+var parseShelleyAddress = (address) => {
+  if (HEX_PATTERN.test(address)) {
+    try {
+      return CML.Address.from_hex(address);
+    } catch (_e) {
+    }
+  }
   try {
-    return withCMLScope2((own) => {
-      const parsedAddress = own(
-        CML.BaseAddress.from_address(own(addressFromHexOrBech32(address)))
-      );
+    return CML.Address.from_bech32(address);
+  } catch (_e) {
+    return void 0;
+  }
+};
+var shelleyAddressDetails = (address, own) => {
+  switch (address.kind()) {
+    case CML.AddressKind.Base: {
+      const parsedAddress = own(CML.BaseAddress.from_address(address));
       const paymentCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -417,16 +686,9 @@ function getAddressDetails(address) {
         paymentCredential,
         stakeCredential
       };
-    });
-  } catch (_e) {
-  }
-  try {
-    return withCMLScope2((own) => {
-      const parsedAddress = own(
-        CML.EnterpriseAddress.from_address(
-          own(addressFromHexOrBech32(address))
-        )
-      );
+    }
+    case CML.AddressKind.Enterprise: {
+      const parsedAddress = own(CML.EnterpriseAddress.from_address(address));
       const paymentCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -440,14 +702,9 @@ function getAddressDetails(address) {
         address: details,
         paymentCredential
       };
-    });
-  } catch (_e) {
-  }
-  try {
-    return withCMLScope2((own) => {
-      const parsedAddress = own(
-        CML.PointerAddress.from_address(own(addressFromHexOrBech32(address)))
-      );
+    }
+    case CML.AddressKind.Ptr: {
+      const parsedAddress = own(CML.PointerAddress.from_address(address));
       const paymentCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -461,14 +718,9 @@ function getAddressDetails(address) {
         address: details,
         paymentCredential
       };
-    });
-  } catch (_e) {
-  }
-  try {
-    return withCMLScope2((own) => {
-      const parsedAddress = own(
-        CML.RewardAddress.from_address(own(addressFromHexOrBech32(address)))
-      );
+    }
+    case CML.AddressKind.Reward: {
+      const parsedAddress = own(CML.RewardAddress.from_address(address));
       const stakeCredential = credentialDetails(
         own(parsedAddress.payment()),
         own
@@ -477,36 +729,83 @@ function getAddressDetails(address) {
         own(parsedAddress.to_address())
       );
       return { type: "Reward", networkId, address: details, stakeCredential };
+    }
+    default:
+      return void 0;
+  }
+};
+var byronAddressDetails = (address) => withCMLScope2((own) => {
+  const parsedAddress = own(
+    ((address2) => {
+      if (HEX_PATTERN.test(address2)) {
+        try {
+          return CML.ByronAddress.from_cbor_hex(address2);
+        } catch (_e) {
+        }
+      }
+      try {
+        return CML.ByronAddress.from_base58(address2);
+      } catch (_e) {
+        return void 0;
+      }
+    })(address)
+  );
+  if (!parsedAddress) return void 0;
+  return {
+    type: "Byron",
+    networkId: own(parsedAddress.content()).network_id(),
+    address: {
+      bech32: "",
+      hex: own(parsedAddress.to_address()).to_hex()
+    }
+  };
+});
+var parseAddressDetails = (address) => {
+  try {
+    const details = withCMLScope2((own) => {
+      const parsedAddress = own(parseShelleyAddress(address));
+      return parsedAddress && shelleyAddressDetails(parsedAddress, own);
     });
+    if (details) return details;
   } catch (_e) {
   }
   try {
-    return withCMLScope2((own) => {
-      const parsedAddress = own(
-        ((address2) => {
-          try {
-            return CML.ByronAddress.from_cbor_hex(address2);
-          } catch (_e) {
-            try {
-              return CML.ByronAddress.from_base58(address2);
-            } catch (_e2) {
-              throw new Error("Could not deserialize address.");
-            }
-          }
-        })(address)
-      );
-      return {
-        type: "Byron",
-        networkId: own(parsedAddress.content()).network_id(),
-        address: {
-          bech32: "",
-          hex: own(parsedAddress.to_address()).to_hex()
-        }
-      };
-    });
+    const details = byronAddressDetails(address);
+    if (details) return details;
   } catch (_e) {
   }
   throw new Error("No address type matched for: " + address);
+};
+var ADDRESS_DETAILS_CACHE_CAPACITY = 1e4;
+var addressDetailsCache = /* @__PURE__ */ new Map();
+var copyCredential = (credential) => ({
+  type: credential.type,
+  hash: credential.hash
+});
+var copyAddressDetails = (details) => {
+  const copy = {
+    type: details.type,
+    networkId: details.networkId,
+    address: { bech32: details.address.bech32, hex: details.address.hex }
+  };
+  if (details.paymentCredential) {
+    copy.paymentCredential = copyCredential(details.paymentCredential);
+  }
+  if (details.stakeCredential) {
+    copy.stakeCredential = copyCredential(details.stakeCredential);
+  }
+  return copy;
+};
+function getAddressDetails(address) {
+  let details = addressDetailsCache.get(address);
+  if (!details) {
+    details = parseAddressDetails(address);
+    if (addressDetailsCache.size >= ADDRESS_DETAILS_CACHE_CAPACITY) {
+      addressDetailsCache.delete(addressDetailsCache.keys().next().value);
+    }
+    addressDetailsCache.set(address, details);
+  }
+  return copyAddressDetails(details);
 }
 
 // src/cost_model.ts
@@ -1663,6 +1962,7 @@ var fromCMLRedeemerTag = (tag) => {
 export {
   CBOREncodingLevel,
   PROTOCOL_PARAMETERS_DEFAULT,
+  ScriptCache,
   addAssets,
   addressFromHexOrBech32,
   applyDoubleCborEncoding,
@@ -1697,6 +1997,7 @@ export {
   networkToId,
   parseCMLNative,
   paymentCredentialOf,
+  scriptCborBytes,
   scriptFromCMLNative,
   scriptFromNative,
   scriptHashToCredential,

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@lucid-evolution/utils",
-  "version": "0.1.75",
+  "version": "0.1.76",
   "description": "",
   "main": "./dist/index.js",
   "types": "./dist/index.d.ts",
@@ -35,11 +35,11 @@
     "bip39": "^3.1.0",
     "cbor-x": "^1.6.0",
     "effect": "^3.10.4",
-    "@lucid-evolution/core-types": "0.3.0",
+    "@lucid-evolution/core-types": "0.4.0",
     "@lucid-evolution/core-utils": "0.1.17",
     "@lucid-evolution/crc8": "0.1.8",
-    "@lucid-evolution/plutus": "0.1.36",
-    "@lucid-evolution/uplc": "0.2.24"
+    "@lucid-evolution/plutus": "0.1.37",
+    "@lucid-evolution/uplc": "0.3.0"
   },
   "devDependencies": {
     "@types/node": "^20.12.8",