ACC SHELL

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

YaST bytecode 1.4.0URLURL.ycpHostnameStringIP	URLRecode
ValidChars	transform_map_passwd		transform_map_filename		transform_map_query			UnEscapeString				
EscapeString				MakeMapFromParams			MakeParamsFromMap			
Parse	Check	Build		FormatURL	HidePassword		HidePasswordToken!)<N		din		transform		

in		transform		params	
params_map		

url	url	>tokenstokenslen/url	<tokens0base3HostnameCheckFQ	3StringReplace				FormatFilename		3IPCheck	Check6	3	URLRecode
EscapePath		EscapeQuery		EscapePassword		UnEscape		$!D0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ.:_-/%$)
 %20$%24&%26+%2b,%2c/%2f:%3a;%3b=%3d?%3f@%40$<

 %20$%24&%26+%2b,%2c:%3a;%3b=%3d?%3f@%40$N
 %20$%24+%2b,%2c;%3b?%3f@%40%d	(f||4g-h,l				foreachtgt	src	&n		tolower		&o		toupper		&t%25%-v%
ret	$(||4-&			mergestring						splitstring			%%25,				foreachsrc	tgt	&			mergestring						splitstring			-%
	rawtokenstokenspth	userpass	hostport6	host6	,	
y2debug	
url=%1(||	size	-
$			regexptokenize			+			+			+			+			+			^(([^:/?#]+):[/]{0,2})?
([^/?#]*)?	([^?#]*)?(\?([^#]*))?(#(.*))?,	
y2debug	
rawtokens=%1$
'scheme	$	(	schemeftp4(			substring		/%2f4&+			/			substring		(4&			substring		'path'query	'fragment	$			regexptokenize				+			+			+			^(([^@:]+)(:([^@:]+))?@)?
(([^:@]+))(:([^:@]+))?,	
y2debug	
userpass=%1'user	'pass	'port	(	'host	'host	$			substring				size		,	
y2debug	

hostport6: %1$					regexpsub					^\[(.*)\]\1(&&4port6	,	
y2milestone	
IPv6 host detected: %1'host$					regexpsub				^\[.*\]:(.*)\1,	
y2debug	
port: %1'port(||	schemesamba	schemesmb4options		$	query(haskey	workgroup4'domain	workgroup	,	
y2debug	
	tokens=%1-%tokens(||	size	-(		search		 -$
,	
y2debug	

tokens: %1(!		regexpmatch			scheme^[[:alpha:]]*$-(!&&&&!	host!	host	host-#((!		regexpmatch			port^[0-9]*$-)-3%>url	userpass		query_map		$?$@,B	
y2debug	
URL::Build(): input: %1(D		regexpmatch			scheme^[[:alpha:]]*$4E&G	scheme,I	
y2debug	
url: %1(J	user4K&L	user,M	
y2milestone	
Escaped username '%1' => '%2'	user(O&&	size		pass4P&Q		
sformat		
%1:%2	pass(S	size	&S+			@&U		
sformat		
%1://%2,V	
y2debug	
url: %1(X||	host	host4Y&[	host		
sformat		
%1[%2]	host		
sformat		
%1%2	host,_	
y2debug	
url: %1(a&&		regexpmatch			port^[0-9]*$	port4b&c		
sformat		
%1:%2	port,e	
y2debug	
url: %1(h&&	path!		regexpmatch			path^/&i		
sformat		
%1/%2	path(k&&	path		regexpmatch			path^/4l)m			substring			path//'npath			substring			path(o	schemeftp4o&p		
sformat		
	%1/%%2f%2			substring			path4r&s		
sformat		
%1%2	path,v	
y2debug	
url: %1$y	query({&&&&	schemesmb	size		domain	workgroup		domain4|'}	workgroup	domain'query(	query&		
sformat		
%1?%2	query(	fragment&		
sformat		
%1#%2	fragment,	
y2debug	
url: %1(!4,	
y2error	
Invalid URL: %1-,	
y2debug	
URL::Build(): result: %1-%ret	pth	no_path	dir_sizenew_path		$(	size	4-$	path'path$$-	size	$'path-%params_list	ret		eq_posopt	val		(4,	
y2error	
Erroneous (nil) params!-(4-
$			splitstring			&&			filter	one_param	&&$
$$$,		foreach	one_param	&		search		=(4'4&			substring		&			substring		+'-%-			mergestring									maplistkey	value	(4,	
	y2warning	
Empty value for key %1&(||4,	
y2error	
Empty key (will be skipped)--"		
sformat		
%1=%2&%/subd	$2					regexpsub				(.*)(://[^/:]*):[^/@]*@(.*)\1\2:PASSWORD@\3-3%<ret$>(A&&haskeypass	size		pass4B'CpassPASSWORD-F

ACC SHELL 2018