World Library  
My Account |  Register |  Help  
  
Flag as Inappropriate
Email this Article

Habakkuk

Article Id: WHEBN0000013967
Reproduction Date:

Title: Habakkuk  
Author: World Heritage Encyclopedia
Language: English
Subject: Nahum, December 2 (Eastern Orthodox liturgics), Malachi, Haggai, Zechariah (Hebrew prophet)
Collection:
Publisher: World Heritage Encyclopedia
Publication
Date:
 

Habakkuk

Habakkuk
Russian icon of the prophet Habakkuk
An 18th-century Russian icon of the prophet Habakkuk (Iconostasis of Transfiguration Church, Kizhi monastery, Karelia, Russia).
Prophet
Venerated in Judaism
Christianity
Islam
Major shrine Toyserkan, Iran
Kadarim, Israel
Feast January 15 (Roman Catholic; Greek)
December 2 (Orthodox)
Attributes Prophet
Major works Book of Habakkuk

Habakkuk (Listen or Listen; Hebrew: חֲבַקּוּק‎; also spelled Habacuc), was a prophet in the Hebrew Bible. He is the author of the Book of Habakkuk, the eighth of the collected twelve minor prophets.[1]

Life

Almost nothing is known about Habakkuk, aside from what few facts are stated within the book of the Bible bearing his name, or those inferences that may be drawn from that book.[2] His name appears in the Bible only in Habakkuk 1:1 and 3:1, with no biographical details provided other than his title "the prophet."[3] Even the origin of his name is uncertain.[1]

For almost every other prophet, more information is given, such as the name of the prophet's hometown, his occupation, or information concerning his parentage or tribe.[4] For Habakkuk, however, there is no reliable account of any of these.[5] Although his home is not identified, scholars conclude that Habakkuk lived in Jerusalem at the time he wrote his prophecy.[6] Further analysis has provided an approximate date for his prophecy and possibilities concerning his activities and background.

Beyond the Bible, considerable conjecture has been put forward over the centuries in the form of Christian and Rabbinic tradition, but such accounts are dismissed by modern scholars as speculative and apocryphal.[7][8]

Biblical account

Because the book of Habakkuk consists of five oracles about the Chaldeans (Babylonians), and the Chaldean rise to power is dated circa 612 BC, it is assumed he was active about that time, making him an early contemporary of Jeremiah and Zephaniah. Jewish sources, however, do not group him with those two prophets, who are often placed together, so it is possible that he was slightly earlier than they.

Because the final chapter of his book is a song, it is sometimes assumed that he was a member of the tribe of Levi, which served as musicians in Solomon's Temple.[9]

Name

The name Habakkuk, or Habacuc,[1] appears in the Hebrew Bible only in Habakkuk 1:1 and 3:1.[3] In the Masoretic Text, it is written in Hebrew: חֲבַקּוּק‎ (Standard Ḥavaqquq Tiberian Ḥăḇaqqûq).[11] This name does not occur elsewhere.[9] The Septuagint transcribes his name into Greek as Ἀμβακοὺμ (Ambakoum),[12] and the Vulgate transcribes it into Latin as Abacuc.[13]

The etymology of the name is not clear,[1] and its form has no parallel in Hebrew.[14] The name is possibly related to the Akkadian khabbaququ, the name of a fragrant plant,[1] or the Hebrew root , meaning "embrace".

Tradition

Habakkuk appears in Bel and the Dragon, which is part of the Additions to Daniel found in the Biblical apocrypha. Verses 33–39 state that Habakkuk is in Judea and after making some stew, he's told by the angel of the Lord to take the stew to Daniel, who is in Babylon in the lion's den. After proclaiming he is unaware of both the den and Babylon, the angel transports Habakkuk to the lion's den. Habakkuk gives Daniel the food to sustain him, and is immediately taken back to "his own place".

Habakkuk is also mentioned in Lives of the Prophets, which also notes his time in Babylon.[15]

According to the Zohar (Volume 1, page 8b) Habakkuk is the boy born to the Shunamite woman through Elisha's blessing:

(2 Kings 4:16) And he said, About this season, according to the time of life, thou shalt embrace (חבקת – hoveket, therefore Habakkuk) a son. And she said, Nay, my lord, [thou] man of God, do not lie unto thine handmaid.

Works

The only work attributed to Habakkuk is the short book of the Bible that bears his name. The book of Habbakuk consists of five oracles about the Chaldeans (Babylonians) and a song of praise to God.

The style of the book has been praised by many scholars,[16] suggesting that its author was a man of great literary talent. The entire book follows the structure of a chiasmus in which parallelism of thought is used to bracket sections of the text.[17]

