docker-finance | modern accounting for the power-user

Dedicated to Michael Morgan: a beautiful, beautiful soul.

---

Internal signing keys:

  Aaron Fiore (sole author)

    - 518A22F85BEFD32BCC99C48603F90C4F35E0213E
    - 31ECA5C347A0CC0815EDE730A3EACCFCDA7E685E
    - C8187C585CB07A4DA81CC0F37318B50EBE9C0DA8

Internal repositories (rebased from):

  Staging:

    $ git log -n1 --pretty=format:"%H"
    c8e0cd66f6c89fa7b3c62f72fb524a4cc454b7b6

    $ git rev-list --max-parents=0 HEAD
    ac3863b8c234755855f1aea3a07a853122decdf2

  Private:

    $ git log -n1 --pretty=format:"%H"
    69bb3591eaa2990a9637832bb484690e00c4f926

    $ git rev-list --max-parents=0 HEAD
    a5c1cc9fb593c4cf09bc0adfef6cb6d2964511ae

container/src/hledger-flow/accounts/blockchain-explorers/ethereum-based/ethereum-based-shared.bash

@@ -0,0 +1,107 @@
+#!/usr/bin/env bash
+
+# docker-finance | modern accounting for the power-user
+#
+# Copyright (C) 2021-2024 Aaron Fiore (Founder, Evergreen Crypto LLC)
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+#
+# "Libraries"
+#
+
+[ -z "$DOCKER_FINANCE_CONTAINER_REPO" ] && exit 1
+source "${DOCKER_FINANCE_CONTAINER_REPO}/src/hledger-flow/lib/lib_preprocess.bash" "$1" "$2"
+
+#
+# Implementation
+#
+
+[ -z "$global_year" ] && exit 1
+
+[ -z "$global_in_path" ] && exit 1
+[ -z "$global_out_path" ] && exit 1
+
+function parse()
+{
+  lib_preprocess::assert_header "date,blockchain,account_name,subaccount_name,subaccount_address,type,direction,tx_index,tx_hash,token_name,token_id,contract_address,symbol,block_hash,block_number,method_id,from_address,to_address,amount,fees"
+
+  # NOTE: here, global_subaccount is effectively replaced by the blockchain fetch implementation
+  gawk -v global_year="$global_year" \
+    '{
+       if (NR<2 || $1 !~ global_year)
+         next
+
+       # TODO: upstream feature-request so number-valued tokens can be used
+       gsub(/,1INCH,/, ",ONEINCH,")
+       gsub(/,USDC\.e,/, ",USDCe,")  # USDC on Polygon
+       gsub(/,cUSDCv3,/, ",cUSDC,")  # TODO: are you sure?
+       gsub(/,UNI-V3-POS,/, ",UNIVTHREEPOS,")
+       gsub(/,UNI-V2,/, ",UNIVTWO,")
+
+       # TODO: full aToken support
+       gsub(/,variableDebtGUSD,/, ",aGUSD,")
+       gsub(/,variableDebtUSDC,/, ",aUSDC,")
+       gsub(/,variableDebtUSDT,/, ",aUSDT,")
+       gsub(/,variableDebtDAI,/, ",aDAI,")
+
+       printf $1 OFS   # date
+       printf $2 OFS   # blockchain
+       printf $3 OFS   # account_name
+       printf $4 OFS   # subaccount_name
+       printf $5 OFS   # subaccount_address
+       printf $6 OFS   # type
+       printf $7 OFS   # direction
+       printf $8 OFS   # tx_index
+       printf $9 OFS   # tx_hash
+       printf $10 OFS  # token_name
+       printf $11 OFS  # token_id
+       printf $12 OFS  # contract_address
+       printf $13 OFS  # symbol
+       printf $14 OFS  # block_hash
+       printf $15 OFS  # block_number
+       printf $16 OFS  # method_id
+       printf $17 OFS  # from_address
+       printf $18 OFS  # to_address
+
+       # TODO: improve 0 removal (see others)
+       amount=$19
+       if (amount ~ /\./)
+         {
+           sub("0*$", "", amount)
+           sub("\\.$", "", amount)
+         }
+       printf amount OFS
+
+       fees=$20
+       if (fees ~ /\./)
+         {
+           sub("0*$", "", fees)
+           sub("\\.$", "", fees)
+         }
+       printf fees
+
+       printf "\n"
+
+    }' FS=, OFS=, "$global_in_path" >"$global_out_path"
+}
+
+function main()
+{
+  parse
+}
+
+main "$@"
+
+# vim: sw=2 sts=2 si ai et