libvirt_ffi 0.6.1 → 0.8.1

data/test_usage/test_event_loop.rb

@@ -1,185 +0,0 @@
-#!/usr/bin/env ruby
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'libvirt'
-require 'logger'
-require 'active_support/all'
-require 'async'
-require 'get_process_mem'
-require 'gc_tracer'
-
-require_relative 'support/libvirt_async'
-require_relative 'support/log_formatter'
-
-GC::Tracer.start_logging(
-    nil,
-    gc_stat: false,
-    gc_latest_gc_info: false,
-    rusage: false,
-    events: [:end_mark, :end_sweep]
-)
-
-Libvirt.logger = Logger.new(STDOUT, formatter: LogFormatter.new)
-Libvirt.logger.level = ENV['DEBUG'] ? :debug : :info
-
-IMPL = LibvirtAsync::Implementations.new
-OBJECTS = {
-    hv: nil,
-    domains: [],
-    cb_ids: []
-}.freeze
-
-Async do
-  ASYNC_REACTOR = Async::Task.current.reactor
-
-  puts "Lib version #{Libvirt.lib_version}"
-  puts "Gem version #{Libvirt::VERSION}"
-
-  IMPL.start
-
-  OBJECTS[:hv] = Libvirt::Connection.new('qemu+tcp://localhost:16510/system')
-  OBJECTS[:hv].open
-  res = OBJECTS[:hv].set_keep_alive(2, 1)
-  Libvirt.logger.info { "set_keep_alive #{res}" }
-
-  puts "Connection version #{OBJECTS[:hv].version.inspect}"
-  puts "Connection lib_version #{OBJECTS[:hv].lib_version.inspect}"
-  puts "Connection hostname #{OBJECTS[:hv].hostname.inspect}"
-  puts "Connection max_vcpus #{OBJECTS[:hv].max_vcpus.inspect}"
-  puts "Connection capabilities #{OBJECTS[:hv].capabilities.inspect}"
-  node_info = OBJECTS[:hv].node_info
-  puts "Connection nodeInfo #{node_info}"
-  puts "NodeInfo model #{node_info.model.inspect}"
-  puts "NodeInfo cpus #{node_info.cpus.inspect}"
-  puts "NodeInfo mhz #{node_info.mhz.inspect}"
-  puts "NodeInfo nodes #{node_info.nodes.inspect}"
-  puts "NodeInfo sockets #{node_info.sockets.inspect}"
-  puts "NodeInfo cores #{node_info.cores.inspect}"
-  puts "NodeInfo threads #{node_info.threads.inspect}"
-  puts "NodeInfo memory #{node_info.memory.inspect}"
-
-  Libvirt::Connection::DOMAIN_EVENT_IDS.map do |event_id|
-    op = OpenStruct.new(a: 'b', event_id: event_id)
-    callback_id = OBJECTS[:hv].register_domain_event_callback(event_id, nil, op) do |conn, dom, *args, opaque|
-      Libvirt.logger.info { "DOMAIN EVENT #{event_id} conn=#{conn}, dom=#{dom}, args=#{args}, opaque=#{opaque}" }
-    end
-    Libvirt.logger.info { "Registered domain event callback event_id=#{event_id} callback_id=#{callback_id}" }
-    OBJECTS[:cb_ids] << callback_id
-  end
-
-  puts "domains qty #{OBJECTS[:hv].list_all_domains_qty}"
-
-  OBJECTS[:domains] = OBJECTS[:hv].list_all_domains
-  puts "Domains (#{OBJECTS[:domains].size}): #{OBJECTS[:domains]}"
-
-  d = OBJECTS[:domains].first
-  puts "Domain uuid #{d.uuid.inspect}"
-  puts "Domain name #{d.name.inspect}"
-  puts "Domain get_state #{d.get_state.inspect}"
-  puts "Domain get_cpus #{d.max_vcpus.inspect}"
-  puts "Domain max_memory #{d.max_memory.inspect}"
-  # puts "Domain xml_desc #{d.xml_desc.inspect}"
-
-  # ASYNC_REACTOR.every(10) do
-  #   LibvirtAsync::Util.create_task(nil, ASYNC_REACTOR) { IMPL.print_debug_info }.run
-  # end
-
-  ASYNC_REACTOR.every(5) do
-    Libvirt.logger.info { "MEM USAGE: #{GetProcessMem.new.mb} MB" }
-    # Libvirt.logger.info { "GC.start" }
-    # GC.start
-    # Libvirt.logger.info { "MEM USAGE: #{GetProcessMem.new.mb} MB" }
-  end
-
-  # ASYNC_REACTOR.after(20) do
-  #   Libvirt.logger.info { 'START Cleaning up!' }
-  #
-  #   LibvirtAsync::Util.create_task(nil, ASYNC_REACTOR) do
-  #
-  #     OBJECTS[:cb_ids].each do |callback_id|
-  #       Libvirt.logger.info { "Start retrieving callback_id=#{callback_id}" }
-  #       opaque = OBJECTS[:hv].deregister_domain_event_callback(callback_id)
-  #       Libvirt.logger.info { "Retrieved opaque=#{opaque}" }
-  #     end
-  #     Libvirt.logger.info { 'Cleaning up!' }
-  #     OBJECTS[:hv] = nil
-  #     OBJECTS[:domains] = []
-  #     OBJECTS[:cb_ids] = []
-  #     Libvirt.logger.info { "GC.start 1" }
-  #     GC.start
-  #
-  #     ASYNC_REACTOR << LibvirtAsync::Util.create_task(nil, ASYNC_REACTOR) do
-  #       Libvirt.logger.info { "GC.start 2" }
-  #       GC.start
-  #     end.fiber
-  #
-  #   end.run
-  # end
-
-  # puts 'undefine DOM'
-  # d.undefine
-  # ASYNC_REACTOR.sleep 5
-
-  # begin
-  #   puts 'DOM starting...'
-  #   d.start
-  #   puts 'DOM started'
-  # rescue Libvirt::Errors::LibError => e
-  #   STDERR.puts "error starting\n#{e.class}\n#{e.message}", e.error_data
-  # end
-  #
-  # ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state} before save_memory"
-  # d.save_memory
-  # puts "DOMAIN state #{d.get_state} after save_memory"
-  #
-  # ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state} before start"
-  # d.start
-  # puts "DOMAIN state #{d.get_state} after start"
-  #
-  # #ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state} before resume"
-  # d.resume
-  # puts "DOMAIN state #{d.get_state} after resume"
-
-  # ASYNC_REACTOR.sleep 10
-  # puts "DOMAIN state #{d.get_state} before shutdown"
-  # d.shutdown(1)
-  # puts "DOMAIN state #{d.get_state} after shutdown"
-  #
-  # ASYNC_REACTOR.sleep 10
-  # puts "DOMAIN state #{d.get_state}"
-  # d.start
-  # puts 'DOM start'
-  #
-  # ASYNC_REACTOR.sleep 10
-  # puts "DOMAIN state #{d.get_state}"
-  # d.reboot
-  # puts 'DOM reboot'
-  #
-  # ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state}"
-  # d.suspend
-  # puts 'DOM suspend'
-  #
-  # ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state}"
-  # d.resume
-  # puts 'DOM resume'
-  #
-  # ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state}"
-  # d.reset
-  # puts 'DOM reset'
-  #
-  # ASYNC_REACTOR.sleep 5
-  # puts "DOMAIN state #{d.get_state}"
-  # d.power_off
-  # puts 'DOM power_off'
-  #
-  # ASYNC_REACTOR.sleep 5
-  # d.start
-  # puts 'DOM start'
-end

