ref: 1ee1bfaa8c5644092e0c1ca3985ee74813bbfb1d
dir: /sys/src/cmd/ascii.c/
#include <u.h> #include <libc.h> #include <bio.h> #define MAXBASE 36 void usage(void); void put(int); void putn(int, int); void puttext(char *); void putnum(char *); int btoi(char *); int value(int, int); int isnum(char *); char *str[256]={ "nul", "soh", "stx", "etx", "eot", "enq", "ack", "bel", "bs ", "ht ", "nl ", "vt ", "ff ", "cr ", "so ", "si ", "dle", "dc1", "dc2", "dc3", "dc4", "nak", "syn", "etb", "can", "em ", "sub", "esc", "fs ", "gs ", "rs ", "us ", "sp ", " ! ", " \" ", " # ", " $ ", " % ", " & ", " ' ", " ( ", " ) ", " * ", " + ", " , ", " - ", " . ", " / ", " 0 ", " 1 ", " 2 ", " 3 ", " 4 ", " 5 ", " 6 ", " 7 ", " 8 ", " 9 ", " : ", " ; ", " < ", " = ", " > ", " ? ", " @ ", " A ", " B ", " C ", " D ", " E ", " F ", " G ", " H ", " I ", " J ", " K ", " L ", " M ", " N ", " O ", " P ", " Q ", " R ", " S ", " T ", " U ", " V ", " W ", " X ", " Y ", " Z ", " [ ", " \\ ", " ] ", " ^ ", " _ ", " ` ", " a ", " b ", " c ", " d ", " e ", " f ", " g ", " h ", " i ", " j ", " k ", " l ", " m ", " n ", " o ", " p ", " q ", " r ", " s ", " t ", " u ", " v ", " w ", " x ", " y ", " z ", " { ", " | ", " } ", " ~ ", "del", "x80", "x81", "x82", "x83", "x84", "x85", "x86", "x87", "x88", "x89", "x8a", "x8b", "x8c", "x8d", "x8e", "x8f", "x90", "x91", "x92", "x93", "x94", "x95", "x96", "x97", "x98", "x99", "x9a", "x9b", "x9c", "x9d", "x9e", "x9f", "xa0", " ¡ ", " ¢ ", " £ ", " ¤ ", " ¥ ", " ¦ ", " § ", " ¨ ", " © ", " ª ", " « ", " ¬ ", " ", " ® ", " ¯ ", " ° ", " ± ", " ² ", " ³ ", " ´ ", " µ ", " ¶ ", " · ", " ¸ ", " ¹ ", " º ", " » ", " ¼ ", " ½ ", " ¾ ", " ¿ ", " À ", " Á ", " Â ", " Ã ", " Ä ", " Å ", " Æ ", " Ç ", " È ", " É ", " Ê ", " Ë ", " Ì ", " Í ", " Î ", " Ï ", " Ð ", " Ñ ", " Ò ", " Ó ", " Ô ", " Õ ", " Ö ", " × ", " Ø ", " Ù ", " Ú ", " Û ", " Ü ", " Ý ", " Þ ", " ß ", " à ", " á ", " â ", " ã ", " ä ", " å ", " æ ", " ç ", " è ", " é ", " ê ", " ë ", " ì ", " í ", " î ", " ï ", " ð ", " ñ ", " ò ", " ó ", " ô ", " õ ", " ö ", " ÷ ", " ø ", " ù ", " ú ", " û ", " ü ", " ý ", " þ ", " ÿ " }; char Ncol[]={ 0,0,7,5,4,4,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2, }; int nchars=128; int base=16; int ncol; int text=1; int strip=0; Biobuf bin; void main(int argc, char **argv) { int i; Binit(&bin, 1, OWRITE); ARGBEGIN{ case '8': nchars=256; break; case 'x': base=16; break; case 'o': base=8; break; case 'd': base=10; break; case 'b': base=strtoul(EARGF(usage()), 0, 0); if(base<2||base>MAXBASE) usage(); break; case 'n': text=0; break; case 't': strip=1; /* fall through */ case 'c': text=2; break; default: usage(); }ARGEND ncol=Ncol[base]; if(argc==0){ for(i=0;i<nchars;i++){ put(i); if((i&7)==7) Bprint(&bin, "|\n"); } }else{ if(text==1) text=isnum(argv[0]); while(argc--) if(text) puttext(*argv++); else putnum(*argv++); } Bputc(&bin, '\n'); exits(0); } void usage(void) { fprint(2, "usage: %s [-8cnt] [-dox | -b n] [text]\n", argv0); exits("usage"); } void put(int i) { Bputc(&bin, '|'); putn(i, ncol); Bprint(&bin, " %s", str[i]); } char dig[]="0123456789abcdefghijklmnopqrstuvwxyz"; void putn(int n, int ndig) { if(ndig==0) return; putn(n/base, ndig-1); Bputc(&bin, dig[n%base]); } void puttext(char *s) { int n; n=btoi(s)&0377; if(strip) Bputc(&bin, n); else Bprint(&bin, "%s\n", str[n]); } void putnum(char *s) { while(*s){ putn(*s++&0377, ncol); Bputc(&bin, '\n'); } } int btoi(char *s) { int n; n=0; while(*s) n=n*base+value(*s++, 0); return(n); } int value(int c, int f) { char *s; for(s=dig; s<dig+base; s++) if(*s==c) return(s-dig); if(f) return(-1); fprint(2, "%s: bad input char %c\n", argv0, c); exits("bad"); return 0; /* to keep ken happy */ } int isnum(char *s) { while(*s) if(value(*s++, 1)==-1) return(0); return(1); }