Packages

bitcoinlib

0.2.0-pre2
0.4.7 0.4.6 0.4.5 0.4.4 0.4.3 0.4.2 0.4.1 0.4.0 0.3.5 0.3.4 0.3.3 0.3.2 0.3.1 0.3.0 0.2.10 0.2.9 0.2.8 0.2.7 0.2.6 0.2.5 0.2.4 0.2.3 0.2.2 0.2.0 0.2.0-pre4 0.2.0-pre3 0.2.0-pre2 0.2.0-pre1 0.1.3 0.1.2 0.1.1 0.1.0

Generate private/public keys and addresses for the bitcoin network

HexDocs

Current section

Files

Jump to
Readme
32 Versions
5 Dependencies
Dependants
Files
Activity
bitcoinlib lib signing psbt generic_properties redeem_script.ex
Raw

lib/signing/psbt/generic_properties/redeem_script.ex 

defmodule BitcoinLib.Signing.Psbt.GenericProperties.RedeemScript do

  defstruct [:script]



  alias BitcoinLib.Signing.Psbt.GenericProperties.RedeemScript

  alias BitcoinLib.Signing.Psbt.Keypair.{Key}

  alias BitcoinLib.Script



  def parse(keypair) do

    %{keypair: keypair, redeem_script: %RedeemScript{}}

    |> validate_keypair()

    |> extract_redeem_script()

  end



  defp validate_keypair(%{keypair: keypair, redeem_script: redeem_script} = map) do

    case keypair.key do

      %Key{data: <<>>} ->

        map



      _ ->

        %{map | redeem_script: Map.put(redeem_script, :error, "invalid redeemscript typed key")}

    end

  end



  defp extract_redeem_script(%{redeem_script: %{error: _message} = redeem_script}),

    do: redeem_script



  defp extract_redeem_script(%{keypair: keypair}) do

    script =

      keypair.value.data

      |> Script.parse()



    %RedeemScript{script: script}

  end

end