ACC SHELL

Path : /proc/self/root/usr/share/YaST2/modules/
File Upload :
Current File : //proc/self/root/usr/share/YaST2/modules/PortRanges.ybc

YaST bytecode 1.4.0
PortRangesPortRanges.ycpPortAliasesreport_only_once	ReportOnlyOnce	max_port_numberIsPortRange	IsValidPortRange	PortIsInPortranges		DividePortsAndPortRanges				CreateNewPortRange	
RemovePortFromPortRanges		FlattenServices			7M
check_this	c
port_range	port	port_ranges	unsorted_ports	with_aliases		min_prmax_pr


port_numberport_ranges	?old_list	protocol	0base3PortAliasesGetListOfServiceAliases		
GetPortNumber	$	%(what_to_report	()		contains4)-*4+&,			add--$7%M(N		regexpmatch		^[0123456789]+:[0123456789]+$4N-O-Q%cmin_prmax_pr(e!4ewarning	$f		
sformat		
Not a port-range %1(g,g	
y2milestone	
-i$l	tointeger					regexpsub				^([0123456789]+):.*$\1$m	tointeger					regexpsub				^.*:([0123456789]+)$\1(p&&4pwarning	$q		
sformat		
Wrong port-range: '%1':'%2'(r,r	
	y2warning	
-t(y||4ywarning	$z		
sformat		
Wrong port-range definition %1({,{	
	y2warning	
-}(||4warning	$		
sformat		
Wrong port-range definition %1(,	
	y2warning	
-(4warning	$		
sformat		
Wrong port-range definition %1(,	
	y2warning	
--%retport_number(size-$$(4,		foreach
port_range	(4min_prmax_pr$	tointeger					regexpsub				^([0123456789]+):.*$\1$	tointeger					regexpsub				^.*:([0123456789]+)$\1(&&&&4&.-%ret		$
,		foreachport	(4'port_ranges			addport_ranges		4(4'ports	unionports		4'ports			addports		-%	(||4,	
y2error	
JWrong definition of the starting port '%1', it must be between 1 and 65535-(||||4,	
y2error	
HWrong definition of the ending port '%1', it must be between 1 and 65535-(4-	tostring	(4-+			+				tostring	:	tostring	4,	
y2error	
9Starting port '%1' cannot be bigger than ending port '%2'-%

ret	(||	-(||-,	
y2milestone	
$Removing port %1 from port ranges %2$	,		foreach
port_range	(!4(	tostring	&			add(	tostring	4min_prmax_pr$	tointeger					regexpsub				^([0123456789]+):.*$\1$ 	tointeger					regexpsub				^.*:([0123456789]+)$\1(#4#&$			add	+(&4&&'			add	-4)&*			add	+&+			add	-4.&/			add,3	
y2milestone	

Result: %1-5%?new_list	
list_of_ports	list_of_ranges	ports_to_port_numbers	port_numbers_to_port_names		max_loops(@!		contains	TCPUDP4@message	$A		
sformat		
4Protocol %1 doesn't support port ranges, skipping...(B,B	
y2milestone	
-C$F	$G	$H	$J
$L
,N		foreachone_item	(P&P			add4Rport_number$S(U4U,V	
	y2warning	
4Unknown port %1 but leaving it in the configuration.&W			add-Y'['\			add		,`		foreachport_number
port_names	(b!	tostring	4b(d	tostring	-4d&f			add	-(h	tostring	+4h&j			add	+4lused_port_names	$n		(osize4o&p			add	4q,r	
y2milestone	
-No port name for port number %1. Adding %1...&t			add	tostring	4x,y	
y2milestone	
,Removing port %1 mentioned in port ranges %2&}		toset$,	
y2milestone	
Joining list of ranges %1)&&4any_change_during_this_looptry_all_these_ranges	&-$$,		foreach
port_range	min_prmax_pr(!4warning	$		
sformat		
+Wrong port-range definition %1, cannot join(,	
	y2warning	
-$	tointeger					regexpsub				^([0123456789]+):.*$\1$	tointeger					regexpsub				^.*:([0123456789]+)$\1(||4,	
y2error	
Not a port range %1-,		foreachtry_this_pr	this_min	this_max	this_min_prthis_max_prnew_minnew_max(-$					regexpsub				^([0123456789]+):.*$\1$					regexpsub				^.*:([0123456789]+)$\1(||4,	
y2error	
Wrong port range %1, %2 > %3-$	tointeger$	tointeger(||4warning	$			
sformat		
+Wrong port-range definition %1, cannot join(	,	
	y2warning	
	-$$(&&4&&&(&&4&&&(&&4&&&(&&4&&&(+4&&&(-4&&&(&&&&4new_port_range	$		,	
y2milestone	
Joining %1 and %2 into %3	&			filter	filter_pr	
&&

&			add	(.(!.,	
y2milestone	
Result of joining: %1&	union-

ACC SHELL 2018