File: gen-8bit-gap.awk

package info (click to toggle)
samba 2%3A3.6.6-6%2Bdeb7u7
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 160,976 kB
  • sloc: ansic: 1,764,536; xml: 114,867; python: 78,119; perl: 27,633; sh: 13,802; makefile: 4,704; asm: 3,281; cpp: 2,281; yacc: 1,949; exp: 1,784; ada: 1,681; pascal: 1,089; cs: 879; awk: 756; lex: 566; csh: 58; sed: 45; php: 6
file content (18 lines) | stat: -rw-r--r-- 365 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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"
	}
}