Wikipedysta:MatmaBot/ibCleaner.rb

# ibCleaner v. 0.7 by Matma Rex
# do użycia wraz z AWB
# io.txt to plik, do którego AWB zapisuje tekst arta, uruchamia ten skrypt, po czym odczytuje ponownie zawartość tego pliku
# stworzone na podst. [[user:Matma Rex/infobox.js]]

# licencja: cc-by/GFDL

f = File.open('io.txt', 'r')
str = f.read
f.close
nstr=''

# usuń linie =begin i =end, aby włączyć
=begin
# merytoryczne - gdy brak zmiany, odpuszcza CAŁOŚĆ
ostr=str

str=str.gsub(//,'')

puts "Bez zmian." if(str==ostr)
exit if(str==ostr)
=end

# some more WP:SK changes
str.gsub!(/\{\{\s*([^|{}]+ |uni|)stub2?(\|[^{}]+)?\}\}/i){
	if $1=='sekcja '
		'{{sekcja stub}}'
	else
		'{{stub}}'
	end
}
str.gsub!(/\{\{\{(?:poprzednik|następca|pop|nast|lata|info|lang)\|(.+?)\}\}\}/i,'\1')
str.gsub!(/(={1,5})\s*Przypisy\s*\1\s*<references\s?\/>/){
	if $1=='=' || $1=='=='
		'{{Przypisy}}

'
	else
		'<references>
<ref name="stopień">'+$1+'</ref>
</references>'
	end
}

# sklejanie skrótów linkowych
str.gsub!(/m\.? ?\[\[n\.? ?p\.? ?m\.?\]\]/, 'm [[n.p.m.]]');

# korekty dat - niepotrzebny przecinek
str.gsub!(/(\[\[[0-9]+ (stycznia|lutego|marca|kwietnia|maja|czerwca|lipca|sierpnia|września|października|listopada|grudnia)\]\]), (\[\[[0-9]{4}\]\])/i, '\1 \3');

# linkowanie do wieków
str.gsub!(/\[\[([XVI]{1,5}) [wW]\.?\]\]/, '[[\1 wiek|\1 w.]]');
str.gsub!(/\[\[([XVI]{1,5}) [wW]\.?\|/, '[[\1 wiek|');
str.gsub!(/\[\[(III|II|IV|VIII|VII|VI|IX|XIII|XII|XI|XIV|XV|XVIII|XVII|XVI|XIX|XXI|XX)\]\]/, '[[\1 wiek|\1]]');
str.gsub!(/\[\[(III|II|IV|VIII|VII|VI|IX|XIII|XII|XI|XIV|XV|XVIII|XVII|XVI|XIX|XXI|XX)\|/, '[[\1 wiek|');

# rozwijanie typowych linków
str.gsub!(/\[\[ang\.\]\]/, '[[język angielski|ang.]]');
str.gsub!(/\[\[cz\.\]\]/, '[[język czeski|cz.]]');
str.gsub!(/\[\[fr\.\]\]/, '[[język francuski|fr.]]');
str.gsub!(/\[\[łac\.\]\]/, '[[łacina|łac.]]');
str.gsub!(/\[\[niem\.\]\]/, '[[język niemiecki|niem.]]');
str.gsub!(/\[\[pol\.\]\]/, '[[język polski|pol.]]');
str.gsub!(/\[\[pl\.\]\]/, '[[język polski|pol.]]');
str.gsub!(/\[\[ros\.\]\]/, '[[język rosyjski|ros.]]');
str.gsub!(/\[\[(((G|g)iga|(M|m)ega|(K|k)ilo)herc|[GMk]Hz)\|/, '[[herc|');

# unifikacja nagłówkowa
str.gsub!(/[ \n\t]*\n'''? *(Zobacz|Patrz) (też|także):* *'''?[ \n\t]*/i, "\n\n== Zobacz też ==\n");
str.gsub!(/[ \n\t]*\n(=+) *(Zobacz|Patrz) (też|także):* *=+[ \n\t]*/i, "\n\n\\1 Zobacz też \\1\n");
str.gsub!(/[ \n\t]*\n'''? *((Zewnętrzn[ey] )?(Linki?|Łącza|Stron[ay]|Zobacz w (internecie|sieci))( zewn[eę]trzn[aey])?):* *'''?[ \n\t]*/i, "\n\n== Linki zewnętrzne ==\n");
str.gsub!(/[ \n\t]*\n(=+) *((Zewnętrzn[ey] )?(Linki?|Łącza|Stron[ay]|Zobacz w (internecie|sieci))( zewn[eę]trzn[aey])?):* *=+[ \n\t]*/i, "\n\n\\1 Linki zewnętrzne \\1\n");

# nagłówki
str.gsub!(/(^|\n)(=+) *([^=\n]*[^ :=\n])[ :]*=/, '\1\2 \3 ='); # =a= > = a =, =a:= > = a =
str.gsub!(/(^|\n)(=+[^=\n]+=+)[\n]{2,}/, "\\1\\2\n");	# jeden \n

# listy ze spacjami
str.gsub!(/(\n[#*:;]+)([^ \t\n#*:;{])/, '\1 \2');

def friendlyIbox(nazwa,zaw)
	if !zaw.include?('=') || !zaw.include?("\n")
		return false #to nie infobox!
	end
	
	zaw.gsub!(/<!--.+?-->/,'')
	nazwa=nazwa.gsub('_',' ').strip
	
	
	#escapowanie parametrów
	zaw.gsub!(/<<<(#+)>>>/,"<<<#\\1>>>")
	#wewnętrzne szablony
	while zaw=~/\{\{[^}]+\|[^}]+\}\}/
		zaw.gsub!($&,$&.gsub(/\|/,'<<<#>>>'))
	end
	#wewnętrzne linki
	while zaw=~/\[\[[^\]]+\|[^\]]+\]\]/
		zaw.gsub!($&,$&.gsub(/\|/,'<<<#>>>'))
	end
	
	
	zaw.sub!(/\A\s*\|\s*/,'') #usunięcie pierwszego pipe'a
	lines=zaw.split('|')
	
	# te tablice przechowują odpowiednio nazwy i wartości kolejnych parametrów
	names=[]
	values=[]
		
	for line in lines
		line.gsub!(/<<<#>>>/,'|')
		line.gsub!(/<<<#(#+)>>>/,"<<<\\1>>>") #odescapowanie
		
		line=~/\A\s*(.+?)\s*=\s*([\s\S]*?)\s*\Z/
		if $&==nil
			next
		end
		name=$1
		value=$2
		
		
		values<<value
		names<<name
	end
	
	# sortowanie parametrów, usuń =begin i =end, aby włączyć
=begin
	para="parametr1,parametr2" # lista parametrów infoboksu w dobrej kolejności, oddzielone przecinkiem
	infobox='' # nazwa infoboksu, np. 'Biogram infobox'
	
	
	if(nazwa==infobox) # to ten.
		para=para.split(',')
		
		#bubblesort
		r=names.length
		0.upto(r-2){|i|
				(r-1).downto(i+1){|j|
					if( para.index(names[j-1]) > para.index(names[j]) )
						names[j-1], names[j] = names[j], names[j-1]
						values[j-1], values[j] = values[j], values[j-1]
					end
				}
		}
	end
=end
	
	zaw=''
	names.each_index{|i|
		zaw+=' | '+names[i]+' = '+values[i]+"\n"
	}
	
	# grupowane koordynaty
	zaw.gsub!(/\s*\| minut/, ' | minut')
	zaw.gsub!(/\s*\| sekund/, ' | sekund')
	
	return '{{'+nazwa[0,1].upcase+nazwa[1,999]+"\n"+zaw+'}}'+"\n"
end

while str!=''
	str=~/(\s*)\{\{([^|}]+[ _]infobo[^|}]+|[wW]ładca)((?:[^{}]|[^{}][{}][^{}]|\{\{(?:[^{}]|[^{}][{}][^{}]|\{\{[^{}]+\}\})+\}\})+)\}\}(?:\s*)/
	spaces=if $1!=''
		"\n"
	else
		''
	end
	l=if ($`)==nil
		''
	else
		$`
	end
	n=$2
	z=$3
	ib=$&
	
	if ib!=nil
		nIb=friendlyIbox(n,z)
	else
		nIb=nil
	end

	if nIb==false
		nstr+=l+ib
	elsif nIb==nil
		nstr+=str
		break
	else
		nstr+=l+spaces+nIb
	end
	
	str=str.sub(l+ib,'')
end

f = File.open('io.txt', 'w')
f.write(nstr)
f.close
puts 'Posprzątano.'