bbrowning-virtualbox 0.7.6.dev

data/lib/virtualbox/com/interface/3.2.x/session_state.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class SessionState < AbstractEnum
+          map [:null, :closed, :open, :spawning, :closing]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/session_type.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class SessionType < AbstractEnum
+          map [:null, :direct, :remote, :existing]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/shared_folder.rb

@@ -0,0 +1,17 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class SharedFolder < AbstractInterface
+          IID = "64637bb2-9e17-471c-b8f3-f8968dd9884e"
+
+          property :name, WSTRING, :readonly => true
+          property :host_path, WSTRING, :readonly => true
+          property :accessible, T_BOOL, :readonly => true
+          property :writable, T_BOOL, :readonly => true
+          property :last_access_error, WSTRING, :readonly => true
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/snapshot.rb

@@ -0,0 +1,20 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class Snapshot < AbstractInterface
+          IID = "1a2d0551-58a4-4107-857e-ef414fc42ffc"
+
+          property :id, WSTRING, :readonly => true
+          property :name, WSTRING
+          property :description, WSTRING
+          property :time_stamp, T_INT64, :readonly => true
+          property :online, T_BOOL, :readonly => true
+          property :machine, :Machine, :readonly => true
+          property :parent, :Snapshot, :readonly => true
+          property :children, [:Snapshot], :readonly => true
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/storage_bus.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class StorageBus < AbstractEnum
+          map [:null, :ide, :sata, :scsi, :floppy, :sas]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/storage_controller.rb

@@ -0,0 +1,24 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class StorageController < AbstractInterface
+          IID = "6bf8335b-d14a-44a5-9b45-ddc49ce7d5b2"
+
+          property :name, WSTRING, :readonly => true
+          property :max_devices_per_port_count, T_UINT32, :readonly => true
+          property :min_port_count, T_UINT32, :readonly => true
+          property :max_port_count, T_UINT32, :readonly => true
+          property :instance, T_UINT32
+          property :port_count, T_UINT32
+          property :bus, :StorageBus, :readonly => true
+          property :controller_type, :StorageControllerType
+          property :use_host_io_cache, T_BOOL
+
+          function :get_ide_emulation_port, T_INT32, [T_INT32]
+          function :set_ide_emulation_port, nil, [T_INT32, T_INT32]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/storage_controller_type.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class StorageControllerType < AbstractEnum
+          map [:null, :lsi_logic, :bus_logic, :intel_ahci, :piix3, :piix4, :ich6, :i82078, :lsi_logic_sas]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/system_properties.rb

@@ -0,0 +1,42 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class SystemProperties < AbstractInterface
+          IID = "8030645c-8fef-4320-bb7b-c829f00069dc"
+
+          property :min_guest_ram, T_UINT32, :readonly => true
+          property :max_guest_ram, T_UINT32, :readonly => true
+          property :min_guest_vram, T_UINT32, :readonly => true
+          property :max_guest_vram, T_UINT32, :readonly => true
+          property :min_guest_cpu_count, T_UINT32, :readonly => true
+          property :max_guest_cpu_count, T_UINT32, :readonly => true
+          property :max_guest_monitors, T_UINT32, :readonly => true
+          property :max_vdi_size, T_UINT64, :readonly => true
+          property :network_adapter_count, T_UINT32, :readonly => true
+          property :serial_port_count, T_UINT32, :readonly => true
+          property :parallel_port_count, T_UINT32, :readonly => true
+          property :max_boot_position, T_UINT32, :readonly => true
+          property :default_machine_folder, WSTRING
+          property :default_hard_disk_folder, WSTRING
+          property :medium_formats, [:MediumFormat], :readonly => true
+          property :default_hard_disk_format, WSTRING
+          property :free_disk_space_warning, T_UINT64
+          property :free_disk_space_percent_warning, T_UINT32
+          property :free_disk_space_error, T_UINT64
+          property :free_disk_space_percent_error, T_UINT64
+          property :remote_display_auth_library, WSTRING
+          property :web_service_auth_library, WSTRING
+          property :log_history_count, T_UINT32
+          property :default_audio_driver, :AudioDriverType, :readonly => true
+
+          function :get_max_devices_per_port_for_storage_bus, T_UINT32, [:StorageBus]
+          function :get_min_port_count_for_storage_bus, T_UINT32, [:StorageBus]
+          function :get_max_port_count_for_storage_bus, T_UINT32, [:StorageBus]
+          function :get_max_instances_of_storage_bus, T_UINT32, [:StorageBus]
+          function :get_device_types_for_storage_bus, [:DeviceType], [:StorageBus]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/usb_controller.rb