Habakkuk is unique among the prophets in that he openly questions the working of God (1:3a, 1:13b). In the first part of the second chapter, the Prophet sees the injustice among his people and asks why God does not take action: "1:2 Yahweh, how long will I cry, and you will not hear? I cry out to you 'Violence!' and will you not save?" (World English Bible).

Tombs

The final resting place of Habakkuk has been claimed at multiple locations. The fifth-century Christian historian Sozomen claimed that the relics of Habakkuk were found at Cela, when God revealed their location to Zebennus, bishop of Eleutheropolis, in a dream.[18] Currently, one location in Israel and one in Iran lay claim to being the burial site of the prophet.

Tomb in Israel

Tomb of Habakkuk near Kadarim, Israel.

The burial place of Habakkuk is identified by Jewish tradition as a hillside in the Upper Galilee region of northern Israel, close to the villages Kadarim and Hukok, about six miles southwest of Safed and twelve miles north of Mount Tabor.[19] A small stone building, erected during the 20th century, protects the tomb.[20] Tradition dating as early as the 12th century AD holds that Habakkuk's tomb is at this location,[21] but the tomb may also be of a local sheikh of Yaquq, a name related to the biblical place named "Hukkok" (mentioned in Joshua 19:34), whose pronunciation and spelling in Hebrew are close to "Habakkuk".[22] Archaeological findings in this location include several burial places dated to the Second Temple period.

Persian shrine

Shrine of Habakkuk in Toyserkan, Iran.

A Hamedan Province states that Habakkuk was believed to be a guardian to the Temple of Solomon, and that he was captured by the Babylonians and remained in their prison for some years. After being freed by Cyrus the Great, he went to Ecbatana and remained there until he died, and was buried somewhere nearby, in what is today Toyserkan. Habakkuk is called both Habaghugh and Hayaghugh by the locals.

The surrounding shrine may date to the period of the Great Seljuq Empire (11–12th century); it consists of an octagonal wall and conical dome. Underneath the shrine is a hidden basement with three floors. In the center of the shrine's courtyard is the grave where Habakkuk is said to be buried. A stone upon the grave is inscribed in both Hebrew and Persian stating that the prophet's father was Shioua Lovit, and his mother was Lesho Namit.[24]

Christian commemoration

On the Eastern Orthodox liturgical calendar, his feast day is December 2.[25] In the Roman Catholic Church, the twelve minor prophets are read in the Roman Breviary during the fourth and fifth weeks of November,[26] which are the last two weeks of the liturgical year, and his feast day is January 15.[27] This day is also celebrated as his feast by the Greek Orthodox Church.[5] In 2011, he was commemorated with the other Minor prophets in the Calendar of saints of the Armenian Apostolic Church on February 8.[28]

Habakkuk has also been commemorated in sculpture. In 1435,[29] the Florentine artist Donatello created a sculpture of the prophet for the bell tower of Florence.[30] This statue, nicknamed Il Zuccone ("The Big Pumpkin") because of the shape of the head, now resides in the Museo dell'Opera del Duomo. The church of Santa Maria del Popolo in Rome contains a Baroque sculpture of Habakkuk by the 17th-century artist Bernini.[31] Between 1800 and 1805, the Brazilian sculptor Aleijadinho completed a soapstone sculpture of Habakkuk as part of his Twelve Prophets.[32] The figures are arranged around the forecourt and monumental stairway in front of the Santuário do Bom Jesus do Matosinhos at Congonhas.[33]

See also

Notes

Citations

References

  • require('Module:No globals')

local function getCatForId( id ) 

   local title = mw.title.getCurrentTitle()
   local namespace = title.namespace
   if namespace == 0 then

return '' 

   elseif namespace == 2 and not title.isSubpage then

return '' 

   else

return '' 

   end

end

local function viafLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'VIAF' )

end

local function kulturnavLink( id ) 

   return '.. id .. ' id'

end

local function sikartLink( id ) 

   return '.. id .. '&lng=en ' .. id .. ''

end

local function tlsLink( id ) local id2 = mw.ustring.gsub(id, '%s', function(s) return mw.uri.encode(s, 'WIKI') end) 

   return '.. id2 .. ' ' .. id .. ''

end


local function ciniiLink( id ) 

   return '.. id .. '?l=en ' .. id .. ''

end

local function bneLink( id ) 

   return '.. id .. ' ' .. id .. ''

end


local function uscongressLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function narapersonLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function naraorganizationLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function botanistLink( id ) local id2 = mw.ustring.gsub(id, '%s', function(s) return mw.uri.encode(s, 'PATH') end) 

   return '.. id2 .. ' ' .. id .. ''

