Module:he-utilities: difference between revisions

From Wiktionary, the free dictionary
Jump to navigation Jump to search
Content deleted Content added
rm unnecessary "local" at top-level
local, whitespace, rm unneeded require
Line 1: Line 1:
local p = {}
require('mw.ustring')

p = {}


-- A wrapper function allowing the contents of this module to be called from
-- A wrapper function allowing the contents of this module to be called from
Line 7: Line 5:
-- 'ך', as does '{{#invoke:he-utilities|main|letters|kafSofit}}'.
-- 'ך', as does '{{#invoke:he-utilities|main|letters|kafSofit}}'.
function p.main(frame)
function p.main(frame)
if type(p[frame.args[1]]) == 'function' then
if type(p[frame.args[1]]) == 'function' then
return p[frame.args[1]](frame.args[2])
return p[frame.args[1]](frame.args[2])
else
else
return p[frame.args[1]][frame.args[2]]
return p[frame.args[1]][frame.args[2]]
end
end
end
end


Line 19: Line 17:
p.letters = {}
p.letters = {}
for i, name in ipairs({ 'alef', 'bet', 'gimel', 'dalet', 'hei', 'vav', 'zayen',
for i, name in ipairs({ 'alef', 'bet', 'gimel', 'dalet', 'hei', 'vav', 'zayen',
'khet', 'tet', 'yud', 'kafSofit', 'kaf', 'lamed',
'khet', 'tet', 'yud', 'kafSofit', 'kaf', 'lamed',
'memSofit', 'mem', 'nunSofit', 'nun', 'samekh', 'ayin',
'memSofit', 'mem', 'nunSofit', 'nun', 'samekh', 'ayin',
'peiSofit', 'pei', 'tsadiSofit', 'tsadi', 'kuf', 'resh',
'peiSofit', 'pei', 'tsadiSofit', 'tsadi', 'kuf', 'resh',
'shin', 'tav' }) do
'shin', 'tav' }) do
p.letters[name] = mw.ustring.char(0x05D0 + i - 1)
p.letters[name] = mw.ustring.char(0x05D0 + i - 1)
end
end
p.letters.sin = p.letters.shin
p.letters.sin = p.letters.shin
Line 32: Line 30:
p.vowels = {}
p.vowels = {}
for i, name in ipairs({ 'shva', 'khatafSegol', 'khatafPatakh', 'khatafKamats',
for i, name in ipairs({ 'shva', 'khatafSegol', 'khatafPatakh', 'khatafKamats',
'khirik', 'tseirei', 'segol', 'patakh', 'kamats',
'khirik', 'tseirei', 'segol', 'patakh', 'kamats',
'kholam', 'ignoreMe', 'kubuts', 'dagesh', 'meteg',
'kholam', 'ignoreMe', 'kubuts', 'dagesh', 'meteg',
'makaf', 'rafe', 'pasek', 'shinDot', 'sinDot',
'makaf', 'rafe', 'pasek', 'shinDot', 'sinDot',
'sofPasuk', 'upperDot' }) do
'sofPasuk', 'upperDot' }) do
p.vowels[name] = mw.ustring.char(0x05B0 + i - 1)
p.vowels[name] = mw.ustring.char(0x05B0 + i - 1)
end
end
p.vowels.ignoreMe = nil
p.vowels.ignoreMe = nil
Line 44: Line 42:
-- etc., respectively; otherwise, just returns letter.
-- etc., respectively; otherwise, just returns letter.
function p.otSofit(letter)
function p.otSofit(letter)
if letter == p.letters.kaf or letter == p.letters.mem
if letter == p.letters.kaf or letter == p.letters.mem
or letter == p.letters.nun or letter == p.letters.pei
or letter == p.letters.nun or letter == p.letters.pei
or letter == p.letters.tsadi then
or letter == p.letters.tsadi then
return mw.ustring.char(mw.ustring.codepoint(letter) - 1)
return mw.ustring.char(mw.ustring.codepoint(letter) - 1)
else
else
return letter
return letter
end
end
end
end


Line 56: Line 54:
-- a sh'va (since kaf sofit is written with a sh'va when it has no other vowel).
-- a sh'va (since kaf sofit is written with a sh'va when it has no other vowel).
function p.otSofitShva(letter)
function p.otSofitShva(letter)
letter = p.otSofit(letter)
letter = p.otSofit(letter)
if letter == p.letters.kafSofit then
if letter == p.letters.kafSofit then
return letter .. p.vowels.shva
return letter .. p.vowels.shva
else
else
return letter
return letter
end
end
end
end


Line 67: Line 65:
-- just returns letter.
-- just returns letter.
function p.otLoSofit(letter)
function p.otLoSofit(letter)
if letter == p.letters.kafSofit or letter == p.letters.memSofit
if letter == p.letters.kafSofit or letter == p.letters.memSofit
or letter == p.letters.nunSofit or letter == p.letters.peiSofit
or letter == p.letters.nunSofit or letter == p.letters.peiSofit
or letter == p.letters.tsadiSofit then
or letter == p.letters.tsadiSofit then
return mw.ustring.char(mw.ustring.codepoint(letter) + 1)
return mw.ustring.char(mw.ustring.codepoint(letter) + 1)
else
else
return letter
return letter
end
end
end
end


