ACC SHELL

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

YaST bytecode 1.4.0Provider+Provider.ycpHTMLMapStringSummaryName	CurrentType	LastCountry			Supported	
	Providers	OriginalProviders		Countries
Deleted		operation
initializedcountry		CheckType	
CloneProviderFilter		ProviderType	
GetCountry	Modified	Read	FilterNOT		Write	Import	Export	SelectSystemSelect	Add	Edit	 Delete	!Commit"Clone	#CloneSystem$Overview	%Summary	&GetCountries'IsUnique	(FilterProviders	)
SortProviders*GetProviders			!',1ltype	xtype	Dtype		providersStype	_name{name	type	name	  name	!!""name	##name$$Htype	%%qtype	split&&''name	**type	country		preselect	,3SCRReadWriteDir	Execute0network3HTMLList		Bold		3MapKeys3StringQuote		UnQuote		3SummaryDevice				AddHeader			DevicesList		$!$'
$,modem$1$9		modemisdndsl$?

$D
$I	$N
	$S$X$]%l
OriginalProvsProvsdiff(m!-m$n$o
$p-q%xretdir	
country_namesindex$z({-{&~

$	SCR::Dir	.sysconfig.network.providers.s&			filterfile	!		regexpmatch		[~],		foreachname	provp$	add	.sysconfig.network.providers.v$		listmapi			SCR::Dir	ii$

'
			SCR::Read	add		-
'
&
$eval	SCR::Read
.target.yast2country.ycp(4,	
y2error	
Country database not found&
&0country&eval0network&&,	
y2debug	
LastCountry=%1&	$&	SCR::Dir	.providers.s(&	,	
y2debug	
Countries=%1(!contains&CZ&		maplisti		&+-itemid	,	
y2debug	
Countries=%1&-%Language3LanguageGetLanguageCountry	-%	providers	type	(||||||all--			filterk	v,	
y2debug	
%1 %2	PROVIDER	+					toupper			SUPPORTEDno-	+					toupper			SUPPORTEDnoyes%	providers	type	(||||||all-
-			filterk	v,	
y2debug	
%1 %2	PROVIDER	+					toupper			SUPPORTEDno-	+					toupper			SUPPORTEDnono%type	,	
y2debug	
type=%1(&&all!		contains	4,	
y2error	
Unsupported provider type: %1--%ret
OriginalProvs	Provs			,	
y2milestone	
Writing configuration$(!-$	$			
,	
y2debug	
OriginalProvs=%1,	
y2debug	
Provs=%1(4,	
y2milestone	
.No changes to %1 providers -> nothing to write-,
		foreachprovider	
p(!haskey-$		add	$.sysconfig.network.providers.section,
	
y2debug	
deleting: %1	,
SCR::Write	&
			filterprov	
haskey,	
y2debug	

Deleted=%1
,						foreachname	provider		base&			filterchars			AabcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_-.$		add	.sysconfig.network.providers.v(!haskeyMODEMSUPPORTED'MODEMSUPPORTEDyes(!haskey
ISDNSUPPORTED'
ISDNSUPPORTEDno( !haskeyDSLSUPPORTED'!DSLSUPPORTEDno,$				foreachk	v	

('||||||||||
ASKPASSWORD

STUPIDMODE

COMPUSERVE

ISDNSUPPORTED
DSLSUPPORTED
MODEMSUPPORTED4)(*
0&*
no(+
1&+
yes(,&&
no
yes&-
		search		
nonoyes,1
SCR::Write	add		

,6
SCR::Write.sysconfig.network.providers,9SCR::Execute.target.bash5/bin/chown root:root /etc/sysconfig/network/providers,:SCR::Execute.target.bash0/bin/chmod 0700 /etc/sysconfig/network/providers-<%DProvs(E!-E
$F
,G	
y2debug	
Provs=%1&I&J
&K
	union&L%SProvs(T!-T
$U
,V	
y2debug	
Provs=%1-W%_values	
,a	
y2debug	
name=%1&c		
sformat		
%1(d		
findlastof		.&e					regexpsub				^.*\.([^.]*)\1(f&f(h"			substring		&i			substring		-	size	$k	SCR::Dir	&l				listmapvalue		SCR::Read	add	,p	
y2debug	
Name=%1,q	
y2debug	

Current=%1-s%{&}&~
,	
y2debug	
name=%1(&&!haskey
4,	
y2error	
No such provider: %1-&&eval

(&(
4&
'+					toupper			SUPPORTEDyes,	
y2debug	
Name=%1,	
y2debug	
Type=%1,	
y2debug	

Current=%1-%&(!-&(-(-&&add-%&&(-&_custom&edit-% &,	
y2debug	

Delete(%1)(!haskey
4,	
y2error	
Key not found: %1-&&delete-%!	,	
y2debug	
operation=%1(||addedit4,	
y2debug	
Providers=%1
'
,	
y2debug	
Providers=%1
(delete4(!haskey
4,	
y2error	
Key not found: %1-&
			remove
'
size
4,	
y2error	
Unknown operation: %1 (%2)-&&&
&&,	
y2debug	
LastCountry=%1-%"&(-(-&add-%#&(-(-&add-%fullname	suffixgen		forbiddenname	$	PROVIDER,	
y2debug	
fullname=%1(		regexpmatch		 \([0-9]+\)$4&					regexpsub				(.*) \([0-9]+\)$\1,	
y2debug	
fullname=%1$$$				maplistk	v
	PROVIDER)contains4&+&		
sformat		
%1 (%2)'!PROVIDER,"	
y2debug	
fullname=%1&%$&,'	
y2debug	
Name=%1(*		regexpmatch		[0-9]+$4*&+					regexpsub				
(.*)[0-9]+\1,,	
y2debug	
name=%1&0(141&2	provider0&3provider(5provider&6	provider0&9
):contains4:&;+&<		
sformat		
%1%2&>,?	
y2debug	
Name=%1-A%H$Provs			overview(J!-J	$K			
,L	
y2debug	
Provs=%1$N	,O		maplistname	provmapitrich	,P	
y2debug	
provider(%1): %2$Q	idtable_descr	PROVIDER(Vdsl'W	table_descradd	table_descr		PHONE$Z	+			+					
sformat		
%1 (%2)	PROVIDERHOMEPAGENo home pagenetwork<br>		
sformat		
Product Name: %1networkPRODUCTUnknownnetwork		
sformat		
Username: %1network	USERNAME'c	
rich_descr	&eadd	,g	
y2debug	
overview=%1-i%q%Provs			summary	provs		(s!-s	$t			
,u	
y2debug	
Provs=%1$w(xsize&zNothing is configured.network&}Configured Providers:network$	,		maplistname	provmapdescr	phone	$			
sformat		
Configured as %1network$		PHONE(&&		&			
sformat		
Configured as %1 (phone %2)network	&			add	PROVIDER	&-itemidmodemModem Providernetworkitemidisdn
ISDN ProvidernetworkitemiddslDSL Providernetwork%&-%'	forbidden$				maplistk	v
	PROVIDER-!contains%supp$			filtert					toupper		+				SUPPORTEDnoyes,	
y2debug	
supp=%1-	modem%(provstype		supported	etst,	
y2debug	
provs,type=%1,%2$+					toupper			SUPPORTED$(||rawipsyncppp4&
ISDNSUPPORTED&,	
y2debug	
supported=%1-filteri,	
y2debug	
i=%1(	4p$

	
(	
noyes(-	
ENCAP_nodef--(	SCR::Read+topath+			.yes(-	SCR::Read+topath.ENCAP--%)provspre$		sort		maplistiadd--(---(9                                  ."--"(	-+			#x                                  	4tmp	p$
		SCR::Read+	.PRIORITY(
&
-1$
-	tointeger
(||

	,	
y2error	
8Wrong priority (%1), you must change the algorithm! [%2]

&
+					tolower				SCR::Read+	.PROVIDER#                                   &
+					
sformat		
%1

-		
sformat		
%1%2			substring		
#(."--"			substring			#&remove-		maplisti		(x			substring		-			substring		#-topath			substring		#%*provsindex$	,	
y2debug	
%1-%2(_custom4,		foreachk	v		
'size	4dir	base$	SCR::Dir		add	.providers.s$	add	.providers.v&		maplisti			add		,"	
y2debug	
type=%1,#	
y2debug	
provs=%1(%&%	&&(,(	
y2debug	
provs=%1&*),,	
y2debug	
provs=%1$--/maplisti&0+(1	-2itemid
	PROVIDER||(4."--"-5itemid-----------------7itemid	SCR::Read+	.PROVIDER

ACC SHELL 2018