ACC SHELL

Path : /usr/share/YaST2/modules/
File Upload :
Current File : //usr/share/YaST2/modules/CWMTsigKeys.ybc

YaST bytecode 1.4.0CWMTsigKeysCWMTsigKeys.ycpCWMLabelReportPopupStringAnalyzeTSIGKeyFile			tsig_keys		deleted_tsig_keys		
new_tsig_keys	
DdnsKeysWidgetRedrawKey2File		RemoveTSIGKeyFile	

RemoveTSIGKey	AddTSIGKeyFile	NormalizeFilename		DeleteTSIGKeyFromDisk	
Files2KeyMaps			
Files2Keys		Init		Handle
		Store		InitWrapper	
HandleWrapper
	StoreWrapper	CreateWidget		filename	filename	main		filenames		filenames	widget	key	widget	key	eventwidget	key	eventkey	key	eventkey	eventsettings	3UIChangeWidget

QueryWidget

SetFocus
WidgetExists
AskForExistingFile				AskForSaveFileName				3SCRReadExecute0base3CWMGetProcessedWidget	3LabelBrowseButton		AddButton	DeleteButton	FileName	3ReportError	3PopupError	Message	YesNo	
AnyMessage		3StringQuote		$!	$&	$+		%3
items$4				maplistk			itemid	key		key		filename	,7id_cwm_delete_keyEnabledsize,8id_cwm_key_listing_tableItems,9id_cwm_key_listing_table%Akey	filename	$B	,C						findk		
(D
key	4E&F	
filename	-G-I,K	
y2milestone	
Key: %1, File: %2	-L	%Sfilename	&T				filterf	
	
&W			add&X						filterk		

filename	%a
key	filename	$b	,c	%jfilename	keys	&k			filterf	

&n				add	$o	,p		foreachk	
	&q						addkey
filename%)&&||			substring		 			substring		"4&			substring		)&&||			substring		-	size	 			substring		-	size	"4&			substring		-	size	-%contents	ret	parts	&$			SCR::Read.target.string(	4,	
	y2warning	
&Unable to read file with TSIG keys: %1-	$		$				splitstring				{},		foreachp	
	(		regexpmatch		
&.*key[[:space:]]+[^[:space:]}{;]+\.* $4&				add						regexpsub				
(.*key[[:space:]]+([^[:space:]}{;]+)\.* $\1,	
y2milestone	
File: %1, Keys: %2	-	%keys	$	,	
y2milestone	
 Removing file %1, found keys: %2	,		foreachk	
	,SCR::Execute.target.bash		
sformat		
rm -rf /etc/named.d/K%1\.* 		tolower		
,SCR::Execute.target.remove%tmpret		ret		$							maplistf	
keys	$
-						maplistk	filename
key$					flatten	,	
y2milestone	
Files: %1, Keys: %2	-	%keys		ret	$	$							maplistk		
	
key	,	
y2milestone	
Files: %1, Keys: %2	-	%
get_keys_info	info	initial_path	$		
get_keys_info$	!	&		tsig_keys	&	
removed_files	&			new_files	(!haskey		tsig_keys4files	$
		key_files	&
$	
/etc/named.d/,id_cwm_existing_key_fileValue	,id_cwm_new_key_fileValue	,id_cwm_new_key_id
ValidChars?abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_,
%retexisting_filename	new_filename	$	ID$		id_cwm_existing_key_fileValue$		id_cwm_new_key_fileValue(	_cwm_delete_key4key	delete_filename	$
	id_cwm_key_listing_tableCurrentItem$

(	&&list_used_keys	list_used_keys4lister		used_keys	keys_to_delete	$	list_used_keys$!$
&			filterk			contains(size4message	$			mergestring			, &hThe selected TSIG key cannot be deleted,
because it is in use.
Stop using it in the configuration first.base,Cannot delete TSIG key.base-,
(!	_cwm_browse_existing_key_file4"&#		'Select File with the Authentication Keybase((	4),*id_cwm_existing_key_fileValue	--(/	_cwm_browse_new_key_file40&1		&Select File for the Authentication Keybase(6	,7id_cwm_new_key_fileValue	-8(:	_cwm_generate_key4;key	statgen_command	gen_ret(<!-id_cwm_new_key_file4<,=	
y2error	
No such UI widget: %1_cwm_new_key_file->$A
	id_cwm_new_key_idValue$B
	SCR::Read.target.stat	(Dsize
4E(F
isdir4G,Hid_cwm_new_key_file,I,Specified filename is an existing directory.base-L(O!"Specified file exists. Rewrite it?base4P-Q4T,U	,V	(Y||

4Z,[id_cwm_new_key_id,]"The TSIG key ID was not specified.base-^(a
4b(d!<The key with the specified ID exists and is used.
Remove it?base4f-g4jremove_file	$k
,l,m(qSCR::Execute.target.bash		
sformat		
ls /etc/named.d/K%1\.*		tolower		
4t(v>A key with the specified ID was found
on your disk. Remove it?base4xfiles	,ySCR::Execute.target.bash		
sformat		
rm -rf `ls /etc/named.d/K%1\.*`		tolower		
$|		SCR::Read.target.dir/etc/named.d,		foreachf	
(		contains

,
(!&The key will be created now. Continue?base-,SCR::Execute.target.bash*test -d /etc/named.d || mkdir /etc/named.d$
		
sformat		
</usr/bin/genDDNSkey --force  -f '%1' -n '%2' -d /etc/named.d	
,	
y2milestone	

Running %1
$
SCR::Execute.target.bash
(
4,Creating the TSIG key failed.base-&	_cwm_add_key&		(	_cwm_add_key4statkeys	coliding_files	$
	SCR::Read.target.stat	(size
4,"The specified file does not exist.base-$
	(size
4,1The specified file does not contain any TSIG key.base-$
				maplistk	
&
			filterf			toset
(size
4(!The specified file contains a TSIG key with the same
identifier as some of already present keys.
Old keys will be removed. Continue?base4-4,		foreachf	

,
,	,
-%set_info	info	$		
set_keys_info$	
removed_files	new_files		tsig_keys	key_files		toset						maplistk		

filename	,!		%,%-%,%help	add_existing
create_newcurrent_keyscontentsret	$	+			+			+			Z<p><big><b>TSIG Key Management</b></big><br>
Use this dialog to manage the TSIG keys.</p>
base<p><big><b>Adding an Existing TSIG Key</b></big><br>
To add an already created TSIG key, select a <b>Filename</b> of the file
containing the key and click <b>Add</b>.</p>
base<p><big><b>Creating a New TSIG Key</b></big><br>
To create a new TSIG key, set the <b>Filename</b> of the file in which to
create the key and the <b>Key ID</b> to identify the key then click
<b>Generate</b>.</p>
base(<p><big><b>Removing a TSIG Key</b></big><br>
To remove a configured TSIG key, select it and click <b>Delete</b>.
All keys in the same file are deleted.
If a TSIG key is in use in the configuration
of the server, it cannot be deleted. The server must stop using it
in the configuration first.</p>
base$2	VSquashFrameAdd an Existing TSIG KeybaseHBoxHWeight	HBoxHWeightHBox
InputFieldid_cwm_existing_key_fileopthstretchHWeightHBoxVBoxLabel 
PushButtonid_cwm_browse_existing_key_fileHWeightBottomVSquash
PushButtonid_cwm_add_keyopthstretch$R	VSquashFrameCreate a New TSIG KeybaseHBoxHWeight	HBoxHWeightHBox
InputFieldid_cwm_new_key_idopthstretch&Key IDbase
InputFieldid_cwm_new_key_fileopthstretchHWeightHBoxVBoxLabel 
PushButtonid_cwm_browse_new_key_fileHWeightBottomVSquash
PushButtonid_cwm_generate_keyopthstretch	&Generatebase$t	VBoxVSpacing0.5LeftLabelCurrent TSIG KeysbaseHBoxHWeight	Tableid_cwm_key_listing_tableheaderKey IDbaseFilenamebase	HWeightVBoxVSquash
PushButtonid_cwm_delete_keyopthstretchVStretch$	VBox			$		unionwidgetcustom
custom_widget	help	initstorehandle-	

ACC SHELL 2018