o
AVbfL @ s d dl Z d dlZd dlZd dlmZ d dlmZ d dlZd dlmZ d dlmZ ddl m
Z
ddl m Z dd l
mZ d ZdZd
Zd Zd Zd
ZdZdZG dd de ZG dd deZG dd deZG dd dZdd Zdd Z d d Z d d Z d d! Z d"d# Z dS )$ N)Gtk)Pango)log)xmlutil ) vmmAsyncJob) vmmGObjectUI)uiutil c @ s e Zd ZdZdd Zdd Zdd Zd5d d
Zd d Zd
d Z dd Z
dd Z dd Z dd Z
dd Zdd Zdd Zd d Zd d Zd!d" Zd#d$ Zd%d& Zd'd( Zd)d* Zd+d, Zd-d. Zd/d0 Zd1d2 Zd3d4 Z dS )6_vmmDeleteBasezI
Base class for both types of VM/device storage deleting wizards
c C s^ t | dd d | _| j| j| j| j| jd | | | j
| |
d S )Nz delete.uiz
vmm-delete)on_vmm_delete_delete_eventon_delete_cancel_clickedon_delete_ok_clicked on_delete_remove_storage_toggled)r __init__vmbuilderconnect_signalsclose_finish_clicked_cb_toggle_remove_storagebind_escape_key_close_cleanup_on_app_closetopwin set_title_get_dialog_title _init_stateself r$ -/usr/share/virt-manager/virtManager/delete.pyr $ s z_vmmDeleteBase.__init__c C s t | d d S )Ndelete-storage-list)_prepare_storage_listwidgetr" r$ r$ r% r! 5 s z_vmmDeleteBase._init_statec C s6 t d | | | | j| | j d S )NzShowing delete wizard)r debug_set_vm _reset_stater set_transient_forpresent)r# parentr r$ r$ r% show8 s
z_vmmDeleteBase.showNc C s" t d | j | d dS )NzClosing delete wizardr )r r) r hider* )r# ignore1ignore2r$ r$ r% r ? s
z_vmmDeleteBase.closec C d S Nr$ r" r$ r$ r% _cleanupF z_vmmDeleteBase._cleanupc C s4 | j }|r |j| |r|jd| j || _ d S )Nz
vm-removed)r conndisconnect_by_objconnect_vm_removed_cb)r# newvmoldvmr$ r$ r% r* N s
z_vmmDeleteBase._set_vmc C s | }dt| }| d| | jdd | d | }t
| d| | }| d | | d
| }t| d| j| jj| d S )Nz %sz header-labelr z
delete-cancelzdelete-warn-running-vm-boxdelete-remove-storager& )_get_dialog_textr
xml_escaper(
set_markupr resize
grab_focus_vm_active_statusr set_grid_row_visible_get_remove_storage_default
set_activetoggled_get_disk_datas_populate_storage_listr r7 )r# text title_str vm_activeremove_storage_default diskdatasr$ r$ r% r+ V s$
z_vmmDeleteBase._reset_statec C s | d S r4 )_finish)r# srcr$ r$ r% r s s z!_vmmDeleteBase._finish_clicked_cbc C s | j |kr | d S d S r4 )r r )r# _connr r$ r$ r% r: v s
z _vmmDeleteBase._vm_removed_cbc C s | }t| d| d S )Nzdelete-storage-scroll)
get_activer rD r( )r# rP dodelr$ r$ r% r z s
z%_vmmDeleteBase._toggle_remove_storagec C sP | d}| }g }| d r&|D ]}|t s%|t r%||t q|S )Nr& r= )r( get_modelrR STORAGE_ROW_CANT_DELETESTORAGE_ROW_CONFIRMappendSTORAGE_ROW_PATH)r# del_listmodelpathsrowr$ r$ r% _get_paths_to_delete s
z#_vmmDeleteBase._get_paths_to_deletec C s, | |d ur| jj||d | d S )N)details)reset_finish_cursorerrshow_errr )r# errorr^ r$ r$ r% _delete_finished_cb s z"_vmmDeleteBase._delete_finished_cbc C s | }|r%td}tdd| }| jj| jj| jj||d}|s%d S | | |s6|
d d d S | |\}}t | j
| j|g| j
g ||| j}| | d d S )Nz,Are you sure you want to delete the storage?z(The following paths will be deleted:
%s
)text1text2)r] _joinr`
chkbox_helperconfigget_confirm_delstorageset_confirm_delstorageset_finish_cursor_remove_devicerc _get_progress_textr
_async_deleter r runr* )r# r[ titlemessageretrJ progWinr$ r$ r% rO s0
z_vmmDeleteBase._finishc
C s d}g }z#| | |j }| }| |||}| | |jjdd W n& tyM } ztd| t
|d } d t
}W Y d }~nd }~ww d}
|D ]} |
d| d | d f 7 }
qR|
sg|sgd S |rx|d 7 }|td
7 }||
7 }ntd } |
}| r|| | d S d S ) N T)pollvmz2Error deleting virtual machine '%(vm)s': %(error)s)r rb z%s
%s
r r
zCAdditionally, there were errors removing certain storage devices:
z:Errors encountered while removing certain storage devices.) _destroy_vmr7 get_backend get_meter_async_delete_paths
_delete_vmschedule_priority_tick Exceptionrg get_namestrrh traceback
format_exc set_error) r# asyncjobr r[ r^ storage_errorsr7 metererb storage_errstrerrinfor$ r$ r% rp s>
z _vmmDeleteBase._async_deletec C s g }|D ]@}zt d| |td| d | ||| W n ty? } z|t|dt
f W Y d }~nd }~ww | q|S )NzDeleting path: %szDeleting path '%s'rv ) r r) startrg _async_delete_pathr rW r rh r r end)r# r[ r7 r r pathr r$ r$ r% r| s
z"_vmmDeleteBase._async_delete_pathsc C sR z| |}W n ty d }td| Y nw |r"|d d S t| d S )Nz*Path '%s' is not managed. Deleting locallyr )storageVolLookupByPathr r r) deleteosunlink)r# r7 r ignorevolr$ r$ r% r s z!_vmmDeleteBase._async_delete_pathc C t r4 NotImplementedErrorr" r$ r$ r% r r6 z _vmmDeleteBase._get_dialog_titlec C r r4 r r" r$ r$ r% r> r6 z _vmmDeleteBase._get_dialog_textc C r r4 r r# r[ r$ r$ r% ro r6 z!_vmmDeleteBase._get_progress_textc C r r4 r r" r$ r$ r% rH r6 z _vmmDeleteBase._get_disk_datasc C r r4 r r" r$ r$ r% rC r6 z _vmmDeleteBase._vm_active_statusc C r r4 r r# r r$ r$ r% r} r6 z_vmmDeleteBase._delete_vmc C r r4 r r r$ r$ r% rn r6 z _vmmDeleteBase._remove_devicec C r r4 r r r$ r$ r% ry
r6 z_vmmDeleteBase._destroy_vmc C r r4 r r" r$ r$ r% rE r6 z*_vmmDeleteBase._get_remove_storage_default)NN) __name__
__module__ __qualname____doc__r r! r/ r r5 r* r+ r r: r r] rc rO rp r| r r r> ro rH rC r} rn ry rE r$ r$ r$ r% r s6
)
r c @ sd e Zd ZdZedd Zdd Zdd Zdd Zd
d Z d d
Z
dd Z dd Z dd Z
dd ZdS )vmmDeleteDialogz=
Dialog for deleting a VM and optionally its storage
c
C sd z| j st | _ | j |j| W d S ty1 } z|jtdt| W Y d }~d S d }~ww )Nz!Error launching delete dialog: %s) _instancer r/ r r r` ra rg r )cls parentobjr r r$ r$ r%
show_instance s z vmmDeleteDialog.show_instancec C t dS )NzDelete Virtual Machinerg r" r$ r$ r% r z!vmmDeleteDialog._get_dialog_titlec C s t dd| j i S )NzDelete '%(vmname)s'vmnamerg r r r" r$ r$ r% r> ! s z vmmDeleteDialog._get_dialog_textc C s@ |rt d| j }|}||gS t d| j }|}||gS )NzJDeleting virtual machine '%s' and selected storage (this may take a while)z Deleting virtual machine '%s'r r# r[ rr rJ r$ r$ r% ro $ s z"vmmDeleteDialog._get_progress_textc C dS NTr$ r" r$ r$ r% rE . r6 z+vmmDeleteDialog._get_remove_storage_defaultc C s
t | jS r4 )_build_diskdata_for_vmr r" r$ r$ r% rH 1 s
z vmmDeleteDialog._get_disk_datasc C s | j }|S r4 )r is_active)r# rL r$ r$ r% rC 4 s
z!vmmDeleteDialog._vm_active_statusc C s |}dS r r$ )r# r[ dummyr$ r$ r% rn 8 s z vmmDeleteDialog._remove_devicec C ( | rtd| | d S d S )NzRemoving VM '%s')
is_persistentr r) r r r r$ r$ r% r} < zvmmDeleteDialog._delete_vmc C r )NzForcing VM '%s' power off.)r r r) r destroyr r$ r$ r% ry A r zvmmDeleteDialog._destroy_vmN)r r r r classmethodr r r> ro rE rH rC rn r} ry r$ r$ r$ r% r s
r c @ sn e Zd ZdZedddZdd Zdd Zd d
Zd d Z d
d Z
dd Z dd Z dd Z
dd Zdd ZdS )vmmDeleteStoragez]
Dialog for removing a disk device from a VM and optionally deleting
its storage
Fc
C s t d| z| | W n ty+ } z|tdt| W Y d }~d S d }~ww d}z| | W n% tyZ } zt dt| t|dt
f}W Y d }~nd }~ww |s_dS td}|ro|d7 }|td 7 }|jtd
|d d |d
|t j j
t jjd d S )NzRemoving device: %szError Removing Device: %sr$ z$Device could not be hotUNplugged: %srv Tz;This change will take effect after the next guest shutdown. z Storage will not be deleted.z4Device could not be removed from the running machiner rx r )r^ rf buttons dialog_type)r r)
remove_devicer ra rg r
detach_devicerh r r r ButtonsTypeOK MessageTypeINFO)r r` devobjdeleting_storager
detach_errmsgr$ r$ r% remove_devobj_internalL s8 "
z'vmmDeleteStorage.remove_devobj_internalc C s t | || _d S r4 )r r disk)r# r r$ r$ r% r m s
zvmmDeleteStorage.__init__c C r )NzRemove Disk Devicer r" r$ r$ r% r q r z"vmmDeleteStorage._get_dialog_titlec C s t dd| jji S )Nz Remove disk device '%(target)s'targetrg r r r" r$ r$ r% r> t s z!vmmDeleteStorage._get_dialog_textc C s2 |r t d| jj }nt d| jj }|}||gS )NzFRemoving disk device '%s' and selected storage (this may take a while)zRemoving disk device '%s'r r r$ r$ r% ro x s z#vmmDeleteStorage._get_progress_textc C r NFr$ r" r$ r$ r% rE r6 z,vmmDeleteStorage._get_remove_storage_defaultc C s t | jgS r4 ) _DiskData from_diskr r" r$ r$ r% rH s z vmmDeleteStorage._get_disk_datasc C r r r$ r" r$ r$ r% rC r6 z"vmmDeleteStorage._vm_active_statusc C s t |}tj| j| j| j|dS )N)r )boolr r r r` r )r# r[ r r$ r$ r% rn s
z vmmDeleteStorage._remove_devicec C r3 r4 r$ r r$ r$ r% r} r6 zvmmDeleteStorage._delete_vmc C r3 r4 r$ r r$ r$ r% ry r6 z vmmDeleteStorage._destroy_vmN)F)r r r r staticmethodr r r r> ro rE rH rC rn r} ry r$ r$ r$ r% r G s r c @ s$ e Zd ZdZedd Zdd ZdS )r zm
Helper class to contain all info we need to decide whether we
should default to deleting a path
c C s t | j| | j| j| jdv S )z:
Build _DiskData from a DeviceDisk object
)cdromfloppy)r r get_source_path read_only shareabledevice)r r$ r$ r% r s z_DiskData.from_diskc C s" || _ || _|| _|| _|| _d S r4 )labelr rosharedis_media)r# r r r r r r$ r$ r% r s
z_DiskData.__init__N)r r r r r r r r$ r$ r$ r% r s
r c C s g }| j jjD ]
}|t| q|td| jjddd |td| jj ddd |td| jj
ddd |S )zT
Return a list of _DiskData for all VM resources the app attempts to delete
kernelTFinitrddtb) xmlobjdevicesr rW r r
get_xmlobjr r r r )r rN r r$ r$ r% r s r c C s | }| |D ]K}|jsq
d}d}||j}t|||j\} }
| r0t|| ||\}}d} | s7|
} n|s;|} d} tjj }
|| |j|j
t | | |
| g}| | q
dS )zG
Fill in the storage list UI from the passed list of _DiskData
FNzdialog-warning)
rT clearr get_vol_by_path _can_delete_do_we_defaultr r IconSize
LARGE_TOOLBARr r rW ) storage_listr r7 rN rZ diskdatadefaultdefinfor can_deldelinfoinfoicon icon_sizer\ r$ r$ r% rI s2 rI c
C s t tttttttt}| | | t t }t t d}t }t t d}|
t j j |
d | | | | | | | | t }|dt| ||d dd }||| |t t }||d ||dt |t |d d
|d tjj t } || d || dt |t t }
||
d ||
d t ||
d
t ||
dt! |t d S )NTargetz Storage PathTrG Fc
S sR || }|t }| }|t }| d } | d| | d| | d| d S )Nr inconsistentactive sensitive)rU rV get_cells set_property)
columncellrZ _iterdatar\ r r r chkr$ r$ r% sensitive_cb s z+_prepare_storage_list..sensitive_cbrJ z width-chars2 ellipsizevisiblez icon-namez
stock-size)"r ListStorer r int set_modelset_tooltip_columnSTORAGE_ROW_TOOLTIPTreeViewColumnrg
set_sizingTreeViewColumnSizingAUTOSIZE
set_expand
append_columnCellRendererToggler9 _storage_item_toggled
pack_startset_cell_data_funcset_sort_column_idrU CellRendererText
add_attributerX r r
EllipsizeModeMIDDLESTORAGE_ROW_TARGETCellRendererPixbufSTORAGE_ROW_ICON_SHOWSTORAGE_ROW_ICONSTORAGE_ROW_ICON_SIZE) r rZ
confirmCol targetColinfoColpathColchkboxr path_txt
target_txtinfo_imgr$ r$ r% r' sF
r' c C s" | }| }| || t< d S r4 )rR rT rV )rP indexr r rZ r$ r$ r% r ( s r c C s d}|r | }|tjjkrtd}n>|tjjkr td}n3| r)td}n*tj
|s4td}n t tj |tj
sDtd}ntt|tj rStd}t| }||fS )z"Is the passed path even deleteableNzCannot delete iSCSI share.zCannot delete SCSI device.z'Cannot delete unmanaged remote storage.zPath does not exist.z$No write access to parent directory.z%Cannot delete unmanaged block device.)get_parent_poolget_typevirtinst StoragePool
TYPE_ISCSIrg TYPE_SCSI is_remoter r existsaccessdirnameW_OKstatS_ISBLKST_MODEr )r7 r r r pool_type
can_deleter$ r$ r% r / s$
r c
C s g }|j r
|td n|s t|jtjs |td |jr(|td |s4|jr4|td z+t j
| |j}t
|dkr^|| d|}td}|d| 7 }|| W n! ty } ztdt| |td W Y d
}~nd
}~ww d |} t| }
|
| fS ) z7 Returns (do we delete by default?, info string if not)zStorage is read-only.zNo write access to path.z Storage is marked as shareable.zStorage is a media device.r z
- z3Storage is in use by the following virtual machinesz!Failed checking disk conflict: %sz$Failed to check disk usage conflict.Nrd )r rW rg r r" r r$ r r r
DeviceDiskpath_in_use_byrz lenremoverh r r exceptionr r ) r7 vm_namer r r namesnamestrr r infostr
do_defaultr$ r$ r% r H s8
r )!r r% r
gi.repositoryr r r r r r r baseclassr libr rV rU rX r r r r r r r r r r rI r' r r r r$ r$ r$ r% s< q7T,6