Hpux :: lvmpara manejar la estructura HPUX LVM | |
Descargar ahora |
Hpux :: lvm Clasificación y resumen
Anuncio publicitario
- Licencia:
- Perl Artistic License
- Precio:
- FREE
- Nombre del editor:
- Christopher White
- Sitio web del editor:
- http://search.cpan.org/~cwhite/
Hpux :: lvm Etiquetas
Hpux :: lvm Descripción
Función Perl para manejar la estructura HPUX LVM HPUX :: LVM es un módulo PERL que toma la salida de los comandos LVM VGDISPLAY y LVDISPLAY y PVDisplay y los ponen en un hash de hashes de la siguiente manera como ejemplo: '/ dev / vg08' => hash (0x404214c8) '' Act_pv '=> 4' alloc_pe '=> 4092' cur_lv '=> 2' cur_pv '=> 4' free_pe '=> 0' max_lv '=> 255' max_pe_per_pv '=> 1023' max_pv '=> 16' open_lv ' => 2 'pe_size_mbytes' => 4 'físico_vols' => hash (0x40421510) '/ dev / dsk / c3t12d0' => hash (0x404215a0) 'free_pe' => 0 'pv_status' => 'disponible' 'total_pe' = > 1023 '/ dev / dsk / c3t13d0' => hash (0x40421528) 'free_pe' => 0 'pv_status' => 'disponibles' '' total_pe '=> 1023' / dev / dsk / c3t14d0 '=> hash (0x40421564) 'Free_pe' => 0 'pv_status' => 'disponibles' 'total_pe' => 1023 '/ dev / dsk / c3t15d0' => hash (0x404215dc) 'free_pe' => 0 'pv_status' => 'disponibles' 'total_pe '=> 1023' Total_pe '=> 4092' Total_pvg '=> 0' vgda '=> 8' vg_status '=>' disponibles '' vg_write_access '=>' lectura / escritura '' lvols '=> hash (0x4042166c)' ' lvol1 '=> hash (0x40421684)' asignado_pe '=> 2046 'Current_le' => 2046 'lv_size' => 8184 'lv_status' => 'disponibles / sincronización' 'pv_data' => hash (0x4042178c) '/ dev / dsk / c3t14d0' => hash (0x404217a4) 'le_on_pv' = > 1023 'PE_ON_PV' => 1023 '/ dev / dsk / c3t15d0' => hash (0x404217d4) 'le_on_pv' => 1023 'pe_on_pv' => 1023 'used_pv' => 2 'lvdata' => hash (0x404216b4) ' Asignated_pe '=> 2046' asignación '=>' estricta '' bad_block '=>' on '' consistencial_recovery '=>' 'mwc' 'current_le' => 2046 'io_timout_seconds' => 'predeterminado' 'lv_permission' => 'lee / escribir '' lv_size_mbytes '=> 8184' lv_status '=>' disponibles / syncd '' Mirror_copies '=> 0' Programar '=>' Parallel '' stripe_size_kbytes '=> 0' Stripes '=> 0' vg_name '=> '/ dev / vg08' 'lvol2' => hash (0x40422834) 'asignated_pe' => 2046 'current_le' => 2046 'lv_size' => 8184 'lv_status' => 'disponibles / sincronización' 'pv_data' => hash ( 0x4042293c) '/ dev / dsk / c3t12d0' => hash (0x40422984) 'le_on_pv' => 1023 'pe_on_pv' => 1023 '/ dev / dsk / c3t13d0' => hash (0x40422954) 'le_on_pv' => 1023 'pe_on_pv '=> 1023' used_pv '=> 2' lvdata '=> tiene H (0x40422864) 'asignated_pe' => 2046 'asignación' => 'estrict' 'bad_block' => 'on' 'coherncy_recovery' => 'mwc' 'current_le' => 2046 'io_timout_seconds' => 'predeterminado' 'lv_permission '=>' Lea / escribe '' lv_size_mbytes '=> 8184' lv_status '=>' disponibles / sincronización '' Mirror_copies '=> 0' Programar '=>' Parallel '' stripe_size_kbytes '=> 0' Stripes '=> 0' 'Vg_name' => '/ dev / vg08'each Atribute es el mismo que la salida en el comando, pero con los guiones bajos en lugar de los espacios, por lo que "asignado PE" es "asignado_pe". También tuve que agregar atributos "físico_vols", "lvols", "lvdata" y "pv_data". (Para los datos de volumen lógico) "Physical_vols" es una refrena de hash a todos los volúmenes físicos en el VG "alternate_Links" es una transmisión de matriz debajo de cada vol voltido que contiene todos los enlaces a ese dispositivo (si corresponde). El primer elemento de matriz es "Ninguno" si no hay enlaces. (No se enumeró anteriormente, pero está debajo de "Físico físico" "LVOLS" es una refrena de hash a todos los grupos de volumen en el VG "LV_DATA" es una refrena hash a la salida de LVDisplays del volumen lógico. "PV_DATA" es una refrena hash a todos los volúmenes físicos que conforman el grupo de volumen y la cantidad de espacio que usan en cada uno. Los datos pueden acceder a través de los métodos proporcionados (subrutinas) .synopsis mi $ lvminfo_data = new hpux :: lvminfo (target_type => "local", persistencia => "nuevo", access_prog => "ssh", access_system => "localhost", access_user => "root"); $ arref2 = $ lvminfo_data-> get_all_volumegrups (); foreach $ vg (@ $ arref2) {imprimir " Grupo de volumen: $ VG "; Push @save_vgs, $ vg; $ vg_save = $ vg;} $ arref2a = $ lvminfo_data-> get_vg_physicalvols (volumen_group => $ vg_save); Imprimir" Los vols físicos en vg: $ vg_save "; foreach $ pvinvg (@ $ arref2a) {imprimir" $ pvinvg "; PUSH @SAVE_PVS, $ PVINVG; $ PVINVG_SAVE = $ PVINVG;} Requisitos: · Perl
Hpux :: lvm Software relacionado
Prueba :: GlassBox :: Heavy
Pruebas no invasivas de las subrutinas dentro de los programas PERL ...
173
Atributo :: manejadores :: prospectivo
Semántica más rica para los manipuladores de atributos ...
155