Semi del Verbo

Modulo:String: differenze tra le versioni

Naviga nella cronologia in modo interattivo
← Differenza precedenteDifferenza successiva →
Contenuto cancellato Contenuto aggiunto
m una versione importata
Nessun oggetto della modifica
Riga 1:
--[[
 
Questo modulo serve a fornire l'accesso alle funzioni stringa base.
This module is intended to provide access to basic string functions.
 
La maggior parte delle funzioni di questo modulo possono essere invocate con
Most of the functions provided here can be invoked with named parameters,
parametri con nome, senza nome o con un misto di entrambi. Quando vengono usati
unnamed parameters, or a mixture. If named parameters are used, Mediawiki will
parametri con nome il software di Mediawiki rimuoverà ogni spazio iniziale o finale
automatically remove any leading or trailing whitespace from the parameter.
dal parametro. A seconda dell'uso che si vuole fare della funzione può essere
Depending on the intended use, it may be advantageous to either preserve or
vantaggioso conservare oppure rimuovere questi spazi.
remove such whitespace.
 
Opzioni globali
Global options
ignore_errors: Ifse setsettato toa 'true' oro 1, anyogni errorcondizione conditiondi willerrore resultritornerà inuna stringa vuota
piuttosto che un messaggio di errore.
an empty string being returned rather than an error message.
 
error_category: Ifnel ancaso errorsi occurs,verifichi specifiesun theerrore nameè ofil anome categorydi touna categoria da includere
insieme al messaggio di errore. La categoria di default
include with the error message. The default category is
[CategoryCategoria:ErrorsErrori reported bydel Module String]. (TODO:verificare)
 
no_category: IfSe setsettato toa 'true' oro 1, nonon categoryverranno willaggiunte becategorie addedin ifcaso andi errorerrore.
 
is generated.
Unit tests per questo modulo sono disponibili a Module:String/test.
 
Diverse funzioni fanno uso di pattern Lua, questi sono una forma di espressione regolare, per
maggiori informazioni vedi:
* http://www.lua.org/manual/5.1/manual.html#5.4.1
* http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Patterns
* http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Ustring_patterns
 
Unit tests for this module are available at Module:String/tests.
]]
 
Line 28 ⟶ 34:
len
 
Questa funzione ritorna la lunghezza di una stringa.
This function returns the length of the target string.
 
