lib/cpio.c Source File

00001 
00010 #include "system.h"
00011 #include <rpmlib.h>
00012 
00013 #include "fsm.h"
00014 #include "rpmerr.h"
00015 #include "debug.h"
00016 
00017 /*@access FSM_t @*/
00018 
00019 extern int _fsm_debug;
00020 
00026 static /*@null@*/ void * _free(/*@only@*/ /*@null@*/ const void * this) {
00027     if (this)   free((void *)this);
00028     return NULL;
00029 }
00030 
00039 static int strntoul(const char *str, /*@out@*/char **endptr, int base, int num)
00040         /*@modifies *endptr @*/
00041 {
00042     char * buf, * end;
00043     unsigned long ret;
00044 
00045     buf = alloca(num + 1);
00046     strncpy(buf, str, num);
00047     buf[num] = '\0';
00048 
00049     ret = strtoul(buf, &end, base);
00050     if (*end)
00051         *endptr = ((char *)str) + (end - buf);  /* XXX discards const */
00052     else
00053         *endptr = ((char *)str) + strlen(buf);
00054 
00055     return ret;
00056 }
00057 
00058 #define GET_NUM_FIELD(phys, log) \
00059         log = strntoul(phys, &end, 16, sizeof(phys)); \
00060         if ( (end - phys) != sizeof(phys) ) return CPIOERR_BAD_HEADER;
00061 #define SET_NUM_FIELD(phys, val, space) \
00062         sprintf(space, "%8.8lx", (unsigned long) (val)); \
00063         memcpy(phys, space, 8);
00064 
00065 int cpioTrailerWrite(FSM_t fsm)
00066 {
00067     struct cpioCrcPhysicalHeader * hdr =
00068         (struct cpioCrcPhysicalHeader *)fsm->rdbuf;
00069     int rc;
00070 
00071     memset(hdr, '0', PHYS_HDR_SIZE);
00072     memcpy(hdr->magic, CPIO_NEWC_MAGIC, sizeof(hdr->magic));
00073     memcpy(hdr->nlink, "00000001", 8);
00074     memcpy(hdr->namesize, "0000000b", 8);
00075     memcpy(fsm->rdbuf + PHYS_HDR_SIZE, CPIO_TRAILER, sizeof(CPIO_TRAILER));
00076 
00077     /* XXX DWRITE uses rdnb for I/O length. */
00078     fsm->rdnb = PHYS_HDR_SIZE + sizeof(CPIO_TRAILER);
00079     rc = fsmStage(fsm, FSM_DWRITE);
00080 
00081     /*
00082      * GNU cpio pads to 512 bytes here, but we don't. This may matter for
00083      * tape device(s) and/or concatenated cpio archives. <shrug>
00084      */
00085     if (!rc)
00086         rc = fsmStage(fsm, FSM_PAD);
00087 
00088     return rc;
00089 }
00090 
00091 int cpioHeaderWrite(FSM_t fsm, struct stat * st)
00092 {
00093     struct cpioCrcPhysicalHeader * hdr = (struct cpioCrcPhysicalHeader *)fsm->rdbuf;
00094     char field[64];
00095     size_t len;
00096     dev_t dev;
00097     int rc = 0;
00098 
00099     memcpy(hdr->magic, CPIO_NEWC_MAGIC, sizeof(hdr->magic));
00100     SET_NUM_FIELD(hdr->inode, st->st_ino, field);
00101     SET_NUM_FIELD(hdr->mode, st->st_mode, field);
00102     SET_NUM_FIELD(hdr->uid, st->st_uid, field);
00103     SET_NUM_FIELD(hdr->gid, st->st_gid, field);
00104     SET_NUM_FIELD(hdr->nlink, st->st_nlink, field);
00105     SET_NUM_FIELD(hdr->mtime, st->st_mtime, field);
00106     SET_NUM_FIELD(hdr->filesize, st->st_size, field);
00107 
00108     dev = major((unsigned)st->st_dev); SET_NUM_FIELD(hdr->devMajor, dev, field);
00109     dev = minor((unsigned)st->st_dev); SET_NUM_FIELD(hdr->devMinor, dev, field);
00110     dev = major((unsigned)st->st_rdev); SET_NUM_FIELD(hdr->rdevMajor, dev, field);
00111     dev = minor((unsigned)st->st_rdev); SET_NUM_FIELD(hdr->rdevMinor, dev, field);
00112 
00113     len = strlen(fsm->path) + 1; SET_NUM_FIELD(hdr->namesize, len, field);
00114     memcpy(hdr->checksum, "00000000", 8);
00115     memcpy(fsm->rdbuf + PHYS_HDR_SIZE, fsm->path, len);
00116 
00117     /* XXX DWRITE uses rdnb for I/O length. */
00118     fsm->rdnb = PHYS_HDR_SIZE + len;
00119     rc = fsmStage(fsm, FSM_DWRITE);
00120     if (!rc && fsm->rdnb != fsm->wrnb)
00121         rc = CPIOERR_WRITE_FAILED;
00122     if (!rc)
00123         rc = fsmStage(fsm, FSM_PAD);
00124     return rc;
00125 }
00126 
00127 int cpioHeaderRead(FSM_t fsm, struct stat * st)
00128         /*@modifies fsm, *st @*/
00129 {
00130     struct cpioCrcPhysicalHeader hdr;
00131     int nameSize;
00132     char * end;
00133     int major, minor;
00134     int rc = 0;
00135 
00136     fsm->wrlen = PHYS_HDR_SIZE;
00137     rc = fsmStage(fsm, FSM_DREAD);
00138     if (!rc && fsm->rdnb != fsm->wrlen)
00139         rc = CPIOERR_READ_FAILED;
00140     if (rc) return rc;
00141     memcpy(&hdr, fsm->wrbuf, fsm->rdnb);
00142 
00143     if (strncmp(CPIO_CRC_MAGIC, hdr.magic, sizeof(CPIO_CRC_MAGIC)-1) &&
00144         strncmp(CPIO_NEWC_MAGIC, hdr.magic, sizeof(CPIO_NEWC_MAGIC)-1))
00145         return CPIOERR_BAD_MAGIC;
00146 
00147     GET_NUM_FIELD(hdr.inode, st->st_ino);
00148     GET_NUM_FIELD(hdr.mode, st->st_mode);
00149     GET_NUM_FIELD(hdr.uid, st->st_uid);
00150     GET_NUM_FIELD(hdr.gid, st->st_gid);
00151     GET_NUM_FIELD(hdr.nlink, st->st_nlink);
00152     GET_NUM_FIELD(hdr.mtime, st->st_mtime);
00153     GET_NUM_FIELD(hdr.filesize, st->st_size);
00154 
00155     GET_NUM_FIELD(hdr.devMajor, major);
00156     GET_NUM_FIELD(hdr.devMinor, minor);
00157     st->st_dev = /*@-shiftsigned@*/ makedev(major, minor) /*@=shiftsigned@*/ ;
00158 
00159     GET_NUM_FIELD(hdr.rdevMajor, major);
00160     GET_NUM_FIELD(hdr.rdevMinor, minor);
00161     st->st_rdev = /*@-shiftsigned@*/ makedev(major, minor) /*@=shiftsigned@*/ ;
00162 
00163     GET_NUM_FIELD(hdr.namesize, nameSize);
00164     if (nameSize >= fsm->wrsize)
00165         return CPIOERR_BAD_HEADER;
00166 
00167     {   char * t = xmalloc(nameSize + 1);
00168         fsm->wrlen = nameSize;
00169         rc = fsmStage(fsm, FSM_DREAD);
00170         if (!rc && fsm->rdnb != fsm->wrlen)
00171             rc = CPIOERR_BAD_HEADER;
00172         if (rc) {
00173             t = _free(t);
00174             fsm->path = NULL;
00175             return rc;
00176         }
00177         memcpy(t, fsm->wrbuf, fsm->rdnb);
00178         t[nameSize] = '\0';
00179         fsm->path = t;
00180     }
00181 
00182     return 0;
00183 }
00184 
00185 const char *const cpioStrerror(int rc)
00186 {
00187     static char msg[256];
00188     char *s;
00189     int l, myerrno = errno;
00190 
00191     strcpy(msg, "cpio: ");
00192     switch (rc) {
00193     default:
00194         s = msg + strlen(msg);
00195         sprintf(s, _("(error 0x%x)"), (unsigned)rc);
00196         s = NULL;
00197         break;
00198     case CPIOERR_BAD_MAGIC:     s = _("Bad magic");             break;
00199     case CPIOERR_BAD_HEADER:    s = _("Bad/unreadable  header");break;
00200 
00201     case CPIOERR_OPEN_FAILED:   s = "open";     break;
00202     case CPIOERR_CHMOD_FAILED:  s = "chmod";    break;
00203     case CPIOERR_CHOWN_FAILED:  s = "chown";    break;
00204     case CPIOERR_WRITE_FAILED:  s = "write";    break;
00205     case CPIOERR_UTIME_FAILED:  s = "utime";    break;
00206     case CPIOERR_UNLINK_FAILED: s = "unlink";   break;
00207     case CPIOERR_RENAME_FAILED: s = "rename";   break;
00208     case CPIOERR_SYMLINK_FAILED: s = "symlink"; break;
00209     case CPIOERR_STAT_FAILED:   s = "stat";     break;
00210     case CPIOERR_LSTAT_FAILED:  s = "lstat";    break;
00211     case CPIOERR_MKDIR_FAILED:  s = "mkdir";    break;
00212     case CPIOERR_RMDIR_FAILED:  s = "rmdir";    break;
00213     case CPIOERR_MKNOD_FAILED:  s = "mknod";    break;
00214     case CPIOERR_MKFIFO_FAILED: s = "mkfifo";   break;
00215     case CPIOERR_LINK_FAILED:   s = "link";     break;
00216     case CPIOERR_READLINK_FAILED: s = "readlink";       break;
00217     case CPIOERR_READ_FAILED:   s = "read";     break;
00218     case CPIOERR_COPY_FAILED:   s = "copy";     break;
00219 
00220     case CPIOERR_HDR_SIZE:      s = _("Header size too big");   break;
00221     case CPIOERR_UNKNOWN_FILETYPE: s = _("Unknown file type");  break;
00222     case CPIOERR_MISSING_HARDLINK: s = _("Missing hard link");  break;
00223     case CPIOERR_MD5SUM_MISMATCH: s = _("MD5 sum mismatch");    break;
00224     case CPIOERR_INTERNAL:      s = _("Internal error");        break;
00225     }
00226 
00227     l = sizeof(msg) - strlen(msg) - 1;
00228     if (s != NULL) {
00229         if (l > 0) strncat(msg, s, l);
00230         l -= strlen(s);
00231     }
00232     if ((rc & CPIOERR_CHECK_ERRNO) && myerrno) {
00233         s = _(" failed - ");
00234         if (l > 0) strncat(msg, s, l);
00235         l -= strlen(s);
00236         if (l > 0) strncat(msg, strerror(myerrno), l);
00237     }
00238     return msg;
00239 }