data/test_usage/test_libvirtd_restart.rb

@@ -1,63 +0,0 @@
-#!/usr/bin/env ruby
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'libvirt'
-require 'logger'
-require 'active_support/all'
-require 'async'
-require 'get_process_mem'
-require 'gc_tracer'
-
-require_relative 'support/libvirt_async'
-require_relative 'support/log_formatter'
-
-GC::Tracer.start_logging(
-    nil,
-    gc_stat: false,
-    gc_latest_gc_info: false,
-    rusage: false,
-    events: [:end_mark, :end_sweep]
-)
-
-Libvirt.logger = Logger.new(STDOUT, formatter: LogFormatter.new)
-Libvirt.logger.level = ENV['DEBUG'] ? :debug : :info
-
-IMPL = LibvirtAsync::Implementations.new
-OBJECTS = {
-    hv: nil
-}.freeze
-
-def async_task(run, parent = nil, &block)
-  task = LibvirtAsync::Util.create_task(parent, ASYNC_REACTOR, &block)
-  case run
-  when :now
-    task.run
-  when :later
-    task.reactor << task.fiber
-  else
-    raise ArgumentError, "invalid run #{run}"
-  end
-end
-
-Async do
-  ASYNC_REACTOR = Async::Task.current.reactor
-
-  puts "Lib version #{Libvirt.lib_version}"
-  puts "Gem version #{Libvirt::VERSION}"
-
-  IMPL.start
-
-  OBJECTS[:hv] = Libvirt::Connection.new('qemu+tcp://localhost:16510/system')
-  OBJECTS[:hv].open
-  OBJECTS[:hv].register_close_callback do |conn, reason, _op|
-    puts "Im closing conn=#{conn}, reason=#{reason}"
-  end
-  # OBJECTS[:hv].set_keep_alive(2, 1)
-
-  ASYNC_REACTOR.every(5) do
-    async_task(:now) do
-      puts "list_all_domains_qty #{OBJECTS[:hv].list_all_domains_qty}"
-    end
-  end
-end

