fog-hyperv 0.0.9 → 0.1.1

data/lib/fog/hyperv/compute/requests/get_vm_key_protector.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    # Retrieve SecureBoot Templates for a VM Host
+    def get_vm_key_protector(vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$VM | Get-VMKeyProtector', options]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/get_vm_network_adapter.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def get_vm_network_adapter(computer_name: nil, **options)
+      requires_one options, :vm_id, :all, :management_os
+
+      id = options.delete :id
+      if options[:vm_id]
+        vm_id = options.delete :vm_id
+        options.delete :management_os
+        options.delete :all
+        run_cmdlist(
+          [
+            ['$VM = Get-VM', { id: vm_id }],
+            ['$VM | Get-VMNetworkAdapter', { _by_id: id, **options }]
+          ],
+          target_computer: computer_name
+        )
+      else
+        options.delete :management_os if options[:all]
+        run_cmd 'Get-VMNetworkAdapter', _by_id: id, _target_computer: computer_name, **options
+      end
+    end
+  end
+
+  class Mock
+    def get_vm_network_adapter(**args)
+      requires_one args, :vm_name, :all, :management_os
+
+      data = handle_mock_response(args)
+      if args[:all]
+        data
+      elsif args[:vm_name]
+        data.find { |i| i[:vm_name].casecmp(args[:vm_name]).zero? }
+      elsif args[:management_os]
+        data.find { |i| i[:is_management_os] }
+      end
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/get_vm_network_adapter_vlan.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def get_vm_network_adapter_vlan(id:, computer_name: nil, **options)
+      requires_one options, :vm_id, :management_os
+
+      commands = []
+      if options.key? :vm_id
+        vm_id = options.delete :vm_id
+        options.delete :management_os
+        commands += [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$NIC = $VM | Get-VMNetworkAdapter', { _by_id: id }]
+        ]
+      else
+        options.delete :management_os
+        commands << ['$NIC = Get-VMNetworkAdapter', { management_os: true, _by_id: id }]
+      end
+      commands << ['$NIC | Get-VMNetworkAdapterVlan', options]
+
+      run_cmdlist(
+        commands,
+        target_computer: computer_name
+      )
+    end
+  end
+
+  class Mock
+    def get_vm_network_adapter_vlan(**args)
+      data = handle_mock_response(args)
+      if args[:vm_id]
+        data.find { |i| i[:vm_id].casecmp(args[:vm_id]).zero? }
+      elsif args[:management_os]
+        data.find { |i| i[:is_management_os] }
+      else
+        data
+      end
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/get_vm_security.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def get_vm_security(vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$VM | Get-VMSecurity', options]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/get_vm_switch.rb

@@ -0,0 +1,10 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def get_vm_switch(computer_name: nil, **options)
+      id = options.delete :id
+      run_cmd 'Get-VMSwitch', _by_id: id, _target_computer: computer_name, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/mock_files/get_vm.json

@@ -0,0 +1,4 @@
+[
+  {"Id":"416e49fd-28dd-413c-9743-aa3e69e4807d","Name":"mockvm1","State":3,"IntegrationServicesState":"","OperationalStatus":[2],"PrimaryOperationalStatus":2,"SecondaryOperationalStatus":null,"StatusDescriptions":["Operating normally"],"PrimaryStatusDescription":"Operating normally","SecondaryStatusDescription":null,"Status":"Ok","Heartbeat":null,"ReplicationState":0,"ReplicationHealth":0,"ReplicationMode":0,"CPUUsage":0,"MemoryAssigned":0,"MemoryDemand":0,"MemoryStatus":"","SmartPagingFileInUse":false,"Uptime":{"Ticks":0,"Days":0,"Hours":0,"Milliseconds":0,"Minutes":0,"Seconds":0,"TotalDays":0,"TotalHours":0,"TotalMilliseconds":0,"TotalMinutes":0,"TotalSeconds":0},"IntegrationServicesVersion":null,"ResourceMeteringEnabled":false,"ConfigurationLocation":"C:\\Hyper-V","SnapshotFileLocation":"C:\\Hyper-V","AutomaticStartAction":4,"AutomaticStopAction":3,"AutomaticStartDelay":0,"SmartPagingFilePath":"C:\\Hyper-V","NumaAligned":null,"NumaNodesCount":1,"NumaSocketCount":1,"Key":{"Id":"416e49fd-28dd-413c-9743-aa3e69e4807d"},"IsDeleted":false,"ComputerName":"MOCK-HOST","Version":"5.0","Notes":"","Generation":1,"Path":"C:\\Hyper-V","CreationTime":"\/Date(1488869314761)\/","IsClustered":false,"SizeOfSystemFiles":46832,"ParentSnapshotId":null,"ParentSnapshotName":null,"MemoryStartup":4294967296,"DynamicMemoryEnabled":true,"MemoryMinimum":536870912,"MemoryMaximum":1099511627776,"ProcessorCount":4,"RemoteFxAdapter":null,"NetworkAdapters":["Microsoft.HyperV.PowerShell.VMNetworkAdapter"],"FibreChannelHostBusAdapters":"","ComPort1":{"Path":"","ComputerName":"MOCK-HOST","Name":"COM1","Id":"Microsoft:416E49FD-28DD-413C-9743-AA3E69E4807D\\8E3A359F-559A-4B6A-98A9-1690A6100ED7\\0","IsDeleted":false,"VMId":"416e49fd-28dd-413c-9743-aa3e69e4807d","VMName":"mockvm1","VMSnapshotId":"00000000-0000-0000-0000-000000000000","VMSnapshotName":null,"Key":null},"ComPort2":{"Path":"","ComputerName":"MOCK-HOST","Name":"COM2","Id":"Microsoft:416E49FD-28DD-413C-9743-AA3E69E4807D\\8E3A359F-559A-4B6A-98A9-1690A6100ED7\\1","IsDeleted":false,"VMId":"416e49fd-28dd-413c-9743-aa3e69e4807d","VMName":"mockvm1","VMSnapshotId":"00000000-0000-0000-0000-000000000000","VMSnapshotName":null,"Key":null},"FloppyDrive":{"PoolName":null,"Path":null,"Disk":null,"ComputerName":"mock-host","Name":"DisketteDrive","Id":"Microsoft:416E49FD-28DD-413C-9743-AA3E69E4807D\\8F0D2762-0B00-4E04-AF4F-19010527CB93\\0\\0\\D","IsDeleted":false,"VMId":"416e49fd-28dd-413c-9743-aa3e69e4807d","VMName":"mockvm1","VMSnapshotId":"00000000-0000-0000-0000-000000000000","VMSnapshotName":null,"Key":null},"DVDDrives":["Microsoft.HyperV.PowerShell.DvdDrive"],"HardDrives":["Microsoft.HyperV.PowerShell.HardDiskDrive"],"VMIntegrationService":["Microsoft.HyperV.PowerShell.VMIntegrationComponent","Microsoft.HyperV.PowerShell.VMIntegrationComponent","Microsoft.HyperV.PowerShell.DataExchangeComponent","Microsoft.HyperV.PowerShell.ShutdownComponent","Microsoft.HyperV.PowerShell.VMIntegrationComponent","Microsoft.HyperV.PowerShell.GuestServiceInterfaceComponent"],"VMName":"mockvm1","VMId":"416e49fd-28dd-413c-9743-aa3e69e4807d"},
+  {"Id":"20ff7fe3-fd54-425c-aa97-fbf3c2e7a868","Name":"mockvm2","State":2,"IntegrationServicesState":"","OperationalStatus":"Ok","PrimaryOperationalStatus":2,"SecondaryOperationalStatus":null,"StatusDescriptions":"Operating normally","PrimaryStatusDescription":"Operating normally","SecondaryStatusDescription":null,"Status":"Ok","Heartbeat":1,"ReplicationState":0,"ReplicationHealth":0,"ReplicationMode":0,"CPUUsage":0,"MemoryAssigned":4294967296,"MemoryDemand":0,"MemoryStatus":"","SmartPagingFileInUse":false,"Uptime":"6.02:21:14","IntegrationServicesVersion":null,"ResourceMeteringEnabled":false,"ConfigurationLocation":"C:\\Hyper-V","SnapshotFileLocation":"C:\\Hyper-V","AutomaticStartAction":4,"AutomaticStopAction":3,"AutomaticStartDelay":0,"SmartPagingFilePath":"C:\\Hyper-V","NumaAligned":false,"NumaNodesCount":1,"NumaSocketCount":1,"Key":"Microsoft.HyperV.PowerShell.VirtualMachineObjectKey","IsDeleted":false,"ComputerName":"mock-host","Version":"5.0","Notes":"","Generation":2,"Path":"C:\\Hyper-V","CreationTime":"\/Date(1488869316886)\/","IsClustered":false,"SizeOfSystemFiles":56228,"ParentSnapshotId":null,"ParentSnapshotName":null,"MemoryStartup":4294967296,"DynamicMemoryEnabled":true,"MemoryMinimum":536870912,"MemoryMaximum":1099511627776,"ProcessorCount":4,"RemoteFxAdapter":null,"NetworkAdapters":"Microsoft.HyperV.PowerShell.VMNetworkAdapter","FibreChannelHostBusAdapters":"","ComPort1":"Microsoft.HyperV.PowerShell.VMComPort","ComPort2":"Microsoft.HyperV.PowerShell.VMComPort","FloppyDrive":null,"DVDDrives":"","HardDrives":"Microsoft.HyperV.PowerShell.HardDiskDrive Microsoft.HyperV.PowerShell.HardDiskDrive","VMIntegrationService":"Microsoft.HyperV.PowerShell.VMIntegrationComponent Microsoft.HyperV.PowerShell.VMIntegrationComponent Microsoft.HyperV.PowerShell.DataExchangeComponent Microsoft.HyperV.PowerShell.ShutdownComponent Microsoft.HyperV.PowerShell.VMIntegrationComponent Microsoft.HyperV.PowerShell.GuestServiceInterfaceComponent","VMName":"mockvm2","VMId":"20ff7fe3-fd54-425c-aa97-fbf3c2e7a868"}
+]

data/lib/fog/hyperv/compute/requests/new_vhd.rb

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def new_vhd(path:, size_bytes:, computer_name: nil, **options)
+      run_cmd 'New-VHD', _target_computer: computer_name, path: path, size_bytes: size_bytes, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/new_vm.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def new_vm(computer_name: nil, **options)
+      requires options, :new_vhd_path, :new_vhd_size_bytes \
+        if options[:new_whd_path] || options[:new_vhd_size_bytes]
+
+      run_cmd 'New-VM', _target_computer: computer_name, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/new_vm_switch.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def new_vm_switch(name:, computer_name: nil, **options)
+      requires_one options, :net_adapter_name, :net_adapter_interface_description
+
+      run_cmd 'New-VMSwitch', _target_computer: computer_name, name: name, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/optimize_vhd.rb

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def optimize_vhd(path:, computer_name: nil, **options)
+      run_cmd 'Optimize-VHD', _target_computer: computer_name, _skip_json: true, path: path, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/remove_item.rb

@@ -0,0 +1,10 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def remove_item(path:, computer_name: nil, **options)
+      # TODO: Really lock this method down, validation is good.
+      run_cmd 'Remove-Item', _target_computer: computer_name, _skip_json: true, path: path, force: true, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/remove_vm.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def remove_vm(id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: id }],
+          ['$VM | Remove-VM', { force: true, **options }]
+        ],
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/remove_vm_dvd_drive.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def remove_vm_dvd_drive(id:, vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$DVD = $VM | Get-VMDvdDrive', { _by_id: id }],
+          ['$DVD | Remove-VMDvdDrive', options]
+        ],
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/remove_vm_hard_disk_drive.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def remove_vm_hard_disk_drive(vm_id:, id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$HDD = $VM | Get-VMHardDiskDrive', { _by_id: id }],
+          ['$HDD | Remove-VMHardDiskDrive', options]
+        ],
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/remove_vm_network_adapter.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def remove_vm_network_adapter(id:, computer_name: nil, **options)
+      requires_one options, :vm_id, :management_os
+      options.delete :management_os
+
+      cmdlist = []
+      if options[:vm_id]
+        vm_id = options.delete :vm_id
+        cmdlist += [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$NIC = $VM | Get-VMNetworkAdapter', { _by_id: id }]
+        ]
+      else
+        options.delete :vm_id
+        cmdlist << ['$NIC = Get-VMNetworkAdapter', { _by_id: id, management_os: true }]
+      end
+      cmdlist << ['$NIC | Remove-VMNetworkAdapter', options]
+
+      run_cmdlist(
+        cmdlist,
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/remove_vm_switch.rb

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def remove_vm_switch(id:, computer_name: nil, **options)
+      run_cmd 'Remove-VMSwitch', _target_computer: computer_name, _by_id: id, _skip_json: true, force: true, **options
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/rename_vm.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def rename_vm(id:, new_name:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: id }],
+          ['$VM | Rename-VM', { new_name: new_name, **options }]
+        ],
+        target_computer: computer_name,
+        skip_json: true
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/rename_vm_network_adapter.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def rename_vm_network_adapter(id:, new_name:, computer_name: nil, **options)
+      requires_one options, :vm_id, :management_os
+      options.delete :management_os
+
+      cmdlist = []
+      if options[:vm_id]
+        vm_id = options.delete :vm_id
+        cmdlist += [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$NIC = $VM | Get-VMNetworkAdapter', { _by_id: id }]
+        ]
+      else
+        options.delete :vm_id
+        cmdlist << ['$NIC = Get-VMNetworkAdapter', { _by_id: id, management_os: true }]
+      end
+      cmdlist << ['$NIC | Rename-VMNetworkAdapter', { new_name: new_name, **options }]
+
+      run_cmdlist(cmdlist, target_computer: computer_name, skip_json: true)
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/rename_vm_switch.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def rename_vm_switch(id:, new_name:, computer_name: nil, **options)
+      run_cmd(
+        'Rename-VMSwitch',
+        new_name: new_name,
+        _target_computer: computer_name,
+        _by_id: id,
+        _skip_json: true,
+        **options
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/resize_vhd.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def resize_vhd(path:, size_bytes:, computer_name: nil, **options)
+      run_cmd(
+        'Resize-VHD',
+        _target_computer: computer_name,
+        _skip_json: true,
+        path: path,
+        size_bytes: size_bytes,
+        **options
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/restart_vm.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def restart_vm(id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: id }],
+          ['$VM | Restart-VM', { force: true, **options }]
+        ],
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+
+  class Mock
+    def restart_vm(**_)
+      true
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/resume_vm.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def resume_vm(id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: id }],
+          ['$VM | Resume-VM', options]
+        ],
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+
+  class Mock
+    def resume_vm(**_)
+      true
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/save_vm.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def save_vm(id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: id }],
+          ['$VM | Save-VM', options]
+        ],
+        skip_json: true,
+        target_computer: computer_name
+      )
+    end
+  end
+
+  class Mock
+    def save_vm(**_)
+      true
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm(id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: id }],
+          ['$VM | Set-VM', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_bios.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_bios(vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$VM | Set-VMBios', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_com_port.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_com_port(id:, vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$COM = $VM | Get-VMComPort', { _by_id: id }],
+          ['$COM | Set-VMComPort', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_dvd_drive.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_dvd_drive(id:, vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$DVD = $VM | Get-VMDvdDrive', { _by_id: id }],
+          ['$DVD | Set-VMDvdDrive', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_firmware.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_firmware(vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$VM | Set-VMFirmware', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_floppy_disk_drive.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_floppy_disk_drive(id:, vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$Floppy = $VM | Get-VMFloppyDiskDrive', { _by_id: id }],
+          ['$Floppy | Set-VMFloppyDiskDrive', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_hard_disk_drive.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_hard_disk_drive(id:, vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$HDD = $VM | Get-VMHardDiskDrive', { _by_id: id }],
+          ['$HDD | Set-VMHardDiskDrive', { passthru: true, **options }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_key_protector.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_key_protector(vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$VM | Set-VMKeyProtector', options]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_network_adapter.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_network_adapter(id:, computer_name: nil, **options)
+      requires_one options, :vm_id, :management_os
+      options.delete :management_os
+
+      cmdlist = []
+      if options[:vm_id]
+        vm_id = options.delete :vm_id
+        cmdlist += [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$NIC = $VM | Get-VMNetworkAdapter', { _by_id: id }]
+        ]
+      else
+        options.delete :vm_id
+        cmdlist << ['$NIC = Get-VMNetworkAdapter', { _by_id: id, management_os: true }]
+      end
+      cmdlist << ['$NIC | Set-VMNetworkAdapter', { passthru: true, **options }]
+
+      run_cmdlist(cmdlist, target_computer: computer_name)
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_network_adapter_vlan.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_network_adapter_vlan(id:, computer_name: nil, **options)
+      requires_one options, :vm_id, :management_os
+      options.delete :management_os
+
+      cmdlist = []
+      if options[:vm_id]
+        vm_id = options.delete :vm_id
+        cmdlist += [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$NIC = $VM | Get-VMNetworkAdapter', { _by_id: id }]
+        ]
+      else
+        options.delete :vm_id
+        cmdlist << ['$NIC = Get-VMNetworkAdapter', { _by_id: id, management_os: true }]
+      end
+      cmdlist << ['$NIC | Set-VMNetworkAdapterVlan', { passthru: true, **options }]
+
+      run_cmdlist(cmdlist, target_computer: computer_name)
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_security.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_security(vm_id:, computer_name: nil, **options)
+      run_cmdlist(
+        [
+          ['$VM = Get-VM', { id: vm_id }],
+          ['$VM | Set-VMSecurity', {
+            _always_include: %i[encrypt_state_and_vm_migration_traffic virtualization_based_security_opt_out], passthru: true, **options
+          }]
+        ],
+        target_computer: computer_name
+      )
+    end
+  end
+end

data/lib/fog/hyperv/compute/requests/set_vm_switch.rb

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+class Fog::Hyperv::Compute
+  class Real
+    def set_vm_switch(id:, computer_name: nil, **options)
+      run_cmd 'Set-VMSwitch', _target_computer: computer_name, _by_id: id, passthru: true, **options
+    end
+  end
+end