source/script/gen-8bit-gap.awk

   1 BEGIN {
   2         for (i=0; i<256; i++) {
   3                 tbl[sprintf("%02x",i)] = "0x0000";
   4         }
   5 }
   6
   7 /^<U([[:xdigit:]][[:xdigit:]][[:xdigit:]][[:xdigit:]])>[[:space:]]*.x([[:xdigit:]][[:xdigit:]])[:space:]*.*$/ {
   8         tbl[substr($2,3,2)]=sprintf("0x%s",substr($1,3,4));
   9 }
  10
  11 END {
  12         for(i=0; i<32; i++) {
  13                 for(j=0; j<8; j++) {
  14                         printf(" %s,", tbl[sprintf("%02x",i*8+j)]);
  15                 }
  16                 printf "\n"
  17         }
  18 }