FreeCalypso > hg > fc-sim-tools

comparison simtool/restorebin.c @ 10:ddd767f6e15b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fc-simtool ported over
author Mychaela Falconia <falcon@freecalypso.org>
date Sun, 14 Mar 2021 07:11:25 +0000
parents
children
comparison
equal deleted inserted replaced
9:c9ef9e91dd8e 10:ddd767f6e15b
1 /*
2 * This module implements the restore-file command; this command
3 * reads binary files previously saved with the savebin command
4 * and writes the backed-up bits back to the SIM.
5 */
6
7 #include <sys/types.h>
8 #include <sys/file.h>
9 #include <sys/stat.h>
10 #include <ctype.h>
11 #include <stdio.h>
12 #include <stdlib.h>
13 #include <unistd.h>
14 #include "curfile.h"
15
16 restore_bin_transparent(data)
17 u_char *data;
18 {
19 unsigned off, cc;
20 int rc;
21
22 for (off = 0; off < curfile_total_size; off += cc) {
23 cc = curfile_total_size - off;
24 if (cc > 255)
25 cc = 255;
26 rc = update_bin_op(off, data + off, cc);
27 if (rc < 0)
28 return(rc);
29 }
30 return(0);
31 }
32
33 restore_bin_records(data)
34 u_char *data;
35 {
36 unsigned recno;
37 u_char *dp;
38 int rc;
39
40 dp = data;
41 for (recno = 1; recno <= curfile_record_count; recno++) {
42 rc = update_rec_op(recno, 0x04, dp, curfile_record_len);
43 if (rc < 0)
44 return(rc);
45 dp += curfile_record_len;
46 }
47 return(0);
48 }
49
50 restore_bin_cyclic(data)
51 u_char *data;
52 {
53 unsigned count;
54 u_char *dp;
55 int rc;
56
57 dp = data + curfile_total_size;
58 for (count = 0; count < curfile_record_count; count++) {
59 dp -= curfile_record_len;
60 rc = update_rec_op(0, 0x03, dp, curfile_record_len);
61 if (rc < 0)
62 return(rc);
63 }
64 return(0);
65 }
66
67 cmd_restore_file(argc, argv)
68 char **argv;
69 {
70 int file_id, rc, fd;
71 struct stat st;
72 u_char *databuf;
73
74 if (isxdigit(argv[1][0]) && isxdigit(argv[1][1]) &&
75 isxdigit(argv[1][2]) && isxdigit(argv[1][3]) && !argv[1][4])
76 file_id = strtoul(argv[1], 0, 16);
77 else
78 file_id = find_symbolic_file_name(argv[1]);
79 if (file_id < 0) {
80 fprintf(stderr,
81 "error: file ID argument is not a hex value or a recognized symbolic name\n");
82 return(-1);
83 }
84 rc = select_op(file_id);
85 if (rc < 0)
86 return(rc);
87 rc = parse_ef_select_response();
88 if (rc < 0)
89 return(rc);
90 if (!curfile_total_size) {
91 printf("SIM indicates file of zero length, nothing to do\n");
92 return(0);
93 }
94 fd = open(argv[2], O_RDONLY);
95 if (fd < 0) {
96 perror(argv[2]);
97 return(-1);
98 }
99 fstat(fd, &st);
100 if ((st.st_mode & S_IFMT) != S_IFREG) {
101 fprintf(stderr, "error: %s is not a regular file\n", argv[2]);
102 close(fd);
103 return(-1);
104 }
105 if (st.st_size != curfile_total_size) {
106 fprintf(stderr,
107 "error: length of %s does not match SIM EF length of %u bytes\n",
108 argv[2], curfile_total_size);
109 close(fd);
110 return(-1);
111 }
112 databuf = malloc(curfile_total_size);
113 if (!databuf) {
114 perror("malloc for file data");
115 close(fd);
116 return(-1);
117 }
118 read(fd, databuf, curfile_total_size);
119 close(fd);
120 switch (curfile_structure) {
121 case 0x00:
122 /* transparent */
123 rc = restore_bin_transparent(databuf);
124 break;
125 case 0x01:
126 /* record-based */
127 rc = restore_bin_records(databuf);
128 break;
129 case 0x03:
130 /* cyclic */
131 rc = restore_bin_cyclic(databuf);
132 break;
133 }
134 free(databuf);
135 return(rc);
136 }