From 9eb4c548a2856768f4d17b536ac6898ad251fc1b Mon Sep 17 00:00:00 2001
From: aa <auerswald@gmail.com>
Date: Tue, 28 Feb 2023 20:19:44 +0100
Subject: [PATCH] added dnsapi for internetx autodns json api

---
 dnsapi/dns_autodns_json.sh | 153 +++++++++++++++++++++++++++++++++++++
 1 file changed, 153 insertions(+)
 create mode 100644 dnsapi/dns_autodns_json.sh

diff --git a/dnsapi/dns_autodns_json.sh b/dnsapi/dns_autodns_json.sh
new file mode 100644
index 00000000..8aaab4bf
--- /dev/null
+++ b/dnsapi/dns_autodns_json.sh
@@ -0,0 +1,153 @@
+#!/usr/bin/env sh
+# -*- mode: sh; tab-width: 2; indent-tabs-mode: s; coding: utf-8 -*-
+
+# This is the InternetX autoDNS json api wrapper for acme.sh
+# Author: auerswald@gmail.com
+# Created: 2023-02-28
+#
+# Before using this script for the first time do this on the console:
+#
+# export AUTODNS_USER="username"
+# export AUTODNS_PASSWORD="password"
+# export AUTODNS_CONTEXT="context"
+#
+# Usage: acme.sh --issue --dns dns_autodns_json -d example.com
+
+AUTODNS_API="https://api.autodns.com/v1"
+
+# Arguments:
+#   txtdomain
+#   txt
+dns_autodns_json_add() {
+  fulldomain="$1"
+  txtvalue="$2"
+
+  AUTODNS_USER="${AUTODNS_USER:-$(_readaccountconf_mutable AUTODNS_USER)}"
+  AUTODNS_PASSWORD="${AUTODNS_PASSWORD:-$(_readaccountconf_mutable AUTODNS_PASSWORD)}"
+  AUTODNS_CONTEXT="${AUTODNS_CONTEXT:-$(_readaccountconf_mutable AUTODNS_CONTEXT)}"
+
+  if [ -z "$AUTODNS_USER" ] || [ -z "$AUTODNS_CONTEXT" ] || [ -z "$AUTODNS_PASSWORD" ]; then
+    _err "You don't specify autodns user, password and context."
+    return 1
+  fi
+
+  _saveaccountconf_mutable AUTODNS_USER "$AUTODNS_USER"
+  _saveaccountconf_mutable AUTODNS_PASSWORD "$AUTODNS_PASSWORD"
+  _saveaccountconf_mutable AUTODNS_CONTEXT "$AUTODNS_CONTEXT"
+
+  if ! _get_autodns_zone "$fulldomain"; then
+    _err "invalid domain"
+    return 1
+  fi
+
+  _info "Adding TXT record..."
+
+  _post_data="{\"adds\":[{\"name\":\"$_autodns_sub_domain\",\"ttl\":600,\"type\":\"TXT\",\"value\":\"$txtvalue\"}]}"
+  _response="$(dns_autodns_api_call "/zone/$_autodns_zone/_stream" "$_post_data")"
+
+  if [ "$?" -eq "0" ] && _contains "$_response" '{"type":"Zone","summary":1}'; then
+    _info "Added, OK"
+    return 0
+  fi
+
+  return 1
+}
+
+# Arguments:
+#   txtdomain
+#   txt
+dns_autodns_json_rm() {
+  fulldomain="$1"
+  txtvalue="$2"
+
+  AUTODNS_USER="${AUTODNS_USER:-$(_readaccountconf_mutable AUTODNS_USER)}"
+  AUTODNS_PASSWORD="${AUTODNS_PASSWORD:-$(_readaccountconf_mutable AUTODNS_PASSWORD)}"
+  AUTODNS_CONTEXT="${AUTODNS_CONTEXT:-$(_readaccountconf_mutable AUTODNS_CONTEXT)}"
+
+
+  if ! _get_autodns_zone "$fulldomain"; then
+    _err "invalid domain"
+    return 1
+  fi
+
+  _info "Remove previous added TXT record..."
+  _post_data="{\"rems\":[{\"name\":\"$_autodns_sub_domain\",\"type\":\"TXT\",\"value\":\"$txtvalue\"}]}"
+  _response="$(dns_autodns_api_call "/zone/$_autodns_zone/_stream" "$_post_data")"
+
+  if [ "$?" -eq "0" ] && _contains "$_response" '{"type":"Zone","summary":1}'; then
+    _info "Deleted, OK"
+    return 0
+  fi
+
+  return 1
+}
+
+
+dns_autodns_api_call() {
+  _api_route="$1"
+  _post_data="$2"
+
+  _basic_auth=$(printf "%s:%s" "$AUTODNS_USER" "$AUTODNS_PASSWORD" | _base64)
+
+  # @see https://help.internetx.com/display/APIXMLEN/Authentication#Authentication-AuthenticationviaCredentials(username/password/context)
+  export _H1="Authorization: Basic $_basic_auth"
+  export _H2="X-Domainrobot-Context: $AUTODNS_CONTEXT"
+
+  # @see https://help.internetx.com/display/APIXMLEN/JSON+API+Basics
+  #      "The use of a UserAgent is mandatory for the correct use of the JSON API."
+  export _H3="User-Agent: acme.sh/${VER}"
+
+  export _H4="Content-Type: application/json"
+
+  _response="$(_post "$_post_data" "${AUTODNS_API}${_api_route}")"
+  _debug "$_response"
+
+  if ! _contains "$_response" '"type":"SUCCESS"'; then
+    _err "$_response"
+    return 1
+  fi
+
+  printf "%s" "$_response"
+}
+
+# Arguments:
+#   fulldomain
+# Returns:
+#   _sub_domain=_acme-challenge.xxx
+#   _zone=domain.tld
+#   _system_ns
+_get_autodns_zone() {
+  domain="$1"
+  i=2
+  p=1
+
+  _debug "First detect the root zone..."
+
+  while true; do
+    h=$(printf "%s" "$domain" | cut -d . -f $i-100)
+    _debug h "$h"
+    if [ -z "$h" ]; then
+      return 1
+    fi
+
+    _post_data="{\"view\":{\"children\":1},\"filters\":[{\"key\":\"name\",\"operator\":\"EQUAL\",\"value\":\"$h\"}]}"
+    _response="$(dns_autodns_api_call "/zone/_search" "$_post_data")"
+
+    if [ "$?" -ne "0" ]; then
+      _err "invalid domain"
+      return 1
+    fi
+
+    if _contains "$_response" '{"type":"Zone","summary":1}' >/dev/null; then
+      _autodns_zone="$(echo "$_response" | _json_decode | _egrep_o '"origin":"[^"]*"' | cut -d : -f 2 | tr -d '"')"
+      _autodns_sub_domain="$(printf "%s" "$domain" | cut -d . -f 1-$p)"
+
+      return 0
+    fi
+
+    p=$i
+    i=$(_math "$i" + 1)
+  done
+
+  return 1
+}