| 
					
				 | 
			
			
				@@ -7,6 +7,7 @@ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 # 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 #Author: David Kerr 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 #Report Bugs here: https://github.com/dkerr64/acme.sh 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#or here... https://github.com/Neilpang/acme.sh/issues/2305 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 # 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 ########  Public functions ##################### 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -46,76 +47,34 @@ dns_freedns_add() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   _saveaccountconf FREEDNS_COOKIE "$FREEDNS_COOKIE" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # split our full domain name into two parts... 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  i="$(echo "$fulldomain" | tr '.' ' ' | wc -w)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  i="$(_math "$i" - 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  top_domain="$(echo "$fulldomain" | cut -d. -f "$i"-100)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  i="$(_math "$i" - 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  sub_domain="$(echo "$fulldomain" | cut -d. -f -"$i")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  _debug "top_domain: $top_domain" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  _debug "sub_domain: $sub_domain" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # Sometimes FreeDNS does not return the subdomain page but rather 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # returns a page regarding becoming a premium member.  This usually 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # happens after a period of inactivity.  Immediately trying again 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # returns the correct subdomain page.  So, we will try twice to 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # load the page and obtain our domain ID 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  attempts=2 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  while [ "$attempts" -gt "0" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    attempts="$(_math "$attempts" - 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    htmlpage="$(_freedns_retrieve_subdomain_page "$FREEDNS_COOKIE")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    if [ "$?" != "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      if [ "$using_cached_cookies" = "true" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        _err "Has your FreeDNS username and password changed?  If so..." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        _err "Please export as FREEDNS_User / FREEDNS_Password and try again." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    subdomain_csv="$(echo "$htmlpage" | tr -d "\n\r" | _egrep_o '<form .*</form>' | sed 's/<tr>/@<tr>/g' | tr '@' '\n' | grep edit.php | grep "$top_domain")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    _debug3 "subdomain_csv: $subdomain_csv" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # The above beauty ends with striping out rows that do not have an 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # href to edit.php and do not have the top domain we are looking for. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # So all we should be left with is CSV of table of subdomains we are 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # interested in. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # Now we have to read through this table and extract the data we need 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    lines="$(echo "$subdomain_csv" | wc -l)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    i=0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    found=0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    DNSdomainid="" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    while [ "$i" -lt "$lines" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      i="$(_math "$i" + 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      line="$(echo "$subdomain_csv" | sed -n "${i}p")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      _debug2 "line: $line" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      if [ $found = 0 ] && _contains "$line" "<td>$top_domain</td>"; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        # this line will contain DNSdomainid for the top_domain 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        DNSdomainid="$(echo "$line" | _egrep_o "edit_domain_id *= *.*>" | cut -d = -f 2 | cut -d '>' -f 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        _debug2 "DNSdomainid: $DNSdomainid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        found=1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        break 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    done 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    if [ -z "$DNSdomainid" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      # If domain ID is empty then something went wrong (top level 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      # domain not found at FreeDNS). 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      if [ "$attempts" = "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        # exhausted maximum retry attempts 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        _err "Domain $top_domain not found at FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    else 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      # break out of the 'retry' loop... we have found our domain ID 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # We may have to cycle through the domain name to find the 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # TLD that we own... 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  i=1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  wmax="$(echo "$fulldomain" | tr '.' ' ' | wc -w)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  while [ "$i" -lt "$wmax" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # split our full domain name into two parts... 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    sub_domain="$(echo "$fulldomain" | cut -d. -f -"$i")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    i="$(_math "$i" + 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    top_domain="$(echo "$fulldomain" | cut -d. -f "$i"-100)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _debug "sub_domain: $sub_domain" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _debug "top_domain: $top_domain" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    DNSdomainid="$(_freedns_domain_id "$top_domain")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    if [ "$?" = "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      _info "Domain $top_domain found at FreeDNS, domain_id $DNSdomainid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				       break 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    else 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      _info "Domain $top_domain not found at FreeDNS, try with next level of TLD" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    _info "Domain $top_domain not found at FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    _info "Retry loading subdomain page ($attempts attempts remaining)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   done 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  if [ -z "$DNSdomainid" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # If domain ID is empty then something went wrong (top level 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # domain not found at FreeDNS). 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _err "Domain $top_domain not found at FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   # Add in new TXT record with the value provided 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   _debug "Adding TXT record for $fulldomain, $txtvalue" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   _freedns_add_txt_record "$FREEDNS_COOKIE" "$DNSdomainid" "$sub_domain" "$txtvalue" 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -134,80 +93,47 @@ dns_freedns_rm() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   # Need to read cookie from conf file again in case new value set 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   # during login to FreeDNS when TXT record was created. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # acme.sh does not have a _readaccountconf() function 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  FREEDNS_COOKIE="$(_read_conf "$ACCOUNT_CONF_PATH" "FREEDNS_COOKIE")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  FREEDNS_COOKIE="$(_readaccountconf "FREEDNS_COOKIE")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   _debug "FreeDNS login cookies: $FREEDNS_COOKIE" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # Sometimes FreeDNS does not return the subdomain page but rather 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # returns a page regarding becoming a premium member.  This usually 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # happens after a period of inactivity.  Immediately trying again 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # returns the correct subdomain page.  So, we will try twice to 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # load the page and obtain our TXT record. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  attempts=2 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  while [ "$attempts" -gt "0" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    attempts="$(_math "$attempts" - 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    htmlpage="$(_freedns_retrieve_subdomain_page "$FREEDNS_COOKIE")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  TXTdataid="$(_freedns_data_id "$fulldomain" "TXT")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  if [ "$?" != "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _info "Cannot delete TXT record for $fulldomain, record does not exist at FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  _debug "Data ID's found, $TXTdataid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # now we have one (or more) TXT record data ID's. Load the page 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # for that record and search for the record txt value.  If match 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # then we can delete it. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  lines="$(echo "$TXTdataid" | wc -l)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  _debug "Found $lines TXT data records for $fulldomain" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  i=0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  while [ "$i" -lt "$lines" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    i="$(_math "$i" + 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    dataid="$(echo "$TXTdataid" | sed -n "${i}p")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _debug "$dataid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    htmlpage="$(_freedns_retrieve_data_page "$FREEDNS_COOKIE" "$dataid")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     if [ "$?" != "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      if [ "$using_cached_cookies" = "true" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        _err "Has your FreeDNS username and password changed?  If so..." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        _err "Please export as FREEDNS_User / FREEDNS_Password and try again." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				       return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    subdomain_csv="$(echo "$htmlpage" | tr -d "\n\r" | _egrep_o '<form .*</form>' | sed 's/<tr>/@<tr>/g' | tr '@' '\n' | grep edit.php | grep "$fulldomain")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    _debug3 "subdomain_csv: $subdomain_csv" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # The above beauty ends with striping out rows that do not have an 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # href to edit.php and do not have the domain name we are looking for. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # So all we should be left with is CSV of table of subdomains we are 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # interested in. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    # Now we have to read through this table and extract the data we need 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    lines="$(echo "$subdomain_csv" | wc -l)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    i=0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    found=0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    DNSdataid="" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    while [ "$i" -lt "$lines" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      i="$(_math "$i" + 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      line="$(echo "$subdomain_csv" | sed -n "${i}p")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      _debug3 "line: $line" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      DNSname="$(echo "$line" | _egrep_o 'edit.php.*</a>' | cut -d '>' -f 2 | cut -d '<' -f 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      _debug2 "DNSname: $DNSname" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      if [ "$DNSname" = "$fulldomain" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        DNStype="$(echo "$line" | sed 's/<td/@<td/g' | tr '@' '\n' | sed -n '4p' | cut -d '>' -f 2 | cut -d '<' -f 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        _debug2 "DNStype: $DNStype" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        if [ "$DNStype" = "TXT" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          DNSdataid="$(echo "$line" | _egrep_o 'data_id=.*' | cut -d = -f 2 | cut -d '>' -f 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          _debug2 "DNSdataid: $DNSdataid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          DNSvalue="$(echo "$line" | sed 's/<td/@<td/g' | tr '@' '\n' | sed -n '5p' | cut -d '>' -f 2 | cut -d '<' -f 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          if _startswith "$DNSvalue" """; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            # remove the quotation from the start 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            DNSvalue="$(echo "$DNSvalue" | cut -c 7-)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          if _endswith "$DNSvalue" "..."; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            # value was truncated, remove the dot dot dot from the end 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            DNSvalue="$(echo "$DNSvalue" | sed 's/...$//')" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          elif _endswith "$DNSvalue" """; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            # else remove the closing quotation from the end 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            DNSvalue="$(echo "$DNSvalue" | sed 's/......$//')" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          _debug2 "DNSvalue: $DNSvalue" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          if [ -n "$DNSdataid" ] && _startswith "$txtvalue" "$DNSvalue"; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            # Found a match. But note... Website is truncating the 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            # value field so we are only testing that part that is not  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            # truncated.  This should be accurate enough. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            _debug "Deleting TXT record for $fulldomain, $txtvalue" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            _freedns_delete_txt_record "$FREEDNS_COOKIE" "$DNSdataid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            return $? 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-          fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				- 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-        fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    done 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    echo "$htmlpage" | grep "value=\""$txtvalue"\"" >/dev/null 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    if [ "$?" = "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      # Found a match... delete the record and return 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      _info "Deleting TXT record for $fulldomain, $txtvalue" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      _freedns_delete_txt_record "$FREEDNS_COOKIE" "$dataid" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      return $? 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   done 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  # If we get this far we did not find a match (after two attempts) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # If we get this far we did not find a match 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   # Not necessarily an error, but log anyway. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  _debug3 "$subdomain_csv" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   _info "Cannot delete TXT record for $fulldomain, $txtvalue. Does not exist at FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   return 0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 } 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -271,6 +197,33 @@ _freedns_retrieve_subdomain_page() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   return 0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 } 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# usage _freedns_retrieve_data_page login_cookies data_id 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# echo page retrieved (html) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# returns 0 success 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_freedns_retrieve_data_page() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  export _H1="Cookie:$1" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  export _H2="Accept-Language:en-US" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  data_id="$2" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  url="https://freedns.afraid.org/subdomain/edit.php?data_id=$2" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  _debug "Retrieve data page for ID $data_id from FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  htmlpage="$(_get "$url")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  if [ "$?" != "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _err "FreeDNS retrieve data page failed bad RC from _get" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  elif [ -z "$htmlpage" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _err "FreeDNS returned empty data page" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  _debug3 "htmlpage: $htmlpage" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  printf "%s" "$htmlpage" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  return 0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 # usage _freedns_add_txt_record login_cookies domain_id subdomain value 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 # returns 0 success 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _freedns_add_txt_record() { 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -324,3 +277,95 @@ _freedns_delete_txt_record() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   _info "Deleted acme challenge TXT record for $fulldomain at FreeDNS" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   return 0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 } 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# usage _freedns_domain_id domain_name 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# echo the domain_id if found 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# return 0 success 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_freedns_domain_id() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # Start by escaping the dots in the domain name 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  search_domain="$(echo "$1" | sed 's/\./\\./g')" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # Sometimes FreeDNS does not return the subdomain page but rather 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # returns a page regarding becoming a premium member.  This usually 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # happens after a period of inactivity.  Immediately trying again 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # returns the correct subdomain page.  So, we will try twice to 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # load the page and obtain our domain ID 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  attempts=2 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  while [ "$attempts" -gt "0" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    attempts="$(_math "$attempts" - 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    htmlpage="$(_freedns_retrieve_subdomain_page "$FREEDNS_COOKIE")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    if [ "$?" != "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      if [ "$using_cached_cookies" = "true" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        _err "Has your FreeDNS username and password changed?  If so..." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        _err "Please export as FREEDNS_User / FREEDNS_Password and try again." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    domain_id="$(echo "$htmlpage" | tr -d "[:space:]" | sed 's/<tr>/@<tr>/g' | tr '@' '\n' \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | grep "<td>$search_domain</td>\|<td>$search_domain(.*)</td>" \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | _egrep_o "edit\.php\?edit_domain_id=[0-9a-zA-Z]+" \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | cut -d = -f 2)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # The above beauty extracts domain ID from the html page... 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # strip out all blank space and new lines. Then insert newlines 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # before each table row <tr> 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # search for the domain within each row (which may or may not have 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # a text string in brackets (.*) after it. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # And finally extract the domain ID. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    if [ -n "$domain_id" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      printf "%s" "$domain_id" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      return 0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _debug "Domain $search_domain not found. Retry loading subdomain page ($attempts attempts remaining)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  done 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  _debug "Domain $search_domain not found after retry" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# usage _freedns_data_id domain_name record_type 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# echo the data_id(s) if found 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+# return 0 success 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_freedns_data_id() { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # Start by escaping the dots in the domain name 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  search_domain="$(echo "$1" | sed 's/\./\\./g')" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  record_type="$2" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # Sometimes FreeDNS does not return the subdomain page but rather 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # returns a page regarding becoming a premium member.  This usually 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # happens after a period of inactivity.  Immediately trying again 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # returns the correct subdomain page.  So, we will try twice to 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  # load the page and obtain our domain ID 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  attempts=2 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  while [ "$attempts" -gt "0" ]; do 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    attempts="$(_math "$attempts" - 1)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    htmlpage="$(_freedns_retrieve_subdomain_page "$FREEDNS_COOKIE")" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    if [ "$?" != "0" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      if [ "$using_cached_cookies" = "true" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        _err "Has your FreeDNS username and password changed?  If so..." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        _err "Please export as FREEDNS_User / FREEDNS_Password and try again." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    data_id="$(echo "$htmlpage" | tr -d "[:space:]" | sed 's/<tr>/@<tr>/g' | tr '@' '\n' \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | grep "<td[a-zA-Z=#]*>$record_type</td>" \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | grep "<ahref.*>$search_domain</a>" \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | _egrep_o "edit\.php\?data_id=[0-9a-zA-Z]+" \ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      | cut -d = -f 2)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # The above beauty extracts data ID from the html page... 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # strip out all blank space and new lines. Then insert newlines 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # before each table row <tr> 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # search for the record type withing each row (e.g. TXT) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # search for the domain within each row (which is within a <a..> 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    # </a> anchor. And finally extract the domain ID.          
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    if [ -n "$data_id" ]; then 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      printf "%s" "$data_id" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      return 0 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    fi 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    _debug "Domain $search_domain not found. Retry loading subdomain page ($attempts attempts remaining)" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  done 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  _debug "Domain $search_domain not found after retry" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  return 1 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+} 
			 |