@natlibfi/marc-record-validators-melinda 11.1.0 → 11.1.1

package/dist/fixRelatorTerms.js

@@ -150,6 +150,10 @@ const relatorTerms = [{
   'eng': 'translator',
   'fin': 'kääntäjä',
   'swe': 'översättare'
+}, {
+  'code': '__FAKE_VALUE1__',
+  'fin': 'sarjakuvantekijä',
+  'swe': 'serieskapare'
 }];
 
 /*

package/dist/fixRelatorTerms.js.map

@@ -1 +1 @@
-{"version":3,"file":"fixRelatorTerms.js","names":["_clone","_interopRequireDefault","require","_punctuation","_utils","_debug","obj","__esModule","default","debug","createDebugLogger","debugDev","extend","_default","description","validate","fix","record","res","message","valid","language","getCatalogingLanguage","fields","forEach","field","fieldFixRelatorTerms","clonedField","clone","clonedFieldAsString","fieldToString","fieldAsString","push","length","relatorTerms","finnishAbbreviations","subfieldHandleRelatorTermAbbreviation","subfield","code","nvdebug","subfieldToString","value","replace","punc","lcValue","toLowerCase","hit","isRelatorField","tag","match","fieldHandleRelatorTermAbbreviations","originalValue","subfields","sf","modifiedValue","fieldFixPunctuation","termIsInGivenLanguage","term","some","row","anyToLanguage","originalTerm","translateRelatorTerm","defaultFromLanguage","toLanguage","fromLanguage","candRow","filter","slice","translation","subfieldTranslateRelatorTerm","recordFixRelatorTerms","defaultToLanguage","translateField","from","to"],"sources":["../src/fixRelatorTerms.js"],"sourcesContent":["import clone from 'clone';\nimport {fieldFixPunctuation} from './punctuation2';\nimport {fieldToString, getCatalogingLanguage, nvdebug, subfieldToString} from './utils';\nimport createDebugLogger from 'debug';\n\n// Currently mainly translates X00$e values, so that we don't have \"$a Name, $e kirjoittaja, $e författare.\".\n// Later on we could try and handle $4 stuff here as well.\n\n\nconst debug = createDebugLogger('@natlibfi/marc-record-validators-melinda:fixRelatorterms');\n//const debugData = debug.extend('data');\nconst debugDev = debug.extend('dev');\n\nexport default function () {\n  return {\n    description: 'Fix $e subfields in field [1678][01]0 and 720',\n    validate, fix\n  };\n\n  function fix(record) {\n    const res = {message: [], fix: [], valid: true};\n\n    const language = getCatalogingLanguage(record);\n\n    record.fields.forEach(field => {\n      fieldFixRelatorTerms(field, language, language);\n    });\n\n    return res;\n  }\n\n  function validate(record) {\n    const res = {message: []};\n\n    const language = getCatalogingLanguage(record);\n\n    record.fields.forEach(field => {\n      const clonedField = clone(field);\n      // Rather hackily/abnormally use language as both fromLanguage and toLanguage.\n      // fromLanguage is used to expand \"esitt.\" => \"esittäjä\".\n      // toLanguage is used by translations (fixes \"författere\" to \"kirjoittaja\", if 040$b is \"fin\")\n      fieldFixRelatorTerms(field, language, language);\n      const clonedFieldAsString = fieldToString(clonedField);\n      const fieldAsString = fieldToString(field);\n      if (fieldAsString !== clonedFieldAsString) { // eslint-disable-line functional/no-conditional-statements\n        res.message.push(`${fieldAsString} => ${clonedFieldAsString}`); // eslint-disable-line functional/immutable-data\n      }\n    });\n\n    res.valid = !(res.message.length >= 1); // eslint-disable-line functional/immutable-data\n    return res;\n  }\n}\n\n\n/*\nexport default () => (base, source) => {\n  recordTranslateRelatorTerms(base);\n  recordTranslateRelatorTerms(source);\n  recordHandleRelatorTermAbbreviations(base);\n  recordHandleRelatorTermAbbreviations(source);\n  const result = {base, source};\n  return result;\n};\n*/\n\n\n// Partial source: https://marc21.kansalliskirjasto.fi/funktiot_koodit.htm\n// https://wiki.helsinki.fi/display/MARC21svenska/Funktions-+och+relationskoder+-+alfabetiskt+efter+funktion\n// New, better source: https://id.kb.se/find?q=relator&_sort=_sortKeyByLang.en\n\n\n// NB! How to handle German sex-based Verfasser/Verfasserin pairs?\nconst relatorTerms = [\n  {'code': 'arr', 'eng': 'arranger', 'fin': 'sovittaja', 'swe': 'arrangör av musikalisk komposition'},\n  {'code': 'art', 'eng': 'artist', 'fin': 'taiteilija', 'swe': 'konstnär'},\n  {'code': 'aui', 'eng': 'author of introduction', 'fin': 'esipuheen tekijä'},\n  {'code': 'aut', 'eng': 'author', 'fin': 'kirjoittaja', 'swe': 'författare'},\n  {'code': 'cmp', 'eng': 'composer', 'fin': 'säveltäjä', 'swe': 'kompositör'},\n  {'code': 'drt', 'eng': 'director', 'fin': 'ohjaaja', 'swe': 'regissör'},\n  {'code': 'edt', 'eng': 'editor', 'fin': 'toimittaja', 'swe': 'redaktör'},\n  {'code': 'ill', 'eng': 'illustrator', 'fin': 'kuvittaja', 'swe': 'illustratör'},\n  {'code': 'lyr', 'eng': 'lyricist', 'fin': 'sanoittaja', 'swe': 'sångtext'},\n  {'code': 'nrt', 'eng': 'narrator', 'fin': 'kertoja', 'swe': 'berättare'}, // berättare/inläsare\n  {'code': 'pbl', 'eng': 'publisher', 'fin': 'julkaisija', 'swe': 'utgivare'},\n  {'code': 'pht', 'eng': 'photographer', 'fin': 'valokuvaaja', 'swe': 'fotograf'},\n  {'code': 'prf', 'eng': 'performer', 'fin': 'esittäjä', 'swe': 'framförande'},\n  {'code': 'pro', 'eng': 'producer', 'fin': 'tuottaja', 'swe': 'producent'},\n  {'code': 'trl', 'eng': 'translator', 'fin': 'kääntäjä', 'swe': 'översättare'}\n];\n\n/*\nfunction recordNormalizeRelatorTerms(record, defaultLanguageCode = undef) {\n  const languageCode = defaultLanguageCode ? defaultLanguageCode : getCatalogingLanguage(record);\n  if  (!languageCode || ['eng', 'fin', 'swe'].includes(languageCode)) {\n    return;\n  }\n\n}\n*/\n\n\nconst finnishAbbreviations = {\n  'esitt.': 'esittäjä',\n  'käänt.': 'kääntäjä',\n  'näytt.': 'näyttelijä',\n  'san.': 'sanoittaja',\n  'sov.': 'sovittaja',\n  'säv.': 'säveltäjä',\n  'toim.': 'toimittaja'\n};\n\nfunction subfieldHandleRelatorTermAbbreviation(subfield, language) {\n  if (subfield.code !== 'e') {\n    return;\n  }\n  nvdebug(`Relator cand subfield: '${subfieldToString(subfield)}', lang: ${language ? language : 'NULL'}`, debugDev);\n  if (!language || language === 'mul') {\n    subfieldHandleRelatorTermAbbreviation(subfield, 'fin');\n    // Maybe later add Swedish here...\n    return;\n  }\n  const value = subfield.value.replace(/,$/u, '');\n  const punc = value === subfield.value ? '' : ',';\n\n  const lcValue = value.toLowerCase(); // Check Å, Ä, Ö...\n\n  // NB: Policy: if no language or multi-language: apply all rules! (Not much overlap I hope...)\n  if (language === 'fin') {\n    nvdebug(`Relator try Finnish for '${lcValue}}'...`, debugDev);\n    if (lcValue in finnishAbbreviations) {\n      const hit = `${finnishAbbreviations[lcValue]}${punc}`;\n      nvdebug(`Relator hit: ${hit}`, debugDev);\n      // NB! 'esitt.' => 'esittäjä'\n      subfield.value = hit; // eslint-disable-line functional/immutable-data\n      return;\n    }\n  }\n}\n\n\nfunction isRelatorField(field) {\n  // Tag list might be incomplete!\n  return field.tag.match(/^(?:100|110|600|610|700|710|720|800|810)$/u);\n}\n\nfunction fieldHandleRelatorTermAbbreviations(field, language) {\n  if (!isRelatorField(field)) {\n    return;\n  }\n\n  const originalValue = fieldToString(field);\n  field.subfields.forEach(sf => subfieldHandleRelatorTermAbbreviation(sf, language));\n  const modifiedValue = fieldToString(field);\n  if (modifiedValue === originalValue) {\n    return;\n  }\n  // Changes have happened... Try to punctuate.\n  // (NB! We need punctuation as a module, if we are to make abbr expansion a marc-record-validators-melinda validator/fixer)\n  fieldFixPunctuation(field);\n}\n\nfunction termIsInGivenLanguage(term, language) {\n  return relatorTerms.some(row => language in row && row[language] === term);\n}\n\nfunction anyToLanguage(originalTerm) {\n  // Sometimes there's no 040$b or 040$b and, say, 040$b and 700$e value don't correlate\n  if (termIsInGivenLanguage(originalTerm, 'fin')) {\n    return 'fin';\n  }\n  if (termIsInGivenLanguage(originalTerm, 'swe')) {\n    return 'swe';\n  }\n  if (termIsInGivenLanguage(originalTerm, 'eng')) {\n    return 'eng';\n  }\n  return null;\n}\n\nfunction translateRelatorTerm(originalTerm, defaultFromLanguage, toLanguage) {\n\n  // originalTerm is supposed to be normal version (abbrs have been expanded), possibly with punctuation\n  const term = originalTerm.replace(/[,.]$/u, '');\n  nvdebug(`Try to translate '${term}' from ${defaultFromLanguage} to ${toLanguage}`, debugDev);\n\n  // Kind of hacky... If term is in toLanguage, do nothing. defaultFromLanguage (040$b) isn't that reliable.\n  if (termIsInGivenLanguage(term, toLanguage)) {\n    return originalTerm;\n  }\n  // defaultFomLanguage (typically 040$b) isn't that reliable:\n  const fromLanguage = defaultFromLanguage === null || !termIsInGivenLanguage(term, defaultFromLanguage) ? anyToLanguage(term) : defaultFromLanguage;\n\n  const [candRow] = relatorTerms.filter(row => fromLanguage in row && toLanguage in row && row[fromLanguage] === term);\n  if (candRow) {\n    const punc = term === originalTerm ? '' : originalTerm.slice(-1);\n    const translation = `${candRow[toLanguage]}${punc}`;\n    nvdebug(`Translate relator term: ${originalTerm} => ${translation}`, debugDev);\n    return translation;\n  }\n  return originalTerm;\n}\n\nfunction subfieldTranslateRelatorTerm(subfield, fromLanguage, toLanguage) {\n  if (subfield.code !== 'e') {\n    return;\n  }\n  subfield.value = translateRelatorTerm(subfield.value, fromLanguage, toLanguage); // eslint-disable-line functional/immutable-data\n}\n\nexport function fieldFixRelatorTerms(field, fromLanguage, toLanguage) {\n  // fromLanguage can not be relied upon.\n  if (!isRelatorField(field)/* || fromLanguage === toLanguage*/) {\n    return;\n  }\n  fieldHandleRelatorTermAbbreviations(field, fromLanguage);\n\n  field.subfields.forEach(sf => subfieldTranslateRelatorTerm(sf, fromLanguage, toLanguage));\n}\n\n\nexport function recordFixRelatorTerms(record, defaultToLanguage = null, defaultFromLanguage = null) { // WAS: translateRecord()\n  const fromLanguage = defaultFromLanguage ? defaultFromLanguage : getCatalogingLanguage(record);\n  const toLanguage = defaultToLanguage ? defaultToLanguage : getCatalogingLanguage(record);\n\n  record.fields.forEach(field => translateField(field, fromLanguage, toLanguage));\n\n  function translateField(field, from, to) {\n    fieldFixRelatorTerms(field, from, to);\n  }\n}\n\n\n"],"mappings":";;;;;;;;AAAA,IAAAA,MAAA,GAAAC,sBAAA,CAAAC,OAAA;AACA,IAAAC,YAAA,GAAAD,OAAA;AACA,IAAAE,MAAA,GAAAF,OAAA;AACA,IAAAG,MAAA,GAAAJ,sBAAA,CAAAC,OAAA;AAAsC,SAAAD,uBAAAK,GAAA,WAAAA,GAAA,IAAAA,GAAA,CAAAC,UAAA,GAAAD,GAAA,KAAAE,OAAA,EAAAF,GAAA;AAEtC;AACA;;AAGA,MAAMG,KAAK,GAAG,IAAAC,cAAiB,EAAC,0DAA0D,CAAC;AAC3F;AACA,MAAMC,QAAQ,GAAGF,KAAK,CAACG,MAAM,CAAC,KAAK,CAAC;AAErB,SAAAC,SAAA,EAAY;EACzB,OAAO;IACLC,WAAW,EAAE,+CAA+C;IAC5DC,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASA,GAAGA,CAACC,MAAM,EAAE;IACnB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEH,GAAG,EAAE,EAAE;MAAEI,KAAK,EAAE;IAAI,CAAC;IAE/C,MAAMC,QAAQ,GAAG,IAAAC,4BAAqB,EAACL,MAAM,CAAC;IAE9CA,MAAM,CAACM,MAAM,CAACC,OAAO,CAACC,KAAK,IAAI;MAC7BC,oBAAoB,CAACD,KAAK,EAAEJ,QAAQ,EAAEA,QAAQ,CAAC;IACjD,CAAC,CAAC;IAEF,OAAOH,GAAG;EACZ;EAEA,SAASH,QAAQA,CAACE,MAAM,EAAE;IACxB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE;IAAE,CAAC;IAEzB,MAAME,QAAQ,GAAG,IAAAC,4BAAqB,EAACL,MAAM,CAAC;IAE9CA,MAAM,CAACM,MAAM,CAACC,OAAO,CAACC,KAAK,IAAI;MAC7B,MAAME,WAAW,GAAG,IAAAC,cAAK,EAACH,KAAK,CAAC;MAChC;MACA;MACA;MACAC,oBAAoB,CAACD,KAAK,EAAEJ,QAAQ,EAAEA,QAAQ,CAAC;MAC/C,MAAMQ,mBAAmB,GAAG,IAAAC,oBAAa,EAACH,WAAW,CAAC;MACtD,MAAMI,aAAa,GAAG,IAAAD,oBAAa,EAACL,KAAK,CAAC;MAC1C,IAAIM,aAAa,KAAKF,mBAAmB,EAAE;QAAE;QAC3CX,GAAG,CAACC,OAAO,CAACa,IAAI,CAAE,GAAED,aAAc,OAAMF,mBAAoB,EAAC,CAAC,CAAC,CAAC;MAClE;IACF,CAAC,CAAC;IAEFX,GAAG,CAACE,KAAK,GAAG,EAAEF,GAAG,CAACC,OAAO,CAACc,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC;IACxC,OAAOf,GAAG;EACZ;AACF;;AAGA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAGA;AACA;AACA;;AAGA;AACA,MAAMgB,YAAY,GAAG,CACnB;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE;AAAoC,CAAC,EACnG;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,QAAQ;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EACxE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,wBAAwB;EAAE,KAAK,EAAE;AAAkB,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,QAAQ;EAAE,KAAK,EAAE,aAAa;EAAE,KAAK,EAAE;AAAY,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE;AAAY,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,SAAS;EAAE,KAAK,EAAE;AAAU,CAAC,EACvE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,QAAQ;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EACxE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,aAAa;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE;AAAa,CAAC,EAC/E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EAC1E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,SAAS;EAAE,KAAK,EAAE;AAAW,CAAC;AAAE;AAC1E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,cAAc;EAAE,KAAK,EAAE,aAAa;EAAE,KAAK,EAAE;AAAU,CAAC,EAC/E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE;AAAa,CAAC,EAC5E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE;AAAW,CAAC,EACzE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE;AAAa,CAAC,CAC9E;;AAED;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAGA,MAAMC,oBAAoB,GAAG;EAC3B,QAAQ,EAAE,UAAU;EACpB,QAAQ,EAAE,UAAU;EACpB,QAAQ,EAAE,YAAY;EACtB,MAAM,EAAE,YAAY;EACpB,MAAM,EAAE,WAAW;EACnB,MAAM,EAAE,WAAW;EACnB,OAAO,EAAE;AACX,CAAC;AAED,SAASC,qCAAqCA,CAACC,QAAQ,EAAEhB,QAAQ,EAAE;EACjE,IAAIgB,QAAQ,CAACC,IAAI,KAAK,GAAG,EAAE;IACzB;EACF;EACA,IAAAC,cAAO,EAAE,2BAA0B,IAAAC,uBAAgB,EAACH,QAAQ,CAAE,YAAWhB,QAAQ,GAAGA,QAAQ,GAAG,MAAO,EAAC,EAAEV,QAAQ,CAAC;EAClH,IAAI,CAACU,QAAQ,IAAIA,QAAQ,KAAK,KAAK,EAAE;IACnCe,qCAAqC,CAACC,QAAQ,EAAE,KAAK,CAAC;IACtD;IACA;EACF;EACA,MAAMI,KAAK,GAAGJ,QAAQ,CAACI,KAAK,CAACC,OAAO,CAAC,KAAK,EAAE,EAAE,CAAC;EAC/C,MAAMC,IAAI,GAAGF,KAAK,KAAKJ,QAAQ,CAACI,KAAK,GAAG,EAAE,GAAG,GAAG;EAEhD,MAAMG,OAAO,GAAGH,KAAK,CAACI,WAAW,CAAC,CAAC,CAAC,CAAC;;EAErC;EACA,IAAIxB,QAAQ,KAAK,KAAK,EAAE;IACtB,IAAAkB,cAAO,EAAE,4BAA2BK,OAAQ,OAAM,EAAEjC,QAAQ,CAAC;IAC7D,IAAIiC,OAAO,IAAIT,oBAAoB,EAAE;MACnC,MAAMW,GAAG,GAAI,GAAEX,oBAAoB,CAACS,OAAO,CAAE,GAAED,IAAK,EAAC;MACrD,IAAAJ,cAAO,EAAE,gBAAeO,GAAI,EAAC,EAAEnC,QAAQ,CAAC;MACxC;MACA0B,QAAQ,CAACI,KAAK,GAAGK,GAAG,CAAC,CAAC;MACtB;IACF;EACF;AACF;AAGA,SAASC,cAAcA,CAACtB,KAAK,EAAE;EAC7B;EACA,OAAOA,KAAK,CAACuB,GAAG,CAACC,KAAK,CAAC,4CAA4C,CAAC;AACtE;AAEA,SAASC,mCAAmCA,CAACzB,KAAK,EAAEJ,QAAQ,EAAE;EAC5D,IAAI,CAAC0B,cAAc,CAACtB,KAAK,CAAC,EAAE;IAC1B;EACF;EAEA,MAAM0B,aAAa,GAAG,IAAArB,oBAAa,EAACL,KAAK,CAAC;EAC1CA,KAAK,CAAC2B,SAAS,CAAC5B,OAAO,CAAC6B,EAAE,IAAIjB,qCAAqC,CAACiB,EAAE,EAAEhC,QAAQ,CAAC,CAAC;EAClF,MAAMiC,aAAa,GAAG,IAAAxB,oBAAa,EAACL,KAAK,CAAC;EAC1C,IAAI6B,aAAa,KAAKH,aAAa,EAAE;IACnC;EACF;EACA;EACA;EACA,IAAAI,gCAAmB,EAAC9B,KAAK,CAAC;AAC5B;AAEA,SAAS+B,qBAAqBA,CAACC,IAAI,EAAEpC,QAAQ,EAAE;EAC7C,OAAOa,YAAY,CAACwB,IAAI,CAACC,GAAG,IAAItC,QAAQ,IAAIsC,GAAG,IAAIA,GAAG,CAACtC,QAAQ,CAAC,KAAKoC,IAAI,CAAC;AAC5E;AAEA,SAASG,aAAaA,CAACC,YAAY,EAAE;EACnC;EACA,IAAIL,qBAAqB,CAACK,YAAY,EAAE,KAAK,CAAC,EAAE;IAC9C,OAAO,KAAK;EACd;EACA,IAAIL,qBAAqB,CAACK,YAAY,EAAE,KAAK,CAAC,EAAE;IAC9C,OAAO,KAAK;EACd;EACA,IAAIL,qBAAqB,CAACK,YAAY,EAAE,KAAK,CAAC,EAAE;IAC9C,OAAO,KAAK;EACd;EACA,OAAO,IAAI;AACb;AAEA,SAASC,oBAAoBA,CAACD,YAAY,EAAEE,mBAAmB,EAAEC,UAAU,EAAE;EAE3E;EACA,MAAMP,IAAI,GAAGI,YAAY,CAACnB,OAAO,CAAC,QAAQ,EAAE,EAAE,CAAC;EAC/C,IAAAH,cAAO,EAAE,qBAAoBkB,IAAK,UAASM,mBAAoB,OAAMC,UAAW,EAAC,EAAErD,QAAQ,CAAC;;EAE5F;EACA,IAAI6C,qBAAqB,CAACC,IAAI,EAAEO,UAAU,CAAC,EAAE;IAC3C,OAAOH,YAAY;EACrB;EACA;EACA,MAAMI,YAAY,GAAGF,mBAAmB,KAAK,IAAI,IAAI,CAACP,qBAAqB,CAACC,IAAI,EAAEM,mBAAmB,CAAC,GAAGH,aAAa,CAACH,IAAI,CAAC,GAAGM,mBAAmB;EAElJ,MAAM,CAACG,OAAO,CAAC,GAAGhC,YAAY,CAACiC,MAAM,CAACR,GAAG,IAAIM,YAAY,IAAIN,GAAG,IAAIK,UAAU,IAAIL,GAAG,IAAIA,GAAG,CAACM,YAAY,CAAC,KAAKR,IAAI,CAAC;EACpH,IAAIS,OAAO,EAAE;IACX,MAAMvB,IAAI,GAAGc,IAAI,KAAKI,YAAY,GAAG,EAAE,GAAGA,YAAY,CAACO,KAAK,CAAC,CAAC,CAAC,CAAC;IAChE,MAAMC,WAAW,GAAI,GAAEH,OAAO,CAACF,UAAU,CAAE,GAAErB,IAAK,EAAC;IACnD,IAAAJ,cAAO,EAAE,2BAA0BsB,YAAa,OAAMQ,WAAY,EAAC,EAAE1D,QAAQ,CAAC;IAC9E,OAAO0D,WAAW;EACpB;EACA,OAAOR,YAAY;AACrB;AAEA,SAASS,4BAA4BA,CAACjC,QAAQ,EAAE4B,YAAY,EAAED,UAAU,EAAE;EACxE,IAAI3B,QAAQ,CAACC,IAAI,KAAK,GAAG,EAAE;IACzB;EACF;EACAD,QAAQ,CAACI,KAAK,GAAGqB,oBAAoB,CAACzB,QAAQ,CAACI,KAAK,EAAEwB,YAAY,EAAED,UAAU,CAAC,CAAC,CAAC;AACnF;AAEO,SAAStC,oBAAoBA,CAACD,KAAK,EAAEwC,YAAY,EAAED,UAAU,EAAE;EACpE;EACA,IAAI,CAACjB,cAAc,CAACtB,KAAK,CAAC,sCAAqC;IAC7D;EACF;EACAyB,mCAAmC,CAACzB,KAAK,EAAEwC,YAAY,CAAC;EAExDxC,KAAK,CAAC2B,SAAS,CAAC5B,OAAO,CAAC6B,EAAE,IAAIiB,4BAA4B,CAACjB,EAAE,EAAEY,YAAY,EAAED,UAAU,CAAC,CAAC;AAC3F;AAGO,SAASO,qBAAqBA,CAACtD,MAAM,EAAEuD,iBAAiB,GAAG,IAAI,EAAET,mBAAmB,GAAG,IAAI,EAAE;EAAE;EACpG,MAAME,YAAY,GAAGF,mBAAmB,GAAGA,mBAAmB,GAAG,IAAAzC,4BAAqB,EAACL,MAAM,CAAC;EAC9F,MAAM+C,UAAU,GAAGQ,iBAAiB,GAAGA,iBAAiB,GAAG,IAAAlD,4BAAqB,EAACL,MAAM,CAAC;EAExFA,MAAM,CAACM,MAAM,CAACC,OAAO,CAACC,KAAK,IAAIgD,cAAc,CAAChD,KAAK,EAAEwC,YAAY,EAAED,UAAU,CAAC,CAAC;EAE/E,SAASS,cAAcA,CAAChD,KAAK,EAAEiD,IAAI,EAAEC,EAAE,EAAE;IACvCjD,oBAAoB,CAACD,KAAK,EAAEiD,IAAI,EAAEC,EAAE,CAAC;EACvC;AACF","ignoreList":[]}
+{"version":3,"file":"fixRelatorTerms.js","names":["_clone","_interopRequireDefault","require","_punctuation","_utils","_debug","obj","__esModule","default","debug","createDebugLogger","debugDev","extend","_default","description","validate","fix","record","res","message","valid","language","getCatalogingLanguage","fields","forEach","field","fieldFixRelatorTerms","clonedField","clone","clonedFieldAsString","fieldToString","fieldAsString","push","length","relatorTerms","finnishAbbreviations","subfieldHandleRelatorTermAbbreviation","subfield","code","nvdebug","subfieldToString","value","replace","punc","lcValue","toLowerCase","hit","isRelatorField","tag","match","fieldHandleRelatorTermAbbreviations","originalValue","subfields","sf","modifiedValue","fieldFixPunctuation","termIsInGivenLanguage","term","some","row","anyToLanguage","originalTerm","translateRelatorTerm","defaultFromLanguage","toLanguage","fromLanguage","candRow","filter","slice","translation","subfieldTranslateRelatorTerm","recordFixRelatorTerms","defaultToLanguage","translateField","from","to"],"sources":["../src/fixRelatorTerms.js"],"sourcesContent":["import clone from 'clone';\nimport {fieldFixPunctuation} from './punctuation2';\nimport {fieldToString, getCatalogingLanguage, nvdebug, subfieldToString} from './utils';\nimport createDebugLogger from 'debug';\n\n// Currently mainly translates X00$e values, so that we don't have \"$a Name, $e kirjoittaja, $e författare.\".\n// Later on we could try and handle $4 stuff here as well.\n\n\nconst debug = createDebugLogger('@natlibfi/marc-record-validators-melinda:fixRelatorterms');\n//const debugData = debug.extend('data');\nconst debugDev = debug.extend('dev');\n\nexport default function () {\n  return {\n    description: 'Fix $e subfields in field [1678][01]0 and 720',\n    validate, fix\n  };\n\n  function fix(record) {\n    const res = {message: [], fix: [], valid: true};\n\n    const language = getCatalogingLanguage(record);\n\n    record.fields.forEach(field => {\n      fieldFixRelatorTerms(field, language, language);\n    });\n\n    return res;\n  }\n\n  function validate(record) {\n    const res = {message: []};\n\n    const language = getCatalogingLanguage(record);\n\n    record.fields.forEach(field => {\n      const clonedField = clone(field);\n      // Rather hackily/abnormally use language as both fromLanguage and toLanguage.\n      // fromLanguage is used to expand \"esitt.\" => \"esittäjä\".\n      // toLanguage is used by translations (fixes \"författere\" to \"kirjoittaja\", if 040$b is \"fin\")\n      fieldFixRelatorTerms(field, language, language);\n      const clonedFieldAsString = fieldToString(clonedField);\n      const fieldAsString = fieldToString(field);\n      if (fieldAsString !== clonedFieldAsString) { // eslint-disable-line functional/no-conditional-statements\n        res.message.push(`${fieldAsString} => ${clonedFieldAsString}`); // eslint-disable-line functional/immutable-data\n      }\n    });\n\n    res.valid = !(res.message.length >= 1); // eslint-disable-line functional/immutable-data\n    return res;\n  }\n}\n\n\n/*\nexport default () => (base, source) => {\n  recordTranslateRelatorTerms(base);\n  recordTranslateRelatorTerms(source);\n  recordHandleRelatorTermAbbreviations(base);\n  recordHandleRelatorTermAbbreviations(source);\n  const result = {base, source};\n  return result;\n};\n*/\n\n\n// Partial source: https://marc21.kansalliskirjasto.fi/funktiot_koodit.htm\n// https://wiki.helsinki.fi/display/MARC21svenska/Funktions-+och+relationskoder+-+alfabetiskt+efter+funktion\n// New, better source: https://id.kb.se/find?q=relator&_sort=_sortKeyByLang.en\n\n\n// NB! How to handle German sex-based Verfasser/Verfasserin pairs?\nconst relatorTerms = [\n  {'code': 'arr', 'eng': 'arranger', 'fin': 'sovittaja', 'swe': 'arrangör av musikalisk komposition'},\n  {'code': 'art', 'eng': 'artist', 'fin': 'taiteilija', 'swe': 'konstnär'},\n  {'code': 'aui', 'eng': 'author of introduction', 'fin': 'esipuheen tekijä'},\n  {'code': 'aut', 'eng': 'author', 'fin': 'kirjoittaja', 'swe': 'författare'},\n  {'code': 'cmp', 'eng': 'composer', 'fin': 'säveltäjä', 'swe': 'kompositör'},\n  {'code': 'drt', 'eng': 'director', 'fin': 'ohjaaja', 'swe': 'regissör'},\n  {'code': 'edt', 'eng': 'editor', 'fin': 'toimittaja', 'swe': 'redaktör'},\n  {'code': 'ill', 'eng': 'illustrator', 'fin': 'kuvittaja', 'swe': 'illustratör'},\n  {'code': 'lyr', 'eng': 'lyricist', 'fin': 'sanoittaja', 'swe': 'sångtext'},\n  {'code': 'nrt', 'eng': 'narrator', 'fin': 'kertoja', 'swe': 'berättare'}, // berättare/inläsare\n  {'code': 'pbl', 'eng': 'publisher', 'fin': 'julkaisija', 'swe': 'utgivare'},\n  {'code': 'pht', 'eng': 'photographer', 'fin': 'valokuvaaja', 'swe': 'fotograf'},\n  {'code': 'prf', 'eng': 'performer', 'fin': 'esittäjä', 'swe': 'framförande'},\n  {'code': 'pro', 'eng': 'producer', 'fin': 'tuottaja', 'swe': 'producent'},\n  {'code': 'trl', 'eng': 'translator', 'fin': 'kääntäjä', 'swe': 'översättare'},\n  {'code': '__FAKE_VALUE1__', 'fin': 'sarjakuvantekijä', 'swe': 'serieskapare'}\n];\n\n/*\nfunction recordNormalizeRelatorTerms(record, defaultLanguageCode = undef) {\n  const languageCode = defaultLanguageCode ? defaultLanguageCode : getCatalogingLanguage(record);\n  if  (!languageCode || ['eng', 'fin', 'swe'].includes(languageCode)) {\n    return;\n  }\n\n}\n*/\n\n\nconst finnishAbbreviations = {\n  'esitt.': 'esittäjä',\n  'käänt.': 'kääntäjä',\n  'näytt.': 'näyttelijä',\n  'san.': 'sanoittaja',\n  'sov.': 'sovittaja',\n  'säv.': 'säveltäjä',\n  'toim.': 'toimittaja'\n};\n\nfunction subfieldHandleRelatorTermAbbreviation(subfield, language) {\n  if (subfield.code !== 'e') {\n    return;\n  }\n  nvdebug(`Relator cand subfield: '${subfieldToString(subfield)}', lang: ${language ? language : 'NULL'}`, debugDev);\n  if (!language || language === 'mul') {\n    subfieldHandleRelatorTermAbbreviation(subfield, 'fin');\n    // Maybe later add Swedish here...\n    return;\n  }\n  const value = subfield.value.replace(/,$/u, '');\n  const punc = value === subfield.value ? '' : ',';\n\n  const lcValue = value.toLowerCase(); // Check Å, Ä, Ö...\n\n  // NB: Policy: if no language or multi-language: apply all rules! (Not much overlap I hope...)\n  if (language === 'fin') {\n    nvdebug(`Relator try Finnish for '${lcValue}}'...`, debugDev);\n    if (lcValue in finnishAbbreviations) {\n      const hit = `${finnishAbbreviations[lcValue]}${punc}`;\n      nvdebug(`Relator hit: ${hit}`, debugDev);\n      // NB! 'esitt.' => 'esittäjä'\n      subfield.value = hit; // eslint-disable-line functional/immutable-data\n      return;\n    }\n  }\n}\n\n\nfunction isRelatorField(field) {\n  // Tag list might be incomplete!\n  return field.tag.match(/^(?:100|110|600|610|700|710|720|800|810)$/u);\n}\n\nfunction fieldHandleRelatorTermAbbreviations(field, language) {\n  if (!isRelatorField(field)) {\n    return;\n  }\n\n  const originalValue = fieldToString(field);\n  field.subfields.forEach(sf => subfieldHandleRelatorTermAbbreviation(sf, language));\n  const modifiedValue = fieldToString(field);\n  if (modifiedValue === originalValue) {\n    return;\n  }\n  // Changes have happened... Try to punctuate.\n  // (NB! We need punctuation as a module, if we are to make abbr expansion a marc-record-validators-melinda validator/fixer)\n  fieldFixPunctuation(field);\n}\n\nfunction termIsInGivenLanguage(term, language) {\n  return relatorTerms.some(row => language in row && row[language] === term);\n}\n\nfunction anyToLanguage(originalTerm) {\n  // Sometimes there's no 040$b or 040$b and, say, 040$b and 700$e value don't correlate\n  if (termIsInGivenLanguage(originalTerm, 'fin')) {\n    return 'fin';\n  }\n  if (termIsInGivenLanguage(originalTerm, 'swe')) {\n    return 'swe';\n  }\n  if (termIsInGivenLanguage(originalTerm, 'eng')) {\n    return 'eng';\n  }\n  return null;\n}\n\nfunction translateRelatorTerm(originalTerm, defaultFromLanguage, toLanguage) {\n\n  // originalTerm is supposed to be normal version (abbrs have been expanded), possibly with punctuation\n  const term = originalTerm.replace(/[,.]$/u, '');\n  nvdebug(`Try to translate '${term}' from ${defaultFromLanguage} to ${toLanguage}`, debugDev);\n\n  // Kind of hacky... If term is in toLanguage, do nothing. defaultFromLanguage (040$b) isn't that reliable.\n  if (termIsInGivenLanguage(term, toLanguage)) {\n    return originalTerm;\n  }\n  // defaultFomLanguage (typically 040$b) isn't that reliable:\n  const fromLanguage = defaultFromLanguage === null || !termIsInGivenLanguage(term, defaultFromLanguage) ? anyToLanguage(term) : defaultFromLanguage;\n\n  const [candRow] = relatorTerms.filter(row => fromLanguage in row && toLanguage in row && row[fromLanguage] === term);\n  if (candRow) {\n    const punc = term === originalTerm ? '' : originalTerm.slice(-1);\n    const translation = `${candRow[toLanguage]}${punc}`;\n    nvdebug(`Translate relator term: ${originalTerm} => ${translation}`, debugDev);\n    return translation;\n  }\n  return originalTerm;\n}\n\nfunction subfieldTranslateRelatorTerm(subfield, fromLanguage, toLanguage) {\n  if (subfield.code !== 'e') {\n    return;\n  }\n  subfield.value = translateRelatorTerm(subfield.value, fromLanguage, toLanguage); // eslint-disable-line functional/immutable-data\n}\n\nexport function fieldFixRelatorTerms(field, fromLanguage, toLanguage) {\n  // fromLanguage can not be relied upon.\n  if (!isRelatorField(field)/* || fromLanguage === toLanguage*/) {\n    return;\n  }\n  fieldHandleRelatorTermAbbreviations(field, fromLanguage);\n\n  field.subfields.forEach(sf => subfieldTranslateRelatorTerm(sf, fromLanguage, toLanguage));\n}\n\n\nexport function recordFixRelatorTerms(record, defaultToLanguage = null, defaultFromLanguage = null) { // WAS: translateRecord()\n  const fromLanguage = defaultFromLanguage ? defaultFromLanguage : getCatalogingLanguage(record);\n  const toLanguage = defaultToLanguage ? defaultToLanguage : getCatalogingLanguage(record);\n\n  record.fields.forEach(field => translateField(field, fromLanguage, toLanguage));\n\n  function translateField(field, from, to) {\n    fieldFixRelatorTerms(field, from, to);\n  }\n}\n\n\n"],"mappings":";;;;;;;;AAAA,IAAAA,MAAA,GAAAC,sBAAA,CAAAC,OAAA;AACA,IAAAC,YAAA,GAAAD,OAAA;AACA,IAAAE,MAAA,GAAAF,OAAA;AACA,IAAAG,MAAA,GAAAJ,sBAAA,CAAAC,OAAA;AAAsC,SAAAD,uBAAAK,GAAA,WAAAA,GAAA,IAAAA,GAAA,CAAAC,UAAA,GAAAD,GAAA,KAAAE,OAAA,EAAAF,GAAA;AAEtC;AACA;;AAGA,MAAMG,KAAK,GAAG,IAAAC,cAAiB,EAAC,0DAA0D,CAAC;AAC3F;AACA,MAAMC,QAAQ,GAAGF,KAAK,CAACG,MAAM,CAAC,KAAK,CAAC;AAErB,SAAAC,SAAA,EAAY;EACzB,OAAO;IACLC,WAAW,EAAE,+CAA+C;IAC5DC,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASA,GAAGA,CAACC,MAAM,EAAE;IACnB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEH,GAAG,EAAE,EAAE;MAAEI,KAAK,EAAE;IAAI,CAAC;IAE/C,MAAMC,QAAQ,GAAG,IAAAC,4BAAqB,EAACL,MAAM,CAAC;IAE9CA,MAAM,CAACM,MAAM,CAACC,OAAO,CAACC,KAAK,IAAI;MAC7BC,oBAAoB,CAACD,KAAK,EAAEJ,QAAQ,EAAEA,QAAQ,CAAC;IACjD,CAAC,CAAC;IAEF,OAAOH,GAAG;EACZ;EAEA,SAASH,QAAQA,CAACE,MAAM,EAAE;IACxB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE;IAAE,CAAC;IAEzB,MAAME,QAAQ,GAAG,IAAAC,4BAAqB,EAACL,MAAM,CAAC;IAE9CA,MAAM,CAACM,MAAM,CAACC,OAAO,CAACC,KAAK,IAAI;MAC7B,MAAME,WAAW,GAAG,IAAAC,cAAK,EAACH,KAAK,CAAC;MAChC;MACA;MACA;MACAC,oBAAoB,CAACD,KAAK,EAAEJ,QAAQ,EAAEA,QAAQ,CAAC;MAC/C,MAAMQ,mBAAmB,GAAG,IAAAC,oBAAa,EAACH,WAAW,CAAC;MACtD,MAAMI,aAAa,GAAG,IAAAD,oBAAa,EAACL,KAAK,CAAC;MAC1C,IAAIM,aAAa,KAAKF,mBAAmB,EAAE;QAAE;QAC3CX,GAAG,CAACC,OAAO,CAACa,IAAI,CAAE,GAAED,aAAc,OAAMF,mBAAoB,EAAC,CAAC,CAAC,CAAC;MAClE;IACF,CAAC,CAAC;IAEFX,GAAG,CAACE,KAAK,GAAG,EAAEF,GAAG,CAACC,OAAO,CAACc,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC;IACxC,OAAOf,GAAG;EACZ;AACF;;AAGA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAGA;AACA;AACA;;AAGA;AACA,MAAMgB,YAAY,GAAG,CACnB;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE;AAAoC,CAAC,EACnG;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,QAAQ;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EACxE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,wBAAwB;EAAE,KAAK,EAAE;AAAkB,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,QAAQ;EAAE,KAAK,EAAE,aAAa;EAAE,KAAK,EAAE;AAAY,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE;AAAY,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,SAAS;EAAE,KAAK,EAAE;AAAU,CAAC,EACvE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,QAAQ;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EACxE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,aAAa;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE;AAAa,CAAC,EAC/E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EAC1E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,SAAS;EAAE,KAAK,EAAE;AAAW,CAAC;AAAE;AAC1E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE;AAAU,CAAC,EAC3E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,cAAc;EAAE,KAAK,EAAE,aAAa;EAAE,KAAK,EAAE;AAAU,CAAC,EAC/E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,WAAW;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE;AAAa,CAAC,EAC5E;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE;AAAW,CAAC,EACzE;EAAC,MAAM,EAAE,KAAK;EAAE,KAAK,EAAE,YAAY;EAAE,KAAK,EAAE,UAAU;EAAE,KAAK,EAAE;AAAa,CAAC,EAC7E;EAAC,MAAM,EAAE,iBAAiB;EAAE,KAAK,EAAE,kBAAkB;EAAE,KAAK,EAAE;AAAc,CAAC,CAC9E;;AAED;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAGA,MAAMC,oBAAoB,GAAG;EAC3B,QAAQ,EAAE,UAAU;EACpB,QAAQ,EAAE,UAAU;EACpB,QAAQ,EAAE,YAAY;EACtB,MAAM,EAAE,YAAY;EACpB,MAAM,EAAE,WAAW;EACnB,MAAM,EAAE,WAAW;EACnB,OAAO,EAAE;AACX,CAAC;AAED,SAASC,qCAAqCA,CAACC,QAAQ,EAAEhB,QAAQ,EAAE;EACjE,IAAIgB,QAAQ,CAACC,IAAI,KAAK,GAAG,EAAE;IACzB;EACF;EACA,IAAAC,cAAO,EAAE,2BAA0B,IAAAC,uBAAgB,EAACH,QAAQ,CAAE,YAAWhB,QAAQ,GAAGA,QAAQ,GAAG,MAAO,EAAC,EAAEV,QAAQ,CAAC;EAClH,IAAI,CAACU,QAAQ,IAAIA,QAAQ,KAAK,KAAK,EAAE;IACnCe,qCAAqC,CAACC,QAAQ,EAAE,KAAK,CAAC;IACtD;IACA;EACF;EACA,MAAMI,KAAK,GAAGJ,QAAQ,CAACI,KAAK,CAACC,OAAO,CAAC,KAAK,EAAE,EAAE,CAAC;EAC/C,MAAMC,IAAI,GAAGF,KAAK,KAAKJ,QAAQ,CAACI,KAAK,GAAG,EAAE,GAAG,GAAG;EAEhD,MAAMG,OAAO,GAAGH,KAAK,CAACI,WAAW,CAAC,CAAC,CAAC,CAAC;;EAErC;EACA,IAAIxB,QAAQ,KAAK,KAAK,EAAE;IACtB,IAAAkB,cAAO,EAAE,4BAA2BK,OAAQ,OAAM,EAAEjC,QAAQ,CAAC;IAC7D,IAAIiC,OAAO,IAAIT,oBAAoB,EAAE;MACnC,MAAMW,GAAG,GAAI,GAAEX,oBAAoB,CAACS,OAAO,CAAE,GAAED,IAAK,EAAC;MACrD,IAAAJ,cAAO,EAAE,gBAAeO,GAAI,EAAC,EAAEnC,QAAQ,CAAC;MACxC;MACA0B,QAAQ,CAACI,KAAK,GAAGK,GAAG,CAAC,CAAC;MACtB;IACF;EACF;AACF;AAGA,SAASC,cAAcA,CAACtB,KAAK,EAAE;EAC7B;EACA,OAAOA,KAAK,CAACuB,GAAG,CAACC,KAAK,CAAC,4CAA4C,CAAC;AACtE;AAEA,SAASC,mCAAmCA,CAACzB,KAAK,EAAEJ,QAAQ,EAAE;EAC5D,IAAI,CAAC0B,cAAc,CAACtB,KAAK,CAAC,EAAE;IAC1B;EACF;EAEA,MAAM0B,aAAa,GAAG,IAAArB,oBAAa,EAACL,KAAK,CAAC;EAC1CA,KAAK,CAAC2B,SAAS,CAAC5B,OAAO,CAAC6B,EAAE,IAAIjB,qCAAqC,CAACiB,EAAE,EAAEhC,QAAQ,CAAC,CAAC;EAClF,MAAMiC,aAAa,GAAG,IAAAxB,oBAAa,EAACL,KAAK,CAAC;EAC1C,IAAI6B,aAAa,KAAKH,aAAa,EAAE;IACnC;EACF;EACA;EACA;EACA,IAAAI,gCAAmB,EAAC9B,KAAK,CAAC;AAC5B;AAEA,SAAS+B,qBAAqBA,CAACC,IAAI,EAAEpC,QAAQ,EAAE;EAC7C,OAAOa,YAAY,CAACwB,IAAI,CAACC,GAAG,IAAItC,QAAQ,IAAIsC,GAAG,IAAIA,GAAG,CAACtC,QAAQ,CAAC,KAAKoC,IAAI,CAAC;AAC5E;AAEA,SAASG,aAAaA,CAACC,YAAY,EAAE;EACnC;EACA,IAAIL,qBAAqB,CAACK,YAAY,EAAE,KAAK,CAAC,EAAE;IAC9C,OAAO,KAAK;EACd;EACA,IAAIL,qBAAqB,CAACK,YAAY,EAAE,KAAK,CAAC,EAAE;IAC9C,OAAO,KAAK;EACd;EACA,IAAIL,qBAAqB,CAACK,YAAY,EAAE,KAAK,CAAC,EAAE;IAC9C,OAAO,KAAK;EACd;EACA,OAAO,IAAI;AACb;AAEA,SAASC,oBAAoBA,CAACD,YAAY,EAAEE,mBAAmB,EAAEC,UAAU,EAAE;EAE3E;EACA,MAAMP,IAAI,GAAGI,YAAY,CAACnB,OAAO,CAAC,QAAQ,EAAE,EAAE,CAAC;EAC/C,IAAAH,cAAO,EAAE,qBAAoBkB,IAAK,UAASM,mBAAoB,OAAMC,UAAW,EAAC,EAAErD,QAAQ,CAAC;;EAE5F;EACA,IAAI6C,qBAAqB,CAACC,IAAI,EAAEO,UAAU,CAAC,EAAE;IAC3C,OAAOH,YAAY;EACrB;EACA;EACA,MAAMI,YAAY,GAAGF,mBAAmB,KAAK,IAAI,IAAI,CAACP,qBAAqB,CAACC,IAAI,EAAEM,mBAAmB,CAAC,GAAGH,aAAa,CAACH,IAAI,CAAC,GAAGM,mBAAmB;EAElJ,MAAM,CAACG,OAAO,CAAC,GAAGhC,YAAY,CAACiC,MAAM,CAACR,GAAG,IAAIM,YAAY,IAAIN,GAAG,IAAIK,UAAU,IAAIL,GAAG,IAAIA,GAAG,CAACM,YAAY,CAAC,KAAKR,IAAI,CAAC;EACpH,IAAIS,OAAO,EAAE;IACX,MAAMvB,IAAI,GAAGc,IAAI,KAAKI,YAAY,GAAG,EAAE,GAAGA,YAAY,CAACO,KAAK,CAAC,CAAC,CAAC,CAAC;IAChE,MAAMC,WAAW,GAAI,GAAEH,OAAO,CAACF,UAAU,CAAE,GAAErB,IAAK,EAAC;IACnD,IAAAJ,cAAO,EAAE,2BAA0BsB,YAAa,OAAMQ,WAAY,EAAC,EAAE1D,QAAQ,CAAC;IAC9E,OAAO0D,WAAW;EACpB;EACA,OAAOR,YAAY;AACrB;AAEA,SAASS,4BAA4BA,CAACjC,QAAQ,EAAE4B,YAAY,EAAED,UAAU,EAAE;EACxE,IAAI3B,QAAQ,CAACC,IAAI,KAAK,GAAG,EAAE;IACzB;EACF;EACAD,QAAQ,CAACI,KAAK,GAAGqB,oBAAoB,CAACzB,QAAQ,CAACI,KAAK,EAAEwB,YAAY,EAAED,UAAU,CAAC,CAAC,CAAC;AACnF;AAEO,SAAStC,oBAAoBA,CAACD,KAAK,EAAEwC,YAAY,EAAED,UAAU,EAAE;EACpE;EACA,IAAI,CAACjB,cAAc,CAACtB,KAAK,CAAC,sCAAqC;IAC7D;EACF;EACAyB,mCAAmC,CAACzB,KAAK,EAAEwC,YAAY,CAAC;EAExDxC,KAAK,CAAC2B,SAAS,CAAC5B,OAAO,CAAC6B,EAAE,IAAIiB,4BAA4B,CAACjB,EAAE,EAAEY,YAAY,EAAED,UAAU,CAAC,CAAC;AAC3F;AAGO,SAASO,qBAAqBA,CAACtD,MAAM,EAAEuD,iBAAiB,GAAG,IAAI,EAAET,mBAAmB,GAAG,IAAI,EAAE;EAAE;EACpG,MAAME,YAAY,GAAGF,mBAAmB,GAAGA,mBAAmB,GAAG,IAAAzC,4BAAqB,EAACL,MAAM,CAAC;EAC9F,MAAM+C,UAAU,GAAGQ,iBAAiB,GAAGA,iBAAiB,GAAG,IAAAlD,4BAAqB,EAACL,MAAM,CAAC;EAExFA,MAAM,CAACM,MAAM,CAACC,OAAO,CAACC,KAAK,IAAIgD,cAAc,CAAChD,KAAK,EAAEwC,YAAY,EAAED,UAAU,CAAC,CAAC;EAE/E,SAASS,cAAcA,CAAChD,KAAK,EAAEiD,IAAI,EAAEC,EAAE,EAAE;IACvCjD,oBAAoB,CAACD,KAAK,EAAEiD,IAAI,EAAEC,EAAE,CAAC;EACvC;AACF","ignoreList":[]}

