![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to xsum0.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / f2c|
Return to xsum0.c CVS log | Up to [Research Unix] / researchv10no / cmd / f2c |
1.1 root 1: /****************************************************************
2: Copyright 1990 by AT&T Bell Laboratories and Bellcore.
3:
4: Permission to use, copy, modify, and distribute this software
5: and its documentation for any purpose and without fee is hereby
6: granted, provided that the above copyright notice appear in all
7: copies and that both that the copyright notice and this
8: permission notice and warranty disclaimer appear in supporting
9: documentation, and that the names of AT&T Bell Laboratories or
10: Bellcore or any of their entities not be used in advertising or
11: publicity pertaining to distribution of the software without
12: specific, written prior permission.
13:
14: AT&T and Bellcore disclaim all warranties with regard to this
15: software, including all implied warranties of merchantability
16: and fitness. In no event shall AT&T or Bellcore be liable for
17: any special, indirect or consequential damages or any damages
18: whatsoever resulting from loss of use, data or profits, whether
19: in an action of contract, negligence or other tortious action,
20: arising out of or in connection with the use or performance of
21: this software.
22: ****************************************************************/
23:
24: #include "stdio.h"
25:
26: char *progname;
27:
28: void
29: usage(rc)
30: {
31: fprintf(stderr, "usage: %s [file [file...]]\n", progname);
32: exit(rc);
33: }
34:
35: main(argc, argv)
36: char **argv;
37: {
38: int x;
39: char *s;
40: static int rc;
41:
42: progname = *argv;
43: s = *++argv;
44: if (s && *s == '-') {
45: switch(s[1]) {
46: case '?':
47: usage(0);
48: case '-':
49: break;
50: default:
51: fprintf(stderr, "invalid option %s\n", s);
52: usage(1);
53: }
54: s = *++argv;
55: }
56: if (s) do {
57: x = open(s,0);
58: if (x < 0) {
59: fprintf(stderr, "%s: can't open %s\n", progname, s);
60: rc |= 1;
61: }
62: else
63: process(s, x);
64: }
65: while(s = *++argv);
66: else {
67: process("/dev/stdin", fileno(stdin));
68: }
69: exit(rc);
70: }
71:
72: typedef unsigned char uchar;
73:
74: long
75: sum32(sum, x, n)
76: register long sum;
77: register uchar *x;
78: int n;
79: {
80: register uchar *xe;
81: static long crc_table[256] = {
82: 0x0, 0x9073096, 0x120e612c, 0x1b0951ba,
83: 0xff6dc419, 0xf66af48f, 0xed63a535, 0xe46495a3,
84: 0xfedb8832, 0xf7dcb8a4, 0xecd5e91e, 0xe5d2d988,
85: 0x1b64c2b, 0x8b17cbd, 0x13b82d07, 0x1abf1d91,
86: 0xfdb71064, 0xf4b020f2, 0xefb97148, 0xe6be41de,
87: 0x2dad47d, 0xbdde4eb, 0x10d4b551, 0x19d385c7,
88: 0x36c9856, 0xa6ba8c0, 0x1162f97a, 0x1865c9ec,
89: 0xfc015c4f, 0xf5066cd9, 0xee0f3d63, 0xe7080df5,
90: 0xfb6e20c8, 0xf269105e, 0xe96041e4, 0xe0677172,
91: 0x403e4d1, 0xd04d447, 0x160d85fd, 0x1f0ab56b,
92: 0x5b5a8fa, 0xcb2986c, 0x17bbc9d6, 0x1ebcf940,
93: 0xfad86ce3, 0xf3df5c75, 0xe8d60dcf, 0xe1d13d59,
94: 0x6d930ac, 0xfde003a, 0x14d75180, 0x1dd06116,
95: 0xf9b4f4b5, 0xf0b3c423, 0xebba9599, 0xe2bda50f,
96: 0xf802b89e, 0xf1058808, 0xea0cd9b2, 0xe30be924,
97: 0x76f7c87, 0xe684c11, 0x15611dab, 0x1c662d3d,
98: 0xf6dc4190, 0xffdb7106, 0xe4d220bc, 0xedd5102a,
99: 0x9b18589, 0xb6b51f, 0x1bbfe4a5, 0x12b8d433,
100: 0x807c9a2, 0x100f934, 0x1a09a88e, 0x130e9818,
101: 0xf76a0dbb, 0xfe6d3d2d, 0xe5646c97, 0xec635c01,
102: 0xb6b51f4, 0x26c6162, 0x196530d8, 0x1062004e,
103: 0xf40695ed, 0xfd01a57b, 0xe608f4c1, 0xef0fc457,
104: 0xf5b0d9c6, 0xfcb7e950, 0xe7beb8ea, 0xeeb9887c,
105: 0xadd1ddf, 0x3da2d49, 0x18d37cf3, 0x11d44c65,
106: 0xdb26158, 0x4b551ce, 0x1fbc0074, 0x16bb30e2,
107: 0xf2dfa541, 0xfbd895d7, 0xe0d1c46d, 0xe9d6f4fb,
108: 0xf369e96a, 0xfa6ed9fc, 0xe1678846, 0xe860b8d0,
109: 0xc042d73, 0x5031de5, 0x1e0a4c5f, 0x170d7cc9,
110: 0xf005713c, 0xf90241aa, 0xe20b1010, 0xeb0c2086,
111: 0xf68b525, 0x66f85b3, 0x1d66d409, 0x1461e49f,
112: 0xedef90e, 0x7d9c998, 0x1cd09822, 0x15d7a8b4,
113: 0xf1b33d17, 0xf8b40d81, 0xe3bd5c3b, 0xeaba6cad,
114: 0xedb88320, 0xe4bfb3b6, 0xffb6e20c, 0xf6b1d29a,
115: 0x12d54739, 0x1bd277af, 0xdb2615, 0x9dc1683,
116: 0x13630b12, 0x1a643b84, 0x16d6a3e, 0x86a5aa8,
117: 0xec0ecf0b, 0xe509ff9d, 0xfe00ae27, 0xf7079eb1,
118: 0x100f9344, 0x1908a3d2, 0x201f268, 0xb06c2fe,
119: 0xef62575d, 0xe66567cb, 0xfd6c3671, 0xf46b06e7,
120: 0xeed41b76, 0xe7d32be0, 0xfcda7a5a, 0xf5dd4acc,
121: 0x11b9df6f, 0x18beeff9, 0x3b7be43, 0xab08ed5,
122: 0x16d6a3e8, 0x1fd1937e, 0x4d8c2c4, 0xddff252,
123: 0xe9bb67f1, 0xe0bc5767, 0xfbb506dd, 0xf2b2364b,
124: 0xe80d2bda, 0xe10a1b4c, 0xfa034af6, 0xf3047a60,
125: 0x1760efc3, 0x1e67df55, 0x56e8eef, 0xc69be79,
126: 0xeb61b38c, 0xe266831a, 0xf96fd2a0, 0xf068e236,
127: 0x140c7795, 0x1d0b4703, 0x60216b9, 0xf05262f,
128: 0x15ba3bbe, 0x1cbd0b28, 0x7b45a92, 0xeb36a04,
129: 0xead7ffa7, 0xe3d0cf31, 0xf8d99e8b, 0xf1deae1d,
130: 0x1b64c2b0, 0x1263f226, 0x96aa39c, 0x6d930a,
131: 0xe40906a9, 0xed0e363f, 0xf6076785, 0xff005713,
132: 0xe5bf4a82, 0xecb87a14, 0xf7b12bae, 0xfeb61b38,
133: 0x1ad28e9b, 0x13d5be0d, 0x8dcefb7, 0x1dbdf21,
134: 0xe6d3d2d4, 0xefd4e242, 0xf4ddb3f8, 0xfdda836e,
135: 0x19be16cd, 0x10b9265b, 0xbb077e1, 0x2b74777,
136: 0x18085ae6, 0x110f6a70, 0xa063bca, 0x3010b5c,
137: 0xe7659eff, 0xee62ae69, 0xf56bffd3, 0xfc6ccf45,
138: 0xe00ae278, 0xe90dd2ee, 0xf2048354, 0xfb03b3c2,
139: 0x1f672661, 0x166016f7, 0xd69474d, 0x46e77db,
140: 0x1ed16a4a, 0x17d65adc, 0xcdf0b66, 0x5d83bf0,
141: 0xe1bcae53, 0xe8bb9ec5, 0xf3b2cf7f, 0xfab5ffe9,
142: 0x1dbdf21c, 0x14bac28a, 0xfb39330, 0x6b4a3a6,
143: 0xe2d03605, 0xebd70693, 0xf0de5729, 0xf9d967bf,
144: 0xe3667a2e, 0xea614ab8, 0xf1681b02, 0xf86f2b94,
145: 0x1c0bbe37, 0x150c8ea1, 0xe05df1b, 0x702ef8d
146: };
147:
148: xe = x + n;
149: while(x < xe)
150: sum = crc_table[(sum ^ *x++) & 0xff] ^ (sum >> 8 & 0xffffff);
151: return sum;
152: }
153:
154: process(s, x)
155: char *s;
156: int x;
157: {
158: register int n;
159: uchar buf[16*1024];
160: long fsize, sum;
161:
162: sum = 0;
163: fsize = 0;
164: while((n = read(x, (char *)buf, sizeof(buf))) > 0) {
165: fsize += n;
166: sum = sum32(sum, buf, n);
167: }
168: sum &= 0xffffffff;
169: if (n==0)
170: printf("%s\t%lx\t%ld\n", s, sum & 0xffffffff, fsize);
171: else { perror(s); }
172: close(x);
173: return(0);
174: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.