From 3b87d9b4e61b676872bf23256f30f66863e1cd31 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Mon, 14 May 2012 11:48:02 +0200
Subject: [PATCH] Standards.IIM: Added some missing character encodings from
IRO-IR.
---
lib/modules/Standards.pmod/IIM.pmod | 33 ++++++++++++++++++++++++-----
1 file changed, 28 insertions(+), 5 deletions(-)
diff --git a/lib/modules/Standards.pmod/IIM.pmod b/lib/modules/Standards.pmod/IIM.pmod
index b492d157e7..8f06f5bdd9 100644
--- a/lib/modules/Standards.pmod/IIM.pmod
+++ b/lib/modules/Standards.pmod/IIM.pmod
@@ -205,11 +205,34 @@ protected mapping(string:string|array(string)) decode_photoshop_data(string data
(string)record_set + ":" + (string)id;
if (label == "coded character set") {
- if (data == "\e%G") {
- res->charset = (res->charset || ({})) + ({ "UTF-8" });
- } else if (data == "\e%5") {
- res->charset = (res->charset || ({})) + ({ "iso-8859-1" });
- }
+ string charset = ([
+ "\e%/@": "UTF-16", // ISO-IR 162 (NB: Actually UCS-2 level 1)
+ "\e%/A": "UTF-32", // ISO-IR 163 (NB: Actually UCS-4 level 1)
+ "\e%/B": "ISO-8859-1",// ISO-IR 125 (NB: Actually binary)
+ "\e%/C": "UTF-16", // ISO-IR 174 (NB: Actually UCS-2 level 2)
+ "\e%/D": "UTF-32", // ISO-IR 175 (NB: Actually UCS-4 level 2)
+ "\e%/E": "UTF-16", // ISO-IR 176 (NB: Actually UCS-2 level 3)
+ "\e%/F": "UTF-32", // ISO-IR 177 (NB: Actually UCS-4 level 3)
+ "\e%/G": "UTF-8", // ISO-IR 190 (NB: Actually UTF-8 level 1)
+ "\e%/H": "UTF-8", // ISO-IR 191 (NB: Actually UTF-8 level 2)
+ "\e%/I": "UTF-8", // ISO-IR 192 (NB: Actually UTF-8 level 3)
+ "\e%/J": "UTF-16", // ISO-IR 193 (NB: Actually UTF-16 level 1)
+ "\e%/K": "UTF-16", // ISO-IR 194 (NB: Actually UTF-16 level 2)
+ "\e%/L": "UTF-16", // ISO-IR 195 (NB: Actually UTF-16 level 3)
+ "\e%5": "ISO-8859-1",
+ "\e%@": "ISO-2022", // ISO-IR 108, ISO-IR 178
+ "\e%A": "NAPLPS", // ISO-IR 108
+ "\e%B": "UTF-1", // ISO-IR 178
+ "\e%C": "T.101 DS1", // ISO-IR 131
+ "\e%D": "T.101 DS2", // ISO-IR 145
+ "\e%E": "T.101 PHOTO",// ISO-IR 160
+ "\e%F": "T.101 AUDIO",// ISO-IR 161
+ "\e%G": "UTF-8", // ISO-IR 196
+ "\e%H": "T.107 VEMMI",// ISO-IR 188
+ ])[data];
+ if (charset) {
+ res->charset = (res->charset || ({})) + ({ charset });
+ }
}
if (label == "special instructions" && lower_case(data) == "nyhedstjeneste")
--
GitLab