package/dist/indicator-fixes.js

@@ -102,6 +102,9 @@ function determineNonFilingIndicatorValue(field, languages = undefined) {
     if (match) {
       return `${match.length}`;
     }
+    if (name.match(/^de[nt] /u) && !name.match(/^de[nt] som /u)) {
+      return '4';
+    }
   }
 
   // Fallback-ish: try to guess even without languages:
@@ -109,6 +112,10 @@ function determineNonFilingIndicatorValue(field, languages = undefined) {
   if (match) {
     return `${match.length}`;
   }
+  if (name.match(/^a /u) && !languages.includes('hun') && !name.match(/^a (?:b |la )/u)) {
+    // Skip "a b c", "a la carte"...
+    return '2';
+  }
   return '0';
 }
 function normalizeNonFilingIndicator1(field, languages = []) {
@@ -159,7 +166,7 @@ function getLanguages(record) {
   }
   return langFields[0].subfields.filter(sf => isRelevantSubfield(sf)).map(subfield => subfield.value);
   function isRelevantSubfield(subfield) {
-    if (subfield.code !== 'a' && subfield.code !== 'd') {
+    if (!['a', 'd', 'h'].includes(subfield.code)) {
       return false;
     }
     if (subfield.value.length !== 3) {

package/dist/indicator-fixes.js.map

@@ -1 +1 @@
-{"version":3,"file":"indicator-fixes.js","names":["_utils","require","_default","description","validate","fix","record","res","message","valid","recordNormalizeIndicators","validateRecord","length","clonedFields","JSON","parse","stringify","fields","forEach","field","index","compareFields","origFieldAsString","fieldToString","ind1","push","ind2","ind1NonFilingChars","ind2NonFilingChars","hasNonFilingIndicator1","includes","tag","modifiableIndicatorValue","value","hasNonFilingIndicator2","valueBeginsWithDeterminer","cands","find","cand","substring","determineNonFilingIndicatorValue","languages","undefined","subfieldA","subfields","sf","code","name","toLowerCase","match","normalizeNonFilingIndicator1","normalizeNonFilingIndicator2","normalize245Indicator1","field1XX","get","recordNormalize490","fields490","fields8XX","f","getLanguages","langFields","filter","isRelevantSubfield","map","subfield","fieldNormalizeIndicators"],"sources":["../src/indicator-fixes.js"],"sourcesContent":["// Relocated from melinda-marc-record-merge-reducers (and renamed)\n//import createDebugLogger from 'debug';\n//const debug = createDebugLogger('@natlibfi/marc-record-validators-melinda:normalizeIdentifiers');\n\nimport {fieldToString} from './utils';\n\n\nexport default function () {\n\n  return {\n    description: 'Normalizes indicator values',\n    validate, fix\n  };\n\n  function fix(record) {\n    const res = {message: [], fix: [], valid: true};\n\n    recordNormalizeIndicators(record);\n\n    return res;\n  }\n\n  function validate(record) {\n    const res = {message: []};\n\n    validateRecord(record, res);\n\n    res.valid = res.message.length < 1; // eslint-disable-line functional/immutable-data\n    return res;\n  }\n\n\n  function validateRecord(record, res) {\n    //nvdebug(record);\n    const clonedFields = JSON.parse(JSON.stringify(record.fields));\n    recordNormalizeIndicators(record);\n\n    record.fields.forEach((field, index) => compareFields(field, index));\n\n    function compareFields(field, index) {\n      const origFieldAsString = fieldToString(clonedFields[index]);\n      //const clonedFieldAsString = fieldToString(field);\n      if (clonedFields[index].ind1 !== field.ind1) { // eslint-disable-line functional/no-conditional-statements\n        //nvdebug(`FIX IND1: '${clonedFields[index].ind1}' => '${field.ind1}': ${clonedFieldAsString}`);\n        res.message.push(`Expected IND1 for '${origFieldAsString}' is '${field.ind1}'`); // eslint-disable-line functional/immutable-data\n      }\n      if (clonedFields[index].ind2 !== field.ind2) { // eslint-disable-line functional/no-conditional-statements\n        //nvdebug(`FIX IND2: '${clonedFields[index].ind2}' => '${field.ind2}': ${clonedFieldAsString}`);\n        res.message.push(`Expected IND2 for '${origFieldAsString}' is '${field.ind2}'`); // eslint-disable-line functional/immutable-data\n      }\n    }\n    // Validator should not change the original record:\n    record.fields = clonedFields; // eslint-disable-line functional/immutable-data\n    return;\n  }\n}\n\n\nconst ind1NonFilingChars = ['130', '630', '730', '740'];\nconst ind2NonFilingChars = ['222', '240', '242', '243', '245', '830'];\n\nfunction hasNonFilingIndicator1(field) {\n  return ind1NonFilingChars.includes(field.tag);\n}\n\nfunction modifiableIndicatorValue(value) {\n  // If field contains a legit-looking value, don't try to modify it here...\n  return !['9', '8', '7', '6', '5', '4', '3', '2', '1'].includes(value);\n}\n\nfunction hasNonFilingIndicator2(field) {\n  return ind2NonFilingChars.includes(field.tag);\n}\n\nfunction valueBeginsWithDeterminer(value, cands) {\n  return cands.find(cand => value.substring(0, cand.length) === cand);\n}\n\nfunction determineNonFilingIndicatorValue(field, languages = undefined) {\n  const subfieldA = field.subfields.find(sf => sf.code === 'a');\n  if (!subfieldA) {\n    // nvdebug(' Subfield $a miss!');\n    return;\n  }\n\n  const name = subfieldA.value.toLowerCase();\n\n  if (languages.includes('eng')) {\n    const match = valueBeginsWithDeterminer(name, ['a ', 'an ', 'the ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  if (languages.includes('fre')) {\n    const match = valueBeginsWithDeterminer(name, ['l\\'', 'le ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  if (languages.includes('ger')) {\n    const match = valueBeginsWithDeterminer(name, ['das ', 'der ', 'die ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  if (languages.includes('swe')) {\n    const match = valueBeginsWithDeterminer(name, ['en ', 'ett ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  // Fallback-ish: try to guess even without languages:\n  const match = valueBeginsWithDeterminer(name, ['the ']);\n  if (match) {\n    return `${match.length}`;\n  }\n\n  return '0';\n}\n\nfunction normalizeNonFilingIndicator1(field, languages = []) {\n  if (!hasNonFilingIndicator1(field) || !modifiableIndicatorValue(field.ind1)) {\n    return;\n  }\n\n  field.ind1 = determineNonFilingIndicatorValue(field, languages); // eslint-disable-line functional/immutable-data\n}\n\nfunction normalizeNonFilingIndicator2(field, languages = []) {\n  if (!hasNonFilingIndicator2(field) || !modifiableIndicatorValue(field.ind2)) {\n    return;\n  }\n\n  field.ind2 = determineNonFilingIndicatorValue(field, languages); // eslint-disable-line functional/immutable-data\n}\n\n\nfunction normalize245Indicator1(field, record) {\n  if (field.tag !== '245') {\n    return;\n  }\n  const field1XX = record.get('^1..$');\n  field.ind1 = field1XX.length === 0 ? '0' : '1'; // eslint-disable-line functional/immutable-data\n}\n\n\nfunction recordNormalize490(record) {\n  const fields490 = record.get('^490$');\n  const fields8XX = record.get('^(?:800|810|811|830)$');\n\n  if (fields490.length === 0) {\n    return;\n  }\n  if (fields490.length <= fields8XX.length) {\n    // Trace found for each field 490:\n    fields490.forEach(f => {\n      f.ind1 = '1'; // eslint-disable-line functional/immutable-data\n    });\n    return;\n  }\n  if (fields8XX.length === 0) { // Fields 490 are always untraced (no traces found)\n    fields490.forEach(f => {\n      f.ind1 = '0'; // eslint-disable-line functional/immutable-data\n    });\n    return;\n  }\n  // For other combinations we just can't be sure, so leave them as they are.\n}\n\n\nfunction getLanguages(record) {\n  const langFields = record.get('^041$');\n\n  if (langFields.length === 0) {\n    return [];\n  }\n\n  return langFields[0].subfields.filter(sf => isRelevantSubfield(sf)).map(subfield => subfield.value);\n\n  function isRelevantSubfield(subfield) {\n    if (subfield.code !== 'a' && subfield.code !== 'd') {\n      return false;\n    }\n    if (subfield.value.length !== 3) {\n      return false;\n    }\n    // We could require /^[a-z][a-z][a-z]$/ etc as well, but it's not really that relevant.\n    return true;\n  }\n\n}\n\nexport function recordNormalizeIndicators(record) {\n  recordNormalize490(record);\n\n  // Language is used to handle non-filing indicators\n  const languages = getLanguages(record);\n\n  record.fields.forEach(field => fieldNormalizeIndicators(field, record, languages));\n\n}\n\nfunction fieldNormalizeIndicators(field, record, languages) {\n  normalize245Indicator1(field, record);\n  normalizeNonFilingIndicator1(field, languages);\n  normalizeNonFilingIndicator2(field, languages);\n}\n"],"mappings":";;;;;;;AAIA,IAAAA,MAAA,GAAAC,OAAA;AAJA;AACA;AACA;;AAKe,SAAAC,SAAA,EAAY;EAEzB,OAAO;IACLC,WAAW,EAAE,6BAA6B;IAC1CC,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASA,GAAGA,CAACC,MAAM,EAAE;IACnB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEH,GAAG,EAAE,EAAE;MAAEI,KAAK,EAAE;IAAI,CAAC;IAE/CC,yBAAyB,CAACJ,MAAM,CAAC;IAEjC,OAAOC,GAAG;EACZ;EAEA,SAASH,QAAQA,CAACE,MAAM,EAAE;IACxB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE;IAAE,CAAC;IAEzBG,cAAc,CAACL,MAAM,EAAEC,GAAG,CAAC;IAE3BA,GAAG,CAACE,KAAK,GAAGF,GAAG,CAACC,OAAO,CAACI,MAAM,GAAG,CAAC,CAAC,CAAC;IACpC,OAAOL,GAAG;EACZ;EAGA,SAASI,cAAcA,CAACL,MAAM,EAAEC,GAAG,EAAE;IACnC;IACA,MAAMM,YAAY,GAAGC,IAAI,CAACC,KAAK,CAACD,IAAI,CAACE,SAAS,CAACV,MAAM,CAACW,MAAM,CAAC,CAAC;IAC9DP,yBAAyB,CAACJ,MAAM,CAAC;IAEjCA,MAAM,CAACW,MAAM,CAACC,OAAO,CAAC,CAACC,KAAK,EAAEC,KAAK,KAAKC,aAAa,CAACF,KAAK,EAAEC,KAAK,CAAC,CAAC;IAEpE,SAASC,aAAaA,CAACF,KAAK,EAAEC,KAAK,EAAE;MACnC,MAAME,iBAAiB,GAAG,IAAAC,oBAAa,EAACV,YAAY,CAACO,KAAK,CAAC,CAAC;MAC5D;MACA,IAAIP,YAAY,CAACO,KAAK,CAAC,CAACI,IAAI,KAAKL,KAAK,CAACK,IAAI,EAAE;QAAE;QAC7C;QACAjB,GAAG,CAACC,OAAO,CAACiB,IAAI,CAAE,sBAAqBH,iBAAkB,SAAQH,KAAK,CAACK,IAAK,GAAE,CAAC,CAAC,CAAC;MACnF;MACA,IAAIX,YAAY,CAACO,KAAK,CAAC,CAACM,IAAI,KAAKP,KAAK,CAACO,IAAI,EAAE;QAAE;QAC7C;QACAnB,GAAG,CAACC,OAAO,CAACiB,IAAI,CAAE,sBAAqBH,iBAAkB,SAAQH,KAAK,CAACO,IAAK,GAAE,CAAC,CAAC,CAAC;MACnF;IACF;IACA;IACApB,MAAM,CAACW,MAAM,GAAGJ,YAAY,CAAC,CAAC;IAC9B;EACF;AACF;AAGA,MAAMc,kBAAkB,GAAG,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC;AACvD,MAAMC,kBAAkB,GAAG,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC;AAErE,SAASC,sBAAsBA,CAACV,KAAK,EAAE;EACrC,OAAOQ,kBAAkB,CAACG,QAAQ,CAACX,KAAK,CAACY,GAAG,CAAC;AAC/C;AAEA,SAASC,wBAAwBA,CAACC,KAAK,EAAE;EACvC;EACA,OAAO,CAAC,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAACH,QAAQ,CAACG,KAAK,CAAC;AACvE;AAEA,SAASC,sBAAsBA,CAACf,KAAK,EAAE;EACrC,OAAOS,kBAAkB,CAACE,QAAQ,CAACX,KAAK,CAACY,GAAG,CAAC;AAC/C;AAEA,SAASI,yBAAyBA,CAACF,KAAK,EAAEG,KAAK,EAAE;EAC/C,OAAOA,KAAK,CAACC,IAAI,CAACC,IAAI,IAAIL,KAAK,CAACM,SAAS,CAAC,CAAC,EAAED,IAAI,CAAC1B,MAAM,CAAC,KAAK0B,IAAI,CAAC;AACrE;AAEA,SAASE,gCAAgCA,CAACrB,KAAK,EAAEsB,SAAS,GAAGC,SAAS,EAAE;EACtE,MAAMC,SAAS,GAAGxB,KAAK,CAACyB,SAAS,CAACP,IAAI,CAACQ,EAAE,IAAIA,EAAE,CAACC,IAAI,KAAK,GAAG,CAAC;EAC7D,IAAI,CAACH,SAAS,EAAE;IACd;IACA;EACF;EAEA,MAAMI,IAAI,GAAGJ,SAAS,CAACV,KAAK,CAACe,WAAW,CAAC,CAAC;EAE1C,IAAIP,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,IAAI,EAAE,KAAK,EAAE,MAAM,CAAC,CAAC;IACpE,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;EAEA,IAAI6B,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,KAAK,EAAE,KAAK,CAAC,CAAC;IAC7D,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;EAEA,IAAI6B,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,MAAM,EAAE,MAAM,EAAE,MAAM,CAAC,CAAC;IACvE,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;EAEA,IAAI6B,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,KAAK,EAAE,MAAM,CAAC,CAAC;IAC9D,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;;EAEA;EACA,MAAMqC,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,MAAM,CAAC,CAAC;EACvD,IAAIE,KAAK,EAAE;IACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;EAC1B;EAEA,OAAO,GAAG;AACZ;AAEA,SAASsC,4BAA4BA,CAAC/B,KAAK,EAAEsB,SAAS,GAAG,EAAE,EAAE;EAC3D,IAAI,CAACZ,sBAAsB,CAACV,KAAK,CAAC,IAAI,CAACa,wBAAwB,CAACb,KAAK,CAACK,IAAI,CAAC,EAAE;IAC3E;EACF;EAEAL,KAAK,CAACK,IAAI,GAAGgB,gCAAgC,CAACrB,KAAK,EAAEsB,SAAS,CAAC,CAAC,CAAC;AACnE;AAEA,SAASU,4BAA4BA,CAAChC,KAAK,EAAEsB,SAAS,GAAG,EAAE,EAAE;EAC3D,IAAI,CAACP,sBAAsB,CAACf,KAAK,CAAC,IAAI,CAACa,wBAAwB,CAACb,KAAK,CAACO,IAAI,CAAC,EAAE;IAC3E;EACF;EAEAP,KAAK,CAACO,IAAI,GAAGc,gCAAgC,CAACrB,KAAK,EAAEsB,SAAS,CAAC,CAAC,CAAC;AACnE;AAGA,SAASW,sBAAsBA,CAACjC,KAAK,EAAEb,MAAM,EAAE;EAC7C,IAAIa,KAAK,CAACY,GAAG,KAAK,KAAK,EAAE;IACvB;EACF;EACA,MAAMsB,QAAQ,GAAG/C,MAAM,CAACgD,GAAG,CAAC,OAAO,CAAC;EACpCnC,KAAK,CAACK,IAAI,GAAG6B,QAAQ,CAACzC,MAAM,KAAK,CAAC,GAAG,GAAG,GAAG,GAAG,CAAC,CAAC;AAClD;AAGA,SAAS2C,kBAAkBA,CAACjD,MAAM,EAAE;EAClC,MAAMkD,SAAS,GAAGlD,MAAM,CAACgD,GAAG,CAAC,OAAO,CAAC;EACrC,MAAMG,SAAS,GAAGnD,MAAM,CAACgD,GAAG,CAAC,uBAAuB,CAAC;EAErD,IAAIE,SAAS,CAAC5C,MAAM,KAAK,CAAC,EAAE;IAC1B;EACF;EACA,IAAI4C,SAAS,CAAC5C,MAAM,IAAI6C,SAAS,CAAC7C,MAAM,EAAE;IACxC;IACA4C,SAAS,CAACtC,OAAO,CAACwC,CAAC,IAAI;MACrBA,CAAC,CAAClC,IAAI,GAAG,GAAG,CAAC,CAAC;IAChB,CAAC,CAAC;IACF;EACF;EACA,IAAIiC,SAAS,CAAC7C,MAAM,KAAK,CAAC,EAAE;IAAE;IAC5B4C,SAAS,CAACtC,OAAO,CAACwC,CAAC,IAAI;MACrBA,CAAC,CAAClC,IAAI,GAAG,GAAG,CAAC,CAAC;IAChB,CAAC,CAAC;IACF;EACF;EACA;AACF;AAGA,SAASmC,YAAYA,CAACrD,MAAM,EAAE;EAC5B,MAAMsD,UAAU,GAAGtD,MAAM,CAACgD,GAAG,CAAC,OAAO,CAAC;EAEtC,IAAIM,UAAU,CAAChD,MAAM,KAAK,CAAC,EAAE;IAC3B,OAAO,EAAE;EACX;EAEA,OAAOgD,UAAU,CAAC,CAAC,CAAC,CAAChB,SAAS,CAACiB,MAAM,CAAChB,EAAE,IAAIiB,kBAAkB,CAACjB,EAAE,CAAC,CAAC,CAACkB,GAAG,CAACC,QAAQ,IAAIA,QAAQ,CAAC/B,KAAK,CAAC;EAEnG,SAAS6B,kBAAkBA,CAACE,QAAQ,EAAE;IACpC,IAAIA,QAAQ,CAAClB,IAAI,KAAK,GAAG,IAAIkB,QAAQ,CAAClB,IAAI,KAAK,GAAG,EAAE;MAClD,OAAO,KAAK;IACd;IACA,IAAIkB,QAAQ,CAAC/B,KAAK,CAACrB,MAAM,KAAK,CAAC,EAAE;MAC/B,OAAO,KAAK;IACd;IACA;IACA,OAAO,IAAI;EACb;AAEF;AAEO,SAASF,yBAAyBA,CAACJ,MAAM,EAAE;EAChDiD,kBAAkB,CAACjD,MAAM,CAAC;;EAE1B;EACA,MAAMmC,SAAS,GAAGkB,YAAY,CAACrD,MAAM,CAAC;EAEtCA,MAAM,CAACW,MAAM,CAACC,OAAO,CAACC,KAAK,IAAI8C,wBAAwB,CAAC9C,KAAK,EAAEb,MAAM,EAAEmC,SAAS,CAAC,CAAC;AAEpF;AAEA,SAASwB,wBAAwBA,CAAC9C,KAAK,EAAEb,MAAM,EAAEmC,SAAS,EAAE;EAC1DW,sBAAsB,CAACjC,KAAK,EAAEb,MAAM,CAAC;EACrC4C,4BAA4B,CAAC/B,KAAK,EAAEsB,SAAS,CAAC;EAC9CU,4BAA4B,CAAChC,KAAK,EAAEsB,SAAS,CAAC;AAChD","ignoreList":[]}
+{"version":3,"file":"indicator-fixes.js","names":["_utils","require","_default","description","validate","fix","record","res","message","valid","recordNormalizeIndicators","validateRecord","length","clonedFields","JSON","parse","stringify","fields","forEach","field","index","compareFields","origFieldAsString","fieldToString","ind1","push","ind2","ind1NonFilingChars","ind2NonFilingChars","hasNonFilingIndicator1","includes","tag","modifiableIndicatorValue","value","hasNonFilingIndicator2","valueBeginsWithDeterminer","cands","find","cand","substring","determineNonFilingIndicatorValue","languages","undefined","subfieldA","subfields","sf","code","name","toLowerCase","match","normalizeNonFilingIndicator1","normalizeNonFilingIndicator2","normalize245Indicator1","field1XX","get","recordNormalize490","fields490","fields8XX","f","getLanguages","langFields","filter","isRelevantSubfield","map","subfield","fieldNormalizeIndicators"],"sources":["../src/indicator-fixes.js"],"sourcesContent":["// Relocated from melinda-marc-record-merge-reducers (and renamed)\n//import createDebugLogger from 'debug';\n//const debug = createDebugLogger('@natlibfi/marc-record-validators-melinda:normalizeIdentifiers');\n\nimport {fieldToString} from './utils';\n\n\nexport default function () {\n\n  return {\n    description: 'Normalizes indicator values',\n    validate, fix\n  };\n\n  function fix(record) {\n    const res = {message: [], fix: [], valid: true};\n\n    recordNormalizeIndicators(record);\n\n    return res;\n  }\n\n  function validate(record) {\n    const res = {message: []};\n\n    validateRecord(record, res);\n\n    res.valid = res.message.length < 1; // eslint-disable-line functional/immutable-data\n    return res;\n  }\n\n\n  function validateRecord(record, res) {\n    //nvdebug(record);\n    const clonedFields = JSON.parse(JSON.stringify(record.fields));\n    recordNormalizeIndicators(record);\n\n    record.fields.forEach((field, index) => compareFields(field, index));\n\n    function compareFields(field, index) {\n      const origFieldAsString = fieldToString(clonedFields[index]);\n      //const clonedFieldAsString = fieldToString(field);\n      if (clonedFields[index].ind1 !== field.ind1) { // eslint-disable-line functional/no-conditional-statements\n        //nvdebug(`FIX IND1: '${clonedFields[index].ind1}' => '${field.ind1}': ${clonedFieldAsString}`);\n        res.message.push(`Expected IND1 for '${origFieldAsString}' is '${field.ind1}'`); // eslint-disable-line functional/immutable-data\n      }\n      if (clonedFields[index].ind2 !== field.ind2) { // eslint-disable-line functional/no-conditional-statements\n        //nvdebug(`FIX IND2: '${clonedFields[index].ind2}' => '${field.ind2}': ${clonedFieldAsString}`);\n        res.message.push(`Expected IND2 for '${origFieldAsString}' is '${field.ind2}'`); // eslint-disable-line functional/immutable-data\n      }\n    }\n    // Validator should not change the original record:\n    record.fields = clonedFields; // eslint-disable-line functional/immutable-data\n    return;\n  }\n}\n\n\nconst ind1NonFilingChars = ['130', '630', '730', '740'];\nconst ind2NonFilingChars = ['222', '240', '242', '243', '245', '830'];\n\nfunction hasNonFilingIndicator1(field) {\n  return ind1NonFilingChars.includes(field.tag);\n}\n\nfunction modifiableIndicatorValue(value) {\n  // If field contains a legit-looking value, don't try to modify it here...\n  return !['9', '8', '7', '6', '5', '4', '3', '2', '1'].includes(value);\n}\n\nfunction hasNonFilingIndicator2(field) {\n  return ind2NonFilingChars.includes(field.tag);\n}\n\nfunction valueBeginsWithDeterminer(value, cands) {\n  return cands.find(cand => value.substring(0, cand.length) === cand);\n}\n\nfunction determineNonFilingIndicatorValue(field, languages = undefined) {\n  const subfieldA = field.subfields.find(sf => sf.code === 'a');\n  if (!subfieldA) {\n    // nvdebug(' Subfield $a miss!');\n    return;\n  }\n\n  const name = subfieldA.value.toLowerCase();\n\n  if (languages.includes('eng')) {\n    const match = valueBeginsWithDeterminer(name, ['a ', 'an ', 'the ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  if (languages.includes('fre')) {\n    const match = valueBeginsWithDeterminer(name, ['l\\'', 'le ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  if (languages.includes('ger')) {\n    const match = valueBeginsWithDeterminer(name, ['das ', 'der ', 'die ']);\n    if (match) {\n      return `${match.length}`;\n    }\n  }\n\n  if (languages.includes('swe')) {\n    const match = valueBeginsWithDeterminer(name, ['en ', 'ett ']);\n    if (match) {\n      return `${match.length}`;\n    }\n    if (name.match(/^de[nt] /u) && !name.match(/^de[nt] som /u)) {\n      return '4';\n    }\n  }\n\n  // Fallback-ish: try to guess even without languages:\n  const match = valueBeginsWithDeterminer(name, ['the ']);\n  if (match) {\n    return `${match.length}`;\n  }\n  if (name.match(/^a /u) && !languages.includes('hun') && !name.match(/^a (?:b |la )/u)) { // Skip \"a b c\", \"a la carte\"...\n    return '2';\n  }\n\n  return '0';\n}\n\nfunction normalizeNonFilingIndicator1(field, languages = []) {\n  if (!hasNonFilingIndicator1(field) || !modifiableIndicatorValue(field.ind1)) {\n    return;\n  }\n\n  field.ind1 = determineNonFilingIndicatorValue(field, languages); // eslint-disable-line functional/immutable-data\n}\n\nfunction normalizeNonFilingIndicator2(field, languages = []) {\n  if (!hasNonFilingIndicator2(field) || !modifiableIndicatorValue(field.ind2)) {\n    return;\n  }\n\n  field.ind2 = determineNonFilingIndicatorValue(field, languages); // eslint-disable-line functional/immutable-data\n}\n\n\nfunction normalize245Indicator1(field, record) {\n  if (field.tag !== '245') {\n    return;\n  }\n  const field1XX = record.get('^1..$');\n  field.ind1 = field1XX.length === 0 ? '0' : '1'; // eslint-disable-line functional/immutable-data\n}\n\n\nfunction recordNormalize490(record) {\n  const fields490 = record.get('^490$');\n  const fields8XX = record.get('^(?:800|810|811|830)$');\n\n  if (fields490.length === 0) {\n    return;\n  }\n  if (fields490.length <= fields8XX.length) {\n    // Trace found for each field 490:\n    fields490.forEach(f => {\n      f.ind1 = '1'; // eslint-disable-line functional/immutable-data\n    });\n    return;\n  }\n  if (fields8XX.length === 0) { // Fields 490 are always untraced (no traces found)\n    fields490.forEach(f => {\n      f.ind1 = '0'; // eslint-disable-line functional/immutable-data\n    });\n    return;\n  }\n  // For other combinations we just can't be sure, so leave them as they are.\n}\n\n\nfunction getLanguages(record) {\n  const langFields = record.get('^041$');\n\n  if (langFields.length === 0) {\n    return [];\n  }\n\n  return langFields[0].subfields.filter(sf => isRelevantSubfield(sf)).map(subfield => subfield.value);\n\n  function isRelevantSubfield(subfield) {\n    if (!['a', 'd', 'h'].includes(subfield.code)) {\n      return false;\n    }\n    if (subfield.value.length !== 3) {\n      return false;\n    }\n    // We could require /^[a-z][a-z][a-z]$/ etc as well, but it's not really that relevant.\n    return true;\n  }\n\n}\n\nexport function recordNormalizeIndicators(record) {\n  recordNormalize490(record);\n\n  // Language is used to handle non-filing indicators\n  const languages = getLanguages(record);\n\n  record.fields.forEach(field => fieldNormalizeIndicators(field, record, languages));\n\n}\n\nfunction fieldNormalizeIndicators(field, record, languages) {\n  normalize245Indicator1(field, record);\n  normalizeNonFilingIndicator1(field, languages);\n  normalizeNonFilingIndicator2(field, languages);\n}\n"],"mappings":";;;;;;;AAIA,IAAAA,MAAA,GAAAC,OAAA;AAJA;AACA;AACA;;AAKe,SAAAC,SAAA,EAAY;EAEzB,OAAO;IACLC,WAAW,EAAE,6BAA6B;IAC1CC,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASA,GAAGA,CAACC,MAAM,EAAE;IACnB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEH,GAAG,EAAE,EAAE;MAAEI,KAAK,EAAE;IAAI,CAAC;IAE/CC,yBAAyB,CAACJ,MAAM,CAAC;IAEjC,OAAOC,GAAG;EACZ;EAEA,SAASH,QAAQA,CAACE,MAAM,EAAE;IACxB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE;IAAE,CAAC;IAEzBG,cAAc,CAACL,MAAM,EAAEC,GAAG,CAAC;IAE3BA,GAAG,CAACE,KAAK,GAAGF,GAAG,CAACC,OAAO,CAACI,MAAM,GAAG,CAAC,CAAC,CAAC;IACpC,OAAOL,GAAG;EACZ;EAGA,SAASI,cAAcA,CAACL,MAAM,EAAEC,GAAG,EAAE;IACnC;IACA,MAAMM,YAAY,GAAGC,IAAI,CAACC,KAAK,CAACD,IAAI,CAACE,SAAS,CAACV,MAAM,CAACW,MAAM,CAAC,CAAC;IAC9DP,yBAAyB,CAACJ,MAAM,CAAC;IAEjCA,MAAM,CAACW,MAAM,CAACC,OAAO,CAAC,CAACC,KAAK,EAAEC,KAAK,KAAKC,aAAa,CAACF,KAAK,EAAEC,KAAK,CAAC,CAAC;IAEpE,SAASC,aAAaA,CAACF,KAAK,EAAEC,KAAK,EAAE;MACnC,MAAME,iBAAiB,GAAG,IAAAC,oBAAa,EAACV,YAAY,CAACO,KAAK,CAAC,CAAC;MAC5D;MACA,IAAIP,YAAY,CAACO,KAAK,CAAC,CAACI,IAAI,KAAKL,KAAK,CAACK,IAAI,EAAE;QAAE;QAC7C;QACAjB,GAAG,CAACC,OAAO,CAACiB,IAAI,CAAE,sBAAqBH,iBAAkB,SAAQH,KAAK,CAACK,IAAK,GAAE,CAAC,CAAC,CAAC;MACnF;MACA,IAAIX,YAAY,CAACO,KAAK,CAAC,CAACM,IAAI,KAAKP,KAAK,CAACO,IAAI,EAAE;QAAE;QAC7C;QACAnB,GAAG,CAACC,OAAO,CAACiB,IAAI,CAAE,sBAAqBH,iBAAkB,SAAQH,KAAK,CAACO,IAAK,GAAE,CAAC,CAAC,CAAC;MACnF;IACF;IACA;IACApB,MAAM,CAACW,MAAM,GAAGJ,YAAY,CAAC,CAAC;IAC9B;EACF;AACF;AAGA,MAAMc,kBAAkB,GAAG,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC;AACvD,MAAMC,kBAAkB,GAAG,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC;AAErE,SAASC,sBAAsBA,CAACV,KAAK,EAAE;EACrC,OAAOQ,kBAAkB,CAACG,QAAQ,CAACX,KAAK,CAACY,GAAG,CAAC;AAC/C;AAEA,SAASC,wBAAwBA,CAACC,KAAK,EAAE;EACvC;EACA,OAAO,CAAC,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAACH,QAAQ,CAACG,KAAK,CAAC;AACvE;AAEA,SAASC,sBAAsBA,CAACf,KAAK,EAAE;EACrC,OAAOS,kBAAkB,CAACE,QAAQ,CAACX,KAAK,CAACY,GAAG,CAAC;AAC/C;AAEA,SAASI,yBAAyBA,CAACF,KAAK,EAAEG,KAAK,EAAE;EAC/C,OAAOA,KAAK,CAACC,IAAI,CAACC,IAAI,IAAIL,KAAK,CAACM,SAAS,CAAC,CAAC,EAAED,IAAI,CAAC1B,MAAM,CAAC,KAAK0B,IAAI,CAAC;AACrE;AAEA,SAASE,gCAAgCA,CAACrB,KAAK,EAAEsB,SAAS,GAAGC,SAAS,EAAE;EACtE,MAAMC,SAAS,GAAGxB,KAAK,CAACyB,SAAS,CAACP,IAAI,CAACQ,EAAE,IAAIA,EAAE,CAACC,IAAI,KAAK,GAAG,CAAC;EAC7D,IAAI,CAACH,SAAS,EAAE;IACd;IACA;EACF;EAEA,MAAMI,IAAI,GAAGJ,SAAS,CAACV,KAAK,CAACe,WAAW,CAAC,CAAC;EAE1C,IAAIP,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,IAAI,EAAE,KAAK,EAAE,MAAM,CAAC,CAAC;IACpE,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;EAEA,IAAI6B,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,KAAK,EAAE,KAAK,CAAC,CAAC;IAC7D,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;EAEA,IAAI6B,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,MAAM,EAAE,MAAM,EAAE,MAAM,CAAC,CAAC;IACvE,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;EACF;EAEA,IAAI6B,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,EAAE;IAC7B,MAAMmB,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,KAAK,EAAE,MAAM,CAAC,CAAC;IAC9D,IAAIE,KAAK,EAAE;MACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;IAC1B;IACA,IAAImC,IAAI,CAACE,KAAK,CAAC,WAAW,CAAC,IAAI,CAACF,IAAI,CAACE,KAAK,CAAC,eAAe,CAAC,EAAE;MAC3D,OAAO,GAAG;IACZ;EACF;;EAEA;EACA,MAAMA,KAAK,GAAGd,yBAAyB,CAACY,IAAI,EAAE,CAAC,MAAM,CAAC,CAAC;EACvD,IAAIE,KAAK,EAAE;IACT,OAAQ,GAAEA,KAAK,CAACrC,MAAO,EAAC;EAC1B;EACA,IAAImC,IAAI,CAACE,KAAK,CAAC,MAAM,CAAC,IAAI,CAACR,SAAS,CAACX,QAAQ,CAAC,KAAK,CAAC,IAAI,CAACiB,IAAI,CAACE,KAAK,CAAC,gBAAgB,CAAC,EAAE;IAAE;IACvF,OAAO,GAAG;EACZ;EAEA,OAAO,GAAG;AACZ;AAEA,SAASC,4BAA4BA,CAAC/B,KAAK,EAAEsB,SAAS,GAAG,EAAE,EAAE;EAC3D,IAAI,CAACZ,sBAAsB,CAACV,KAAK,CAAC,IAAI,CAACa,wBAAwB,CAACb,KAAK,CAACK,IAAI,CAAC,EAAE;IAC3E;EACF;EAEAL,KAAK,CAACK,IAAI,GAAGgB,gCAAgC,CAACrB,KAAK,EAAEsB,SAAS,CAAC,CAAC,CAAC;AACnE;AAEA,SAASU,4BAA4BA,CAAChC,KAAK,EAAEsB,SAAS,GAAG,EAAE,EAAE;EAC3D,IAAI,CAACP,sBAAsB,CAACf,KAAK,CAAC,IAAI,CAACa,wBAAwB,CAACb,KAAK,CAACO,IAAI,CAAC,EAAE;IAC3E;EACF;EAEAP,KAAK,CAACO,IAAI,GAAGc,gCAAgC,CAACrB,KAAK,EAAEsB,SAAS,CAAC,CAAC,CAAC;AACnE;AAGA,SAASW,sBAAsBA,CAACjC,KAAK,EAAEb,MAAM,EAAE;EAC7C,IAAIa,KAAK,CAACY,GAAG,KAAK,KAAK,EAAE;IACvB;EACF;EACA,MAAMsB,QAAQ,GAAG/C,MAAM,CAACgD,GAAG,CAAC,OAAO,CAAC;EACpCnC,KAAK,CAACK,IAAI,GAAG6B,QAAQ,CAACzC,MAAM,KAAK,CAAC,GAAG,GAAG,GAAG,GAAG,CAAC,CAAC;AAClD;AAGA,SAAS2C,kBAAkBA,CAACjD,MAAM,EAAE;EAClC,MAAMkD,SAAS,GAAGlD,MAAM,CAACgD,GAAG,CAAC,OAAO,CAAC;EACrC,MAAMG,SAAS,GAAGnD,MAAM,CAACgD,GAAG,CAAC,uBAAuB,CAAC;EAErD,IAAIE,SAAS,CAAC5C,MAAM,KAAK,CAAC,EAAE;IAC1B;EACF;EACA,IAAI4C,SAAS,CAAC5C,MAAM,IAAI6C,SAAS,CAAC7C,MAAM,EAAE;IACxC;IACA4C,SAAS,CAACtC,OAAO,CAACwC,CAAC,IAAI;MACrBA,CAAC,CAAClC,IAAI,GAAG,GAAG,CAAC,CAAC;IAChB,CAAC,CAAC;IACF;EACF;EACA,IAAIiC,SAAS,CAAC7C,MAAM,KAAK,CAAC,EAAE;IAAE;IAC5B4C,SAAS,CAACtC,OAAO,CAACwC,CAAC,IAAI;MACrBA,CAAC,CAAClC,IAAI,GAAG,GAAG,CAAC,CAAC;IAChB,CAAC,CAAC;IACF;EACF;EACA;AACF;AAGA,SAASmC,YAAYA,CAACrD,MAAM,EAAE;EAC5B,MAAMsD,UAAU,GAAGtD,MAAM,CAACgD,GAAG,CAAC,OAAO,CAAC;EAEtC,IAAIM,UAAU,CAAChD,MAAM,KAAK,CAAC,EAAE;IAC3B,OAAO,EAAE;EACX;EAEA,OAAOgD,UAAU,CAAC,CAAC,CAAC,CAAChB,SAAS,CAACiB,MAAM,CAAChB,EAAE,IAAIiB,kBAAkB,CAACjB,EAAE,CAAC,CAAC,CAACkB,GAAG,CAACC,QAAQ,IAAIA,QAAQ,CAAC/B,KAAK,CAAC;EAEnG,SAAS6B,kBAAkBA,CAACE,QAAQ,EAAE;IACpC,IAAI,CAAC,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAAClC,QAAQ,CAACkC,QAAQ,CAAClB,IAAI,CAAC,EAAE;MAC5C,OAAO,KAAK;IACd;IACA,IAAIkB,QAAQ,CAAC/B,KAAK,CAACrB,MAAM,KAAK,CAAC,EAAE;MAC/B,OAAO,KAAK;IACd;IACA;IACA,OAAO,IAAI;EACb;AAEF;AAEO,SAASF,yBAAyBA,CAACJ,MAAM,EAAE;EAChDiD,kBAAkB,CAACjD,MAAM,CAAC;;EAE1B;EACA,MAAMmC,SAAS,GAAGkB,YAAY,CAACrD,MAAM,CAAC;EAEtCA,MAAM,CAACW,MAAM,CAACC,OAAO,CAACC,KAAK,IAAI8C,wBAAwB,CAAC9C,KAAK,EAAEb,MAAM,EAAEmC,SAAS,CAAC,CAAC;AAEpF;AAEA,SAASwB,wBAAwBA,CAAC9C,KAAK,EAAEb,MAAM,EAAEmC,SAAS,EAAE;EAC1DW,sBAAsB,CAACjC,KAAK,EAAEb,MAAM,CAAC;EACrC4C,4BAA4B,CAAC/B,KAAK,EAAEsB,SAAS,CAAC;EAC9CU,4BAA4B,CAAChC,KAAK,EAAEsB,SAAS,CAAC;AAChD","ignoreList":[]}

package/package.json

@@ -14,7 +14,7 @@
     "url": "git@github.com:natlibfi/marc-record-validators-melinda.git"
   },
   "license": "MIT",
-  "version": "11.1.0",
+  "version": "11.1.1",
   "main": "./dist/index.js",
   "publishConfig": {
     "access": "public"
@@ -40,7 +40,7 @@
     "@babel/register": "^7.23.7",
     "@natlibfi/issn-verify": "^1.0.3",
     "@natlibfi/marc-record": "^8.1.1",
-    "@natlibfi/marc-record-validate": "^8.0.6",
+    "@natlibfi/marc-record-validate": "^8.0.7",
     "cld3-asm": "^3.1.1",
     "clone": "^2.1.2",
     "debug": "^4.3.4",
@@ -50,7 +50,7 @@
     "xml2js": "^0.6.2"
   },
   "peerDependencies": {
-    "@natlibfi/marc-record-validate": "^8.0.6"
+    "@natlibfi/marc-record-validate": "^8.0.7"
   },
   "devDependencies": {
     "@babel/cli": "^7.24.1",

package/src/fixRelatorTerms.js

@@ -86,7 +86,8 @@ const relatorTerms = [
   {'code': 'pht', 'eng': 'photographer', 'fin': 'valokuvaaja', 'swe': 'fotograf'},
   {'code': 'prf', 'eng': 'performer', 'fin': 'esittäjä', 'swe': 'framförande'},
   {'code': 'pro', 'eng': 'producer', 'fin': 'tuottaja', 'swe': 'producent'},
-  {'code': 'trl', 'eng': 'translator', 'fin': 'kääntäjä', 'swe': 'översättare'}
+  {'code': 'trl', 'eng': 'translator', 'fin': 'kääntäjä', 'swe': 'översättare'},
+  {'code': '__FAKE_VALUE1__', 'fin': 'sarjakuvantekijä', 'swe': 'serieskapare'}
 ];
 
 /*

package/src/indicator-fixes.js

@@ -111,6 +111,9 @@ function determineNonFilingIndicatorValue(field, languages = undefined) {
     if (match) {
       return `${match.length}`;
     }
+    if (name.match(/^de[nt] /u) && !name.match(/^de[nt] som /u)) {
+      return '4';
+    }
   }
 
   // Fallback-ish: try to guess even without languages:
@@ -118,6 +121,9 @@ function determineNonFilingIndicatorValue(field, languages = undefined) {
   if (match) {
     return `${match.length}`;
   }
+  if (name.match(/^a /u) && !languages.includes('hun') && !name.match(/^a (?:b |la )/u)) { // Skip "a b c", "a la carte"...
+    return '2';
+  }
 
   return '0';
 }
@@ -182,7 +188,7 @@ function getLanguages(record) {
   return langFields[0].subfields.filter(sf => isRelevantSubfield(sf)).map(subfield => subfield.value);
 
   function isRelevantSubfield(subfield) {
-    if (subfield.code !== 'a' && subfield.code !== 'd') {
+    if (!['a', 'd', 'h'].includes(subfield.code)) {
       return false;
     }
     if (subfield.value.length !== 3) {

package/test-fixtures/fix-relator-terms/f02/expectedResult.json

@@ -3,10 +3,10 @@
   "leader": "01331cam a22003494i 4500",
   "fields": [
     { "tag": "040", "ind1": " ", "ind2": " ", "subfields": [ { "code": "b", "value": "fin" } ] },
-    { "tag": "700", "ind1": " ", "ind2": " ",
-      "subfields": [
+    { "tag": "700", "ind1": " ", "ind2": " ", "subfields": [
           { "code": "a", "value": "Nimi," },
           { "code": "e", "value": "kirjoittaja."}
-      ] }
+      ] },
+    { "tag": "700", "ind1": " ", "ind2": " ", "subfields": [ { "code": "a", "value": "Nimi," }, { "code": "e", "value": "sarjakuvantekijä."} ] }
   ]
 }

package/test-fixtures/fix-relator-terms/f02/record.json

@@ -2,10 +2,7 @@
   "leader": "01331cam a22003494i 4500",
   "fields": [
     { "tag": "040", "ind1": " ", "ind2": " ", "subfields": [ { "code": "b", "value": "fin" } ] },
-    { "tag": "700", "ind1": " ", "ind2": " ",
-      "subfields": [
-          { "code": "a", "value": "Nimi," },
-          { "code": "e", "value": "författare."}
-      ] }
+    { "tag": "700", "ind1": " ", "ind2": " ", "subfields": [ { "code": "a", "value": "Nimi," }, { "code": "e", "value": "författare."} ] },
+    { "tag": "700", "ind1": " ", "ind2": " ", "subfields": [ { "code": "a", "value": "Nimi," }, { "code": "e", "value": "serieskapare."} ] }
   ]
 }

package/test-fixtures/indicator-fixes/06/expectedResult.json

@@ -6,14 +6,8 @@
       "value": "20220202020202.0"
     },
     {
-      "tag": "041",
-      "ind1": " ",
-      "ind2": " ",
-      "subfields": [
-        {
-          "code": "a",
-          "value": "swe"
-        },
+      "tag": "041", "ind1": " ", "ind2": " ", "subfields": [
+        { "code": "a", "value": "swe" },
         {
           "code": "a",
           "value": "fre"
@@ -22,7 +16,6 @@
           "code": "a",
           "value": "ger"
         }
-        
       ]
     },
     {
@@ -44,21 +37,13 @@
         {
           "code": "a",
           "value": "L'Occitane"
-        }        
-      ]
-
-    },
-    {
-      "tag": "730",
-      "ind1": "4",
-      "ind2": " ",
-      "subfields": [
-        {
-          "code": "a",
-          "value": "Der Alte"
         }
       ]
+
     },
+    { "tag": "730", "ind1": "4", "ind2": " ", "subfields": [{"code": "a", "value": "Der Alte"}]},
+    { "tag": "730", "ind1": "0", "ind2": " ", "subfields": [{"code": "a", "value": "Det som levde"}]},
+    { "tag": "730", "ind1": "4", "ind2": " ", "subfields": [{"code": "a", "value": "Den döda man"}]},
     {
       "tag": "730",
       "ind1": "4",

package/test-fixtures/indicator-fixes/06/record.json

@@ -47,17 +47,9 @@
       ]
 
     },
-    {
-      "tag": "730",
-      "ind1": " ",
-      "ind2": " ",
-      "subfields": [
-        {
-          "code": "a",
-          "value": "Der Alte"
-        }
-      ]
-    },
+    { "tag": "730", "ind1": " ", "ind2": " ", "subfields": [{"code": "a", "value": "Der Alte"}]},
+    { "tag": "730", "ind1": " ", "ind2": " ", "subfields": [{"code": "a", "value": "Det som levde"}]},
+    { "tag": "730", "ind1": " ", "ind2": " ", "subfields": [{"code": "a", "value": "Den döda man"}]},
     {
       "tag": "730",
       "ind1": " ",

package/test-fixtures/indicator-fixes/07/expectedResult.json

@@ -0,0 +1,15 @@
+{
+  "_validationOptions": {},
+  "fields": [
+    {
+      "tag": "005",
+      "value": "20220202020202.0"
+    },
+
+    { "tag": "730", "ind1": "2", "ind2": " ", "subfields": [{"code": "a", "value": "A Tale of Two Cities"}]},
+    { "tag": "730", "ind1": "0", "ind2": " ", "subfields": [{"code": "a", "value": "A B C"}]},
+    { "tag": "730", "ind1": "0", "ind2": " ", "subfields": [{"code": "a", "value": "A la care"}]}
+
+  ],
+  "leader": ""
+}

package/test-fixtures/indicator-fixes/07/metadata.json

@@ -0,0 +1,5 @@
+{
+  "description": "07: MET-566-ish article 'a' checks",
+  "enabled": true,
+  "fix": true
+}

package/test-fixtures/indicator-fixes/07/record.json

@@ -0,0 +1,14 @@
+{
+  "_validationOptions": {},
+  "fields": [
+    {
+      "tag": "005",
+      "value": "20220202020202.0"
+    },
+
+    { "tag": "730", "ind1": " ", "ind2": " ", "subfields": [{"code": "a", "value": "A Tale of Two Cities"}]},
+    { "tag": "730", "ind1": " ", "ind2": " ", "subfields": [{"code": "a", "value": "A B C"}]},
+    { "tag": "730", "ind1": " ", "ind2": " ", "subfields": [{"code": "a", "value": "A la care"}]}
+  ],
+  "leader": ""
+}