data/test_usage/test_metadata.rb

@@ -1,104 +0,0 @@
-#!/usr/bin/env ruby
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'libvirt'
-require 'logger'
-require 'active_support/all'
-require 'async'
-
-require_relative 'support/libvirt_async'
-require_relative 'support/log_formatter'
-
-require 'libvirt/xml'
-
-Libvirt.logger = Logger.new(STDOUT, formatter: LogFormatter.new)
-Libvirt.logger.level = ENV['DEBUG'] ? :debug : :info
-
-IMPL = LibvirtAsync::Implementations.new
-
-STDOUT.sync = true
-STDERR.sync = true
-
-def log_error(error, skip_backtrace: false, causes: [])
-  STDERR.puts "<#{error.class}>: #{error.message}", error.backtrace
-  if error.cause && error.cause != error && !causes.include?(error.cause)
-    causes.push(error)
-    log_error(error.cause, skip_backtrace: skip_backtrace, causes: causes)
-  end
-end
-
-def libvirt_safe(rescue_value = nil)
-  yield
-rescue Libvirt::Errors::LibError => e
-  STDERR.puts "<#{e.class}>: #{e.message}"
-  rescue_value
-end
-
-Async do
-  ASYNC_REACTOR = Async::Task.current.reactor
-
-  puts "Lib version #{Libvirt.lib_version}"
-  puts "Gem version #{Libvirt::VERSION}"
-
-  IMPL.start
-
-  conn = Libvirt::Connection.new('qemu+tcp://localhost:16510/system')
-  conn.open
-
-  puts "Connection version #{conn.version.inspect}"
-  puts "Connection lib_version #{conn.lib_version.inspect}"
-  puts "Connection hostname #{conn.hostname.inspect}"
-
-  dom = conn.list_all_domains.first
-  puts "Domain #{dom.uuid} #{dom.name} #{dom.get_state}"
-
-  libvirt_safe do
-    dom.start
-  end
-
-  dom.set_metadata("test title #{Process.pid}", type: :TITLE, flags: :AFFECT_CONFIG)
-  dom.set_metadata("test desc #{Process.pid}", type: :DESCRIPTION, flags: :AFFECT_CONFIG)
-
-  puts "domain title", libvirt_safe{ dom.get_metadata(type: :TITLE, flags: :AFFECT_CONFIG) }
-  puts "domain description", libvirt_safe { dom.get_metadata(type: :DESCRIPTION, flags: :AFFECT_CONFIG) }
-
-  puts "full XML title", Libvirt::Xml::Domain.load(dom.xml_desc).title
-  puts "full XML description", Libvirt::Xml::Domain.load(dom.xml_desc).description
-
-  namespace = 'https://example.com'
-  old_metadata = dom.get_metadata(
-      uri: namespace, flags: :AFFECT_CONFIG
-  )
-
-  puts "Old Metadata", old_metadata
-
-  new_metadata = "<pid>#{Process.pid}</pid>"
-  key = 'example'
-  dom.set_metadata new_metadata,
-                   key: key,
-                   uri: namespace,
-                   flags: :AFFECT_CONFIG
-
-  puts "new metadata", dom.get_metadata(
-      uri: namespace, flags: :AFFECT_CONFIG
-  )
-
-  puts "full XML metadata", Libvirt::Xml::Domain.load(dom.xml_desc).metadata
-
-  puts "domain shutdown", libvirt_safe { dom.shutdown }
-  ASYNC_REACTOR.sleep 5
-  puts dom.get_state
-
-  puts "domain start", libvirt_safe { dom.start }
-  ASYNC_REACTOR.sleep 2
-  puts dom.get_state
-
-  puts "full XML metadata", Libvirt::Xml::Domain.load(dom.xml_desc).metadata
-  puts "full XML title", Libvirt::Xml::Domain.load(dom.xml_desc).title
-  puts "full XML description", Libvirt::Xml::Domain.load(dom.xml_desc).description
-
-rescue StandardError => e
-  log_error(e)
-  exit 1
-end

