199 lines
9.4 KiB
Bash
199 lines
9.4 KiB
Bash
##@cooked comments # -*- coding: utf-8 mode: sh -*- vim:sw=4:sts=4:et:ai:si:sta:fenc=utf-8
|
|
## Gestion de fichiers de propriétés java
|
|
##@cooked nocomments
|
|
##@require base
|
|
uprovide javaproperties
|
|
urequire base
|
|
|
|
function read_property() {
|
|
# Lire la propriété $2 dans le fichier $1, et placer la valeur dans la
|
|
# variable $3. Si la propriété n'existe pas, prendre la valeur par défaut
|
|
# $4. Si $3=="", elle est construite à partir de $2 en remplaçant les '.'
|
|
# par '_'
|
|
# Retourner 1 si une erreur s'est produite (par exemple si le fichier
|
|
# n'existe pas ou n'est pas accessible en lecture)
|
|
[ -f "$1" -a -r "$1" ] || return 1
|
|
|
|
local __rp_name __rp_value __rp_found
|
|
# utiliser cawkrun pour que awk n'essaye pas de traiter les caractères en
|
|
# unicode (latin1 wrt utf-8)
|
|
__rp_value="$(<"$1" cawkrun name="$2" '
|
|
BEGIN {
|
|
found = 1
|
|
re_name = name
|
|
gsub(/\./, "\\.", re_name)
|
|
re_name = "^[ \t]*" re_name "[ \t]*="
|
|
}
|
|
$0 ~ re_name {
|
|
sub(re_name, "")
|
|
value = $0
|
|
sub(/^[ \t]*/, "", value)
|
|
while (substr(value, length(value), 1) == "\\") {
|
|
getline
|
|
sub(/^[ \t]*/, "")
|
|
value = substr(value, 1, length(value) - 1) $0
|
|
}
|
|
print value
|
|
found = 0
|
|
exit
|
|
}
|
|
END { exit found }')" && __rp_found=1
|
|
if [ -n "$3" ]; then
|
|
__rp_name="$3"
|
|
else
|
|
__rp_name="${2//./_}"
|
|
fi
|
|
if [ -n "$__rp_found" ]; then
|
|
set_var "$__rp_name" "$(tooenc "$__rp_value" "$LATIN1")"
|
|
else
|
|
set_var "$__rp_name" "$4"
|
|
fi
|
|
}
|
|
|
|
function write_property() {
|
|
# Ecrire la propriété $2 dans le fichier $1 avec la valeur $3.
|
|
# Retourner 1 si une erreur s'est produite (par exemple si le fichier
|
|
# n'existe pas ou n'est pas accessible en écriture)
|
|
[ -f "$1" -a -w "$1" ] || return 1
|
|
|
|
local status tmpfile
|
|
ac_set_tmpfile tmpfile
|
|
# utiliser cawkrun pour que awk n'essaye pas de traiter les caractères en
|
|
# unicode (utf-8 wrt latin1)
|
|
<"$1" >"$tmpfile" cawkrun name="$2" value="$(tooenc "$3" "" "$LATIN1")" '
|
|
function write_value() {
|
|
# XXX attention, le découpage n"est potentiellement pas fait
|
|
# correctement si la valeur contient des espaces
|
|
line = name "=" value
|
|
prefix = ""
|
|
max_len = 75
|
|
if (length(line) > max_len) {
|
|
do {
|
|
print prefix substr(line, 1, max_len) "\\"
|
|
line = substr(line, max_len + 1)
|
|
prefix = " "
|
|
max_len = 71
|
|
} while (length(line) > max_len)
|
|
}
|
|
print prefix line
|
|
}
|
|
BEGIN {
|
|
found = 0
|
|
re_name = name
|
|
gsub(/\./, "\\.", re_name)
|
|
re_name = "^[ \t]*" re_name "[ \t]*="
|
|
}
|
|
!found && $0 ~ re_name {
|
|
line = $0
|
|
while (substr(line, length(line), 1) == "\\") {
|
|
getline
|
|
line = line $0
|
|
}
|
|
write_value()
|
|
found = 1
|
|
next
|
|
}
|
|
{ print }
|
|
END { if (!found) write_value() }
|
|
' && cat "$tmpfile" >"$1"
|
|
status=$?
|
|
ac_clean "$tmpfile"
|
|
return $status
|
|
}
|
|
|
|
function write_properties() {
|
|
# Ecrire les propriétés $2..* dans le fichier $1. Les propriétés sont de la
|
|
# forme "name=value"
|
|
local __wp_propfile="$1"; shift
|
|
local __wp_prop __wp_name __wp_value
|
|
for __wp_prop in "$@"; do
|
|
splitvar "$__wp_prop" __wp_name __wp_value
|
|
write_property "$__wp_propfile" "$__wp_name" "$__wp_value"
|
|
done
|
|
}
|
|
|
|
function __norm_properties() {
|
|
echo '# -*- coding: iso-8859-1 -*- vim:sw=4:sts=4:et:ai:si:sta:fenc=iso-8859-1'
|
|
_nl2lf |
|
|
grep -v $'^[ \t]*#' |
|
|
grep -v $'^[ \t]*$' |
|
|
csort -k1 -t= |
|
|
csed $'
|
|
s/\x80/\\\\u0080/g; s/\x81/\\\\u0081/g; s/\x82/\\\\u0082/g; s/\x83/\\\\u0083/g;
|
|
s/\x84/\\\\u0084/g; s/\x85/\\\\u0085/g; s/\x86/\\\\u0086/g; s/\x87/\\\\u0087/g;
|
|
s/\x88/\\\\u0088/g; s/\x89/\\\\u0089/g; s/\x8a/\\\\u008a/g; s/\x8b/\\\\u008b/g;
|
|
s/\x8c/\\\\u008c/g; s/\x8d/\\\\u008d/g; s/\x8e/\\\\u008e/g; s/\x8f/\\\\u008f/g;
|
|
s/\x90/\\\\u0090/g; s/\x91/\\\\u0091/g; s/\x92/\\\\u0092/g; s/\x93/\\\\u0093/g;
|
|
s/\x94/\\\\u0094/g; s/\x95/\\\\u0095/g; s/\x96/\\\\u0096/g; s/\x97/\\\\u0097/g;
|
|
s/\x98/\\\\u0098/g; s/\x99/\\\\u0099/g; s/\x9a/\\\\u009a/g; s/\x9b/\\\\u009b/g;
|
|
s/\x9c/\\\\u009c/g; s/\x9d/\\\\u009d/g; s/\x9e/\\\\u009e/g; s/\x9f/\\\\u009f/g;
|
|
s/\xa0/\\\\u00a0/g; s/\xa1/\\\\u00a1/g; s/\xa2/\\\\u00a2/g; s/\xa3/\\\\u00a3/g;
|
|
s/\xa4/\\\\u00a4/g; s/\xa5/\\\\u00a5/g; s/\xa6/\\\\u00a6/g; s/\xa7/\\\\u00a7/g;
|
|
s/\xa8/\\\\u00a8/g; s/\xa9/\\\\u00a9/g; s/\xaa/\\\\u00aa/g; s/\xab/\\\\u00ab/g;
|
|
s/\xac/\\\\u00ac/g; s/\xad/\\\\u00ad/g; s/\xae/\\\\u00ae/g; s/\xaf/\\\\u00af/g;
|
|
s/\xb0/\\\\u00b0/g; s/\xb1/\\\\u00b1/g; s/\xb2/\\\\u00b2/g; s/\xb3/\\\\u00b3/g;
|
|
s/\xb4/\\\\u00b4/g; s/\xb5/\\\\u00b5/g; s/\xb6/\\\\u00b6/g; s/\xb7/\\\\u00b7/g;
|
|
s/\xb8/\\\\u00b8/g; s/\xb9/\\\\u00b9/g; s/\xba/\\\\u00ba/g; s/\xbb/\\\\u00bb/g;
|
|
s/\xbc/\\\\u00bc/g; s/\xbd/\\\\u00bd/g; s/\xbe/\\\\u00be/g; s/\xbf/\\\\u00bf/g;
|
|
s/\xc0/\\\\u00c0/g; s/\xc1/\\\\u00c1/g; s/\xc2/\\\\u00c2/g; s/\xc3/\\\\u00c3/g;
|
|
s/\xc4/\\\\u00c4/g; s/\xc5/\\\\u00c5/g; s/\xc6/\\\\u00c6/g; s/\xc7/\\\\u00c7/g;
|
|
s/\xc8/\\\\u00c8/g; s/\xc9/\\\\u00c9/g; s/\xca/\\\\u00ca/g; s/\xcb/\\\\u00cb/g;
|
|
s/\xcc/\\\\u00cc/g; s/\xcd/\\\\u00cd/g; s/\xce/\\\\u00ce/g; s/\xcf/\\\\u00cf/g;
|
|
s/\xd0/\\\\u00d0/g; s/\xd1/\\\\u00d1/g; s/\xd2/\\\\u00d2/g; s/\xd3/\\\\u00d3/g;
|
|
s/\xd4/\\\\u00d4/g; s/\xd5/\\\\u00d5/g; s/\xd6/\\\\u00d6/g; s/\xd7/\\\\u00d7/g;
|
|
s/\xd8/\\\\u00d8/g; s/\xd9/\\\\u00d9/g; s/\xda/\\\\u00da/g; s/\xdb/\\\\u00db/g;
|
|
s/\xdc/\\\\u00dc/g; s/\xdd/\\\\u00dd/g; s/\xde/\\\\u00de/g; s/\xdf/\\\\u00df/g;
|
|
s/\xe0/\\\\u00e0/g; s/\xe1/\\\\u00e1/g; s/\xe2/\\\\u00e2/g; s/\xe3/\\\\u00e3/g;
|
|
s/\xe4/\\\\u00e4/g; s/\xe5/\\\\u00e5/g; s/\xe6/\\\\u00e6/g; s/\xe7/\\\\u00e7/g;
|
|
s/\xe8/\\\\u00e8/g; s/\xe9/\\\\u00e9/g; s/\xea/\\\\u00ea/g; s/\xeb/\\\\u00eb/g;
|
|
s/\xec/\\\\u00ec/g; s/\xed/\\\\u00ed/g; s/\xee/\\\\u00ee/g; s/\xef/\\\\u00ef/g;
|
|
s/\xf0/\\\\u00f0/g; s/\xf1/\\\\u00f1/g; s/\xf2/\\\\u00f2/g; s/\xf3/\\\\u00f3/g;
|
|
s/\xf4/\\\\u00f4/g; s/\xf5/\\\\u00f5/g; s/\xf6/\\\\u00f6/g; s/\xf7/\\\\u00f7/g;
|
|
s/\xf8/\\\\u00f8/g; s/\xf9/\\\\u00f9/g; s/\xfa/\\\\u00fa/g; s/\xfb/\\\\u00fb/g;
|
|
s/\xfc/\\\\u00fc/g; s/\xfd/\\\\u00fd/g; s/\xfe/\\\\u00fe/g; s/\xff/\\\\u00ff/g;
|
|
''
|
|
s/\\u008[aA]/\\u008a/g; s/\\u008[bB]/\\u008b/g; s/\\u008[cC]/\\u008c/g; s/\\u008[dD]/\\u008d/g;
|
|
s/\\u008[eE]/\\u008e/g; s/\\u008[fF]/\\u008f/g; s/\\u009[aA]/\\u009a/g; s/\\u009[bB]/\\u009b/g;
|
|
s/\\u009[cC]/\\u009c/g; s/\\u009[dD]/\\u009d/g; s/\\u009[eE]/\\u009e/g; s/\\u009[fF]/\\u009f/g;
|
|
s/\\u00[aA]0/\\u00a0/g; s/\\u00[aA]1/\\u00a1/g; s/\\u00[aA]2/\\u00a2/g; s/\\u00[aA]3/\\u00a3/g;
|
|
s/\\u00[aA]4/\\u00a4/g; s/\\u00[aA]5/\\u00a5/g; s/\\u00[aA]6/\\u00a6/g; s/\\u00[aA]7/\\u00a7/g;
|
|
s/\\u00[aA]8/\\u00a8/g; s/\\u00[aA]9/\\u00a9/g; s/\\u00[aA][aA]/\\u00aa/g; s/\\u00[aA][bB]/\\u00ab/g;
|
|
s/\\u00[aA][cC]/\\u00ac/g; s/\\u00[aA][dD]/\\u00ad/g; s/\\u00[aA][eE]/\\u00ae/g; s/\\u00[aA][fF]/\\u00af/g;
|
|
s/\\u00[bB]0/\\u00b0/g; s/\\u00[bB]1/\\u00b1/g; s/\\u00[bB]2/\\u00b2/g; s/\\u00[bB]3/\\u00b3/g;
|
|
s/\\u00[bB]4/\\u00b4/g; s/\\u00[bB]5/\\u00b5/g; s/\\u00[bB]6/\\u00b6/g; s/\\u00[bB]7/\\u00b7/g;
|
|
s/\\u00[bB]8/\\u00b8/g; s/\\u00[bB]9/\\u00b9/g; s/\\u00[bB][aA]/\\u00ba/g; s/\\u00[bB][bB]/\\u00bb/g;
|
|
s/\\u00[bB][cC]/\\u00bc/g; s/\\u00[bB][dD]/\\u00bd/g; s/\\u00[bB][eE]/\\u00be/g; s/\\u00[bB][fF]/\\u00bf/g;
|
|
s/\\u00[cC]0/\\u00c0/g; s/\\u00[cC]1/\\u00c1/g; s/\\u00[cC]2/\\u00c2/g; s/\\u00[cC]3/\\u00c3/g;
|
|
s/\\u00[cC]4/\\u00c4/g; s/\\u00[cC]5/\\u00c5/g; s/\\u00[cC]6/\\u00c6/g; s/\\u00[cC]7/\\u00c7/g;
|
|
s/\\u00[cC]8/\\u00c8/g; s/\\u00[cC]9/\\u00c9/g; s/\\u00[cC][aA]/\\u00ca/g; s/\\u00[cC][bB]/\\u00cb/g;
|
|
s/\\u00[cC][cC]/\\u00cc/g; s/\\u00[cC][dD]/\\u00cd/g; s/\\u00[cC][eE]/\\u00ce/g; s/\\u00[cC][fF]/\\u00cf/g;
|
|
s/\\u00[dD]0/\\u00d0/g; s/\\u00[dD]1/\\u00d1/g; s/\\u00[dD]2/\\u00d2/g; s/\\u00[dD]3/\\u00d3/g;
|
|
s/\\u00[dD]4/\\u00d4/g; s/\\u00[dD]5/\\u00d5/g; s/\\u00[dD]6/\\u00d6/g; s/\\u00[dD]7/\\u00d7/g;
|
|
s/\\u00[dD]8/\\u00d8/g; s/\\u00[dD]9/\\u00d9/g; s/\\u00[dD][aA]/\\u00da/g; s/\\u00[dD][bB]/\\u00db/g;
|
|
s/\\u00[dD][cC]/\\u00dc/g; s/\\u00[dD][dD]/\\u00dd/g; s/\\u00[dD][eE]/\\u00de/g; s/\\u00[dD][fF]/\\u00df/g;
|
|
s/\\u00[eE]0/\\u00e0/g; s/\\u00[eE]1/\\u00e1/g; s/\\u00[eE]2/\\u00e2/g; s/\\u00[eE]3/\\u00e3/g;
|
|
s/\\u00[eE]4/\\u00e4/g; s/\\u00[eE]5/\\u00e5/g; s/\\u00[eE]6/\\u00e6/g; s/\\u00[eE]7/\\u00e7/g;
|
|
s/\\u00[eE]8/\\u00e8/g; s/\\u00[eE]9/\\u00e9/g; s/\\u00[eE][aA]/\\u00ea/g; s/\\u00[eE][bB]/\\u00eb/g;
|
|
s/\\u00[eE][cC]/\\u00ec/g; s/\\u00[eE][dD]/\\u00ed/g; s/\\u00[eE][eE]/\\u00ee/g; s/\\u00[eE][fF]/\\u00ef/g;
|
|
s/\\u00[fF]0/\\u00f0/g; s/\\u00[fF]1/\\u00f1/g; s/\\u00[fF]2/\\u00f2/g; s/\\u00[fF]3/\\u00f3/g;
|
|
s/\\u00[fF]4/\\u00f4/g; s/\\u00[fF]5/\\u00f5/g; s/\\u00[fF]6/\\u00f6/g; s/\\u00[fF]7/\\u00f7/g;
|
|
s/\\u00[fF]8/\\u00f8/g; s/\\u00[fF]9/\\u00f9/g; s/\\u00[fF][aA]/\\u00fa/g; s/\\u00[fF][bB]/\\u00fb/g;
|
|
s/\\u00[fF][cC]/\\u00fc/g; s/\\u00[fF][dD]/\\u00fd/g; s/\\u00[fF][eE]/\\u00fe/g; s/\\u00[fF][fF]/\\u00ff/g;
|
|
' |
|
|
awk '{ print gensub(/([^\\]):/, "\\1\\\\:", "g") }'
|
|
}
|
|
|
|
function norm_properties() {
|
|
# Normaliser un fichier de propriété: Les commentaires sont supprimés, les
|
|
# valeurs sont triées par ordre alphabétique, les caractères accentués sont
|
|
# remplacés par des caractères unicode \\uxxxx, les séquences unicodes sont
|
|
# transformées en minuscule.
|
|
[ -f "$1" -a -w "$1" ] || return 1
|
|
local status tmpfile
|
|
ac_set_tmpfile tmpfile
|
|
<"$1" >"$tmpfile" __norm_properties && cat "$tmpfile" >"$1"
|
|
status=$?
|
|
ac_clean "$tmpfile"
|
|
return $status
|
|
}
|