diff --git a/dnsapi/dns_autodns.sh b/dnsapi/dns_autodns.sh
new file mode 100644
index 00000000..42ab94e3
--- /dev/null
+++ b/dnsapi/dns_autodns.sh
@@ -0,0 +1,254 @@
+#!/usr/bin/env sh
+# -*- mode: sh; tab-width: 2; indent-tabs-mode: s; coding: utf-8 -*-
+
+# This is the InternetX autodns xml api wrapper for acme.sh
+
+AUTODNS_API="https://gateway.autodns.com"
+
+AUTODNS_USER="${AUTODNS_USER:-$(_readaccountconf_mutable AUTODNS_USER)}"
+AUTODNS_CONTEXT="${AUTODNS_CONTEXT:-$(_readaccountconf_mutable AUTODNS_CONTEXT)}"
+AUTODNS_PASSWORD="${AUTODNS_PASSWORD:-$(_readaccountconf_mutable AUTODNS_PASSWORD)}"
+
+if [[ -z "$AUTODNS_USER" ]] || [[ -z "$AUTODNS_CONTEXT" ]] || [[ -z "$AUTODNS_PASSWORD" ]]; then
+ _err "You don't specify autodns user, password and context."
+ return 1
+else
+ _saveaccountconf_mutable AUTODNS_USER "$AUTODNS_USER"
+ _saveaccountconf_mutable AUTODNS_CONTEXT "$AUTODNS_CONTEXT"
+ _saveaccountconf_mutable AUTODNS_PASSWORD "$AUTODNS_PASSWORD"
+fi
+
+# Arguments:
+# fulldomain
+# txtvalue
+# Globals:
+# _sub_domain
+# _domain
+dns_autodns_add() {
+ local fulldomain="$1"
+ local txtvalue="$2"
+
+ _debug "First detect the root zone"
+
+ if ! _get_autodns_zone "$fulldomain"; then
+ _err "invalid domain"
+ return 1
+ fi
+
+ _debug _sub_domain "$_sub_domain"
+ _debug _domain "$_domain"
+
+ _info "Adding record"
+
+ if _autodns_zone_update "$_domain" "$_sub_domain" "$txtvalue"; then
+ _info "Added, OK"
+ return 0
+ fi
+
+ return 1
+}
+
+# Arguments:
+# fulldomain
+# txtvalue
+# Globals:
+# _sub_domain
+# _domain
+dns_autodns_rm() {
+ local fulldomain="$1"
+ local txtvalue="$2"
+
+ _debug "First detect the root zone"
+
+ if ! _get_autodns_zone "$fulldomain"; then
+ _err "zone not found"
+ return 1
+ fi
+
+ _debug _sub_domain "$_sub_domain"
+ _debug _domain "$_domain"
+
+ _info "Delete record"
+
+ if _autodns_zone_cleanup "$_domain" "$_sub_domain" "$txtvalue"; then
+ _info "Deleted, OK"
+ return 0
+ fi
+}
+
+#################### Private functions below ##################################
+
+# Arguments:
+# fulldomain
+# Returns:
+# _sub_domain=_acme-challenge.www
+# _domain=domain.com
+_get_autodns_zone() {
+ local domain="$1"
+ local autodns_response
+
+ i=2
+ p=1
+
+ while true; do
+ h=$(printf "%s" "$domain" | cut -d . -f $i-100)
+ _debug h "$h"
+ if [ -z "$h" ]; then
+ # not valid
+ return 1
+ fi
+
+ autodns_response="$(_autodns_zone_inquire "$h")"
+
+ if [[ "$?" -ne 0 ]]; then
+ _err "invalid domain"
+ return 1
+ fi
+
+ if _contains "$autodns_response" "success" >/dev/null; then
+ _sub_domain=$(printf "%s" "$domain" | cut -d . -f 1-$p)
+ _domain=$h
+ return 0
+ else
+ return 1
+ fi
+
+ p=$i
+ i=$(_math "$i" + 1)
+ done
+
+ return 1
+}
+
+# Globals:
+# AUTODNS_USER
+# AUTODNS_PASSWORD
+# AUTODNS_CONTEXT
+_build_request_auth_xml() {
+ printf "
+ %s
+ %s
+ %s
+ " "$AUTODNS_USER" "$AUTODNS_PASSWORD" "$AUTODNS_CONTEXT"
+}
+
+# Arguments:
+# zone
+_build_zone_inquire_xml() {
+ local zone="$1"
+
+ printf "
+
+ %s
+
+ 0205
+
+ %s
+
+
+ " "$(_build_request_auth_xml)" "$zone"
+}
+
+# Arguments:
+# zone
+# subdomain
+# txtvalue
+_build_zone_update_xml() {
+ local zone="$1"
+ local subdomain="$2"
+ local txtvalue="$3"
+
+ printf "
+
+ %s
+
+ 0202001
+
+
+ %s
+ 600
+ TXT
+ %s
+
+
+
+ %s
+
+
+ " "$(_build_request_auth_xml)" "$subdomain" "$txtvalue" "$zone"
+}
+
+# Arguments:
+# zone
+_autodns_zone_inquire() {
+ local zone="$1"
+ local request_data
+ local autodns_response
+
+ request_data="$(_build_zone_inquire_xml "$zone")"
+ autodns_response="$(_autodns_api_call "$request_data")"
+
+ printf "%s" "$autodns_response"
+}
+
+# Arguments:
+# zone
+# subdomain
+# txtvalue
+_autodns_zone_update() {
+ local zone="$1"
+ local subdomain="$2"
+ local txtvalue="$3"
+ local request_data
+ local autodns_response
+
+ request_data="$(_build_zone_update_xml "$zone" "$subdomain" "$txtvalue")"
+ autodns_response="$(_autodns_api_call "$request_data")"
+
+ printf "%s" "$autodns_response"
+}
+
+# Arguments:
+# zone
+# subdomain
+# txtvalue
+_autodns_zone_cleanup() {
+ local zone="$1"
+ local subdomain="$2"
+ local txtvalue="$3"
+ local request_data
+ local autodns_response
+
+ request_data="$(_build_zone_update_xml "$zone" "$subdomain" "$txtvalue")"
+ # replace 'rr_add>' with 'rr_rem>' in request_data
+ request_data="${request_data//rr_add>/rr_rem>}"
+ autodns_response="$(_autodns_api_call "$request_data")"
+
+ printf "%s" "$autodns_response"
+}
+
+# Arguments:
+# request_data
+_autodns_api_call() {
+ local request_data="$1"
+ local autodns_response
+
+ _debug request_data "$request_data"
+
+ autodns_response="$(_post "$request_data" "$AUTODNS_API")"
+
+ if [[ "$?" -ne 0 ]]; then
+ _err "error"
+ _debug autodns_response "$autodns_response"
+ return 1
+ fi
+
+ if _contains "$autodns_response" "success" >/dev/null; then
+ _info "success"
+ _debug autodns_response "$autodns_response"
+ printf "%s" "$autodns_response"
+ return 0
+ fi
+
+ return 1
+}