autoload :IPAddr, 'ipaddr' require 'fileutils' module LeapCli; module Commands desc "Manage local virtual machines." long_desc "This command provides a convenient way to manage Vagrant-based virtual machines. If FILTER argument is missing, the command runs on all local virtual machines. The Vagrantfile is automatically generated in 'test/Vagrantfile'. If you want to run vagrant commands manually, cd to 'test'." command [:local, :l] do |local| local.desc 'Starts up the virtual machine(s)' local.arg_name 'FILTER', :optional => true #, :multiple => false local.command :start do |start| start.flag(:basebox, :desc => "The basebox to use. This value is passed to vagrant as the "+ "`config.vm.box` option. The value here should be the name of an installed box or a "+ "shorthand name of a box in HashiCorp's Atlas.", :arg_name => 'BASEBOX', :default_value => 'LEAP/jessie' ) start.action do |global_options,options,args| vagrant_command(["up", "sandbox on"], args, options) end end local.desc 'Shuts down the virtual machine(s)' local.arg_name 'FILTER', :optional => true #, :multiple => false local.command :stop do |stop| stop.action do |global_options,options,args| if global_options[:yes] vagrant_command("halt --force", args) else vagrant_command("halt", args) end end end local.desc 'Destroys the virtual machine(s), reclaiming the disk space' local.arg_name 'FILTER', :optional => true #, :multiple => false local.command [:rm, :destroy] do |destroy| destroy.action do |global_options,options,args| if global_options[:yes] vagrant_command("destroy --force", args) else vagrant_command("destroy", args) end end end local.desc 'Print the status of local virtual machine(s)' local.arg_name 'FILTER', :optional => true #, :multiple => false local.command [:ls, :status] do |status| status.action do |global_options,options,args| vagrant_command("status", args) end end local.desc 'Saves the current state of the virtual machine as a new snapshot' local.arg_name 'FILTER', :optional => true #, :multiple => false local.command :save do |status| status.action do |global_options,options,args| vagrant_command("sandbox commit", args) end end local.desc 'Resets virtual machine(s) to the last saved snapshot' local.arg_name 'FILTER', :optional => true #, :multiple => false local.command :reset do |reset| reset.action do |global_options,options,args| vagrant_command("sandbox rollback", args) end end end protected def vagrant_command(cmds, args, options={}) vagrant_setup(options) cmds = cmds.to_a if args.empty? nodes = [""] else nodes = manager.filter(args)[:environment => "local"].field(:name) end if nodes.any? vagrant_dir = File.dirname(Path.named_path(:vagrantfile)) exec = ["cd #{vagrant_dir}"] cmds.each do |cmd| nodes.each do |node| exec << "vagrant #{cmd} #{node}" end end execute exec.join('; ') else bail! "No nodes found. This command only works on nodes with ip_address in the network #{LeapCli.leapfile.vagrant_network}" end end private def vagrant_setup(options) assert_bin! 'vagrant', 'Vagrant is required for running local virtual machines. Run "sudo apt-get install vagrant".' assert! (vagrant_version >= Gem::Version.new('1.1')), 'Vagrant version >= 1.1 is required for running local virtual machines. Please upgrade.' unless assert_run!('vagrant plugin list | grep sahara | cat').chars.any? log :installing, "vagrant plugin 'sahara'" assert_run! 'vagrant plugin install sahara' end create_vagrant_file(options) end def vagrant_version @vagrant_version ||= Gem::Version.new(assert_run!('vagrant --version').split(' ')[1]) end def execute(cmd) log 2, :run, cmd exec cmd end def create_vagrant_file(options) lines = [] basebox = options[:basebox] || 'LEAP/jessie' # override basebox with custom setting from Leapfile or ~/.leaprc basebox = leapfile.vagrant_basebox || basebox lines << %[Vagrant.configure("2") do |config|] manager.each_node do |node| if node.vagrant? lines << %[ config.vm.define :#{node.name} do |config|] lines << %[ config.vm.box = "#{basebox}"] lines << %[ config.vm.network :private_network, ip: "#{node.ip_address}"] lines << %[ config.vm.provider "virtualbox" do |v|] lines << %[ v.customize ["modifyvm", :id, "--natdnshostresolver1", "on"]] lines << %[ v.name = "#{node.name}"] lines << %[ v.memory = 2048] lines << %[ end] lines << %[ config.vm.provider "libvirt" do |v|] lines << %[ v.memory = 2048] lines << %[ end] lines << %[ #{leapfile.custom_vagrant_vm_line}] if leapfile.custom_vagrant_vm_line lines << %[ end] end end lines << %[end] lines << "" write_file! :vagrantfile, lines.join("\n") end def pick_next_vagrant_ip_address taken_ips = manager.nodes[:environment => "local"].field(:ip_address) if taken_ips.any? highest_ip = taken_ips.map{|ip| IPAddr.new(ip)}.max new_ip = highest_ip.succ else new_ip = IPAddr.new(LeapCli.leapfile.vagrant_network).succ.succ end return new_ip.to_s end end; end