acme.sh/dnsapi/dns_hosteurope.sh

#!/usr/bin/env sh

#
# Hosteurope API
#
# Author: Peter Postmann
# Report Bugs here: https://github.com/peterpostmann/acme.sh
# --
#
# Pass credentials before "acme.sh --issue --dns dns_hosteurope ..."
# --
# export HOSTEUROPE_Username="username"
# export HOSTEUROPE_Password="password"
# --

HOSTEUROPE_Sso="https://sso.hosteurope.de/api/app/v1/login"
HOSTEUROPE_Api="https://kis.hosteurope.de/administration/domainservices/index.php?menu=2&mode=autodns"

########  Public functions #####################

# Usage: add  _acme-challenge.www.domain.com   "XKrxpRBosdIKFzxW_CT3KLZNf6q0HG9i01zxXp5CPBs"
dns_hosteurope_add() {
  fulldomain="$1"
  txtvalue="$2"

  HOSTEUROPE_Username="${HOSTEUROPE_Username:-$(_readaccountconf_mutable HOSTEUROPE_Username)}"
  HOSTEUROPE_Password="${HOSTEUROPE_Password:-$(_readaccountconf_mutable HOSTEUROPE_Password)}"
  if [ -z "$HOSTEUROPE_Username" ] || [ -z "$HOSTEUROPE_Password" ]; then
    HOSTEUROPE_Username=""
    HOSTEUROPE_Password=""
    _err "You don't specify hosteurope username and password."
    return 1
  fi

  #save the credentials to the account conf file.
  _saveaccountconf_mutable HOSTEUROPE_Username  "$HOSTEUROPE_Username"
  _saveaccountconf_mutable HOSTEUROPE_Password  "$HOSTEUROPE_Password"

  _debug "detect the root zone"
  if ! _get_root "$fulldomain"; then
    return 1
  fi

  _debug _sub_domain "$_sub_domain"
  _debug _domain "$_domain"

  _debug "add txt record"
  _hosteurope_get "&submode=edit&domain=$_domain&hostadd=$_sub_domain&record=11&pointeradd=$txtvalue&truemode=host&action=add&submit=Neu+anlegen&dubnachfrage=1"
}

# Usage: fulldomain txtvalue
dns_hosteurope_rm() {
  fulldomain="$1"
  txtvalue="$2"

  HOSTEUROPE_Username="${HOSTEUROPE_Username:-$(_readaccountconf_mutable HOSTEUROPE_Username)}"
  HOSTEUROPE_Password="${HOSTEUROPE_Password:-$(_readaccountconf_mutable HOSTEUROPE_Password)}"
  if [ -z "$HOSTEUROPE_Username" ] || [ -z "$HOSTEUROPE_Password" ]; then
    HOSTEUROPE_Username=""
    HOSTEUROPE_Password=""
    _err "You don't specify hosteurope username and password."
    return 1
  fi

  _debug "detect the root zone"
  if ! _get_root "$fulldomain"; then
    return 1
  fi

  _debug _sub_domain "$_sub_domain"
  _debug _domain "$_domain"

  _debug "get records"    

  _hosteurope_get "&submode=edit&domain=$_domain"
  _hostid="$(echo "$response" | grep -a -A 50 "$txtvalue" | grep -m 1 "hostid" | grep -o 'value="[^"]*' | grep -o '[^"]*$')"
  _debug _hostid "$_hostid"

  if [ -z "$_hostid" ] ; then
    _err "record not found"
    return 1
  fi

  _debug "rm txt record"
  _hosteurope_get "&submode=edit&domain=$_domain&hostadd=$_sub_domain&record=11&pointer=$txtvalue&submit=L%F6schen&truemode=host&hostid=$_hostid&nachfrage=1"
}

####################  Private functions below ##################################