end

local function mgpLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. ' ' .. id .. ''

end

local function rslLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. '&CON_LNG=ENG ' .. id .. ''

end

local function leonoreLink( id ) -- Identifiants allant de LH/1/1 à LH/2794/54 (légionnaires) -- Identifiants allant de C/0/1 à C/0/84 (84 légionnaires célèbres) -- Identifiants allant de 19800035/1/1 à 19800035/385/51670 (légionnaires décédés entre 1954 et 1977, et quelques dossiers de légionnaires décédés avant 1954) 

   if not string.match( id, '^LH/%d%d?%d?%d?/%d%d?%d?$' ) and
      not string.match( id, '^C/0/%d%d?$' ) and
           not string.match( id, '^19800035/%d%d?%d?%d?/%d%d?%d?%d?%d?$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. ''

end

local function sbnLink( id ) 

   if not string.match( id, '^IT\\ICCU\\%d%d%d%d%d%d%d%d%d%d$' ) and not string.match( id, '^IT\\ICCU\\%u%u[%d%u]%u\\%d%d%d%d%d%d$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'SBN' )

end

local function nkcLink( id ) return '.. id .. '&CON_LNG=ENG ' .. id .. '' end

local function nclLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '&CON_LNG=ENG ' .. id .. ''

end

local function ndlLink( id ) return '.. id .. ' ' .. id .. '' end

local function sudocLink( id ) 

   if not string.match( id, '^%d%d%d%d%d%d%d%d[%dxX]$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. ''

end

local function hlsLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '.php ' .. id .. ''

end

local function lirLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '.450.0.html ' .. id .. ''

end

local function splitLccn( id ) 

   if id:match( '^%l%l?%l?%d%d%d%d%d%d%d%d%d?%d?$' ) then
       id = id:gsub( '^(%l+)(%d+)(%d%d%d%d%d%d)$', '%1/%2/%3' )
   end
   if id:match( '^%l%l?%l?/%d%d%d?%d?/%d+$' ) then
        return mw.text.split( id, '/' )
   end
   return false

end

local function append(str, c, length) 

   while str:len() < length do
       str = c .. str
   end
   return str

end

local function lccnLink( id ) 

   local parts = splitLccn( id )
   if not parts then
       return false
   end
   local lccnType = parts[1] ~= 'sh' and 'names' or 'subjects'
   id = parts[1] .. parts[2] .. append( parts[3], '0', 6 )
   return '.. lccnType .. '/' .. id .. ' ' .. id .. '' .. getCatForId( 'LCCN' )

end

local function mbLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'MusicBrainz' )

end

--Returns the ISNI check digit isni must be a string where the 15 first elements are digits local function getIsniCheckDigit( isni ) 

   local total = 0
   for i = 1, 15 do
       local digit = isni:byte( i ) - 48 --Get integer value
       total = (total + digit) * 2
   end
   local remainder = total % 11
   local result = (12 - remainder) % 11
   if result == 10 then
       return "X"
   end
   return tostring( result )

end

--Validate ISNI (and ORCID) and retuns it as a 16 characters string or returns false if it's invalid --See http://support.orcid.org/knowledgebase/articles/116780-structure-of-the-orcid-identifier local function validateIsni( id ) 

   id = id:gsub( '[ %-]', ):upper()
   if not id:match( '^%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d[%dX]$' ) then
       return false
   end
   if getIsniCheckDigit( id ) ~= string.char( id:byte( 16 ) ) then
       return false
   end
   return id

end

local function isniLink( id ) 

   id = validateIsni( id )
   if not id then
       return false
   end
   return '.. id .. ' ' .. id:sub( 1, 4 ) .. ' ' .. id:sub( 5, 8 ) .. ' '  .. id:sub( 9, 12 ) .. ' '  .. id:sub( 13, 16 ) .. '' .. getCatForId( 'ISNI' )

end

local function orcidLink( id ) 

   id = validateIsni( id )
   if not id then
       return false
   end
   id = id:sub( 1, 4 ) .. '-' .. id:sub( 5, 8 ) .. '-'  .. id:sub( 9, 12 ) .. '-'  .. id:sub( 13, 16 )
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'ORCID' )

end

local function gndLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'GND' )

end

local function selibrLink( id ) if not string.match( id, '^%d+$' ) then 

       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'SELIBR' )

end

local function bnfLink( id ) 

   --Add cb prefix if it has been removed
   if not string.match( id, '^cb.+$' ) then
       id = 'cb' .. id
   end

   return '.. id .. ' ' .. id .. ' .. id .. ' (data)' .. getCatForId( 'BNF' )

