Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
ruanhaishen
Acme.Sh
Commits
5b1b5cc8
Unverified
Commit
5b1b5cc8
authored
Apr 29, 2019
by
mod242
Committed by
GitHub
Apr 29, 2019
Browse files
Create dns_schlundtech.sh
parent
1b062ab9
Changes
1
Hide whitespace changes
Inline
Side-by-side
dnsapi/dns_schlundtech.sh
0 → 100644
View file @
5b1b5cc8
#!/usr/bin/env sh
# -*- mode: sh; tab-width: 2; indent-tabs-mode: s; coding: utf-8 -*-
# Schlundtech DNS API
# Author: mod242
# Created: 2019-40-29
# Completly based on the autoDNS xml api wrapper by auerswald@gmail.com
#
# export SCHLUNDTECH_USER="username"
# export SCHLUNDTECH_PASSWORD="password"
#
# Usage:
# acme.sh --issue --dns dns_autodns -d example.com
AUTODNS_API
=
"https://gateway.schlundtech.de"
# Arguments:
# txtdomain
# txt
dns_schlundtech_add
()
{
fulldomain
=
"
$1
"
txtvalue
=
"
$2
"
SCHLUNDTECH_USER
=
"
${
SCHLUNDTECH_USER
:-
$(
_readaccountconf_mutable AUTODNS_USER
)
}
"
SCHLUNDTECH_PASSWORD
=
"
${
SCHLUNDTECH_PASSWORD
:-
$(
_readaccountconf_mutable AUTODNS_PASSWORD
)
}
"
if
[
-z
"
$SCHLUNDTECH_USER
"
]
||
[
-z
"
$SCHLUNDTECH_PASSWORD
"
]
;
then
_err
"You didn't specify schlundtech user and password."
return
1
fi
_saveaccountconf_mutable SCHLUNDTECH_USER
"
$SCHLUNDTECH_USER
"
_saveaccountconf_mutable SCHLUNDTECH_PASSWORD
"
$SCHLUNDTECH_PASSWORD
"
_debug
"First detect the root zone"
if
!
_get_autodns_zone
"
$fulldomain
"
;
then
_err
"invalid domain"
return
1
fi
_debug _sub_domain
"
$_sub_domain
"
_debug _zone
"
$_zone
"
_debug _system_ns
"
$_system_ns
"
_info
"Adding TXT record"
autodns_response
=
"
$(
_autodns_zone_update
"
$_zone
"
"
$_sub_domain
"
"
$txtvalue
"
"
$_system_ns
"
)
"
if
[
"
$?
"
-eq
"0"
]
;
then
_info
"Added, OK"
return
0
fi
return
1
}
# Arguments:
# txtdomain
# txt
dns_schlundtech_rm
()
{
fulldomain
=
"
$1
"
txtvalue
=
"
$2
"
SCHLUNDTECH_USER
=
"
${
SCHLUNDTECH_USER
:-
$(
_readaccountconf_mutable AUTODNS_USER
)
}
"
SCHLUNDTECH_PASSWORD
=
"
${
SCHLUNDTECH_PASSWORD
:-
$(
_readaccountconf_mutable AUTODNS_PASSWORD
)
}
"
if
[
-z
"
$SCHLUNDTECH_USER
"
]
||
[
-z
"
$SCHLUNDTECH_PASSWORD
"
]
;
then
_err
"You didn't specify schlundtech user and password."
return
1
fi
_debug
"First detect the root zone"
if
!
_get_autodns_zone
"
$fulldomain
"
;
then
_err
"zone not found"
return
1
fi
_debug _sub_domain
"
$_sub_domain
"
_debug _zone
"
$_zone
"
_debug _system_ns
"
$_system_ns
"
_info
"Delete TXT record"
autodns_response
=
"
$(
_autodns_zone_cleanup
"
$_zone
"
"
$_sub_domain
"
"
$txtvalue
"
"
$_system_ns
"
)
"
if
[
"
$?
"
-eq
"0"
]
;
then
_info
"Deleted, OK"
return
0
fi
return
1
}
#################### Private functions below ##################################
# Arguments:
# fulldomain
# Returns:
# _sub_domain=_acme-challenge.www
# _zone=domain.com
# _system_ns
_get_autodns_zone
()
{
domain
=
"
$1
"
i
=
2
p
=
1
while
true
;
do
h
=
$(
printf
"%s"
"
$domain
"
|
cut
-d
.
-f
$i
-100
)
_debug h
"
$h
"
if
[
-z
"
$h
"
]
;
then
# not valid
return
1
fi
autodns_response
=
"
$(
_autodns_zone_inquire
"
$h
"
)
"
if
[
"
$?
"
-ne
"0"
]
;
then
_err
"invalid domain"
return
1
fi
if
_contains
"
$autodns_response
"
"<summary>1</summary>"
>
/dev/null
;
then
_zone
=
"
$(
echo
"
$autodns_response
"
| _egrep_o
'<name>[^<]*</name>'
|
cut
-d
'>'
-f
2 |
cut
-d
'<'
-f
1
)
"
_system_ns
=
"
$(
echo
"
$autodns_response
"
| _egrep_o
'<system_ns>[^<]*</system_ns>'
|
cut
-d
'>'
-f
2 |
cut
-d
'<'
-f
1
)
"
_sub_domain
=
$(
printf
"%s"
"
$domain
"
|
cut
-d
.
-f
1-
$p
)
return
0
fi
p
=
$i
i
=
$(
_math
"
$i
"
+ 1
)
done
return
1
}
_build_request_auth_xml
()
{
printf
"<auth>
<user>%s</user>
<password>%s</password>
<context>10</context>
</auth>"
"
$SCHLUNDTECH_USER
"
"
$SCHLUNDTECH_PASSWORD
"
}
# Arguments:
# zone
_build_zone_inquire_xml
()
{
printf
"<?xml version=
\"
1.0
\"
encoding=
\"
UTF-8
\"
?>
<request>
%s
<task>
<code>0205</code>
<view>
<children>1</children>
<limit>1</limit>
</view>
<where>
<key>name</key>
<operator>eq</operator>
<value>%s</value>
</where>
</task>
</request>"
"
$(
_build_request_auth_xml
)
"
"
$1
"
}
# Arguments:
# zone
# subdomain
# txtvalue
# system_ns
_build_zone_update_xml
()
{
printf
"<?xml version=
\"
1.0
\"
encoding=
\"
UTF-8
\"
?>
<request>
%s
<task>
<code>0202001</code>
<default>
<rr_add>
<name>%s</name>
<ttl>600</ttl>
<type>TXT</type>
<value>%s</value>
</rr_add>
</default>
<zone>
<name>%s</name>
<system_ns>%s</system_ns>
</zone>
</task>
</request>"
"
$(
_build_request_auth_xml
)
"
"
$2
"
"
$3
"
"
$1
"
"
$4
"
}
# Arguments:
# zone
_autodns_zone_inquire
()
{
request_data
=
"
$(
_build_zone_inquire_xml
"
$1
"
)
"
autodns_response
=
"
$(
_autodns_api_call
"
$request_data
"
)
"
ret
=
"
$?
"
printf
"%s"
"
$autodns_response
"
return
"
$ret
"
}
# Arguments:
# zone
# subdomain
# txtvalue
# system_ns
_autodns_zone_update
()
{
request_data
=
"
$(
_build_zone_update_xml
"
$1
"
"
$2
"
"
$3
"
"
$4
"
)
"
autodns_response
=
"
$(
_autodns_api_call
"
$request_data
"
)
"
ret
=
"
$?
"
printf
"%s"
"
$autodns_response
"
return
"
$ret
"
}
# Arguments:
# zone
# subdomain
# txtvalue
# system_ns
_autodns_zone_cleanup
()
{
request_data
=
"
$(
_build_zone_update_xml
"
$1
"
"
$2
"
"
$3
"
"
$4
"
)
"
# replace 'rr_add>' with 'rr_rem>' in request_data
request_data
=
"
$(
printf
--
"%s"
"
$request_data
"
|
sed
's/rr_add>/rr_rem>/g'
)
"
autodns_response
=
"
$(
_autodns_api_call
"
$request_data
"
)
"
ret
=
"
$?
"
printf
"%s"
"
$autodns_response
"
return
"
$ret
"
}
# Arguments:
# request_data
_autodns_api_call
()
{
request_data
=
"
$1
"
_debug request_data
"
$request_data
"
autodns_response
=
"
$(
_post
"
$request_data
"
"
$AUTODNS_API
"
)
"
ret
=
"
$?
"
_debug autodns_response
"
$autodns_response
"
if
[
"
$ret
"
-ne
"0"
]
;
then
_err
"error"
return
1
fi
if
_contains
"
$autodns_response
"
"<type>success</type>"
>
/dev/null
;
then
_info
"success"
printf
"%s"
"
$autodns_response
"
return
0
fi
return
1
}
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment