o
AVb°P ã @ s¦ d dl Z d dlmZ d dlmZ d dlZd dlmZ d dlmZ d dlmZ ddlm Z dd l
m Z dd
l m
Z
dd lmZ d d
„ ZG dd„ dƒZG dd„ de ƒZdS )é N)ÚGtk)ÚPango)ÚCloner)Úlog)Úxmlutilé )Úuiutil)Ú vmmGObjectUI)Ú vmmAsyncJob)ÚvmmStorageBrowserc C s& | ¡ r| ¡ S | j ¡ rtdƒS dS )z"Is the passed path even clone-ablezNo storage to clone.N)Úget_cloneable_msgÚdiskÚis_emptyÚ_)Údiskinfo© r ú,/usr/share/virt-manager/virtManager/clone.pyÚ_get_cloneable_msg s
ÿr c @ s˜ e Zd ZdZdd„ Zdd„ Zdd„ Zdd „ 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$S )%Ú _StorageInfozô
Our wrapper class that is close to Cloner _DiskInfo content.
We track all user choices explicitly in this class, and then
serialize them into the actual cloner diskinfo once the
user clicks 'Clone' to complete the process.
c C s‚ || _ |j| _| ¡ | _|jj| _| ¡ | _ t
|ƒ| _ d | _ |j
o%|j
¡ | _| js.| ¡ | ¡ | _| j s:| ¡ s?d| _d S d S ©NF)Ú _diskinfor
Ú
_orig_diskÚget_nameÚ
_orig_vm_nameÚ new_guestÚnameÚ _new_vm_nameÚ
get_share_msgÚ share_msgr Ú
cloneable_msgÚ _manual_pathÚnew_diskÚget_source_pathÚ_generated_pathÚ_reset_generated_pathÚis_clone_requestedÚ_is_clone_requestedÚ is_cloneable)ÚselfÚvmÚclonerr r r r Ú__init__& s
ÿ
ÿz_StorageInfo.__init__c C s t | jƒ S ©N)Úboolr ©r( r r r r' : ó z_StorageInfo.is_cloneablec C s | j S r, ©r& r. r r r r% < s z _StorageInfo.is_clone_requestedc C ó | j S r, r0 r. r r r Úis_share_requested> ó z _StorageInfo.is_share_requestedc C r1 r, )r r. r r r Úwarn_about_sharing@ r3 z _StorageInfo.warn_about_sharingc C s | j jS r, )r Útargetr. r r r Ú
get_targetC r3 z_StorageInfo.get_targetc C s
| j ¡ S r, )r r" r. r r r Úget_orig_disk_pathE ó
z _StorageInfo.get_orig_disk_pathc C s | j r| j S | jS r, )r r# r. r r r Úget_new_disk_pathG s z _StorageInfo.get_new_disk_pathc C s t |ƒ| _d S r, )r- r& ©r( Úvalr r r Úset_clone_requestedL s z _StorageInfo.set_clone_requestedc C s
|| _ d S r, )r r: r r r Úset_manual_pathN r8 z _StorageInfo.set_manual_pathc C s$ |r|| j kr d S || _ | ¡ d S r, )r r$ r: r r r Úset_new_vm_nameP s z _StorageInfo.set_new_vm_namec C s$ t | jj| j| j| j ¡ ¡| _d S r, )r Úgenerate_clone_disk_pathr Úconnr r r" r# r. r r r r$ V s
üz"_StorageInfo._reset_generated_pathc C s< | j s | ¡ d |_d S | ¡ d}| ¡ }| ||¡ d S )NT)r& Úset_share_requestedr! r< r9 Ú set_new_path)r( r ÚsparseÚnewpathr r r Úset_values_on_diskinfo] s z#_StorageInfo.set_values_on_diskinfoc C s® g }| tdƒ| ¡ ¡ | tdƒ| ¡ ¡ | ¡ r'| tdƒ| ¡ ¡ | d¡ | jr<| tdƒd| ji ¡ n| tdƒ¡ | jrR| tdƒd| ji ¡ d |¡S ) NzDisk target: %szOriginal path: %sz New path: %sÚ
z$Storage is safe to share: %(reason)sÚreasonz.Sharing this storage is potentially dangerous.z$Storage is not cloneable: %(reason)s)Úappendr r6 r7 r9 r r Újoin)r( Úlinesr r r Ú get_tooltipm s$
ÿÿ
ÿ
z_StorageInfo.get_tooltipc C sª g }d}| ¡ }|r||7 }n|tdƒ7 }| |¡ d}| ¡ r*|tdƒ| ¡ 7 }| ¡ r@|tdƒ7 }| ¡ }|r@|d| 7 }|rG| |¡ d |¡}dt |¡ }|S )NÚ z No storage.zShare disk with %szClone this diskz (%s)rF z%s)
r7 r rH r2 r r% Úget_size_labelrI r Ú
xml_escape)r( r) rJ ÚlineÚpathÚ sizelabelÚlabelÚmarkupr r r Ú
get_markup s(
z_StorageInfo.get_markupc C s | j ¡ rdS | j ¡ rdS dS )Nz media-floppyz
media-opticalzdrive-harddisk)r Ú is_floppyÚis_cdromr. r r r Ú
get_icon_name› s
z_StorageInfo.get_icon_namec C s | j ¡ }|s dS dt|ƒ S )NrL z%.1f GiB)r Úget_sizeÚfloat)r( Úsizer r r rM ¢ s
z_StorageInfo.get_size_labelN)Ú__name__Ú
__module__Ú __qualname__Ú__doc__r+ r' r% r2 r4 r6 r7 r9 r< r= r> r$ rE rK rT rW rM r r r r r s& r c @ s
e Zd Zedd„ ƒZdd„ Zedd„ ƒZdd„ Zd d
„ Z d>d d
„Z
dd„ Z dd„ Z dd„ Z
dd„ Zdd„ Zdd„ Zdd„ Zd d „ Zd d „ Zd d!„ Zd"d#„ Zd$d%„ Zd&d'„ Zd(d)„ Zd*d+„ Zd,d-„ Zd?d.d/„Zd0d1„ Z d2d3„ Z d4d5„ Z d6d7„ Z d?d8d9„Z d:d;„ Z!d.separator_cbÚtoggledz
stock-sizeFc
s¸ || d }|dkr d S ˆ j | }| ¡ }| ¡ }| ¡ d } | ¡ d }
|
d|¡ |
d|¡ | d| ¡ d} | ¡ r@d} | d| ¡ | ¡ } | || d krZ| || d< d S d S ) Nr r¡ r ÚactiveÚvisiblezdialog-informationzdialog-warningú icon-name)rx r' r% Ú get_cellsÚ set_propertyr4 rK )
ÚcolumnÚcellÚmodelr£ Údatar5 Úsinfor§ r¦ Ú_chkimgÚ_chkboxÚiconÚtooltipr. r r Úchk_cell_data_cb' s&
ÿz-vmmCloneVM._init_ui..chk_cell_data_cbr z width-charsé Ú ellipsizeé c
sf || d }|dkr d S ˆ j | }| ¡ d }| ¡ d }| ˆ j¡} | d| ¡ | d| ¡ ¡ d S )Nr r¡ r rS r¨ )rx r© rT r) rª rW )
r« r¬ r r£ r® r5 r¯ Ú_pathimgÚ_pathtxtrS r. r r Úpath_cbH s
z$vmmCloneVM._init_ui..path_cb) rz r Ú ListStorerg Ú set_modelÚset_tooltip_columnÚTreeViewColumnr Ú
set_sizingÚTreeViewColumnSizingÚAUTOSIZEÚ
set_expandÚ
append_columnÚset_row_separator_funcÚCellRendererToggler˜ Ú_storage_clone_toggled_cbÚCellRendererPixbufrª ÚIconSizeÚMENUÚ
pack_startÚset_cell_data_funcÚCellRendererTextÚset_sort_column_idr Ú
EllipsizeModeÚMIDDLEÚ set_padding) r( Ú storage_listr ÚcloneColÚpathColr¤ ÚchkboxÚchkimgr´ ÚpathtxtÚpathimgrº r r. r r‰ sB
zvmmCloneVM._init_uic C s | d¡ ¡ | d¡ d¡ | ¡ }| ¡ | d¡ |j¡ | d¡ |jj¡ t | d¡| j
¡ ¡ | d¡ | j
¡ ¡ t
¡ | _| ¡ D ]}t| j||ƒ}|| j| ¡ < qJ| ¡ d S )Nz clone-cancelúclone-new-namerL zclone-orig-namezclone-dest-host)rz Ú
grab_focusÚset_textÚ
_build_clonerÚprepareÚsrc_namer r r Úset_grid_row_visibler@ Ú is_remoteÚget_pretty_descÚ collectionsÚ OrderedDictrx Ú
get_diskinfosr r) r6 Ú_populate_storage_ui)r( r* r r¯ r r r rŒ W s ÿ
zvmmCloneVM._reset_statec C s@ | j ¡ }| j ¡ }| d¡ ¡ }t||d}|r | |¡ |S )NrØ )rÝ )r@ Ú get_backendr) r rz Úget_textr Úset_clone_name)r( r@ Ú orig_nameÚnew_namer* r r r rÛ s s
zvmmCloneVM._build_clonerc C s0 | d¡ ¡ }t| j ¡ ƒD ]}| |¡ qd S )NrØ )rz ræ Úlistrx Úvaluesr> )r( Únewnamer¯ r r r Ú_set_paths_from_clone_name s ÿz%vmmCloneVM._set_paths_from_clone_namec C sN | d¡ ¡ }| ¡ | j ¡ D ]}| | ¡ | ¡ g¡ | ddg¡ qdS )zO
Fill in the storage UI from the collected StorageInfo classes
rž r¡ N)rz Ú get_modelÚclearrx rë rH r6 rK )r( r r¯ r r r rä † s þz vmmCloneVM._populate_storage_uic C sT | d¡ ¡ }|| }|d }| j| }| d¡ }| |¡ | d|j|j¡ d S )Nrž r r¦ z row-changed)rz rî rx Ú get_propertyr< ÚemitrP Úiter)r( ÚsrcÚtreepathr Úrowr5 r¯ r¦ r r r rÆ s
z$vmmCloneVM._storage_clone_toggled_cbc C sâ t | d¡¡}| j| }| ¡ | ¡ }| ¡ }| ¡ }| ¡ }| ¡ }| d¡
d¡ | d¡ ¡ | d¡ |¡ | d¡ |¡ | d¡ |pLd¡ | d¡
|¡ | d¡ |p^d ¡ | d¡
|¡ | d
¡ ¡ d S ) Nrž úchange-storage-docloneTzchange-storage-origúchange-storage-targetzchange-storage-sizeú-úchange-storage-newrL rm )r Úget_list_selectionrz rx rí r7 r9 rM r' r% Ú
set_activer¥ rÚ Ú
set_sensitiveÚshow_all)r( Útgtr¯ ÚorigÚnewrZ Ú can_cloneÚdo_cloner r r Ú_show_storage_windowž s"
z vmmCloneVM._show_storage_windowc C s | d¡ ¡ }| j| }| d¡ ¡ }| |¡ |s | ¡ d S | d¡ ¡ }tj | j j
¡ |¡rEt dƒ}t dƒ}| j
||¡}|sEd S | |¡ | ¡ d S )Nr÷ rö rù z(Cloning will overwrite the existing filezqUsing an existing image will overwrite the path during the clone process. Are you sure you want to use this path?)rz ræ rx Ú
get_activer< r‘ ÚvirtinstÚ
DeviceDiskÚpath_definitely_existsr) r@ rå r re Úyes_nor= )r( r5 r¯ r Únew_pathÚtext1Útext2Úresr r r Ú_storage_dialog_finish¹ s$
ÿ
z!vmmCloneVM._storage_dialog_finishc C sž g }d}| j ¡ D ] }| ¡ r| | ¡ ¡ q | ¡ s q |d| ¡ | ¡ f 7 }q |rB| j t
dƒt
dƒ| j ¡ |dœ ¡}|sBdS |
¡ D ]}| ¡ qFd S )NrL z%s: %s
z1Sharing storage may cause data to be overwritten.z‰The following disk devices will be shared with %(vmname)s:
%(pathlist)s
Running the new guest could overwrite data in these disk images.)ÚvmnameÚpathlistF)rx rë r% rH r9 r4 r6 r7 re Ú ok_cancelr r) r rã Ú raise_error)r( r* Ú new_pathsÚwarn_strr¯ r r r r r Ú _validateÙ s0
ÿ
ÿýþ
ÿzvmmCloneVM._validatec C sR | ¡ |d ur tdƒ|jj|dœ }| jj||d d S |jdd | ¡ d S )Nz8Error creating virtual machine clone '%(vm)s': %(error)s)r) Úerror)ÚdetailsT)Úpollvm)Úreset_finish_cursorr r r re rf Úschedule_priority_tickr” )r( r r r@ r* r r r Ú
_finish_cbó s þÿ zvmmCloneVM._finish_cbc C sž | ¡ }g }| ¡ D ]}|j}| ¡ }|sq
| ¡ }||vr#| |¡ q
| |¡ |D ]!}z| j |¡}| |j
¡ W q+ t yL t j
d|dd Y q+w d S )Nz4Error looking up pool=%s for refresh after VM clone.T)Úexc_info)Ú get_meterÚget_nonshare_diskinfosr! Úget_parent_poolr rH Ústart_duplicater@ Úget_pool_by_nameÚidle_addÚrefreshrd r rŠ ) r( Úasyncjobr* ÚmeterÚ
refresh_poolsr r
ÚpoolÚpoolnamer r r Ú _async_clone s,
€
ÿÿüzvmmCloneVM._async_clonec C sn | ¡ | ¡ }| ¡ D ]}|jj}| j| }| |¡ q | ¡ | ¡ D ]}| ¡ q%| |¡du r5d S |S r )
rí rÛ rã r
r5 rx rE rÜ r r )r( r* r r5 r¯ r r r Ú_build_final_cloner s
z vmmCloneVM._build_final_clonerc
C sº z | ¡ }|s
W d S W n ty+ } ztdƒt|ƒ }| j |¡W Y d }~S d }~ww | ¡ tdƒ|jj }|}| ¡ rFtdƒ|jj }t
| j |g| j | j
|g||| jƒ}| ¡ d S )Nz Error with clone settings: %sz#Creating virtual machine clone '%s'zPCreating virtual machine clone '%s' and selected storage (this may take a while))r) rd r rg re rf Úset_finish_cursorr r r r
r( r r@ rc Úrun)r( r* rk ÚmsgÚtitleÚtextÚprogWinr r r Ú_finish+ s0 ÿ€þÿþ
þ zvmmCloneVM._finishc C ó | ¡ S r, )r” ©r( ró Úeventr r r r I r3 zvmmCloneVM._close_cbc C r1 r, )r0 ©r( ró r r r r€ K r3 z vmmCloneVM._finish_clicked_cbc C s( t | d¡¡}| d¡ t|ƒ¡ d S )Nrž zstorage-details-button)r Úget_list_selected_rowrz rü r- )r( ró rõ r r r r N s z(vmmCloneVM._storage_selection_changed_cbc C ó | ¡ d S r, )r r4 r r r r‚ R r/ z&vmmCloneVM._storage_details_clicked_cbc C s, | ¡ }| d¡ |¡ | d¡ |¡ d S )Nrù zchange-storage-browse)r rz rü )r( ró r r r r r… U s z-vmmCloneVM._storage_dialog_doclone_toggled_cbc C r1 r, )r‘ r2 r r r rƒ Z r3 z#vmmCloneVM._storage_dialog_close_cbc C r6 r, )r
r4 r r r r„ \ r/ z$vmmCloneVM._storage_dialog_finish_cbc s@ ‡ fdd„}ˆ j d u rtˆ jƒˆ _ ˆ j |¡ ˆ j ˆ j¡ d S )Nc s ˆ d¡ |¡ d S )Nrù )rz rÚ )Ú
src_ignoreÚtxtr. r r Úcallback` s z6vmmCloneVM._storage_dialog_browse_cb..callback)ry r r@ Ú
set_finish_cbrb rc )r( Úignorer9 r r. r r† _ s
z$vmmCloneVM._storage_dialog_browse_cb)NNr, )#r[ r\ r] Ú classmethodrl r+ Úpropertyr@ rb r‘ r” r– r‹ r r‰ rŒ rÛ rí rä rÆ r r
r r r( r) r0 r r€ r r‚ r… rƒ r„ r† r r r r r_ © sB
"
K
r_ )rá Ú
gi.repositoryr r r r r r Úlibr Ú baseclassr r# r
Ú
storagebrowser r r r_ r r r r Ú s