#!/usr/bin/env sh
#Script to use with curanet.dk, scannet.dk, wannafind.dk, dandomain.dk DNS management.
-#
+#Requires api credentials with scope: dns
#Author: Peter L. Hansen <peter@r12.dk>
+#Version 1.0
CURANET_REST_URL="https://api.curanet.dk/dns/v1/Domains"
CURANET_AUTH_URL="https://apiauth.dk.team.blue/auth/realms/Curanet/protocol/openid-connect/token"
_saveaccountconf_mutable CURANET_AUTHCLIENTID "$CURANET_AUTHCLIENTID"
_saveaccountconf_mutable CURANET_AUTHSECRET "$CURANET_AUTHSECRET"
- gettoken
+ if ! _get_token; then
+ _err "Unable to get token"
+ return 1
+ fi
+
+ if ! _get_root "$fulldomain"; then
+ _err "Invalid domain"
+ return 1
+ fi
- _get_root "$fulldomain"
-
export _H1="Content-Type: application/json-patch+json"
export _H2="Accept: application/json"
export _H3="Authorization: Bearer $CURANET_ACCESS_TOKEN"
response="$(_post "$data" "$CURANET_REST_URL/${_domain}/Records" "" "")"
if _contains "$response" "$txtvalue"; then
- _debug "TXT record added OK"
+ _debug "TXT record added OK"
else
_err "Unable to add TXT record"
return 1
_info "Using curanet"
_debug fulldomain "$fulldomain"
_debug txtvalue "$txtvalue"
-
+
CURANET_AUTHCLIENTID="${CURANET_AUTHCLIENTID:-$(_readaccountconf_mutable CURANET_AUTHCLIENTID)}"
CURANET_AUTHSECRET="${CURANET_AUTHSECRET:-$(_readaccountconf_mutable CURANET_AUTHSECRET)}"
- gettoken
+ if ! _get_token; then
+ _err "Unable to get token"
+ return 1
+ fi
+
+ if ! _get_root "$fulldomain"; then
+ _err "Invalid domain"
+ return 1
+ fi
- _get_root "$fulldomain"
-
_debug "Getting current record list to identify TXT to delete"
export _H1="Content-Type: application/json"
return 1
fi
- recordid=$(echo "$response" | _egrep_o "{\"id\":[0-9]+,\"name\":\"$fulldomain\"" | _egrep_o "id\":[0-9]+" | cut -c 5-)
+ recordid=$(echo "$response" | _egrep_o "{\"id\":[0-9]+,\"name\":\"$fulldomain\",\"type\":\"TXT\",\"ttl\":60,\"priority\":0,\"data\":\"..$txtvalue" | _egrep_o "id\":[0-9]+" | cut -c 5-)
- re='^[0-9]+$'
- if ! [[ $recordid =~ $re ]] ; then
- err "Unable to delete record (did not find recordID to delete)"
+ if [ -z "$recordid" ]; then
+ _err "Unable to get recordid"
+ _debug "regex {\"id\":[0-9]+,\"name\":\"$fulldomain\",\"type\":\"TXT\",\"ttl\":60,\"priority\":0,\"data\":\"..$txtvalue"
+ _debug "response $response"
return 1
fi
_debug "Deleting recordID $recordid"
-
response="$(_post "" "$CURANET_REST_URL/${_domain}/Records/$recordid" "" "DELETE")"
-
- return 0;
-
+ return 0
}
#################### Private functions below ##################################
-gettoken() {
-
+_get_token() {
response="$(_post "grant_type=client_credentials&client_id=$CURANET_AUTHCLIENTID&client_secret=$CURANET_AUTHSECRET&scope=dns" "$CURANET_AUTH_URL" "" "")"
-
if ! _contains "$response" "access_token"; then
_err "Unable get access token"
return 1
fi
+ CURANET_ACCESS_TOKEN=$(echo "$response" | _egrep_o "\"access_token\":\"[^\"]+" | cut -c 17-)
+
+ if [ -z "$CURANET_ACCESS_TOKEN" ]; then
+ _err "Unable to get token"
+ return 1
+ fi
- CURANET_ACCESS_TOKEN=$(echo "$response" | _egrep_o "\"access_token\":\"[^\"]+\"" | cut -c 17-)
- CURANET_ACCESS_TOKEN=${CURANET_ACCESS_TOKEN::-1}
+ return 0
}
-
#_acme-challenge.www.domain.com
#returns
-# _sub_domain=_acme-challenge.www
# _domain=domain.com
# _domain_id=sdjkglgdfewsdfg
_get_root() {
domain=$1
i=1
- p=1
while true; do
h=$(printf "%s" "$domain" | cut -d . -f $i-100)
response="$(_get "$CURANET_REST_URL/$h/Records" "" "")"
if [ ! "$(echo "$response" | _egrep_o "Entity not found")" ]; then
- _sub_domain=$(printf "%s" "$domain" | cut -d . -f 1-$p)
_domain=$h
return 0
fi
-
- p=$i
+
i=$(_math "$i" + 1)
done
return 1
}
-