Lines Matching refs:xen
39 my $xen = RPC::XML::Client->new("http://$xenhost:$xenhosts{$xenhost}{'port'}");
40 my $session = $xen->simple_request("session.login_with_password", "user","");
44 $xenhosts{$xenhost} = {'xen' => $xen, 'session' => ""};
48 $xenhosts{$xenhost} = {'xen' => $xen, 'session' => $session->{'Value'}};
71 my ($xen, $session, $host_name, $host_ref) = @_;
72 …my $host_cpu_ref = validate_response($xen->simple_request("host.get_host_CPUs", $session, $host_re…
75 …my $host_cpu_utilisation = validate_response($xen->simple_request("host_cpu.get_utilisation", $ses…
83 my ($xen, $session, $host_name, $host_ref) = @_;
88 my $host_pif_ref = validate_response($xen->simple_request("PIF.get_all", $session));
91 my $host_pif_device = validate_response($xen->simple_request("PIF.get_device", $session, $_));
92 …my $host_pif_metrics_ref = validate_response($xen->simple_request("PIF.get_metrics", $session, $_)…
100 …my $host_pif_io_read = validate_response($xen->simple_request("PIF_metrics.get_io_read_kbs", $sess…
101 …my $host_pif_io_write = validate_response($xen->simple_request("PIF_metrics.get_io_write_kbs", $se…
112 my ($xen, $session, $host_name, $host_ref) = @_;
113 …my $host_metrics_ref = validate_response($xen->simple_request("host.get_metrics", $session, $host_…
114 …my $host_mem_total = validate_response($xen->simple_request("host_metrics.get_memory_total", $ses…
115 …my $host_mem_free = validate_response($xen->simple_request("host_metrics.get_memory_free", $sessi…
122 my ($xen, $session, $host_name, $vm_ref, $vm_name_label) = @_;
123 …my $vm_mem_stat_max = validate_response($xen->simple_request("VM.get_memory_static_max",$session,$…
124 …my $vm_mem_stat_min = validate_response($xen->simple_request("VM.get_memory_static_min",$session,$…
125 …my $vm_mem_dyn_max = validate_response($xen->simple_request("VM.get_memory_dynamic_max",$session,$…
126 …my $vm_mem_dyn_min = validate_response($xen->simple_request("VM.get_memory_dynamic_min",$session,$…
145 my ($xen, $session, $host_name, $vm_ref, $vm_name_label) = @_;
146 my $vm_metrics_ref = validate_response($xen->simple_request("VM.get_metrics",$session,$vm_ref));
148 …my %vm_vcpu_utilisation = %{validate_response($xen->simple_request("VM_metrics.get_vcpus_utilisati…
154 …my $vm_mem_actual = validate_response($xen->simple_request("VM_metrics.get_memory_actual",$session…
161 my ($xen, $session, $host_name, $vm_ref, $vm_name_label) = @_;
162 my $vm_vifs = validate_response($xen->simple_request("VM.get_VIFs",$session,$vm_ref));
165 my $vif_device = validate_response($xen->simple_request("VIF.get_device",$session,$_));
166 …my $vif_io_read = validate_response($xen->simple_request("VIF_metrics.get_io_read_kbs", $session, …
167 …my $vif_io_write = validate_response($xen->simple_request("VIF_metrics.get_io_write_kbs", $session…
175 my ($xen, $session, $host_name, $vm_ref, $vm_name_label) = @_;
176 my $vm_vbds = validate_response($xen->simple_request("VM.get_VBDs",$session,$vm_ref));
179 my $vbd_device = validate_response($xen->simple_request("VBD.get_device",$session,$_));
180 …my $vbd_io_read = validate_response($xen->simple_request("VBD_metrics.get_io_read_kbs", $session, …
181 …my $vbd_io_write = validate_response($xen->simple_request("VBD_metrics.get_io_write_kbs", $session…
190 my ($xen, $session, $host_name, $vm_ref, $vm_name_label) = @_;
194 my $vm_bootloader_results = $xen->simple_request("VM.get_HVM_boot_policy",$session,$vm_ref);
209 my $vm_pv_kernel_results = $xen->simple_request("VM.get_PV_kernel",$session,$vm_ref);
231 my $xen = $xenhosts{$xenhost}{'xen'};
235 my $host_ref = validate_response($xen->simple_request("session.get_this_host", $session));
237 …my $host_name = validate_response($xen->simple_request("host.get_name_label", $session, $host_ref)…
241 get_host_cpu_utilisation($xen, $session, $host_name, $host_ref);
243 get_host_mem_utilisation($xen, $session, $host_name, $host_ref);
245 get_host_pif_utilisation($xen, $session, $host_name, $host_ref);
248 …my $all_vm_refs = validate_response($xen->simple_request("host.get_resident_VMs",$session, $host_r…
252 … my $vm_name_label = validate_response($xen->simple_request("VM.get_name_label",$session,$vm_ref));
253 get_vm_type($xen,$session,$host_name,$vm_ref,$vm_name_label);
255 my $vm_id = validate_response($xen->simple_request("VM.get_domid",$session,$vm_ref));
261 get_vm_metrics($xen,$session,$host_name,$vm_ref,$vm_name_label);
267 get_vm_mem_info($xen,$session,$host_name,$vm_ref,$vm_name_label);
269 get_vm_vif_utilisation($xen,$session,$host_name,$vm_ref,$vm_name_label);
271 get_vm_vbd_utilisation($xen,$session,$host_name,$vm_ref,$vm_name_label);