fix he for solaris
This commit is contained in:
parent
c1f5229906
commit
6d6b2efdb5
2
acme.sh
2
acme.sh
@ -1838,7 +1838,7 @@ _send_signed_request() {
|
|||||||
_body="$response"
|
_body="$response"
|
||||||
if [ "$needbase64" ]; then
|
if [ "$needbase64" ]; then
|
||||||
_body="$(echo "$_body" | _dbase64)"
|
_body="$(echo "$_body" | _dbase64)"
|
||||||
_debug2 _body "$_body"
|
_debug3 _body "$_body"
|
||||||
fi
|
fi
|
||||||
|
|
||||||
if _contains "$_body" "JWS has invalid anti-replay nonce"; then
|
if _contains "$_body" "JWS has invalid anti-replay nonce"; then
|
||||||
|
@ -75,17 +75,19 @@ dns_he_rm() {
|
|||||||
body="$body&hosted_dns_zoneid=$_zone_id"
|
body="$body&hosted_dns_zoneid=$_zone_id"
|
||||||
body="$body&menu=edit_zone"
|
body="$body&menu=edit_zone"
|
||||||
body="$body&hosted_dns_editzone="
|
body="$body&hosted_dns_editzone="
|
||||||
domain_regex="$(echo "$_full_domain" | sed 's/\./\\./g')" # escape dots
|
|
||||||
_record_id=$(_post "$body" "https://dns.he.net/" \
|
|
||||||
| tr -d '\n' \
|
|
||||||
| _egrep_o "data=\""${_txt_value}"([^>]+>){6}[^<]+<[^;]+;deleteRecord\('[0-9]+','${domain_regex}','TXT'\)" \
|
|
||||||
| _egrep_o "[0-9]+','${domain_regex}','TXT'\)$" \
|
|
||||||
| _egrep_o "^[0-9]+"
|
|
||||||
)
|
|
||||||
# The series of egreps above could have been done a bit shorter but
|
|
||||||
# I wanted to double-check whether it's the correct record (in case
|
|
||||||
# HE changes their website somehow).
|
|
||||||
|
|
||||||
|
response="$(_post "$body" "https://dns.he.net/")"
|
||||||
|
_debug2 "response" "$response"
|
||||||
|
if ! _contains "$response" "$_txt_value"; then
|
||||||
|
_debug "The txt record is not found, just skip"
|
||||||
|
return 0
|
||||||
|
fi
|
||||||
|
_record_id="$(echo "$response" | tr -d "#" | sed "s/<tr/#<tr/g" | tr -d "\n" | tr "#" "\n" | grep "$_full_domain" | grep '"dns_tr"' | grep "$_txt_value" | cut -d '"' -f 4)"
|
||||||
|
_debug2 _record_id "$_record_id"
|
||||||
|
if [ -z "$_record_id" ]; then
|
||||||
|
_err "Can not find record id"
|
||||||
|
return 1
|
||||||
|
fi
|
||||||
# Remove the record
|
# Remove the record
|
||||||
body="email=${HE_Username}&pass=${HE_Password}"
|
body="email=${HE_Username}&pass=${HE_Password}"
|
||||||
body="$body&menu=edit_zone"
|
body="$body&menu=edit_zone"
|
||||||
@ -108,41 +110,26 @@ dns_he_rm() {
|
|||||||
|
|
||||||
########################## PRIVATE FUNCTIONS ###########################
|
########################## PRIVATE FUNCTIONS ###########################
|
||||||
|
|
||||||
#-- _find_zone() -------------------------------------------------------
|
|
||||||
# Returns the most specific zone found in administration interface.
|
|
||||||
#
|
|
||||||
# Example:
|
|
||||||
#
|
|
||||||
# _find_zone first.second.third.co.uk
|
|
||||||
#
|
|
||||||
# ... will return the first zone that exists in admin out of these:
|
|
||||||
# - "first.second.third.co.uk"
|
|
||||||
# - "second.third.co.uk"
|
|
||||||
# - "third.co.uk"
|
|
||||||
# - "co.uk" <-- unlikely
|
|
||||||
# - "uk" <-'
|
|
||||||
#
|
|
||||||
# (another approach would be something like this:
|
|
||||||
# https://github.com/hlandau/acme/blob/master/_doc/dns.hook
|
|
||||||
# - that's better if there are multiple pages. It's so much simpler.
|
|
||||||
# )
|
|
||||||
|
|
||||||
_find_zone() {
|
_find_zone() {
|
||||||
|
|
||||||
_domain="$1"
|
_domain="$1"
|
||||||
|
|
||||||
body="email=${HE_Username}&pass=${HE_Password}"
|
body="email=${HE_Username}&pass=${HE_Password}"
|
||||||
_matches=$(_post "$body" "https://dns.he.net/" \
|
response="$(_post "$body" "https://dns.he.net/")"
|
||||||
| _egrep_o "delete_dom.*name=\"[^\"]+\" value=\"[0-9]+"
|
_debug2 response "$response"
|
||||||
)
|
_table="$(echo "$response" | tr -d "#" | sed "s/<table/#<table/g" | tr -d "\n" | tr "#" "\n" | grep 'id="domains_table"')"
|
||||||
|
_debug2 _table "$_table"
|
||||||
|
_matches="$(echo "$_table" | sed "s/<tr/#<tr/g" | tr "#" "\n" | grep 'alt="edit"' | tr -d " " | sed "s/<td/#<td/g" | tr "#" "\n" | sed -n 3p)"
|
||||||
|
_debug2 _matches "$_matches"
|
||||||
# Zone names and zone IDs are in same order
|
# Zone names and zone IDs are in same order
|
||||||
_zone_ids=$(echo "$_matches" | cut -d '"' -f 5)
|
_zone_ids=$(echo "$_matches" | _egrep_o "hosted_dns_zoneid=[0-9]*&" | cut -d = -f 2 | tr -d '&')
|
||||||
_zone_names=$(echo "$_matches" | cut -d '"' -f 3)
|
_zone_names=$(echo "$_matches" | _egrep_o "name=.*onclick" | cut -d '"' -f 2)
|
||||||
_debug2 "These are the zones on this HE account:"
|
_debug2 "These are the zones on this HE account:"
|
||||||
_debug2 "$_zone_names"
|
_debug2 "$_zone_names"
|
||||||
_debug2 "And these are their respective IDs:"
|
_debug2 "And these are their respective IDs:"
|
||||||
_debug2 "$_zone_ids"
|
_debug2 "$_zone_ids"
|
||||||
|
if [ -z "$_zone_names" ] || [ -z "$_zone_ids" ]; then
|
||||||
|
_err "Can not get zone names."
|
||||||
|
return 1
|
||||||
|
fi
|
||||||
# Walk through all possible zone names
|
# Walk through all possible zone names
|
||||||
_strip_counter=1
|
_strip_counter=1
|
||||||
while true; do
|
while true; do
|
||||||
@ -156,17 +143,10 @@ _find_zone() {
|
|||||||
|
|
||||||
_debug "Looking for zone \"${_attempted_zone}\""
|
_debug "Looking for zone \"${_attempted_zone}\""
|
||||||
|
|
||||||
# Take care of "." and only match whole lines. Note that grep -F
|
line_num="$(echo "$_zone_names" | grep -n "$_attempted_zone" | cut -d : -f 1)"
|
||||||
# cannot be used because there's no way to make it match whole
|
|
||||||
# lines.
|
|
||||||
regex="^$(echo "$_attempted_zone" | sed 's/\./\\./g')$"
|
|
||||||
line_num=$(echo "$_zone_names" \
|
|
||||||
| grep -n "$regex" \
|
|
||||||
| cut -d : -f 1
|
|
||||||
)
|
|
||||||
|
|
||||||
if [ -n "$line_num" ]; then
|
if [ "$line_num" ]; then
|
||||||
_zone_id=$(echo "$_zone_ids" | sed "${line_num}q;d")
|
_zone_id=$(echo "$_zone_ids" | sed -n "${line_num}p")
|
||||||
_debug "Found relevant zone \"$_attempted_zone\" with id \"$_zone_id\" - will be used for domain \"$_domain\"."
|
_debug "Found relevant zone \"$_attempted_zone\" with id \"$_zone_id\" - will be used for domain \"$_domain\"."
|
||||||
return 0
|
return 0
|
||||||
fi
|
fi
|
||||||
|
Loading…
Reference in New Issue
Block a user