end

local function bpnLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'BPN' )

end

local function ridLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'RID' )

end

local function bibsysLink( id ) 

   return '.. id .. '&feltselect=bs.autid ' .. id .. '' .. getCatForId( 'BIBSYS' )

end

local function ulanLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'ULAN' )

end

local function nlaLink( id ) return '.. id .. ' ' .. id .. '' .. getCatForId( 'NLA' ) end

local function rkdartistsLink( id ) return '.. id .. ' ' .. id .. '' .. getCatForId( 'RKDartists' ) end

local function getIdsFromWikidata( item, property ) 

   local ids = {}
   if not item.claims[property] then
       return ids
   end
   for _, statement in pairs( item.claims[property] ) do
         if statement.mainsnak.datavalue then
          table.insert( ids, statement.mainsnak.datavalue.value )
         end
   end
   return ids

end

local function matchesWikidataRequirements( item, reqs ) 

   for _, group in pairs( reqs ) do
       local property = 'p' .. group[1]
       local qid = group[2]
       if item.claims[property] ~= nil then
           for _, statement in pairs ( item.claims[property] ) do
                if statement.mainsnak.datavalue ~= nil then
                        if statement.mainsnak.datavalue.value['numeric-id'] == qid then
                        return true
                end
            end
           end
       end
   end
   return false

end

local function createRow( id, label, rawValue, link, withUid ) 

   if link then
       if withUid then
           return '* ' .. label .. ' ' .. link .. '\n'
       else
           return '* ' .. label .. ' ' .. link .. '\n'
       end
   else

return '* \n' 

   end

end

