source: liacs/alg/solitaire/crc/Tst_crc.c@ 200

Last change on this file since 200 was 2, checked in by Rick van der Zwet, 15 years ago

Initial import of data of old repository ('data') worth keeping (e.g. tracking
means of URL access statistics)
  • Property svn:executable set to *
File size: 9.6 KB
Line 
1#include <stdio.h>
2#include <stdlib.h>
3#include <string.h>
4
5#include "lib_crc.h"
6
7
8
9 /*******************************************************************\
10 * *
11 * Library : lib_crc *
12 * File : tst_crc.c *
13 * Author : Lammert Bies 1999-2005 *
14 * E-mail : info@lammertbies.nl *
15 * Language : ANSI C *
16 * *
17 * *
18 * Description *
19 * =========== *
20 * *
21 * The file tst_crc.c contains a small sample program which *
22 * demonstrates the use of the functions for calculating the *
23 * CRC-CCITT, CRC-16 and CRC-32 values of data. The file cal- *
24 * culates the three different CRC's for a file who's name is *
25 * either provided at the command line, or typed in right *
26 * after the program has started. *
27 * *
28 * *
29 * Dependencies *
30 * ============ *
31 * *
32 * lib_crc.h CRC definitions and prototypes *
33 * lib_crc.c CRC routines *
34 * *
35 * *
36 * Modification history *
37 * ==================== *
38 * *
39 * Date Version Comment *
40 * *
41 * 2005-02-14 1.12 Added CRC-CCITT with initial value 0. *
42 * *
43 * 2005-02-05 1.11 Fixed post processing bug in CRC-DNP. *
44 * *
45 * 2005-02-04 1.10 Added the CRC calculation for DNP 3.0, *
46 * a protocol used in the communication *
47 * between remote units and masters in the *
48 * electric utility industry. The method *
49 * of calculation is the same as CRC-16, *
50 * but with a different polynomial. *
51 * *
52 * 2005-01-07 1.02 Changed way program is used. When a *
53 * commandline parameter is present, the *
54 * program assumes it is a file, but when *
55 * invoked without a parameter the entered *
56 * string is used to calculate the CRC. *
57 * *
58 * CRC's are now printed in hexadecimal *
59 * decimal format. *
60 * *
61 * Let CRC-CCITT calculation start with *
62 * 0xffff as this is used in most imple- *
63 * mentations. *
64 * *
65 * 1999-02-21 1.01 none *
66 * *
67 * 1999-01-22 1.00 Initial source *
68 * *
69 \*******************************************************************/
70
71#define MAX_STRING_SIZE 2048
72
73
74
75int main( int argc, char *argv[] ) {
76
77 char input_string[MAX_STRING_SIZE];
78 char *ptr, *dest, hex_val;
79 unsigned short crc_16, crc_ccitt_ffff, crc_ccitt_0000, crc_dnp, low_byte, high_byte;
80 unsigned long crc_32;
81 int a, ch, do_ascii, do_hex;
82 FILE *fp;
83
84 do_ascii = FALSE;
85 do_hex = FALSE;
86
87 printf( "\nCRC algorithm sample program\nLammert Bies, Version " CRC_VERSION "\n\n" );
88
89 if ( argc < 2 ) {
90
91 printf( "Usage: tst_crc [-a|-x] file1 ...\n\n" );
92 printf( " -a Program asks for ASCII input. Following parameters ignored.\n" );
93 printf( " -x Program asks for hexadecimal input. Following parameters ignored.\n" );
94 printf( " All other parameters are treated like filenames. The CRC values\n" );
95 printf( " for each separate file will be calculated.\n" );
96
97 exit( 0 );
98 }
99
100 if ( ! strcmp( argv[1], "-a" ) || ! strcmp( argv[1], "-A" ) ) do_ascii = TRUE;
101 if ( ! strcmp( argv[1], "-x" ) || ! strcmp( argv[1], "-X" ) ) do_hex = TRUE;
102
103 if ( do_ascii || do_hex ) {
104
105 printf( "Input: " );
106 fgets( input_string, MAX_STRING_SIZE-1, stdin );
107 }
108
109 if ( do_ascii ) {
110
111 ptr = input_string;
112 while ( *ptr && *ptr != '\r' && *ptr != '\n' ) ptr++;
113 *ptr = 0;
114 }
115
116 if ( do_hex ) {
117
118 ptr = input_string;
119 dest = input_string;
120
121 while( *ptr && *ptr != '\r' && *ptr != '\n' ) {
122
123 if ( *ptr >= '0' && *ptr <= '9' ) *dest++ = (char) ( (*ptr) - '0' );
124 if ( *ptr >= 'A' && *ptr <= 'F' ) *dest++ = (char) ( (*ptr) - 'A' + 10 );
125 if ( *ptr >= 'a' && *ptr <= 'f' ) *dest++ = (char) ( (*ptr) - 'a' + 10 );
126
127 ptr++;
128 }
129
130 * dest = '\x80';
131 *(dest+1) = '\x80';
132 }
133
134
135
136 a = 1;
137
138 do {
139
140 crc_16 = 0;
141 crc_dnp = 0;
142 crc_ccitt_0000 = 0;
143 crc_ccitt_ffff = 0xffff;
144 crc_32 = 0xffffffffL;
145
146
147
148 if ( do_ascii ) {
149
150 ptr = input_string;
151
152 while ( *ptr ) {
153
154 crc_16 = update_crc_16( crc_16, *ptr );
155 crc_dnp = update_crc_dnp( crc_dnp, *ptr );
156 crc_ccitt_0000 = update_crc_ccitt( crc_ccitt_0000, *ptr );
157 crc_ccitt_ffff = update_crc_ccitt( crc_ccitt_ffff, *ptr );
158 crc_32 = update_crc_32( crc_32, *ptr );
159
160 ptr++;
161 }
162 }
163
164
165
166 else if ( do_hex ) {
167
168 ptr = input_string;
169
170 while ( *ptr != '\x80' ) {
171
172 hex_val = (char) ( ( * ptr & '\x0f' ) << 4 );
173 hex_val |= (char) ( ( *(ptr+1) & '\x0f' ) );
174
175 crc_16 = update_crc_16( crc_16, hex_val );
176 crc_dnp = update_crc_dnp( crc_dnp, hex_val );
177 crc_ccitt_0000 = update_crc_ccitt( crc_ccitt_0000, hex_val );
178 crc_ccitt_ffff = update_crc_ccitt( crc_ccitt_ffff, hex_val );
179 crc_32 = update_crc_32( crc_32, hex_val );
180
181 ptr += 2;
182 }
183
184 input_string[0] = 0;
185 }
186
187
188
189 else {
190
191 fp = fopen( argv[a], "rb" );
192
193 if ( fp != NULL ) {
194
195 while( ( ch=fgetc( fp ) ) != EOF ) {
196
197 crc_16 = update_crc_16( crc_16, (char) ch );
198 crc_dnp = update_crc_dnp( crc_dnp, (char) ch );
199 crc_ccitt_0000 = update_crc_ccitt( crc_ccitt_0000, (char) ch );
200 crc_ccitt_ffff = update_crc_ccitt( crc_ccitt_ffff, (char) ch );
201 crc_32 = update_crc_32( crc_32, (char) ch );
202 }
203
204 fclose( fp );
205 }
206
207 else printf( "%s : cannot open file\n", argv[a] );
208 }
209
210
211
212 crc_32 ^= 0xffffffffL;
213
214 crc_dnp = ~crc_dnp;
215 low_byte = (crc_dnp & 0xff00) >> 8;
216 high_byte = (crc_dnp & 0x00ff) << 8;
217 crc_dnp = low_byte | high_byte;
218
219
220 printf( "%s%s%s :\nCRC16 = 0x%04X / %u\n"
221 "CRC-CCITT (0x0000) = 0x%04X / %u\n"
222 "CRC-CCITT (0xffff) = 0x%04X / %u\n"
223 "CRC-DNP = 0x%04X / %u\n"
224 "CRC32 = 0x%08lX / %lu\n"
225 , ( do_ascii || do_hex ) ? "\"" : ""
226 , ( ! do_ascii && ! do_hex ) ? argv[a] : input_string
227 , ( do_ascii || do_hex ) ? "\"" : ""
228 , crc_16, crc_16
229 , crc_ccitt_0000, crc_ccitt_0000
230 , crc_ccitt_ffff, crc_ccitt_ffff
231 , crc_dnp, crc_dnp
232 , crc_32, crc_32 );
233
234 a++;
235
236 } while ( a < argc );
237
238} /* main (tst_crc.c) */
Note: See TracBrowser for help on using the repository browser.