36 lines
858 B
Crystal
36 lines
858 B
Crystal
|
require "json"
|
||
|
|
require "../src/storage/zone.cr"
|
||
|
|
|
||
|
|
alias DSZ = DNSManager::Storage::Zone
|
||
|
|
|
||
|
|
#
|
||
|
|
# Create a zone file.
|
||
|
|
#
|
||
|
|
|
||
|
|
if ARGV.size < 1
|
||
|
|
puts "usage: domain"
|
||
|
|
exit 0
|
||
|
|
end
|
||
|
|
|
||
|
|
domain = ARGV[0]
|
||
|
|
zone = DSZ.new domain
|
||
|
|
|
||
|
|
#
|
||
|
|
# Add some values.
|
||
|
|
#
|
||
|
|
|
||
|
|
zone << DSZ::SOA.new "#{domain}.", # name
|
||
|
|
3600.to_u32, # TTL
|
||
|
|
"ns0.arn-fai.net.", # Master Name Server for the zone
|
||
|
|
"dnsmaster.arn-fai.net.", # admin email address
|
||
|
|
2023070100.to_u64, # serial
|
||
|
|
3600.to_u64, # refresh
|
||
|
|
600.to_u64, # retry
|
||
|
|
2419200.to_u64, # expire
|
||
|
|
600.to_u64 # minimum TTL
|
||
|
|
|
||
|
|
zone << DSZ::NS.new "#{domain}.", 3600.to_u32, "ns0.arn-fai.net."
|
||
|
|
zone << DSZ::NS.new "#{domain}.", 3600.to_u32, "alsace.tetaneutral.net."
|
||
|
|
|
||
|
|
File.write("#{domain}.json", zone.to_json)
|