--In this order: name of the parameter, label, propertyId in Wikidata, formatting function local conf = { 

   { 'VIAF', 'VIAF', 214, viafLink },
   { 'LCCN', 'LCCN', 244, lccnLink },
   { 'ISNI', 'ISNI', 213, isniLink },
   { 'ORCID', 'ORCID', 496, orcidLink },
   { 'GND', 'GND', 227, gndLink },
   { 'SELIBR', 'SELIBR', 906, selibrLink },
   { 'SUDOC', 'SUDOC', 269, sudocLink },    
   { 'BNF', 'BNF', 268, bnfLink },
   { 'BPN', 'BPN', 651, bpnLink },
   { 'RID', 'ResearcherID', 1053, ridLink },
   { 'BIBSYS', 'BIBSYS', 1015, bibsysLink },
   { 'ULAN', 'ULAN', 245, ulanLink },
   { 'HDS', 'HDS', 902, hlsLink },
   { 'LIR', 'LIR', 886, lirLink },
   { 'MBA', 'MusicBrainz', 434, mbLink },
   { 'MGP', 'MGP', 549, mgpLink },    
   { 'NLA', 'NLA', 409, nlaLink },
   { 'NDL', 'NDL', 349, ndlLink },
   { 'NCL', 'NCL', 1048, nclLink },
   { 'NKC', 'NKC', 691, nkcLink },
   { 'Léonore', 'Léonore', 640, leonoreLink }, 
   { 'SBN', 'ICCU', 396, sbnLink },     
   { 'RLS', 'RLS', 947, rslLink },
   { 'Botanist', '[[Author ci
  • require('Module:No globals')

local function getCatForId( id ) 

   local title = mw.title.getCurrentTitle()
   local namespace = title.namespace
   if namespace == 0 then

return '' 

   elseif namespace == 2 and not title.isSubpage then

return '' 

   else

return '' 

   end

end

local function viafLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'VIAF' )

end

local function kulturnavLink( id ) 

   return '.. id .. ' id'

end

local function sikartLink( id ) 

   return '.. id .. '&lng=en ' .. id .. ''

end

local function tlsLink( id ) local id2 = mw.ustring.gsub(id, '%s', function(s) return mw.uri.encode(s, 'WIKI') end) 

   return '.. id2 .. ' ' .. id .. ''

end


local function ciniiLink( id ) 

   return '.. id .. '?l=en ' .. id .. ''

end

local function bneLink( id ) 

   return '.. id .. ' ' .. id .. ''

end


local function uscongressLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function narapersonLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function naraorganizationLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function botanistLink( id ) local id2 = mw.ustring.gsub(id, '%s', function(s) return mw.uri.encode(s, 'PATH') end) 

   return '.. id2 .. ' ' .. id .. ''

end

local function mgpLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. ' ' .. id .. ''

end

local function rslLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. '&CON_LNG=ENG ' .. id .. ''

end

local function leonoreLink( id ) -- Identifiants allant de LH/1/1 à LH/2794/54 (légionnaires) -- Identifiants allant de C/0/1 à C/0/84 (84 légionnaires célèbres) -- Identifiants allant de 19800035/1/1 à 19800035/385/51670 (légionnaires décédés entre 1954 et 1977, et quelques dossiers de légionnaires décédés avant 1954) 

   if not string.match( id, '^LH/%d%d?%d?%d?/%d%d?%d?$' ) and
      not string.match( id, '^C/0/%d%d?$' ) and
           not string.match( id, '^19800035/%d%d?%d?%d?/%d%d?%d?%d?%d?$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. ''

end

local function sbnLink( id ) 

   if not string.match( id, '^IT\\ICCU\\%d%d%d%d%d%d%d%d%d%d$' ) and not string.match( id, '^IT\\ICCU\\%u%u[%d%u]%u\\%d%d%d%d%d%d$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'SBN' )

end

local function nkcLink( id ) return '.. id .. '&CON_LNG=ENG ' .. id .. '' end

local function nclLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '&CON_LNG=ENG ' .. id .. ''

end

local function ndlLink( id ) return '.. id .. ' ' .. id .. '' end

local function sudocLink( id ) 

   if not string.match( id, '^%d%d%d%d%d%d%d%d[%dxX]$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. ''

end

local function hlsLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '.php ' .. id .. ''

end

local function lirLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '.450.0.html ' .. id .. ''

end

local function splitLccn( id ) 

   if id:match( '^%l%l?%l?%d%d%d%d%d%d%d%d%d?%d?$' ) then
       id = id:gsub( '^(%l+)(%d+)(%d%d%d%d%d%d)$', '%1/%2/%3' )
   end
   if id:match( '^%l%l?%l?/%d%d%d?%d?/%d+$' ) then
        return mw.text.split( id, '/' )
   end
   return false

end

local function append(str, c, length) 

   while str:len() < length do
       str = c .. str
   end
   return str

end

local function lccnLink( id ) 

   local parts = splitLccn( id )
   if not parts then
       return false
   end
   local lccnType = parts[1] ~= 'sh' and 'names' or 'subjects'
   id = parts[1] .. parts[2] .. append( parts[3], '0', 6 )
   return '.. lccnType .. '/' .. id .. ' ' .. id .. '' .. getCatForId( 'LCCN' )

end

local function mbLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'MusicBrainz' )

end

--Returns the ISNI check digit isni must be a string where the 15 first elements are digits local function getIsniCheckDigit( isni ) 

   local total = 0
   for i = 1, 15 do
       local digit = isni:byte( i ) - 48 --Get integer value
       total = (total + digit) * 2
   end
   local remainder = total % 11
   local result = (12 - remainder) % 11
   if result == 10 then
       return "X"
   end
   return tostring( result )

end

--Validate ISNI (and ORCID) and retuns it as a 16 characters string or returns false if it's invalid --See http://support.orcid.org/knowledgebase/articles/116780-structure-of-the-orcid-identifier local function validateIsni( id ) 

   id = id:gsub( '[ %-]', ):upper()
   if not id:match( '^%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d[%dX]$' ) then
       return false
   end
   if getIsniCheckDigit( id ) ~= string.char( id:byte( 16 ) ) then
       return false
   end
   return id

end

local function isniLink( id ) 

   id = validateIsni( id )
   if not id then
       return false
   end
   return '.. id .. ' ' .. id:sub( 1, 4 ) .. ' ' .. id:sub( 5, 8 ) .. ' '  .. id:sub( 9, 12 ) .. ' '  .. id:sub( 13, 16 ) .. '' .. getCatForId( 'ISNI' )

end

local function orcidLink( id ) 

   id = validateIsni( id )
   if not id then
       return false
   end
   id = id:sub( 1, 4 ) .. '-' .. id:sub( 5, 8 ) .. '-'  .. id:sub( 9, 12 ) .. '-'  .. id:sub( 13, 16 )
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'ORCID' )

end

local function gndLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'GND' )

end

local function selibrLink( id ) if not string.match( id, '^%d+$' ) then 

       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'SELIBR' )

end

local function bnfLink( id ) 

   --Add cb prefix if it has been removed
   if not string.match( id, '^cb.+$' ) then
       id = 'cb' .. id
   end

   return '.. id .. ' ' .. id .. ' .. id .. ' (data)' .. getCatForId( 'BNF' )

end

local function bpnLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'BPN' )

end

local function ridLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'RID' )

end

