From 2abacb402916119191865f5e411a8793da07ec8a Mon Sep 17 00:00:00 2001
From: vin01 <vinc.i@protonmail.ch>
Date: Mon, 28 Jun 2021 13:58:42 +0200
Subject: [PATCH] Support account id configuration for dnsimple

---
 dnsapi/dns_dnsimple.sh | 31 ++++++++++++++++++-------------
 1 file changed, 18 insertions(+), 13 deletions(-)

diff --git a/dnsapi/dns_dnsimple.sh b/dnsapi/dns_dnsimple.sh
index d831eb2b..80e1d4f3 100644
--- a/dnsapi/dns_dnsimple.sh
+++ b/dnsapi/dns_dnsimple.sh
@@ -123,21 +123,26 @@ _get_root() {
 # returns _account_id
 _get_account_id() {
   _debug "retrive account id"
-  if ! _dnsimple_rest GET "whoami"; then
-    return 1
+
+  if [ -n "$DNSimple_ACCOUNT_ID" ]; then
+    _account_id="$DNSimple_ACCOUNT_ID"
+  else
+    if ! _dnsimple_rest GET "whoami"; then
+      return 1
+    fi
+
+    if _contains "$response" "\"account\":null"; then
+      _err "no account associated with this token"
+      return 1
+    fi
+
+    if _contains "$response" "timeout"; then
+      _err "timeout retrieving account id"
+      return 1
+    fi
+    _account_id=$(printf "%s" "$response" | _egrep_o "\"id\":[^,]*,\"email\":" | cut -d: -f2 | cut -d, -f1)
   fi
 
-  if _contains "$response" "\"account\":null"; then
-    _err "no account associated with this token"
-    return 1
-  fi
-
-  if _contains "$response" "timeout"; then
-    _err "timeout retrieving account id"
-    return 1
-  fi
-
-  _account_id=$(printf "%s" "$response" | _egrep_o "\"id\":[^,]*,\"email\":" | cut -d: -f2 | cut -d, -f1)
   _debug _account_id "$_account_id"
 
   return 0