vagrant-lxc-ng/lib/vagrant-lxc/container.rb

206 lines
6.1 KiB
Ruby
Raw Normal View History

2013-03-01 23:45:13 +00:00
# FIXME: Ruby 1.8 users dont have SecureRandom
require 'securerandom'
2013-03-02 23:36:06 +00:00
require "vagrant/util/retryable"
require "vagrant/util/subprocess"
2013-03-01 23:45:13 +00:00
require "vagrant-lxc/errors"
2013-03-01 03:34:51 +00:00
module Vagrant
module LXC
class Container
# Root folder where containers are stored
CONTAINERS_PATH = '/var/lib/lxc'
2013-03-01 23:45:13 +00:00
# Include this so we can use `Subprocess` more easily.
include Vagrant::Util::Retryable
# This is raised if the container can't be found when initializing it with
2013-03-10 03:39:05 +00:00
# a name.
class NotFound < StandardError; end
attr_reader :name
def initialize(name)
@name = name
@logger = Log4r::Logger.new("vagrant::provider::lxc::container")
2013-03-01 03:34:51 +00:00
end
def validate!
raise NotFound if @name && ! lxc(:ls).split("\n").include?(@name)
end
def base_path
Pathname.new("#{CONTAINERS_PATH}/#{@name}")
end
def rootfs_path
Pathname.new("#{base_path}/rootfs")
end
def create(metadata = {})
2013-03-01 23:45:13 +00:00
# FIXME: Ruby 1.8 users dont have SecureRandom
@logger.debug('Creating container using lxc-create...')
@name = SecureRandom.hex(6)
public_key = Vagrant.source_root.join('keys', 'vagrant.pub').expand_path.to_s
meta_opts = metadata.fetch('template-opts', {}).to_a.flatten
2013-03-07 05:09:09 +00:00
2013-03-02 02:27:08 +00:00
# TODO: Handle errors
lxc :create,
# lxc-create options
'--template', metadata['template-name'],
'--name', @name,
'--',
# Template options
2013-03-07 05:09:09 +00:00
'--auth-key', public_key,
'--cache', metadata['rootfs-cache-path'],
2013-03-07 05:09:09 +00:00
*meta_opts
@name
end
2013-03-04 01:42:18 +00:00
def share_folders(folders, config)
folders.each do |folder|
guestpath = rootfs_path.join(folder[:guestpath].gsub(/^\//, ''))
unless guestpath.directory?
begin
system "sudo mkdir -p #{guestpath.to_s}"
rescue Errno::EACCES
raise Vagrant::Errors::SharedFolderCreateFailed,
:path => guestpath.to_s
end
end
config.start_opts << "lxc.mount.entry=#{folder[:hostpath]} #{guestpath} none bind 0 0"
end
end
def start(config)
# @logger.info('Starting container...')
opts = config.start_opts.map { |opt| ["-s", opt] }.flatten
opts += ['-o', ENV['LXC_START_LOG_FILE'], '-l', 'DEBUG'] if ENV['LXC_START_LOG_FILE']
lxc :start, '-d', '--name', @name, *opts
wait_until :running
2013-03-01 03:34:51 +00:00
end
def halt
2013-03-02 04:20:27 +00:00
lxc :shutdown, '--name', @name
wait_until :stopped
# TODO: issue an lxc-stop if a timeout gets reached
2013-03-01 03:34:51 +00:00
end
def destroy
2013-03-02 04:34:47 +00:00
lxc :destroy, '--name', @name
2013-03-01 03:34:51 +00:00
end
# REFACTOR:
# transition_to :state do
# ... code ...
2013-03-02 02:07:15 +00:00
def wait_until(state)
lxc :wait, '--name', @name, '--state', state.to_s.upcase
2013-03-02 02:07:15 +00:00
end
2013-03-02 01:47:02 +00:00
def lxc(command, *args)
execute('sudo', "lxc-#{command}", *args)
2013-03-01 23:45:13 +00:00
end
def state
if @name && lxc(:info, '--name', @name) =~ /^state:[^A-Z]+([A-Z]+)$/
$1.downcase.to_sym
elsif @name
2013-03-01 03:34:51 +00:00
:unknown
end
end
def assigned_ip
unless File.read(base_path.join('config')) =~ /^lxc\.network\.hwaddr\s*=\s*([a-z0-9:]+)\s*$/
raise 'Unknown Container MAC Address'
end
mac_addr = $1
#`ip neigh flush all > /dev/null`
ip = ''
# See: http://programminglinuxblog.blogspot.com.br/2007/11/detecting-ip-address-from-mac-address.html
retryable(:on => LXC::Errors::ExecuteError, :tries => 10, :sleep => 3) do
r = (raw 'arp', '-n')
# If the command was a failure then raise an exception that is nicely
# handled by Vagrant.
if r.exit_code != 0
if @interrupted
@logger.info("Exit code != 0, but interrupted. Ignoring.")
else
raise LXC::Errors::ExecuteError, :command => ['arp', '-n'].inspect
end
end
unless r.stdout.gsub("\r\n", "\n").strip =~ /^([0-9.]+).+#{Regexp.escape mac_addr}/
raise LXC::Errors::ExecuteError, 'Unable to identify container ip'
end
ip = $1.to_s
# Sometimes lxc reports the container as running before DNS is returning
# the right IP, so have to try a couple of times sometimes.
# Tks to https://github.com/neerolyte/vagueant/blob/master/bin/vagueant#L318-L330
2013-03-03 03:21:41 +00:00
r = raw 'ping', '-c', '1', ip
if r.exit_code != 0
raise LXC::Errors::ExecuteError, 'Unable to reach container'
end
end
ip
end
2013-03-01 23:45:13 +00:00
# TODO: Review code below this line, it was pretty much a copy and paste from VirtualBox base driver
def execute(*command, &block)
# Get the options hash if it exists
opts = {}
opts = command.pop if command.last.is_a?(Hash)
tries = 0
tries = 3 if opts[:retryable]
# Variable to store our execution result
r = nil
retryable(:on => LXC::Errors::ExecuteError, :tries => tries, :sleep => 1) do
# Execute the command
r = raw(*command, &block)
# If the command was a failure, then raise an exception that is
# nicely handled by Vagrant.
if r.exit_code != 0
if @interrupted
@logger.info("Exit code != 0, but interrupted. Ignoring.")
else
raise LXC::Errors::ExecuteError, :command => command.inspect
end
end
end
# Return the output, making sure to replace any Windows-style
# newlines with Unix-style.
r.stdout.gsub("\r\n", "\n")
end
# Executes a command and returns the raw result object.
def raw(*command, &block)
int_callback = lambda do
@interrupted = true
@logger.info("Interrupted.")
end
# Append in the options for subprocess
command << { :notify => [:stdout, :stderr] }
Vagrant::Util::Busy.busy(int_callback) do
Vagrant::Util::Subprocess.execute(*command, &block)
end
end
2013-03-01 03:34:51 +00:00
end
end
end