local function bibsysLink( id ) 

   return '.. id .. '&feltselect=bs.autid ' .. id .. '' .. getCatForId( 'BIBSYS' )

end

local function ulanLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'ULAN' )

end

local function nlaLink( id ) return '.. id .. ' ' .. id .. '' .. getCatForId( 'NLA' ) end

local function rkdartistsLink( id ) return '.. id .. ' ' .. id .. '' .. getCatForId( 'RKDartists' ) end

local function getIdsFromWikidata( item, property ) 

   local ids = {}
   if not item.claims[property] then
       return ids
   end
   for _, statement in pairs( item.claims[property] ) do
         if statement.mainsnak.datavalue then
          table.insert( ids, statement.mainsnak.datavalue.value )
         end
   end
   return ids

end

local function matchesWikidataRequirements( item, reqs ) 

   for _, group in pairs( reqs ) do
       local property = 'p' .. group[1]
       local qid = group[2]
       if item.claims[property] ~= nil then
           for _, statement in pairs ( item.claims[property] ) do
                if statement.mainsnak.datavalue ~= nil then
                        if statement.mainsnak.datavalue.value['numeric-id'] == qid then
                        return true
                end
            end
           end
       end
   end
   return false

end

local function createRow( id, label, rawValue, link, withUid ) 

   if link then
       if withUid then
           return '* ' .. label .. ' ' .. link .. '\n'
       else
           return '* ' .. label .. ' ' .. link .. '\n'
       end
   else

return '* \n' 

   end

end

