Annotation of 43BSD/etc/dump/dumpmain.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1980 Regents of the University of California.
        !             3:  * All rights reserved.  The Berkeley software License Agreement
        !             4:  * specifies the terms and conditions for redistribution.
        !             5:  */
        !             6: 
        !             7: #ifndef lint
        !             8: static char sccsid[] = "@(#)dumpmain.c 5.4 (Berkeley) 5/28/86";
        !             9: #endif not lint
        !            10: 
        !            11: #include "dump.h"
        !            12: 
        !            13: int    notify = 0;     /* notify operator flag */
        !            14: int    blockswritten = 0;      /* number of blocks written on current tape */
        !            15: int    tapeno = 0;     /* current tape number */
        !            16: int    density = 0;    /* density in bytes/0.1" */
        !            17: int    ntrec = NTREC;  /* # tape blocks in each tape record */
        !            18: int    cartridge = 0;  /* Assume non-cartridge tape */
        !            19: #ifdef RDUMP
        !            20: char   *host;
        !            21: #endif
        !            22: int    anydskipped;    /* set true in mark() if any directories are skipped */
        !            23:                        /* this lets us avoid map pass 2 in some cases */
        !            24: 
        !            25: main(argc, argv)
        !            26:        int     argc;
        !            27:        char    *argv[];
        !            28: {
        !            29:        char            *arg;
        !            30:        int             bflag = 0, i;
        !            31:        float           fetapes;
        !            32:        register        struct  fstab   *dt;
        !            33: 
        !            34:        time(&(spcl.c_date));
        !            35: 
        !            36:        tsize = 0;      /* Default later, based on 'c' option for cart tapes */
        !            37:        tape = TAPE;
        !            38:        disk = DISK;
        !            39:        increm = NINCREM;
        !            40:        temp = TEMP;
        !            41:        if (TP_BSIZE / DEV_BSIZE == 0 || TP_BSIZE % DEV_BSIZE != 0) {
        !            42:                msg("TP_BSIZE must be a multiple of DEV_BSIZE\n");
        !            43:                dumpabort();
        !            44:        }
        !            45:        incno = '9';
        !            46:        uflag = 0;
        !            47:        arg = "u";
        !            48:        if(argc > 1) {
        !            49:                argv++;
        !            50:                argc--;
        !            51:                arg = *argv;
        !            52:                if (*arg == '-')
        !            53:                        argc++;
        !            54:        }
        !            55:        while(*arg)
        !            56:        switch (*arg++) {
        !            57:        case 'w':
        !            58:                lastdump('w');          /* tell us only what has to be done */
        !            59:                exit(0);
        !            60:                break;
        !            61:        case 'W':                       /* what to do */
        !            62:                lastdump('W');          /* tell us the current state of what has been done */
        !            63:                exit(0);                /* do nothing else */
        !            64:                break;
        !            65: 
        !            66:        case 'f':                       /* output file */
        !            67:                if(argc > 1) {
        !            68:                        argv++;
        !            69:                        argc--;
        !            70:                        tape = *argv;
        !            71:                }
        !            72:                break;
        !            73: 
        !            74:        case 'd':                       /* density, in bits per inch */
        !            75:                if (argc > 1) {
        !            76:                        argv++;
        !            77:                        argc--;
        !            78:                        density = atoi(*argv) / 10;
        !            79:                        if (density >= 625 && !bflag)
        !            80:                                ntrec = HIGHDENSITYTREC;
        !            81:                }
        !            82:                break;
        !            83: 
        !            84:        case 's':                       /* tape size, feet */
        !            85:                if(argc > 1) {
        !            86:                        argv++;
        !            87:                        argc--;
        !            88:                        tsize = atol(*argv);
        !            89:                        tsize *= 12L*10L;
        !            90:                }
        !            91:                break;
        !            92: 
        !            93:        case 'b':                       /* blocks per tape write */
        !            94:                if(argc > 1) {
        !            95:                        argv++;
        !            96:                        argc--;
        !            97:                        bflag++;
        !            98:                        ntrec = atol(*argv);
        !            99:                }
        !           100:                break;
        !           101: 
        !           102:        case 'c':                       /* Tape is cart. not 9-track */
        !           103:                cartridge++;
        !           104:                break;
        !           105: 
        !           106:        case '0':                       /* dump level */
        !           107:        case '1':
        !           108:        case '2':
        !           109:        case '3':
        !           110:        case '4':
        !           111:        case '5':
        !           112:        case '6':
        !           113:        case '7':
        !           114:        case '8':
        !           115:        case '9':
        !           116:                incno = arg[-1];
        !           117:                break;
        !           118: 
        !           119:        case 'u':                       /* update /etc/dumpdates */
        !           120:                uflag++;
        !           121:                break;
        !           122: 
        !           123:        case 'n':                       /* notify operators */
        !           124:                notify++;
        !           125:                break;
        !           126: 
        !           127:        default:
        !           128:                fprintf(stderr, "bad key '%c%'\n", arg[-1]);
        !           129:                Exit(X_ABORT);
        !           130:        }
        !           131:        if(argc > 1) {
        !           132:                argv++;
        !           133:                argc--;
        !           134:                disk = *argv;
        !           135:        }
        !           136:        if (strcmp(tape, "-") == 0) {
        !           137:                pipeout++;
        !           138:                tape = "standard output";
        !           139:        }
        !           140: 
        !           141:        /*
        !           142:         * Determine how to default tape size and density
        !           143:         *
        !           144:         *              density                         tape size
        !           145:         * 9-track      1600 bpi (160 bytes/.1")        2300 ft.
        !           146:         * 9-track      6250 bpi (625 bytes/.1")        2300 ft.
        !           147:         * cartridge    8000 bpi (100 bytes/.1")        1700 ft. (450*4 - slop)
        !           148:         */
        !           149:        if (density == 0)
        !           150:                density = cartridge ? 100 : 160;
        !           151:        if (tsize == 0)
        !           152:                tsize = cartridge ? 1700L*120L : 2300L*120L;
        !           153: 
        !           154: #ifdef RDUMP
        !           155:        { char *index();
        !           156:          host = tape;
        !           157:          tape = index(host, ':');
        !           158:          if (tape == 0) {
        !           159:                msg("need keyletter ``f'' and device ``host:tape''\n");
        !           160:                exit(1);
        !           161:          }
        !           162:          *tape++ = 0;
        !           163:          if (rmthost(host) == 0)
        !           164:                exit(X_ABORT);
        !           165:        }
        !           166:        setuid(getuid());       /* rmthost() is the only reason to be setuid */
        !           167: #endif
        !           168:        if (signal(SIGHUP, sighup) == SIG_IGN)
        !           169:                signal(SIGHUP, SIG_IGN);
        !           170:        if (signal(SIGTRAP, sigtrap) == SIG_IGN)
        !           171:                signal(SIGTRAP, SIG_IGN);
        !           172:        if (signal(SIGFPE, sigfpe) == SIG_IGN)
        !           173:                signal(SIGFPE, SIG_IGN);
        !           174:        if (signal(SIGBUS, sigbus) == SIG_IGN)
        !           175:                signal(SIGBUS, SIG_IGN);
        !           176:        if (signal(SIGSEGV, sigsegv) == SIG_IGN)
        !           177:                signal(SIGSEGV, SIG_IGN);
        !           178:        if (signal(SIGTERM, sigterm) == SIG_IGN)
        !           179:                signal(SIGTERM, SIG_IGN);
        !           180:        
        !           181: 
        !           182:        if (signal(SIGINT, interrupt) == SIG_IGN)
        !           183:                signal(SIGINT, SIG_IGN);
        !           184: 
        !           185:        set_operators();        /* /etc/group snarfed */
        !           186:        getfstab();             /* /etc/fstab snarfed */
        !           187:        /*
        !           188:         *      disk can be either the full special file name,
        !           189:         *      the suffix of the special file name,
        !           190:         *      the special name missing the leading '/',
        !           191:         *      the file system name with or without the leading '/'.
        !           192:         */
        !           193:        dt = fstabsearch(disk);
        !           194:        if (dt != 0)
        !           195:                disk = rawname(dt->fs_spec);
        !           196:        getitime();             /* /etc/dumpdates snarfed */
        !           197: 
        !           198:        msg("Date of this level %c dump: %s\n", incno, prdate(spcl.c_date));
        !           199:        msg("Date of last level %c dump: %s\n",
        !           200:                lastincno, prdate(spcl.c_ddate));
        !           201:        msg("Dumping %s ", disk);
        !           202:        if (dt != 0)
        !           203:                msgtail("(%s) ", dt->fs_file);
        !           204: #ifdef RDUMP
        !           205:        msgtail("to %s on host %s\n", tape, host);
        !           206: #else
        !           207:        msgtail("to %s\n", tape);
        !           208: #endif
        !           209: 
        !           210:        fi = open(disk, 0);
        !           211:        if (fi < 0) {
        !           212:                msg("Cannot open %s\n", disk);
        !           213:                Exit(X_ABORT);
        !           214:        }
        !           215:        esize = 0;
        !           216:        sblock = (struct fs *)buf;
        !           217:        sync();
        !           218:        bread(SBLOCK, sblock, SBSIZE);
        !           219:        if (sblock->fs_magic != FS_MAGIC) {
        !           220:                msg("bad sblock magic number\n");
        !           221:                dumpabort();
        !           222:        }
        !           223:        msiz = roundup(howmany(sblock->fs_ipg * sblock->fs_ncg, NBBY),
        !           224:                TP_BSIZE);
        !           225:        clrmap = (char *)calloc(msiz, sizeof(char));
        !           226:        dirmap = (char *)calloc(msiz, sizeof(char));
        !           227:        nodmap = (char *)calloc(msiz, sizeof(char));
        !           228: 
        !           229:        anydskipped = 0;
        !           230:        msg("mapping (Pass I) [regular files]\n");
        !           231:        pass(mark, (char *)NULL);               /* mark updates esize */
        !           232: 
        !           233:        if (anydskipped) {
        !           234:                do {
        !           235:                        msg("mapping (Pass II) [directories]\n");
        !           236:                        nadded = 0;
        !           237:                        pass(add, dirmap);
        !           238:                } while(nadded);
        !           239:        } else                          /* keep the operators happy */
        !           240:                msg("mapping (Pass II) [directories]\n");
        !           241: 
        !           242:        bmapest(clrmap);
        !           243:        bmapest(nodmap);
        !           244: 
        !           245:        if (cartridge) {
        !           246:                /* Estimate number of tapes, assuming streaming stops at
        !           247:                   the end of each block written, and not in mid-block.
        !           248:                   Assume no erroneous blocks; this can be compensated for
        !           249:                   with an artificially low tape size. */
        !           250:                fetapes = 
        !           251:                (         esize         /* blocks */
        !           252:                        * TP_BSIZE      /* bytes/block */
        !           253:                        * (1.0/density) /* 0.1" / byte */
        !           254:                  +
        !           255:                          esize         /* blocks */
        !           256:                        * (1.0/ntrec)   /* streaming-stops per block */
        !           257:                        * 15.48         /* 0.1" / streaming-stop */
        !           258:                ) * (1.0 / tsize );     /* tape / 0.1" */
        !           259:        } else {
        !           260:                /* Estimate number of tapes, for old fashioned 9-track tape */
        !           261:                int tenthsperirg = (density == 625) ? 3 : 7;
        !           262:                fetapes =
        !           263:                (         esize         /* blocks */
        !           264:                        * TP_BSIZE      /* bytes / block */
        !           265:                        * (1.0/density) /* 0.1" / byte */
        !           266:                  +
        !           267:                          esize         /* blocks */
        !           268:                        * (1.0/ntrec)   /* IRG's / block */
        !           269:                        * tenthsperirg  /* 0.1" / IRG */
        !           270:                ) * (1.0 / tsize );     /* tape / 0.1" */
        !           271:        }
        !           272:        etapes = fetapes;               /* truncating assignment */
        !           273:        etapes++;
        !           274:        /* count the nodemap on each additional tape */
        !           275:        for (i = 1; i < etapes; i++)
        !           276:                bmapest(nodmap);
        !           277:        esize += i + 10;        /* headers + 10 trailer blocks */
        !           278:        msg("estimated %ld tape blocks on %3.2f tape(s).\n", esize, fetapes);
        !           279: 
        !           280:        alloctape();                    /* Allocate tape buffer */
        !           281: 
        !           282:        otape();                        /* bitmap is the first to tape write */
        !           283:        time(&(tstart_writing));
        !           284:        bitmap(clrmap, TS_CLRI);
        !           285: 
        !           286:        msg("dumping (Pass III) [directories]\n");
        !           287:        pass(dirdump, dirmap);
        !           288: 
        !           289:        msg("dumping (Pass IV) [regular files]\n");
        !           290:        pass(dump, nodmap);
        !           291: 
        !           292:        spcl.c_type = TS_END;
        !           293: #ifndef RDUMP
        !           294:        for(i=0; i<ntrec; i++)
        !           295:                spclrec();
        !           296: #endif
        !           297:        msg("DUMP: %ld tape blocks on %d tape(s)\n",spcl.c_tapea,spcl.c_volume);
        !           298:        msg("DUMP IS DONE\n");
        !           299: 
        !           300:        putitime();
        !           301: #ifndef RDUMP
        !           302:        if (!pipeout) {
        !           303:                close(to);
        !           304:                rewind();
        !           305:        }
        !           306: #else
        !           307:        tflush(1);
        !           308:        rewind();
        !           309: #endif
        !           310:        broadcast("DUMP IS DONE!\7\7\n");
        !           311:        Exit(X_FINOK);
        !           312: }
        !           313: 
        !           314: int    sighup(){       msg("SIGHUP()  try rewriting\n"); sigAbort();}
        !           315: int    sigtrap(){      msg("SIGTRAP()  try rewriting\n"); sigAbort();}
        !           316: int    sigfpe(){       msg("SIGFPE()  try rewriting\n"); sigAbort();}
        !           317: int    sigbus(){       msg("SIGBUS()  try rewriting\n"); sigAbort();}
        !           318: int    sigsegv(){      msg("SIGSEGV()  ABORTING!\n"); abort();}
        !           319: int    sigalrm(){      msg("SIGALRM()  try rewriting\n"); sigAbort();}
        !           320: int    sigterm(){      msg("SIGTERM()  try rewriting\n"); sigAbort();}
        !           321: 
        !           322: sigAbort()
        !           323: {
        !           324:        if (pipeout) {
        !           325:                msg("Unknown signal, cannot recover\n");
        !           326:                dumpabort();
        !           327:        }
        !           328:        msg("Rewriting attempted as response to unknown signal.\n");
        !           329:        fflush(stderr);
        !           330:        fflush(stdout);
        !           331:        close_rewind();
        !           332:        exit(X_REWRITE);
        !           333: }
        !           334: 
        !           335: char *rawname(cp)
        !           336:        char *cp;
        !           337: {
        !           338:        static char rawbuf[32];
        !           339:        char *rindex();
        !           340:        char *dp = rindex(cp, '/');
        !           341: 
        !           342:        if (dp == 0)
        !           343:                return (0);
        !           344:        *dp = 0;
        !           345:        strcpy(rawbuf, cp);
        !           346:        *dp = '/';
        !           347:        strcat(rawbuf, "/r");
        !           348:        strcat(rawbuf, dp+1);
        !           349:        return (rawbuf);
        !           350: }

unix.superglobalmegacorp.com

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