#_acme-challenge.www.domain.com
#returns
# _sub_domain=_acme-challenge.www
# _domain=domain.com
_get_root() {
  domain=$1

  if ! _hosteurope_get ''; then
    return 1
  fi

  _domains=$(echo "$response" | grep -a -o 'value="edit"><input type="hidden" name="domain" value="[^"]*' | grep -o '[^"]*$')
  _debug2 domains "$_domains"

  for _d in $_domains; do
    if echo "$domain" | grep "$_d$" > /dev/null; then
        _domain="$_d"
        _sub_domain="$(echo "$domain" | sed "s/$_d$//g" | sed "s/\\.$//g")"
        return 0
    fi
  done

  _err "invalid domain"

  return 1
}

_hosteurope_login() {

  _readaccountconf_mutable HOSTEUROPE_Cookie   "$HOSTEUROPE_Cookie"
  _readaccountconf_mutable HOSTEUROPE_Expires  "$HOSTEUROPE_Expires"
  
  if [ ! -z "$HOSTEUROPE_Cookie" ] && [ ! -z "$HOSTEUROPE_Expires" ] && [ $HOSTEUROPE_Expires -gt $(date "+%s") ]; then
    return 0
  fi

  # a call to _inithttp is needed to set HTTP_HEADER correctly (see https://github.com/Neilpang/acme.sh/issues/1859)
  _inithttp

  response="$(_post "{\"identifier\":\"$1\",\"password\":\"$2\",\"brandId\":\"b9c8f0f0-60dd-4cab-9da8-512b352d9c1a\"}" "${HOSTEUROPE_Sso}" "" "POST" "application/json")"

  if [ "$response" != '{"success":true}' ]; then
    _err "error $response"
    _debug2 response $response
    return 1
  fi

  headers=$(cat $HTTP_HEADER)
  if [ $? -ne 0 ]; then
    _err "error headers not found"
    _debug2 HTTP_HEADER $HTTP_HEADER
    return 1
  fi

  cookies=$(echo "$headers" | sed -n -e 's/^Set-Cookie: //p')
  if [ $? -ne 0 ]; then
    _err "error authidp cookie not found"
    _debug2 headers $headers
    _debug2 cookies $cookies
    return 1
  fi
  
  authidp=$(echo "$cookies" | grep "auth_idp=")
  if [ $? -ne 0 ]; then
    _err "error authidp cookie not found"
    _debug2 cookies $cookies
    return 1
  fi

  HOSTEUROPE_Cookie=$(echo "$cookies" | awk '{print $1}' | tr -d '\n')
  if [ $? -ne 0 ]; then
    _err "error parsing cookie"
    _debug2 cookies $cookies
    return 1
  fi

  HOSTEUROPE_Expires=$(echo "$authidp" | sed -n -e 's/.*Expires=//p' | sed -n -e 's/;.*//p' | { read gmt ; date -d "$gmt" "+%s" ; })
  if [ $? -ne 0 ]; then
    _err "error parsing cookie expiration date"
    _debug2 authidp $authidp
    return 1
  fi
  
  _saveaccountconf_mutable HOSTEUROPE_Cookie   "$HOSTEUROPE_Cookie"
  _saveaccountconf_mutable HOSTEUROPE_Expires  "$HOSTEUROPE_Expires"

  return 0
}

_hosteurope_get() {
  ep="$1"
  _debug "$ep"

  _hosteurope_login "$HOSTEUROPE_Username" "$HOSTEUROPE_Password"
  _H1="Cookie: $HOSTEUROPE_Cookie"
  _debug2 Cookie $_H1

  response="$(_get "${HOSTEUROPE_Api}${ep}")"
  res="$?"
  _debug2 response "$response"

  if [ "$res" != "0" ]; then
    _err "error $ep"
    return 1
  fi

  if echo "$response" | grep "<title>KIS Login</title>" > /dev/null; then
    _err "Invalid Credentials"
    return 1
  fi

  if echo "$response" | grep "FEHLER" > /dev/null; then
    _err "$(_hosteurope_result "$response" "FEHLER")"
    return 1
  fi

  if echo "$response" | grep "INFO" > /dev/null; then
    _info "$(_hosteurope_result "$response" "INFO")"
  fi

  return 0
}

_hosteurope_result() {
  echo "$1" | awk '/INFO/ {for(i=1; i<=10; i++) {getline; print}}' | grep -a "<li>" | sed 's/^\s*<li>//g' | sed 's/<\/li>*$//g'
}