123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163 |
- #!/usr/bin/env sh
- #
- #VULTR_API_KEY=000011112222333344445555666677778888
- VULTR_Api="https://api.vultr.com/v1"
- ######## Public functions #####################
- #Usage: add _acme-challenge.www.domain.com "XKrxpRBosdIKFzxW_CT3KLZNf6q0HG9i01zxXp5CPBs"
- dns_vultr_add() {
- fulldomain=$1
- txtvalue=$2
- _debug fulldomain "$fulldomain"
- _debug txtvalue "$txtvalue"
- VULTR_API_KEY="${VULTR_API_KEY:-$(_readaccountconf_mutable VULTR_API_KEY)}"
- if test -z "$VULTR_API_KEY"; then
- VULTR_API_KEY=''
- _err 'VULTR_API_KEY was not exported'
- return 1
- fi
- _saveaccountconf_mutable VULTR_API_KEY "$VULTR_API_KEY"
- _debug 'First detect the root zone'
- if ! _get_root "$fulldomain"; then
- return 1
- fi
- _debug _sub_domain "$_sub_domain"
- _debug _domain "$_domain"
- _debug 'Getting txt records'
- _vultr_rest GET "dns/records?domain=$_domain"
- if printf "%s\n" "$response" | grep "\"type\":\"TXT\",\"name\":\"$fulldomain\"" >/dev/null; then
- _err 'Error'
- return 1
- fi
- if ! _vultr_rest POST 'dns/create_record' "domain=$_domain&name=$_sub_domain&data=\"$txtvalue\"&type=TXT"; then
- _err "$response"
- return 1
- fi
- _debug2 _response "$response"
- return 0
- }
- #fulldomain txtvalue
- dns_vultr_rm() {
- fulldomain=$1
- txtvalue=$2
- _debug fulldomain "$fulldomain"
- _debug txtvalue "$txtvalue"
- VULTR_API_KEY="${VULTR_API_KEY:-$(_readaccountconf_mutable VULTR_API_KEY)}"
- if test -z "$VULTR_API_KEY"; then
- VULTR_API_KEY=""
- _err 'VULTR_API_KEY was not exported'
- return 1
- fi
- _saveaccountconf_mutable VULTR_API_KEY "$VULTR_API_KEY"
- _debug 'First detect the root zone'
- if ! _get_root "$fulldomain"; then
- return 1
- fi
- _debug _sub_domain "$_sub_domain"
- _debug _domain "$_domain"
- _debug 'Getting txt records'
- _vultr_rest GET "dns/records?domain=$_domain"
- if printf "%s\n" "$response" | grep "\"type\":\"TXT\",\"name\":\"$fulldomain\"" >/dev/null; then
- _err 'Error'
- return 1
- fi
- _record_id="$(echo "$response" | tr '{}' '\n' | grep '"TXT"' | grep "$txtvalue" | tr ',' '\n' | grep -i 'RECORDID' | cut -d : -f 2)"
- _debug _record_id "$_record_id"
- if [ "$_record_id" ]; then
- _info "Successfully retrieved the record id for ACME challenge."
- else
- _info "Empty record id, it seems no such record."
- return 0
- fi
- if ! _vultr_rest POST 'dns/delete_record' "domain=$_domain&RECORDID=$_record_id"; then
- _err "$response"
- return 1
- fi
- _debug2 _response "$response"
- return 0
- }
- #################### Private functions below ##################################
- #_acme-challenge.www.domain.com
- #returns
- # _sub_domain=_acme-challenge.www
- # _domain=domain.com
- # _domain_id=sdjkglgdfewsdfg
- _get_root() {
- domain=$1
- i=1
- while true; do
- h=$(printf "%s" "$domain" | cut -d . -f $i-100)
- _debug h "$h"
- if [ -z "$h" ]; then
- return 1
- fi
- if ! _vultr_rest GET "dns/list"; then
- return 1
- fi
- if printf "%s\n" "$response" | grep '^\[.*\]' >/dev/null; then
- if _contains "$response" "\"domain\":\"$_domain\""; then
- _sub_domain="$(echo "$fulldomain" | sed "s/\\.$_domain\$//")"
- _domain=$_domain
- return 0
- else
- _err 'Invalid domain'
- return 1
- fi
- else
- _err "$response"
- return 1
- fi
- i=$(_math "$i" + 1)
- done
- return 1
- }
- _vultr_rest() {
- m=$1
- ep="$2"
- data="$3"
- _debug "$ep"
- api_key_trimmed=$(echo $VULTR_API_KEY | tr -d '"')
- export _H1="Api-Key: $api_key_trimmed"
- export _H2='Content-Type: application/x-www-form-urlencoded'
- if [ "$m" != "GET" ]; then
- _debug data "$data"
- response="$(_post "$data" "$VULTR_Api/$ep" "" "$m")"
- else
- response="$(_get "$VULTR_Api/$ep")"
- fi
- if [ "$?" != "0" ]; then
- _err "Error $ep"
- return 1
- fi
- _debug2 response "$response"
- return 0
- }
|