@@ -0,0 +1,21 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class USBController < AbstractInterface
+          IID = "238540fa-4b73-435a-a38e-4e1d9eab5c17"
+
+          property :enabled, T_BOOL
+          property :enabled_ehci, T_BOOL
+          property :proxy_available, T_BOOL, :readonly => true
+          property :usb_standard, T_UINT16, :readonly => true
+          property :device_filters, [:USBDeviceFilter], :readonly => true
+
+          function :create_device_filter, :USBDeviceFilter, [WSTRING]
+          function :insert_device_filter, nil, [T_UINT32, :USBDeviceFilter]
+          function :remove_device_filter, :USBDeviceFilter, [T_UINT32]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/usb_device.rb

@@ -0,0 +1,24 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class USBDevice < AbstractInterface
+          IID = "f8967b0b-4483-400f-92b5-8b675d98a85b"
+
+          property :id, WSTRING, :readonly => true
+          property :vendor_id, T_UINT16, :readonly => true
+          property :product_id, T_UINT16, :readonly => true
+          property :revision, T_UINT16, :readonly => true
+          property :manfacturer, WSTRING, :readonly => true
+          property :product, WSTRING, :readonly => true
+          property :serial_number, WSTRING, :readonly => true
+          property :address, WSTRING, :readonly => true
+          property :port, T_UINT16, :readonly => true
+          property :version, T_UINT16, :readonly => true
+          property :port_version, T_UINT16, :readonly => true
+          property :remote, T_BOOL, :readonly => true
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/usb_device_filter.rb

@@ -0,0 +1,23 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class USBDeviceFilter < AbstractInterface
+          IID = "d6831fb4-1a94-4c2c-96ef-8d0d6192066d"
+
+          property :name, WSTRING
+          property :active, T_BOOL
+          property :vendor_id, WSTRING
+          property :product_id, WSTRING
+          property :revision, WSTRING
+          property :manufacturer, WSTRING
+          property :product, WSTRING
+          property :serial_number, WSTRING
+          property :port, WSTRING
+          property :remote, WSTRING
+          property :masked_interfaces, T_UINT32
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/usb_device_filter_action.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class USBDeviceFilterAction < AbstractEnum
+          map [:null, :ignore, :hold]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/usb_device_state.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class USBDeviceState < AbstractEnum
+          map [:not_supported, :unavailable, :busy, :available, :help, :captured]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/virtual_box_error_info.rb

@@ -0,0 +1,17 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VirtualBoxErrorInfo < AbstractInterface
+          IID = "4b86d186-407e-4f9e-8be8-e50061be8725"
+
+          property :result_code, T_UINT32, :readonly => true
+          property :interface_i_d, WSTRING, :readonly => true
+          property :component, WSTRING, :readonly => true
+          property :text, WSTRING, :readonly => true
+          property :next, :VirtualBoxErrorInfo, :readonly => true
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/virtual_system_description.rb

