FreeCalypso > hg > fc-sim-tools

comparison libutil/hexread.c @ 8:34bbb0585cab

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
libutil: import from previous fc-pcsc-tools version
author Mychaela Falconia <falcon@freecalypso.org>
date Sun, 14 Mar 2021 05:42:37 +0000
parents
children
comparison
equal deleted inserted replaced
7:b25d4dfe5798 8:34bbb0585cab
1 /*
2 * This module contains the function for reading hex files,
3 * to be used in the implementation of manual write commands.
4 */
5
6 #include <sys/types.h>
7 #include <ctype.h>
8 #include <stdio.h>
9 #include <stdlib.h>
10
11 extern FILE *open_script_input_file();
12
13 read_hex_data_file(filename, databuf, maxlen)
14 char *filename;
15 u_char *databuf;
16 unsigned maxlen;
17 {
18 FILE *inf;
19 unsigned count;
20 int c, c2;
21
22 inf = open_script_input_file(filename);
23 if (!inf) {
24 perror(filename);
25 return(-1);
26 }
27 for (count = 0; ; ) {
28 do
29 c = getc(inf);
30 while (isspace(c));
31 if (c < 0)
32 break;
33 if (c == '#') {
34 do
35 c = getc(inf);
36 while (c >= 0 && c != '\n');
37 continue;
38 }
39 if (!isxdigit(c)) {
40 inv_input: fprintf(stderr, "%s: invalid hex file input\n",
41 filename);
42 fclose(inf);
43 return(-1);
44 }
45 c2 = getc(inf);
46 if (!isxdigit(c2))
47 goto inv_input;
48 if (count >= maxlen) {
49 fprintf(stderr, "%s: hex input data is too long\n",
50 filename);
51 fclose(inf);
52 return(-1);
53 }
54 databuf[count++] = (decode_hex_digit(c) << 4) |
55 decode_hex_digit(c2);
56 }
57 fclose(inf);
58 if (!count) {
59 fprintf(stderr, "%s: no hex data input found\n", filename);
60 return(-1);
61 }
62 return(count);
63 }