add luci-app-dnspod package
This commit is contained in:
coolsnowwolf
parent
0997d1c60c
commit
cbb887bdd8
51
package/lean/luci-app-dnspod/Makefile
Normal file
51
package/lean/luci-app-dnspod/Makefile
Normal file
@ -0,0 +1,51 @@
|
|||||||
|
include $(TOPDIR)/rules.mk
|
||||||
|
|
||||||
|
PKG_NAME:=luci-app-dnspod
|
||||||
|
PKG_VERSION=1.0
|
||||||
|
PKG_RELEASE:=1
|
||||||
|
|
||||||
|
PKG_BUILD_DIR:=$(BUILD_DIR)/$(PKG_NAME)
|
||||||
|
|
||||||
|
include $(INCLUDE_DIR)/package.mk
|
||||||
|
include $(INCLUDE_DIR)/host-build.mk
|
||||||
|
|
||||||
|
define Package/luci-app-dnspod
|
||||||
|
SECTION:=luci
|
||||||
|
CATEGORY:=LuCI
|
||||||
|
SUBMENU:=3. Applications
|
||||||
|
TITLE:=Auto DNS for dnspod
|
||||||
|
PKGARCH:=all
|
||||||
|
DEPENDS:= +curl +libcurl
|
||||||
|
endef
|
||||||
|
|
||||||
|
define Package/luci-app-dnspod/description
|
||||||
|
auto get pub ip,dnspod ddns,must include curl with ssl
|
||||||
|
endef
|
||||||
|
|
||||||
|
define Build/Prepare
|
||||||
|
endef
|
||||||
|
|
||||||
|
define Build/Configure
|
||||||
|
endef
|
||||||
|
|
||||||
|
define Build/Compile
|
||||||
|
endef
|
||||||
|
|
||||||
|
define Package/luci-app-dnspod/install
|
||||||
|
$(INSTALL_DIR) $(1)/etc/config
|
||||||
|
$(INSTALL_DIR) $(1)/etc/init.d
|
||||||
|
$(INSTALL_DIR) $(1)/usr/lib/lua/luci/model/cbi
|
||||||
|
$(INSTALL_DIR) $(1)/usr/lib/lua/luci/controller
|
||||||
|
|
||||||
|
$(INSTALL_CONF) ./files/root/etc/config/dnspod $(1)/etc/config/dnspod
|
||||||
|
$(INSTALL_BIN) ./files/root/etc/init.d/dnspod $(1)/etc/init.d/dnspod
|
||||||
|
$(INSTALL_DATA) ./files/root/usr/lib/lua/luci/model/cbi/dnspod.lua $(1)/usr/lib/lua/luci/model/cbi/dnspod.lua
|
||||||
|
$(INSTALL_DATA) ./files/root/usr/lib/lua/luci/controller/dnspod.lua $(1)/usr/lib/lua/luci/controller/dnspod.lua
|
||||||
|
$(INSTALL_DIR) $(1)/usr/sbin
|
||||||
|
$(INSTALL_BIN) ./files/dnspod.sh $(1)/usr/sbin
|
||||||
|
endef
|
||||||
|
|
||||||
|
$(eval $(call BuildPackage,luci-app-dnspod))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
193
package/lean/luci-app-dnspod/files/dnspod.sh
Executable file
193
package/lean/luci-app-dnspod/files/dnspod.sh
Executable file
@ -0,0 +1,193 @@
|
|||||||
|
#!/bin/sh
|
||||||
|
#written by benson huang
|
||||||
|
#admin@zhetenger.com
|
||||||
|
#http://www.terryche.me/openwrt-dnspod-ddns.html
|
||||||
|
|
||||||
|
#dnspod帐号名
|
||||||
|
email=`uci get dnspod.base_arg.login_email`
|
||||||
|
|
||||||
|
#dnspod密码
|
||||||
|
password=`uci get dnspod.base_arg.login_password 2>/dev/null`
|
||||||
|
|
||||||
|
#域名
|
||||||
|
domainname=`uci get dnspod.base_arg.main_domain 2>/dev/null`
|
||||||
|
|
||||||
|
#需要更新的子域名列表，多个的话，以空格分割。
|
||||||
|
#例如：
|
||||||
|
# sub_domains='www home'
|
||||||
|
sub_domains=`uci get dnspod.base_arg.sub_domain 2>/dev/null`
|
||||||
|
|
||||||
|
#check for changed ip every 300 seconds
|
||||||
|
wait=300
|
||||||
|
|
||||||
|
#检查是否安装curl
|
||||||
|
curl_status=`which curl 2>/dev/null`
|
||||||
|
[ -n "$curl_status" ] || { echo "curl is not installed";exit 3; }
|
||||||
|
|
||||||
|
os=$(uname -a | egrep -io 'openwrt' | tr [A-Z] [a-z])
|
||||||
|
|
||||||
|
API_url="https://dnsapi.cn"
|
||||||
|
format='json'
|
||||||
|
lang='en'
|
||||||
|
record_type='A'
|
||||||
|
offset="2"
|
||||||
|
length=""
|
||||||
|
common_options="--data-urlencode \"login_email=${email}\"\
|
||||||
|
--data-urlencode \"login_password=${password}\"\
|
||||||
|
--data-urlencode \"format=${format}\"\
|
||||||
|
--data-urlencode \"lang=${lang}\""
|
||||||
|
PROGRAM=$(basename $0)
|
||||||
|
is_svc=0
|
||||||
|
|
||||||
|
printMsg() {
|
||||||
|
local msg="$1"
|
||||||
|
if [ $is_svc -eq 1 ];then
|
||||||
|
logger -t ${PROGRAM} "${msg}"
|
||||||
|
else
|
||||||
|
echo $msg
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
getIp() {
|
||||||
|
# curl -s http://checkip.dyndns.com | sed -n 's/.*: \([0-9]\{1,3\}\.[0-9]\{1,3\}\.[0-9]\{1,3\}\.[0-9]\{1,3\}\).*/\1/p'
|
||||||
|
curl -s http://members.3322.org/dyndns/getip
|
||||||
|
}
|
||||||
|
|
||||||
|
getJsonValue(){
|
||||||
|
local params="$1"
|
||||||
|
echo $json_data | sed 's/\\\\\//\//g' | sed 's/[{}]//g;s/\(\[\|\]\)//g' |\
|
||||||
|
awk -F ',' '{ for (i=1;i<=NF;i++) { print $i }}' |\
|
||||||
|
sed 's/":/\|/g;s/"//g' |\
|
||||||
|
awk -v k="$params" -F'|' '{ if ($(NF - 1) == k ) print $NF }'
|
||||||
|
}
|
||||||
|
|
||||||
|
execAPI() {
|
||||||
|
local action="$1"
|
||||||
|
local extra_options="$2"
|
||||||
|
eval "curl -k -A 'xddns' ${API_url}/${action} ${common_options} ${extra_options}"
|
||||||
|
}
|
||||||
|
|
||||||
|
getDomainId() {
|
||||||
|
local extra_options="--data-urlencode \"domain=${domainname}\""
|
||||||
|
json_data=$(execAPI "Domain.info" "${extra_options}")
|
||||||
|
getJsonValue id
|
||||||
|
}
|
||||||
|
|
||||||
|
getRecordId() {
|
||||||
|
local extra_options
|
||||||
|
for sub_domain in $sub_domains;do
|
||||||
|
extra_options="--data-urlencode \"record_type=${record_type}\"\
|
||||||
|
--data-urlencode \"domain_id=${domain_id}\"\
|
||||||
|
--data-urlencode \"sub_domain=${sub_domain}\"\
|
||||||
|
--data-urlencode \"offset=${offset}\"\
|
||||||
|
--data-urlencode \"length=${length}\""
|
||||||
|
|
||||||
|
json_data=$(execAPI "Record.List" "${extra_options}")
|
||||||
|
|
||||||
|
#check if record type is NS
|
||||||
|
IS_NS=$(getJsonValue type | grep -o 'NS' | head -n1)
|
||||||
|
|
||||||
|
#if there are multi @ subdomains, get the first non-NS record id only
|
||||||
|
if [ "$IS_NS" = "NS" ];then
|
||||||
|
numofline=$(getJsonValue id | sed '/^[0-9]\{7\}$/d' | wc -l)
|
||||||
|
[ $numofline -eq 3 ] && tmp_result_id="$(getJsonValue id | sed '/^[0-9]\{7\}$/d' | head -n1 )" || continue
|
||||||
|
else
|
||||||
|
tmp_result_id="$(getJsonValue id | sed '/^[0-9]\{7\}$/d')"
|
||||||
|
fi
|
||||||
|
#if result_id is not empty or unset, append a space to split record id
|
||||||
|
result_id="${result_id:+${result_id} }${tmp_result_id}"
|
||||||
|
done
|
||||||
|
echo $result_id
|
||||||
|
exit
|
||||||
|
}
|
||||||
|
|
||||||
|
updateRecord() {
|
||||||
|
local record_id_list
|
||||||
|
local extra_options
|
||||||
|
local tmp=${sub_domains}
|
||||||
|
local tmp_sub_domains
|
||||||
|
printMsg 'Start update records'
|
||||||
|
record_id_list=$(getRecordId)
|
||||||
|
printMsg "Records IDs: ${record_id_list}"
|
||||||
|
for record_id in $record_id_list;do
|
||||||
|
tmp_sub_domains=$(echo $tmp | awk '{ print $1 }')
|
||||||
|
tmp=${tmp#* }
|
||||||
|
extra_options="--data-urlencode \"domain_id=${domain_id}\"\
|
||||||
|
--data-urlencode \"record_id=${record_id}\"\
|
||||||
|
--data-urlencode \"sub_domain=${tmp_sub_domains}\"\
|
||||||
|
--data-urlencode \"record_type=${record_type}\"\
|
||||||
|
--data-urlencode \"record_line=默认\"\
|
||||||
|
--data-urlencode \"value=${pub_ip_addr}\"\
|
||||||
|
--data-urlencode \"mx=1\""
|
||||||
|
json_data=$(execAPI "Record.Modify" "${extra_options}")
|
||||||
|
printMsg "Update [${tmp_sub_domains}.${domainname}] ${record_type} record to [${pub_ip_addr}] : $(getJsonValue message)"
|
||||||
|
done
|
||||||
|
printMsg 'Update records finish'
|
||||||
|
}
|
||||||
|
|
||||||
|
checkip() {
|
||||||
|
local oldip=$pub_ip_addr
|
||||||
|
pub_ip_addr=$(getIp)
|
||||||
|
printMsg "old ip: [$oldip], new ip: [$pub_ip_addr]"
|
||||||
|
if [ "$pub_ip_addr" != "$oldip" ];then
|
||||||
|
return 8
|
||||||
|
else
|
||||||
|
return 3
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
updateTunnelBroker() {
|
||||||
|
printMsg "Start Update Tunnel Broker"
|
||||||
|
printMsg "User Name: ***, Tunnel ID: ***"
|
||||||
|
result=$(curl -s --insecure https://ipv4.tunnelbroker.net/nic/update --data-urlencode "username=***" --data-urlencode "password=***" --data-urlencode "hostname=***")
|
||||||
|
printMsg "Update Tunnel Broker: ${result}"
|
||||||
|
printMsg "Update Tunnel Broker finish"
|
||||||
|
}
|
||||||
|
|
||||||
|
execSvc() {
|
||||||
|
local ip
|
||||||
|
#check that whether the network is ok
|
||||||
|
while [ 1 ];do
|
||||||
|
ip=$(getIp)
|
||||||
|
if [ -n "$ip" ];then
|
||||||
|
printMsg "WAN IP: ${ip}"
|
||||||
|
break;
|
||||||
|
else
|
||||||
|
printMsg "Can't get wan ip"
|
||||||
|
sleep 30
|
||||||
|
fi
|
||||||
|
done
|
||||||
|
|
||||||
|
domain_id=`getDomainId $domainname`
|
||||||
|
printMsg "domain_id: ${domain_id}"
|
||||||
|
while [ 1 ];do
|
||||||
|
checkip
|
||||||
|
if [ $? -eq 8 ];then
|
||||||
|
updateRecord
|
||||||
|
#updateTunnelBroker
|
||||||
|
fi
|
||||||
|
sleep $wait
|
||||||
|
done
|
||||||
|
}
|
||||||
|
|
||||||
|
execUpdate() {
|
||||||
|
domain_id=`getDomainId $domainname`
|
||||||
|
pub_ip_addr=$(getIp)
|
||||||
|
updateRecord
|
||||||
|
}
|
||||||
|
|
||||||
|
case $1 in
|
||||||
|
--svc)
|
||||||
|
is_svc=1;
|
||||||
|
printMsg 'Start in Service mode';
|
||||||
|
printMsg "domain: ${domainname}, sub_domains: ${sub_domains}";
|
||||||
|
execSvc;;
|
||||||
|
--ipv6)
|
||||||
|
is_svc=0;
|
||||||
|
printMsg "Start update HE Tunnel Broker";
|
||||||
|
updateTunnelBroker;;
|
||||||
|
*)
|
||||||
|
is_svc=0;
|
||||||
|
printMsg "Start update record, domain: ${domainname}, sub_domains: ${sub_domains}";
|
||||||
|
execUpdate;;
|
||||||
|
esac
|
||||||
@ -0,0 +1,6 @@
|
|||||||
|
config base_arg "base_arg"
|
||||||
|
option login_email ''
|
||||||
|
option login_password ''
|
||||||
|
option main_domain ''
|
||||||
|
option sub_domain ''
|
||||||
|
|
||||||
18
package/lean/luci-app-dnspod/files/root/etc/init.d/dnspod
Executable file
18
package/lean/luci-app-dnspod/files/root/etc/init.d/dnspod
Executable file
@ -0,0 +1,18 @@
|
|||||||
|
#!/bin/sh /etc/rc.common
|
||||||
|
START=80
|
||||||
|
|
||||||
|
run_reboot()
|
||||||
|
{
|
||||||
|
killall dnspod.sh
|
||||||
|
/sbin/dnspod.sh --svc
|
||||||
|
}
|
||||||
|
|
||||||
|
start()
|
||||||
|
{
|
||||||
|
/sbin/dnspod.sh --svc
|
||||||
|
}
|
||||||
|
|
||||||
|
stop()
|
||||||
|
{
|
||||||
|
killall dnspod.sh
|
||||||
|
}
|
||||||
@ -0,0 +1,5 @@
|
|||||||
|
module("luci.controller.dnspod", package.seeall)
|
||||||
|
|
||||||
|
function index()
|
||||||
|
entry({"admin", "network", "dnspod"}, cbi("dnspod"), _("动态DNSPOD"), 100)
|
||||||
|
end
|
||||||
@ -0,0 +1,32 @@
|
|||||||
|
--[[
|
||||||
|
LuCI - Lua Configuration Interface
|
||||||
|
|
||||||
|
Copyright 2010 Jo-Philipp Wich <xm@subsignal.org>
|
||||||
|
|
||||||
|
Licensed under the Apache License, Version 2.0 (the "License");
|
||||||
|
you may not use this file except in compliance with the License.
|
||||||
|
You may obtain a copy of the License at
|
||||||
|
|
||||||
|
http://www.apache.org/licenses/LICENSE-2.0
|
||||||
|
]]--
|
||||||
|
|
||||||
|
require("luci.sys")
|
||||||
|
|
||||||
|
m = Map("dnspod", translate("动态DNSPOD"), translate("配置动态DNSPOD"))
|
||||||
|
|
||||||
|
s = m:section(TypedSection, "base_arg", "")
|
||||||
|
s.addremove = false
|
||||||
|
s.anonymous = true
|
||||||
|
|
||||||
|
email = s:option(Value, "login_email", translate("登录邮箱"),"登录DNSPOD的用户名")
|
||||||
|
pass = s:option(Value, "login_password", translate("登录密码"),"登录DNSPOD的密码")
|
||||||
|
pass.password=true
|
||||||
|
main = s:option(Value, "main_domain", translate("主域名"),"想要解析的主域名，例如:baidu.com")
|
||||||
|
sub = s:option(Value, "sub_domain", translate("子域名"),"想要解析的子域名，多个以空格分开，例如:test hehe")
|
||||||
|
|
||||||
|
local apply = luci.http.formvalue("cbi.apply")
|
||||||
|
if apply then
|
||||||
|
io.popen("/etc/init.d/dnspod restart &")
|
||||||
|
end
|
||||||
|
|
||||||
|
return m
|
||||||
Loading…
x
Reference in New Issue
Block a user