@@ -0,0 +1,19 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VirtualSystemDescription < AbstractInterface
+          IID = "d7525e6c-531a-4c51-8e04-41235083a3d8"
+
+          property :count, T_UINT32, :readonly => true
+
+          function :get_description, nil, [[:out, [:VirtualSystemDescriptionType]], [:out, [WSTRING]], [:out, [WSTRING]], [:out, [WSTRING]], [:out, [WSTRING]]]
+          function :get_description_by_type, nil, [:VirtualSystemDescriptionType, [:out, [:VirtualSystemDescriptionType]], [:out, [WSTRING]], [:out, [WSTRING]], [:out, [WSTRING]], [:out, [WSTRING]]]
+          function :get_values_by_type, [WSTRING], [:VirtualSystemDescriptionType, :VirtualSystemDescriptionValueType]
+          function :set_final_values, nil, [[T_BOOL], [WSTRING], [WSTRING]]
+          function :add_description, nil, [:VirtualSystemDescriptionType, WSTRING, WSTRING]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/virtual_system_description_type.rb

@@ -0,0 +1,14 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VirtualSystemDescriptionType < AbstractEnum
+          map [:null, :ignore, :os, :name, :product, :vendor, :version, :product_url, :vendor_url,
+                :description, :license, :misc, :cpu, :memory, :hard_disk_controller_ide,
+                :hard_disk_controller_sata, :hard_disk_controller_scsi, :hard_disk_controller_sas, :hard_disk_image,
+                :floppy, :cdrom, :network_adapter, :usb_controller, :sound_card]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/virtual_system_description_value_type.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VirtualSystemDescriptionValueType < AbstractEnum
+          map [:null, :reference, :original, :auto, :extra_config]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/virtualbox.rb

@@ -0,0 +1,67 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VirtualBox < AbstractInterface
+          IID_STR = "3f36e024-7fed-4f20-a02c-9158a82b44e6"
+
+          property :version, WSTRING, :readonly => true
+          property :revision, T_ULONG, :readonly => true
+          property :package_type, WSTRING, :readonly => true
+          property :home_folder, WSTRING, :readonly => true
+          property :settings_file_path, WSTRING, :readonly => true
+          property :host, :Host, :readonly => true
+          property :system_properties, :SystemProperties, :readonly => true
+          property :machines, [:Machine], :readonly => true
+          property :hard_disks, [:Medium], :readonly => true
+          property :dvd_images, [:Medium], :readonly => true
+          property :floppy_images, [:Medium], :readonly => true
+          property :progress_operations, [:Progress], :readonly => true
+          property :guest_os_types, [:GuestOSType], :readonly => true
+          property :shared_folders, [:SharedFolder], :readonly => true
+          property :performance_collector, :PerformanceCollector, :readonly => true
+          property :dhcp_servers, [:DHCPServer], :readonly => true
+
+          function :create_machine, :Machine, [WSTRING, WSTRING, WSTRING, WSTRING, T_BOOL]
+          function :create_legacy_machine, :Machine, [WSTRING, WSTRING, WSTRING, WSTRING]
+          function :open_machine, :Machine, [WSTRING]
+          function :register_machine, :Machine, [:Machine]
+          function :get_machine, :Machine, [WSTRING]
+          function :find_machine, :Machine, [WSTRING]
+          function :unregister_machine, :Machine, [WSTRING]
+          function :create_appliance, :Appliance, []
+          function :create_hard_disk, :Medium, [WSTRING, WSTRING]
+          function :open_hard_disk, :Medium, [WSTRING, :AccessMode, T_BOOL, WSTRING, T_BOOL, WSTRING]
+          function :get_hard_disk, :Medium, [WSTRING]
+          function :find_hard_disk, :Medium, [WSTRING]
+          function :open_dvd_image, :Medium, [WSTRING, WSTRING]
+          function :get_dvd_image, :Medium, [WSTRING]
+          function :find_dvd_image, :Medium, [WSTRING]
+          function :open_floppy_image, :Medium, [WSTRING, WSTRING]
+          function :get_floppy_image, :Medium, [WSTRING]
+          function :find_floppy_image, :Medium, [WSTRING]
+          function :get_guest_os_type, :GuestOSType, [WSTRING]
+          function :create_shared_folder, nil, [WSTRING, WSTRING, T_BOOL]
+          function :remove_shared_folder, nil, [WSTRING]
+          function :get_extra_data_keys, [WSTRING], []
+          function :get_extra_data, WSTRING, [WSTRING]
+          function :set_extra_data, nil, [WSTRING, WSTRING]
+          function :open_session, nil, [:Session, WSTRING]
+          function :open_remote_session, :Progress, [:Session, WSTRING, WSTRING, WSTRING]
+          function :open_existing_session, nil, [:Session, WSTRING]
+
+          # TODO: The following two are wrong, they don't take a
+          # string as input
+          function :register_callback, nil, [WSTRING]
+          function :unregister_callback, nil, [WSTRING]
+
+          function :wait_for_property_change, nil, [WSTRING, T_UINT32, [:out, WSTRING], [:out, WSTRING]]
+          function :create_dhcp_server, :DHCPServer, [WSTRING]
+          function :find_dhcp_server_by_network_name, :DHCPServer, [WSTRING]
+          function :remove_dhcp_server, nil, [:DHCPServer]
+          function :check_firmware_present, T_BOOL, [:FirmwareType, WSTRING, [:out, WSTRING], [:out, WSTRING]]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/vrdp_auth_type.rb