data/test_usage/test_screenshot.rb

@@ -1,197 +0,0 @@
-#!/usr/bin/env ruby
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'libvirt'
-require 'logger'
-require 'active_support/all'
-require 'async'
-require 'get_process_mem'
-
-require_relative 'support/libvirt_async'
-require_relative 'support/log_formatter'
-
-Libvirt.logger = Logger.new(STDOUT, formatter: LogFormatter.new)
-Libvirt.logger.level = ENV['DEBUG'] ? :debug : :info
-
-LibvirtAsync.logger = Logger.new(STDOUT, formatter: LogFormatter.new)
-LibvirtAsync.logger.level = ENV['LIBVIRT_DEBUG'] ? :debug : :info
-
-def print_usage(msg)
-  mem = GetProcessMem.new
-  STDOUT.puts "#{msg} [#{mem.mb}MB]"
-end
-
-def run_gc(msg)
-  print_usage "#{msg} before GC.start"
-  GC.start
-  print_usage "#{msg} after GC.start"
-end
-
-IMPL = LibvirtAsync::Implementations.new
-CONNS = [].freeze
-DOMS = [].freeze
-STREAMS = { stream: nil }.freeze
-
-class ScreenshotOpaque
-  CALLBACK = proc do |s, ev, op|
-    # run_gc('ScreenshotOpaque CALLBACK start')
-    next unless (Libvirt::Stream::EVENT_READABLE & ev) != 0
-
-    begin
-      code, data = s.recv(1024)
-    rescue Libvirt::Errors::LibError => e
-      op.on_libvirt_error(s, e)
-      next
-    end
-    # run_gc('ScreenshotOpaque CALLBACK after recv')
-
-    case code
-    when 0
-      op.on_complete(s)
-    when -1
-      op.on_recv_error(s)
-    when -2
-      print_usage "Opaque::CALLBACK #{op.filepath} wait for data"
-    else
-      op.on_receive(data)
-    end
-  end
-
-  attr_reader :filepath
-
-  def initialize(filepath, finish_cb)
-    @filepath = filepath
-    @f = File.open(@filepath, 'wb')
-    @finish_cb = finish_cb
-  end
-
-  def on_complete(stream)
-    print_usage "Opaque#on_complete #{@filepath}"
-    success, reason = finish_stream(stream)
-    finish(success, reason)
-  end
-
-  def on_receive(data)
-    print_usage "Opaque#on_receive #{@filepath} #{data&.size}"
-    @f.write(data)
-  end
-
-  def on_recv_error(stream)
-    print_usage "Opaque#on_recv_error #{@filepath}"
-    success, reason = finish_stream(stream)
-    finish(success, reason)
-  end
-
-  def on_libvirt_error(stream, e)
-    print_usage "Opaque#on_libvirt_error #{@filepath} #{e}"
-    success, reason = finish_stream(stream)
-    finish(success, reason)
-  end
-
-  private
-
-  def finish_stream(stream)
-    print_usage "Opaque#finish_stream stream.event_remove_callback #{@filepath}"
-    stream.event_remove_callback
-    result = begin
-      print_usage "Opaque#finish_stream stream.finish #{@filepath}"
-      stream.finish
-      [true, nil]
-             rescue Libvirt::Errors::LibError => e
-               warn "Opaque#finish_stream stream.finish exception rescued #{e.class} #{e.message}"
-               [false, e.message]
-    end
-    print_usage "Opaque#finish_stream ends #{@filepath}"
-    result
-  end
-
-  def finish(success, reason)
-    print_usage "Opaque#finish success=#{success} #{@filepath}"
-
-    @f.close
-    @f = nil
-    @finish_cb.call(success, reason)
-    @finish_cb = nil
-  end
-end
-
-def save_screenshot(c, domain, i)
-  stream = c.stream(Libvirt::Stream::NONBLOCK)
-
-  opaque_cb = proc do |success|
-    puts "Stream #{i} complete success=#{success}"
-    print_usage "after stream #{i} complete stream=#{STREAMS["stream#{i}"]}"
-    run_gc("Stream #{i} complete before remove stream")
-    print_usage "after stream #{i} complete and GC.start"
-    STREAMS["stream#{i}"] = nil
-    run_gc("Stream #{i} complete before remove stream")
-    print_usage "after stream #{i} delete and GC.start"
-  end
-
-  opaque = ScreenshotOpaque.new("tmp/screenshots_test#{i}.pnm", opaque_cb)
-
-  STREAMS["stream#{i}"] = stream
-
-  print_usage "test_screenshot_mem #{i} before stream start"
-  domain.screenshot(stream, 0)
-  stream.event_add_callback(
-      Libvirt::Stream::EVENT_READABLE,
-      opaque,
-      &ScreenshotOpaque::CALLBACK
-  )
-  run_gc("Stream #{i} after add event")
-end
-
-Async do
-  ASYNC_REACTOR = Async::Task.current.reactor
-
-  puts "Lib version #{Libvirt.lib_version}"
-  puts "Gem version #{Libvirt::VERSION}"
-
-  IMPL.start
-
-  c = Libvirt::Connection.new('qemu+tcp://localhost:16510/system')
-  c.open
-  res = c.set_keep_alive(2, 1)
-  Libvirt.logger.info { "set_keep_alive #{res}" }
-  CONNS.push(c)
-
-  domain = c.list_all_domains.first
-  DOMS.push(domain)
-
-  print_usage 'First generation'
-  5.times do |i|
-    save_screenshot(c, domain, 100 + i)
-  end
-
-  ASYNC_REACTOR.after(15) do
-    Async::Task.new(ASYNC_REACTOR, nil) do
-      print_usage 'Second generation'
-
-      con = CONNS.first
-      dom = DOMS.first
-      5.times do |i|
-        save_screenshot(con, dom, 200 + i)
-      end
-    end.run
-  end
-
-  ASYNC_REACTOR.after(30) do
-    Async::Task.new(ASYNC_REACTOR, nil) do
-      print_usage 'Third generation'
-
-      con = CONNS.first
-      dom = DOMS.first
-      5.times do |i|
-        save_screenshot(con, dom, 300 + i)
-      end
-    end.run
-  end
-
-  ASYNC_REACTOR.every(5) do
-    Async::Task.new(ASYNC_REACTOR, nil) do
-      run_gc 'PERIODIC'
-    end.run
-  end
-end

