Initial import

[samba] / source / script / gen-8bit-gap.awk

diff --git a/source/script/gen-8bit-gap.awk b/source/script/gen-8bit-gap.awk
new file mode 100644 (file)
index 0000000..59a1a23
--- /dev/null
+++ b/source/script/gen-8bit-gap.awk
@@ -0,0 +1,18 @@
+BEGIN {
+       for (i=0; i<256; i++) {
+               tbl[sprintf("%02x",i)] = "0x0000";
+       }
+}
+
+/^<U([[:xdigit:]][[:xdigit:]][[:xdigit:]][[:xdigit:]])>[[:space:]]*.x([[:xdigit:]][[:xdigit:]])[:space:]*.*$/ {
+       tbl[substr($2,3,2)]=sprintf("0x%s",substr($1,3,4));
+}
+
+END {
+       for(i=0; i<32; i++) {
+               for(j=0; j<8; j++) {
+                       printf(" %s,", tbl[sprintf("%02x",i*8+j)]);
+               }
+               printf "\n"
+       }
+}
\ No newline at end of file