@@ -0,0 +1,11 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VRDPAuthType < AbstractEnum
+          map [:null, :external, :guest]
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/interface/3.2.x/vrdp_server.rb

@@ -0,0 +1,21 @@
+module VirtualBox
+  module COM
+    module Interface
+      module Version_3_2_X
+        class VRDPServer < AbstractInterface
+          IID = "72e671bc-1712-4052-ad6b-e45e76d9d3e4"
+
+          property :enabled, T_BOOL
+          property :ports, WSTRING
+          property :net_address, WSTRING
+          property :auth_type, :VRDPAuthType
+          property :auth_timeout, T_UINT32
+          property :allow_multi_connection, T_BOOL
+          property :reuse_single_connection, T_BOOL
+          property :video_channel, T_BOOL
+          property :video_channel_quality, T_UINT32
+        end
+      end
+    end
+  end
+end

data/lib/virtualbox/com/mscom_interface.rb

@@ -0,0 +1,44 @@
+module VirtualBox
+  module COM
+    class MSCOMInterface < BaseInterface
+      # The VirtualBox and Session interfaces, both of which are extremely
+      # important in interfacing with the VirtualBox API. Once these have been
+      # initialized, all other parts of the API can be accessed via these
+      # instances.
+      attr_reader :virtualbox
+      attr_reader :session
+
+      def initialize
+        super
+        initialize_mscom
+      end
+
+      def initialize_mscom
+        require 'win32ole'
+
+        interface_dir = File.expand_path(File.join(File.dirname(__FILE__), "interface"))
+        Dir[File.join(interface_dir, "*")].each do |f|
+          return if File.directory?(f) && initialize_for_version(File.basename(f))
+        end
+      end
+
+      def initialize_for_version(version)
+        COM::Util.set_interface_version(version)
+
+        @virtualbox = COM::Util.versioned_interface(:VirtualBox).new(Implementer::MSCOM, self, WIN32OLE.new("VirtualBox.VirtualBox"))
+        @session = COM::Util.versioned_interface(:Session).new(Implementer::MSCOM, self, WIN32OLE.new("VirtualBox.Session"))
+
+        vb_version = @virtualbox.version
+
+        # Check if they match or not.
+        return false if vb_version.length == version.length
+        (0...(version.length)).each do |i|
+          next if version[i,1] == "x"
+          return false if version[i,1] != vb_version[i,1]
+        end
+
+        true
+      end
+    end
+  end
+end