--In this order: name of the parameter, label, propertyId in Wikidata, formatting function local conf = { 

   { 'VIAF', 'VIAF', 214, viafLink },
   { 'LCCN', 'LCCN', 244, lccnLink },
   { 'ISNI', 'ISNI', 213, isniLink },
   { 'ORCID', 'ORCID', 496, orcidLink },
   { 'GND', 'GND', 227, gndLink },
   { 'SELIBR', 'SELIBR', 906, selibrLink },
   { 'SUDOC', 'SUDOC', 269, sudocLink },    
   { 'BNF', 'BNF', 268, bnfLink },
   { 'BPN', 'BPN', 651, bpnLink },
   { 'RID', 'ResearcherID', 1053, ridLink },
   { 'BIBSYS', 'BIBSYS', 1015, bibsysLink },
   { 'ULAN', 'ULAN', 245, ulanLink },
   { 'HDS', 'HDS', 902, hlsLink },
   { 'LIR', 'LIR', 886, lirLink },
   { 'MBA', 'MusicBrainz', 434, mbLink },
   { 'MGP', 'MGP', 549, mgpLink },    
   { 'NLA', 'NLA', 409, nlaLink },
   { 'NDL', 'NDL', 349, ndlLink },
   { 'NCL', 'NCL', 1048, nclLink },
   { 'NKC', 'NKC', 691, nkcLink },
   { 'Léonore', 'Léonore', 640, leonoreLink }, 
   { 'SBN', 'ICCU', 396, sbnLink },     
   { 'RLS', 'RLS', 947, rslLink },
   { 'Botanist', '[[Author ci
  • require('Module:No globals')

local function getCatForId( id ) 

   local title = mw.title.getCurrentTitle()
   local namespace = title.namespace
   if namespace == 0 then

return '' 

   elseif namespace == 2 and not title.isSubpage then

return '' 

   else

return '' 

   end

end

local function viafLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'VIAF' )

end

local function kulturnavLink( id ) 

   return '.. id .. ' id'

end

local function sikartLink( id ) 

   return '.. id .. '&lng=en ' .. id .. ''

end

local function tlsLink( id ) local id2 = mw.ustring.gsub(id, '%s', function(s) return mw.uri.encode(s, 'WIKI') end) 

   return '.. id2 .. ' ' .. id .. ''

end


local function ciniiLink( id ) 

   return '.. id .. '?l=en ' .. id .. ''

end

local function bneLink( id ) 

   return '.. id .. ' ' .. id .. ''

end


local function uscongressLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function narapersonLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function naraorganizationLink( id ) 

   return '.. id .. ' ' .. id .. ''

end

local function botanistLink( id ) local id2 = mw.ustring.gsub(id, '%s', function(s) return mw.uri.encode(s, 'PATH') end) 

   return '.. id2 .. ' ' .. id .. ''

end

local function mgpLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. ' ' .. id .. ''

end

local function rslLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. '&CON_LNG=ENG ' .. id .. ''

end

local function leonoreLink( id ) -- Identifiants allant de LH/1/1 à LH/2794/54 (légionnaires) -- Identifiants allant de C/0/1 à C/0/84 (84 légionnaires célèbres) -- Identifiants allant de 19800035/1/1 à 19800035/385/51670 (légionnaires décédés entre 1954 et 1977, et quelques dossiers de légionnaires décédés avant 1954) 

   if not string.match( id, '^LH/%d%d?%d?%d?/%d%d?%d?$' ) and
      not string.match( id, '^C/0/%d%d?$' ) and
           not string.match( id, '^19800035/%d%d?%d?%d?/%d%d?%d?%d?%d?$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. ''

end

local function sbnLink( id ) 

   if not string.match( id, '^IT\\ICCU\\%d%d%d%d%d%d%d%d%d%d$' ) and not string.match( id, '^IT\\ICCU\\%u%u[%d%u]%u\\%d%d%d%d%d%d$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'SBN' )

end

local function nkcLink( id ) return '.. id .. '&CON_LNG=ENG ' .. id .. '' end

local function nclLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '&CON_LNG=ENG ' .. id .. ''

end

local function ndlLink( id ) return '.. id .. ' ' .. id .. '' end

local function sudocLink( id ) 

   if not string.match( id, '^%d%d%d%d%d%d%d%d[%dxX]$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. ''

end

local function hlsLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '.php ' .. id .. ''

end

local function lirLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. '.450.0.html ' .. id .. ''

end

local function splitLccn( id ) 

   if id:match( '^%l%l?%l?%d%d%d%d%d%d%d%d%d?%d?$' ) then
       id = id:gsub( '^(%l+)(%d+)(%d%d%d%d%d%d)$', '%1/%2/%3' )
   end
   if id:match( '^%l%l?%l?/%d%d%d?%d?/%d+$' ) then
        return mw.text.split( id, '/' )
   end
   return false

end

local function append(str, c, length) 

   while str:len() < length do
       str = c .. str
   end
   return str

end

local function lccnLink( id ) 

   local parts = splitLccn( id )
   if not parts then
       return false
   end
   local lccnType = parts[1] ~= 'sh' and 'names' or 'subjects'
   id = parts[1] .. parts[2] .. append( parts[3], '0', 6 )
   return '.. lccnType .. '/' .. id .. ' ' .. id .. '' .. getCatForId( 'LCCN' )

end

local function mbLink( id ) 

   -- TODO Implement some sanity checking regex
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'MusicBrainz' )

end

--Returns the ISNI check digit isni must be a string where the 15 first elements are digits local function getIsniCheckDigit( isni ) 

   local total = 0
   for i = 1, 15 do
       local digit = isni:byte( i ) - 48 --Get integer value
       total = (total + digit) * 2
   end
   local remainder = total % 11
   local result = (12 - remainder) % 11
   if result == 10 then
       return "X"
   end
   return tostring( result )

end

--Validate ISNI (and ORCID) and retuns it as a 16 characters string or returns false if it's invalid --See http://support.orcid.org/knowledgebase/articles/116780-structure-of-the-orcid-identifier local function validateIsni( id ) 

   id = id:gsub( '[ %-]', ):upper()
   if not id:match( '^%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d[%dX]$' ) then
       return false
   end
   if getIsniCheckDigit( id ) ~= string.char( id:byte( 16 ) ) then
       return false
   end
   return id

end

local function isniLink( id ) 

   id = validateIsni( id )
   if not id then
       return false
   end
   return '.. id .. ' ' .. id:sub( 1, 4 ) .. ' ' .. id:sub( 5, 8 ) .. ' '  .. id:sub( 9, 12 ) .. ' '  .. id:sub( 13, 16 ) .. '' .. getCatForId( 'ISNI' )

end

local function orcidLink( id ) 

   id = validateIsni( id )
   if not id then
       return false
   end
   id = id:sub( 1, 4 ) .. '-' .. id:sub( 5, 8 ) .. '-'  .. id:sub( 9, 12 ) .. '-'  .. id:sub( 13, 16 )
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'ORCID' )

end

local function gndLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'GND' )

end

local function selibrLink( id ) if not string.match( id, '^%d+$' ) then 

       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'SELIBR' )

end

local function bnfLink( id ) 

   --Add cb prefix if it has been removed
   if not string.match( id, '^cb.+$' ) then
       id = 'cb' .. id
   end

   return '.. id .. ' ' .. id .. ' .. id .. ' (data)' .. getCatForId( 'BNF' )

end

local function bpnLink( id ) 

   if not string.match( id, '^%d+$' ) then
       return false
   end
   return '.. id .. ' ' .. id .. '' .. getCatForId( 'BPN' )

end

local function ridLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'RID' )

