Browse Source

Fixed some bugs, tested and working

shebang
Rolph Haspers 5 years ago
parent
commit
e10f447b5b
  1. 23
      dnsapi/dns_leaseweb.sh

23
dnsapi/dns_leaseweb.sh

@ -83,19 +83,20 @@ dns_leaseweb_rm() {
# returns # returns
# _domain=domain.com # _domain=domain.com
_get_root() { _get_root() {
domain=$1
i="$(echo "$fulldomain" | tr '.' ' ' | wc -w)"
rdomain=$1
i="$(echo "$rdomain" | tr '.' ' ' | wc -w)"
i=$(_math "$i" - 1) i=$(_math "$i" - 1)
while true; do while true; do
h=$(printf "%s" "$domain" | cut -d . -f $i-100)
h=$(printf "%s" "$rdomain" | cut -d . -f $i-100)
_debug h "$h"
if [ -z "$h" ]; then if [ -z "$h" ]; then
return 1 #not valid domain return 1 #not valid domain
fi fi
#Check API if domain exists #Check API if domain exists
if _lsw_api "GET" "$h"; then if _lsw_api "GET" "$h"; then
if [ "$_code" = "200"]; then
if [ "$_code" = "200" ]; then
_domain="$h" _domain="$h"
return 0 return 0
fi fi
@ -111,16 +112,16 @@ _get_root() {
_lsw_api() { _lsw_api() {
cmd=$1 cmd=$1
domain=$2
fulldomain=$3
txtvalue=$4
data=$2
fd=$3
tvalue=$4
# Construct the HTTP Authorization header # Construct the HTTP Authorization header
export _H2="Content-Type: application/json" export _H2="Content-Type: application/json"
export _H1="X-Lsw-Auth: ${LSW_Key}" export _H1="X-Lsw-Auth: ${LSW_Key}"
if [ "$cmd" = "GET" ]; then if [ "$cmd" = "GET" ]; then
response="$(_get "$LSW_API/$domain")"
response="$(_get "$LSW_API/$d")"
_code="$(grep "^HTTP" "$HTTP_HEADER" | _tail_n 1 | cut -d " " -f 2 | tr -d "\\r\\n")" _code="$(grep "^HTTP" "$HTTP_HEADER" | _tail_n 1 | cut -d " " -f 2 | tr -d "\\r\\n")"
_debug "http response code $_code" _debug "http response code $_code"
_debug response "$response" _debug response "$response"
@ -128,8 +129,8 @@ _lsw_api() {
fi fi
if [ "$cmd" = "POST" ]; then if [ "$cmd" = "POST" ]; then
data="{\"name\": \"$fulldomain.\",\"type\": \"TXT\",\"content\": [\"$txtvalue\"],\"ttl\": 60}"
response="$(_post "$data" "$LSW_API/$domain/resourceRecordSets" "$data" "POST")"
data="{\"name\": \"$fd.\",\"type\": \"TXT\",\"content\": [\"$tvalue\"],\"ttl\": 60}"
response="$(_post "$data" "$LSW_API/$d/resourceRecordSets" "$data" "POST")"
_code="$(grep "^HTTP" "$HTTP_HEADER" | _tail_n 1 | cut -d " " -f 2 | tr -d "\\r\\n")" _code="$(grep "^HTTP" "$HTTP_HEADER" | _tail_n 1 | cut -d " " -f 2 | tr -d "\\r\\n")"
_debug "http response code $_code" _debug "http response code $_code"
_debug response "$response" _debug response "$response"
@ -137,7 +138,7 @@ _lsw_api() {
fi fi
if [ "$cmd" = "DELETE" ]; then if [ "$cmd" = "DELETE" ]; then
response="$(_post "" "$LSW_API/$domain/resourceRecordSets/$fulldomain/TXT" "" "DELETE")"
response="$(_post "" "$LSW_API/$d/resourceRecordSets/$fd/TXT" "" "DELETE")"
_code="$(grep "^HTTP" "$HTTP_HEADER" | _tail_n 1 | cut -d " " -f 2 | tr -d "\\r\\n")" _code="$(grep "^HTTP" "$HTTP_HEADER" | _tail_n 1 | cut -d " " -f 2 | tr -d "\\r\\n")"
_debug "http response code $_code" _debug "http response code $_code"
_debug response "$response" _debug response "$response"

Loading…
Cancel
Save