3 * Handle cpio payloads within rpm packages.
5 * \warning FIXME: We don't translate between cpio and system mode bits! These
6 * should both be the same, but really odd things are going to happen if
18 /*@-exportheadervar@*/
19 extern int _fsm_debug;
20 /*@=exportheadervar@*/
23 * Convert string to unsigned integer (with buffer size check).
25 * @retval address of 1st character not processed
26 * @param base numerical conversion base
27 * @param num max no. of bytes to read
28 * @return converted integer
30 static int strntoul(const char *str, /*@out@*/char **endptr, int base, int num)
31 /*@modifies *endptr @*/
36 buf = alloca(num + 1);
37 strncpy(buf, str, num);
40 ret = strtoul(buf, &end, base);
42 *endptr = ((char *)str) + (end - buf); /* XXX discards const */
44 *endptr = ((char *)str) + strlen(buf);
49 #define GET_NUM_FIELD(phys, log) \
50 log = strntoul(phys, &end, 16, sizeof(phys)); \
51 if ( (end - phys) != sizeof(phys) ) return CPIOERR_BAD_HEADER;
52 #define SET_NUM_FIELD(phys, val, space) \
53 sprintf(space, "%8.8lx", (unsigned long) (val)); \
54 memcpy(phys, space, 8);
56 int cpioTrailerWrite(FSM_t fsm)
58 struct cpioCrcPhysicalHeader * hdr =
59 (struct cpioCrcPhysicalHeader *)fsm->rdbuf;
62 memset(hdr, '0', PHYS_HDR_SIZE);
63 memcpy(hdr->magic, CPIO_NEWC_MAGIC, sizeof(hdr->magic));
64 memcpy(hdr->nlink, "00000001", 8);
65 memcpy(hdr->namesize, "0000000b", 8);
66 memcpy(fsm->rdbuf + PHYS_HDR_SIZE, CPIO_TRAILER, sizeof(CPIO_TRAILER));
68 /* XXX DWRITE uses rdnb for I/O length. */
69 fsm->rdnb = PHYS_HDR_SIZE + sizeof(CPIO_TRAILER);
70 rc = fsmStage(fsm, FSM_DWRITE);
73 * GNU cpio pads to 512 bytes here, but we don't. This may matter for
74 * tape device(s) and/or concatenated cpio archives. <shrug>
77 rc = fsmStage(fsm, FSM_PAD);
82 int cpioHeaderWrite(FSM_t fsm, struct stat * st)
84 struct cpioCrcPhysicalHeader * hdr = (struct cpioCrcPhysicalHeader *)fsm->rdbuf;
90 memcpy(hdr->magic, CPIO_NEWC_MAGIC, sizeof(hdr->magic));
91 SET_NUM_FIELD(hdr->inode, st->st_ino, field);
92 SET_NUM_FIELD(hdr->mode, st->st_mode, field);
93 SET_NUM_FIELD(hdr->uid, st->st_uid, field);
94 SET_NUM_FIELD(hdr->gid, st->st_gid, field);
95 SET_NUM_FIELD(hdr->nlink, st->st_nlink, field);
96 SET_NUM_FIELD(hdr->mtime, st->st_mtime, field);
97 SET_NUM_FIELD(hdr->filesize, st->st_size, field);
99 dev = major((unsigned)st->st_dev); SET_NUM_FIELD(hdr->devMajor, dev, field);
100 dev = minor((unsigned)st->st_dev); SET_NUM_FIELD(hdr->devMinor, dev, field);
101 dev = major((unsigned)st->st_rdev); SET_NUM_FIELD(hdr->rdevMajor, dev, field);
102 dev = minor((unsigned)st->st_rdev); SET_NUM_FIELD(hdr->rdevMinor, dev, field);
104 len = strlen(fsm->path) + 1; SET_NUM_FIELD(hdr->namesize, len, field);
105 memcpy(hdr->checksum, "00000000", 8);
106 memcpy(fsm->rdbuf + PHYS_HDR_SIZE, fsm->path, len);
108 /* XXX DWRITE uses rdnb for I/O length. */
109 fsm->rdnb = PHYS_HDR_SIZE + len;
110 rc = fsmStage(fsm, FSM_DWRITE);
111 if (!rc && fsm->rdnb != fsm->wrnb)
112 rc = CPIOERR_WRITE_FAILED;
114 rc = fsmStage(fsm, FSM_PAD);
118 int cpioHeaderRead(FSM_t fsm, struct stat * st)
119 /*@modifies fsm, *st @*/
121 struct cpioCrcPhysicalHeader hdr;
127 fsm->wrlen = PHYS_HDR_SIZE;
128 rc = fsmStage(fsm, FSM_DREAD);
129 if (!rc && fsm->rdnb != fsm->wrlen)
130 rc = CPIOERR_READ_FAILED;
132 memcpy(&hdr, fsm->wrbuf, fsm->rdnb);
134 if (strncmp(CPIO_CRC_MAGIC, hdr.magic, sizeof(CPIO_CRC_MAGIC)-1) &&
135 strncmp(CPIO_NEWC_MAGIC, hdr.magic, sizeof(CPIO_NEWC_MAGIC)-1))
136 return CPIOERR_BAD_MAGIC;
138 GET_NUM_FIELD(hdr.inode, st->st_ino);
139 GET_NUM_FIELD(hdr.mode, st->st_mode);
140 GET_NUM_FIELD(hdr.uid, st->st_uid);
141 GET_NUM_FIELD(hdr.gid, st->st_gid);
142 GET_NUM_FIELD(hdr.nlink, st->st_nlink);
143 GET_NUM_FIELD(hdr.mtime, st->st_mtime);
144 GET_NUM_FIELD(hdr.filesize, st->st_size);
146 GET_NUM_FIELD(hdr.devMajor, major);
147 GET_NUM_FIELD(hdr.devMinor, minor);
148 st->st_dev = /*@-shiftsigned@*/ makedev(major, minor) /*@=shiftsigned@*/ ;
150 GET_NUM_FIELD(hdr.rdevMajor, major);
151 GET_NUM_FIELD(hdr.rdevMinor, minor);
152 st->st_rdev = /*@-shiftsigned@*/ makedev(major, minor) /*@=shiftsigned@*/ ;
154 GET_NUM_FIELD(hdr.namesize, nameSize);
155 if (nameSize >= fsm->wrsize)
156 return CPIOERR_BAD_HEADER;
158 { char * t = xmalloc(nameSize + 1);
159 fsm->wrlen = nameSize;
160 rc = fsmStage(fsm, FSM_DREAD);
161 if (!rc && fsm->rdnb != fsm->wrlen)
162 rc = CPIOERR_BAD_HEADER;
168 memcpy(t, fsm->wrbuf, fsm->rdnb);
176 const char *const cpioStrerror(int rc)
178 static char msg[256];
180 int l, myerrno = errno;
182 strcpy(msg, "cpio: ");
185 s = msg + strlen(msg);
186 sprintf(s, _("(error 0x%x)"), (unsigned)rc);
189 case CPIOERR_BAD_MAGIC: s = _("Bad magic"); break;
190 case CPIOERR_BAD_HEADER: s = _("Bad/unreadable header");break;
192 case CPIOERR_OPEN_FAILED: s = "open"; break;
193 case CPIOERR_CHMOD_FAILED: s = "chmod"; break;
194 case CPIOERR_CHOWN_FAILED: s = "chown"; break;
195 case CPIOERR_WRITE_FAILED: s = "write"; break;
196 case CPIOERR_UTIME_FAILED: s = "utime"; break;
197 case CPIOERR_UNLINK_FAILED: s = "unlink"; break;
198 case CPIOERR_RENAME_FAILED: s = "rename"; break;
199 case CPIOERR_SYMLINK_FAILED: s = "symlink"; break;
200 case CPIOERR_STAT_FAILED: s = "stat"; break;
201 case CPIOERR_LSTAT_FAILED: s = "lstat"; break;
202 case CPIOERR_MKDIR_FAILED: s = "mkdir"; break;
203 case CPIOERR_RMDIR_FAILED: s = "rmdir"; break;
204 case CPIOERR_MKNOD_FAILED: s = "mknod"; break;
205 case CPIOERR_MKFIFO_FAILED: s = "mkfifo"; break;
206 case CPIOERR_LINK_FAILED: s = "link"; break;
207 case CPIOERR_READLINK_FAILED: s = "readlink"; break;
208 case CPIOERR_READ_FAILED: s = "read"; break;
209 case CPIOERR_COPY_FAILED: s = "copy"; break;
211 case CPIOERR_HDR_SIZE: s = _("Header size too big"); break;
212 case CPIOERR_UNKNOWN_FILETYPE: s = _("Unknown file type"); break;
213 case CPIOERR_MISSING_HARDLINK: s = _("Missing hard link(s)"); break;
214 case CPIOERR_MD5SUM_MISMATCH: s = _("MD5 sum mismatch"); break;
215 case CPIOERR_INTERNAL: s = _("Internal error"); break;
216 case CPIOERR_UNMAPPED_FILE: s = _("Archive file not in header"); break;
219 l = sizeof(msg) - strlen(msg) - 1;
221 if (l > 0) strncat(msg, s, l);
224 if ((rc & CPIOERR_CHECK_ERRNO) && myerrno) {
226 if (l > 0) strncat(msg, s, l);
228 if (l > 0) strncat(msg, strerror(myerrno), l);