You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
50 lines
1.6 KiB
50 lines
1.6 KiB
#!/bin/awk -f
|
|
function translate(str) {
|
|
while (sub(/&/, "#amp;", str) == 1);
|
|
while (sub(/#amp;/, "\\&", str) == 1); # fun isn't it ?
|
|
while (sub(/</, "\\<", str) == 1);
|
|
while (sub(/>/, "\\>", str) == 1);
|
|
sub(/[0-9][0-9][0-9][0-9][0-9]+/, "<bug number='&'/>", str)
|
|
return(str)
|
|
}
|
|
BEGIN {
|
|
nb_entry = 0
|
|
in_entry = 0
|
|
in_item = 0
|
|
print "<?xml version='1.0' encoding='ISO-8859-1'?>"
|
|
print "<log>"
|
|
}
|
|
END {
|
|
if (in_item == 1) printf("%s</item>\n", translate(item))
|
|
if (in_entry == 1) print " </entry>"
|
|
print "</log>"
|
|
}
|
|
/^[ \t]*$/ { next }
|
|
/^[A-Za-z0-9]/ {
|
|
match($0, "\(.*\) \([A-Z]+\) \([0-9][0-9][0-9][0-9]\) \(.*\) <\(.*\)>", loge)
|
|
if (in_item == 1) printf("%s</item>\n", translate(item))
|
|
if (in_entry == 1) print " </entry>"
|
|
nb_entry = nb_entry + 1
|
|
if (nb_entry > 50) {
|
|
in_entry = 0
|
|
in_item = 0
|
|
exit
|
|
}
|
|
in_entry = 1
|
|
in_item = 0
|
|
printf(" <entry date='%s' timezone='%s' year='%s'\n who='%s' email='%s'>\n", loge[1], loge[2], loge[3], loge[4], loge[5])
|
|
}
|
|
/^[ \t]*\*/ {
|
|
if (in_item == 1) printf("%s</item>\n", translate(item))
|
|
in_item = 1
|
|
printf(" <item>")
|
|
match($0, "[ \t]*. *\(.*\)", loge)
|
|
item = loge[1]
|
|
}
|
|
/^[ \t]*[a-zA-Z0-9\#]/ {
|
|
if (in_item == 1) {
|
|
match($0, "[ \t]*\(.*\)[ \t]*", loge)
|
|
item = sprintf("%s %s", item, loge[1])
|
|
}
|
|
}
|