123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914 |
- #define PROGRAM_NAME "jffs2reader"
- #include <stdint.h>
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #include <unistd.h>
- #include <fcntl.h>
- #include <time.h>
- #include <getopt.h>
- #include <sys/types.h>
- #include <sys/stat.h>
- #include <dirent.h>
- #include <zlib.h>
- #include "mtd/jffs2-user.h"
- #include "common.h"
- static struct option long_opt[] = {
- {"help", 0, NULL, 'h'},
- {"version", 0, NULL, 'V'},
- {NULL, 0, NULL, 0},
- };
- static const char *short_opt = "rd:f:tVh";
- #define SCRATCH_SIZE (5*1024*1024)
- #define ADD_BYTES(p, n) ((p) = (typeof(p))((char *)(p) + (n)))
- #define DIRENT_INO(dirent) ((dirent) !=NULL ? je32_to_cpu((dirent)->ino) : 0)
- #define DIRENT_PINO(dirent) ((dirent) !=NULL ? je32_to_cpu((dirent)->pino) : 0)
- struct dir {
- struct dir *next;
- uint8_t type;
- uint8_t nsize;
- uint32_t ino;
- char name[256];
- };
- int target_endian = __BYTE_ORDER;
- static struct jffs2_raw_inode *find_raw_inode(char *, size_t, uint32_t);
- static void lsdir(char *, size_t, const char *, int, int);
- static void putblock(char *b, size_t bsize, size_t * rsize,
- struct jffs2_raw_inode *n)
- {
- uLongf dlen = je32_to_cpu(n->dsize);
- if (je32_to_cpu(n->isize) > bsize || (je32_to_cpu(n->offset) + dlen) > bsize)
- errmsg_die("File does not fit into buffer!");
- if (*rsize < je32_to_cpu(n->isize))
- bzero(b + *rsize, je32_to_cpu(n->isize) - *rsize);
- switch (n->compr) {
- case JFFS2_COMPR_ZLIB:
- uncompress((Bytef *) b + je32_to_cpu(n->offset), &dlen,
- (Bytef *) ((char *) n) + sizeof(struct jffs2_raw_inode),
- (uLongf) je32_to_cpu(n->csize));
- break;
- case JFFS2_COMPR_NONE:
- memcpy(b + je32_to_cpu(n->offset),
- ((char *) n) + sizeof(struct jffs2_raw_inode), dlen);
- break;
- case JFFS2_COMPR_ZERO:
- bzero(b + je32_to_cpu(n->offset), dlen);
- break;
-
- default:
- errmsg_die("Unsupported compression method!");
- }
- *rsize = je32_to_cpu(n->isize);
- }
- static struct dir *putdir(struct dir *dd, struct jffs2_raw_dirent *n)
- {
- struct dir *o, *d, *p;
- o = dd;
- if (je32_to_cpu(n->ino)) {
- if (dd == NULL) {
- d = xmalloc(sizeof(struct dir));
- d->type = n->type;
- memcpy(d->name, n->name, n->nsize);
- d->nsize = n->nsize;
- d->ino = je32_to_cpu(n->ino);
- d->next = NULL;
- return d;
- }
- while (1) {
- if (n->nsize == dd->nsize &&
- !memcmp(n->name, dd->name, n->nsize)) {
- dd->type = n->type;
- dd->ino = je32_to_cpu(n->ino);
- return o;
- }
- if (dd->next == NULL) {
- dd->next = xmalloc(sizeof(struct dir));
- dd->next->type = n->type;
- memcpy(dd->next->name, n->name, n->nsize);
- dd->next->nsize = n->nsize;
- dd->next->ino = je32_to_cpu(n->ino);
- dd->next->next = NULL;
- return o;
- }
- dd = dd->next;
- }
- } else {
- if (dd == NULL)
- return NULL;
- if (n->nsize == dd->nsize && !memcmp(n->name, dd->name, n->nsize)) {
- d = dd->next;
- free(dd);
- return d;
- }
- while (1) {
- p = dd;
- dd = dd->next;
- if (dd == NULL)
- return o;
- if (n->nsize == dd->nsize &&
- !memcmp(n->name, dd->name, n->nsize)) {
- p->next = dd->next;
- free(dd);
- return o;
- }
- }
- }
- }
- #define TYPEINDEX(mode) (((mode) >> 12) & 0x0f)
- #define TYPECHAR(mode) ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)])
- static const mode_t SBIT[] = {
- 0, 0, S_ISUID,
- 0, 0, S_ISGID,
- 0, 0, S_ISVTX
- };
- static const mode_t MBIT[] = {
- S_IRUSR, S_IWUSR, S_IXUSR,
- S_IRGRP, S_IWGRP, S_IXGRP,
- S_IROTH, S_IWOTH, S_IXOTH
- };
- static const char MODE1[] = "rwxrwxrwx";
- static const char MODE0[] = "---------";
- static const char SMODE1[] = "..s..s..t";
- static const char SMODE0[] = "..S..S..T";
- static const char *mode_string(int mode)
- {
- static char buf[12];
- int i;
- buf[0] = TYPECHAR(mode);
- for (i = 0; i < 9; i++) {
- if (mode & SBIT[i])
- buf[i + 1] = (mode & MBIT[i]) ? SMODE1[i] : SMODE0[i];
- else
- buf[i + 1] = (mode & MBIT[i]) ? MODE1[i] : MODE0[i];
- }
- return buf;
- }
- static void printdir(char *o, size_t size, struct dir *d, const char *path,
- int recurse, int want_ctime)
- {
- char m;
- char *filetime;
- time_t age;
- struct jffs2_raw_inode *ri;
- jint32_t mode;
- if (!path)
- return;
- if (strlen(path) == 1 && *path == '/')
- path++;
- while (d != NULL) {
- switch (d->type) {
- case DT_REG:
- m = ' ';
- break;
- case DT_FIFO:
- m = '|';
- break;
- case DT_CHR:
- m = ' ';
- break;
- case DT_BLK:
- m = ' ';
- break;
- case DT_DIR:
- m = '/';
- break;
- case DT_LNK:
- m = ' ';
- break;
- case DT_SOCK:
- m = '=';
- break;
- default:
- m = '?';
- }
- ri = find_raw_inode(o, size, d->ino);
- if (!ri) {
- warnmsg("bug: raw_inode missing!");
- d = d->next;
- continue;
- }
- filetime = ctime((const time_t *) &(ri->ctime));
- age = time(NULL) - je32_to_cpu(ri->ctime);
- mode.v32 = ri->mode.m;
- printf("%s %-4d %-8d %-8d ", mode_string(je32_to_cpu(mode)),
- 1, je16_to_cpu(ri->uid), je16_to_cpu(ri->gid));
- if ( d->type==DT_BLK || d->type==DT_CHR ) {
- dev_t rdev;
- size_t devsize;
- putblock((char*)&rdev, sizeof(rdev), &devsize, ri);
- printf("%4d, %3d ", major(rdev), minor(rdev));
- } else {
- printf("%9ld ", (long)je32_to_cpu(ri->dsize));
- }
- d->name[d->nsize]='\0';
- if (want_ctime) {
- if (age < 3600L * 24 * 365 / 2 && age > -15 * 60)
-
- printf("%6.6s %5.5s ", filetime + 4, filetime + 11);
- else
- printf("%6.6s %4.4s ", filetime + 4, filetime + 20);
- }
- printf("%s/%s%c", path, d->name, m);
- if (d->type == DT_LNK) {
- char symbuf[1024];
- size_t symsize;
- putblock(symbuf, sizeof(symbuf), &symsize, ri);
- symbuf[symsize] = 0;
- printf(" -> %s", symbuf);
- }
- printf("\n");
- if (d->type == DT_DIR && recurse) {
- char *tmp;
- tmp = xmalloc(BUFSIZ);
- sprintf(tmp, "%s/%s", path, d->name);
- lsdir(o, size, tmp, recurse, want_ctime);
- free(tmp);
- }
- d = d->next;
- }
- }
- static void freedir(struct dir *d)
- {
- struct dir *t;
- while (d != NULL) {
- t = d->next;
- free(d);
- d = t;
- }
- }
- static struct jffs2_raw_inode *find_raw_inode(char *o, size_t size,
- uint32_t ino)
- {
-
- union jffs2_node_union *n;
- union jffs2_node_union *e = (union jffs2_node_union *) (o + size);
- union jffs2_node_union *lr;
- union jffs2_node_union *mp = NULL;
- uint32_t vmin, vmint, vmaxt, vmax, vcur, v;
- vmin = 0;
- vmax = ~((uint32_t) 0);
- vmint = ~((uint32_t) 0);
- vmaxt = 0;
- vcur = 0;
-
- n = (union jffs2_node_union *) o;
- lr = n;
- do {
- while (n < e && je16_to_cpu(n->u.magic) != JFFS2_MAGIC_BITMASK)
- ADD_BYTES(n, 4);
- if (n < e && je16_to_cpu(n->u.magic) == JFFS2_MAGIC_BITMASK) {
- if (je16_to_cpu(n->u.nodetype) == JFFS2_NODETYPE_INODE &&
- je32_to_cpu(n->i.ino) == ino && (v = je32_to_cpu(n->i.version)) > vcur) {
-
- if (vmaxt < v)
- vmaxt = v;
- if (vmint > v) {
- vmint = v;
- mp = n;
- }
- if (v == (vcur + 1))
- return (&(n->i));
- }
- ADD_BYTES(n, ((je32_to_cpu(n->u.totlen) + 3) & ~3));
- } else
- n = (union jffs2_node_union *) o;
- if (lr == n) {
- vmax = vmaxt;
- vmin = vmint;
- vmint = ~((uint32_t) 0);
- if (vcur < vmax && vcur < vmin)
- return (&(mp->i));
- }
- } while (vcur < vmax);
- return NULL;
- }
- static struct dir *collectdir(char *o, size_t size, uint32_t ino, struct dir *d)
- {
-
- union jffs2_node_union *n;
- union jffs2_node_union *e = (union jffs2_node_union *) (o + size);
- union jffs2_node_union *lr;
- union jffs2_node_union *mp = NULL;
- uint32_t vmin, vmint, vmaxt, vmax, vcur, v;
- vmin = 0;
- vmax = ~((uint32_t) 0);
- vmint = ~((uint32_t) 0);
- vmaxt = 0;
- vcur = 0;
-
- n = (union jffs2_node_union *) o;
- lr = n;
- do {
- while (n < e && je16_to_cpu(n->u.magic) != JFFS2_MAGIC_BITMASK)
- ADD_BYTES(n, 4);
- if (n < e && je16_to_cpu(n->u.magic) == JFFS2_MAGIC_BITMASK) {
- if (je16_to_cpu(n->u.nodetype) == JFFS2_NODETYPE_DIRENT &&
- je32_to_cpu(n->d.pino) == ino && (v = je32_to_cpu(n->d.version)) > vcur) {
-
- if (vmaxt < v)
- vmaxt = v;
- if (vmint > v) {
- vmint = v;
- mp = n;
- }
- if (v == (vcur + 1)) {
- d = putdir(d, &(n->d));
- lr = n;
- vcur++;
- vmint = ~((uint32_t) 0);
- }
- }
- ADD_BYTES(n, ((je32_to_cpu(n->u.totlen) + 3) & ~3));
- } else
- n = (union jffs2_node_union *) o;
- if (lr == n) {
- vmax = vmaxt;
- vmin = vmint;
- vmint = ~((uint32_t) 0);
- if (vcur < vmax && vcur < vmin) {
- d = putdir(d, &(mp->d));
- lr = n =
- (union jffs2_node_union *) (((char *) mp) +
- ((je32_to_cpu(mp->u.totlen) + 3) & ~3));
- vcur = vmin;
- }
- }
- } while (vcur < vmax);
- return d;
- }
- static struct jffs2_raw_dirent *resolvedirent(char *o, size_t size,
- uint32_t ino, uint32_t pino,
- char *name, uint8_t nsize)
- {
-
- union jffs2_node_union *n;
- union jffs2_node_union *e = (union jffs2_node_union *) (o + size);
- struct jffs2_raw_dirent *dd = NULL;
- uint32_t vmax, v;
- if (!pino && ino <= 1)
- return dd;
- vmax = 0;
- n = (union jffs2_node_union *) o;
- do {
- while (n < e && je16_to_cpu(n->u.magic) != JFFS2_MAGIC_BITMASK)
- ADD_BYTES(n, 4);
- if (n < e && je16_to_cpu(n->u.magic) == JFFS2_MAGIC_BITMASK) {
- if (je16_to_cpu(n->u.nodetype) == JFFS2_NODETYPE_DIRENT &&
- (!ino || je32_to_cpu(n->d.ino) == ino) &&
- (v = je32_to_cpu(n->d.version)) > vmax &&
- (!pino || (je32_to_cpu(n->d.pino) == pino &&
- nsize == n->d.nsize &&
- !memcmp(name, n->d.name, nsize)))) {
-
- if (vmax < v) {
- vmax = v;
- dd = &(n->d);
- }
- }
- ADD_BYTES(n, ((je32_to_cpu(n->u.totlen) + 3) & ~3));
- } else
- return dd;
- } while (1);
- }
- static struct jffs2_raw_dirent *resolvename(char *o, size_t size, uint32_t pino,
- char *name, uint8_t nsize)
- {
- return resolvedirent(o, size, 0, pino, name, nsize);
- }
- static struct jffs2_raw_dirent *resolveinode(char *o, size_t size, uint32_t ino)
- {
- return resolvedirent(o, size, ino, 0, NULL, 0);
- }
- static struct jffs2_raw_dirent *resolvepath0(char *o, size_t size, uint32_t ino,
- const char *p, uint32_t * inos, int recc)
- {
- struct jffs2_raw_dirent *dir = NULL;
- int d = 1;
- uint32_t tino;
- char *next;
- char *path, *pp;
- char symbuf[1024];
- size_t symsize;
- if (recc > 16) {
-
- *inos = 0;
- return NULL;
- }
- pp = path = xstrdup(p);
- if (*path == '/') {
- path++;
- ino = 1;
- }
- if (ino > 1) {
- dir = resolveinode(o, size, ino);
- ino = DIRENT_INO(dir);
- }
- next = path - 1;
- while (ino && next != NULL && next[1] != 0 && d) {
- path = next + 1;
- next = strchr(path, '/');
- if (next != NULL)
- *next = 0;
- if (*path == '.' && path[1] == 0)
- continue;
- if (*path == '.' && path[1] == '.' && path[2] == 0) {
- if (DIRENT_PINO(dir) == 1) {
- ino = 1;
- dir = NULL;
- } else {
- dir = resolveinode(o, size, DIRENT_PINO(dir));
- ino = DIRENT_INO(dir);
- }
- continue;
- }
- dir = resolvename(o, size, ino, path, (uint8_t) strlen(path));
- if (DIRENT_INO(dir) == 0 ||
- (next != NULL &&
- !(dir->type == DT_DIR || dir->type == DT_LNK))) {
- free(pp);
- *inos = 0;
- return NULL;
- }
- if (dir->type == DT_LNK) {
- struct jffs2_raw_inode *ri;
- ri = find_raw_inode(o, size, DIRENT_INO(dir));
- putblock(symbuf, sizeof(symbuf), &symsize, ri);
- symbuf[symsize] = 0;
- tino = ino;
- ino = 0;
- dir = resolvepath0(o, size, tino, symbuf, &ino, ++recc);
- if (dir != NULL && next != NULL &&
- !(dir->type == DT_DIR || dir->type == DT_LNK)) {
- free(pp);
- *inos = 0;
- return NULL;
- }
- }
- if (dir != NULL)
- ino = DIRENT_INO(dir);
- }
- free(pp);
- *inos = ino;
- return dir;
- }
- static struct jffs2_raw_dirent *resolvepath(char *o, size_t size, uint32_t ino,
- const char *p, uint32_t * inos)
- {
- return resolvepath0(o, size, ino, p, inos, 0);
- }
- static void lsdir(char *o, size_t size, const char *path, int recurse,
- int want_ctime)
- {
- struct jffs2_raw_dirent *dd;
- struct dir *d = NULL;
- uint32_t ino;
- dd = resolvepath(o, size, 1, path, &ino);
- if (ino == 0 ||
- (dd == NULL && ino == 0) || (dd != NULL && dd->type != DT_DIR))
- errmsg_die("%s: No such file or directory", path);
- d = collectdir(o, size, ino, d);
- printdir(o, size, d, path, recurse, want_ctime);
- freedir(d);
- }
- static void catfile(char *o, size_t size, char *path, char *b, size_t bsize,
- size_t * rsize)
- {
- struct jffs2_raw_dirent *dd;
- struct jffs2_raw_inode *ri;
- uint32_t ino;
- dd = resolvepath(o, size, 1, path, &ino);
- if (ino == 0)
- errmsg_die("%s: No such file or directory", path);
- if (dd == NULL || dd->type != DT_REG)
- errmsg_die("%s: Not a regular file", path);
- ri = find_raw_inode(o, size, ino);
- putblock(b, bsize, rsize, ri);
- write_nocheck(1, b, *rsize);
- }
- int main(int argc, char **argv)
- {
- int fd, opt, c, recurse = 0, want_ctime = 0;
- struct stat st;
- char *scratch, *dir = NULL, *file = NULL;
- size_t ssize = 0;
- char *buf;
- while ((opt = getopt_long(argc, argv, short_opt, long_opt, &c)) > 0) {
- switch (opt) {
- case 'd':
- dir = optarg;
- break;
- case 'f':
- file = optarg;
- break;
- case 'r':
- recurse++;
- break;
- case 't':
- want_ctime++;
- break;
- case 'V':
- common_print_version();
- exit(EXIT_SUCCESS);
- default:
- fprintf(stderr,
- "Usage: %s <image> [-d|-f] < path >\n",
- PROGRAM_NAME);
- exit(opt == 'h' ? EXIT_SUCCESS : EXIT_FAILURE);
- }
- }
- fd = open(argv[optind], O_RDONLY);
- if (fd == -1)
- sys_errmsg_die("%s", argv[optind]);
- if (fstat(fd, &st))
- sys_errmsg_die("%s", argv[optind]);
- buf = xmalloc((size_t) st.st_size);
- if (read(fd, buf, st.st_size) != (ssize_t) st.st_size)
- sys_errmsg_die("%s", argv[optind]);
- if (dir)
- lsdir(buf, st.st_size, dir, recurse, want_ctime);
- if (file) {
- scratch = xmalloc(SCRATCH_SIZE);
- catfile(buf, st.st_size, file, scratch, SCRATCH_SIZE, &ssize);
- free(scratch);
- }
- if (!dir && !file)
- lsdir(buf, st.st_size, "/", 1, want_ctime);
- free(buf);
- exit(EXIT_SUCCESS);
- }
|