end

local function bibsysLink( id ) 

   return '.. id .. '&feltselect=bs.autid ' .. id .. '' .. getCatForId( 'BIBSYS' )

end

local function ulanLink( id ) 

   return '.. id .. ' ' .. id .. '' .. getCatForId( 'ULAN' )

end

local function nlaLink( id ) return '.. id .. ' ' .. id .. '' .. getCatForId( 'NLA' ) end

local function rkdartistsLink( id ) return '.. id .. ' ' .. id .. '' .. getCatForId( 'RKDartists' ) end

local function getIdsFromWikidata( item, property ) 

   local ids = {}
   if not item.claims[property] then
       return ids
   end
   for _, statement in pairs( item.claims[property] ) do
         if statement.mainsnak.datavalue then
          table.insert( ids, statement.mainsnak.datavalue.value )
         end
   end
   return ids

end

local function matchesWikidataRequirements( item, reqs ) 

   for _, group in pairs( reqs ) do
       local property = 'p' .. group[1]
       local qid = group[2]
       if item.claims[property] ~= nil then
           for _, statement in pairs ( item.claims[property] ) do
                if statement.mainsnak.datavalue ~= nil then
                        if statement.mainsnak.datavalue.value['numeric-id'] == qid then
                        return true
                end
            end
           end
       end
   end
   return false

end

local function createRow( id, label, rawValue, link, withUid ) 

   if link then
       if withUid then
           return '* ' .. label .. ' ' .. link .. '\n'
       else
           return '* ' .. label .. ' ' .. link .. '\n'
       end
   else

return '* \n' 

   end

end

--In this order: name of the parameter, label, propertyId in Wikidata, formatting function local conf = { 

   { 'VIAF', 'VIAF', 214, viafLink },
   { 'LCCN', 'LCCN', 244, lccnLink },
   { 'ISNI', 'ISNI', 213, isniLink },
   { 'ORCID', 'ORCID', 496, orcidLink },
   { 'GND', 'GND', 227, gndLink },
   { 'SELIBR', 'SELIBR', 906, selibrLink },
   { 'SUDOC', 'SUDOC', 269, sudocLink },    
   { 'BNF', 'BNF', 268, bnfLink },
   { 'BPN', 'BPN', 651, bpnLink },
   { 'RID', 'ResearcherID', 1053, ridLink },
   { 'BIBSYS', 'BIBSYS', 1015, bibsysLink },
   { 'ULAN', 'ULAN', 245, ulanLink },
   { 'HDS', 'HDS', 902, hlsLink },
   { 'LIR', 'LIR', 886, lirLink },
   { 'MBA', 'MusicBrainz', 434, mbLink },
   { 'MGP', 'MGP', 549, mgpLink },    
   { 'NLA', 'NLA', 409, nlaLink },
   { 'NDL', 'NDL', 349, ndlLink },
   { 'NCL', 'NCL', 1048, nclLink },
   { 'NKC', 'NKC', 691, nkcLink },
   { 'Léonore', 'Léonore', 640, leonoreLink }, 
   { 'SBN', 'ICCU', 396, sbnLink },     
   { 'RLS', 'RLS', 947, rslLink },
   { 'Botanist', '[[Author ci

External links

  • The Prophet Habakkuk at Chabad.org
This article was sourced from Creative Commons Attribution-ShareAlike License; additional terms may apply. World Heritage Encyclopedia content is assembled from numerous content providers, Open Access Publishing, and in compliance with The Fair Access to Science and Technology Research Act (FASTR), Wikimedia Foundation, Inc., Public Library of Science, The Encyclopedia of Life, Open Book Publishers (OBP), PubMed, U.S. National Library of Medicine, National Center for Biotechnology Information, U.S. National Library of Medicine, National Institutes of Health (NIH), U.S. Department of Health & Human Services, and USA.gov, which sources content from all federal, state, local, tribal, and territorial government publication portals (.gov, .mil, .edu). Funding for USA.gov and content contributors is made possible from the U.S. Congress, E-Government Act of 2002.
 
Crowd sourced content that is contributed to World Heritage Encyclopedia is peer reviewed and edited by our editorial staff to ensure quality scholarly research articles.
 
By using this site, you agree to the Terms of Use and Privacy Policy. World Heritage Encyclopedia™ is a registered trademark of the World Public Library Association, a non-profit organization.
 



Copyright © World Library Foundation. All rights reserved. eBooks from Hawaii eBook Library are sponsored by the World Library Foundation,
a 501c(4) Member's Support Non-Profit Organization, and is NOT affiliated with any governmental agency or department.