Annotation of 43BSDTahoe/bin/diff/diffdir.c, revision 1.1.1.1

1.1       root        1: static char *sccsid = "@(#)diffdir.c   4.11 (Berkeley) 10/22/87";
                      2: 
                      3: #include "diff.h"
                      4: /*
                      5:  * diff - directory comparison
                      6:  */
                      7: #define        d_flags d_ino
                      8: 
                      9: #define        ONLY    1               /* Only in this directory */
                     10: #define        SAME    2               /* Both places and same */
                     11: #define        DIFFER  4               /* Both places and different */
                     12: #define        DIRECT  8               /* Directory */
                     13: 
                     14: struct dir {
                     15:        u_long  d_ino;
                     16:        short   d_reclen;
                     17:        short   d_namlen;
                     18:        char    *d_entry;
                     19: };
                     20: 
                     21: struct dir *setupdir();
                     22: int    header;
                     23: static int     dirstatus;              /* exit status from diffdir */
                     24: extern int     status;
                     25: char   title[2*BUFSIZ], *etitle;
                     26: 
                     27: diffdir(argv)
                     28:        char **argv;
                     29: {
                     30:        register struct dir *d1, *d2;
                     31:        struct dir *dir1, *dir2;
                     32:        register int i;
                     33:        int cmp;
                     34: 
                     35:        if (opt == D_IFDEF) {
                     36:                fprintf(stderr, "diff: can't specify -I with directories\n");
                     37:                done();
                     38:        }
                     39:        if (opt == D_EDIT && (sflag || lflag))
                     40:                fprintf(stderr,
                     41:                    "diff: warning: shouldn't give -s or -l with -e\n");
                     42:        title[0] = 0;
                     43:        strcpy(title, "diff ");
                     44:        for (i = 1; diffargv[i+2]; i++) {
                     45:                if (!strcmp(diffargv[i], "-"))
                     46:                        continue;       /* was -S, dont look silly */
                     47:                strcat(title, diffargv[i]);
                     48:                strcat(title, " ");
                     49:        }
                     50:        for (etitle = title; *etitle; etitle++)
                     51:                ;
                     52:        setfile(&file1, &efile1, file1);
                     53:        setfile(&file2, &efile2, file2);
                     54:        argv[0] = file1;
                     55:        argv[1] = file2;
                     56:        dir1 = setupdir(file1);
                     57:        dir2 = setupdir(file2);
                     58:        d1 = dir1; d2 = dir2;
                     59:        while (d1->d_entry != 0 || d2->d_entry != 0) {
                     60:                if (d1->d_entry && useless(d1->d_entry)) {
                     61:                        d1++;
                     62:                        continue;
                     63:                }
                     64:                if (d2->d_entry && useless(d2->d_entry)) {
                     65:                        d2++;
                     66:                        continue;
                     67:                }
                     68:                if (d1->d_entry == 0)
                     69:                        cmp = 1;
                     70:                else if (d2->d_entry == 0)
                     71:                        cmp = -1;
                     72:                else
                     73:                        cmp = strcmp(d1->d_entry, d2->d_entry);
                     74:                if (cmp < 0) {
                     75:                        if (lflag)
                     76:                                d1->d_flags |= ONLY;
                     77:                        else if (opt == 0 || opt == 2)
                     78:                                only(d1, 1);
                     79:                        d1++;
                     80:                        dirstatus |= 1;
                     81:                } else if (cmp == 0) {
                     82:                        compare(d1);
                     83:                        d1++;
                     84:                        d2++;
                     85:                } else {
                     86:                        if (lflag)
                     87:                                d2->d_flags |= ONLY;
                     88:                        else if (opt == 0 || opt == 2)
                     89:                                only(d2, 2);
                     90:                        d2++;
                     91:                        dirstatus |= 1;
                     92:                }
                     93:        }
                     94:        if (lflag) {
                     95:                scanpr(dir1, ONLY, "Only in %.*s", file1, efile1, 0, 0);
                     96:                scanpr(dir2, ONLY, "Only in %.*s", file2, efile2, 0, 0);
                     97:                scanpr(dir1, SAME, "Common identical files in %.*s and %.*s",
                     98:                    file1, efile1, file2, efile2);
                     99:                scanpr(dir1, DIFFER, "Binary files which differ in %.*s and %.*s",
                    100:                    file1, efile1, file2, efile2);
                    101:                scanpr(dir1, DIRECT, "Common subdirectories of %.*s and %.*s",
                    102:                    file1, efile1, file2, efile2);
                    103:        }
                    104:        if (rflag) {
                    105:                if (header && lflag)
                    106:                        printf("\f");
                    107:                for (d1 = dir1; d1->d_entry; d1++)  {
                    108:                        if ((d1->d_flags & DIRECT) == 0)
                    109:                                continue;
                    110:                        strcpy(efile1, d1->d_entry);
                    111:                        strcpy(efile2, d1->d_entry);
                    112:                        calldiff(0);
                    113:                }
                    114:        }
                    115:        status = dirstatus;
                    116: }
                    117: 
                    118: setfile(fpp, epp, file)
                    119:        char **fpp, **epp;
                    120:        char *file;
                    121: {
                    122:        register char *cp;
                    123: 
                    124:        *fpp = malloc(BUFSIZ);
                    125:        if (*fpp == 0) {
                    126:                fprintf(stderr, "diff: ran out of memory\n");
                    127:                exit(1);
                    128:        }
                    129:        strcpy(*fpp, file);
                    130:        for (cp = *fpp; *cp; cp++)
                    131:                continue;
                    132:        *cp++ = '/';
                    133:        *epp = cp;
                    134: }
                    135: 
                    136: scanpr(dp, test, title, file1, efile1, file2, efile2)
                    137:        register struct dir *dp;
                    138:        int test;
                    139:        char *title, *file1, *efile1, *file2, *efile2;
                    140: {
                    141:        int titled = 0;
                    142: 
                    143:        for (; dp->d_entry; dp++) {
                    144:                if ((dp->d_flags & test) == 0)
                    145:                        continue;
                    146:                if (titled == 0) {
                    147:                        if (header == 0)
                    148:                                header = 1;
                    149:                        else
                    150:                                printf("\n");
                    151:                        printf(title,
                    152:                            efile1 - file1 - 1, file1,
                    153:                            efile2 - file2 - 1, file2);
                    154:                        printf(":\n");
                    155:                        titled = 1;
                    156:                }
                    157:                printf("\t%s\n", dp->d_entry);
                    158:        }
                    159: }
                    160: 
                    161: only(dp, which)
                    162:        struct dir *dp;
                    163:        int which;
                    164: {
                    165:        char *file = which == 1 ? file1 : file2;
                    166:        char *efile = which == 1 ? efile1 : efile2;
                    167: 
                    168:        printf("Only in %.*s: %s\n", efile - file - 1, file, dp->d_entry);
                    169:        
                    170: }
                    171: 
                    172: int    entcmp();
                    173: 
                    174: struct dir *
                    175: setupdir(cp)
                    176:        char *cp;
                    177: {
                    178:        register struct dir *dp = 0, *ep;
                    179:        register struct direct *rp;
                    180:        register int nitems, n;
                    181:        DIR *dirp;
                    182: 
                    183:        dirp = opendir(cp);
                    184:        if (dirp == NULL) {
                    185:                fprintf(stderr, "diff: ");
                    186:                perror(cp);
                    187:                done();
                    188:        }
                    189:        nitems = 0;
                    190:        dp = (struct dir *)malloc(sizeof (struct dir));
                    191:        if (dp == 0) {
                    192:                fprintf(stderr, "diff: ran out of memory\n");
                    193:                done();
                    194:        }
                    195:        while (rp = readdir(dirp)) {
                    196:                ep = &dp[nitems++];
                    197:                ep->d_reclen = rp->d_reclen;
                    198:                ep->d_namlen = rp->d_namlen;
                    199:                ep->d_entry = 0;
                    200:                ep->d_flags = 0;
                    201:                if (ep->d_namlen > 0) {
                    202:                        ep->d_entry = malloc(ep->d_namlen + 1);
                    203:                        if (ep->d_entry == 0) {
                    204:                                fprintf(stderr, "diff: out of memory\n");
                    205:                                done();
                    206:                        }
                    207:                        strcpy(ep->d_entry, rp->d_name);
                    208:                }
                    209:                dp = (struct dir *)realloc((char *)dp,
                    210:                        (nitems + 1) * sizeof (struct dir));
                    211:                if (dp == 0) {
                    212:                        fprintf(stderr, "diff: ran out of memory\n");
                    213:                        done();
                    214:                }
                    215:        }
                    216:        dp[nitems].d_entry = 0;         /* delimiter */
                    217:        closedir(dirp);
                    218:        qsort(dp, nitems, sizeof (struct dir), entcmp);
                    219:        return (dp);
                    220: }
                    221: 
                    222: entcmp(d1, d2)
                    223:        struct dir *d1, *d2;
                    224: {
                    225:        return (strcmp(d1->d_entry, d2->d_entry));
                    226: }
                    227: 
                    228: compare(dp)
                    229:        register struct dir *dp;
                    230: {
                    231:        register int i, j;
                    232:        int f1, f2, fmt1, fmt2;
                    233:        struct stat stb1, stb2;
                    234:        int flag = 0;
                    235:        char buf1[BUFSIZ], buf2[BUFSIZ];
                    236: 
                    237:        strcpy(efile1, dp->d_entry);
                    238:        strcpy(efile2, dp->d_entry);
                    239:        f1 = open(file1, 0);
                    240:        if (f1 < 0) {
                    241:                perror(file1);
                    242:                return;
                    243:        }
                    244:        f2 = open(file2, 0);
                    245:        if (f2 < 0) {
                    246:                perror(file2);
                    247:                close(f1);
                    248:                return;
                    249:        }
                    250:        fstat(f1, &stb1); fstat(f2, &stb2);
                    251:        fmt1 = stb1.st_mode & S_IFMT;
                    252:        fmt2 = stb2.st_mode & S_IFMT;
                    253:        if (fmt1 != S_IFREG || fmt2 != S_IFREG) {
                    254:                if (fmt1 == fmt2) {
                    255:                        if (fmt1 != S_IFDIR && stb1.st_rdev == stb2.st_rdev)
                    256:                                goto same;
                    257:                        if (fmt1 == S_IFDIR) {
                    258:                                dp->d_flags = DIRECT;
                    259:                                if (lflag || opt == D_EDIT)
                    260:                                        goto closem;
                    261:                                printf("Common subdirectories: %s and %s\n",
                    262:                                    file1, file2);
                    263:                                goto closem;
                    264:                        }
                    265:                }
                    266:                goto notsame;
                    267:        }
                    268:        if (stb1.st_size != stb2.st_size)
                    269:                goto notsame;
                    270:        for (;;) {
                    271:                i = read(f1, buf1, BUFSIZ);
                    272:                j = read(f2, buf2, BUFSIZ);
                    273:                if (i < 0 || j < 0 || i != j)
                    274:                        goto notsame;
                    275:                if (i == 0 && j == 0)
                    276:                        goto same;
                    277:                for (j = 0; j < i; j++)
                    278:                        if (buf1[j] != buf2[j])
                    279:                                goto notsame;
                    280:        }
                    281: same:
                    282:        if (sflag == 0)
                    283:                goto closem;
                    284:        if (lflag)
                    285:                dp->d_flags = SAME;
                    286:        else
                    287:                printf("Files %s and %s are identical\n", file1, file2);
                    288:        goto closem;
                    289: notsame:
                    290:        dirstatus |= 1;
                    291:        if (!ascii(f1) || !ascii(f2)) {
                    292:                if (lflag)
                    293:                        dp->d_flags |= DIFFER;
                    294:                else if (opt == D_NORMAL || opt == D_CONTEXT)
                    295:                        printf("Binary files %s and %s differ\n",
                    296:                            file1, file2);
                    297:                goto closem;
                    298:        }
                    299:        close(f1); close(f2);
                    300:        anychange = 1;
                    301:        if (lflag)
                    302:                calldiff(title);
                    303:        else {
                    304:                if (opt == D_EDIT) {
                    305:                        printf("ed - %s << '-*-END-*-'\n", dp->d_entry);
                    306:                        calldiff(0);
                    307:                } else {
                    308:                        printf("%s%s %s\n", title, file1, file2);
                    309:                        calldiff(0);
                    310:                }
                    311:                if (opt == D_EDIT)
                    312:                        printf("w\nq\n-*-END-*-\n");
                    313:        }
                    314:        return;
                    315: closem:
                    316:        close(f1); close(f2);
                    317: }
                    318: 
                    319: char   *prargs[] = { "pr", "-h", 0, "-f", 0, 0 };
                    320: 
                    321: calldiff(wantpr)
                    322:        char *wantpr;
                    323: {
                    324:        int pid, lstatus, lstatus2, pv[2];
                    325: 
                    326:        prargs[2] = wantpr;
                    327:        fflush(stdout);
                    328:        if (wantpr) {
                    329:                (void)sprintf(etitle, "%s %s", file1, file2);
                    330:                pipe(pv);
                    331:                pid = fork();
                    332:                if (pid == -1) {
                    333:                        fprintf(stderr, "No more processes");
                    334:                        done();
                    335:                }
                    336:                if (pid == 0) {
                    337:                        close(0);
                    338:                        dup(pv[0]);
                    339:                        close(pv[0]);
                    340:                        close(pv[1]);
                    341:                        execv(pr+4, prargs);
                    342:                        execv(pr, prargs);
                    343:                        perror(pr);
                    344:                        done();
                    345:                }
                    346:        }
                    347:        pid = fork();
                    348:        if (pid == -1) {
                    349:                fprintf(stderr, "diff: No more processes\n");
                    350:                done();
                    351:        }
                    352:        if (pid == 0) {
                    353:                if (wantpr) {
                    354:                        close(1);
                    355:                        dup(pv[1]);
                    356:                        close(pv[0]);
                    357:                        close(pv[1]);
                    358:                }
                    359:                execv(diff+4, diffargv);
                    360:                execv(diff, diffargv);
                    361:                perror(diff);
                    362:                done();
                    363:        }
                    364:        if (wantpr) {
                    365:                close(pv[0]);
                    366:                close(pv[1]);
                    367:        }
                    368:        while (wait(&lstatus) != pid)
                    369:                continue;
                    370:        while (wait(&lstatus2) != -1)
                    371:                continue;
                    372: /*
                    373:        if ((lstatus >> 8) >= 2)
                    374:                done();
                    375: */
                    376:        dirstatus |= lstatus >> 8;
                    377: }
                    378: 
                    379: #include <a.out.h>
                    380: 
                    381: ascii(f)
                    382:        int f;
                    383: {
                    384:        char buf[BUFSIZ];
                    385:        register int cnt;
                    386:        register char *cp;
                    387: 
                    388:        lseek(f, (long)0, 0);
                    389:        cnt = read(f, buf, BUFSIZ);
                    390:        if (cnt >= sizeof (struct exec)) {
                    391:                struct exec hdr;
                    392:                hdr = *(struct exec *)buf;
                    393:                if (!N_BADMAG(hdr))
                    394:                        return (0);
                    395:        }
                    396:        cp = buf;
                    397:        while (--cnt >= 0)
                    398:                if (*cp++ & 0200)
                    399:                        return (0);
                    400:        return (1);
                    401: }
                    402: 
                    403: /*
                    404:  * THIS IS CRUDE.
                    405:  */
                    406: useless(cp)
                    407: register char *cp;
                    408: {
                    409: 
                    410:        if (cp[0] == '.') {
                    411:                if (cp[1] == '\0')
                    412:                        return (1);     /* directory "." */
                    413:                if (cp[1] == '.' && cp[2] == '\0')
                    414:                        return (1);     /* directory ".." */
                    415:        }
                    416:        if (start && strcmp(start, cp) > 0)
                    417:                return (1);
                    418:        return (0);
                    419: }

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.