Uso:
Usage:
{{#invoke:String|len|target_stringstringa|}}
O
OR
{{#invoke:String|len|s=target_stringstringa}}
 
Parametri
Parameters
s: TheLa stringstringa whosedi lengthcui toritornare reportla lunghezza
 
Se invocata usando parametri nominati, Mediawiki rimuoverà automaticamente ogni spazio iniziale
If invoked using named parameters, Mediawiki will automatically remove any leading or
o finale dalla stringa.
trailing whitespace from the target string.
]]
function str.len( frame )
local new_args = str._getParameters( frame.args, {'s'} );
local s = new_args['s'] or '';
return mw.ustring.len( s )
end
 
Line 50 ⟶ 56:
sub
 
Questa funzione ritorna la sottostringa di una stringa bersaglio, come indicato dagli indici
This function returns a substring of the target string at specified indices.
 
Uso:
Usage:
{{#invoke:String|sub|target_stringstringa_bersaglio|start_indexindice_iniziale|end_indexindice_finale}}
O
OR
{{#invoke:String|sub|s=target_stringstringa_bersaglio|i=start_indexindice_iniziale|j=end_indexindice_finale}}
 
Parameters
s: TheLa stringstringa toda returncui aestrarre subsetuna ofsottostringa
i: La posizione iniziale del primo carattere della sottostringa da ritornare, se non
i: The fist index of the substring to return, defaults to 1.
specificato è 1.
j: The last index of the string to return, defaults to the last character.
j: La posizione finale dell'ultimo carattere della sottostringa da ritornare, se non
specificato corrisponde alla lunghezza della stringa_bersaglio (l'ultimo carattere).
 
I caratteri della stringa sono numerati a partire da 1. Se i o j hanno un valore negativo allora
The first character of the string is assigned an index of 1. If either i or j
contano la posizione contando dalla fine della stringa, -1 è l'ultimo carattere della stringa,
is a negative value, it is interpreted the same as selecting a character by
-2 il penultimo, ecc...
counting from the end of the string. Hence, a value of -1 is the same as
selecting the last character of the string.
 
Se le posizioni sono al di fuori degli estremi della stringa viene ritornato un messaggio di
If the requested indices are out of range for the given string, an error is
errore.
reported.
]]
function str.sub( frame )
local new_args = str._getParameters( frame.args, { 's', 'i', 'j' } );
local s = new_args['s'] or '';
local i = tonumber( new_args['i'] ) or 1;
local j = tonumber( new_args['j'] ) or -1;
 
local len = mw.ustring.len( s );
 
-- Convert negatives for range checking
if i < 0 then
i = len + i + 1;
end
if j < 0 then
j = len + j + 1;
end
 
if i > len or j > len or i < 1 or j < 1 then
return str._error( 'StringIndici subsetfuori indexdagli outestremi ofdella rangestringa' );
end
if j < i then
return str._error( 'String subset indicesIndici outin ofordine ordersbagliato' );
end
 
return mw.ustring.sub( s, i, j )
end
 
--[[
ThisQuesta functionfunzione implementsimplementa thattutte featuresle caratteristiche di of {{str sub old}} ande isviene keptmantenuta inper ordermotivi
di compatibilità con template più vecchi.
to maintain these older templates.
]]
function str.sublength( frame )
local i = tonumber( frame.args.i ) or 0
local len = tonumber( frame.args.len )
return mw.ustring.sub( frame.args.s, i + 1, len and ( i + len ) )
end
 
--[[
match
_match
 
Questa funzione ritorna dalla stringa bersaglio una sottostringa corrispondente a un pattern
This function returns a substring from the source string that matches a
specificato.
specified pattern. It is exported for use in other modules
 
Uso:
Usage:
{{#invoke:String|match|source_string|pattern_string|start_index|match_number|plain_flag|nomatch_output}}
strmatch = require("Module:String")._match
O
sresult = strmatch( s, pattern, start, match, plain, nomatch )
{{#invoke:String|match|s=source_string|pattern=pattern_string|start=start_index
|match=match_number|plain=plain_flag|nomatch=nomatch_output}}
 
Parametri
Parameters
s: TheLa stringstringa toda searchcercare
pattern: TheIl pattern orda stringcercare tonella find within the stringstringa
start: TheLa indexposizione withininiziale theda sourcecui stringiniziare tola startricerca, these search.non specificato Theè first1.
match: Se c'è ci sono corrispondenze multiple quale ritornare, 1 per la prima
character of the string has index 1. Defaults to 1.
corrispondenza, 2 per la seconda ecc.. Un valore negativo indica di contare
match: In some cases it may be possible to make multiple matches on a single
all'indietro a partire dall'ultima corrispondenza, quindi match = -1 significa
string. This specifies which match to return, where the first match is
chiedere l'ultima corrispondenza. Se non specificato è 1
match= 1. If a negative number is specified then a match is returned
plain: Se vero specifica che il pattern deve essere considerato come una
counting from the last match. Hence match = -1 is the same as requesting
stringa normale, piuttosto che un pattern Lua. Se non specificata è falsa.
the last match. Defaults to 1.
nomatch: Il valore da ritornare se non ci sono corrispondenze, invece di ritornare
plain: A flag indicating that the pattern should be understood as plain
text. Defaults to false un errore.
nomatch: If no match is found, output the "nomatch" value rather than an error.
 
Se richiamata usando parametri nominati Mediawiki rimuoverà automaticamente tutti gli
For information on constructing Lua patterns, a form of [regular expression], see:
spazi iniziali e finali. In alcune circostanze questo può essere il comportamento
desiderato, in altre si potrebbe volerli conservare.
 
Se match_number o start_index sono al di fuori degli estremi della stringa s, allora
* http://www.lua.org/manual/5.1/manual.html#5.4.1
la funzione ritorna un errore. Viene generato un errore anche se il non vengono trovate
* http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Patterns
corrispondenze. Per sopprimere gli errori si può aggiungere il parametro ignore_errors=true,
* http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Ustring_patterns
in questo caso in caso di errore verrò ritornata una stringa vuota.
 
]]
function str.match(frame)
-- This sub-routine is exported for use in other modules
return str._match(frame.args)
function str._match( s, pattern, start, match_index, plain_flag, nomatch )
if s == '' then
return str._error( 'Target string is empty' )
end
if pattern == '' then
return str._error( 'Pattern string is empty' )
end
start = tonumber(start) or 1
if math.abs(start) < 1 or math.abs(start) > mw.ustring.len( s ) then
return str._error( 'Requested start is out of range' )
end
if match_index == 0 then
return str._error( 'Match index is out of range' )
end
if plain_flag then
pattern = str._escapePattern( pattern )
end
 
local result
if match_index == 1 then
-- Find first match is simple case
result = mw.ustring.match( s, pattern, start )
else
if start > 1 then
s = mw.ustring.sub( s, start )
end
 
local iterator = mw.ustring.gmatch(s, pattern)
if match_index > 0 then
-- Forward search
for w in iterator do
match_index = match_index - 1
if match_index == 0 then
result = w
break
end
end
else
-- Reverse search
local result_table = {}
local count = 1
for w in iterator do
result_table[count] = w
count = count + 1
end
 
result = result_table[ count + match_index ]
end
end
 
if result == nil then
if nomatch == nil then
return str._error( 'Match not found' )
else
return nomatch
end
else
return result
end
end
 
--[[
Entry point per chiamata diretta da un modulo
match
]]
function str._match( args )
local new_args = str._getParameters( args, {'s', 'pattern', 'start', 'match', 'plain', 'nomatch'} );
local s = new_args['s'] or '';
local start = tonumber( new_args['start'] ) or 1;
local plain_flag = str._getBoolean( new_args['plain'] or false );
local pattern = new_args['pattern'] or '';
local match_index = math.floor( tonumber(new_args['match']) or 1 );
local nomatch = new_args['nomatch'];
 
if s == '' then
This function returns a substring from the source string that matches a
return nomatch or str._error( 'La stringa in cui cercare è vuota' );
specified pattern.
end
if pattern == '' then
return nomatch or str._error( 'La stringa o pattern da cercare è vuota' );
end
if math.abs(start) < 1 or math.abs(start) > mw.ustring.len( s ) then
return nomatch or str._error( 'La posizione iniziale richiesta è fuori dagli estremi della stringa' );
end
if match_index == 0 then
return nomatch or str._error( 'Match index è nullo' );
end
if plain_flag then
pattern = str._escapePattern( pattern );
end
 
local result
Usage:
if match_index == 1 then
{{#invoke:String|match|source_string|pattern_string|start_index|match_number|plain_flag|nomatch_output}}
-- Il caso più semplice, trova la prima corrispondenza
OR
result = mw.ustring.match( s, pattern, start )
{{#invoke:String|match|s=source_string|pattern=pattern_string|start=start_index
else
|match=match_number|plain=plain_flag|nomatch=nomatch_output}}
if start > 1 then
s = mw.ustring.sub( s, start );
end
 
local iterator = mw.ustring.gmatch(s, pattern);
Parameters
if match_index > 0 then
s: The string to search
-- Ricerca in avanti
pattern: The pattern or string to find within the string
for w in iterator do
start: The index within the source string to start the search. The first
character of the string has index 1. Defaultsmatch_index = match_index to- 1.;
if match_index == 0 then
match: In some cases it may be possible to make multiple matches on a single
string. This specifies which match to return, where the first match isresult = w;
match= 1. If a negative number is specified then a match is returnedbreak;
end
counting from the last match. Hence match = -1 is the same as requesting
the last match. Defaults to 1.end
else
plain: A flag indicating that the pattern should be understood as plain
-- Ricerca all'indietro deve estrarre tutte le corrispondenze
text. Defaults to false.
local result_table = {};
nomatch: If no match is found, output the "nomatch" value rather than an error.
local count = 1;
for w in iterator do
result_table[count] = w;
count = count + 1;
end
 
result = result_table[ count + match_index ];
If invoked using named parameters, Mediawiki will automatically remove any leading or
end
trailing whitespace from each string. In some circumstances this is desirable, in
end
other cases one may want to preserve the whitespace.
 
If the match_number or start_index are out of range for the string being queried, then
this function generates an error. An error is also generated if no match is found.
If one adds the parameter ignore_errors=true, then the error will be suppressed and
an empty string will be returned on any failure.
 
For information on constructing Lua patterns, a form of [regular expression], see:
 
* http://www.lua.org/manual/5.1/manual.html#5.4.1
* http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Patterns
* http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Ustring_patterns
 
if result == nil then
]]
if nomatch == nil then
-- This is the entry point for #invoke:String|match
return str._error( 'Corrispondenza non trovata' );
function str.match( frame )
else
local new_args = str._getParameters( frame.args, {'s', 'pattern', 'start', 'match', 'plain', 'nomatch'} )
return nomatch;
local s = new_args['s'] or ''
end
local start = tonumber( new_args['start'] ) or 1
else
local plain_flag = str._getBoolean( new_args['plain'] or false )
return result;
local pattern = new_args['pattern'] or ''
end
local match_index = math.floor( tonumber(new_args['match']) or 1 )
local nomatch = new_args['nomatch']
 
return str._match( s, pattern, start, match_index, plain_flag, nomatch )
end
 
Line 257 ⟶ 226:
pos
 
Questa funzione ritorna il carattere della stringa in posizione pos.
This function returns a single character from the target string at position pos.
 
Uso:
Usage:
{{#invoke:String|pos|target_stringstringa_bersaglio|index_valueindice}}
O
OR
{{#invoke:String|pos|target=target_stringstringa_bersaglio|pos=index_valueindice}}
 
Parameters
target: The string to search
pos: The index for the character to return
 
Parametri
If invoked using named parameters, Mediawiki will automatically remove any leading or
target: La stringa in cui cercare
trailing whitespace from the target string. In some circumstances this is desirable, in
pos: La posizione del carattere da ritornare
other cases one may want to preserve the whitespace.
 
Se richiamata usando parametri nominati Mediawiki rimuoverà automaticamente tutti gli
The first character has an index value of 1.
spazi iniziali e finali. In alcune circostanze questo può essere il comportamento
desiderato, in altre si potrebbe volerli conservare.
 
I caratteri della stringa sono numerati a partire da 1. Se pos è un valore negativo allora
If one requests a negative value, this function will select a character by counting backwards
conta la posizione partendo dalla fine della stringa, -1 è l'ultimo carattere della stringa,
from the end of the string. In other words pos = -1 is the same as asking for the last character.
-2 il penultimo, ecc...
 
Se la posizione richiesta è 0 o al di fuori degli estremi della stringa viene ritornato
A requested value of zero, or a value greater than the length of the string returns an error.
un errore.
]]
function str.pos( frame )
local new_args = str._getParameters( frame.args, {'target', 'pos'} );
local target_str = new_args['target'] or '';
local pos = tonumber( new_args['pos'] ) or 0;
 
if pos == 0 or math.abs(pos) > mw.ustring.len( target_str ) then
return str._error( 'StringIndice della indexstringa outfuori ofdagli rangeestremi' );
end
 
return mw.ustring.sub( target_str, pos, pos );
end
 
Line 294 ⟶ 263:
str_find
 
ThisQuesta functionfunzione duplicatesduplica theil behaviorcomportamento di of {{str_find}}, including allincluso ofi itssuoi quirks.comportamenti
irregolari. Questa funzione è fornita per motivi di compatibilità con i vecchi template,
This is provided in order to support existing templates, but is NOT RECOMMENDED for
ma SI RACCOMANDA di non utilizzarla in nuovi template. Nello sviluppo di nuovo codice
new code and templates. New code is recommended to use the "find" function instead.
si raccomanda di usare la funzione "find".
 
Parametri
Returns the first index in "source" that is a match to "target". Indexing is 1-based,
source: La stringa in cui cercare
and the function returns -1 if the "target" string is not present in "source".
target: la stringa da cercare
 
Ritorna la posizione nella stringa source del primo carattere in cui c'è è stata
Important Note: If the "target" string is empty / missing, this function returns a
trovata la stringa target. I caratteri della stringa sono numerati a partire da 1. La funzione
value of "1", which is generally unexpected behavior, and must be accounted for
ritorna -1 se la stringa "target" non è contenuta in "source".
separatetly.
 
Nota importante: Per compatibilità con il vecchio template se la stringa "target" è vuota o manca
la funzione ritorna un valore di "1"
]]
function str.str_find( frame )
local new_args = str._getParameters( frame.args, {'source', 'target'} );
local source_str = new_args['source'] or '';
local target_str = new_args['target'] or '';
 
if target_str == '' then
return 1;
end
 
local start = mw.ustring.find( source_str, target_str, 1, true )
if start == nil then
start = -1
end
 
return start
end
 
Line 325 ⟶ 299:
find
 
Questa funzione permette di cercare una stringa bersaglio o un pattern Lua all'interno di
This function allows one to search for a target string or pattern within another
un'altra stringa.
string.
 
Uso:
Usage:
{{#invoke:String|find|source_strstringa_sorgente|target_stringstringa_bersaglio|start_indexindice_iniziale|plain_flag}}
O
OR
{{#invoke:String|find|source=source_strstringa_sorgente|target=target_strstringa_bersaglio|start=start_indexindice_iniziale|plain=plain_flag}}
 
Parametri
Parameters
source: TheLa stringstringa toin searchcui cercare
target: TheLa stringstringa oro pattern toLua findda within sourcecercare
start: TheLa indexposizione withinda thecui sourceiniziare stringla toricerca, startse the search,non defaultsspecificato toè 1
plain: BooleanSe flagè indicatingvero thatindica che la stringa target shoulddeve beessere understoodconsiderata ascome plainuna
text and not astesto anormale Luae stylenon regularcome expressionun pattern Lua, defaultsse non specificata toè truevera
 
Se richiamata usando parametri nominati Mediawiki rimuoverà automaticamente tutti gli
If invoked using named parameters, Mediawiki will automatically remove any leading or
spazi iniziali e finali. In alcune circostanze questo può essere il comportamento
trailing whitespace from the parameter. In some circumstances this is desirable, in
desiderato, in altre si potrebbe volerli conservare.
other cases one may want to preserve the whitespace.
 
Questa funzione ritorna la prima posizione maggiore o uguale a "start" a partire dalla quale
This function returns the first index >= "start" where "target" can be found
"target" si trova in "source". I caratteri della stringa sono numerati a partire da 1.
within "source". Indices are 1-based. If "target" is not found, then this
functionSe returns"target" 0.non viene Iftrovato eitherritorna 0. Se "source" oro "target" aresono missingmancanti /o empty,vuoti thisritorna 0.
function also returns 0.
 
Questa funzione dovrebbe essere sicura per stringhe UTF-8.
This function should be safe for UTF-8 strings.
]]
function str.find( frame )
local new_args = str._getParameters( frame.args, {'source', 'target', 'start', 'plain' } );
local source_str = new_args['source'] or '';
local pattern = new_args['target'] or '';
local start_pos = tonumber(new_args['start']) or 1;
local plain = new_args['plain'] or true;
 
if source_str == '' or pattern == '' then
return 0;
end
 
plain = str._getBoolean( plain );
 
local start = mw.ustring.find( source_str, pattern, start_pos, plain )
if start == nil then
start = 0
end
 
return start
end
 
Line 375 ⟶ 348:
replace
 
Questa funzione permette di rimpiazzare una stringa o pattern bersaglio con un'altra
This function allows one to replace a target string or pattern within another
stringa.
string.
 
Uso:
Usage:
{{#invoke:String|replace|source_strstringa_sorgente|pattern_stringstringa_pattern|replace_stringnuova_stringa|replacement_countnumero_di_sostituzioni|plain_flag}}
O
OR
{{#invoke:String|replace|source=source_stringstringa_sorgente|pattern=pattern_stringstringa_pattern|replace=replace_stringnuova_stringa|
count=replacement_countnumero_di_sostituzioni|plain=plain_flag}}
 
Parametri:
Parameters
source: TheLa stringstringa toda searchcercare
pattern: TheLa stringstringa oro pattern toLua findda trovare in within source
replace: TheIl replacementtesto textdi sostituzione
count: TheIl numbernumero ofdi occurencesvolte toin replacecui rimpiazzare la stringa, defaultsse non tospecificato alltutte.
plain: BooleanSe flagvero indicatingindica thatche il pattern shoulddeve essere considerato come betesto understoodnormale ase plainnon
text and not ascome apattern Lua, styleil regularvalore expression,di defaultsdefault toè truevero
]]
function str.replace( frame )
local new_args = str._getParameters( frame.args, {'source', 'pattern', 'replace', 'count', 'plain' } );
local source_str = new_args['source'] or '';
local pattern = new_args['pattern'] or '';
local replace = new_args['replace'] or '';
local count = tonumber( new_args['count'] );
local plain = new_args['plain'] or true;
 
if source_str == '' or pattern == '' then
return source_str;
end
plain = str._getBoolean( plain );
 
if plain then
pattern = str._escapePattern( pattern );
replace = mw.ustring.gsub( replace, "%%", "%%%%" ); --Only need to escape replacement sequences.
end
 
local result;
 
if count ~= nil then
result = mw.ustring.gsub( source_str, pattern, replace, count );
else
result = mw.ustring.gsub( source_str, pattern, replace );
end
 
return result;
end
 
--[[
simpleFunzione functionper to pipeutilizzare string.rep toin un templatestemplate.
]]
 
function str.rep( frame )
local repetitions = tonumber( frame.args[2] )
if not repetitions then
if frame.args[2] == '' then -- se il secondo parametro è una stringa nulla ritorno una stringa nulla
return str._error( 'function rep expects a number as second parameter, received "' .. ( frame.args[2] or '' ) .. '"' )
return ''
end
else
return string.rep( frame.args[1] or '', repetitions )
return str._error( 'la funzione rep si aspetta un secondo parametro con il numero di ripetizioni, ricevuto "' .. ( frame.args[2] or '' ) .. '"' )
end
end
return mw.ustring.rep( frame.args[1] or '', repetitions )
end
 
--[[
Funzione per decodificare una stringa codificata percentualmente.
escapePattern
Richiama la funzione mw.uri.decode di scribunto, vedi
https://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#mw.uri.decode
]]
 
function str.decode( frame )
This function escapes special characters from a Lua string pattern. See [1]
local valid_enctype = { QUERY = true, WIKI = true, PATH = true}
for details on how patterns work.
 
local new_args = str._getParameters(frame.args, {'source', 'enctype'})
[1] https://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Patterns
local source = new_args['source'] or ''
local enc_type = new_args['enctype'] or 'QUERY'
if not valid_enctype[enc_type] then
enc_type = 'QUERY'
end
return mw.uri.decode(source, enc_type)
end
 
--[[
Usage:
Funzione per semplificare stringhe con diacritici
{{#invoke:String|escapePattern|pattern_string}}
 
Parameters
pattern_string: The pattern string to escape.
]]
 
function str.escapePattern( frame )
function str.collate( frame )
local pattern_str = frame.args[1]
 
if not pattern_str then
local collation = {
return str._error( 'No pattern string specified' )
{ '[áàăắằẵẳâấầẫẩǎåǻäǟãȧǡąāảȁȃạặậḁⱥᶏᴂɐᶐɒ]' , 'a'},
end
{'[ÁÀĂẮẰẴẲÂẤẦẪẨǍÅÅǺÄǞÃȦǠĄĀẢȀȂẠẶẬḀȺᴁ]', 'A'},
local result = str._escapePattern( pattern_str )
{'[ḃḅḇbƀɓ]', 'b'},
return result
{'[ḂḄḆɃ]', 'B'},
{'[ćĉčċçḉȼƈ]', 'c'},
{'[ĆĈČĊÇḈȻƇ]', 'C'},
{'[đḍḓḏðď]', 'd'},
{'[ĐḌḒḎÐĎ]', 'D'},
{'[éèèêếềễểěëẽėȩḝęēḗḕẻȅȇẹệḙḛǝ]', 'e'},
{'[ÉÈÈÊẾỀỄỂĚËẼĖȨḜĘĒḖḔẺȄȆẸỆḘḚƎ]', 'E'},
{'[ḟⅎ]', 'f'},
{'[ḞℲ]', 'F'},
{'[ǵğĝǧġģḡᵹɠ]', 'g'},
{'[ǴĞĜǦĠĢḠƓ]', 'G'},
{'[ĥȟḧḣḩħḥḫẖ]', 'h'},
{'[ĤȞḦḢḨĦḤḪ]', 'H'},
{'[íìĭîǐïḯĩįīỉȉȋịḭı]', 'i'},
{'[ÍÌĬÎǏÏḮĨĮĪỈȈȊỊḬİ]', 'I'},
{'[ĵǰ]', 'j'},
{'[Ĵ]', 'J'},
{'[ḱǩķ]', 'k'},
{'[ḰǨĶ]', 'K'},
{'[ĺľļłḷḹḽḻl·l·ŀƚⱡ]', 'l'},
{'[ĹĽĻŁḶḸḼḺL·L·ĿȽⱠ]', 'L'},
{'[ḿṁṃ]', 'm'},
{'[ḾṀṂ]', 'M'},
{'[ńǹňñṅņṇṋṉ]', 'n'},
{'[ŃǸŇÑṄŅṆṊṈ]', 'N'},
{'[óòŏôốồỗổǒöȫőõṍṏȭȯȱøǿǫǭōṓṑỏȍȏơớờỡởợọộ]', 'o'},
{'[ÓÒŎÔỐỒỖỔǑÖȪŐÕṌṎȬȮȰØǾǪǬŌṒṐỎȌȎƠỚỜỠỞỢỌỘ]', 'O'},
{'[ṕṗ]', 'p'},
{'[ṔṖ]', 'P'},
{'[ŕřṙŗȑȓṛṝṟ]', 'r'},
{'[ŔŘṘŖȐȒṚṜṞ]', 'R'},
{'[śṥŝšṧṡşṣṩș]', 's'},
{'[ŚṤŜŠṦṠŞṢṨȘ]', 'S'},
{'[ťṫẗţṭțṱṯ]', 't'},
{'[ŤṪŢṬȚṰṮ]', 'T'},
{'[úùŭûǔůüǘǜǚǖűũṹųūṻủȕȗưứừữửựụṳṷṵʉ]', 'u'},
{'[ÚÙŬÛǓŮÜǗǛǙǕŰŨṸŲŪṺỦȔȖƯỨỪỮỬỰỤṲṶṴɄ]', 'U'},
{'[ṽṿʋ]', 'v'},
{'[ṼṾƲ]', 'V'},
{'[ẃẁŵẘẅẇẉⱳ]', 'w'},
{'[ẂẀŴ̊ẄẆẈⱲ]', 'W'},
{'[ýỳŷẙÿỹẏȳỷỵɏƴ]', 'y'},
{'[ÝỲŶ̊ŸỸẎȲỶỴɎƳ]', 'Y'},
{'[źẑžżẓẕƶȥʐⱬ]', 'z'},
{'[ŹẐŽŻẒẔƵȤʐⱫ]', 'Z'},
}
 
local new_args = str._getParameters(frame.args, {'source'})
local source = new_args['source'] or ''
--local source = mw.ustring.toNFC(source)
 
for _, el in ipairs(collation) do
source = mw.ustring.gsub( source, el[1], el[2])
end
return source
end
 
--[[
Funzione per estrarre da un titolo la stringa adatta all'ordinamento alfabetico.
count
This function counts the number of occurrences of one string in another.
]]
 
function str.count(frame)
function str.titolo_alfa(frame)
local args = str._getParameters(frame.args, {'source', 'pattern', 'plain'})
-- Evito "I", "A", "Die"... che darebbero molte false corrispondenze in lingue diverse
local source = args.source or ''
local articoli = {"Il ", "Lo ", "La ", "L'", "Gli ", "Le ", "Un ", "Uno ", "Una ", "Un'", "The ", "An ", "Les ", "El ", "Los ", "Las ", "Der ", "Das "}
local pattern = args.pattern or ''
 
local plain = str._getBoolean(args.plain or true)
local source = frame.args[1]
if plain then
if not source or source == '' then
pattern = str._escapePattern(pattern)
source = mw.title.getCurrentTitle().text
end
end
local _, count = mw.ustring.gsub(source, pattern, '')
if not source or source == '' then
return count
return ''
end
source = mw.ustring.gsub(source, ' %(.*%)$', '')
source = str.collate( { args = { source } } )
source = mw.ustring.gsub(source, "^['%(%.¡¿ ]*", '')
for _,article in ipairs(articoli) do
source = mw.ustring.gsub(source, "^(" .. article .. ")(.*)$", "%2, %1")
end
source = mw.ustring.gsub(source, '^%l', mw.ustring.upper)
source = mw.text.trim(source)
return source
end
 
 
-- =================================================================
-- Classe per gestire i parametri
-- =================================================================
local Param = {}
Param.__index = Param
 
function Param.new(par_name, alt_name)
if par_name ~= "$index" and not mw.ustring.find(par_name, '#') then par_name = par_name .. '#' end;
return setmetatable({
name = par_name,
base_name = mw.ustring.gsub(par_name, ' ?#', '', 1),
alt = alt_name or ''
}, Param)
end
 
function Param:get_other_value(args, index)
if self.name == '$index' then
return tostring(index), true
else
return args[mw.ustring.gsub(self.name, '#', tostring(index), 1)] or '', false
end
end
 
function Param:get_first_value(args, index, base_index)
function value_or_nil (s)
if s and s~= '' then return s end
return nil
end
 
if self.name == '$index' then
return tostring(index), true
end
if index == base_index then
return value_or_nil(args[mw.ustring.gsub(self.name, '#', tostring(index), 1)]) or
value_or_nil(args[self.base_name]) or value_or_nil(args[self.alt]) or '', false
else
return value_or_nil(args[mw.ustring.gsub(self.name, '#', tostring(index), 1)]) or
value_or_nil(args[self.alt]) or '', false
end
end
 
 
setmetatable(Param, { __call = function(_, ...) return Param.new(...) end })
-- =================================================================
-- fine dichiarazione classe per parametro
-- =================================================================
 
-- =================================================================
-- Classe per gestire il messaggio
-- =================================================================
local Message = {}
Message.__index = Message
 
function Message.new(msg)
-- converto parentesi graffe che sono state precedute da "\"
msg = mw.ustring.gsub(msg, '\\{', '{')
msg = mw.ustring.gsub(msg, '\\}', '}')
local frame = mw.getCurrentFrame():getParent() or mw.getCurrentFrame()
 
return setmetatable({
msg = msg,
values = {},
frame = frame,
}, Message)
end
 
function Message:reset_values()
self.values = {}
end
 
function Message:add_value(value)
self.values[#self.values+1] = value
end
 
function Message:text()
return self.frame:preprocess(mw.message.newRawMessage(self.msg, self.values):plain())
end
 
setmetatable(Message, { __call = function(_, ...) return Message.new(...) end })
-- =================================================================
-- fine dichiarazione classe per messaggio
-- =================================================================
 
 
 
--[[
Funzione per unire una o più liste di valori in una stringa.
endswith
 
This function determines whether a string ends with another string.
Uso:
{{#invoke:String|arraytostring|par1=xxx|par2=xxx....|parn=xxxx|msg=msg|separator=|congiunzione=|pre=|post=|lista=}}
 
Parametri:
par1...parn: i nomi base dei parametri da inserire nel messsaggio, devono contenere il carattere '#' che precisa la
posizione in cui inserire l'indice. Se viene valorizzato a '$index' avrà automaticamente il valore del
contatore.
msg: il messaggio (cioè la riga unitaria) in cui eventuali caratteri '{', '}' dovranno essere
preceduti da '\', mentre una "|" dovrà essere inserita con il template {{!}}.
I valori da sostituire sono da inserire come $n ($1 sarà sostituito dal
valore di par1, $2 dal valore di par2, ecc...)
separatore: La stringa da inserire tra ogni valore
congiunzione: La stringa da inserire invece di separatore tra l'ultimo e il penultimo valore. Se
non precisato viene usato il valore di separatore
pre: eventuale stringa che precede l'unione delle stringhe
post: eventuale stringa che segue l'unione delle stringhe
indentazione: una stringa da ripetere cumulativamente per ogni messaggio (tipicamente '&nbsp')
lista: se valorizzata a:
'puntata' imposta i parametri per una lista puntata
'ordinata' imposta i parametri per una lista ordinata
'infobox' imposta l'unione come una lista, eccetto che nel caso ci sia
solo un elemento
Se lista è valorizzata separatore/congiunzione/pre/post sono ignorati, salvo il caso di 'infobox' e la
lista contenga solo un elemento.
nmin = indice iniziale da cui partire a scandire i parametri (di default pari a 1)
nmax = indice massimo a cui arrivare con i parametri (se non precisato illimitato)
nobbligatori = l'indice minimo che deve essere valutato anche in presenza di buchi nella sequenza (comunque l'indice massimo
che viene valutato è nmax)
baseIndex = valore dell'indice che può essere sostituito da stringa nulla (default = 1)
 
Esempi di chiamata:
{{#invoke:string:arraytostring|par1=var#|separatore=,|congiunzione=#32;e#32;}}
{{#invoke:string:arraytostring|par1=disegnatore #|par2=disegnatore # nota|msg = $1 <small>$2</small>|lista=infobox }}
{{#invoke:string:arraytostring|par1=editore #|par2=etichetta #|par3=editore # nota| msg=$1 \{\{#if:$2{{!}}$2 <small>$3</small>\}\}|lista=infobox }}
 
]]
function str.endswitharraytostring(frame)
 
local args = str._getParameters(frame.args, {'source', 'pattern'})
local sourcebase_args = argsframe.source or ''args
local params = {}
local pattern = args.pattern or ''
if not base_args then return str._error('Lista parametri vuota') end
if pattern == '' then
-- carico la lista dei parametri
-- All strings end with the empty string.
local index = 1
return "yes"
while true do
end
local par_name = base_args['par' .. index] or (index == 1 and base_args['par']) or ''
if mw.ustring.sub(source, -mw.ustring.len(pattern), -1) == pattern then
if par_name == '' then break end;
return "yes"
--carico eventuale nome alternativo per il primo parametro
else
local alt_name = base_args['altpar' .. index] or (index == 1 and base_args['altpar']) or ''
return ""
params[index] = Param(par_name, alt_name)
end
index = index + 1
end
--carico il messaggio
local msg = base_args.msg or '$1'
--if msg == '' then return str._error('Manca il messaggio da riprodurre.') end
local message = Message(msg)
elements = {}
-- carico gli altri parametri di formattazione
local Nmax = tonumber(base_args.Nmax) or tonumber(base_args.nmax) or 0
local base_index = tonumber(base_args.baseindex) or tonumber(base_args.baseIndex) or 1
local index = tonumber(base_args.Nmin) or tonumber(base_args.nmin) or base_index
local Nobbligatori = tonumber(base_args.Nobbligatori) or tonumber(base_args.nobbligatori) or base_index-1
local indentazione = base_args.indentazione or nil
local args = frame:getParent().args
-- estraggo il primo valore
local found = false
 
for i, param in ipairs(params) do
local v, is_index = param:get_first_value(args, index, base_index)
if (not(is_index) or base_index<=Nobbligatori) and v ~= '' then found = true end
message:add_value(mw.text.trim(v))
end
if found then
elements[#elements+1] = message:text()
index = index + 1
end
-- elaboro i valori successivi
while true do
if Nmax > 0 and index > Nmax then break end
message:reset_values()
found = false
for i, param in ipairs(params) do
local v, is_index = param:get_other_value(args, index)
if (not(is_index) or index<=Nobbligatori) and v ~= '' then found = true end
message:add_value(mw.text.trim(v))
end
if found then
elements[#elements+1] = message:text()
elseif index >= Nobbligatori then
break
end
index = index + 1
end
if #elements == 0 then return '' end
-- carico separatori, congiunzione, pre e postazione
local pre, post, separatore, congiunzione, indent = '', '', '', '', ''
local lista = base_args.lista or ''
if lista == 'puntata' or (lista =='infobox' and #elements >1) then
pre = '<UL><LI>'
post = '</LI>\n</UL>'
separatore = '</LI>\n<LI>'
congiunzione = separatore
elseif lista == 'ordinata' then
pre = '<OL><LI>'
post = '</LI>\n</OL>'
separatore = '</LI>\n<LI>'
congiunzione = separatore
else
pre = base_args.pre or ''
post = base_args.post or ''
separatore = base_args.separatore or ''
congiunzione = base_args.congiunzione or separatore
end
if indentazione then
local current_indentazione = indentazione
for i, msg in ipairs(elements) do
elements[i] = current_indentazione .. elements[i]
current_indentazione = current_indentazione .. indentazione
end
end
return pre .. mw.text.listToText(elements, separatore, congiunzione) .. post
end
 
--[[
Funzione per unire una lista di valori in una stringa.
join
 
Uso:
{{#invoke:String|listtostring|par_number=xxx|msg=msg|separator=|congiunzione=|pre=|post=|lista=}}
 
Parametri:
par_number: il numero di parametri che compongono il messaggio
msg: il messaggio (cioè la riga unitaria) in cui eventuali caratteri '{', '}' dovranno essere
preceduti da '\', mentre una "|" dovrà essere inserita con il template {{!}}.
I valori da sostituire sono da inserire come $n (nel primo messaggio $1 sarà sostituito dal parametro posizionale di
posizione Nmin, $2 da Nmin+2, ecc...., nel secondo messaggio $1 sarà sostituito dal parametro posizionale Nmin+par_number,
$2 da Nmin+par_number+2, ec....)
valore di par1, $2 dal valore di par2, ecc...)
separatore: La stringa da inserire tra ogni valore
congiunzione: La stringa da inserire invece di separatore tra l'ultimo e il penultimo valore. Se
non precisato viene usato il valore di separatore
pre: eventuale stringa che precede l'unione delle stringhe
post: eventuale stringa che segue l'unione delle stringhe
lista: se valorizzata a:
'puntata' imposta i parametri per una lista puntata
'ordinata' imposta i aprametri per una lista ordinata
'infobox' imposta l'unione come una lista, eccetto che nel caso ci sia
solo un elemento
Se lista è valorizzata separatore/congiunzione/pre/post sono ignorati, salvo il caso di 'infobox' e la
lista contenga solo un elemento.
nmax = indice massimo a cui arrivare con i parametri (se non precisato illimitato)
nobbligatori = l'indice minimo che deve essere valutato anche in presenza di buchi nella sequenza (comunque l'indice massimo
che viene valutato è nmax)
baseIndex = valore del primo parametro posizionale da cui cominciare a leggere (default = 1)
 
Join all non empty arguments together; the first argument is the separator.
Usage:
{{#invoke:String|join|sep|one|two|three}}
]]
 
function str.join(frame)
 
local args = {}
function str.listtostring(frame)
local sep
 
for _, v in ipairs( frame.args ) do
local base_args = frame.args
if sep then
local params = {}
if v ~= '' then
if not base_args then return str._error('Lista parametri vuota') end
table.insert(args, v)
-- carico la lista dei parametri
end
local base_index = tonumber(base_args.base_index) or 1
else
local par_number = tonumber(base_args.par_number) or 1
sep = v
local Nmax = tonumber(base_args.nmax) or 0
end
local Nobbligatori = tonumber(base_args.nobbligatori) or base_index-1
end
--carico il messaggio
return table.concat( args, sep or '' )
local message = Message(base_args.msg or '$1')
elements = {}
-- carico gli altri parametri di formattazione
local index = base_index
local args = frame:getParent().args
-- elaboro i valori successivi
local found = true
while true do
if Nmax > 0 and index > Nmax then break end
message:reset_values()
found = false
for i = index, index+par_number-1 do
message:add_value(args[i] or '')
if args[i] then
found = true
end
end
if found then
elements[#elements+1] = message:text()
elseif index > Nobbligatori then
break
end
index = index + par_number
end
if #elements == 0 then return '' end
-- carico separatori, congiunzione, pre e postazione
local pre, post, separatore, congiunzione = '', '', '', ''
local lista = base_args.lista or ''
if lista == 'puntata' or (lista =='infobox' and #elements >1) then
pre = '<UL><LI>'
post = '</LI>\n</UL>'
separatore = '</LI>\n<LI>'
congiunzione = separatore
elseif lista == 'ordinata' then
pre = '<OL><LI>'
post = '</LI>\n</OL>'
separatore = '</LI>\n<LI>'
congiunzione = separatore
else
pre = base_args.pre or ''
post = base_args.post or ''
separatore = base_args.separatore or ''
congiunzione = base_args.congiunzione or separatore
end
return pre .. mw.text.listToText(elements, separatore, congiunzione) .. post
end
 
--[[
Funzione di aiuto che popola la lista di argomenti, dato che l'utente può voler utilizzare sia
Helper function that populates the argument list given that user may need to use a mix of
parametri nominati che non nominati. Questo è rilevante perchè gli spazi iniziali iniziali
named and unnamed parameters. This is relevant because named parameters are not
e finali dei parametri nominati sono eliminati, mentre quelli dei parametri non nominati
identical to unnamed parameters due to string trimming, and when dealing with strings
non lo sono. Secondo l'applicazione si potrebbe a volte conservare o rimuovere gli spazi.
we sometimes want to either preserve or remove that whitespace depending on the application.
]]
function str._getParameters( frame_args, arg_list )
local new_args = {};
local index = 1;
local value;
 
for _i, arg in ipairs( arg_list ) do
value = frame_args[arg]
if value == nil then
value = frame_args[index];
index = index + 1;
end
new_args[arg] = value;
end
 
return new_args;
end
 
--[[
Funzione di appoggio per gestire i messaggi di errore.
Helper function to handle error messages.
]]
function str._error( error_str )
local frame = mw.getCurrentFrame();
local error_category = frame.args.error_category or 'ErrorsErrori reportedriportati bydal Modulemodulo String';
local ignore_errors = frame.args.ignore_errors or false;
local no_category = frame.args.no_category or false;
 
if str._getBoolean(ignore_errors) then
return '';
end
 
local error_str = '<strong class="error">StringErrore Modulenel Errormodulo String: ' .. error_str .. '</strong>';
if error_category ~= '' and not str._getBoolean( no_category ) then
error_str = '[[CategoryCategoria:' .. error_category .. ']]' .. error_str;
end
 
return error_str;
end
 
--[[
Funzione di appoggio per interpretare le stringhe come valori booleane
Helper Function to interpret boolean strings
]]
function str._getBoolean( boolean_str )
local boolean_value;
 
if type( boolean_str ) == 'string' then
boolean_str = boolean_str:lower();
if boolean_str == 'false' or boolean_str == 'no' or boolean_str == '0'
or booleean_str == 'falso' or boolean_str == '' then
boolean_value = false;
else
boolean_value = true;
end
elseif type( boolean_str ) == 'boolean' then
boolean_value = boolean_str;
else
error( 'NoNessun booleanvalore valuebooleano foundtrovato' );
end
return boolean_value
end
 
--[[
Funzione di appoggio per aggiungere un carattere di escape a tutti i caratteri speciali,
Helper function that escapes all pattern characters so that they will be treated
così da trattare una stringa come testo normale e non come pattern di Lua.
as plain text.
]]
function str._escapePattern( pattern_str )
return mw.ustring.gsub( pattern_str, "([%(%)%.%%%+%-%*%?%[%^%$%]])", "%%%1" );
end
 
return str
 
-- Version history:
-- 29/3/2013 traduzione iniziale da en:module:String versione 540627185 del 26 febbraio 2013
-- 07/05/2013 aggiunta funzione rep da en:module:String versione 552254999 del 26 aprile 2013
-- 19/08/2013 aggiunta funzione arraytostring
Estratto da "https://it.seminaverbi.bibleget.io/wiki/Modulo:String"