Enable fetcher (#66)

* Enable fetcher, save original_json tx receipt

* Add missing migration

lib/starknet_explorer/application.ex

@@ -29,9 +29,7 @@ defmodule StarknetExplorer.Application do
       ] ++
         cache_child_specs ++
         if_prod do
-          # TODO: Uncomment when it's ready
-          # [StarknetExplorer.BlockFetcher]
-          []
+          [StarknetExplorer.BlockFetcher]
         else
           []
         end

lib/starknet_explorer/block.ex

@@ -84,8 +84,15 @@ defmodule StarknetExplorer.Block do
               |> Transaction.changeset(tx)
               |> Repo.insert!()
 
-            Ecto.build_assoc(tx, :receipt, receipts[tx.hash])
-            |> Receipt.changeset(receipts[tx.hash])
+            receipt = receipts[tx.hash]
+            receipt_binary = :erlang.term_to_binary(receipt)
+
+            receipt =
+              receipt
+              |> Map.put("original_json", receipt_binary)
+
+            Ecto.build_assoc(tx, :receipt, receipt)
+            |> Receipt.changeset(receipt)
             |> Repo.insert!()
           end)
       end)

lib/starknet_explorer/transaction_receipt.ex

@@ -92,14 +92,15 @@ defmodule StarknetExplorer.TransactionReceipt do
     field :messages_sent, {:array, :map}
     field :events, {:array, :map}
     field :contract_address
+    field :original_json, :binary, load_in_query: false
     timestamps()
   end
 
   def changeset(receipt, attrs) do
     receipt
     |> cast(
       attrs,
-      @fields
+      @fields ++ [:original_json]
     )
     |> validate_according_to_type(attrs)
 

priv/repo/migrations/20230727140747_transaction_receipts_original_json.exs

@@ -0,0 +1,9 @@
+defmodule StarknetExplorer.Repo.Migrations.TransactionReceiptsOriginalJson do
+  use Ecto.Migration
+
+  def change do
+    alter table("transaction_receipts") do
+      add :original_json, :binary
+    end
+  end
+end