data/test_usage/test_storage.rb

@@ -1,52 +0,0 @@
-#!/usr/bin/env ruby
-# frozen_string_literal: true
-
-require 'bundler/setup'
-require 'libvirt'
-require 'logger'
-require 'active_support/all'
-require 'async'
-
-require_relative 'support/libvirt_async'
-require_relative 'support/log_formatter'
-
-require 'libvirt/xml'
-
-Libvirt.logger = Logger.new(STDOUT, formatter: LogFormatter.new)
-Libvirt.logger.level = ENV['DEBUG'] ? :debug : :info
-
-IMPL = LibvirtAsync::Implementations.new
-
-Async do
-  ASYNC_REACTOR = Async::Task.current.reactor
-
-  puts "Lib version #{Libvirt.lib_version}"
-  puts "Gem version #{Libvirt::VERSION}"
-
-  IMPL.start
-
-  conn = Libvirt::Connection.new('qemu+tcp://localhost:16510/system')
-  conn.open
-
-  puts "Connection version #{conn.version.inspect}"
-  puts "Connection lib_version #{conn.lib_version.inspect}"
-  puts "Connection hostname #{conn.hostname.inspect}"
-
-  pools = conn.list_all_storage_pools
-  puts "Connection storage pools qty #{pools.size}"
-
-  pools.each.with_index do |pool, i|
-    puts "Storage pool #{i} info", pool.info.to_h
-    puts "Storage pool #{i} xml", Libvirt::Xml::StoragePool.load(pool.xml_desc).to_h
-  end
-
-  pools.each.with_index do |pool, i|
-    volumes = pool.list_all_volumes
-    puts "Storage pool #{i} volumes qty #{volumes.size}"
-
-    volumes.each.with_index do |vol, j|
-      puts "Storage pool #{i} volume #{j} info", vol.info.to_h
-      puts "Storage pool #{i} volume #{j} xml", Libvirt::Xml::StorageVolume.load(vol.xml_desc).to_h
-    end
-  end
-end