generalize bosh lite networks generation

Signed-off-by: Chris Brown <cbrown@pivotal.io>

templates/generate-bosh-lite-networks.rb

@@ -0,0 +1,67 @@
+require "optparse"
+require "yaml"
+require "netaddr"
+
+options = {
+  networks: {}
+}
+
+OptionParser.new do |opts|
+  opts.banner = "Usage: example.rb [options]"
+
+  current_network = nil
+
+  opts.on("-nNAME", "--name=NAME", "network name") do |v|
+    current_network = v
+
+    options[:networks][v] = {
+      start: nil,
+      size: 0,
+      static_ips: 0,
+    }
+  end
+
+  opts.on("-cCIDR", "--cidr=CIDR", "subnet start cidr") do |v|
+    options[:networks][current_network][:start] = NetAddr::CIDR.create(v)
+  end
+
+  opts.on("-sSIZE", "--size=SIZE", "subnet size") do |v|
+    options[:networks][current_network][:size] = v.to_i
+  end
+
+  opts.on("-iSTATIC_IPS", "--static-ips=STATIC_IPS", "subnet static ips") do |v|
+    options[:networks][current_network][:static_ips] = v.to_i
+  end
+end.parse!
+
+networks = []
+
+options[:networks].each do |network_name, config|
+  subnets = []
+
+  cur = config[:start]
+  config[:size].times do
+    subnets << cur
+    cur = NetAddr::CIDR.create(cur.next_subnet)
+  end
+
+  networks.push({
+    "name" => network_name,
+    "subnets" => subnets.collect.with_index do |subnet, idx|
+      {
+        "range" => subnet.to_s,
+        "reserved" => [subnet[1].ip],
+        "static" => idx < config[:static_ips] ? [subnet[2].ip] : [],
+        "cloud_properties" => {
+          "name" => "random",
+        },
+      }
+    end,
+  })
+end
+
+# skip leading --- so this can be copied
+YAML.dump("networks" => networks).each_line.with_index do |l, i|
+  next if i == 0
+  print l
+end