Line 79: Line 77:
-- dagesh; otherwise, just returns letter.
-- dagesh; otherwise, just returns letter.
function p.dageshKal(letter)
function p.dageshKal(letter)
if letter == p.letters.bet or letter == p.letters.gimel
if letter == p.letters.bet or letter == p.letters.gimel
or letter == p.letters.dalet or letter == p.letters.kaf
or letter == p.letters.dalet or letter == p.letters.kaf
or letter == p.letters.pei or letter == p.letters.tav then
or letter == p.letters.pei or letter == p.letters.tav then
return letter .. p.vowels.dagesh
return letter .. p.vowels.dagesh
else
else
return letter
return letter
end
end
end
end


Line 91: Line 89:
-- otherwise, just returns letter.
-- otherwise, just returns letter.
function p.dotlessShin(letter)
function p.dotlessShin(letter)
if letter == p.letters.shin .. p.letters.shinDot
if letter == p.letters.shin .. p.letters.shinDot
or letter == p.letters.sin .. p.letters.sinDot then
or letter == p.letters.sin .. p.letters.sinDot then
return p.letters.shin
return p.letters.shin
else
else
return letter
return letter
end
end
end
end



Revision as of 06:16, 6 November 2013

Some utilities for use in other Hebrew modules.


local p = {}

-- A wrapper function allowing the contents of this module to be called from
-- templates. For example, '{{#invoke:he-utilities|main|otSofit|כ}}' produces
-- 'ך', as does '{{#invoke:he-utilities|main|letters|kafSofit}}'.
function p.main(frame)
	if type(p[frame.args[1]]) == 'function' then
		return p[frame.args[1]](frame.args[2])
	else
		return p[frame.args[1]][frame.args[2]]
	end
end

-- A mapping from strings containing letter-names, e.g. "alef", to strings
-- containing letters, e.g. "\215\144". (The latter is a UTF-8-encoded string
-- containing the single Unicode character U+05D0 HEBREW LETTER ALEF.)
p.letters = {}
for i, name in ipairs({ 'alef', 'bet', 'gimel', 'dalet', 'hei', 'vav', 'zayen',
						'khet', 'tet', 'yud', 'kafSofit', 'kaf', 'lamed',
						'memSofit', 'mem', 'nunSofit', 'nun', 'samekh', 'ayin',
						'peiSofit', 'pei', 'tsadiSofit', 'tsadi', 'kuf', 'resh',
						'shin', 'tav' }) do
	p.letters[name] = mw.ustring.char(0x05D0 + i - 1)
end
p.letters.sin = p.letters.shin

-- Same as previous, but for vowels instead of letters. (It also includes a few
-- marks and diacritics that aren't quite "vowels", but are in the same sequence
-- of Unicode characters.)
p.vowels = {}
for i, name in ipairs({ 'shva', 'khatafSegol', 'khatafPatakh', 'khatafKamats',
						'khirik', 'tseirei', 'segol', 'patakh', 'kamats',
						'kholam', 'ignoreMe', 'kubuts', 'dagesh', 'meteg',
						'makaf', 'rafe', 'pasek', 'shinDot', 'sinDot',
						'sofPasuk', 'upperDot' }) do
	p.vowels[name] = mw.ustring.char(0x05B0 + i - 1)
end
p.vowels.ignoreMe = nil
p.vowels.mapik = p.vowels.dagesh

-- If letter is kaf, mem, nun, pei, or tsadi, returns kaf sofit, mem sofit,
-- etc., respectively; otherwise, just returns letter.
function p.otSofit(letter)
	if letter == p.letters.kaf or letter == p.letters.mem
			or letter == p.letters.nun or letter == p.letters.pei
			or letter == p.letters.tsadi then
		return mw.ustring.char(mw.ustring.codepoint(letter) - 1)
	else
		return letter
	end
end

-- Same as previous, except that if letter is kaf or kaf sofit, also tacks on
-- a sh'va (since kaf sofit is written with a sh'va when it has no other vowel).
function p.otSofitShva(letter)
	letter = p.otSofit(letter)
	if letter == p.letters.kafSofit then
		return letter .. p.vowels.shva
	else
		return letter
	end
end

-- If letter is kaf sofit, mem sofit, etc., returns kaf, mem, etc.; otherwise,
-- just returns letter.
function p.otLoSofit(letter)
	if letter == p.letters.kafSofit or letter == p.letters.memSofit
			or letter == p.letters.nunSofit or letter == p.letters.peiSofit
			or letter == p.letters.tsadiSofit then
		return mw.ustring.char(mw.ustring.codepoint(letter) + 1)
	else
		return letter
	end
end

-- If letter is bet, gimel, dalet, kaf, pei, or tav, returns letter plus a
-- dagesh; otherwise, just returns letter.
function p.dageshKal(letter)
	if letter == p.letters.bet or letter == p.letters.gimel
			or letter == p.letters.dalet or letter == p.letters.kaf
			or letter == p.letters.pei or letter == p.letters.tav then
		return letter .. p.vowels.dagesh
	else
		return letter
	end
end

-- If letter is shin plus a shin or sin dot, returns shin (without the dot);
-- otherwise, just returns letter.
function p.dotlessShin(letter)
	if letter == p.letters.shin .. p.letters.shinDot
			or letter == p.letters.sin .. p.letters.sinDot then
		return p.letters.shin
	else
		return letter
	end
end

return p