#!/usr/bin/env bash
# Create a credit note (avoir) in the SANDBOX — an invoice of type 2 that
# references the original invoice. Amounts come out negative. Customer avoir =
# /invoices; supplier avoir (avoir fournisseur) = /supplierinvoices.
#
# Input: a JSON object on stdin (or a file path in $1):
#   socid          (required) the third party (must match the source invoice's)
#   source_invoice (required) the original invoice id being credited
#   kind           "customer" (default) | "supplier"
#   ref_supplier   (supplier only) the supplier's avoir reference (recommended —
#                  some supplier setups require it to validate)
#   date           "YYYY-MM-DD"  (default today)
#   validate       true|false    (default false = leave draft)
#   lines: [ { desc, qty, price_ht, tva, type: "product"|"service", product_id? } ]
#          the lines being credited (positive amounts; Dolibarr nets them as a credit)
#
# Emits {id, ref, ref_supplier, total_ht, total_ttc, fk_facture_source, statut}.
set -euo pipefail
SCRIPT_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
W="${DOL_WRITE:-${SCRIPT_DIR}/dol-write.sh}"

SRC="${1:-}"
if [[ -n "${SRC}" && "${SRC}" != "-" ]]; then INPUT="$(cat "${SRC}")"; else INPUT="$(cat)"; fi

PYF="$(mktemp -t dolpy.XXXXXX)"; trap 'rm -f "${PYF}"' EXIT
cat > "${PYF}" <<'PY'
import json, sys, datetime
d = json.loads(sys.stdin.read())
for req in ("socid", "source_invoice"):
    if not d.get(req):
        sys.exit("creditnote-create.sh: '%s' is required" % req)
is_supplier = str(d.get("kind", "customer")).lower() in ("supplier", "fournisseur")
ds = d.get("date")
epoch = int((datetime.datetime.strptime(ds, "%Y-%m-%d") if ds
             else datetime.datetime.now()).timestamp())
lines = []
for ln in d.get("lines", []):
    is_product = ln.get("type", "service").lower() in ("product", "produit")
    L = {
        "desc": ln.get("desc", ""),
        "subprice": str(ln.get("price_ht", ln.get("subprice", 0))),
        "qty": str(ln.get("qty", 1)),
        "tva_tx": str(ln.get("tva", ln.get("tva_tx", 20))),
        "product_type": "0" if is_product else "1",
    }
    if ln.get("product_id"):
        L["fk_product"] = str(ln["product_id"])
    lines.append(L)
body = {"socid": d["socid"], "type": 2, "fk_facture_source": d["source_invoice"],
        "date": epoch, "lines": lines}
if is_supplier and d.get("ref_supplier"):
    body["ref_supplier"] = d["ref_supplier"]
print(json.dumps(body))
print("1" if d.get("validate") else "0")
print("/supplierinvoices" if is_supplier else "/invoices")
PY

MAPPED="$(printf '%s' "${INPUT}" | python3 "${PYF}")"
BODY="$(sed -n 1p <<<"${MAPPED}")"
VALIDATE="$(sed -n 2p <<<"${MAPPED}")"
ENDPOINT="$(sed -n 3p <<<"${MAPPED}")"

ID="$("${W}" POST "${ENDPOINT}" "${BODY}")"
if [[ ! "${ID}" =~ ^[0-9]+$ ]]; then
  echo "creditnote-create.sh: create did not return an id: ${ID}" >&2
  exit 1
fi
if [[ "${VALIDATE}" == "1" ]]; then
  "${W}" POST "${ENDPOINT}/${ID}/validate" '{}' >/dev/null
fi
"${W}" GET "${ENDPOINT}/${ID}" | python3 -c "import json,sys
d=json.load(sys.stdin)
print(json.dumps({k:d.get(k) for k in ('id','ref','ref_supplier','total_ht','total_ttc','fk_facture_source','statut')}))"