ref: d0ae2e369e0221e796f4b58255b21ce3592d80dc
dir: /sys/src/cmd/unicode.c/
#include <u.h> #include <libc.h> #include <bio.h> char usage[] = "unicode { [-t] hex hex ... | hexmin-hexmax ... | [-n] char ... }"; char hex[] = "0123456789abcdefABCDEF"; int numout = 0; int text = 0; char *err; Biobuf bout; char *range(char*[]); char *nums(char*[]); char *chars(char*[]); void main(int argc, char *argv[]) { ARGBEGIN{ case 'n': numout = 1; break; case 't': text = 1; break; }ARGEND Binit(&bout, 1, OWRITE); if(argc == 0){ fprint(2, "usage: %s\n", usage); exits("usage"); } if(!numout && utfrune(argv[0], '-')) exits(range(argv)); if(numout || strchr(hex, argv[0][0])==0) exits(nums(argv)); exits(chars(argv)); } char* range(char *argv[]) { char *q; int min, max; int i; while(*argv){ q = *argv; if(strchr(hex, q[0]) == 0){ err: fprint(2, "unicode: bad range %s\n", *argv); return "bad range"; } min = strtoul(q, &q, 16); if(min<0 || min>Runemax || *q!='-') goto err; q++; if(strchr(hex, *q) == 0) goto err; max = strtoul(q, &q, 16); if(max<0 || max>Runemax || max<min || *q!=0) goto err; i = 0; do{ Bprint(&bout, "%.4x %C", min, min); i++; if(min==max || (i&7)==0) Bprint(&bout, "\n"); else Bprint(&bout, "\t"); min++; }while(min<=max); argv++; } return 0; } char* nums(char *argv[]) { char *q; Rune r; int w; while(*argv){ q = *argv; while(*q){ w = chartorune(&r, q); if(r==Runeerror){ char b[UTFmax]; if(runetochar(b, &r) != w || memcmp(b, q, w) != 0){ fprint(2, "unicode: invalid utf string %s\n", *argv); return "bad utf"; } } Bprint(&bout, "%.4x\n", r); q += w; } argv++; } return 0; } char* chars(char *argv[]) { char *q; int m; while(*argv){ q = *argv; if(strchr(hex, q[0]) == 0){ err: fprint(2, "unicode: bad unicode value %s\n", *argv); return "bad char"; } m = strtoul(q, &q, 16); if(m<0 || m>Runemax || *q!=0) goto err; Bprint(&bout, "%C", m); if(!text) Bprint(&bout, "\n"); argv++; } return 0; }