added deck.xlat module

2025-12-25 12:46:49 +02:00
parent b8c7b3cb5f
commit b7f05d81b2
2 changed files with 81 additions and 0 deletions
@@ -0,0 +1,72 @@
+# deck.xlat: character translation routines with some presets
+# Usage: from deck import xlat
+# If there's no preset selected, CYR (cyrillic) gets selected by default
+# Created by Luxferre in 2025, released into public domain
+
+maps = {
+  'CYR': {
+    'prefix_chars': ['J', 'X', 'Y', 'j', 'x', 'y'],
+    'source': '\u0410\u0430\u0411\u0431\u0412\u0432\u0413\u0433\u0490\u0491\u0414\u0434\u0415\u0435\u0404\u0454\u0401\u0451\u0416\u0436\u0417\u0437\u0418\u0438\u0406\u0456\u0407\u0457\u0419\u0439\u041a\u043a\u041b\u043b\u041c\u043c\u041d\u043d\u041e\u043e\u041f\u043f\u0420\u0440\u0421\u0441\u0422\u0442\u0423\u0443\u0424\u0444\u0425\u0445\u0426\u0446\u0427\u0447\u0428\u0448\u0429\u0449\u042a\u044a\u042b\u044b\u042c\u044c\u042d\u044d\u042e\u044e\u042f\u044f',
+    'mapping': [
+      'A', 'a', 'B', 'b', 'W', 'w', 'G', 'g',
+      'XG', 'xg',
+      'D', 'd', 'E', 'e',
+      'JE', 'je', 'JO', 'jo',
+      'V', 'v', 'Z', 'z', 'I', 'i',
+      'YI', 'yi', 'JI', 'ji', 'JJ', 'jj',
+      'K', 'k', 'L', 'l', 'M', 'm', 'N', 'n',
+      'O', 'o', 'P', 'p', 'R', 'r', 'S', 's',
+      'T', 't', 'U', 'u', 'F', 'f', 'H', 'h',
+      'C', 'c',
+      'XX', 'xx', 'XW', 'xw', 'XQ', 'xq',
+      "x'", "x'", 'YY', 'yy', "'", "'",
+      'YE', 'ye', 'JU', 'ju', 'Q', 'q'
+    ]
+  }
+}
+
+# generate direct and reverse key-value mappings
+for mkey, m in maps.items():
+  maps[mkey]['s2m'] = {}
+  maps[mkey]['m2s'] = {}
+  idx = 0
+  for char in m['source']:
+    dst = m['mapping'][idx]
+    maps[mkey]['s2m'][char] = dst
+    maps[mkey]['m2s'][dst] = char
+    idx += 1
+
+def enc(s, cmap=None):
+  if cmap == None:
+    cmap = 'CYR'
+  mapobj = maps[cmap]
+  out_str = ''
+  for char in s:
+    if char in mapobj['s2m']:
+      out_str += mapobj['s2m'][char]
+    else:
+      out_str += char
+  return out_str
+
+def dec(s, cmap=None):
+  if cmap == None:
+    cmap = 'CYR'
+  mapobj = maps[cmap]
+  prefixes = mapobj['prefix_chars']
+  m2s = mapobj['m2s']
+  out_str = ''
+  buf = ''
+  for char in s:
+    if char in prefixes:
+      buf += char
+    else:
+      if buf != '':
+        buf += char
+      else:
+        buf = char
+      if buf in m2s:
+        out_str += m2s[buf]
+      else:
+        out_str += buf
+      buf = ''
+  return out_str